How to Plota Probability Mass Function in R Studio