如何从一个因子创建虚拟变量？

Question

我想从一个因子创建一组虚拟变量。

例如， mtcars数据集的cyl值为4 、 6和8 。 我想创建一组变量，例如： four_six ，其中4编码为0 ， 6编码为1 。 我最终想创建其他变量，例如： six_eight 、 four_eight 。

我使用ifelse尝试过这样的事情

four_six <- ifelse(cyl == 4, 0, 1)

但我想将六位数重新编码为1 ，而不是一切都为1 。

例如，我希望将八分之一编码为缺失/NA。

另外，有没有办法通过其他功能以编程方式做到这一点？

---

Answer 1

只需添加另一个条件

four_six <- ifelse(cyl == 4, 0, ifelse(cyl==6, 1, NA))

或使用dplyr::case_when

four_six <- dplyr::case_when(cyl==4 ~ 0, cyl==6 ~ 1)