Code in R please thanks!

Three players, A,B, and C, each flip their coins until one person has a different result from the others. The person having the different result wins. For instance, if the players flip as in the table below, then all flip heads in the first round so they flip again. Then all flips tails in the 2nd round so they flip again. All flips heads in the third round, so they flip again. Finally, C has a different result than the others in the 4th round, so C would win. 1 2 4 3 A|H T H H B H C (a) Using R, simulate this experiment 10000 times and give the resulting estimate of P(A wins). (b) How many trials are necessary before the 95% confidence interval has a half width.02, using the simple to rule? That is, when the interval is of the form r .02?. (c) The true value. P(A wins), may or may not be in your confidence interval. What can be said about the reliability of the confidence interval containing P(A wins)? (d) What is the true probability of P(A wins), and why? Three players, A,B, and C, each flip their coins until one person has a different result from the others. The person having the different result wins. For instance, if the players flip as in the table below, then all flip heads in the first round so they flip again. Then all flips tails in the 2nd round so they flip again. All flips heads in the third round, so they flip again. Finally, C has a different result than the others in the 4th round, so C would win. 1 2 4 3 A|H T H H B H C (a) Using R, simulate this experiment 10000 times and give the resulting estimate of P(A wins). (b) How many trials are necessary before the 95% confidence interval has a half width.02, using the simple to rule? That is, when the interval is of the form r .02?. (c) The true value. P(A wins), may or may not be in your confidence interval. What can be said about the reliability of the confidence interval containing P(A wins)? (d) What is the true probability of P(A wins), and why