R code (for use with Shiny package) to demonstrate discrete probability distributions