我有一个具有相同结构的数据帧列表(相同的变量名,相同数量的观察值)。就像是
df1<-data.frame(a=c(1,2),condition=c(TRUE,FALSE))
df2<-data.frame(a=c(1,2),condition=c(TRUE,TRUE))
df.list<-list(df1,df2)
我想自动化(主要是使代码独立于列表中的数字数据框)这样的事情
DF$Condition = df.list[[1]]$Condition + df.list[[2]]$Condition
或者
DF$Condition = all(df.list[[1]]$Condition, df.list[[2]]$Condition )
子集化“条件”列后,我们可以使用Reduce
with+
Reduce(`+`, lapply(df.list, `[`, 'condition'))
对于第二种情况
Reduce(function(...) identical(...), lapply(df.list, `[`, 'condition'))
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句