将行添加到一系列列的数据集中

Question

我有以下表格：

df <- data.frame(DATE = c('07/01/2022', '08/01/2022'),
                 `0` = c(4, 4),
                 `1` = c(5, 3),
                  `2` = c(5,3), check.names = FALSE)

日期	0	1	2
2022年7月1日	4	5	5
2022年8月1日	4	3	3

df2 <- data.frame(V1 = 2,
                 V2 = 4,
                 V3 = 5)

V1	V2	V3
2	4	5

我尝试在第一个表的最后一行下方添加 V1、V2 和 V3 的值，但仅限于第 0:3 列。输出应如下所示：

日期	0	1	1
2022年7月1日	4	5	5
2022年8月1日	4	3	3
	2	4	5

我尝试了rbind和bind_rows，但都不起作用。

Answer 1

使用

rbind

，你可以做到，

rbind(df, 
      setNames(data.frame(DATE = '', df2), 
               names(df))
     )

        DATE X0 X1 X2
1 07/01/2022  4  5  5
2 08/01/2022  4  3  3
3             2  4  5

Answer 2

使用

data.table

中的 rbindlist

的方法

library(data.table)

rbindlist(list(df1, cbind(Date = "", df2)), use.names=F)
         Date 0 1 2
1: 07/01/2022 4 5 5
2: 08/01/2022 4 3 3
3:            2 4 5