R：刻度中不同极限值的刻度轴

Question

我正在使用R中的hist绘制多个频率图。

对于不同的图，y轴具有不同的最大值，如下所示，最大值为15000。另一个最大80000：

但是，您可以看到顶部图的y轴的物理长度短于底部图的y轴的物理长度。

我想将y轴设为相同的物理长度。

我的脚本示例：

hist(perc1, breaks=seq(0,100,by=0.1), ylim=c(0,15000), xlab="percentage identity")
hist(perc2, breaks=seq(0,100,by=0.1), ylim=c(0,80000), xlab="percentage identity")

任何想法如何修改脚本？谢谢！