如何在R中使用乐器变量进行倾向得分匹配？

Question

我正在尝试使用IV进行PSM。我已阅读this paper，我想将其应用于我的脚本（在R中）。我用我的数据完成了PSM，其中一个例子如下：

d=data 
 X=vars #List of covariables
 Y=y
 Tr=x 
 glm1=glm(psf,family=binomial(link="logit"),data=d) #PSM 
 XATT=Match(Y=y,Tr=x,X=glm1$fitted,M=1,estimand="ATT", 
 ties=FALSE,version="fast")
 summary(XATT)

现在，我有兴趣使用名为'z'的IV执行上一个过程。 Ichimura＆amp; Taber（2001）提出了两种使用工具变量的倾向评分方法，但我不知道是否还有其他方法可以在R中进行PSM-IV，所以如果你们中的一些人知道实现它的不同方法，我我非常感激。

任何帮助我都会非常感激。