在R中包装和居中标题

Question

我有一个很长的标题，包含斜体。我尝试使用\n将一半的标题移到新的一行，但成效有限。我有很多想法，但现在我不能把第二行放在中心位置。

title(main=expression(paste("Inoculated \n", italic("Petunia x hybrida\n"), "`Dreams Red` mortality\n as a function of irrigation treatment" )))

Answer 1

您可以使用atop来实现，这实际上是用于格式化数学，但经常用于此目的。它将其第一个参数置于顶部，将第二个参数置于底部，因此paste为必要。

plot(x = rnorm(10))
title(main = expression(atop(paste('Inoculated ', italic("Petunia x hybrida"), 
                                   "`Dreams Red` mortality"), 
                             "as a function of irrigation treatment")))

Answer 2

我在那个表达式中计算了三个“\ n”，所以我猜你想要4行标题。嵌套使用plotmath atop：

，这相当容易

title(main=expression(atop( atop(Inoculated, 
                                 italic("Petunia x hybrida")),
                            atop("\'Dreams Red\'"~mortality, 
                                 'as a function of irrigation treatment') )))

我还猜测你实际上不想要反引号，所以转义单引号。

使用包含多行而不是2的幂的表达式“写入”图形设备的任务有点复杂。