将分类变量重新编码为二进制 (0/1)

Question

有人可以帮助我关于ifelse的使用。

我有一个data.frame (dat)，其中包含一个名为 Q1 ( dat$Q1 ) 的分类变量/因子。 dat$Q1被编码为 1,2,3 或 4。我需要根据以下规则创建一个新列data$new1 ：

如果dat$Q1 == 3那么dat$new1应该是1 。 否则， dat$new1应该是0 。

请问这样做最有效的方法是什么？

Answer 1

使用ifelse如下：

dat$new1 <- ifelse(dat$Q1==3, 1, 0)

Answer 2

只是：

 dat$new1 <-  0+(dat$Q1==3)  # or use as.numeric(.)