r - manipulation - ggplot title position

R: ggplot2, ¿puedo configurar el título de la trama para que se ajuste y reduzca el texto para que se ajuste a la trama?

Question

library(ggplot2)

my_title = "This is a really long title of a plot that I want to nicely wrap /n and fit onto the plot without having to manually add the backslash n, but at the moment it does not"

r <- ggplot(data = cars, aes(x = speed, y = dist))
r + geom_smooth() + #(left) 
opts(title = my_title)

¿Puedo configurar el título de la trama para que se ajuste y reduzca el texto para que se ajuste a la trama?

Answer 1

No creo que haya una opción de ggplot2 texto en ggplot2 (siempre he insertado / n manualmente). Sin embargo, puede reducir el tamaño del texto del título modificando su código de la siguiente manera:

title.size<-10
r + geom_smooth() + opts(title = my_title,plot.title=theme_text(size=title.size))

De hecho, todos los aspectos del texto con la función theme_text .

Answer 2

Tienes que elegir manualmente el número de caracteres para envolver, pero la combinación de strwrap y paste hará lo que quieras.

wrapper <- function(x, ...) 
{
  paste(strwrap(x, ...), collapse = "/n")
}

my_title <- "This is a really long title of a plot that I want to nicely wrap and fit onto the plot without having to manually add the backslash n, but at the moment it does not"
r + 
  geom_smooth() + 
  ggtitle(wrapper(my_title, width = 20))