# load pre-compiled expressionSet object for Ronen and Botstein yeast  chemostat data
data(yeastchemostat)
rnitsobj = build.Rnits(yeastchemostat, logscale = TRUE, normmethod = 'Between')
## Not run: 
# # Fit model using gene-level summarization
# rnitsobj <- fit(rnitsobj, gene.level = TRUE, clusterallsamples = FALSE)
# 
# # Get ratio statistics from fitted model
# stat <- getStat(rnitsobj)
# ## End(Not run)
Run the code above in your browser using DataLab