我有一个具有相同结构的数据框列表(相同的变量名,相同的观察数)。像
这样的东西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 )
答案 0 :(得分:2)
我们可以在对'条件'列
进行子集化后,将Reduce
与+
一起使用
Reduce(`+`, lapply(df.list, `[`, 'condition'))
和第二种情况
Reduce(function(...) identical(...), lapply(df.list, `[`, 'condition'))