r - 将数据集的列批量更改为数字

Question

我导入了一个 Excel 数据集，并希望将几乎所有列(大于 90)初始为字符时设置为数字。实现这一目标的最佳方法是什么，因为逐一导入并更改为数字并不是最有效的方法？

Answer 1

这应该如您所愿:

# Random data frame for illustration (100 columns wide)
df <- data.frame(replicate(100,sample(0:1,1000,rep=TRUE)))

# Check column names / return column number (just encase you wanted to check)
colnames(df)

# Specify columns
cols <- c(1:length(df))   # length(df) is useful as if you ever add more columns at later date

# Or if only want to specify specific column numbers: 
# cols <- c(1:100) 

#With help of magrittr pipe function change all to numeric
library(magrittr)
df[,cols] %<>% lapply(function(x) as.numeric(as.character(x)))

# Check our columns are numeric
str(df)