r - 更改 ggscatter 中的 reg.line 方程（无常数）

Question

我正在尝试按区域可视化多个散点图。但是，我需要执行没有常数的线性回归。如何添加没有常数的回归线和相应的 R^2？下面是我的代码。

ggscatter(
  reg_data, x = "PCE.Annual", y = "Annual.Increase",
  color = "Region", palette = "jco",
  add = "reg.line"
  ) +
  facet_wrap(~Region) +
  stat_regline_equation(formula=y~x,label.y = .15) +
  stat_cor(aes(label=..rr.label..),label.y = 0.1)

标签： r