R 让Zelig处理列表

R 让Zelig处理列表,r,plyr,r-zelig,R,Plyr,R Zelig,我想获取一个匹配数据集的列表(其中,观察值在其倾向性得分上进行匹配,使用)以用于在中进行后续建模 在本例中,我将匹配两种治疗方法(t1和t2),两个独立变量(x1和x2),以及一个结果(y1) [1]“匹配” 接下来,我想从这个列表中获取元素匹配的数据帧,并创建一个Zelig模型对象列表 list.mods <- llply(list.dfs, function(i) zelig(y1 ~ x1 + x2, m

我想获取一个匹配数据集的列表(其中,观察值在其倾向性得分上进行匹配,使用)以用于在中进行后续建模

在本例中,我将匹配两种治疗方法(
t1
t2
),两个独立变量(
x1
x2
),以及一个结果(
y1

[1]“匹配”

接下来,我想从这个列表中获取元素匹配的数据帧,并创建一个Zelig模型对象列表

list.mods <- llply(list.dfs, 
                   function(i) 
                   zelig(y1 ~ x1 + x2, model = "logit", data = match.data(i)))

list.mods在
zelig
中似乎有一些奇怪的东西,它按名称查找
数据的值。看起来您必须执行显式循环:

list.mods <- list()
for(i in seq_along(list.dfs)) {
    list.mods[[i]] <- zelig(y1 ~ x1 + x2, model = "logit", data = match.data(list.dfs[[i]]))
}
list.mods
list.mods
class(list.dfs[[1]])
list.mods <- llply(list.dfs, 
                   function(i) 
                   zelig(y1 ~ x1 + x2, model = "logit", data = match.data(i)))
list.mods <- list()
for(i in seq_along(list.dfs)) {
    list.mods[[i]] <- zelig(y1 ~ x1 + x2, model = "logit", data = match.data(list.dfs[[i]]))
}
list.mods