Please help in below R Studio Programming:

Save the below data in an excel with the name Tourism.xlsx and Read it into R using readxl::read_excel().

1. How to Create a tsibble which is identical to the tourism tsibble from the tsibble package including Index and Key?

2. Help to find what combination of Region and Purpose had the maximum number of overnight trips on average and also use arrange() to sort the column.

Quarter	Region	State	Purpose	Trips
1998-01-01	Adelaide	South Australia	Business	135.07769
1998-04-01	Adelaide	South Australia	Business	109.987316
1998-07-01	Adelaide	South Australia	Business	166.034687
1998-10-01	Adelaide	South Australia	Business	127.160464
1999-01-01	Adelaide	South Australia	Business	137.448533
1999-04-01	Adelaide	South Australia	Business	199.912586
1999-07-01	Adelaide	South Australia	Business	169.35509
1999-10-01	Adelaide	South Australia	Business	134.357937
2000-01-01	Adelaide	South Australia	Business	154.034398
2000-04-01	Adelaide	South Australia	Business	168.776364
2000-07-01	Adelaide	South Australia	Business	223.065116
2000-10-01	Adelaide	South Australia	Business	241.220689
2001-01-01	Adelaide	South Australia	Business	132.500038
2001-04-01	Adelaide	South Australia	Business	178.398095
2001-07-01	Adelaide	South Australia	Business	195.996326
2001-10-01	Adelaide	South Australia	Business	101.174693
2002-01-01	Adelaide	South Australia	Business	237.832791
2002-04-01	Adelaide	South Australia	Business	150.726633
2002-07-01	Adelaide	South Australia	Business	167.712842
2002-10-01	Adelaide	South Australia	Business	140.339513