合并（rbind）数据帧并使用原始数据帧的名称创建列

Question

合并（rbind）数据帧并使用原始数据帧的名称创建列我有几个数据框，我想按行组合。在生成的单个数据框中，我想创建一个新变量，用于标识观察来自哪个数据集。# original data framesdf1 <- data.frame(x = c(1, 3), y = c(2, 4))df2 <- data.frame(x = c(5, 7), y = c(6, 8))# desired, combined data framedf3  <- data.frame(x = c(1, 3, 5, 7), y = c(2, 4, 6, 8),                   source = c("df1", "df1", "df2", "df2")# x y source# 1 2    df1# 3 4    df1# 5 6    df2# 7 8    df2我怎样才能做到这一点？提前致谢！

Answer 1

另一种方法dplyr：

df1 <- data.frame(x = c(1,3), y = c(2,4))

df2 <- data.frame(x = c(5,7), y = c(6,8))

df3 <- dplyr::bind_rows(list(df1=df1, df2=df2), .id = 'source')

df3

Source: local data frame [4 x 3]

  source     x     y

   (chr) (dbl) (dbl)

1    df1     1     2

2    df1     3     4

3    df2     5     6

4    df2     7     8