Сохранение ggplots с греческими алфавитами в pdf

Question

Вот минимальный пример проблемы, с которой я сталкиваюсь:

      data.frame(Time=as.factor(c(0,5,10,15,20,25,30,35)),
               Value=c(0,2,4,6,8,6,5,6))%>%
  ggplot(aes(x=Time,y=Value))+
  geom_point()+
  ylab("\U0394 O.D")
ggsave("image.pdf", dpi = 1200)

Я могу создать график, который идеально отображает дельту. Однако последняя команда для сохранения графика в формате PDF выдает предупреждения. Когда вы открываете сохраненный файл, ось Y обозначается как ..OD.

Answer 1

Попробуйте использовать Каир:

      ggsave("image.pdf", dpi = 1200, device = cairo_pdf)

Answer 2

Я, вероятно, слишком поздно для этого обсуждения, но у меня был лучший опыт с latex2expбиблиотека. У меня были некоторые проблемы с сохранением нескольких графиков с помощью ggsaveа также cowplot::save_plotПришлось искать другие решения. С помощью этого метода вы можете использовать любой метод сохранения, ваш файл будет выглядеть нормально.

Допустим, вы хотите поместить число Пи в качестве метки на оси Y.

      p <- p + ylab(TeX("$\\pi$"))