# NOT RUN {
ctr <- rsctrl(n_eff = 1, seed = 987654321) # specify new controls
summary(ctr)
# }
# NOT RUN {
# incorrect specifications will lead to an error
ctr2 <- rsctrl(step = -3, n_eff = 10000)
# }
Run the code above in your browser using DataLab