R ggplot2程序包中的选项a显示通过aes通过x轴的值，b右上角的回归方程？

如何解决R ggplot2程序包中的选项a显示通过aes通过x轴的值，b右上角的回归方程？

我生成了以下回归图

通过代码

ggplot(data,aes(x=EDUCLVL,y=CUMDOSE)) +
    geom_point() +
    geom_smooth(method="lm",col="black") +
    stat_regline_equation() +
    theme_bw()

我需要两个方面的帮助。

1. 我在x轴上的值分别为5,6,10,11,12,15,16,17,18,20,21,22,23,24,25。我想显示所有值在x轴上，但R随机仅接受5个值，其间隔为5，可以选择以某种方式获得所有值（与清晰度或大小无关）。
2. 回归方程式位于左上角，我想将其放置在右上角，是否有任何选项可用于在选择的一侧定义方程式？

解决方法

您尚未发布数据，但是这里是一种使用mtcars的解决方案，您可以根据自己的需要进行调整。

ggplot(mtcars,aes(x=mpg,y=cyl)) +
  geom_point() +
  geom_smooth(method="lm",col="black") +
  scale_x_continuous(breaks = round(seq(min(mtcars$mpg),max(mtcars$mpg),by = 2),1)) +
  stat_regline_equation(label.x = 28,label.y = 9) +
  theme_bw()

,

这是另一种方法。它将x轴中断设置为EDUCLVL中的特定唯一值。参数label.x.npc和label.y.npc设置方程沿每个轴的相对位置，其中0表示底部/左侧，1表示顶部/右侧。这些参数还接受字符值，例如“ top”和“ centre”。

ggplot(data,aes(x=EDUCLVL,y=CUMDOSE)) +
  geom_point() +
  geom_smooth(method="lm",col="black") +
  scale_x_continuous(breaks = unique(sort(data$EDUCLVL))) + 
  stat_regline_equation(label.x.npc = 0.8,label.y.npc =  1) +
  theme_bw()