Using R, set the R variable val=0. Next, generate 25 values from a binomial distribution where the possible number of successes is 0–6 and the probability of success is 0.9. This can be accomplished with the command rbinom(20,6, 0.9). The resulting observations will have values between 0 and 6 inclusive. Compute the median and store it in the R variable val. Repeat this process 5000 times. You can use the R command for(i in 1:5000) val[i]=median(rbinom(20,6, 0.9)).

Speculate about what the plot of the resulting values will look like and check your answer using the R command splot(val).