Estoy tratando de escribir este bit de código en mi bloque GGPLOT.

ggtitle(expression(atop(bold(paste0("Control rates Vs Mean yield for " , deparse(substitute(field)))), atop(italic("(Anova:TukeyHSD)"), "")))) 

Es generando este error.

Error in grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y,  : 
  polygon edge not found 

Y si funciona, la trama tendrá título, ya que es: paste0("Control rates Vs Mean yield for ", deparse(substitute(field)))

¿Cómo escribo correctamente este GGTITLE?

1
MAPK 14 jul. 2019 a las 06:26

1 respuesta

La mejor respuesta

Puede ser que podemos usar bquote

library(ggplot2)
field <- "Some Variable"
ggplot() +
    ggtitle(bquote(atop(bold(paste("Control rates Vs Mean yield for ", 
           .(field))), atop(italic("(Anova:TukeyHSD)")))))

enter image description here

1
akrun 14 jul. 2019 a las 05:20