আমি হাত দিয়ে রৈখিক মিশ্র মডেল থেকে এলোমেলো প্রভাবের পূর্বাভাস গণনা করার চেষ্টা করছি, এবং জেনারালাইজড অ্যাডেটিভ মডেলগুলিতে কাঠের দ্বারা প্রদত্ত স্বরলিপি ব্যবহার করে : আর (পিপি 294 / পিডিএফ এর 307 পি 30) এর সাথে পরিচয় করিয়ে দিয়েছি, প্রতিটি পরামিতি সম্পর্কে আমি বিভ্রান্ত হচ্ছি প্রতিনিধিত্ব করে।
নীচে উড থেকে সংক্ষিপ্তসার দেওয়া হল।
রৈখিক মিশ্র মডেল সংজ্ঞা দিন
যেখানে বি এন (0, ), এবং এন (0, )Ψ ϵ ∼ σ 2
বি এবং y যদি যৌথ সাধারণ বিতরণের সাথে র্যান্ডম ভেরিয়েবল হয়
আরআর পূর্বাভাসগুলি গণনা করা হয়
যেখানে
lme4
আর প্যাকেজ থেকে র্যান্ডম ইন্টারসেপ্ট মডেলের উদাহরণ ব্যবহার করে আমি আউটপুট পাই
library(lme4)
m = lmer(angle ~ temp + (1 | replicate), data=cake)
summary(m)
% Linear mixed model fit by REML ['lmerMod']
% Formula: angle ~ temp + (1 | replicate)
% Data: cake
%
% REML criterion at convergence: 1671.7
%
% Scaled residuals:
% Min 1Q Median 3Q Max
% -2.83605 -0.56741 -0.02306 0.54519 2.95841
%
% Random effects:
% Groups Name Variance Std.Dev.
% replicate (Intercept) 39.19 6.260
% Residual 23.51 4.849
% Number of obs: 270, groups: replicate, 15
%
% Fixed effects:
% Estimate Std. Error t value
% (Intercept) 0.51587 3.82650 0.135
% temp 0.15803 0.01728 9.146
%
% Correlation of Fixed Effects:
% (Intr)
% temp -0.903
সুতরাং এ থেকে আমার ধারণা = ২৩.৫১, এবং জনসংখ্যা স্তরের অবশিষ্টাংশগুলির বর্গ থেকে অনুমান করা যায় ।cake$angle - predict(m, re.form=NA)
sigma
th = 23.51
zt = getME(m, "Zt")
res = cake$angle - predict(m, re.form=NA)
sig = sum(res^2) / (length(res)-1)
এগুলিকে একসাথে দেয়
th * zt %*% res / sig
[,1]
1 103.524878
2 94.532914
3 33.934892
4 8.131864
---
যা তুলনা করার সময় সঠিক নয়
> ranef(m)
$replicate
(Intercept)
1 14.2365633
2 13.0000038
3 4.6666680
4 1.1182799
---
কেন?
plot(residuals(m), cake$angle-predict(m, re.form=NULL)) ; plot(residuals(m), cake$angle-predict(m, re.form=NA))