R - 绘制的数据点无法区分

Question

W = c(20000, 5000, 3000, 8, 2, 0.5)
BMR = c(19000, 12000, 960, 86, 30, 10)
BMRPlot <- plot(W, BMR, main='Graph 2', cex=1.25, pch=21, bg='blue', lwd=1)

以上是我试图绘制的数据，但是你可以告诉我们一旦绘制的最终数据点似乎无法区分，因为它们非常接近。我可以在我的代码行中添加哪些内容来更改此视图，以便所有点都可见？

Answer 1

在这种情况下，您或多或少必须使用转换来使所有点都可见。否则，积分必须非常小，不要重叠，然后你就看不到它们了。

x和y的日志转换似乎在这里起作用。

logW = log(c(20000, 5000, 3000, 8, 2, 0.5))
logBMR = log(c(19000, 12000, 960, 86, 30, 10))
BMRPlot <- plot(logW, logBMR, main='Graph 2', cex=1.25, pch=21, bg='blue', lwd=1)

如下面的评论者所述，如果您希望您的刻度值不被转换，您可以在plot语句中进行对数变换：

W = c(20000, 5000, 3000, 8, 2, 0.5)
BMR = c(19000, 12000, 960, 86, 30, 10)
BMRPlot <- plot(W, BMR, main='Graph 2', cex=1.25, pch=21, bg='blue', lwd=1, log="xy")