The ?le swim.dat contains data on the amount of time, in seconds, it takes each of four high school swimmers to swim 50 yards. Each swimmer has six times, taken on a biweekly basis.

a) Perform the following data analysis for each swimmer separately:

i. Fit a linear regression model of swimming time as the response and week as the explanatory variable. To formulate your prior, use the information that competitive times for this age group generally range from 22 to 24 seconds.
ii. For each swimmer j, obtain a posterior predictive distribution for Yj*, their time if they were to swim two weeks from the last recorded time.

b) The coach of the team has to decide which of the four swimmers will compete in a swimming meet in two weeks. Using your predictive distributions, compute Pr(Yj* = max{Y1* , . . . , Y4*}|Y)) for each swimmer j, and based on this make a recommendation to the coach.