下面是一个函数，它是helpRFunctions包的一部分，它将返回数据帧中所有不同数据类型的列表，以及与该类型相关的特定变量名。

install.package('devtools') # Only needed if you dont have this installed.
library(devtools)
install_github('adam-m-mcelhinney/helpRFunctions')
library(helpRFunctions)
my.data <- data.frame(y=rnorm(5), 
                  x1=c(1:5), 
                  x2=c(TRUE, TRUE, FALSE, FALSE, FALSE),
                  X3=letters[1:5])
t <- list.df.var.types(my.data)
t$factor
t$integer
t$logical
t$numeric

然后，您可以执行类似var(my.data[t$numeric])的操作。

希望这对你有帮助!

sapply(yourdataframe, class)

你的dataframe是你正在使用的数据帧的名称

另一种选择是使用purrr包的map函数。

library(purrr)
map(df,class)

为了方便使用数据框架，这里有一个简单的base函数

col_classes <- function(df) {
  data.frame(
  variable = names(df),
  class = unname(sapply(df, class))
  )
}
col_classes(my.data)
  variable     class
1        y   numeric
2       x1   integer
3       x2   logical
4       X3 character

要获得一个带有类型和类的漂亮Tibble:

  purrr::map2_df(mtcars,names(mtcars), ~ {
    tibble(
      field = .y,
      type = typeof(.x),
      class_1 = class(.x)[1],
      class_2 = class(.x)[2]
    )
    })

我建议

sapply(foo, typeof)

如果你需要数据帧中向量的实际类型。Class()有点不同。

如果你不需要作为一个向量来获取这个信息(也就是说，你不需要它来做其他的编程)，只需要使用str(foo)。

在这两种情况下，foo将被替换为数据帧的名称。