如何在dplyr中使用动态列名按自定义顺序排序？

我明白你碰到的这个痛点了——想动态用变量指定列名来排序tibble，结果代码报错，但硬写列名（比如直接用符号arrange(a)）就完全没问题对吧？别着急，下面给你几个实用的解决办法，都是dplyr生态里常用的方案：

方法1：使用{{ }}（Curly-Curly）语法（推荐） #

这是dplyr 1.0.0及以上版本官方推荐的方式，逻辑很直观：先把字符串类型的列名转换成符号（sym()函数），再用{{ }}把它注入到arrange()中，和硬编码列名的效果一致。

示例代码：

library(dplyr)

# 测试用的tibble
my_tibble <- tibble(a = c(3, 1, 2), b = c("x", "y", "z"))

# 存储动态列名的变量
target_col <- "a"

# 动态排序
my_tibble %>% arrange({{ sym(target_col) }})

方法2：使用.data代词（更简洁） #

如果你的列名是字符串格式，.data代词可以直接帮你引用变量对应的列，不需要额外转成符号，写法更清爽：

示例代码：

my_tibble %>% arrange(.data[[target_col]])

方法3：旧版dplyr用arrange_at（兼容低版本） #

如果你的dplyr版本比较旧（低于1.0.0），可以用arrange_at()函数，它支持直接传入字符串类型的列名变量：

示例代码：

# 两种写法都可以
my_tibble %>% arrange_at(vars(target_col))
# 或者直接传字符串变量
my_tibble %>% arrange_at(target_col)

为什么硬编码能行，动态变量不行？ #

简单来说，dplyr的tidy eval机制默认是按**符号（symbol）**解析列名的——硬写arrange(a)时，它会找名为a的列；但直接传字符串变量的话，它会误以为你要找一个和变量值同名的列（比如变量值是"a"，它会找列名为"a"的列，而不是a列），所以需要用上面的方法把字符串变量转换成可正确解析的列引用。

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