R语言dataframe中是否有方法可以自动调整变量（列）的顺序？

有多种无需手动指定全量列名的自动调整方法，以下是几种高频场景的实现方案：

• 按列名自然排序（适配你的示例场景）
  如果你的列名规则是「前缀+数字后缀」，直接对列名做带数值识别的字符串排序即可，不需要手动罗列所有列名：

  library(tidyverse)
  # 你的示例原始数据
  raw_data <- data.frame(a3=1:3,
                         b2=1:3,
                         c2=1:3,
                         c1=1:3,
                         a2=1:3,
                         b1=1:3,
                         a1=1:3)
  # 自动排序：同前缀按数字从小到大排列
  tidy_data <- raw_data %>% 
    select(all_of(str_sort(colnames(.), numeric = TRUE)))
  

  输出结果和你手动指定列名的结果完全一致，列顺序为a1,a2,a3,b1,b2,c1,c2。

• 自定义前缀优先级排序
  如果你需要调整前缀的排列顺序（比如想先排c开头的列，再排b、a开头的列），可以自定义前缀优先级，再结合后缀数字排序：

  # 自定义前缀顺序，按需求修改即可
  prefix_order <- c("c", "b", "a")
  tidy_data <- raw_data %>% 
    select(all_of(
      colnames(.)[order(
        # 按自定义前缀优先级排序
        factor(str_extract(colnames(.), "^[a-zA-Z]+"), levels = prefix_order),
        # 同前缀按后缀数字升序
        as.integer(str_extract(colnames(.), "\\d+$"))
      )]
    ))
  

• 指定列固定到首尾，其余列保留原有顺序
  如果你只需要把某几列移到最前或者最后，剩下的列不需要调整顺序，可以用everything()辅助实现：

  # 把a1放到第一列，b2放到最后一列，其余列保持原始顺序不变
  tidy_data <- raw_data %>% 
    select(a1, everything(), b2)
  

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