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