###################################################
### chunk number 1: setup
###################################################
options(width=60)
options(continue=" ")
options(prompt="R> ")


###################################################
### chunk number 2: loadData
###################################################
library(betr)
library(Biobase)
data("timeEset")
pData(timeEset)[1:15,]


###################################################
### chunk number 3: runBETR
###################################################
prob <- betr(eset=timeEset, cond=pData(timeEset)$strain, 
    timepoint=pData(timeEset)$time, replicate=pData(timeEset)$rep, alpha=0.05)
head(prob)    


###################################################
### chunk number 4: 
###################################################
sessionInfo()