如何使用 stat_cor() 函数将大写字母 P 的 p 值传递给 ggplot 对象？

Posted 2023-02-18

【中文标题】如何使用 stat_cor() 函数将大写字母 P 的 p 值传递给 ggplot 对象？

【英文标题】：How to p-value with uppercase letter P to a ggplot object by using stat_cor() function?

【发布时间】：2021-12-27 15:35:09

【问题描述】：

我创建了一个散点图并尝试在其上添加 R 和 P 值。我使用了 ggpubr 包的stat_cor() 函数。该函数允许您使用大写或小写的 R 系数，但我找不到 p 值的选项。有没有办法把p值的字母p写成大写？

【参考方案1】：

一种选择是使用计算变量自己创建标签（请参阅stat_cor 返回的?stat_cor 并将p 替换为P 使用例如gsub：

使用来自?stat_cor的默认示例：

library(ggpubr)
#> Loading required package: ggplot2

df <- mtcars
df$cyl <- as.factor(df$cyl)

sp <- ggscatter(df, x = "wt", y = "mpg",
                add = "reg.line",  # Add regressin line
                add.params = list(color = "blue", fill = "lightgray"), # Customize reg. line
                conf.int = TRUE # Add confidence interval
)
sp + stat_cor(aes(label = paste(..rr.label.., gsub("p", "P", ..p.label..), sep = "~`,`~")),
  label.x = 3
)
#> `geom_smooth()` using formula 'y ~ x'