将一个分类变量的数据复制到另一个变量中

Question

这是代码

a <- c("a","b","c")
a <- factor(a)
d <- c()
for(i in 1:3)
  {
   d[i] <- a[i]
  }
print(d)

输出应该是相同的a 但输出是1 2 3

Answer 1

d也需要成为一个因素，并且需要具有兼容的级别：

a <- c("a","b","c")
a <- factor(a)
d <- factor(c(),levels=levels(a))
for(i in 1:3)
{
  d[i] <- a[i]
}
print(d)
# [1] a b c
# Levels: a b c

在您的代码中，因子被强制转换为整数