প্রিয় সবাই - আমি এমন কিছু অদ্ভুতভাবে লক্ষ্য করেছি যা আমি ব্যাখ্যা করতে পারি না, পারো? সংক্ষেপে: একটি লজিস্টিক রিগ্রেশন মডেলটিতে একটি আত্মবিশ্বাসের ব্যবধান গণনা করার ম্যানুয়াল পদ্ধতি এবং আর ফাংশনটি confint()
বিভিন্ন ফলাফল দেয়।
আমি হোসমার এবং লেমশোর প্রয়োগযুক্ত লজিস্টিক রিগ্রেশন (২ য় সংস্করণ) দিয়ে যাচ্ছি । তৃতীয় অধ্যায়ে বিজোড় অনুপাত এবং 95% আত্মবিশ্বাসের ব্যবধান গণনা করার একটি উদাহরণ রয়েছে। আর ব্যবহার করে, আমি সহজেই মডেলটি পুনরুত্পাদন করতে পারি:
Call:
glm(formula = dataset$CHD ~ as.factor(dataset$dich.age), family = "binomial")
Deviance Residuals:
Min 1Q Median 3Q Max
-1.734 -0.847 -0.847 0.709 1.549
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -0.8408 0.2551 -3.296 0.00098 ***
as.factor(dataset$dich.age)1 2.0935 0.5285 3.961 7.46e-05 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 136.66 on 99 degrees of freedom
Residual deviance: 117.96 on 98 degrees of freedom
AIC: 121.96
Number of Fisher Scoring iterations: 4
যাইহোক, আমি যখন প্যারামিটারগুলির আত্মবিশ্বাসের অন্তরগুলি গণনা করি, আমি পাঠ্যের মধ্যে দেওয়াটির সাথে একটি আলাদা বিরতি পাই:
> exp(confint(model))
Waiting for profiling to be done...
2.5 % 97.5 %
(Intercept) 0.2566283 0.7013384
as.factor(dataset$dich.age)1 3.0293727 24.7013080
হোস্টার এবং লেমেশো নিম্নলিখিত সূত্রটি পরামর্শ দেয়:
এবং তারা আত্মবিশ্বাসের ব্যবধান গণনা করে as.factor(dataset$dich.age)1
(২.৯, ২২.৯)।
এটি আর এ করা সহজবোধ্য বলে মনে হচ্ছে:
# upper CI for beta
exp(summary(model)$coefficients[2,1]+1.96*summary(model)$coefficients[2,2])
# lower CI for beta
exp(summary(model)$coefficients[2,1]-1.96*summary(model)$coefficients[2,2])
বইয়ের মতো একই উত্তর দেয়।
যাইহোক, কেন কোনও ধারণা কেন confint()
বিভিন্ন ফলাফল দেয় বলে মনে হয়? আমি ব্যবহার করে প্রচুর উদাহরণ দেখেছি confint()
।