In R Language, generate 100 binomial random numbers with parameters n = 4 and p = 0:7. Please set the
seed as set.seed(480).
(a) Draw a barplot of the sample.
(b) Calculate the mean, standard deviation and variance of the sample.
(c) What proportion of the sample is below 2?
(d) Compare (b) and (c) with the theoretical values that you learned in elementary statistics.