Como usar símbolos gregos no ggplot2?

Minhas categorias precisam ser nomeadas com letras gregas. Estou usando ggplot2e funciona perfeitamente com os dados. Infelizmente, não consigo descobrir como colocar esses símbolos gregos no eixo x (nas marcas) e também como fazê-los aparecer na legenda. Há alguma forma de fazer isso?

ATUALIZAÇÃO: Dei uma olhada no link , entretanto, não há um bom método descrito para realizar o que desejo fazer.

Aqui está um link para um excelente wiki que explica como colocar símbolos gregos no ggplot2. Em resumo, aqui está o que você faz para obter os símbolos gregos

1. Etiquetas de texto: use parse = Tdentro de geom_textou annotate.
2. Rótulos do eixo: Use expression(alpha)para obter o alfa grego.
3. Rótulos de facetas: use labeller = label_parseddentro facet.
4. Rótulos de legenda: use bquote(alpha == .(value))em rótulos de legenda.

Você pode ver o uso detalhado dessas opções no link

EDITAR. O objetivo de usar símbolos gregos ao longo das marcas de verificação pode ser alcançado da seguinte forma

require(ggplot2);
data(tips);
p0 = qplot(sex, data = tips, geom = 'bar');
p1 = p0 + scale_x_discrete(labels = c('Female' = expression(alpha),
                                      'Male'   = expression(beta)));
print(p1);

Para obter a documentação completa sobre os vários símbolos disponíveis ao fazer isso e como usá-los, consulte ?plotmath.

Solução mais simples: use caracteres Unicode

Nenhum expressionou outros pacotes são necessários.
Não tenho certeza se esse é um recurso mais recente do ggplot, mas funciona. Também torna mais fácil misturar texto grego e normal (como adicionar '*' aos carrapatos)

Basta usar caracteres Unicode na string de texto. parece funcionar bem para todas as opções que consigo imaginar. Editar: anteriormente não funcionava em rótulos de faceta. Isso aparentemente foi corrigido em algum ponto.

library(ggplot2)
ggplot(mtcars, 
       aes(mpg, disp, color=factor(gear))) + 
  geom_point() + 
  labs(title="Title (\u03b1 \u03a9)", # works fine
       x= "\u03b1 \u03a9 x-axis title",    # works fine
       y= "\u03b1 \u03a9 y-axis title",    # works fine
       color="\u03b1 \u03a9 Groups:") +  # works fine
  scale_x_continuous(breaks = seq(10, 35, 5), 
                     labels = paste0(seq(10, 35, 5), "\u03a9*")) + # works fine; to label the ticks
  ggrepel::geom_text_repel(aes(label = paste(rownames(mtcars), "\u03a9*")), size =3) + # works fine 
  facet_grid(~paste0(gear, " Gears \u03a9"))

^{Criado em 28/08/2019 pelo pacote reprex (v0.3.0)}

Use expression(delta)where 'delta' para letras minúsculas δe 'Delta' para obter capital Δ.

Aqui está uma lista completa de caracteres gregos:

Α α alfa
Β β beta
Γ γ gama
Δ δ delta
Ε ε epsilon
Ζ ζ zeta
Η η eta
Θ θ theta
Ι ι iota
Κ κ kappa
Λ λ lambda
Μ μ mu
Ν ν nu
Ξ ξ xi
Ο ο omicron
Π π pi
Ρ ο omicron Π π pi Ρ rho
Σ σ sigma
Τ τ tau
Υ υ upsilon
Φ φ phi
Χ χ chi
Ψ ψ psi
Ω ω omega

EDITAR: Copiado de comentários, ao usar em conjunto com outras palavras, use como:expression(Delta*"price")

Você não precisa do latex2exppacote para fazer o que deseja. O código a seguir resolverá o problema.

ggplot(smr, aes(Fuel.Rate, Eng.Speed.Ave., color=Eng.Speed.Max.)) + 
  geom_point() + 
  labs(title=expression("Fuel Efficiency"~(alpha*Omega)), 
color=expression(alpha*Omega), x=expression(Delta~price))

Além disso, alguns comentários (não respondidos até este ponto) perguntavam sobre colocar um asterisco (*) após uma letra grega. expression(alpha~"*")funciona, então eu sugiro dar uma chance.

Mais comentários perguntaram sobre como conseguir Δ Pricee acho que a maneira mais direta de conseguir isso é expression(Delta~price)). Se precisar adicionar algo antes da letra grega, você também pode fazer o seguinte expression(Indicative~Delta~price):