Write a function Using R or R studio. Thanks

The game Monopoly is played on a board with 40 squares, set up as shown below. H2 C1 T2 UT1 HI C2 CH3 C3 RR4 RR2 G3 D1 CC3 G2 D2 GI D3 Players begin the game on the GO square. On each turn, the player rolls two 6-sided dice. The sum of the dice determines the number of squares they advance (in a clockwise direction) on that tur Without any further rules, we would expect players to visit each square with equal probability. However, landing on G2J (go to jail), CC (community chest), and CH (chance) changes this distribution. When a player lands on G2J, they must immediately move to the JAIL square. At the beginning of the game, the CC and CH cards are shuffiled. When a player lands on CC or CH they take a card from the top of the respective pile and, after following the instructions, it is returned to the bottom of the pile. There are 16 cards in each pile, but for this assignment we are only concerned with cards that order a movement. Any card not concerned with movement will be ignored and the player will remain on the CC/CH square. The relevant cards are