r - 在图形上显示方程 (ggplot2)

Question

我是 R 新手，使用以下代码绘制图表：

p <- ggplot(data = data, aes(x, y, color=group)) +
     geom_smooth(method = "lm", se=FALSE, formula = lineq) + 
     stat_poly_eq(formula = lineq,
               eq.with.lhs = "italic(hat(y))~`=`~",
               aes(label = paste(..eq.label..)), 
               parse = TRUE) +         
     geom_point()

当我绘制这个时，方程当前显示为 y^ = intercept + ax

如何更改代码以便等式显示变量的实际名称？

例如，身高^ = 截距 + 年龄 * x

谢谢

标签： r

Answer 1

尝试类似的东西

library(ggpmisc)

p <- ggplot(data = data, aes(x = age, y = height, color=group)) +
     geom_smooth(method = "lm", se=FALSE, formula = lineq) + 
     stat_poly_eq(formula  = lineq,
               eq.with.lhs = "italic(height)~`=`~",
               eq.x.rhs    = "~italic(age)",
               aes(label   = paste(..eq.label..)), 
               parse = TRUE) +         
     geom_point()