# NOT RUN {
data(LoBraExample)
selectedLDO <- selectComponents(ldo, components)
gaudermanLDOexample <- createGoudermanData(selectedLDO, breaks=c(8, 12), center=12, timeperiod=2)
evalResult<- modelGoudermanLongitudinal(gaudermanLDOexample)
message(evalResult@correctedpvalues<0.005)
# }
Run the code above in your browser using DataLab