/* JMP 12.2.0 01 */ ListBox(vertical,near,sub( TextEditBox("Random Coefficient Models",font("Segoe UI"),fontsize(18),fontstyle(1),fontchangeinfo(6),), OutlineBox( open(0),title("Shelf Life Example"),closeOrient(1),sub( TextEditBox("Simulated data of 3 batches measured at 9 time points",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),wrapWidth(366),bullet,), TextEditBox("Product degrades over time, and the degradation varies between batches due to uncontrollable factors",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("Goal is to find the shelf life - the time at which the respones drops below 90, in this case",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("In SAS:",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("proc mixed;\!r\!nclass batch;\!r\!nmodel y = month / ddfm=kr2;\!r\!nrandom intercept month / subject=batch type=un;",font("SAS Monospace"),fontsize(11),fontstyle(0),fontchangeinfo(3),), ButtonBox(title("Shelf Life"),scriptText("Open(\!"shelf life.jmp\!");"),))), OutlineBox( open(0),title("Education Example"),closeOrient(1),sub( TextEditBox("Data from High School and Beyond survey",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("Goal is to model math achievement in the presence of both student and school-level covariates",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),wrapWidth(366),bullet,), TextEditBox("In SAS:",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("proc mixed;\!r\!nclass school;\!r\!nmodel mathach = meanses sector cses meanses*cses sector*cses / ddfm=kr2;\!r\!nrandom intercept cses / subject=school type=un;",font("SAS Monospace"),fontsize(11),fontstyle(0),fontchangeinfo(3),), ButtonBox(title("High School and Beyond"),scriptText("open(\!"hsb.jmp\!");"),))), OutlineBox( open(0),title("Growth Curve Example"),closeOrient(1),sub( TextEditBox("Data are pig weights measured over time as three different treatment feeds are administered",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("Goal is to identify best treatment",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("Random coefficients are not limited to linear",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("In SAS:",font("Segoe UI"),fontsize(11),fontstyle(0),fontchangeinfo(2),bullet,), TextEditBox("proc mixed;\!r\!nclass trt pig;\!r\!nmodel weight = trt day day*trt day*day day*day*trt / ddfm=kr2;\!r\!nrandom intercept day day*day / subject=pig(trt) type=un;",font("SAS Monospace"),fontsize(11),fontstyle(0),fontchangeinfo(3),), ButtonBox(title("Pig Growth"),scriptText("open(\!"pig growth.jmp\!");"),))))) /* preview image PNG (v=1,x=315,y=101,b=2032,c=96,d=126,e=42,f=92,g=59,h=34,i=39,j=47,k=44,m=72351E767FC9207DEFB0A7561D4AF4D0) =v}uA%:{>vs>!!&+I!!)vNhz_)n!0h%N>]OHRMb<{{tm6b8(7B.l>!S|m566{qaiu+YGxE#6Ql#$i8]YyVcVoEE9%X#e!&_1h![zMb#:vyE$Pote&|akJ.{CVo9xb0_NsD<@xhcQYZ+F[>f8ZOp9LJU.{-d#awGr9BZI^pKcO^Y-p+2.KpR?z!GXl[{xxS$J@5qAoQG:1)N&j)3e{J!-KV:NTC7qsfzrl39d_C.1NslO9kZbeFcFagE BY{xiTQ)Vq+XCO]$t!GTR(G^}RF^u9eLFzaaU72[8f81)@Ue83_p8SKVtUG@pX?TPiqq@I26L@(W00ZqO26Mv$OKEx8Oa:IYBz[ANl7+DOcrhgISf4y4&Fl=d%K7pVRpM&MPWRjny4T5yvh+XMy_c2fT>D3]$nHJLs}{W4#$$YH-pBaa0D(]C!laq_YM1QsRw0QQGbT$v9xYQn+9_50g4fx#V7t:H9r2cbjC1i9rGO-Nsb3]ccTF[}zn+-j#[Z0=HkALYr9qf9O.B(&!pd{f$ Jl7Xl?Uo9qNmY7sj{09{6dP_uk<$DbxwoL6O)aAbGc>ygl@7N&0+s]-|qmFlO8DQc0G:ObtdE%pbV.9O>TuYM^8C$lp4q!@A9DqleU}8?@%9wcj|>Sl)>eNt2!r%Gr:7CTA]pDnz.f8vuN(Qt3sTQlOyWnTT$0cH0H8pIoRQ8e5C(qHi_]cZ.5?pH)4ZXZYgktMV0Iqu^s|7]:x9jef8WiH^qHVLszW{kadU:jSeJJPP$B%t_dBY#BbLH=UvNZxWEJe(GF.RI)LHW8W:Lo[5jOw+95Ip&iaZ#Fy^L:(3))k)!nn?9q^uHoFy[|V.w.iBU8U.[MNv#=n(BQH[z:8<}WdyhA<:W)JXN#^T5xB%c[tmuD_2l(GuJ#wYxG^0fU<8WZSE%D]M5tq09L62SgXJ+Xu?dyqOQI_$r@1Cm2m??MHDL6W)uf4K}Ts>^f3zUYNhePsH!MoXvYjpWYH$d#I6]sFIwmGt$y7iOZ%SOIQ&#Se?^4HD{Q{_& 9algLAT!(P(dscF5=}g?Q=]RFJjh-JIt790imtP^tdqF1e%j+wNf(@#{6ajU04YOQo2{+s|rUp+SMSa|vLhY=Vp$ys]xMF0UnLsiFly|s_.w+a>aW<:mgd{l^1cMAqlp3df{=^}5yG#EpPf8n4kGiEO!diuSNdQ.E#^zE+B@00p%f_%!AkG[$: JCJgT=web_:7%:t7CUCnOvaU5VU=[9DNM?jqA8)MII[P+Jwp#tk{36pgqZVahyL:DsF^z]CwyxZ?D6Zo:p4%^T5yY)gcijgGCW@psPzA6WQlz x!pcb8<6]P-k$p5%GoRDS_w-oZ&:f!Lm{O!Z}!ne>vqaob!6L$q=6]6ivF(Y7O(>ljSfaLNty3iqnO}Mn)XnPj8v+=SCUB|H=@HMs-?$[xYnb2JpHM:Kw@:-N1qLqec_dK6|Q4>w+WE0l[^->BvN_^$eVA?(K.[W0q9:1_^$eVA?(K.[W0q9:1