在R中的情节标题中同时使用下标和换行符

Question

我希望同时包含一个下划线和一个标题，但是没有得到所需的结果：

base<-'B1'
compare<-'A1'
plot (1, 1, main = bquote('Annual mean' ~CO[2] ~'Flux Difference: \n'  ~.(compare)~ 'minus'~.(base)))

我希望在'Flux Difference'之后插入一个换行符，但它没有发生，而是这个术语无处可去。请帮帮我。

谢谢， Munish

Answer 1

这是一个相当常见的请求，并没有真正干净的答案。 Plotmath不接受“\ n”（并且帮助页面记录了这一点。）一个闪避是使用每一行作为plotmath函数atop的参数。有时候使用的另一个plotmath技巧是phantom，带有一个空参数列表，允许波形符号不抛出错误，但这里不需要：

plot (1, 1, main = bquote( atop('Annual mean' ~CO[2] ~'Flux Difference:' , 
                                     .(compare)~ 'minus'~.(base))) )