：你如何根据rowname索引对矩阵进行排序？

Question

我已合并两个矩阵：

library(plyr) 
df3 = as.data.frame(t(combn(4,3)))  
df4 = as.data.frame(t(combn(4,4)))  
t(rbind.fill(df3,df4)) 

我所做的主要换位为我好，所以我可以看到我在做什么。

我想输出：

[,1] [,2] [,3] [,4] [,5] 
V1 1 1 1 NA 1 
V2 2 2 NA 2 2 
V3 3 NA 3  3 3 
V4 NA 4 4  4 4 

我试过匹配/排序/排序的各种方式，但已经得到错误的结果。欢迎任何建议 - 谢谢！

Answer 1

library(plyr); ## for rbind.fill() 
df3 <- as.data.frame(t(combn(4,3))); 
df4 <- as.data.frame(t(combn(4,4))); 
df <- t(rbind.fill(df3,df4)); 
apply(df,2L,function(col) col[match(seq_along(col),col)]); 
##  [,1] [,2] [,3] [,4] [,5] 
## [1,] 1 1 1 NA 1 
## [2,] 2 2 NA 2 2 
## [3,] 3 NA 3 3 3 
## [4,] NA 4 4 4 4