我使用geom_smooth(mehtod="lm")绘制线性回归。现在我想使用系数和线性回归的截距作为图的标题。
我使用Coeff <- coef(lm(Eo2005I ~ Eo2005P))查找了我需要的值，但ggtitle似乎不喜欢文本的c(Coeff["Eo2005P"],Coeff["Intercept"])输入。我该怎么办？
答案 0 :(得分：0)
尝试“粘贴”coef的各个元素。
coefftemp <- coef(lm(...))
Coeff <- paste(coefftemp[1],coefftemp[2])