# NOT RUN {
EX1 <- pcorSimulator(nobs = 50, nclusters = 3, nnodesxcluster = c(100,30,50),
pattern="powerLaw", plus = 0)
plot(EX1)
EX2 <- pcorSimulator(nobs = 25, nclusters = 2, nnodesxcluster = c(60,40),
pattern = "powerLaw", plus = 1)
plot(EX2)
# }
Run the code above in your browser using DataLab