library(waveTilingData)
library(TxDb.Athaliana.BioMart.plantsmart22)
data(leafdevFit)
data(leafdevInfCompare)
sigGenesCompare <- getSigGenes(fit=leafdevFit,inf=leafdevInfCompare, biomartObj=TxDb.Athaliana.BioMart.plantsmart22)
head(sigGenesCompare[[2]])
Run the code above in your browser using DataLab