从最小可用向量创建数据帧

我可以想到两种方法:

示例数据:

df1 <- data.frame(A = 1:3)
df2 <- data.frame(B = 1:4)
df3 <- data.frame(C = 1:5)

计算最小数据帧的行数:

min_rows <- min(sapply(list(df1, df2, df3), nrow))

组合时使用子集:

diffs <- data.frame(a = df1[1:min_rows,], b = df2[1:min_rows,], c = df3[1:min_rows,] )
diffs
  a b c
1 1 1 1
2 2 2 2
3 3 3 3

或者,使用 merge :

rowmerge <- function(x,y){
   # create row indicators for the merge:
   x$ind <- 1:nrow(x)
   y$ind <- 1:nrow(y)
   out <- merge(x,y, all = T, by = "ind")
   out["ind"] <- NULL
   return(out)
}
Reduce(rowmerge, list(df1, df2, df3))
   A  B C
1  1  1 1
2  2  2 2
3  3  3 3
4 NA  4 4
5 NA NA 5

为了摆脱争吵 NA s,移除 all = T .

对于你的特殊情况,你可能会打电话给 Reduce(rowmerge, sensores) ,假设 sensores 是数据帧的列表。

注意:如果您已经在某个地方有一个索引(例如某种时间戳),那么最好在该索引上合并,而不是创建 ind .