R语言中如何根据另一数据集的变量顺序重排数据集列

核心思路非常直接：先提取参考数据集中存好的目标列顺序，再按照这个顺序选取原数据集的列即可，以下是几种常用的实现方式，都能得到你给出的期望输出结果：

• 基础R无依赖写法
  不需要加载任何第三方包，兼容性最好，直接通过列索引完成重排：

  # 提取df2中存储的目标列顺序
  col_order <- df2$var2
  # 按顺序子集列得到结果
  df3 <- df1[, col_order]
  

  注意：如果参考顺序里存在df1中没有的列名，这个写法会触发下标越界报错，正式使用前可以先用intersect(col_order, names(df1))筛一遍实际存在的列，避免异常。
• dplyr 语法实现
  如果你日常用tidyverse生态做数据处理，可以直接用select搭配列选择器完成：

  library(dplyr)
  df3 <- df1 %>%
    select(all_of(df2$var2))
  

  这里用all_of()会严格校验所有参考列是否存在，遇到缺失列会给出清晰的错误提示；如果需要自动忽略df1里不存在的参考列，把all_of()替换成any_of()即可。
• data.table 高性能实现
  如果处理的数据集体量很大，追求运算速度，可以用data.table的写法：

  library(data.table)
  # 将原数据转为data.table格式（直接修改原对象，无额外拷贝）
  setDT(df1)
  # 按指定顺序选取列
  df3 <- df1[, .SD, .SDcols = df2$var2]
  # 如果需要转回普通data.frame格式，运行下面这行即可
  # setDF(df3)
  

以上几种方法输出的结果完全一致，列的顺序会严格遵循df2中var2变量从上到下存储的顺序。

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