r - 为什么我得到“position_dodge 需要恒定宽度”，即使宽度在 ggplot2 中是恒定的

Question

我收到一条警告消息，我不理解 ggplot2 中的简单条形图

> df <- data.frame(X = 127:131, Y = rnorm(5))
> df
    X          Y
1 127  0.9391077
2 128 -0.9392529
3 129 -1.1296221
4 130  1.1454907
5 131  1.8564596
> ggplot(df) + geom_bar(aes(X,Y), stat ="identity", position = "dodge")
Warning message:
position_dodge requires constant width: output may be incorrect 

它似乎只发生在 X 值的某些范围内。我已经用谷歌搜索了这方面的信息，但似乎都是在谈论宽度真正不同的情况，或者 stat 不是“身份”的情况。在这种情况下，X 值只是整数，所以应该很简单。

生成的图表看起来不错，所以我对忽略我不理解的警告感到不安。

知道发生了什么吗？

Answer 1

设置options(warn = 2, error = recover)并重新运行代码可以让我们找到问题所在。

在collide函数内部（调用堆栈中的第 16 号），有这段代码：

if (!zero_range(range(widths))) {
    warning(name, " requires constant width: output may be incorrect", 
        call. = FALSE)
}

浮点舍入误差意味着widths取值略有不同。

format(widths, digits = 22)
# [1] "0.9000000000000056843419" "0.8999999999999914734872" "0.8999999999999772626325"

检查数字是否相同的公差太严格了：大约 2.2e-14。

args(zero_range)
# function (x, tol = .Machine$double.eps * 100) 
# NULL
.Machine$double.eps * 100
# [1] 2.220446e-14

所以警告是错误的；别担心。