plot(Galumna ~ WatrCont, data = mites) abline(lm.abund)