将因子级别更改为数值：

Question

我有一个包含三个级别的向量，分别是＆＃34; M＆＃34;，＆＃34; S＆＃34;和＆＃34;未知＆＃34;

我想将它们更改为数字（整数）值，如下所示：

1. 如果＆＃34; M＆＃34;然后值2（整数）

2. 如果＆＃34; S＆＃34;然后值1（整数）

3. 如果＆＃34;未知＆＃34;然后是0（整数）

我尝试了什么

我打算像这样一个一个地改变它们：

cards$MaritalStatus[cards$MartialStatus == "M"] <- 2

然而，我有例外：

Warning message:
In `[<-.factor`(`*tmp*`, cards$MartialStatus == "M", value = c(1L,  :
  invalid factor level, NA generated

请帮忙吗？

Answer 1

我会使用match执行此操作：

match(cards$MaritalStatus, c("unknown", "S", "M")) - 1

Answer 2

尝试

v1 <- factor(c("M","S","unknown","M","S"))
keyval <- setNames(0:2, c('unknown', 'S', 'M'))
as.numeric(keyval[as.character(v1)])
#[1] 2 1 0 2 1

或者

as.numeric(as.character(factor(v1, levels=c('M', 'S', 'unknown'),
           labels=c(2,1,0)) ))
#[1] 2 1 0 2 1

Answer 3

如果您的值超过3，我不会采用这种方法，但在这种情况下，您可以使用嵌套的ifelse语句，如下所示：

ifelse(cards$MaritalStatus=="unknown", 0, ifelse(cards$MaritalStatus=="M", 2, 1))

Answer 4

这是一种更通用的方法（也许更容易理解）：

1st - 声明值以及它们应该更改为什么。

namesList <- list(M=2, A=1, unknown=0)

第二 - 应用更改

unlist(namesList[as.character(cards$MaritalStatus)])