根据数字是否为整数过滤数值向量[重复]

您可以尝试使用 floor

integerFunction <- function(x) {
  x - floor(x) == 0
}
integerFunction(c(1.0, 5.0, 5.3, 10.0, 2.5))

[1]  TRUE  TRUE FALSE  TRUE FALSE

另一种方法是以防万一这对某人有帮助。 如果浮点值除以1时没有余数,则将其视为整数。

integerFunction <- function(x) {
  (x %% 1) == 0 
}

vec <- c(1.0, 5.0, 5.3, 10.0, 2.5)
integerFunction(vec)
# [1]  TRUE  TRUE FALSE  TRUE FALSE