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))

看起来像这样