将R中的二进制因子向量重新编码为虚拟变量（0，1）

Question

我有一个向量（实际上是数据帧的一列），看起来像这样：

data$outcome
[1] Good Good Good Good Poor
Levels: Good Poor

这是它的str ：

str(data$outcome)
 Factor w/ 2 levels "Good","Poor": 1 1 1 1 2

我不希望像as.numeric(data$outcome) [1] 1 1 1 1 2 1和2。 as.numeric(data$outcome) [1] 1 1 1 1 2

我知道您不应该“手动”对变量进行虚拟编码以进行回归，并且我知道{psych} dummy.code() ，它返回一个矩阵。 我知道我可以在data.frame上使用诸如model.matrix()之类的东西：

data$outcome <- model.matrix(lm(s100b ~ outcome, data))[,2]

不是很好...

R中是否没有类似dummify(data$outcomes)东西？ 请不要开玩笑...

Answer 1

我稍微喜欢

data$isGood <- as.numeric(data$outcome == 'Good')

因为它更加显式/不透明，即使有人为该因子添加了新的级别“ Awesome”，它仍然可以使用。