Аннотировать с большим или равным в ggplot

Question

Я хочу аннотировать ggplot фразой "Крупная рыба ≥ 45см", но не могу этого достичь. Я попробовал следующий пример, но он выдает "=". Также добавление "45" выдает ошибку.

ggplot(mtcars, aes(mpg, disp))+
geom_point()+
annotate("text",25,400, label=("Fish*~symbol('\u2265')*~cm"), parse=TRUE, hjust=0) 

Answer 1

Как насчет этого:

ggplot(mtcars, aes(mpg, disp))+
    geom_point()+
    annotate("text",25,400, label=("'Large fish' >= 45 ~ 'cm'"), parse=TRUE, hjust=0)

Answer 2

Другое решение основано на latex2exp пакет (пакет R, который анализирует и преобразует математические формулы LaTeX в R plotmath выражения):

library(latex2exp)
ggplot(mtcars, aes(mpg, disp))+
 geom_point()+
 annotate("text",25,400,
          label=TeX("Fish $\\geq$ 45 cm", output="character"),
          hjust=0, parse=TRUE)