## Not run:
# x <- roulette(lower = 0, upper = 100)
# # Then allocate probs to bins and click "Finish"
#
# # To fit distributions and see the results
# myfit <- fitdist(vals = x$v, probs = x$p, lower = 0, upper = 100)
# plotfit(myfit)
# ## End(Not run)
Run the code above in your browser using DataLab