Question

我正在尝试将数据框中的前20列更改为因子I可以使用

单独执行

    data[,1] <- as.factor(data[,1])

我已尝试过其他方法让前一行20改变一行脚本但无效，数据框有90列我希望其余的保持数字

我浏览了这个网站，只能找到更改所有列的示例

干杯米克

Answer 1

在感兴趣的列上使用lapply：

示例：

示例数据：

set.seed(1)
mydf <- data.frame(matrix(sample(1:5, 24, TRUE), ncol = 8))
str(mydf)
# 'data.frame':  3 obs. of  8 variables:
#  $ X1: int  2 2 3
#  $ X2: int  5 2 5
#  $ X3: int  5 4 4
#  $ X4: int  1 2 1
#  $ X5: int  4 2 4
#  $ X6: int  3 4 5
#  $ X7: int  2 4 5
#  $ X8: int  2 4 1

转换指定列：

## Change cols 4:8 to factors
mydf[4:8] <- lapply(mydf[4:8], as.factor)
str(mydf)
# 'data.frame': 3 obs. of  8 variables:
#  $ X1: int  2 2 3
#  $ X2: int  5 2 5
#  $ X3: int  5 4 4
#  $ X4: Factor w/ 2 levels "1","2": 1 2 1
#  $ X5: Factor w/ 2 levels "2","4": 2 1 2
#  $ X6: Factor w/ 3 levels "3","4","5": 1 2 3
#  $ X7: Factor w/ 3 levels "2","4","5": 1 2 3
#  $ X8: Factor w/ 3 levels "1","2","4": 2 3 1

将数据框列更改为数字因子

1 个答案: