Me gustaría envolver mis etiquetas automáticamente en ggplot2.aquí está escrito cómo escribir una función (1) para ello, pero lamentablemente no sé dónde ponerlabeller=label_wrap en mi código (2).

(1) función de hadley

label_wrap <- function(variable, value) {
  lapply(strwrap(as.character(value), width=25, simplify=FALSE), 
         paste, collapse="\n")
}

(2) ejemplo de código

df = data.frame(x = c("label", "long label", "very, very long label"), 
                y = c(10, 15, 20))

ggplot(df, aes(x, y)) + geom_bar(stat="identity")

Me gustaría envolver algunas de las etiquetas más largas aquí.