当我更改轴位置时，ggplot 停止轴标签旋转

Question

基本上就是主题行中所说的内容。以下代码生成带有水平 y 标签的图：

require(ggplot2)
silly.plott <- data.frame(silly = c(1,2,3,4,5), plott = c(1,2,3,4,5))
ggplot(silly.plott, aes(x = silly, y = plott))+
    geom_point()+
    theme(axis.title.y = element_text(angle = 0, vjust = 0.5))

但是当我将 y 轴移动到左侧时，标签会变成垂直！

ggplot(silly.plott, aes(x = silly, y = plott))+
    geom_point()+
    scale_y_continuous(position = "right")+
    theme(axis.title.y = element_text(angle = 0, vjust = 0.5))

这感觉像是一个愚蠢的问题，我确信我只是错过了一些明显的东西。请帮助我。

Answer 1

只需添加.right到axis.title.y：

ggplot(silly.plott, aes(x = silly, y = plott))+
geom_point()+
scale_y_continuous(position = "right")+
theme(axis.title.y.right = element_text(angle = 0, vjust = 0.5))

（https://github.com/tidyverse/ggplot2/blob/master/NEWS.md）