# load pre-compiled expressionSet object for Ronen and Botstein yeast chemostat data
data(yeastchemostat)
rnitsobj = build.Rnits(yeastchemostat, logscale = TRUE, normmethod = 'Between')
opt_model <- calculateGCV(rnitsobj)
## Not run:
# rnitsobj <- fit(rnitsobj, gene.level = TRUE, model = opt.model)
# ## End(Not run)
Run the code above in your browser using DataLab