Academic Integrity: tutoring, explanations, and feedback — we don’t complete graded work or submit on a student’s behalf.

rayon-read. csv( rayonexp. csv\") > rayon acid. temp acid. conc water.temp sulf.

ID: 3054315 • Letter: R

Question

rayon-read. csv( rayonexp. csv") > rayon acid. temp acid. conc water.temp sulf.conc amt.bl. 0.3 82 82 0.20 0.3 76.5 0.30 0.5 76.0 0.20 0.5 79.9 0. 30 0. 3 83.5 0.20 0. 5 89.5 0.30 0.3 84.2 0.20 0.3 85.7 0.30 0.5 99.5 0. 20 0.5 89.4 0.300.3 97.5 0.20 0. 30 0.5 108.7 0.20 0.3 115.2 0. 30 0.5 111.5 o. 20 0.5 102.3 0. 30 0.3 108.1 0.25 0.4 80.2 0.25 0.4 89.1 0.25 0.4 77.2 0.25 0.25 0.4 71. 5 0.25 0.4 84. 5 0.15 0.35 0.4 79.2 o. 25 0.25 0.6 90.2 35 35 0.3 35 35 0.7 0.7 0.7 82 10 0.3 0.3 103.2 12 13 14 15 16 17 18 19 20 21 0.3 82 82 0.7 0.7 0.7 25 65 85 85 0.9 85 79 91 85 0.4 85.1 23 24 25 0.4 77.5 85 85 0.2 71.0 f) Determine if the correct relationship between y and each x has been identified or not by using partial regression plots. g) Check the multicollinearity by using the variance inflation factors. Comment on this.

Explanation / Answer

For partial regression plots

Use command

pairs(y~acid.temp+acid.conc+water.temp+sulf.conc+amt.bl. ,data=rayon)

G) for vif use command mentioned below

library(car)

fit=lm(y~acid.temp+acid.conc+water.temp+sulf.conc+amt.bl. ,data=rayon)

vif(fit)