# NOT RUN {
data(smoo)
NameBlocks=paste0("S",1:24)
st=statis(Data=smoo, Blocks=rep(2,24),NameBlocks = NameBlocks)
summary(st)
#with variables scaling
st2=statis(Data=smoo, Blocks=rep(2,24),NameBlocks = NameBlocks, Graph_weights=FALSE, scale=TRUE)
# }
Run the code above in your browser using DataLab