在ggplot中将y轴标签加粗（x轴设置为粗体，但y轴标签不会更改）

Question

我试图在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)

Answer 1

我遇到了类似的问题，并将其付诸实践：

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

希望有所帮助。