Question

这让我感到愚蠢，但我试图产生一个矢量/ df / list / etc（除矩阵之外的任何东西）连接两个因素。这是场景。我有一个100k线数据集。我使用knn使用上半部分预测下半部分，反之亦然。所以现在我有knn predict()创建的2个对象。

> head(pred11)
[1] 0 0 0 0 0 0
Levels: 0 1
> head(pred12)
[1] 0 1 1 0 0 0
Levels: 0 1
> class(pred11)
[1] "factor"
> class(pred12)
[1] "factor"

这是我的问题开始的地方：

> pred13 <- rbind(pred11, pred12)
> class(pred13)
[1] "matrix"

有两个问题。首先，它将0和1改为1和2，然后是第二，它似乎创造了一个巨大的矩阵，它占据了我所有的记忆。我已经尝试弄乱as.numeric()，data.frame()等，但是不能让它将2个50k因子合并为1个100k因子。有什么建议吗？

Answer 1

@James提出了一种方式，我会用另一种方法（更短）：

set.seed(42)
x1 <- factor(sample(0:1,10,replace=T))
x2 <- factor(sample(0:1,10,replace=T))

unlist(list(x1,x2))
# [1] 1 1 0 1 1 1 1 0 1 1 0 1 1 0 0 1 1 0 0 1
#Levels: 0 1

......这看起来有点神奇，但unlist特别支持这个特殊用途的因素！列表中的所有元素都必须是使其起作用的因素。

Answer 2

rbind会在你的情况下创建2 x 50000矩阵，这不是你想要的。 c是在单个较长向量中组合2个向量的正确函数。在因子上使用rbind或c时，它将使用映射到级别的基础整数。通常，您需要在重构之前将其组合为一个角色：

x1 <- factor(sample(0:1,10,replace=T))
x2 <- factor(sample(0:1,10,replace=T))

factor(c(as.character(x1),as.character(x2)))
 [1] 1 1 1 0 1 1 0 1 0 0 0 1 1 1 1 1 1 0 0 0
Levels: 0 1

R连接两个因素

2 个答案: