R语言如何按指定年份范围增删数据行，使各国GDP覆盖1948-2021年

推荐用tidyverse生态的工具实现，代码简洁易维护，200多个国家的处理量完全无压力。

核心逻辑 #

• 生成「所有唯一国家」和「1948-2021年全量年份」的笛卡尔积，得到标准化的行框架
• 用原数据和这个框架左连接，自动完成：超出范围年份过滤、缺失年份补全、空值自动填充NA

完整实现代码 #

# 加载依赖包
library(tidyverse)

# ----------------------
# 1. 读取你的原始数据，以下为模拟示例数据演示
orig_data <- tibble(
  Country = c("阿富汗", "阿富汗", "阿富汗", "澳大利亚", "澳大利亚"),
  Year = c(1950, 1951, 2019, 1945, 2021),
  GDP = c("$123", "$123", "$123", "$123", "$123")
)

# ----------------------
# 2. 生成标准化的国家-年份框架
full_frame <- crossing(
  Country = unique(orig_data$Country), # 提取所有唯一国家
  Year = 1948:2021 # 目标年份区间
)

# ----------------------
# 3. 左连接得到最终结果
result <- full_frame %>%
  left_join(orig_data, by = c("Country", "Year"))

补充说明 #

• 如果你的数据还在数据库中没有读到本地，可以用dbplyr包直接将上述逻辑翻译成SQL在数据库侧执行，避免拉取全量数据，效率更高
• 若偏好data.table语法，可用CJ()函数实现笛卡尔积，处理超大数据集时速度更快：

library(data.table)
setDT(orig_data)
full_frame <- CJ(Country = unique(orig_data$Country), Year = 1948:2021)
result <- orig_data[full_frame, on = .(Country, Year)]

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