###match的使用
matchtest <- load("matchtest.Rdata")
View(x)
View(y)
m <- x$file_name
n <- colnames(y)
k <- x$ID[match(n,m)]
#所以math(a,b)的意思就是,根据a中数据的排序方式,返回b中数据对应a的位置索引序号
colnames(y) <- k
View(y)
load("matchtest.Rdata")
x
y
#colnames(y)的下标
match(x$file_name,colnames(y))
#x$file_name 的下标
match(colnames(y),x$file_name)
##方法一:将y 列的顺序调整的和x$filename一致
y2 = y[,match(x$file_name,colnames(y))]
colnames(y2) == x$file_name
##方法二:
colnames(y) = x$ID[match(colnames(y),x$file_name)]
网友评论