From 05ee651025c0a02b7a23f0606e537830d8985f5f Mon Sep 17 00:00:00 2001 From: Neil Smith Date: Sat, 24 Feb 2018 22:25:44 +0000 Subject: [PATCH] Used more usual function name --- plot_extensions.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plot_extensions.R b/plot_extensions.R index b72ddb0..11762c2 100644 --- a/plot_extensions.R +++ b/plot_extensions.R @@ -51,7 +51,7 @@ require(ggplot2) ggplot(fit$model, aes_string(x = names(fit$model)[2], y = names(fit$model)[1])) + geom_point() + - stat_smooth(method = "lm", col = "red") + + geom_smooth(method = "lm", col = "red") + labs(title = paste("Adj R2 = ",signif(summary(fit)$adj.r.squared, 5), "Intercept =",signif(fit$coef[[1]],5 ), " Slope =",signif(fit$coef[[2]], 5), -- 2.34.1