Как добавить буквенно-цифровые и греческие символы в geom_text () в ggplot?

Question

Я пытаюсь создать график, на котором есть текст с буквенно-цифровыми и греческими символами.Если я хочу добавить только греческие символы, я могу использовать:

qplot(x, y) + geom_text(aes(2, 2, label="rho"), parse=TRUE)

Как я могу пометить сюжет с помощью «ρ и некоторого другого текста»?Я хотел бы сделать что-то вроде этого:

qplot(x, y) + geom_text(aes(2, 2, label="rho and some other text"), parse=TRUE)

Когда я пробую приведенный выше код, я получаю эту ошибку:

Error in parse(text = lab) : <text>:1:5: unexpected symbol
1: rho and
       ^

Я также был бы признателен за любое решение, которое позволит мнеиспользуйте LaTeX в geom_text() для более сложных вариантов использования в будущем.

Answer 1

Одно решение: замените тильды ~ пробелами.

d <- data.frame(x=1:3,y=1:3)
qplot(x, y, data=d) + geom_text(aes(2, 2,
              label="rho~and~some~other~text"), parse=TRUE)

Замена * на ~ работает, если вы хотите сопоставить без пробелов.

Для полного решения LaTeX, я думаю, вы хотите взглянуть на пакет tikzDevice, возможно, используемый в сочетании с knitr (новый крутой пакет в блоке);например, см. http://yihui.name/knitr/demo/graphics/