fit <- lm(Ozone ~ Solar.R + Wind + Temp + I(Wind^2) + I(Temp^2) +
I(Wind*Temp)+I(Wind*Temp^2) + I(Temp*Wind^2) + I(Temp^2*Wind^2),
data=airquality)
visreg2d(fit, x="Wind", y="Temp", plot.type="image")
visreg2d(fit, x="Wind", y="Temp", plot.type="image",
color=c("purple", "green", "red"))
visreg2d(fit, x="Wind", y="Temp", plot.type="persp")
## Requires the rgl package
if (FALSE) {
visreg2d(fit,x="Wind",y="Temp",plot.type="rgl")
}
## Requires the ggplot2 package
if (FALSE) {
visreg2d(fit, x="Wind", y="Temp", plot.type="gg")
}
Run the code above in your browser using DataLab