मैं इसके बजाय सिर्फ प्रोफाइल संभावना विश्वास अंतराल बनाऊंगा। वे विश्वसनीय हैं, और 'lme4' पैकेज का उपयोग करके गणना करना बहुत आसान है। उदाहरण:
> library(lme4)
> fm = lmer(Reaction ~ Days + (Days | Subject),
data=sleepstudy)
> summary(fm)
[…]
Random effects:
Groups Name Variance Std.Dev. Corr
Subject (Intercept) 612.09 24.740
Days 35.07 5.922 0.07
Residual 654.94 25.592
अब आप confint()
फ़ंक्शन के साथ प्रोफ़ाइल संभावना विश्वास अंतराल की गणना कर सकते हैं :
> confint(fm, oldNames=FALSE)
Computing profile confidence intervals ...
2.5 % 97.5 %
sd_(Intercept)|Subject 14.381 37.716
cor_Days.(Intercept)|Subject -0.482 0.685
sd_Days|Subject 3.801 8.753
sigma 22.898 28.858
(Intercept) 237.681 265.130
Days 7.359 13.576
आत्मविश्वास अंतराल की गणना करने के लिए आप पैरामीट्रिक बूटस्ट्रैप का भी उपयोग कर सकते हैं। यहाँ R सिंटैक्स है ( parm
तर्क को प्रतिबंधित करने के लिए कि हम किन मापदंडों के लिए आत्मविश्वास अंतराल चाहते हैं):
> confint(fm, method="boot", nsim=1000, parm=1:3)
Computing bootstrap confidence intervals ...
2.5 % 97.5 %
sd_(Intercept)|Subject 11.886 35.390
cor_Days.(Intercept)|Subject -0.504 0.929
sd_Days|Subject 3.347 8.283
परिणाम प्रत्येक रन के लिए स्वाभाविक रूप से कुछ हद तक भिन्न होंगे। आप nsim
इस भिन्नता को कम करने के लिए बढ़ा सकते हैं , लेकिन इससे आत्मविश्वास के अंतराल का अनुमान लगाने में लगने वाला समय भी बढ़ जाएगा।