# NOT RUN {
data(smoo)
NameBlocks=paste0("S",1:24)
cl=clustatis(Data=smoo,Blocks=rep(2,24),NameBlocks = NameBlocks)
plot(cl, ngroups=3, Graph_dend=FALSE)
plot(cl, ngroups=3, Graph_dend=FALSE, axes=c(1,3))
graphics.off()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab