在R中的ggpubr中使用注释进行奇怪的注释格式

Question

以mtcars数据集为例，我在R中的ggpubr的ggscatter函数中使用“注释”。这是我的代码：

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）”。它看起来如何如此不同？任何建议都非常欢迎。谢谢。

Answer 1

根据我上面的评论，从代码中删除parse=TRUE可以解决问题。