# \donttest{
my.seed <- 190
M <- 3
N <- 4
R <- 2
data_output <- betaclust(pca.methylation.data[1:30,2:9], M, N, R,
model_names=c("K..","KN.","K.R"), model_selection="BIC",
parallel_process = FALSE, seed=my.seed)
summary(data_output)# }
Run the code above in your browser using DataLab