# NOT RUN {
data(toycluster.rLNLN)
par(mfrow=c(3,4))
for (i in 1:ncol(toycluster.rLNLN)) {
hist(toycluster.rLNLN[,i],xlab="synthetic data from rLN-LN model",
main=colnames(toycluster.rLNLN)[i],col="grey")
}
par(mfrow=c(1,1))
# }
Run the code above in your browser using DataLab