以 mtcars 数据集为例,我在 R 中 ggpubr 的 ggscatter 函数中使用“annotate”。这是我的代码:
library("ggpubr")
ggscatter(mtcars[mtcars$cyl == 8, ], x = "mpg", y = "qsec",
facet.by = "cyl", add = "reg.line", add.params = list(color = "black", fill = "lightgrey"),
conf.int = TRUE, cor.method = "spearman", cor.coef = TRUE, xlab = "mpg", ylab = "qsec")
+ annotate("text", x=10, y=15, parse=TRUE, label = paste0("n = ", with(mtcars, sum(mtcars$cyl == 8))))
这一切都完美无缺,除了注释,特别是这部分:
label = paste0("n = ", with(mtcars, sum(mtcars$cyl == 8)))
我希望带注释的文本为:“n = 14”。但是,它显示为:“=(n,14)”。怎么看起来这么不一样?任何建议都非常受欢迎。谢谢你。