r - 在 dplyr 中对特定范围的列名进行排序

Question

我有一个数据框，希望在 dplyr 中按字母顺序对特定列进行排序。我知道我可以使用下面的代码对所有列进行排序，但我只想按字母顺序对 C、B 和 A 列进行排序。我尝试使用 across 函数，因为我想有效地选择 C:A 列，但这没有用。

df <- data.frame(1:16)
df$Testinfo1 <- 1
df$Band <- 1
df$Alpha <- 1
df$C <- c(10,12,14,16,10,12,14,16,10,12,14,16,10,12,14,16)
df$B <- c(10,0,0,0,12,12,12,12,0,14,NA_real_,14,16,16,16,16)
df$A <- c(1,1,1,1,1,1,1,1,1,1,1,14,NA_real_,NA_real_,NA_real_,16)
df

df %>% 
  select(sort(names(.)))

     A Alpha  B Band  C Testinfo1 X1.16
 1:  1     1 10    1 10         1     1
 2:  1     1  0    1 12         1     2
 3:  1     1  0    1 14         1     3
 4:  1     1  0    1 16         1     4
 5:  1     1 12    1 10         1     5
 6:  1     1 12    1 12         1     6
 7:  1     1 12    1 14         1     7
 8:  1     1 12    1 16         1     8
 9:  1     1  0    1 10         1     9
10:  1     1 14    1 12         1    10
11:  1     1 NA    1 14         1    11
12: 14     1 14    1 16         1    12
13: NA     1 16    1 10         1    13
14: NA     1 16    1 12         1    14
15: NA     1 16    1 14         1    15
16: 16     1 16    1 16         1    16

我想要的输出如下:

    X1.16 Testinfo1 Band Alpha  A  B  C
 1:     1         1    1     1  1 10 10
 2:     2         1    1     1  1  0 12
 3:     3         1    1     1  1  0 14
 4:     4         1    1     1  1  0 16
 5:     5         1    1     1  1 12 10
 6:     6         1    1     1  1 12 12
 7:     7         1    1     1  1 12 14
 8:     8         1    1     1  1 12 16
 9:     9         1    1     1  1  0 10
10:    10         1    1     1  1 14 12
11:    11         1    1     1  1 NA 14
12:    12         1    1     1 14 14 16
13:    13         1    1     1 NA 16 10
14:    14         1    1     1 NA 16 12
15:    15         1    1     1 NA 16 14
16:    16         1    1     1 16 16 16

Answer 1

您可以使用 relocate()(从 dplyr 1.0.0 开始):

library(dplyr)

vars <- c("C", "B", "A")

df %>% 
  relocate(all_of(sort(vars)), .after = last_col())

如果你传递的是名称的字符向量，你应该将它包装在 all_of() (如果缺少任何变量，这将出错)或 any_of() which won 't.