将data.frame中缺少的列放回dta.frame列表中 [英] Putting back a missing column from a data.frame into a list of dta.frames

问题描述

下面的LIST数据帧由我的data组成。但是，此LIST缺少原始data中提供的scale列。

我想知道如何将丢失的scale列放回LIST以实现我的DESIRED_LIST？

可复制的数据和代码如下。

m3="
scale study   outcome time ES bar
2       1       1      0   1  8
2       1       2      0   2  7
1       2       1      0   3  6
1       2       1      1   4  5
2       3       1      0   5  4
2       3       1      1   6  3
1       4       1      0   7  2
1       4       2      0   8  1" 
data <- read.table(text = m3, h=T)

LIST <-         list(data.frame(study=c(3,3)    ,outcome=c(1,1)    ,time=0:1),
                     data.frame(study=c(1,1)    ,outcome=c(1,2)    ,time=c(0,0)),
                     data.frame(study=c(2,2,4,4),outcome=c(1,1,1,2),time=c(0,1,0,0)))

DESIRED_LIST <- list(data.frame(scale=c(2,2)    ,study=c(3,3)    ,outcome=c(1,1)    ,time=0:1),
                     data.frame(scale=c(2,2)    ,study=c(1,1)    ,outcome=c(1,2)    ,time=c(0,0)),
                     data.frame(scale=c(1,1,1,1),study=c(2,2,4,4),outcome=c(1,1,1,2),time=c(0,1,0,0)))

推荐答案

在Base R中，您可以执行以下操作：

lapply(LITS, (x)merge(x, data)[names(data)])

这篇关于将data.frame中缺少的列放回dta.frame列表中的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！