'expects a .pheno file in the extra_files_dir - ugh
note that R is weird and does not include the row.name in
the header. why?'

def set_peek(self, dataset, **kwd):

    if (not dataset.dataset.purged):
        pp = os.path.join(dataset.extra_files_path, ('%s.pheno' % dataset.metadata.base_name))
        try:
            p = open(pp, 'r').readlines()
        except:
            p = [('##failed    to    find    %s' % pp)]
        dataset.peek = ''.join(p[:5])
        dataset.blurb = 'Galaxy    Rexpression    composite    file'
    else:
        dataset.peek = 'file    does    not    exist\n'
        dataset.blurb = 'file    purged    from    disk'
