在R中的两个数据帧之间添加命名行 [英] Add a named row between two dataframes in R

问题描述

我正在尝试在两个data.framed1和d2之间添加命名行。我的Desired_output如下所示。

我已经尝试了一种解决方案，但它无法使我获得所需的输出。有解决此问题的方法吗？

d1 <- data.frame(b = 1:2, SE = 2:3)
d2 <- data.frame(b = 0:1, SE = 1:2)

a <- "obs" 

# Solution failed:
dplyr::bind_rows(d1, !!a := rep(NA, ncol(d1)), d2)

Desired_output = 
"   b SE
1   1  2
2   2  3
obs NA NA
4   0  1
5   1  2"

推荐答案

也许这会有帮助-

d1 <- data.frame(b = 1:2, SE = 2:3)
d2 <- data.frame(b = 0:1, SE = 1:2)
a <- "obs" 
d3 <- d1[1, ]
d3[] <- NA
rownames(d3) <- a

rbind(d1, d3, d2)

#     b SE
#1    1  2
#2    2  3
#obs NA NA
#11   0  1
#21   1  2

这篇关于在R中的两个数据帧之间添加命名行的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！