earth(Volume~Girth, data=trees, linpred=1) # linear model with earth so can use plotmo png(filename="friedmans_mars_linear_model.png",pointsize=18,width=240, height=240)...