在 ggplot 中对特定符号应用样式进行注释

Make an annotation in ggplot with applying styles on the certain symbols

我正在尝试将 r2 值和 p 值放在图表中的同一注释中。

r 和 p 需要在两个值之间用逗号表示为斜体,因此 r^2 = 0.26, p = 0.005

我已经查看了建议,但我无法得到我想要的一切。第一个示例代码让我得到了除斜体 p 之外的所有内容。

我试过像使用 r 一样在它前面加上斜体粘贴,但它给了我一个错误,第二个脚本 r 和 p 是斜体,但我不知道如何放置逗号在他们之间

annotate("text", x=93, y=65, 
         label= "paste(italic(r)^{2}, \" = 0.26, \",p, \" = 0.0008\")", 
         parse=TRUE, size=4)

annotate("text", x=93, y=65, 
         label= "italic(r)^{2}==0.26~italic(p)==0.0008", 
         parse=TRUE, size=4)

我希望 r 和 p 是斜体,并且我希望它们之间有一个逗号。

library(ggplot2)

ggplot()+
  annotate("text", x=93, y=65, 
           label= "paste(italic(r)^{2}, \" = 0.26, \",italic(p), \" = 0.0008\")", 
           parse=TRUE, size=4) + 
  #setting axis to blank just to make this visually appealing:
  theme(axis.title.x=element_blank(),
        axis.text.x=element_blank(),
        axis.ticks.x=element_blank(),
        axis.title.y=element_blank(),
        axis.text.y=element_blank(),
        axis.ticks.y=element_blank())