R 在柱状图上绘制曲线时出现轴限制问题

我是新手。我有一个创建图形的脚本，其中有一点类似于：

png(Test.png)
ht=hist(step[i],20)
curve(insert_function_here,add=TRUE)

---

我想画一条直方图上的分布曲线。我的问题是，轴限制显然是由直方图而不是曲线设置的，因此曲线有时会超出Y轴限制。我玩过标准杆（“usr”），但没有用。是否有任何方法可以根据直方图或曲线（或仅曲线）的最大值设置轴限制？？如果这改变了什么，这需要在绘制多个这样的图的for循环中以及在一系列子图（par（“mfrow”）中完成

您可以先绘制曲线，然后使用plot=FALSE计算直方图，并使用add=TRUE的直方图对象上的plot函数将其添加到绘图中

---

更好的方法是计算曲线的最高y值（根据曲线的性质，可能会有快捷方式）和直方图中的最高条，并在绘制直方图时将该值赋给ylim参数。

您可以根据其他答案确定mx，这就是我最后做的：

curve(insert_function_here)
boundsc=par("usr")
ht=hist(A[,1],20,plot=FALSE)
par(usr=c(boundsc[1:2],0,max(boundsc[4],max(ht$counts))))
plot(ht,add=TRUE)    

---

它根据曲线或直方图的最高值固定边界

这是在R中，我只是在试图提取相关位时对代码进行了过度简化。

curve(insert_function_here)
boundsc=par("usr")
ht=hist(A[,1],20,plot=FALSE)
par(usr=c(boundsc[1:2],0,max(boundsc[4],max(ht$counts))))
plot(ht,add=TRUE)