Determine the probability distribution for the number of heads obtained when flipping a coin 6 times. Create a bar plot for this distribution. Now simulate the process of flipping a coin 6 times in R, counting the number of heads.

Repeat this process 100 times, and use this to estimate the probability distribution for flipping a coin six times. Compare the bar plots for the simulated probability distribution and the theoretical one- do they agree? Repeat the experiment using 1,000 trials- what changed? What do you think would happen if you did 10,000 trials? Include the R script for this problem in your lab report.