Use the information from example 5.5 and the data set from table 5.2 to help answer questions 8 to 10. Do it in R Please provide the R code

Example 5.5 (Constructing simultaneous confidence intervals and ellipses) The scores obtained by n = 87 college students on the College Level Examination Program (CLEP) subtest X, and the College Qualification Test (CQT) subtests Xx, and X3 are given in Table 5.2 for X; = social science and history, Xz = verbal, and X3 = science. These data give 526.29 5808.06 597.84 222.03 X=] 54.69] and S=] 597.84 126.05 23.39 25.13 222.03 23.39 23.11 Table 5.2 College Test Data X3 X] X2 X 3 X] X2 (Social (Social science and science and (Verbal) (Science) Individual history) (Verbal) (Science) Individual history) 494 41 24 468 26 45 25 428 26 541 47 514 21 47 362 36 17 408 28 17 547 33 48 27 49 594 68 23 614 67 29 501 25 26 501 687 75 33 421 46 22 633 52 31 527 50 55 647 IDAWNBON JOVIAWN 527 620 647 587 541 561 468 20 54 21 17 42 24 18 580 71 36 19 507 20 20 521 69 30 574 28 18 587 25 23 488 24 488 25 587 26 26 27 481 70 28 128 73 33 29 640 45 28 30 74 29 547 37 19 31 32 580 23 33 194 26 48 61 19 34 554 66 23 35 647 41 28 36 507 69 28 37 454 59 34 38 427 23 39 521 26 30 40 468 14 41 16 41 587 47 26 42 507 507 67 32 574 44 507Context: SIMULTANEOUS (Questions 8-10) Review example 5.5 and Table 5.2 in the textbook. You will need to calculate the 95% simultaneous confidence intervals for mui, mu2 and mu3. tbh52 names(tb52) > head(tb52) x1 x2 x3 468 41 26 428 39 26 514 53 21 547 67 33 614 61 27 5@1 67 29 now Bw he This data frame in now altered by removing the first and the last rows newdf mysimint(df = tb52, a=c(@,1,0),alpha = @.85 ) Sci [1] 51.21484161 58.16446873 $tcrit [1] @.09578716467 $n [1] 87 $p [1] 3 Question 8 SIMULTANEOUS Using the data frame defined above called newdf find the simultaneous 95% interval (L,U) for mu1. Submit L to 4 decimal places Question 9 SIMULTANEOUS Using the data frame defined above called newdf find the simultaneous 95% interval (L,U) for mu1-mu2. Submit L to 4 decimal places Question 10 SIMULTANEOUS Using the data frame defined above called newdf find the simultaneous 95% interval (L,U) for mu1-mu2 + mu3. Submit L to 4 decimal places