r - 如何检查值是否为数字？

Question

有人可以帮我修改下面的函数以检查数字是否为数字吗？

# handy function that checks if something is numeric
check.numeric <- function(N){
  !length(grep("[^[:digit:]]", as.character(N)))
}

check.numeric(3243)
#TRUE
check.numeric("sdds")
#FALSE
check.numeric(3.14)
#FALSE

我想在像 3.14 这样的小数时check.numeric()返回。TRUE

Answer 1

您可以使用is.finite来测试该值是否为数字和非 NA。这适用于数字、整数和复数值（如果实部/虚部都是有限的）。

> is.finite(NA)
[1] FALSE
> is.finite(NaN)
[1] FALSE
> is.finite(Inf)
[1] FALSE
> is.finite(1L)
[1] TRUE
> is.finite(1.0)
[1] TRUE
> is.finite("A")
[1] FALSE
> is.finite(pi)
[1] TRUE
> is.finite(1+0i)
[1] TRUE

Answer 2

听起来你想要这样的功能：

f <- function(x) is.numeric(x) & !is.na(x)