r - max 在 R 中返回负无穷大

Question

我偶然发现了一个我无法解决的看似简单的问题。我试图在不包含感兴趣值的 vector 上使用 max 和 which。理想情况下，我想在该实例中获得数字 0 。但我不断得到负无穷。

ff <- c(2, 4, 6, 8, 10)
my.index <- 1
max(which(ff == my.index))
#[1] -Inf
#Warning message:
#In max(which(ff == my.index)) :
#  no non-missing arguments to max; returning -Inf

以下是返回相同结果的其他一些尝试:

max(as.numeric(which(ff == my.index)))
max(which(ff == my.index), na.rm = TRUE)
max(as.numeric(which(ff == my.index)), na.rm = TRUE)
max(numeric(0))

我确实注意到了:

max(0)
[1] 0

所以，我想也许最简单的解决方案是将 -Inf 转换为 0。有没有比下面的更优雅的 base R 解决方案？单线？理想情况下不会返回 warning 消息？

aaa <- max(which(ff == my.index))
aaa[is.infinite(aaa)] <- 0
aaa
[1] 0

Answer 1

max 在传递给 max(...) 的所有参数中使用 all 值，因此:

max(which(ff == my.index), 0)
#[1] 0