Come usare i simboli greci in ggplot2?

Le mie categorie devono essere denominate con lettere greche. Sto usando ggplot2e funziona magnificamente con i dati. Purtroppo non riesco a capire come mettere quei simboli greci sull'asse x (presso i segni di graduazione) e farli apparire anche nella legenda. C'è modo di farlo?

AGGIORNAMENTO: Ho dato un'occhiata al collegamento , tuttavia, non esiste un buon metodo descritto per realizzare ciò che voglio fare.

Ecco un collegamento a un eccellente wiki che spiega come inserire i simboli greci in ggplot2. In sintesi, ecco cosa fai per ottenere i simboli greci

1. Etichette di testo: utilizzare parse = Tall'interno geom_texto annotate.
2. Etichette dell'asse: utilizzare expression(alpha)per ottenere l'alfabeto greco.
3. Etichette sfaccettate: utilizzare labeller = label_parsedall'interno facet.
4. Etichette legenda: utilizzare bquote(alpha == .(value))nell'etichetta della legenda.

Puoi vedere l'utilizzo dettagliato di queste opzioni nel link

MODIFICARE. L'obiettivo di utilizzare simboli greci lungo i segni di graduazione può essere raggiunto come segue

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);

Per la documentazione completa sui vari simboli disponibili quando si esegue questa operazione e su come utilizzarli, vedere ?plotmath.

Soluzione più semplice: usa caratteri Unicode

Nessun expressiono altri pacchetti necessari.
Non sono sicuro che questa sia una funzionalità più recente per ggplot, ma funziona. Rende anche facile mescolare testo greco e testo normale (come l'aggiunta di "*" alle zecche)

Usa solo caratteri Unicode all'interno della stringa di testo. sembra funzionare bene per tutte le opzioni a cui riesco a pensare. Modifica: in precedenza non funzionava nelle etichette dei facet. Apparentemente questo è stato risolto ad un certo punto.

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"))

^{Creato il 28/08/2019 dal pacchetto reprex (v0.3.0)}

Usa expression(delta)dove "delta" per lettere minuscole δe "Delta" per ottenere capitale Δ.

Ecco l'elenco completo dei caratteri greci:

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

MODIFICA: copiato dai commenti, quando si utilizza insieme ad altre parole usa come:expression(Delta*"price")

Non hai bisogno del latex2exppacchetto per fare quello che volevi fare. Il codice seguente farebbe il trucco.

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))

Inoltre, alcuni commenti (senza risposta a questo punto) chiedevano di inserire un asterisco (*) dopo una lettera greca. expression(alpha~"*")funziona, quindi suggerisco di provarlo.

Sono stati richiesti più commenti su come ottenere Δ Pricee trovo il modo più semplice per ottenerlo expression(Delta~price)). Se devi aggiungere qualcosa prima della lettera greca, puoi anche fare questo: il expression(Indicative~Delta~price)che ti dà: