ฉันเพียง แต่จะสร้างช่วงเวลาความมั่นใจโอกาสของโปรไฟล์ มีความน่าเชื่อถือและสามารถคำนวณได้ง่ายโดยใช้แพ็คเกจ '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
เพื่อลดรูปแบบนี้ได้ แต่สิ่งนี้จะเพิ่มเวลาที่ใช้ในการประเมินช่วงความมั่นใจ