# NOT RUN {
# }
# NOT RUN {
data(LoBraExample)
potentialBreaks <- c(8,12)
selectedLDO <- selectComponents(ldo, components)
ldoSelect<- lobraModelSelection(selectedLDO, potentialBreaks, nknots=c( 1, 2))
length(ldoSelect@ldo@peaknames)
# }
Run the code above in your browser using DataLab