PLEASE USE R CODE

R script (make sure it has the .R extension), and add comments to show your reasoning or include your answers. Use my script for Session 4 as a reference. Problem 1: Construct in R the sample space for an ordinary deck of 52 cards, where the values go from 1 to 13 (1 is an ace, 13 is a king) and the four suits are Hearts, Clubs, Diamonds and Spades. Then construct two events: A is the event where the card value is odd. B is the event where the suit is anything except Diamonds. In R, obtain the intersection An B. Use this to compute the probabilities P(A) and P(AB) (as fractions). Are A and B independent events? R script (make sure it has the .R extension), and add comments to show your reasoning or include your answers. Use my script for Session 4 as a reference. Problem 1: Construct in R the sample space for an ordinary deck of 52 cards, where the values go from 1 to 13 (1 is an ace, 13 is a king) and the four suits are Hearts, Clubs, Diamonds and Spades. Then construct two events: A is the event where the card value is odd. B is the event where the suit is anything except Diamonds. In R, obtain the intersection An B. Use this to compute the probabilities P(A) and P(AB) (as fractions). Are A and B independent events