..rr.label..
,用逗号分开,在逗号之前产生一个空间,这有点丑陋。 “方便”的问题是(偶然地?),在
..p.label..
:提供的示例中说明了。
?stat_cor
在
library(ggpubr)
# Load data
data("mtcars")
df <- mtcars
df$cyl <- as.factor(df$cyl)
ggscatter(df, x = "wt", y = "mpg", add = "reg.line") +
stat_cor(
aes(label = paste(..rr.label.., ..p.label.., sep = "~`,`~")),
label.x = 3
)
中删除第一个~
将导致错误,因为逗号在
sep
中是出乎意料的。我还尝试使用italic(R)^2~`=`~0.75`,`
而不是paste0()
,但这当然不起作用(在
paste()
中意外符号)。有一种方法可以摆脱逗号之前的空间?
提前感谢!
the the逗号之前使用
italic(R)^2~`=`~0.75italic
而不是*
:
~