2011-11-26 32 views
12

Cambiar las caras y tamaños de fuente funciona bien sin expresión en las etiquetas. Aquí está el código donde tengo un problema para cambiar las caras de la fuente en la expresión de la etiqueta.ggplot2: Estilo de fuente en la expresión de etiqueta

p <- ggplot(data = mtcars, aes(x=wt, y=mpg))+geom_point() 
p <- p + labs(x="Weight", y=expression(paste("mpg ( ", m^{-2}, ")"))) 
p <- p + opts(axis.title.x = theme_text(family="serif", face="bold", size=12, angle=00, hjust=0.54, vjust=0)) 
p <- p + opts(axis.title.y = theme_text(family="serif", face="bold", size=12, angle=90, vjust=0.25)) 
print(p) 

Output

Cualquier ayuda sería muy apreciada. Gracias

+0

Trate pgfSweave/tikzDevice? –

+0

@BenBolker: ¿Me puede dar un ejemplo? Gracias – MYaseen208

Respuesta

14

No creo que sea la presencia de expression, aunque no dice exactamente qué es lo que está viendo, así que es difícil estar seguro. En una Mac obtienes el xlab en negrita, pero el ylab no está en negrita (aunque está en serif). Si utilizo el plotmath bold tiene éxito desde el interior de la función de la expresión:

p <- p + labs(x="Weight", y=expression(bold(mpg (m^-2)))) 
p <- p + opts(axis.title.y = theme_text(family="serif", 
            size=12, angle=90, vjust=0.25)) 
p <- p + opts(axis.title.x = theme_text(family="serif", face="bold", 
            size=12, angle=00, hjust=0.54, vjust=0)) 
p 

Como siempre, dispositivos gráficos son a menudo OS-variable y que no han ofrecido ninguna pista sobre la suya, por lo que se inhibe más comentarios.

(EDIT: Si cita el exponente -2 lo puede conseguir en negrita() - ed también.)

expression(bold(mpg (m^bold("-2"))))) 
Cuestiones relacionadas