在 r 中使用 atop 函数时获得恒定的文本大小

Question

下面是我编写的复杂自定义函数的一个更简单的示例。在此函数的 full-length 形式中，

"layer1"对应用户输入的caption，
"layer2" 对应于统计测试的结果，
"layer3" 对应于所执行的统计测试的详细信息。

但是当所有三层都包含在标题中时，它看起来像这样-

library(ggplot2)

ggplot(iris, aes(Species, Sepal.Length)) +
  geom_boxplot()  +
  labs(caption = substitute(atop(substitute(
    atop("layer1", "layer2")
  )
  , "layer3")))

^{由 reprex package (v0.2.1)}

创建于 2018-11-09

所以我想找出一种方法可以使所有三层文本大小保持不变。我实际上不确定为什么文本大小会在此上下文中自动更改。

有什么办法可以防止这种情况发生吗？

Answer 1

我对情节中的"substitute"有点困惑，但也许以下内容可以解决问题：

ggplot(iris, aes(Species, Sepal.Length)) +
  geom_boxplot()  +
  labs(caption = substitute(atop(
    atop(displaystyle("layer1"), displaystyle("layer2")), "layer3")))

在 r 中使用 atop 函数时获得恒定的文本大小

getting constant text size while using atop function in r

r

ggplot2

tidyverse

plotmath