Loss,x1,x2372,45,162206,55,233175,61,232154,66,231136,71,231112,71,23755,81,22445,86,219221,53,203166,60,189164,64,210113,68,21082,79,19632,81,180228,56,200196,68,173128,75,18897,83,16164,88,119249,59,161219,71,151186,80,165155,82,151114,89,128341,51,161340,59,146283,65,148267,74,144215,81,134148,86,127
Need the code and comment in R-studio, and please explain it,thanks!
Q5.
Use your model to obtain the mean abrasion loss for rubber withhardness 71 an tensile strength 201. Round your answer to 2 decimalplaces.
Q6.
Use your model to obtain a 98% confidence interval for the meanabrasion loss for rubber with hardness 71 an tensile strength201.
Enter here the Lower Bound for the confidence interval. Roundyour answer to 2 decimal places.
Q7.
After the scatter plots, the correlation between the variables,the summary of the model, R-squared and s, and the F-test, brieflycomment on the adequacy of the model fit.