Как создать несколько текстовых меток с выделенным курсивом в графе с помощью ggplot2?

Question

Я построил сгруппированный линейный граф, используя ggplot2.

Я использовал функцию аннотации в ggplot2 для ввода значений p для t-тестов данных каждого дня в качестве меток.

Мне нужно, чтобы каждый «p» был выделен курсивом, сохраняя обычный текст для знака и знака. Код для меток, как они появляются на графике выглядит следующим образом

annotate("text", x = 1:7, y = c(15,30,35.7,29.6,38.2,37.1,43), 
label = c("p = .36","p = .05","p = .20","p = .13","p = .47","p = .12","p = .97"), 
      size = 4.2) 

Я попытался создать объект, используя bquote, который обрабатывает курсив достаточно хорошо. Но для этого, похоже, требуется использование функции text, которая не распознается в пакете ggplot2.

Проблема заключается в том, что я не могу найти способ создания составного вектора меток с частичным курсивом и частичным нормальным текстом.

Answer 1

qplot(0,0,geom="blank") + annotate("text", x=0, y=0 , label="italic(p)==0.2", parse=TRUE)