R 如何修复/quot;锁;ggplot2中的y轴比例?

R 如何修复/quot;锁;ggplot2中的y轴比例?,r,ggplot2,scale,axis,yaxis,R,Ggplot2,Scale,Axis,Yaxis,我想比较5个图(由温度线图覆盖的频率条形图),因为y刻度在所有图中必须是恒定的。但当我绘制图表时,y比例会根据每个数据集的最大y值(=最大频率)进行调整。 这是我的代码: ggplot(df) + geom_bar(aes(hours,count), stat = "identity", fill = "gray92", colour = "gray92") + geom_line(aes(hours, percipitation*14), stat = "identity"

我想比较5个图(由温度线图覆盖的频率条形图),因为y刻度在所有图中必须是恒定的。但当我绘制图表时,y比例会根据每个数据集的最大y值(=最大频率)进行调整。 这是我的代码:

ggplot(df) + 
    geom_bar(aes(hours,count), stat = "identity", fill = "gray92", colour = 
"gray92") +
    geom_line(aes(hours, percipitation*14), stat = "identity", size = 1.2) +
    theme(panel.grid.major = element_blank(),
          panel.grid.minor = element_blank(),
          panel.background = element_blank(),
          axis.line = element_line(colour = "black")) +
    ylab("Frequency") +
    ylim(0,80) +
    scale_y_continuous(sec.axis = sec_axis(~./14, name = "Percipitation [mm]"), breaks = seq(0,80,10)) +
    scale_x_continuous(breaks = c(0:23)) +
    theme(plot.title = element_text(size = 42, face = "bold", hjust = 0.5, margin = margin(0,0,35,0), 
          axis.title.x = element_text(size = 32, margin = margin(20,0,0,0),
          axis.title.y = element_text(size = 32, margin = margin(0,15,0,0)
          axis.title.y.right = element_text(size = 32, margin = margin(0,0,0,15), 
          axis.text.x = element_text(size = 18, margin = margin(7,0,0,0),
          axis.text.y = element_text(size = 18, margin = margin(0,5,0,0)),
          axis.text.y.right = element_text(size = 18, margin = margin(0,0,0,5)))
我希望所有的图都有一个y刻度:从0到80,不管实际数据集的最大值是多少


谢谢你!:)

看起来您的scale\u y\u continuous正在覆盖您之前设置的ylim(),请尝试以下操作:

scale_y_continuous(sec.axis = sec_axis(~./14, name = "Precipitation [mm]"), 
breaks = seq(0,80,10),limits = c(0,80)) 

看起来您的scale_y_continuous正在覆盖您之前设置的ylim(),请尝试以下操作:

scale_y_continuous(sec.axis = sec_axis(~./14, name = "Precipitation [mm]"), 
breaks = seq(0,80,10),limits = c(0,80)) 

如果可能的话,我还建议使用一个刻面来绘制它,因为它默认会修复轴。如果可能的话,我还建议使用一个刻面来绘制它,因为它默认会修复轴