ed <- ExpData(system.file(package = "Genominator", "sample.db"),
tablename = "raw")
nd <- importToExpData(head(ed, -1), dbFilename = tempfile(),
tablename = "collapsed")
head(nd)
cd <- collapseExpData(nd, tablename = "bio", overwrite = TRUE,
groups = c("mut", "mut", "wt", "wt"))
head(cd)
Run the code above in your browser using DataLab