根据相关标签更改列中的值

Question

我需要根据第1列中的关联值更改最后一列中的数据值。例如，如果state是＆＃34; AK＆＃34;那么comm_rank应该是＆＃34; 1＆＃34;，如果state是＆＃34; AL＆＃34;那么comm_rank应该是＆＃34; 2＆＃34;，如果state是＆＃34; AR＆＃34;那么comm_rank应该是＆＃34; 3＆＃34;等等。

任何人都可以建议我循环浏览最后一列然后相应更改其值的有效方法吗？我的原始数据框比这个样本大得多，所以我需要有效地做到这一点。

示例数据框：

Answer 1

自您标记为dplyr

library(dplyr)
mutate(INPUT, comm_rank = case_when(state == "AK" ~ 1,
                                    state == "AL" ~ 2,
                                    state == "AR" ~ 3))

Answer 2

使用基数R你可以这样做：

  df[ncol(df)] <- as.numeric(as.factor(df[,"state"]))

Answer 3

可重现的数据

set.seed(1)
df <- data.frame(state = sample(c("AK", "AL", "AR"), 10, replace=TRUE),

dplyr解决方案

v <- 1:3
names(v) <- c("AK", "AL", "AR")
v
# AK AL AR 
# 1  2  3

library(dplyr)
df %>% mutate(comm_rank = v[state])

基础R解决方案

df$comm_rank <- v[df$state]