从底部的列绑定不同长度的数据帧

我正在寻找从底部开始绑定不同长度数据帧的选项（最好使用基本R）。其余/缺失的行应该是NAd。例如：从底部的列绑定不同长度的数据帧

set.seed(1212) 
a = as.data.frame(rnorm(1, 0, 1)) 
b = as.data.frame(rnorm(4, 0, 1)) 
c = as.data.frame(rnorm(3, 0, 1))

预期输出：

rnorm(1, 0, 1) rnorm(4, 0, 1) rnorm(3, 0, 1) 
1 NA    1.8374224  NA 
2 NA    0.3436815  0.03719874 
3 NA    -1.3600955  -1.92311898 
4 -0.6290858  0.5358145  0.41087971

来源

2017-08-11 AK88

使用'rowr :: cbind.fill（A，B，C）' – akrun

感谢@akrun。有没有什么办法可以使用基础R来做到这一点？ 'cbind（）'或'merge（）'？ – AK88

它不会是一个基线R中的单线程，或者是非常复杂的单线程。已经提出了很多类似的问题，所以你一定能找到基准答案。 – lmo

首先，评估列的最大长度结合。

lenMax <- max(length(a[,1]), length(b[,1]), length(c[,1]))

然后，使用此长度填充具有NAs的新数据框的列，以便它们适合。

data.frame(a = c(rep(NA, lenMax - length(a[,1])), a[,1]), 
      b = c(rep(NA, lenMax - length(b[,1])), b[,1]), 
      c = c(rep(NA, lenMax - length(c[,1])), c[,1])) 

#   a   b   c 
# 1   NA 1.8374224   NA 
# 2   NA 0.3436815 0.03719874 
# 3   NA -1.3600955 -1.92311898 
# 4 -0.6290858 0.5358145 0.41087971

来源

2017-08-11 11:19:51 loki

您可以使用smartbind()

gtools::smartbind(a,b,c) 
# rnorm(1, 0, 1) rnorm(4, 0, 1) rnorm(3, 0, 1) 
#1  -0.6290858    NA    NA 
#2:1    NA  1.8374224    NA 
#2:2    NA  0.3436815    NA 
#2:3    NA  -1.3600955    NA 
#2:4    NA  0.5358145    NA 
#3:1    NA    NA  0.03719874 
#3:2    NA    NA -1.92311898 
#3:3    NA    NA  0.41087971

来源

2017-08-11 11:20:24 mtoto

我们可以使用rowr

library(rowr) 
apply(rowr::cbind.fill(a, b, c, fill = NA), 2, function(x) x[order(!is.na(x))]) 
# rnorm.1..0..1. rnorm.4..0..1. rnorm.3..0..1. 
#[1,]    NA  1.8374224    NA 
#[2,]    NA  0.3436815  0.03719874 
#[3,]    NA  -1.3600955 -1.92311898 
#[4,]  -0.6290858  0.5358145  0.41087971

来源

2017-08-11 11:38:49 akrun

从底部的列绑定不同长度的数据帧

回答

相关问题