###################################################
### chunk number 1: setup
###################################################
#line 27 "vignettes/betr/inst/doc/betr.Rnw"
options(width=60)
options(continue=" ")
options(prompt="R> ")


###################################################
### chunk number 2: loadData
###################################################
#line 46 "vignettes/betr/inst/doc/betr.Rnw"
library(betr)
library(Biobase)
data("timeEset")
pData(timeEset)[1:15,]


###################################################
### chunk number 3: runBETR
###################################################
#line 54 "vignettes/betr/inst/doc/betr.Rnw"
prob <- betr(eset=timeEset, cond=pData(timeEset)$strain, 
    timepoint=pData(timeEset)$time, replicate=pData(timeEset)$rep, alpha=0.05)
head(prob)    


###################################################
### chunk number 4: 
###################################################
#line 77 "vignettes/betr/inst/doc/betr.Rnw"
sessionInfo()