r - 使ggplot中的y轴标签变为粗体(x轴设置为粗体，但y轴标签不变)

我正在尝试设置轴标签，并在ggplot中将其打勾，但y轴标签未设置为粗体。请提出我应该添加到脚本中的内容。以下是可重现的示例。我确实需要“atop”命令来设置y轴标签字符串，如下例所示。

提前致谢。

library(ggplot2)

chart <- ggplot(diamonds, aes(x = table, fill = clarity)) +

geom_histogram() +

  scale_x_continuous('Month') +

 scale_y_continuous(expression(atop('ET (W'~m^-2~')')))

chart<-chart+theme(axis.title.y = element_text(colour="grey20",size=20,face="bold"),
     axis.text.x = element_text(colour="grey20",size=20,face="bold"),
     axis.text.y = element_text(colour="grey20",size=20,face="bold"),
     axis.title.x = element_text(colour="grey20",size=20,face="bold"))

print(chart)

最佳答案

我遇到了类似的问题，并使它起作用:

ylab(expression(atop(bold('ET (W'~m^-2~')'), paste(bold('something else'[here])))))

希望能有所帮助。

关于r - 使ggplot中的y轴标签变为粗体(x轴设置为粗体，但y轴标签不变)，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/16947431/