相关疑难解决方法(0)

我编写了一个函数来为包含数百个问题的大型数据集制作图表。所有图表都来自同一数据集，并从我读入的 csv 的“graphtitle”列中将标题作为字符串拉出。其中一些标题相当长，应分为两行。也许因为它们来自 csv，标题无法通过转义起作用\n，即使它们起作用，似乎应该有一种比\n在 CSV 中的适当位置添加每个变量名称更简单的方法。

有没有办法让我的函数自动分割标题行？我知道我可以改变标题的大小，但这会使它在很大程度上难以辨认

MC.Graph <- function(variable){
    p <- ggplot(data = newBEPS, aes_string(x=variable)) + geom_bar(aes(y = (..count..)/sum(..count..)), width = .5)+ scale_y_continuous(labels = percent)
    p <- p + ggtitle(graphwords$graphtitle[graphwords$gw.varname == variable]) + 
    theme(plot.title = element_text(size =20, lineheight = .5, face = "bold"))
}