r - 如何在 R 中绘制对数刻度密度曲线直到极值？

Question

我想以对数比例绘制一些数据，但 R 绘制的密度曲线并不是从我拥有的第一个极值数据点开始。

以下是一些测试数据和我使用的命令:

d = c(1,1,1,2,4,7,10,20,40,100,200,600,1000,3000,15000,23000)
plot(density(d), log='x', xlim=c(1,23000))

不幸的是，我没有足够的声誉点来发布图像，但是如果您输入这两行，它应该会出现一个范围从大约 12 而不是 1(第一个数据点)的图。有办法解决这个问题吗？

谢谢大家!

Answer 1

如果你看

plot(density(d), xlim=c(-100,100), type="b")

您将看到它采用特定的正值和负值。 x 的负值不会以对数刻度显示，最小的正值是

> min( density(d)$x[density(d)$x >0] )
[1] 13.72479 

造成你所看到的。您可以使用类似

的方法来防止密度估计值达到 0 或更低

plot(density(d, from=0.000001), log='x', xlim=c(1,23000))

看起来像这样