Автоматическая упаковка меток через labeller = label_wrap в ggplot2
Я хотел бы автоматически обернуть мои ярлыки в ggplot2.Вот написано, как написать функцию (1) для него, но, к сожалению, я не знаю, куда поставитьlabeller=label_wrap
в моем коде (2).
(1) функция Хэдли
label_wrap <- function(variable, value) {
lapply(strwrap(as.character(value), width=25, simplify=FALSE),
paste, collapse="\n")
}
(2) пример кода
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")
Я хотел бы завернуть некоторые из более длинных этикеток здесь.