# NOT RUN {
obj1 <- makeBbdpars(m=0.35,s=0.3,size=20,ndata=500)
obj2 <- makeBbdpars(m=0.85,s=1.7,size=20,ndata=30*(1:10))
# }
# NOT RUN {
sdat1 <- simulate(obj1,nsim=100)
sdat2 <- simulate(obj2,nsim=100)
# }
# NOT RUN {
sdat3 <- simulate(obj2,nsim=10)
# }
# NOT RUN {
sdat4 <- simulate(obj2,nsim=100,ndata=100*(2:6)) # The ndata component of
# obj2 is ignored.
# }
Run the code above in your browser using DataLab