e) The R script for the above parts is as follows:
> #----Given-------
> m=63; n=45; Xbar=25; Ybar=14 ; Sx=9.7; Sy=4.9;
>
> #____________a)_______________________
> SdYbar=Sy/sqrt(n); SdYbar
[1] 0.7304489
>
> #____________b)_______________________
> SdXbar_Ybar=sqrt((Sx^2/m)+(Sy^2/n)); SdXbar_Ybar
[1] 1.423744
>
> #____________c) To find 96% CI for
Mx-My_______________________
> Upper_Limit=Xbar-Ybar+abs(qnorm(0.02))*SdXbar_Ybar
> Lower_Limit=Xbar-Ybar-abs(qnorm(0.02))*SdXbar_Ybar
> CI=c(Lower_Limit, Upper_Limit) ; CI
[1] 8.075987 13.924013
> #____________d)_______________________
> Lenght=Upper_Limit-Lower_Limit; Lenght
[1] 5.848026
Americans spend over $70 billion per year trying to lose welght. Thus, it would seem to...