#data(simu.datasets)
#cv.fit=alist()
#for(k in 2:5){
# cat(paste("K=",k,sep=""),'\n')
# cv.fit[[k]]=tune.iCluster2(datasets=simu.datasets, k,nrep=2, n.lambda=8)
#}
##Reproducibility index (RI) plot
#plotRI(cv.fit)
Run the code above in your browser using DataLab