如何避免密度曲线在图中被切断

Question

我正在使用R进行分配，并且在直方图上覆盖的拟合密度曲线在其峰值处被截断。

示例：

x <- rexp(1000, 0.2)
hist(x, prob = TRUE)
lines(density(x), col = "blue", lty = 3, lwd = 2)

我已经在互联网上搜索了这个，但没有找到解决这个问题的任何东西。我试过玩边缘，但这不起作用。我在代码中遗漏了什么吗？

感谢您的帮助！

Answer 1

这是问题的简单字面答案。使一个对象保持密度调用的结果，并使用它来设置直方图的ylim。

x <- rexp(1000, 0.2)
tmp <- density(x)
hist(x, prob = TRUE, ylim = c(0, max(tmp$y)))
lines(tmp, col = "blue", lty = 3, lwd = 2)

（应该可以去SO）