res <- lm(Ozone ~ Wind+Temp+Solar.R, data=airquality) <br>
summary(res) <br>
*checking multicolinearity for independent variables:*<br>
VIF(lm(Wind ~ Temp+Solar.R, data=airquality))<br>
VIF(lm(Temp ~ Wind+Solar.R, data=airquality))<br>
VIF(lm(Solar.R ~ Wind+Temp, data=airquality))