setcolclass.df from genefu