#【经典包的】
library(tidyverse)
a <- select(data,Group,everything())
#【R base】
b <- data[,c("Group", setdiff(names(data), "Group"))]
c <- data[ ,c(74,1:73)]
#【经典包的】
library(tidyverse)
a <- select(data,Group,everything())
#【R base】
b <- data[,c("Group", setdiff(names(data), "Group"))]
c <- data[ ,c(74,1:73)]
名师互学网 版权所有 (c)2021-2022 ICP备案号：晋ICP备2021003244-6号
