rbind 数据帧仅用于相同的列

Question

我需要合并 24 个数据框。 20 个数据框有相同的 238 列，而 4 个数据框有 256 列。此外，这 4 个 256 列的数据帧与其他 20 个数据帧的列顺序不同。

例如'answer'、'condition'、'msg_time'、'fix'等（20个数据帧）

例如'acc_value'、'nitem'、'fix'、'button_press_0'、'rotation'、'previous_fix'、'accuracy'、'answer'、'file'、'condition'等（4个数据框）

我想仅对所有 24 个数据帧中相同的列进行 rbind。 任何建议将不胜感激。谢谢。

Answer 1

这不是最优雅的解决方案，但它确实有效。

df <- data.frame()            # empty data.frame
base_names <- names(a)        # base_names will reflect any data.frame that has 238 observations
list_df <- list(a, b, c)      # list of all your data frames

for(item in list_df){         # create loop

  items <- item[, base_names] # only select columns that match the 238 columns
  df <- rbind(df, items)      # append those to the data.frame

}

df                            # all data.frames rbinded

---

如果你想避免循环，你也可以使用 lapply

library(plyr)
library(dplyr) 

df <- data.frame()
base_names <- names(a)
list_df <- list(a, b, c)  

lapply(list_df,
       function(x){

         x_cols <- x[, base_names]
         df <- rbind(df, x_cols)

       }) %>% plyr::ldply(rbind)