# NOT RUN {
data <- rnorm(n = 100, mean = 10, sd = 1)
r <- globalfit(data, cores = if(interactive()) NULL else 2)
sort(r, ic = 'BIC')
print(r)
summary(r)
summary(r, ic = 'AICc', n = 7)
hist(r, ic = 'BIC', which = 4)
AIC(r, n = 2)
BIC(r)
# }
Run the code above in your browser using DataLab