选择删除并在同一个选择调用中保留一些变量

Question

如果可能的话，我想在同一个 select() 调用中删除和重新排序数据框中的某些特征。与select(-var_to_drop) %>% select(var_I_want_first, everything()) 不同，这可以在同一个调用中完成吗？

例如对于 diamonds 数据集，假设我想删除 carat 字段，将 price 设置为第一个字段，然后将之后的一切 () 保持相同的顺序？试过了：

library(tidyverse)
diamonds %>% select(-carat, price, everything()) # keeps carat
diamonds %>% select_at(vars(-carat, price, everything())) # also keeps carat?

期望的结果是：

# desired outcome with multiple select() calls, want to do it in one:
diamonds %>% select(-carat) %>% select_at(vars(price, everything()))
# A tibble: 53,940 x 9
   price cut       color clarity depth table     x     y     z
   <int> <ord>     <ord> <ord>   <dbl> <dbl> <dbl> <dbl> <dbl>
 1   326 Ideal     E     SI2      61.5    55  3.95  3.98  2.43
 2   326 Premium   E     SI1      59.8    61  3.89  3.84  2.31
 3   327 Good      E     VS1      56.9    65  4.05  4.07  2.31
 4   334 Premium   I     VS2      62.4    58  4.2   4.23  2.63
 5   335 Good      J     SI2      63.3    58  4.34  4.35  2.75
 6   336 Very Good J     VVS2     62.8    57  3.94  3.96  2.48
 7   336 Very Good I     VVS1     62.3    57  3.95  3.98  2.47
 8   337 Very Good H     SI1      61.9    55  4.07  4.11  2.53
 9   337 Fair      E     VS2      65.1    61  3.87  3.78  2.49
10   338 Very Good H     VS1      59.4    61  4     4.05  2.39

我可以通过一次调用 select 获得我想要的结果吗？

Answer 1

我们可以指定everything()之后要移除的列

library(dplyr)
diamonds %>% 
     select(price, everything(), -carat)