In this question, you are required to simulate the drawing of cards with replacement from a deck of 52 cards (excluding the Jokers). It is assumed that the card will be drawn randomly and uniformly. The card will be drawn in 2 stages. First draw out all 13 cards of the same suit (club, spade, heart, diamond). You can code them eg 1, 2, 3 and 4 respectively. Then out of these 13 cards, you pick one, eg, the rst one. For this, you can code 1 for Ace, 2 to 10 as the usual numbers, 11 for Jack, 12 for Queen, 13 for King, so e.g. 17 represents 7 of Club. Use this scheme (or any alternative that you are welcome to come out with) to draw out 5 cards randomly with replacement. Note that if you follow my scheme, you would need to discretise appropriate continuous uniform random variables 2 times. Please display some lines of your R code in your writeup (at the very least for drawing of the 1st card)