Создайте аннотацию в ggplot с применением стилей к определенным символам - PullRequest
1 голос
/ 07 октября 2019

Я пытаюсь поместить значение 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 были курсивом, и я хочу запятую между ними.

1 Ответ

0 голосов
/ 07 октября 2019
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()) 

...