data1<- data[,c(1,7,2,8,5,11,6,12,3,9,4,10)] #将原来的1-12列变成了1,7,2,8,5,11,6,12,3,9,4,10 #参考R语言数据框怎么调换列的位置 - R语言论坛 - 经管之家(原人大经济论坛) (pinggu.org)