使用dplyr的select()时，如何排除字符向量指定的列？

我完全理解你只想用dplyr实现排除指定列的需求，碰到Error in -c("x") : invalid argument to unary operator这个报错其实是因为你直接对字符向量用了负号——R没法对字符串做负运算，自然就报错了。下面给你两种最靠谱的dplyr专属解决方案：

方法1：用all_of()（推荐，dplyr 1.0.0及以上版本） #

这是dplyr更新后官方推荐的处理字符向量列名的方式，能精准匹配你要排除的列：

library(dplyr)
df <- tibble(x = c(1,2,3,4), y = c('a','b','c','d'))
# 定义要排除的列的字符向量
cols_to_exclude <- c('x')
# 使用all_of()包裹字符向量，前面加负号实现排除
df %>% select(-all_of(cols_to_exclude))

运行后会得到只保留y列的结果：

# A tibble: 4 × 1
  y    
  <chr>
1 a    
2 b    
3 c    
4 d    

如果你的字符向量里包含不存在的列名，all_of()会直接报错提醒你，避免不小心漏掉或错删列；要是你想忽略不存在的列名，可以换成any_of()，写法完全一样。

方法2：旧版本dplyr用one_of() #

如果你还在使用dplyr 1.0.0之前的版本，可以用one_of()来实现：

df %>% select(-one_of(cols_to_exclude))

不过现在官方已经推荐用all_of()/any_of()替代one_of()了，建议尽量升级到新版本的dplyr来使用更规范的写法。

另外补充一点：你提到select接受未引用的参数（比如select(-x)），这是dplyr的非标准求值语法，但当你需要用字符向量批量处理列名时，就必须用all_of()这类函数来告诉dplyr“这是字符向量形式的列名”，这样它才能正确解析你的排除需求。

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