¿Cómo usar los símbolos griegos en ggplot2?

Mis categorías deben nombrarse con letras griegas. Estoy usando ggplot2 , y funciona muy bien con los datos. Lamentablemente, no puedo descifrar cómo poner esos símbolos griegos en el eje x (en las marcas) y también hacer que aparezcan en la leyenda. ¿Hay alguna forma de hacerlo?

ACTUALIZACIÓN: Eché un vistazo al enlace , sin embargo, no hay un buen método descrito para lograr lo que quiero hacer.

Aquí hay un enlace a una excelente wiki que explica cómo poner símbolos griegos en ggplot2. En resumen, esto es lo que haces para obtener símbolos griegos

  1. Etiquetas de texto: use parse = T dentro de geom_text o annotate .
  2. Etiquetas de eje: Usa la expression(alpha) para obtener el griego alfa.
  3. Etiquetas de faceta: Use labeller = label_parsed dentro de facet .
  4. Etiquetas de Leyenda: Use bquote(alpha == .(value)) en la etiqueta de la leyenda.

Puede ver el uso detallado de estas opciones en el enlace

EDITAR. El objective de usar símbolos griegos a lo largo de las marcas se puede lograr de la siguiente manera

 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 obtener documentación completa sobre los diversos símbolos que están disponibles al hacer esto y cómo usarlos, consulte ?plotmath .

Usa la expression(delta) donde ‘delta’ para δ minúscula y ‘Delta’ para obtener el capital Δ .

Aquí está la lista completa de caracteres griegos:

Α α alpha
Β beta beta
Gam gamma
Δ δ delta
Ε epsilon
Ζ eta zeta
Η η eta
Θ θ theta
Ι ι iota
Κ kappa
Lamb λ lambda
Μ μ mu
Ν ν nu
Ξ i xi
Om omicron
Π π pi
Ρ ρ rho
Σ sigma
Τ tau
Ups υ upsilon
Φ φ phi
Χ χ chi
Ψ ψ psi
Ω ω omega

EDIT: copiado de los comentarios, cuando se usa junto con otras palabras, use como: expression(Delta*"price")

No necesita el paquete latex2exp para hacer lo que quería hacer. El siguiente código haría el truco.

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

enter image description here

Además, algunos comentarios (sin respuesta a partir de este punto) preguntaron acerca de poner un asterisco (*) después de una letra griega. expression(alpha~"*") funciona, así que sugiero intentarlo.

Me preguntaron más acerca de cómo obtener Δ Price y encontré que la forma más sencilla de lograrlo es la expression(Delta~price)) . Si necesita agregar algo antes de la letra griega, también puede hacer esto: expression(Indicative~Delta~price) que le permite:

enter image description here