r - 在 R 中使用 ggplot2 带有下标字符的粗体轴

Question

我正在尝试使用 R 中的 ggplot2 创建带有下标字符的粗体轴标签。

我已经尝试过以下操作，但下标数字似乎是“非粗体”(见下图)。

y 轴上“log”后面的 2 似乎不是粗体。然而，这里发布的答案( Trying to bold y axis in ggplot )似乎表明确实如此。这就是 ggplot2 的样子吗？

这里有一些代码，使用更简单的数据集和更少的绘图输出格式(这不会对轴标签产生影响)来复制问题(如果确实是一个问题):

library(ggplot2)  

dat <- data.frame(x = rnorm(100), y = rnorm(100))

ggplot(dat, aes(x=x,y=y)) +
  geom_point() +
  ylab(expression(bold('Coefficient estimate for log'[2]*' FPRS variable'))) + 
  xlab(expression(bold('This is what a normal 2 looks like'))) 

我还尝试了以下方法(得到相同的结果):

labs(y = expression(bold('Coefficient estimate for log'[2]*' FPRS variable')))

预先感谢您的帮助!

Answer 1

使用 latex2exp，您可以通过使用 '\\textbf{}' 包裹文本来轻松加粗文本，并使用 LaTeX 实现 Log_2

library(ggplot2) 
library(latex2exp)

dat <- data.frame(x = rnorm(100), y = rnorm(100))

ggplot(dat, aes(x=x,y=y)) +
  geom_point() +
  ylab(TeX('\\textbf{Coefficient estimate for $log_2$ FPRS variable}')) + 
  xlab(TeX('\\textbf{This is what a normal 2 looks like}'))

希望这对您有帮助!