r - R将类型因子的所有列更改为数值

Question

我有一个100 X 100的数据框。有30列是因素。有没有一种方法可以只将因子类型的列切换为数字类型而不影响其他列(不进行循环路由)？

Answer 1

运用以上Carl Witthoft的智慧:

asNumeric <- function(x) as.numeric(as.character(x))
factorsNumeric <- function(d) modifyList(d, lapply(d[, sapply(d, is.factor)],   
                                                   asNumeric))

例:

d <- data.frame(x=factor(1:3), y=factor(2:4), z=factor(3:5),
                r=c("a", "b", "c"), stringsAsFactors=FALSE)
> f <- factorsNumeric(d)
> class(f$x)
[1] "numeric"
> class(f$r)
[1] "character"