小编And*_*yeu的帖子

我有以下内容：

a_aa a_ab a_ac b_aa b_ab b_ac
2    3    3    3     1    2
3    4    1    1     3    1

期望的结果：

a_aa b_aa a_ab b_ab a_ac b_ac
2    3    3    1     3    2
3    1    4    3     1    1

带数据的代码：

d <- "a_aa a_ab a_ac b_aa   b_ab b_ac
2    3    3    3     1    2
3    4    1    1     3    1"
dd <- read.table(textConnection(object = d), header = T)

我当前的解决方案是手动：

    dd %>% select(a_aa, b_aa, a_ab, b_ab, a_ac, b_ac)

然而，当列数很大时，就很繁重了。有什么想法如何通过分组进行这种列排序（例如序列 a_etc1、b_etc1、a_etc2、b_etc2）？谢谢你！