Eğilim skoru ağırlıklandırmasını (özellikle IPTW) kullanarak gözlemsel verilerden ortalama tedavi etkisini tahmin etmeye çalışıyorum. Bence ATE'yi doğru şekilde hesaplıyorum, ama ters eğilim puan ağırlıklarını dikkate alarak ATE'nin güven aralığını nasıl hesaplayacağımı bilmiyorum.
Ortalama tedavi etkisini hesaplamak için kullandığım denklem (referans Stat Med. 10 Eyl 2010; 29 (20): 2137-2148.):
Ağırlıkları dikkate alarak ortalama tedavi etkisinin güven aralığını hesaplayacak bir R paketi bilen var mı? Olabilir survey
burada paket yardım? Bunun işe yarayıp yaramayacağını merak ediyordum:
library(survey)
sampsvy=svydesign(id=~1,weights=~iptw,data=df)
svyby(~surgery=='lump',~treatment,design=sampsvy,svyciprop,vartype='ci',method='beta')
#which produces this result:
treatment surgery == "lump" ci_l ci_u
No 0.1644043 0.1480568 0.1817876
Yes 0.2433215 0.2262039 0.2610724
Oranlar arasındaki farkın güven aralığını bulmak için buradan nereye gideceğimi bilmiyorum (yani ortalama tedavi etkisi).