正则表达式 – 如何检查值是否为数字？

有人可以帮我修改下面的功能,检查一个数字是否是数字？

# 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

我希望check.numeric()在它是像3.14这样的小数时返回TRUE.

解决方法

听起来你想要一个像这样的函数：

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