# NOT RUN {
data(univtoydataset)
# Let's select a RHLP model on a time series with 3 regimes:
data <- univtoydataset[1:320,]
selectedrhlp <- selectRHLP(X = data$x, Y = data$y,
Kmin = 2, Kmax = 4, pmin = 0, pmax = 1)
selectedrhlp$summary()
# }
Run the code above in your browser using DataLab