对于类似于以下数据帧（但具有更多变量）的数据框，我想根据变量的降序和对列进行重新排序。因此，在我的示例中，列顺序应为VAR3（总和= 7），VAR2（总和= 5），VAR1（总和= 4）。我知道我可以手动执行此操作，但是我的实际数据框变量太多。
dat <- data.frame(VAR1=c(0,1,0,1,0,0,1,1,0),
VAR2=c(1,1,0,1,0,0,1,0,1),
VAR3=c(0,1,1,1,1,0,1,1,1))
VAR1 VAR2 VAR3
1 0 1 0
2 1 1 1
3 0 0 1
4 1 1 1
5 0 0 1
6 0 0 0
7 1 1 1
8 1 0 1
9 0 1 1
dat <- data.frame(VAR1=c(0,1,0,1,0,0,1,1,0),
VAR2=c(1,1,0,1,0,0,1,0,1),
VAR3=c(0,1,1,1,1,0,1,1,1))
dat1 <- dat[,names(sort(colSums(dat), decreasing = TRUE))]
dat1
VAR3 VAR2 VAR1
1 0 1 0
2 1 1 1
3 1 0 0
4 1 1 1
5 1 0 0
6 0 0 0
7 1 1 1
8 1 0 1
9 1 1 0
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句