R - 在顶部使用时不同的字体大小

Question

创建一个绘图，其中 y 轴有两条线。我使用 atop 函数如下：

plot + ylab(expressions(atop("Line 1","Line 2")))

想知道是否可以更改第 1 行的字体大小，即使其大于第 2 行？

谢谢！

Answer 1

这是一种使用plotmath 函数缩小字体特定部分的机制scriptstyle。还有另一个更小的版本。查看该?plotmath页面以获取绘图函数的完整列表。我不知道使字体变大的绘图策略。

plot + ylab(expression( atop(Line~1, 
                             scriptstyle(Line~2))
           ))

请注意，没有expressions函数，并且我将您的文本转换为真正的 R 表达式。您可以查看 axis.title.y 的 element_text 功能的 theme() 设置以增加文本大小。

plot + ylab(expression( atop( Line~ 1,
                             scriptstyle( Line~ 2) ))) + 
       theme(axis.title.y = element_text( size = rel(2) ) )