¿Cómo agregar un título a un ggplot cuando el título es un nombre de variable?

Question

Al final de un ggplot, esto funciona bien:

+ opts(title = expression("Chart chart_title...")) 

pero esto no significa:

chart_title = "foo" 
+ opts(title = expression(chart_title)) 

ni esto:

chart_title = "foo" 
+ opts(title = chart_title) 

¿Cómo puedo añadir un título a una ggplot cuando el título es un nombre de variable?

Answer 1

Como han señalado otros, su ejemplo parece funcionar bien para los casos en que la variable chart_title es una cadena o una expresión. A veces es complicado construir la variable del título; por ejemplo, un escenario confuso puede surgir si chart_title usa algunas otras variables, y si además está usando algunos caracteres griegos, entonces un simple paste(...) no es suficiente. Para construir un título como ese, podría utilizar algo como lo siguiente:

foo <- rnorm(100) 
number <- 1 
chart_title <- substitute(paste("Chart no. ",number,": ",alpha," vs ",beta,sep=""), list(number = number)) 
qplot(foo,foo) + opts(title = chart_title) 

Otra función que es muy útil en la construcción de títulos es bquote(). La construcción programática de títulos puede ser un negocio desordenado; R FAQ 7.13 (http://cran.r-project.org/doc/FAQ/R-FAQ.html) puede ayudarlo a comenzar, pero incluso esa pregunta básica básicamente le dice que busque R-Help en caso de duda.

Answer 2

Proporcione un ejemplo reproducible. Los siguientes me da buenos resultados:

title <- "My title" 
qplot(mpg, wt, data = mtcars) + opts(title = title) 

Desde la versión 0.9.2, opts se ha replace por theme:

qplot(mpg, wt, data = mtcars) + theme(title = title) 

También, ver ?ggtitle.

Answer 3

Opts está en desuso. Una opción es usar labs()

myTitle <- "My title" 
qplot(mpg, wt, data = mtcars) + labs(title = myTitle) 

Más o menos lo mismo.