powered by
prob_plot(d)
prob_plot(data.frame(x=1:5, prob=c(.1, .2, .3, .3, .1)))
Run the code above in your browser using DataLab