只看标题可能不知道啥意思，所以先上图了。

从图中可以看到ylab中汉字的排列方式是从上到下的，要实现这样的效果有两个关键步骤：

一是ylab不是常规的“月工作量”，而是'月\n工\n作\n量'，每个汉字中间要进行换行。

二是要对ylab进行旋转。

下面给出代码：

library(ggplot2)
#数据
df <- data.frame(
  gp = factor(rep(letters[1:3], each = 10)),
  y = rnorm(30)
)
#ggplot绘制
p0 <-ggplot(df, aes(gp, y)) +
  geom_point() +
  geom_point(data = ds, aes(y = mean), colour = 'red', size = 3)
#相关设置
p0+xlab('The glorious years of the movies')+ylab('月\n工\n作\n量')+
  theme(
    axis.text.x=element_text(angle=90, size=8),
    axis.title.x=element_text(angle=10, color='red'),
    axis.title.y=element_text(angle=360, color='blue', face='bold', size=14,vjust=0.5)

  )

如有任何问题可以加群R语言＆大数据分析456726635或者Python & Spark大数636866908与我联系。