linear.smooth.plot <- basic.plot + geom_smooth(method = "lm", se = FALSE)
linear.smooth.plot