Automatisches Umwickeln von Etiketten mit labeller = label_wrap in ggplot2

Ich möchte meine Etiketten automatisch in ggplot2 einwickeln.Hier ist geschrieben, wie man eine Funktion (1) dafür schreibt, aber leider weiß ich nicht, wo ich sie setzen solllabeller=label_wrap in meinem Code (2).

(1) Funktion von Hadley

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

(2) Codebeispiel

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")

Ich möchte hier einige der längeren Etiketten einpacken.