改进 ggplot 中使用 \n 并向右延伸很远的多行标题的编辑

Improve editing of multiline title in ggplot that uses \n and extends far to the right

ggplot2 中具有 \n 换行符的长多行标题延伸到 RStudio 的 window 之外。要编辑标题,有时您必须向右滚动很远。好像标题都是一根线,不可分割

这么长的标题如何在 RStudio window 中完全可见(不调整 window 的大小)以便于编辑?理想情况下,我可以插入一个逗号,然后为每个额外的标题行开始一个新的缩进行。

这是一个小例子:

require(ggplot2)

DF <- data.frame(x = rnorm(400))
ggplot(DF, aes(x = x)) + geom_histogram() +
  ggtitle("First line very long title ending with newline\nSecond line also very long so it extends to the right out of RStudio pane\nThird line to emphasize how far you have to scroll right")

有没有什么办法可以中断这么长的 ggtitle() 通话?

这个 SO 问题似乎可以提供帮助,但我无法将它的 sprintf() 解决方案应用于我的问题。

Fmt <- c(" %s\n", "%s\n", "%s")
sprintf(paste(Fmt2, collapse = ""), "First line very long title ending with newline",
        "Second line also very long so it extends to the right out of RStudio pane",
        "Third line to emphasize how far you have to scroll right") 

这个 SO 问题也没有帮助,因为它基于不与 ggplot 合作的 plotmath。 R ggplot2 center align a multi-line title 与混合 plotmath 和 ggplot

有关

只需使用 pastesep = '\n'

ggplot(DF, aes(x = x)) + geom_histogram() +
  ggtitle(paste("First line very long title ending with newline
          Second line also very long so it extends to the right out of RStudio pane
          Third line to emphasize how far you have to scroll right", sep='\n'))