调整stat_cor'的标签输出；斯皮尔曼'；R中的s相关

我正在绘制大量的斯皮尔曼相关分析的R图。我想在图中包括R值标签，但我不想包括p值。我的实际绘图的样本量都很大，所以所有的p值都很小，并且它们的包含不会给绘图添加任何有用的内容。创建单独的绘图后，我正在使用

gridExtra:：grid.arrange

组合绘图，额外的标签长度正在妨碍我（更干净，以包含绘图本身之外的信息）

我已经看到了改变标签大小和位置的方法，但还没有找到任何限制或调整标签内容输出的方法。是否可以从

stat\u cor

中的绘图中删除p值，但保留R？是否有其他允许更多定制的软件包

这是我用来制作情节的基本代码

df %>% 
ggscatter(x = "Diameter", y = "Depth", 
            add = "reg.line", conf.int = TRUE,
            title = "test",
            xlab = "Diameter (m)", ylab = "Depth (m)",
            shape = 21, fill = "lightgray", color = "black", size = 3) +
  stat_cor(method = "spearman", label.x = 0.45, label.y = 1.2) +
  coord_cartesian(ylim = c(0,1.25), xlim = c(0,0.7)) +
  theme_minimal()

下面是使用

iris

数据集的基本相同设置

---

从这个github问题中找到了一些提示： 然后使用ggplot对象查看正在构建的所有不同属性

ggscatter(data = iris,x = "Sepal.Length", y = "Sepal.Width", 
          add = "reg.line", conf.int = TRUE,
          title = "Iris test",
          xlab = "Length", ylab = "Width",
          shape = 21, fill = "lightgray", color = "black", size = 3)+
  stat_cor(r.digits = 2, method = "spearman",
           aes(label = paste("'R = '", ..r.., sep = " "))
  )

---

试图找出这是斯皮尔曼的rho还是皮尔森的r。看不到指定了关联方法的位置。我调整了post以调用该方法。在stat_cor函数调用中，使用与以前相同的方法进行操作。在我的实际数据集中获取这些数据。试图找出问题所在<代码>解析错误（text=text[[i]]）：：1:8：意外的数字常量1:'R='0.32很难猜到，我猜某个地方有一个小错误。也许可以尝试不同的引号？此线程对类似错误有一些建议。

ggscatter(data = iris,x = "Sepal.Length", y = "Sepal.Width", 
          add = "reg.line", conf.int = TRUE,
          title = "Iris test",
          xlab = "Length", ylab = "Width",
          shape = 21, fill = "lightgray", color = "black", size = 3)+
  stat_cor(r.digits = 2, method = "spearman",
           aes(label = paste("'R = '", ..r.., sep = " "))
  )