如何在R语言中根据字符串型国家编码对数据框变量做数学运算

针对你提出的需求，高效的实现方式主要有两种，分别基于基础R和tidyverse工具包：

方法一：基础R原生实现 #

直接利用逻辑索引定位目标行，对指定列进行数值运算，无需额外安装包，运行效率高：

# 为country编码为"aaa"的所有行的c列加5
a$c[a$country == "aaa"] <- a$c[a$country == "aaa"] + 5

执行后查看结果：

print(a)
#   country year  c
# 1     aaa 1990 14
# 2     bbb 1990  2
# 3     ccc 1990  4
# 4     aaa 1991 11
# 5     bbb 1991  3
# 6     ccc 1991  7
# 7     aaa 1992 10
# 8     bbb 1992  1
# 9     ccc 1992  8

方法二：tidyverse（dplyr）实现 #

如果你习惯使用管道化的代码风格，或者需要处理更复杂的多条件场景，推荐使用dplyr包的if_else或case_when函数：

library(dplyr)

# 单条件场景用if_else
a <- a %>%
  mutate(c = if_else(country == "aaa", c + 5, c))

# 多条件场景用case_when（示例：给aaa加5，给bbb减1）
a <- a %>%
  mutate(c = case_when(
    country == "aaa" ~ c + 5,
    country == "bbb" ~ c - 1,
    TRUE ~ c  # 其他国家保持原值
  ))

这种方式代码可读性更强，便于后续扩展更多条件逻辑。

内容的提问来源于stack exchange，提问作者Adrian