This question is to be solved using RStudio.

In a gambling game, a player wins the game if they roll 10 fair, six-sided dice, and get a sum of at least 40. (a) Approximate the probability of winning by simulating the game 10"1 times. Use set.seed (200) for this question. Output you11 approximate probability, but do not print your simulated rolls. (b) Compute the Central Limit Theorem approximation P(Y 2 40), where Y is the sum of 10 dice, and compare it to the Monte Carlo approximation obtained above. You can use the fact that E(Y) = 35, Var(Y) = 175/6. (c) Compute the Central Limit Theorem approximation with continuity correction P(Y E 39.5) and compare it to the Monte Carlo approximation obtained above. Does the correction seem to have improved the approximation