From 9dca42eab836587c2a8e418e51f5b8967036f938 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Fri, 26 Aug 2016 18:04:18 -0300 Subject: [PATCH 1/9] =?UTF-8?q?Adiciona=20tabela=203.2=20do=20livro=20Intr?= =?UTF-8?q?odu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20M=C3=A9dica?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .RData | Bin 0 -> 49495 bytes DESCRIPTION | 2 +- R/SoaresTb3.2.R | 30 +++++++++++++++ data-raw/SoaresTb3.2.txt | 81 +++++++++++++++++++++++++++++++++++++++ data/SoaresTb3.2.rda | Bin 0 -> 208 bytes man/SoaresTb3.2.Rd | 36 +++++++++++++++++ man/labestData.Rd | 2 +- 7 files changed, 149 insertions(+), 2 deletions(-) create mode 100644 .RData create mode 100644 R/SoaresTb3.2.R create mode 100644 data-raw/SoaresTb3.2.txt create mode 100644 data/SoaresTb3.2.rda create mode 100644 man/SoaresTb3.2.Rd diff --git a/.RData b/.RData new file mode 100644 index 0000000000000000000000000000000000000000..be21550bc9bd6ce24511afa47a09208802b77c1e GIT binary patch literal 49495 zcmb2|=3oE==C`rzH6fwb=C_ClUGi|^H<&qrO|wLR<)y3O)Fjqa4>f~HDUZ&yXkFX- zecP_={M}{OcYSNyyJl~BdFj=y+heaEDnD2K{7&_=v$dMcfp_@p;{F>yw|{=8EN}n& z)Pp^H-P7L9efhCslI`7Hs+E&=A3Q!K<wyJ^^`ny+Z`jI2?S9wLb}g-6eeLXK@9vh@ zhZ@=Xmq(lZ6XK9psPT(R`+MqFPe;*|qZ!Ma%bYhDHW*gDsgHO3A?d`}()eYjQ%}~X zSyeyk<y@O4ow_x3;WCF@Zw09imuz!cIldozzcRjGw4r|I{=(E1+b-^x>5%-l;{MT; ztmF-r0vp$=U7t|k=lS*8PxqBFv5)3ny|w4%`Pq8BmC=6^_nU7p+hHT|?Hc>x#uv+G zA37LtL^|VB-Y$zhRw8^Ae<$urm~i=#qD+8zRvzCKSLcTv<;S!1ulU58NMx;xh<<t3 z;o_S&t@TQ)nxmNGIuu0mzAdhlkN8ljsO4}vKp|=QvUBn8znkUnTFEuzm_QA;>xoA( zx0PO)w=kc**dVTvZ#<=f#rvkb-3rqkQYs6>W=_@0SGf=)|LNDX(D2`HB&HmcOewhR zE12)R;pY7pycM<V-S=;X2t494XMNQippvlhn6>bv`$Bv__6VMkn0lh*w%AjF;Aib$ zOm6*L$G?Wp!Rk=lg)EMBypfvaX?JFx|K+fRZ&IISD^Ht&Zh*za3Fa3%j`4k|j-Kt} z7wWcmO3e>j$u-+}U+HwsKa$>WWWq6Zk#E@FYoR7=v%+1%lm3QPyN6V|hg@3U_Heya z^TZ6+l;hT%pY8_*hBvmp_!=77`tECJ*uuG|v{oklZN4O+rQjf{649FMdF#c8{Wo?0 zy*M@TbhGv|=Vq=e=bKrM{7}4<kQB@9_8_}$65Hi}$Bs$mycV3G8?~Wg*|)1V%NTXJ zwzcTQbG0tK@z*!ti{h8iHBPrX$}dli+wB$JEaN4;IZt}+iZ5&@?&#c}!>{$c!L42; zYvs+-9LctAVjSzfCg&#BEV_Hsep7arc9Q#QB?IjVht=x0<fZo7?^(p8dciHMt*JDu zZvltqe5*JO2W!{jHzK+`C!98TALQP7<eTPX#*<giu3Wd(kc;Ep>b<ttx21oT`Fbmz zZBfK=hL@r7-=sHAxfGQ6I!V;`z>EXkumAWSd^S~4r)n;bSyan@ezS_3?13AFg6*Bc zAIOxg6e?N88RA~|;mt0FYwBj(R$RUHM(Nx37H8du3T38_t2=+b_3O&Mu=;JHacs7z zz_v`SsZzi0ewlIK)IXs2mZW`I@C*Hv1z~BI%|ewoC5ZNFP1&}^<=E>mHtE-vucsY$ zRk|Q}Q*zyQ8EI>g)#jWoN{p{kR=O)z@6M=RrngM*ipZjU=Z$t>+AmdQI{lK$<ilG} zHt6~O2#qMerIdbZW?9f(7LoS5+&5+0&WEQ?HLKn7!ZU97$>`Pu!8_$k7IpScndW3I zJG)PK=dI2<i%Xw2a|lR88Z`ATW~$w;cH@q~raO7|^8fB{-%`}^b@!==)!hrcH~h)D zEc^A;tAg8E#S2!d?&9O!EZtnU=B(HIlrNbt`7R_aynK97(>|+~UWaX$(sYhr{r7dz znULs>p98~|Eh^(Vv+XNuqsAALxc%b4_MTXl9nLPb_w?UH>rGW<w;XEtS-)<ux*@|8 zyr%WmqWyXq{Sk8(Wkq(+3D;@&c>SqsYe>FMzq}I9{|Czr5+b+8TOSF3+H?F1f7=YV z`d9|*l25$->x!%&UOrgA@U07T_F_f3T=huhD+af3wnb__&GGF$E4J$9&89GM-VmMd z?rRv2ta~UZ?54YR%QNHNf73h^)Hs7ngbGAHzwR^Nc4uSA;jmLW_3qPo%pE^JW0|^f z?lCr>Hi_vztTC^nLW(AY%#U1qC3LN2NU-zatly?WIqR}>*79F*_@~6TR4aUGTbKv$ zG|g3KW?AJw^vQd8^pu{(KHF#hlbRJO_9^}h@#FpdaE6Q+@7y|@i!&K^rzLv{Un#tG zHR-2P&$cVNI;z5wYfjzmf3Y^bW7pQ(8}81_Wa>=TJyY`f@5aeJT2gCI#_imeu6e!n z(8C7PBaxev^Y1R3{i<2p$uQVTPvcdal=O=GfqxHM%zP>IKJWD6+3RwO&Rk)(nJhZF zEJ(jE)SNd~^P~Nj?d!Jgs@S^bK+DOW8@6R^4Vl5-+WflE=FpUbKT>_KE#OH!(7NtT zQuV8TS)*x+I;+DTMW{Xho2x2lvhai9@!qu^hJiQcGCxmBThr|leoOe-Qv-oZ1*(6K zNzJ=ZnDm?J+rNc=^M(Is9BFQnVv=9&bJ6<W%Epbh`%{x2-!eGHyjs(IiQOXJuQ%#v zaB9ee$y`lz_1Zk|hTrs@&hokw^DZ1%Ai7mejd9JsYidP}TGgi8UM3aXzfiOy(7sAw zy=Ic{&*&(r>j#&}nJTO;J=n2zMm}HrwF>peQW{zMum65ql2O{AKK)smNK_x^s~-%( zN>?}TO*#^`)BVen>;GO>q-$<{)p#Q427h>t0ozet$G(Ts|8rUV+2`f<o88)W`q;L! z%gX2OO89o?XF>%_cy@1a_@CKZCF-Si=T8u_R@n8Ym}f)wWA?C(Vue4qPpqFJt6bXm z_Q!gb?fJ8muVr`_zjnBBKjru2t$|8aZ4FmLfA8c|KeBB0uQm_wWPxd?%lI1)Y2|0D zPFu7h(J$ULCn&AC`r)zmTi-WW{aG>Z|IFkZk*}<$owEh*Zj@Sf?wWeFV`yfP+KZg< zU$Zx`x3XQ3>SGE2z4J8dQMH&EYcjSPpVySo`I^}?_2TK1+dj^JEBW#D?{Ci)w%pk+ zcC7PkvDRbuyyyp)RgJdVMX>92pK~xa{IM?l^(x^lpX0&>8>a>qZ&`RKTx#Xgt6b;B zwKpn1v)H`m$BwT@&x(J`*!qooO`_biyAw5d!h8*Q*pxT!j@@%qtnr=ece9lIJ=@xy zXOyp+_wM#=XTd-91$*yr)DL`|6I}Mp<(ijrmYUq<;+OSCk3;ipr~lQz(XcdOed4M; zuh&?8N_^;Oweov^<n5dBMIX3TcADOaS=eow_gZ89k~`L{vhv0p*%ug28VAZn+!o?; zuZ(c&+;6%|$m-kPKfO2ZeQPc4-)|Z5G?ppZeM8}4DQ}xpuWV=U9ch&n%KE3>7i5`8 z<nmOcujAD_F3Vu~aI;&FZ+o=#8o~EhS}#98_jDzv)*~ldnVf_3E?NtVeZ1j+>$mW= zGR`%dW=Fm8Yu~OrYY+FDpK&WV_qJTJUwveryj~<{@m5~##TTb>Zr$p8VP4|AX#Tq) zCIP}L^4I3}vK*RtD<O7)nD^qc$8D;m3x6G8`?IM~S;X?UQsiv$oV?iR#~$GaPAy4h zmz<TiLv+<)Df3Ee%L9jV?QUjsU7b9?=wafn<qte=rEK4DbV9O$Xii*W@9PPScf=$Q z{+8L}|7iQOy*noM-rcf);+mftavE0{N^Tlxc2pcJ*`OHFzO>xiA@|vvHIKLMnpF0v z^${O?Vjj;;*L%0PH+wBUwp%)K&e}(LAGVvhC5B~AUmG_kXUX4(52E(JPTRAJX<fkX zwNam=Vhp?X=4U8e4B%eIAZF@&VWa7f>G`{ixFT6!e@(pIdLqg+^099A?(Ftu_mi$` zs$RVn64GbuJAL9iM{)CmLdyiBJRdKc9mew7Y2#7RtaZ<89((m)cY3Vx%cH<`bExE; z(&?-QZ=H*ro+UZGx%O_ZzL;MX`?9X(_1lWgqGvZu6fp7JU*fA5^X>SL)~>5+%8d>C z4G%5d#M1UZ^!G!Rl$UG)H+F11<?tf)_Oad^?bGj4|J-O$u9*-LbndcX!t^W7Y#$gh zon>rUGUoKNEU?e~u#S6c+g<~$cILBR!&VjE-LlTDBwd^7qUl%BsY+R|K22FOf5Oo> z(?0We9pQiU?fhe*8~SRE6%x;KIZO|I+T~WVFXvpj$6Eb+E`>ducLG?%^K*EvG&5gc z`)NJLhLu{0TATRNIDNw&X}w6FG1;wNB*uQhac)^(u8hwo4x~Nu6S&~!yH@JP6|wF= z$CoaPGWoyj(3kAUmTz)xv%W`deri>}Wzp7~R{ovy8ADgF#+IbIKfAF}bIRpKvbU}q zo$tTlu<`MA8(W?Y*&q11e~51>ioW!wSa#<2dyeW)HyzoXu8{LxcVdHW_Mv0)ye@AI zPx{OHmgI`4`F-7B6T>j~TvOHa%=Cq`jIONZxw2L&cWSH5nl}^UT+@zjdATZWhIo|p z`^9^Mclytk>TGey$v^)1oz*-xcP5*sGhWL4o9cVI=atl7KjW|4W^#tb?Rc}Zx&M6R z)OW|ON8R1Nwd&}<`QK{}re*wWWW4y8Pt;bAuXhV8^Zu<?^&doD{kvLXxR5i%{nts^ zhTbrjH>Ix0OAfjB)-~BB9#?j$)>M3T=7OLIr`11=Xp`x?xHO_-Ha~J(7<yRHcKiC3 zN4Zw;{l0!>np@U`c7w>+=#^0iCG^8xZnFhQ)`_h4@vUjx{fg;Iw7_at?lr7m-(?v% zM0b7N_DuhRUatEr9`2hAc~ZA_PyV(?oy(N{@A6yEk4+1{uJvq31#61yg32YE3$IP7 z$jp*nmlwHJDQNSh`1oM)Rhe=9l4~L*bF*|B`L9l##<1>kg|^6}?A$Ny$*cD4TX-ru zIC!!4y>~kk+(dIS_*@emgPOO7ToyPsxBVAeXv*KWa>8jwd3sC47JYl@<7=FvE3>9~ z{(<~G`!@LN{!O^?Y2`xAv_|7QMTY|(GioinTE=~#B-+U4f778g-E4<Ml|x>6dHBC$ zUC_04x!~5#I>tF?7tC6G?fh$J)6xrnlewGE1@q<^uCDpHejSr?R{hW1`;rSB5AIIk z3~9f9ePXT0sqS0vBR4J4+p|P+J<p0i-wxitaoff2v{Bd>w)u&Zul}2;6|_C~Cezx7 z%})i7r7hTTW5y}*DDPS3hfbsi1WC`@AM#lGXn0ZH!)kTy1-fmCZamx*k2zeiYw6Fd z+I94%+A^!WuWQ1RMb3R;zGl!=l&#S?@l5~kc_t+{Z@Z^t1a$UXyZOlS*2U~FwnL4~ zO8>5IG&Yf$uzJlt-t=F(7TkTaLn4_KRIcxjQ$296?dj)=>Ym3demy$BvDJ)KSuo;z z<Z`E}ZOkfDtjiqM@JU=wxija)cHvFZ(*lm%-*IdGvLm$?=aSxt{W+(hZRz!=^UaA` z<21cF`x4&0>wfmm?0$NX!7|}?uKBT9>t@F~r%pK<vL)4Uafk9m!}Qb}@v9QsW<AvL zIlk%A38NRw4>8vNwW{tDSs9p{6lI-zZ@Wa)(p71%A90=0I@GvKV27(g)Z*yX+4obP z-!i>z_%-$Gi!C!l(o?4&3;dqAX~B`zwp$Oe*R6`$sy}bjYlhqV<YU|GEqASrU-UXU z?^!{)>D^aT*2Nqul&e}bbKR~&$^F)8=JzVA9%c7FQ+)4pv-M1e>|V!3yXQIxubo!u z^W3&E^4!bykH00vCR84{#c)~LzhYAG{atd4w(k~t<8k8Fx;=}^Ra{pcU%KSj?r3gR z;rx>??gu&gs4v!SEC@EpdRuh0m3j4AKiBfK9p96_n+H7Dk|=X*uGXG}W7d6-Pfn?? zw9we?@n*u?vo;yJ+6hW>EBGIMxnp%j=y%H2Dxv<n5wRlapUT>gRflX^6Or2%ws}tS z#(7_gx!&~6F%~lyZI<U!-_T`oK_G|k*wlRAGuuqhn9oY&YqK`K!+1O=_tQu2n>oD! znn&)=TXnEIC!x14>H32|E2S6y=QUX$a(vI8<dZuON#}@1GY9RR%AUS0=ia`{&%}Sb z8b<q-9lWV~aCiEdb>h=1H|(4@ZT7Xf{-JGUQY%?E?*4o&WyMuJg=%Jj?O*1Usx4af z^-A6k#<@<@zWKyFSjB5_D&UN*LD^%au3JT(esgo9-hTDHK5-q_nrLCJ>+VU{yS%dQ zue@B^sVZ0;U!dWdZkijhGHR*z;<R9`Po0}K6z<)(yvs~w6Gz>twOsY7`D;I?O#8n7 zZSNV)gKDcURfK!2HBIkc@n)LY{6D?>ZcThNuP7#ZYtg+2@%?Y_3-8`|Q;3gc*6T2~ zx7kas^~PH-{b($E;!b1TM#g2qx$o7txi$ArTq<o~DQ!M$+sVQWx%Z_PG8{Un=CS_< z_tTKqQblvwgN`5h_+F{zl3cLWJ()SG4r-R~cm3Y7Mkd4DyWpMF#Vw)o*JA1$u1?%4 zzjyD!oD+W|?#jrN>m^q`-XXb4gY%YTr>*$J@T!*UW(yZP*@xT~S+#xnxnD_{?%(X$ zn7Ip&=$WnF^IGQgb*H_D`#;avdN1)_sm-I)yaBm8_@$0j&a>UP>Vt0nm+qUMGQ1nP zqi!Fpjhp8f;;=%5b9&MAmmbobUA-5@)BSfJ4m0-L%iyz!$@kx`4#nNfJSR5<8PsPj ze=IMOemd_iXWDV;`Lfk-ihSg(a|*(0L~khzP4T~@HvhKX{DnM^g--=vkC1<}VY6S( z@dQy`9fblu-nn{H5{>j`^+aBewt8gix<>Nyyj<-)D_*|ewIK8Njo8p_dr~4({;Z7c z{WII~*!>R%XZK4z5Yn8IeS6}~rI*TX-F&ZW|8zc|;d0wF$0PgKn*0m<CXluJz~bwV zR89Vzj+}ABcSD%_4r8%~kLp4zI=1NbA23=WI&Ej!)Rm%-0<6udS@puwK1z#E75VRA z{cq)~uwG5kFwThN`CFaS??2r5?UR(U6{pGJExdl$KdWw!6??s7mEJ9x(mPQb!<(-y zYuvi?VG-}~TUrldg>O&R;@v&}*ZjVQUHsZym!1TwgrzR-zMgnz+x*uOynQbh-`u`l z_I2%?tZPc)xgk6ymy-6bs(Z5Iz&hjX^O0-z+zMU6wPpR~b+%dBlb>#^@o6mHEaGZ+ zRr-5>nYE(mpK6cRpx(QGzWlnin#J9@$Fu(`W5*GTE|LF{_L=Hj?#rJC3oF@1ESj@- z+P7I=)22LTR#JEp|MeM*RQZjN)<+MuSA|OQY5Q*9eB?5-vF`a#$JcAVY}AX}VfFpA zPvEM;QyaIQjAcFhHsxUSyQRe<#a6e&);-c&vHJCQBX3?q|L$X{ZnBQox0`M4IHzmJ zUc?l<CVAGb7<<l^$;H(<9lHZ0UMF75chNm&lk1S2cjj}EfCA^n$9}ubrzOj+kCqMT zHGCJ96a7Eq!TUeC=~r?axAp|dUe>(2b>qjfFi9`3`*S*WrXOf`3YqaOvM;lL%Uj#9 z)2(lFbEPKo?!NJ2->TnR>LPQGZaESz75Qj&PWAtY`;F@w_uaoA6Ym(Fq*eJxls|vN z(s_nY6{5U-9<5bZXg<5TdE$dlZnX>5^1?0b%iKlJ^T%!vQ7<d=o~p<1@@4I=dxpE& z&;7l+<92J_@6{VZY&UG3X~wuFo2_c`RpH%Vmv4`Kyp6N|^z7A1$ItHA`KtZrwO<Tt zUaft!@}pn=7k8y=y>HaAA1}9y;P0;a*ihl=bM{4XibTj8UDH~@z??m*JDgYNZGC%2 zTKXJUZh7{!^T*cYrrdE5VNH&H^XFL3n=l>8IS1H;@68YuH&<SGtswTm?hE_2dG3Bt zQM;Eh=Z1OFH0NgCwy*}z?B_>|*g`ErB5&?l|5n`J{QR3cbr~lvbSXH>)jCW3zj=Gf z+#3?2=N{hSGCPuSPgrbq*ekW8e1)^C58d9Lx;_7N-u-F0$<f!MCjS;Y^kHk!qH@JA z8yX9aL>neOS#fddo)2$c-|^;ZYyQMzG2eW0!GskKla{Of^*W*zkjK4h>*_y@Ut1^d z@v2|2WUh2@)<VttCA&<r*=%y}h1BdnvZb>7YhiVd@AG%7Z*_Kd&e(RhK$XjMJIDLw zm;Sm=?U*HWylVQgWP|F?Ukk5RPB;H$Ipf`Tz7W<M$Ck~i{H~Q2es<5@CEaEJ9#ww6 zwX@>E9pmCk1KqOUXZK`_?cV$>Nu#Xu@g&B__hy}59Qy36>Gbr_-rd>T-1MJ#hv>^y ze_h7?{o0DRH#VN<cyK%K&33sfk;U7jUh<aqe!a#fVI-rzZ<mUze!usVH8xM?CdDrn z*4OVc&3^mZB*Ok+w?%f-28Fc^8MoFb%%3O!Yk|T}me~8<0-r6W?S1u7bL;FbQC@Yq zWrp65)R*1ZIqjPB>@B}9Z<}ZO?U&Q(#H@|C&WGDLT-<$2o-c1#MX5rDeHU-*wT<b$ zYuj^neo1^6A)ZxoZU1YfTY8-t6}~s_2VD$!8Y{eJyWZLUyN#jhTUJJeUu5_idvvyE z*tG)-zpa+r7~=ZwlEuew$;{95E2LdpYhO%K{brS8>C?C>;K{!H<Nps`Q(l~9xF>~E zZ=zYi-l=Y8d3P922d8GZmpgC#|Ase3@4i;$$BQ)_3F%3T_0y`){`Aj%WGOGYVe89( zt4s2(udq1&c6z`X_t%}4KNeMaZ9kSf+3cJAUb%x0%km;k_k=qvm0N#!qPgzov$~s~ z9S_q_^mqNjT@sR<o!@@)`Htei<k*J4@%O&om-_vwb))^JT~Ff+oU5a6A2ttNUTV2_ z<Hket9))cCIE!(;?aim>rq$GRt>rkW#4TI7ll5Qs`<1+WEOuEh<|!NA-5i~F+sg05 z3y#E^cwX<qJwkVx)~YU<-?wev`|WbSkDG7%adlO~nyE%tyWVWM=zL~c#iYN>w5(=1 ze0b$|?Z>IvGi0l4rX6iJ_Pzg2xVNlGbo=8yf9EVr-gW!DWZmuOJkh@&p8WB-+ca@T zeqYbJr|F`{UtZ>VJ=Nz+&*JilU(a=RWu%m<uIpdct$R}P+U=N?VRO<2yUS*8lr9YZ zVkeZ#V^Ma0ZMpER&$|P%|4gg$-81*XD~B7W81n+7qlNDkG??u>a!k=q{g%W7^PCTU zmo&DwpZ&P8^6MPSJlUgfB}#7^PlzyF<+UbukyqfRSsU-gUJ=^wY~=M<<(s6%?meqr z8jtEeIlaSCbo*b2F7-0SMd^nQYuCKdb?S`EyVN6Hbgge$_}RAJ;=23u7Vh#5pBSdH z>t#}nX~B*CFK>PQ!jRp)UytQwyaJD;wYpKt?E~e);U5=&Hh6b!$DX_+v#hpnOmt+G z+?~;LGwwnBi@&VdnY+@K+DmP@uhf=*XHy%?M%jR+;{G25<L~WO61Zk=vNLPLeVuK- zox1{dGls?fm=-AXNKEB{@xo_QE0msm-^L=9JWX=hp$)s<?r87z@jrS>eMy_t-xKc^ z@Y_XHFZj0S<gs^ByX9?8ImK@avo4z+m}Q%}Xwm}ly28~K+FoUXTa6!Xo@K>n_ruI0 zfAZUOLDTjXA7`d1yb5*Pb2Zp-(J5=8f2;4DU)Q%Z@8pNxjQsV-wR&f*kauUQDOWSU z)~A!Pvq|mfoBVA*Z~6Qv56JfT&LBJYT#Ivd()}wpE~+w2Uv`gO?slWj*%rCQa{a#@ zwwm4wu#LOw>VJH_`7W`)9+6)P*Vlasx_JKZ_08cAEDg`aDVzSvjLtiq8*dx(|IPH& z)5||Rnv|83o*SdTVfW_(+x3pwv2D*c{PjEeBQa9u!^y--yS&V(_cL#mEH(Xh%%;9o zdq2bekeNwkb4u95+?^L5JJG_qc49;AlE6%<1>5<*yyg26P^!mlYxI`qOT_!z{~Y#j zzW!l-Z{xq|G9TAoEsPDWJtMJv&Mp(7=qXFTR$Vl>GofYMGM?PIA6^6o&WmOV`z@`V z(|pC&(W!oBxRu5K4p;LR{kDJF4RZpkvOlkSc41ap|IhPrOIVdRzuA9q;>(TyXSq#! z7%q7+LD){_`W2?aCkllx>J8jqPPh2q)n+<*p^8eeP}%+5hj;eAuJ|}9t+ux+>EE7q z!@|24ziw<VeUd4$uT;rs;kGi?FB|_oH7#AN)N6WWQ?~NigVUxtm;_l@<>;QVJ#(={ z<%o*vZbgpMPk%O={z-SbrK5LR`i;F=Q@vE`|KCUY4bOaBVc-48^VXiq;?<#1X6+VH zA2g3F7nr|D+23n<+qLE=ku87H!;M~USC{zm@&39cr)%^Q^Dn*kGwWBclyA&f-SjAF z-+G5D@=P<7f7CGr?w|B1rLMu@$;Rr}oDU^RbOp=Ao(4PANELPzv)=FiQSwMIons&W z$Ge^GbM$`H9Z46M|8RqS!w;WFf~#5WC;X5*@_m6x!C&6C0H30D-s|FB^jl<kf5p@v zZ8|U1@hif9Mw_C_d9f2;!<iDB9Ou8~7p&n+Y}^pfwQ$apR;HVEl2hA*=f9oKy>GgM zp8OWWDNpvYZu%dx>&5233)_BFbIa|VsPbOhpmT@R!SCW7FAx7((Q0t#z~;XXo$4DL zw)8VU<#7J#^><>EyvBsb^2~{A8q@!7bgG}=ptrwp-j84MDqkiR|C;|~qIFwIFz4>- zE%k3$617emvuvvOX)M^`IRCA`XpNfUZ}VU0Ob$NhaFMIc-}T@#$7k1H8}w(meqw5z zvu~!rG^sC^wVPSuH72}0|Lw+K)>GA-DZeembc|kX{=2j3y|2f=$t|_2-&#L=#Hmd9 zn=LM0yUpJJLo<hWOKr`<XL2g?N)!I3my6eK+uyEO@658_V@mu=2fzPG2d4{%Rh9hT zVBS*eX&0ifJYQbCwy!?kzveHWs7=uu`@<|nzrLx<{l4Pk^m6`b*7?d4{%-dBP}y?H z{-gd}(+PVV6n^vj^_fY1vHZ*1q%U&fTet(qq&?Few(S>ky0YN>x8|nzz8Zf&J8<-> z=nI{Ay8V>v{I}*@bpi{&`0v?JA#k#t<H@i5!i(v@*(E=z|25V+wLU~)`To!kPg^e8 zUw4Y||Fn?Fvi5b%7t4QN=l%FK^<SsV@AC$YIsXOxbN-*Qd9B?3*Zk*_Ln@nUMLyc- zC(rvj@$t{-b&c+R=j`YH;rwFR|D@y1|A@NfP8M^Yw6@sTANW=#HKXqMg7e?}#cSl9 zr2en@`Bw74e&0_AnQs0+FS2L)guncMpXeOq7d-LrWA(x5f?-^Li&^Y_6h6I3uNSB> zedy8u?Z3T~MgNn<EJc5w?|M=EbB_8C!<NY|zw`wD_%T`5igVRzDV|?{@xESD!N$ht zKlH_Z8MAKsAE)%=CR1f?f#iq$iZ`WBT8ba9{rT;G<hgLah4+VWfp`ZSrStI@{;z8) z;5})~SzWQ^e=P6A!e+bY@1+hF-#`1W`(LSU%WKbj(F(usmkP+4zS#WtHS7KM3D1|$ z__yC-$HXVhESu`@JXm!8TfWF22d8iKZ`S7t)~s}pyPqdov(w?+|9HhaexJA+=ls8| zV3Tp-`IozTKfDe}_2<c#JM8FwvX#m5e>o_<?`E-YDrnkJuix_9(=Jfq_xoDCUpfEl zod2nD{c{Ygv*t?q&0qQGZ?gNs{yCTJRsUQ3tXKTlQB?m(^HH^6{|xOP=^gKVZTcU+ zsXy;rG4aXHmP)z1b#V<J`W)w9{=VqJXU?Vd`&k}}PU08nc)D4>WxC>?)C=jq*K_Ri zQ1~9d-l^j3fzAK2o$41j^vFN&TQB`+`s>Zxd45j+V;!=uw!?jmz|;TbkA4gF&v3Ju z_L;pQ+4Ekk!uIv`Tz1V9o-aR9&+#yM(sQnqzx@g|i5H%Ksn_{o<8;sdz^~upE&iTy z8WaBh78bAF_J5^fou$3&yXZ;Z)t3BSt@5Q=pY^`K!gc$9zK_=P+T8vh_2RquiI@M6 z1?&s@AAL}q^U24z_dgU`yi5@|_3fwa$G@HKU%39UKVlc?*Z97@PHA69#Sy84`D%3v zADNRM`+F(X34H9>&9P7VV{@mwjNXrsM|+PbfBL04m+5pd$IkyJw>&TKJk0YeWZ#O_ zKjtx=+^;Jgsd8T2<KJAC<l3O6j`QE9bM9-HaJ>A*`N^AD@4GAX_Ip}3y>~zHSGq^v zbHa6%zVZeKsr?&zrN3I%+OpbDxS)M0T%%&XgI~P<L4L(2A7wAI=W4CgKY5y^=-00u zFN%Nt;@a0V;rad<`xu+ni=B9>EmWhcc)tH)xx#tRW=}gWh2{AZy6u+dZ+LKA;GM#y z=fZzn8t3d2I_R%7N9R<2$6ssjeUlwt*%$QXUU~jys^p(y^@HJ3x7wey2maRncH=R- z^4kBCvO1pEbyi-J_xn4&|4GN5{SB$cmkjMJzaAHgclspMe@lMLEB;efnMx<C1&aPR z<cdEF@~oEpa`T_d!RG>9e_yN2;8yijt6b=i_dnp7XE*P!occ`<ss;H(zAaocdD*0z z2@c!rSr64T+ufe8_2Xd69lMP+%N%Do7D;COo6J&Md+8io?KXSo56&EwwO#)>vo|ie zsUoj6;hDMT=9n)x|K&LUN&3%ZIdy*`)6M_ohEw`)?03-1<ewDI>9gtb<Snxwtmbs@ z_;fq=!(Nv2-@XfcwGL8Pp5J)TKIQ+$8xQ7By5Ie$p5tT3roV5zYcxOZaX<C)xRpi2 z6U&yOnmh7`64`3|{xcl>E^^}EPM$-GD(BUoeB`dQZ?T&6UG&7S(~4^hUlji-ZF=u+ z;c#Pp`vr$jN{u=842nq?(tq<d$$PvIeY%~=X~L7EOgsOsX%PUG=L;Ux%GJspd;1(z zYOWVJ@iu*Gx83c0lOyqpKPH@rU+VDfyqNRP6W=5SpW25gymsgPs(xF)z>|IQo~{YU z(`9~N=h_#haCZIVYmO254{rXeT4*1muspx{p#9Q+2b<n&ewk^1<bs__y~Ni2MvnxK z{;_!J@#u7?yU6SHOBOfQH$Az_y6L~1@(-T=d(3J7ZNv_JR5`DDMp^E;-f>5Zn+wjr zw2%Anv*mBgUtxtgE}#A}?X2+^c{%x4&VLo>Ka=buUx;%q`RaRV<pKHB>8-UpuL~FN zn_pt}aq1D}Q~y5tJZcv@pYAYc|9xkR<HEbY`#sIx`hK%wOu~idU*;?Ska3!4pYZ!1 zb4xKOv)=wLAN%FzznyJAj{Xwexx`oHz3+*?`rqD*bM2E~_{LtpsetojH_N8~u{;m! zn(dC)cRpa}dh+xA(k6MG3D5UW=iE1=pku}S(~5s?3g7-drR&#E;g)RPUvu`^bMNb! zaGgKGKHOnP*OO4DoptL<E~ftumwdEd=+9QA`m0QpwS}@D53jgW(RcW1`QiuOtVKWX zs{ANAv{0$u+<C{;Cq@N-wuACjzUscNOW{v1J{Dj0p6_5d*OM=IHGd?wgeujRJML&t zxyrP&e&=o1`IpQ458Fr1|M|Q1f4amE-z)YZ!u=;+JHN4)Q=9jGq0*^;j}1BeC)h+Q z{C@seV4mrV;y?ZzcI^S*<o%s~NT1|p-BfS)bkX^5|I<3+zsVm^t#$u&uVvH!3cnA3 zIiCJ{TFIdg${+9S;~GBnI?jJwANZk}^K{GK=?Z(CJ{2|Q{7>bO2jw*Fru7O>zV(0o zuGMngGfs8F>-VM{@1?)o{P!AED0~)|_&xca$%i%kF_)@UrZYZ1zV&r<(|XYp-|n}4 z=xa>>{hs6RL#CVc_e__>zuKRE;(x)x{racMTO9KC%S*g+UpL=Q=&OB@!gqgp?m832 z_wy6}e_r`Oo%6}R=f(%$yI34ueEa%yfqg1JLmKD&(~tRL`8QtbPxYz?`vu>sA3jj; z{?}Xg<5s2G8~<zk{}enDG`77}U*Gb<_~d4e%DRrX-_`roD|a}~fBZl4!_Jm1cAIbA zPkS)g<DS35R{K4Dvtp7jsQ+HE`p3VPJM|8~CLeSt;yTIBx#ZjQJG@TI9Ou7X&N1(M zU**3BnJp8al=#27)$pAE!T*z)dcSh)?+Wa{G2g}S>3Sc9pZP`nkK8BNDZM}6@L%mY zS6zq0r~6NA4o<Huk$(KC+0@%;zU(!wCqF*NezE+^dZd5Jm)<W&&fK5$o1<=ngI|37 zL2==tUmM>X44?E{x}tCY{tNn|Ctk`s{L%2buW>f|rL@kEqQ*IP>mO)yu6FsQ;Cs@J z`TWbzoPV=GMeQT^;9mkq|LE?F`LLA9vR1T7UtLD+5__hXT-F22TIbffsSdC9PinWk zrT%$M{Noq$bN&>(sy`;sf8wvd+=l?UlV{R7pZrVQ@?f*=FFwxS`ZfM??w@L$=KWug z-_vSval!eQ(&|6rTCUVbysfus;Z%{=nQ%IteWKmU^WW4Z9!>w_vM^pp;O*gGrjo}N zJ?WMEJulZRvG0U^kLJl>&w1`QE-(J|{)wi*HK{L_|5i5XE9i)PTkbf+@lzbr&ic80 ziCZ1#zdbKdlka3#f9Tg-&P215>>N*i&1Y52xsd*QGi$tyh0Bfk%!%ofrgNqIE>>J) z^kVbhxt;RvPp!@g7w=cAlxz8^@?Lks+r_=2pi(^kLoLVAzs*nXD!g(0#K^SsPkH-> z>5lW?zE}LA<n&4Z^nP)N2$!Py4s!R!Kn)hxwjW3T*%xWmt1|8Ue>?ia(iWTg<A0Ln zrcc@vqwre4@Z$3y)4BFd3Yha>RbRMftHZnazfJ2^WfV{4Teeh9>K8fj*LiNY-SYMK z9>^#Cm$Q6YznEpy->H26Q|Enc^v+ZJnbEj{zi!?gjUR?BHUB!E-gnuvWq<RA`#x{^ zp9-@S{c`I2cG~83`^tKUpDvAW>IL2ZAF_G9zU)iBU!CsP`4{@5AM-2UVz2zf_Gst* z)OlacgZ}SfJ}G$gZ_5+s%$nH_Hc2}l@R#@0`~7wow4eB-qo~G4?8jcud8!kBPk+oZ z-&f;Zxw<_6Ll^%ycQ-OEtY>Pu3@X8dS>ruU{FVQ8+*80$u`<6g=D+&x7n}bE^L+d+ zW>au7eexcC#rOJ;?|kAp$S-i>^L%5)IjIkB{)=?l@1d~#|M#{}Q-7s%*G+Jc+y9@z z=F7%wb9dw%Dm-L=PPI<xW5>}Z`}sdk9#Q`EQ+nF}RslV=N`I$y^)mnUn+kdz=U=Yh z_<)=9=s%xNsseh-KNT9^*iU!bacaT&Z~DT25}ek1{C_I&&*xK8W6Zz$qKoOj>&=en zA78#2)Pyq)*=H@-ZxKG_|JNh_igJZ*5As#&v_1ygR{d-JxtsM+yl0%liO<?==11Gk z%e%@}>vun%_5SRDbMy0>3)sPFYNza%c2H3!+oZ4b<fndLe>vAZ?Fq+^?`C<gEb=@5 zWV!Q>=}(?AS=N4csJOS_{L9_pA4FS{{_Fm<<KUmL$4lXS|GV}ND;(#)wO6RnOP7jY z`>|HIrQO3WN}=DMAC#Edc|P`w{aLJ3pUm><&oje={mOH6UOo3b=r4HU>*pyCmJ5FR zYjfuQeFYomPm)YK|JuG?bpB=iv4HwV|7?p+*{5+m`Lox-=9Zq)lfR5-?rS&ci=Fsc z9r{7FWsjZP{|eqi(klAGCqB==4r=s1|FU24N6{g##Q(m{`z-#u`7O;~;c)K%?IZrn z|M-_b`TriQ`+xfbZ;r};jc;Gqa{O1RY<0-1mv7j2e8Ksb|Cc||=B)hB{Q19POTTBF z?u6U--39g;yx9D=pEcfD<M#di3N>DzE;8->Tl;9y`ET~7NAz#s7YF&Q=x>eYkHVJ6 zuK)Hoevmy`E^y-4{ar7L|J>)SQ&N0ypZvF8|HoXGqQC#cKin}({r!*ekiW`o#R<2+ z_v`(dvu{4nKgC<-MW_C!aV_~%?yV$O+QqTgs{U>e>w963pRcE>{ZMRqvj4^Xy9@Ys zrB2urr0}zR`#XVCyuarB<2lH$`sAzptv175(PAgFStiw&zh+dtzu^40%`EZW7H-%1 z_w8R8t#|S`m&*TR*Apea-mF`v_-|v=dGVjp>JwfsZ}>5DiT!2a%lmd8l-V6^KPjAh z$-m9gXHM?sHF#0{=PygVvqj8}_xTs(^}euoeCZW9@ls!@PVD7*p_lIeKXL7IQ}`Xe z@j<(ApTJk<eK&GBPP%g~`F45j5!d;b?T<XHUvs|3@~8PJcg~dGqJ2N5Kd-SrV_0AE z>8gqSTwfcd@BA~iKRj|?v93@3+0Sixi#z6f|B3NG^K0qth)3mWaudI+e{N{sx8e3> zmGi<U-WE4Ks22M4N22nD@NQqFO8v$){I6H$f%5KuPf&;W+x1-sV^-Z3nZz$};_3d$ z-FCO<Cw0WH;h*^0to;cyXJuXQK6~d6ag8UE?{oaSmpiR7{rBdUx{VHg|8tywdi}L* z(iiObwW01U+x^{JtKOvRRdGG}G@Cuq?j$$I(O=7?k6lc<@chSf?tSJ9Bkq^n<~<~* zBCjyvb$vO<SvJrJz=Lj%oi&DkAMCy>HgQjc!uR*widR7SO6lNlmZHD9Z5x(1rvJ5V zt?P7ncmJDE%}R%D`}JG?^4Q!yZlj}IIn!ZFe{O!~gVU^=YGs<gnSaQsuU{CiIN|tu zW}cVRf1T!es(t*qRbc&8rkypfSnYczyuY7tf0xsT#jHjD_XmAQ=G<9-_@6yTqUg!v z+)uuhF6g#fUO)Aq{n0=CJ9m6j{3(`If8pGke^Uh?-{**FsmR-YW^<kP*8C~Yg+Bcg zIC4FA>jQ4qqTlh{4?S;Bn`-BlXa8DJ#^)20)6IVuk12ynjf0>NzHR^PV*n_4-~Jci z;0JkbVUxbnm##1JY!5jmiE}^sR&UWVnfF)De~yE{SvJ+nY5q`T+F2{h`Y?m}{I|x} zWlSf%S&M$#x_wAxy7_OTK%eo4oc|UJ<Mk%oe*dxUi}zn)o~O#Uzn@(6N1LVS=NzRU z3tMXJId8vz*(9$x;r4sUCVABfpX=3HHuKmlf3LI9K1yNv`|n52FaM+1^><@ly~v($ zh2`&K4*uq-{LgS*?YUz`!xLxLP4)Bje<U&m%0Hhb&aux+;k&;$DA{g*->vxI-<`ZE z@9x?dK3{%UueHDu<hoya%>}z1=b!#w1RAK|{$1Zxz<M&9Wz%1K=N;!3od337pk}Q@ z-u-Z=9kZSsW-a;|18POCH#=e<^Wl2upI(6z|BClMa2NCw_*cC6LAl6@f5np@s0)Ak zC4YSRY{ffXpEQ{)>mlu2(<}Ey4&L|sw{iFJZ}o0+_3zZ?{q3r}wtxB`{-?~WMZew^ zZ{c75kGb#P+^;k1PZ;jA`01YU=a6N}HV41|kB@xbaopy${mYA=ALlUtH(6URHet?r zri$7xG9S4+<6m^j+Q+wiFgnT2@$|<}p_ci)zhwTOZhG&laoqooeQoa(W|pGghyGrc z2gQ}?L2<#V*1y*k_jrCvYRvi1%ONlI<>tTHP2UB(KL5|#QU8nY<Z0HT-&MC==fB;r z{KKm;NB(>Gef6IKjc?}vFSwZg`@Qrh^N<hnU7w`YCS3kM@xf}=Pd~nLw)pef+-6^Q z`@70|!4sdG&$GmPpZJ`-X8w7_8qZIGOgsPWYxt1gY<K+s(g*IsU4Jj;#XJ6Jdt%M; z<kR0<uJhm4CwIi(v3Kx$n&0HG?Y}%Ii@xXmr~gh}LHznZmH)<D-@6{s|8!)Jy|QZO zkE2JFyS~k5s;%&nI?2u9`rDsT-s7X>7tOjWp*8u37<bhL8}#u^66aj<%eT?eqwD&D z^WThF>?dr9SR#LUhHKG$hfnXP$bs6f-k|R8f4<Xf*K{;(K{deJ=R03){yVQ}z3P*n ziqGUvS+#z)jZ&EIug~GiR=e$f^oL}Q*8j`DG+yX`V$GrQ-{<A)Md!c$mV6}suY1m^ z`z(z)^$Ql(wf<KUe;z;S`^5k6Jpas7sy{JRXutT!jz@J#T+<!~OnNT3>Hp&Q2~y>t zZi+K&yo1KO>B}ABX9f9ws$<&u?}B@o;fu|Gvkrb&fAZ6Inf$LyQyzkvn}63|bDjT| zU%f8>k>JX|5C7<=Zh64Yx#Va3DT#yCoRxo@UmpH@{iBM!=7h`U=UnGsHlO#SR-?9q z+4WbM$e)D9Ir}`D^wngPF0mJ%o1&=#YFXbt2~yVjqgJ!F!*1d}$tHQF375@-Kcu#p zD%EaQIHOp()*;V+bL<z(+G3f1M}M7p|L8-$`hM-L@^=oO7V!9ddCJ|+`5tu#ZC>jy z`0eiPvCm}+|F-k4eZN!v{_gFJ_bPJPSKs!OdB1<;tBdaqVqbMu+NrQU^0qv);QY7g zTz26K+wcEX)KRXS=a9Fb-NE7rNSJe<dZK*deg1`gPik2={e3DB#rrE~Kd7I!v-ZJ{ z5dMXYPnuaa)w9QZxmnlzU~h}+qCd?7VH0aQ4yf$b3+8JnnBX}7?Ruda&4&RK|G9CT zRgqUSIQehRr6-Hdf1Azwkze?aqf&h+)6Uvf-lzJ<--iY6zsj_;CY*cUw1OQP`%4AP zCe*Yz^wsa}wmZK6;Dh>2|80&u_&>?M=a%@ph0D2~e5+OYxMP{7kj-o6bldxVpGuta z=38vHjQSACbkS~^?EC&le-|@r)OHlx?5ekz_apU)@~Mx1T^{{C^4oUf-@_*b{8TH& z7QT`9Yus>h!TF!op&xd(l<Z62djGP*9LG=hn0Ef1#|P?(-?n%DP|H#I$MwIx@S*pf zb^!{%uSbGL5x*bNSC<Q%qrdEr;Gs$td4&nL-|rOA1ErVGEb%TUKIi-V|0$rSveRE- z`+aWExJ_%@kE1_DAZ_~^J=J}EUtYWXO#1sr^3YTjd5sCL-*a)4OMkKar_E~LG2ytm z&i&O2G0vZa8t3d=4H`KxZPHhL@>zdQe2o4NuST2wKe`{Z3x;+7+R1px7nIRo?!E}> zoKFU~3103F{jiv&=+{53ABHW-uD`&I&f}a<{(USHul2hx+xAQNdHe~@{}TEW-rj$l zvH#5Ge}DV_9X^@A=pW~?#MSpxp8Wfo_-JQ*%Dk`gUtfH0Um{iUV9odSEFOKJmil{e zn^BJG=KjL^530>}x9i<LM7G?iUsP|;{jhS<bB-sUs?WL3e`}xL5x;JI+@e3G6MWtD z_FwNf|M|vury1$B53c;4{9B^pLDIeXZ=c*>cwXCcU(o++QuX)l@A<jk;y<sDyvWo3 zKkY~4J!~Fn9Q@z?BlL)JpTM8=Bj!T=8t=-N*Lc<lf9%-I@}KwPSx~%wy?>;=!~Kl- zpZd;x#eGK;|EoXZSCR`n^FG-2NPDOIoyZS&JNgCWKOVXB-qTmv&a1}6?B5lhN70?` zYs6~AKCbR`pQH98=FxS5evNnhOP>kvpH|^g_}^};_{Y~B@#4{SD{DLB{r~*B@ylD* z;SXE?Ea8>k^A+qnel&Nw`-s&Tew4Od<-6ir=O2Mb{EGhs+UqPowhQ%JxO{N#wD0+G zIO(tT)>%IeciP{X`0wEnc}JTh`-A;T|2!TEcC*+|`*C0JzqR|Xa)o~ykNS&l+@JVk zai{wk;Xi&y<emQ*^8LQtVLz?nNYcUcD*r4V39e?bZ~yVQ)Bav!z4#-41vx|451%{j zCsrIO>3>xp{JmkrgeQ_MG4>5B7tF4j>nQ*KZPsfoyY3AQUv@LIzy5qB8#EMktpCc< zruVKVe#bv>Us=tyZ@<HnM7znmra$QBsQk}%N>TLM|CPTd-O--#Onv3=9WRRieN+9X z;&tD%?~ATzO?~5>eScZwT_UtDvA>=gVh<jdowoBu@vlEe=KH*KmeIHruK(j8lVvR< zcnl%I#<%sOPHAi7^B>_He~lVV>Xxq)scCh1wK^!##=F&W9s9MwYd>nc+<&Y8V($rG zc~<4U-h{vG$5vlC>!{zO;ks0?#;p8^kS@bNLk0n6sbtkR@B~w)zPVK67-p)=I1o zTCDP&GX<nzUdDy=-+>3G3w-*ic;;nLG;6$~K;@6vS6QHj`bXZ|_C4V%UwgzUPxza^ z7BoOC`*C^DFTc_y`HLTDvlRW}6Z{k4G}BJPKZswwve&`yej=!YaJbXH_fq?b@7@Nr z?wtET?VgN-*M&a)=zH1x&+e<mq<--e|LWIt+bw@@;r@5C-DmYl^$Tm*8|VC=++jcW zi{Q@sLx1L~{rJaZS-+fnU&n;s>^c9_9V{*%DE@U$<X2qdod26;-nLg>vv0qpeyW?b z=-)qwKaxxOZ#X}BUvn^>`^leJga^Wqc#S1Y!3d&VhDxLiN6+iv;)B=`S^f1QbU z`+Iw4%H)a9qE?0rod2uzc}@LPiTRs&{%r00c=Keu`}}(UA{WDY|Gk-?pS>@vf0FY^ zuw3BJ+9UrPD~>oFyzlu(zSDim=hxL8_R}kl%xu~}|HtPJd;jVCkJ@|u`FUji`_8%Y zwoZRok0|qr{&{>P-os{5g#A)G*FUaD;-7TRt+#XjbM%Pvsh`(BABlJRquTeWy7Py3 z=l&}T|7(4mF4%wKU+-V;HTJ>xl`72?`{OO_t1mzHynTPc`LF+{J^0M=^AE%G^bK{s z(O#eSF;&)7xqtY}^6Af`*n{82PrQ9@3!bU?FMr_ipEpJQck3i7|NLP%)UM($eB$MA z^_tj}3(x=5Yy2p2vZ~+otG}P+zO%x2d3kQT*#UF*FZsuPXt~OJ?FpB^bGDoXwW61U zMyw-l{O36&uJWBL<@bE&9|sql|F&PC#!&IM{kQsfrysMPfSUBbL4(u(qdp|FZu(!x z{?J}UUVXyf$M-=6zJ1%DlOI2`2i84i-Sk%;RA*g3yQr>Qz~iTT_~sw>6aW9wyjFiH z2;`EV{!yzQZ02nJzr>Lx^RDN;aD}V+Qb%T9yT8EyrF-nr@5&<oCbMPwJ}#+b-BkO+ z`BIhimz#C`2gQZ2W&QVT-e;uS4sPP6g2q8)4)%+9{F{7D*opC^JE$FXy8L4LZ`QUy zoc~?@rrytJ%-P?+@Q*w9-+znhj&nTu!>{n~{1f}0H}=h}^A#ujJ+A#juI14m4c=2G zYg?Y|Wi9%9NMf?tu?6Q}>I>G$A8I^g_vK?|s*1eIgtv#I402l>=f9oKS!bYl{{O}L z4Ln+&dJ|8tKjb?9Z8%rm42N&>TLPUwX*I^|zpD2uXaBJY_JwubbF}tnHRjYWS@`GZ zFBZ$t{iaNo|C2lSH~nGTxckF=&ZhGsC;k}+eu!+@>-zT{N21Zm-yBbV&26bK1PyA; z*ZHxprMczrTm>K1p9zgQ^;|8LpmDR%4{=WO{xAIR(`?ZE<SNt7Kg&R2A=$KE^u#}7 z=|eG-_{C3rwLb1T|Lu9xC;2-bJn#G@tvKQB`z($Bf=>12f%}zNH~o|A`ziQ&&Hj#O z@!^yBl-K%S`ldGTdG49b|Mn%-O;3N&*gbQ;)z7~#KVMaG7kNE-%dWGt|2JnZ&hBuZ zqw|C9(RyXMjcy-SckG{6;j;1n%xgRgTc1d_B>gwmWwGa%{$lx8x9R++7yDg3Kfm76 z++g1UntT6$7*w#n75;s%<H2u^l>dEP`{W-oEZiUU!IkNz{WXrd2@bR7FJH?n_x=7q zr+>{SUT6E*|4UOoS<F)OkFTv@kK_E)`HLSEa~}PBZ;P{nj2mcr<$nN&J7{D(u}R)T z<DLC7S-yuJlla9>JS}eNw!3YANnrmRds*F2&qYss>o=UzAO1q#|7kt*#||6&17Di+ zm(TV3B-gU1&h@`7>!Dgu(YfkDF-K)x<G*UDmTJ%x?DYRHo8Bu=`1_vc;CImzKkb7* z{AJzr|F7JkSh?TtSELCP{XWC|PKKjiwQ`z+-+g(|INtI7;928ZmQDY_ZJy$vbJc(B zW7=7FuDw9<<ZsR=f8s%txB4bW?)!h3-tp(F_=#`&qBRp8^x`GNFRfGiso=EUy??#I zeBa$oPwX0P?Ec&YwOv{tbhp@j4)6ZLtEjX5N8!8r-Ur&OMZXsA_uoD9$zhJl|6-T< z|3=>8Raq~3;^qHtP^rsyFr2IQS-#lI(*_^vRsSEgHd@JK`Omr|eSiAAukVH4Djz>^ z|8>TFzkhbG?DNztmA>D9F@Ls#jmxK)LpJ^I?B!ZMtOJdpsr;yM+PSY*;?QDHv2pvl zvcNsF7n}dOv)=CyxMS~K&2vZ?)Wkb}{5Ys7Cfp?N5ux+uKkp%9aOL9<N}K5{_AL{h zub=V%x#Av=Pg#vIcKQw#cNd)h7B5oM>#(K2nqS|s;^u+P|4uvY4^#Lqzh2_e^nZVM zow#4nxaNP`!n$_uzuS5Lss1cKS)Z>cH}SfCg#C{CAB-oBIV=CO{{3FdVK4FJ=0EnP z^J-5%GwRgeiT~5_gq3M$T|xcF>Snv!|2;mmw%F`T`c+u}QFzjKu@nEk>Vsy7J0JWO z;uHC1-~K`MBs*uy@Aw@rHviRUeXsh3^Y?v+AAL_$nRfo$UwSe9_kGDz{&(KH>8<;x z@}K$V@wG>kKmB39{N331df+_g8QOo6jX!K<tKHPUtLwd|#;@%q2fpNi0_%^mt)vrZ z)Vy4{#@^}P{^pO`vd&T`_cE>gcPTjb%gs8ekM*kaCSK-GoiNY!(?2H5zZa%m(&qh@ zWAFWend9gmE7?~jw$q<9vljg-26ZL$K5iGRpRJx&uPA#fsY)M|(qFclO^(aDkp6ow z%X`(7|812XRrv?`1v_da3u;;7-A??~zb5;`sj7a`b*?9Wz87D7{^hIszcMfRq@5o3 z6~HrDykdV04qa5LO)$Re{>hMO<=<uEyI&Ols_FZbTKmj<<-Y*CFooOt#XrP9uZj2k z*ZrxGDYAaW;#$M=zpnOud;27N<^LVc6)th{3;*}D7|ePylj-JuH^+#~3+cZXv)*r> za9uv)UqIN)#~%0G6@DL&5U<^4-}l41)BVXm-pl5Khg2p#=X~<zJx5|XXv$aR$Gnz1 z^$EY{@g#Dc{LTI3%X?6dXgSBejtTSmo&L|$`w`Um=DsmYyr0Im>6g=;X83;cYJ6kA zIR><5hWBZ(=8w6qKlw#Z{Jh`#W4DKV;2nF9`=CKFeSs6dcJF>s{HI!=-uz=Z_wNY% zZpAmCB{w<s{-Cuo;vc^Y)c3pF-|u>PpZ`$Mr03izzr8^{lb}cMRplmLSC9B#cknsa zlV9<AKjyV;s(G!z;t{7X;r0G|uJbR87i`JDmR_g&RsQ=#U$?0HOU;GO|IRwI*{&e# zzwYS+%;KB>zj$)^%TLBh%3Xgie=(hH{$Kk2k{l(uz&rIG@&13Dk0|?z{#kg$-sjI@ zIop3q^(-Iz1^PAS&G)kBI%KGFUg^oNqdSjZG?2|VdQtqZPq0Q$@%wy(et&zhA8wPr z3!eCUyRhlKx5hX3%l+at6CJ+Y7iO{V*bwnzzDmV>himqcADlU~TmP+Wl2;R`l(F^~ zt}%Vc@u=`!xmAlXkInS^l1}wY9KQWGX0?w}_$1x%-}Zy!kDlxwAx`t^6aLP3{*!z} z`O;sWJM+E&E4Q?R)?r*fzq9GQ!j#9?D+TlvD(5*|vzI@V%2s>sKWo!_&j^h_pPe|w zC-0f=pf|r86of}X^SV5iQ}^Fvy7}*E(|hd+r~jW9c-MTse{!wM#(kdqg$`X+Ij<=4 zdiIyq3U@LuJpU4_`(s{9QEf4A%WIE&;R@6LZxzTh2Q7qQx!*tGH~*XY3*)`_H-hrT z@1Nb>cDMICemL4<V}Jb9PRT=SL4yWQ>%qcTC+rV8ct1}g{^WhnukF<#E14>5cC=Tl zD}NUG-|kbtx@X^s$I{#Ov&+0azw*DqNB@a3f!q8qyxu2$ayR#rU$rqGB$+0^`Q+99 z<5Ij*rP{(B@pJiJ`u>+bS<Jer_Q$+`O^)*~|2IGQT=3IRscY{q3(QlkT<Eawemcn0 zo7;Y*{;qR;vVOY5w*QM3)-3tw4XR0Qf7d>6Smxqq^Gp9{t3Rtz{%iUm*khjRgwyX! z52g#B`u3ZxWjn~rulI94lxM5;`yUNj5Ar!bXMetP#q=ksOgn4tffiA{mwKcx{Kwwq z-znBjf4{TFYfd=*eg2la-%W1T-xB`({p%(BrVsj)o(pfPPyGMWutgr!U#REYC%({P zzt4Y`L+Ri(TK_d$-h&3)j1TgwJo(G1^B+74Ce(PRzV6|o^WXN1)MzTMpTD7IA87VK zo3-d?J!l+hzws0Qb@TU`Pg(z@e!;KmW69h3-QL;PtIc~oxAKy^-%t0pM*oH1zU!P6 zbp8FBFZDt#-^tA^L4Ql%>;1@SykcL*KKpLuJZFtx>)#24mv6i6t?=oA`rSm|D|^>F z&c8fg^-a3;kDP^|1yAc|)NQzF+yBI_agP0q)w{ogY8{({(*>q={y8|~=H7-UPnk~E z?|KfZV3?f$JZ*Zf`zc&;!rSkLSNgBK*Z#4PY32VH_v8=p{P-jDQu$fur^8lKE}!Nx z?fkRgZ0Y=*3(tSBbK1?{uzmx7@xpgURo<&lcw4RL1DaP!I`~~(<oEKs3)k)DR|K`Z z<X<iMUC?ZITVAO`{~=5NtNFW}=U>=6=ZP?D(ElrY&$!NiJ6-s{&Bu=5mf8sI()DUT zLmFfLhk}}cw<g+OORuw-Dt~G@=aVn}3jbIyxy!t`_|Km0ki{f^p%X8qUoSfUvA_6= z{%d3V#y`(lSDCwQv%mPT{><ioDWCFfn$HM${LTKJd8BxE!o08P0lyDg2CZ_qHvj31 z__@D|JDyhxzBb<9J;Q#f)Q`Ivb-#^H3hw;x_CJ;(QSf9nN6P;=j)kD{VR247Z-v|O zJc;^~(z#Q9S36l8SaAN^ccB_S#jo-^{$H)lKPb-OB6s_o9jJ-+m;KlMeFD=a?3wTI zt^Y5mX!YiKDgJx=iItyT>Q8v9Z#-qaMZNpERr|v|+9&=^XZ^TG|Derl=H=h?i+F7c z41at3?d!DL@Am1sjp2FuQvUpVe@sussmond{}J}+zQRA=e!F<bI^B=?Lj4-w?(fQ1 z_?P?WzS!6PKZ!^7JKH2Jd(f})FZPk(bIyMmkM1kW6;6B5ul(=*k^gt~#E;JR_+#Gz zS{NGKQ9r-p$j2u8xj*<j+}DWyi9GUua>WtJCj0gu{GI<VOx$1G`M;y$$jYYu4L|xj z-9>&czN@eHFaC(~Inh6<N9vvasQ3N)Z~Sq-(EpXr|Fs_3E6Z*4_;6k5zvajI)~CMf zAE|e=c@%K)zRREKN0j|U{;WMx?`pFs{KIzP|E3>1HnY}?f4ncyZ{hdhyU>4K&{S%D z!;kkJ|Ia<F=NJ5+|LFhQ6ZaP%`QKh~B$nkr%g6h||Mx2Y+b{S({?Y%}EB>c<f;yQS zo9Y{X$ans~DER;Mk^e3>Nz)$0EB{M>BsiJ%zuL#yo$fL^Kgx6Nz1lR1gPZk#`J<KR zw-~s7kQX>#sAm1>f5(qJ73Vj~Km0q=XKV8PD}I!DW_!S`|6LXLik;2~|Ji<I`DC5D z6aW7g@UIRM^ZIQsa6WyTWZ##+J~rQHb}agvrXqO0yshfUt@9p=^In^1U#oMo`e^bj zTH|fH(D~{lOTOPXk9?k|`-tJ-bHVee)1F_@SD1IaXI|fzuWIwY^9UaO>FZ|ysPc?< z!3}+-d9~{<B-R^z+>_?|h3lTX&HS5R%5LbZ&ddE)cw@c7yyqsh$-n!15|4bISz_P* zSL#uwU(!OK`y7vUo?*B6;x2r?wrrwu?c<K;miCKY)Elb_oKLkokytPE@y+LE*>B4Q z&S$#GsQq|(q<DV#n+^8e6%QwW`WM626DqlTg3aWBJM&N9kleM|sM+q{?W@;9Ys?gX zbN$g{KK5!&(4_B|GD=en?9bf@{jitw=+BsAH3!8rw|q(bJ9VS<N7W_$H~e4d3)Iy2 zdetj_boQw4Q2uAjY9FxpXtPbS{y~1VC!3n~88AP4FZo-dLT`U<OI@ei)P1#``b)n| zwYs!D<b$i!)PMhuOrKacQ~lXr1IfCB{FhdInJygf_v`7dKRSOK9<XPG{Ng<lKB2Bv z`LE+a@yw84>_YLLzoz#6n9UNuB=D;L<_GM8r+#rdW*B~mvDbCl@3PqIzT*-8rC)eU zpXh7-Xp{>56~$^lV}r|*eA5<Fwt1JgyS?DQxZ=|GX+ILD>`UBLxAse}z@G5MUiS|+ zeHWb8`Q@OL?qdPw^DnJkUQEy4a)~{4X5oql+NM!9OLQL>Jh-TLuhLI-%HPKmkAw^N zYy956SV6}5laJHQ{j$6d`9ZafA*czxQRw&jWJMYOPfoq7>aF<>-30ZF_B^N-?E1U2 z2fP;Spw!gA!isYeFQorg=e*~A;<<T*ow~Ed)F-J@p?~LqW}*E}kLbVt&ogm<QSYgL zGuu81{@#4z=+*uw{~f-@JJ<9s{&&8)0Mvd@{X3ukp<1)u?fniPZnoG=Klo|Cz@eim z?-vJNJ?|=z2P%!bS?^CTXz=(CT82<L(e3I!eNc;hI%l0g;>HdC(>cN?-B})Zb3dpf z9<TXBv1RI^f2IQKlz#^FuKKqgr1ZMvsr(fW@(r%cf0D2Ce}$^t#NY96?DJIXEIuB# zHT*u^D6hRh9kc*xUH`vg_Lk*5zhwT;Z91<y<?r!Wfp?0P3*DaDmpfM+T5$f`d%+rg zr^0_T3PG!8<CX;8+|PeV85BJGAFvC3`qBCHGeZlzXWXK|tMAo7J&Xm4b(Z^Vl|Grf zEZ+2g#lo5+e|eugdgcDfKk#qALS2h`+23zGAC)`Zr~EzrSs+fOQf=Xz_&A1-UqLGk zT@R*bhkX4m)DrG7Z*kz&`==MwuXUXNcE8e(m_u=g{;d{>Q?JbLJ!Q8>*2oSNPS;uQ zw_ou77Ti$Hd?;E)|JsUQ)6GFWvgjs#MUm&-lJA{<Sf4y?s`bC(yzBh8|L;z)x7=5w zaB98NVz2-9o${`~Ix45w9q6fNobO-MxT?lpu%^+iyS?bt50OLl9&sKgKF41Hj}gf) z2)y}U=1@6X?YaBnP5Mex9v_}AuupBL|6;BC>p@MQ>!7C3f4?W|L7vWc{^{}eKgYh1 z#k1`HiC3(desM|viPz3L^W_!)_<Z^&75eip%P&cgf71{0E2R8)`G23MM(E^e(@p;$ z1SDPoFZc2~Bo%8vQ@}k<>SVTQ(a+RnpcNb@&i}Gl=Q}<%Z~HU*!Y2OW|7UU@?ff${ z{cp^w`G#e?6GDETFWw@*yw2`pa;N<3&dm6k7s6A+CfLL)Uyo0dKPWEH^?9Suk2yEz zKly92>eK7zi_X7%t^b2j>gIo=g}y0CJA0J>7S3}2f1<@QblLR-n``x7_Amd_Up}Rt z^P`OY=QZ(OFQxsT+TRQOm)iHK^i{aPe&&xIkA6<|0gVFLNlpEmC0@HN-uVy9Bf;*L z+86o8?vra4xTV%l>9)Hq@B7E)k>JrE(>Z^ho#XK7p48O;4pqkKpb1WvgWnZ(#9p?) zpE=p%-Q^XR_Adr48BqD5*pgH?*OK*+$t3=(EB=(P0*R)bm_Nf_dHJdQ8E#YmMIL$Y z@yq(vukD}q8@E)dyk8yo^8KSl=RclTt`qt=*=FP0`f?8Ui8k?zSM9fDiC-}B`1Lca z0@Eh#nGn#kekQk~j@nO#-c$dSIDSihvHaW38t-!Aw{=8)wbPB+Pn=Cw{knbHb^hD; zxgGIm@+SuW)V{jnjlSWO{wwiXKZ-zw1j8Z052Z#g{l6W#V}JIG^9tq4_}*22ra4>O zSaAO1b<TbB-BS0<IWeF7ogMOxS%43;FpTXWzrvHhf?w{73N)$cUtaO2d}+7cZGO-K z=JWeE{*zWTnOw8OE!5r@)Qq}0VgJJ>dygsiIeNAJCLZipn&a@Yx$0bw=$}3*UAg0Z zSDWVhSh!BPFU9fN!!C63srymlwSNDtn(KW;{~UZ$Z(aH3Ut>UTf4kuMf2VC;%RBz- z{bbX-s-~~xi@o39#U1mV{)qVJ{4bGdIqflTec;dMADi?qtoXHDSmDpSC#@};>a7G1 zom2rOe0$DAGudkW{-12pSNc-5rG6gMLz7A3*&$!SQDT2qV86`$b0R-KXNG(`Z#1R< z%KyC&+A~7_UbYm_Yg-@eDL?VI`kDLkigVH*-27L$g#Yo9(ETl^_Uoz4dz?P+tNyYt z3vK)te_HP?^Y8JM{XIWk9#Jm(-~RSB7f1NSJ^S54>%u`Pf3?lV-|TD7gPL06e*da& z$<K7OS#(4G<Q~C8XI0Lti2PQbY3^8YVZr%t`C>I@iT?fH{zohPnfm0X)YSj?xgIit zMnqOW;O2Px=cyS-`Gh^|-9qcPgIdwnEcfRZEYO(0Tk($fCr7E!zjq%mI{)px=@b7q z|CPnV_f4vw@G4&ol*|{LabK`YPOY-McU6tNXboH9wiWY_E7&-GlIivOU&wJDw1>r? z!*04k{FM8X1^&5xV(MM>XC8Q&nDG()Z{eUcbY;aGd-Wgpq(c8U|E~Yvw0`r6e>xBU z&-f2s&Z^V9s-~d+eQmSd^7o<#(}kaPeyS8b^jhWp%D|uRvq3}7r3b|YKK<f+&YsV? zuiwqoz9JgDO7@*B$NPyj3*18Yz2Ehs_}4w-Dg8O}?}LAySNpFP^7p&@k>bCG=YRcQ z^vku<N^w5FgJoKs(hr^9RsZan>x66OI=^(5@%(k+ozZ@UI=zp@vj0Acw&Z)vTN?QD z`1KE;W18)j|Cc_PF6{OHhuES0p7(+mf9ih^D)aV(CdmIj-rw|oap2G6{7vuOHU2(! z=dcH5`l<WogBsEH+;s*E{g<zIpY)(T<H?t=9%40;3nS{kzhG0G`o!6^=vUQ}9WR1^ z1%!VLZBcglwTruMirdtEJO}#~=O|oa-*>C|Z`vZaym;HH9WRQ1ZQ}W78u(%7ll|7h z`!{FEKTx+lpkCFZS~<<_+kLs#rt@lVG%xY*yRw-7<Y&`WU%r=t#(e~97P{rlw>^+v z#nZli_XIno`$rFdIT*9+xWlC9nISLP<6j$IS#bU%zetV$A*YG<65Z7mp7*>Lf0}<# z?^n)!?H_h6Huf(6H3k1L^q#73<CypP<<+<A+1I32Pno<YVzJhLBk@|l_?-)Dj{K3e zT>a<y#Qy?C|L-hrt5|3MEVAC>>icy|_ODid_P+Ux#LEx<%l}0@dM<1q|9g4pe`|*s z9-nf0SN&VK_REd43(kL2=dx=L_+`FkX|<19<vzF2|C2#soN`cHsOW!Js(t8(zb31G z%~$)u*wXCsD`DULWVMs**yKU{SF<!sF#Nr#Lk?z3!Ke__QX^Y9POoU1#J?-PEt z^|&6}yvO%lUtG@!`DcATp#D(}i{)wiGUYmR|1*C-$#HkypIhN_^Z#4Uhjx?FGeiDu zp8jC7>8D@&kKYq`<uT9s#9#JT@0k<rCw;%P;>~;RgZUSp|9Pwa<6g_7f1drS0^igt zC%T2!d4sCle{DaG{^*%=>b^toseeVF8qn$>|FsprzB9D!e(+juNx#N5e%mn6{;3HQ zp6gqbt!pXR=Q#f{Ki58f#rsc>ezF&EQa-s?D)jG~rUK9ytU1@d856$uZ~SY*xi4gK zmi^f#ef1~*1V76+6$qSMZMy2)-A9YgzqIc7!8&Ch>%1A?FMrJtty$_eb>Gz{`DKAq z!Np?S(!i<rqd3x~zgX73W{LN;nDgfGk8N^?4ywp6418MO3>q(=@uT&Ka-YyQ{^kOf zlkV9e-}piEDeeOMJ1UM$JoN9PK%eSQjowrL3_%$%;*q%U{u{!d>ki1NJ6X(pl5C>& zTOG76Wpd~J$v<pmpB7uS7<<}9EzbI%4jNcBmi@Yax$?iwC-;9_^5y-@&dU9X{lzkG z`zx>6U%&Wo?w_Am_P=qpS+wK+)yGO4(<kf+Sp4aJx8fbp*yePOed3Dm|0n(4D{|;5 zs2sj}J{9DIqJ#V@U%I};Gd|P;6~Zs~3mxhOwZ^7CsBO7ppZLFE>x0v#tNuNdIv6f= z>fh@qj_Z^6L@i!*AGFP^_PX>X{pbAVU7uE7T=C|9$_jhS`W;jMFdr+-u5(!NY<s!D z{@usr_RmQFyE~(%x$xet{R$z!zE>nYm-qYoyW{y^&THv%7F+A5W<8K!_V-{dsEgTb zE62QV!jrq8Hdf3B$(Evjzgb$AgKCti?<a$1Oqa9h2lW2;XXbzDbF2T0;L(3x{ppG} z{-1Puwf>$zc-^Pj?)d*b4>ohA{;p>{<gKEAWyPEQ9v3aY-UJOExt{o({Kh`M?Ss}y zZPQiX{&#iT-L9YdL-mOAH{qA{!iR3Fyk8%<^uI2LJ*XjZyGh<5LhH?b=7+YEre}tH zyWjeu6V!TC|54;*S^vYj<-2Fx(!iVl*<1K|f93qIJs6%H^6zJ(WBfOH`K~WlGeUmJ zOMX)S-S6-6^J-Se*WW82xC?yx(fjr_H%I)$njW{M|Ce^#9sfV|!EwQN4&OHZ{}=W_ z*mTvu-_{5HmF{@{(0?ai=l@AlD)i@{<F4~Bf8TrX|1yq$?ho$=n`-^Gx4b3)c}f4A ztNQ}&e3hrihY5Z3_LMjDf3DB{>&%*xN#C!W_?W(Q=ZoS$FZ=$rf1P=L$v@s}kzxOR zPCRxF<NJ8W-st?V%0>TuOh2?<`7iJAhjHGF&vSKV7^i+!uIzKmi;t{T6p{RLv(EnD z^Q@4km+vpo|8{-C=1bdqF1f7u^j@`YMy~(IHSdMbi>FEd2s-|`-*4W#EHzzqxrx`O zXH?&Kc6R<>hWW2O+Gc3}kb3mmv&|y#gK`J|1fGrCAGizOcQ864*(C4&hij7JIpIGn zkHRPM6z+PUE-0@e`KaQczv4fKNs8x0|CBrmpUAV(<-_KVe3i(>%KvsAF`vj&n11lQ z^1hiVXZwDXE8Dpk9pP+>cc|e$871>gT)1A~B%jc~{y+DQw0pK$1b_G~D6c5_h~waU z|C%W&f$snQ9@##Lr*OuD*PZdco38Txk97PaHA%6GwO-+4wr86~^atM~>y;%RSsdIh zuzy}k$I+&Kf&Gms9h+J9&-&5q*=7;);dRG-52GWoEcFH-+b6scaR1XTRIhPT;5o-X zjz|2;l8+(|%Det~sA7Fb@c+gm@{UGFbPmpU_%l((*+=Zp$s_;!QaYMh>!m)rPvqIS z{=s>be;Jcx-@d3nr}j@`lHxbvKk}XS(^5KWS?cXR9-qilxZr`l(!YvHiqp9N1wHat zxXH=)*Iuw*>7;-*YrX16^@%(i-9B6ws5d(4S2pGS*CX?tj9jAXAO6wczE&P-K6wwj z;&u7HwHx-mo|$#wc>V5MySmORKKbh$!Jc}TsfO!hb#}<($7`G3JA3?I{i7!DT0E%d zKCAwY+n<$7`ftR)xUczxQEKYH*dz1Zel53rv_Jeqvq_XqU+;HNfAz2Rx!iZ{9~v5; zf2wwX^r$<3T-K~zUY#^A{#;eWhh|f)zwRCO&0o$JJb7PukpIexFY^`t`CPIOo<4u+ ze{*nO-e0(0?B)EY9seyM^6LM-FZo~X{zsp)Zh>2<y*_uHf#P-kbH0VOKUOt9|5X_Z zw&=Um$MoP|=gOYE_XUj?T>3uk!QK{UmtP5gXMF8zeEwyx@)vK@RbTdc|FN91uXsy+ z#LM6954u4j`agsY6-~5@_@DY0v_|5e<`->~sF#O-zHM)kUv=?O;+iwRBr1Ad^UGEL z>pt<9`&<5ef&cE01dsmRz2>|^jpHXDr+fbo{CitG<D3d;hBltVZg#+%{FGYGhuM?F zvqJvf4mXJ{dbRoQde-~h1rs*>=WTiKVHdG@6aVY;YrtzVtw9U;{xhCtzcxSe{^UJA zi&xG64=UK-^M0Jp`Oh8F*Y|JxB>1m6Cg!h)-ON}2V;-IFUHd<0LhAC#Hj@Lc)SG>| zcoVclalYP<9H+Q?ho9+(^EcnjlkbhOziAMb_8m0H?{o0Gs*J)V{>-y!dzE_c?Ar|5 z*;lvi0lT0W_wP!9PoD2CuXyvl<YM~opH1>k8t>RsoBdOYck*04@pb-P&~ni4hEwhb z9Q<y6W&V@y6ZYqn<pR(A-^4ClZ}+j|rPALYvlUg&D?ItCeNFaD<;`T!B2<Bc>4MKV z|2J-%66^PA9;i1KeQF(Ow7KZubK!4-FWse`J@17t*81-Sn!UOrP#=GgdAjYaCx1<% zzI|t2=l0>R>8BqPW4RM|G^YPP-1?89ciP{j2YLl+rag$P-?Fey#eUkW|4fhcKODI; z|Kz>KAKab$F9;jgpSve`C}q-j1(DCs-*_76-n+iw{6~MW8oq@R@tew<45mJ5m6}@b z!?<-XXp`is2i1aJ|7WlzvYq^$74o)zSGV2m`Hp{Fk0@82wCj0&vzX=m<&2LnZWpuK zyD0bnziG|fU#742e^<os=~Mqz3Ot)!!=QM6|As$?z3reL-e=H4y65o``*u6tXnwL( zD)i@jzJ~(McDL_4e@Ja{ZvD$DAU3gPhFfaABFlcq`ET`={t5Nl{&$_DcB<Z=qk3}9 zF1OJA)u7sbZ|D9gKfJf@OReW@`Ri%ty!ci8G*B<)uk6p{+Gl@5>NMuB3|v}o`EmNh zzo%^spKrg(D-bpb)L^_XDliKa{9d5N(f_*tiMMR%dLk+n`i~zJxvP0Tc7N7<67o;W zbk(1B7W<wF-`Nf76FCAWUC#>n+3ygMf8qI$#ZB^l7H&`Wiyo4i)PHrwr~RNsy6X*( z*oS?1?fUOnX2>^li(B%a*VK0`{%ig7@QV7Kb1Iys?pIcnas9;DvZ?;3Y|Ca)^`~)= zUunwU)1U@U<x00u`{NE4rx%?6)-PH!({1X%#|m>CJ{9$zs_z3ehtxUtP1-Q)&Eq?d zQx0Cw3i<n6vq|3Z#P{-oKlY-BGTG)mw)cI}e`&?5|0T{pJANC2hrP}(`}JS=V|~#T z`!(j9&MW_9aEknIaQ{plXyg2O;Xew!tNtb0O{!G{HDkZ>f1dcJ9poyfgVm<1zQnUU z6auwwJ{xC<-wX#$bgMRf&kXs>{<rX3D%-rT`oh0drLO*YTLjws%4#`vzoOLC|8bf> zjGQd@#W6p$n#6y3#i{R69Q+brEdRY`iFdVVdh_^4xowNIhh5NOulw<!wl!~){Mx{) z_s<ICss5DcUG*=ov7p~^{@eRnKQ>C~*3Q}eU-Zyi75U|XSKsFf<e7iS`CqosK5p@< z`_?=kz5iPCzLeMhQSI{c&4R$K|EqbwZg0L&@9^U|ORrb`<b}1q0>AjBZ*6}fzx3bZ z^GAfW{#P>{3I;V+e%_zFV1D+6^xyuRbq#J$<?EY2@SN;6(fVHvibi|qKcYwC7k<_K zUk7Ro$*%~!S$`3<+FRwv!Ir}<f5R2`_<hpqJ@pUT9lS1Zjq7*5V@3Ou!=_rl^FbZj z@{awJK9w(3e^yug&0e9#p=iBZ=>GT3b*mibzpYpJk#wji@&9}QJEh82x77d6kcN|c z(|VOTN~fMDbIhMmv&t>h?mwv8I$xk(^kc_WrN8kGKf0cnN`?N~-||5o)RXr5u(f4V z{gJ<y^F8g{7H8eR4=NJ#c|V^1`Lf>S-?6NaZ~M!q*neL0U-_#3spFX;Pk&E-P_FRg z^G}iATAqGJC)Kl_{3xCj16mf|`_cYdy4}=2(oe0ko_u+_M6llUr81w$%Vx^}Ke3bS znISJ<KU{SFW4h%pkh<x=!X=K|GU@)7Zq!!zr_^t2pD^!h^~HZor>e6<e!lkovo+;^ zl>5J5+;tn==G}kBBT%!^?cV+qjr$DPkI#LrQGdNM=~utZiR`}VPndSrJ~@zI>?Zxi zvOez7`t6r<ABs$@o6-H0NAYJ!uhxH6y<a)?93Sfy<t9F_pJB)23>xBGDqoubI@5w* z^pAkk#`-zTwY7exC)=|^{)K|JAFSs6*!@$sNUQ#^iPmprnWyJ%UiUBiwYTxlbGG*S zKJ|Hjn=7x)clcM#{PQ_4-~Txte|l5oH?G(C4_fV1Y2Ul*&qBRoF-h=7#P|Lh*VHX9 zE1XgInb3R6?j8TTybI~SjalBSiu`uBG*&#L_LHYq>p!TT_?Po2AGEsld~sRh2JMsX zSs`DoLBpNzU!9PDZM@%ls{ASU%#d&23qVn_zvGqo)5WG*e~<S4jeQnbpMU({rpfoG ze_NlgCO7f6{x@Fl&i$<wE`@c|HuD@Rnv^co^?9?*{^OIYS2)gp9Iy8yr}xzUR|+hk z;n|<zwlDHcUTpr`@SvEpn)5ffjN9&(TF=_j0b1%UQX}uQ{=<5OmQc{h?4R!rphX8> zA5>eC{;MsQbm9gN%yNLrQ!(d%NB#&{hSrHnh5lN6<h~bVTz1Y@0X-E^UwGeZmiPr1 zA1$0ybj{hK>q%=%ja|zxi?*Ua%qCjD*_|yeEja)4w#E;oLrH=A+8r!<p4j!Ss^JHX zgSSgQn*R9qM5TIFsi}YOOP+FnC9nD;s5h&wkcZ{Y{9oEHmAk&CpDPsbQ>d)(UG=B0 z{X;cqw{_D4c7aXxi~i5&c$hM2dUnXa;z^*sV&sRZEqm&FzZOfi7<<I64xD=bC8$fr z<NWW)FFwoFfAW<7tA#xNF5mh5Q~JEG=NJFlc{WeHN9+G{>s$T7|D7J?tIKWNu5sU6 zF~;u`XuR|^s2F;B<i6t{*?BX**7B|4E?TGd6V!nQO{D(Mdh}l9pP&Dk``^zt{!BT? z3+^2KKk7RF?R|$ou}AJd?R;CmVE?JgHqbCv{e7(;OueiAGuEG|Yyb`5{crqrYG?Bk zP!I*&v-}RK0n0h|bzIOs#r|n_vH8hvQ?38|Ktr7Ob35X{`G4>H^V3A@_jl=2?yu|> zeke+X{{O7Na_9c8*<ap&J2FTAxed?5K<4w`<W>Jxuc+e;{axKu(Ko;HT7B20^8UBt zJ*W2nd-g$o`9I?$_r3q@<@;a7ctld={Ph*D{<|I&&j|U~`aAwTXz2CV_0s}zs^F1V zZP2Q!;$QKiHG+!w^N)Nw{&%yvhn>sfRsXMpMiit$3*?21wCa~iP5oQW^HllkebJho zZcpRu+3k4u-E;r-o%8>pPY3^Qt)B!M&#RN4U~T!;@?Sj{Xz2C7Gl%@-J^S5K|0{Fc z2XzjQH_1DAJWc+(|9{g5&6B51wEq7+0@~f8^@Gdl-v1-N{xcm4SCL;Ac=h~rP@HNz z|7+v^7adrqY_jT0z50*9mOcAfzs~u*_d)rU72m@DY5zFc672HxFT+FiN&Z(?eEPn) z+iv-P_2zn?t2RZ`{@;DS@i)8EyZJ@I9qFLmwwF)r51hAr;%RmByBGgkd^PT<Z}`D( zWB4~%Z%u2_VwLmPPyCxXTloi5?;ZQ6O=s`?Q_)uu`5UZv>|hytM##5nrx)25o_~4H zy{{wS%>H6U-JN?q-d#TNb$axRMd!a&OFk0+oc<)_pO=Z&@4ujM`pvyBMESe_&I!xz zG(UK)cIp0;&YAz8@HIV9t<-m#cmLoo%W{L3xjesQ_J@C{1?_j$yOziau7{Z`PtHxb zkp5e>>3K=lZ_b?`EVuVOSt>QP_QxD+&}7hQmh)v5b^W>Qw|w$cPiC90`W6UUHlfXW z-Xd&@{jC*>KP`G!{R3@KsOwd%fAmMlGPLfo>8daND*qfW)dx(`e^$HZ!D*AC|I@Ag zK8UvLv7f~yb7bo7=Emn=-YR@)&kFfD|G@|TXOZ=j4%^TD<M-r0zu^A~>d*cqy))r3 z_J~^%`15=T$7-HmIrVK1sxw2rS_>b_ne_cy#?AZuJ0b<jOkZsNdlNJsIrY5^M=`I> z>+_<&YE7d)>a*shgPIDWmQ(lFNlpEKM*I(hQ(@hN-Rv!`D&Mn0p6+Hi#MNwfe1E`) zqb*6b^LKL`nx~?FeZ{5iH$Za$nm@dHSN;3exIrFN)_>iu-(m%7Hu`@!Y!dbB#<uAW z5pJKfdRNtL?1OC>TpM`xJ!9LCrT>haf30SXS3kAfZE@E8uWi33|Gm%kP=2e_)PG*i zzlA<qKUwpQ`?X1So#TpU=8BIh|0K`*%D?EN;L}Q}sr4<k8$XLLw|lQ|=VYUFe*eY) z*Fa|m{gVp)cMVi(ew}yYZ}PQtxz8Hk*U$a4aEtvvjgS4WJ{|r0`Hpf&eNTnU#`<~H zA}z@t^E@@aoiFZhE12&%|FON>hnrHNzwN<CUtC;q>wlrZJJ2qb$E@?cHGaPb&viQW zp8D4*kOvZ;%yPdw;GDjHTY=U|P*U`7ESTvy|LuIOA4*Q|<Tw8DZ!Tav+0FU$5A*Y~ z<<1tj7o7igUI0`%)}6KmZIFpu7Wngjq*86r{I~z_3G9DzUhJ1>OQ_O6@Pg5+QlWpI zgBs4CL0e>_ZXEx6vK!o@s22x$u$%X*x!Z^7oc|?O2QK|z^hjR4*2V7skzad3i>KZ% z4}2N_bkX^b@wz`4TbNJUojboy_)kJ_R$bZN2i=@E_iy;~kLjV?r0E$UPs^J@YeU`K ze<#&G%U}5Ix5ZEKg{S_nZPHg3`M$m=A2b!Z+GN$2yP%fF{g*G|Bj*3Cmiaq-^8Wr` z=hZvheHMRt%E<ru+@8~(_hJ{nl9v;yVO#h{K5@_K+LkAlQd8}E+;{p*ezC0W2M_=M zkndsN**|%Y!(y%d$3Z3h<F+5E|9?(75x>wa^?!cT`?Y~<{pU9}{7&|tRO=#FZ}9)T zV@2bWNU6}DHvA7`LBs#7(BXf<L#M&R|IfWaWl}0=`2Uam?dRE`B);|hb<lFuIrUHW zF+S9t#D8VQsqem^-8|84pCmPYl&}0VU+KSE$miAHJD>kbp7-^?=hyB}C5L>x?BDIJ z(SVHqv;7nL@ypyxUg>WAhG+Wo1^%0S^tb-=*q9@Jf{pj$PyOc|_qT%<e6>E<%(=9_ z2Gni-er3g<$J*kx+x~BTz|FC=zDE6roz&F&KcK0IrS*T<57m3x1uXWu{~a{=_n!+i z{=ekC`a#eX{`bufPIEl{m1+FJQ$>E&#LMljsaKYNS-9@eY7X}oU!E@IsGH*E7azCk z!Eph<3olPM@3UEN4QeZXn>zg+XsR;r!}`vq_m2O5^L#vCk#x^~E_-d>J&#H0nJNFz zo)!j8`%J9+F(=&NQ%$ed-=84+nGT9)J^411ec!D1r~h<bDqs4=eLG(6M^>CYc=*44 zr%&8W$N7)ntN)nS(yCN%z<y3!sZzi9R6QH0MXPl1yW*3t(!b6p9OS>S;?HsIAB`<> z{aN*u2I{A@6)QKoh5oYxjsJHptm$HncYFF@<|n`6_w$v`kN{u3qHezW-{+;jHq@V8 zUHD^paJ|Y$eS!Z?hwB&mK8f}C1e$?4&Se*^{Qmv(-e!Z|CzdTS|5w<{9b$nDw=*Pm zInKXq@AzRa=gzu|`xmTz=Bor6Z?CroWf{-5AFltqpyTZ!pz-$1CiyjiThB`hB=AoC zqV!U^>u3Bu9gbqqJoaP$E6MkAIM_k^$t;`RJ8OLV{^^<1jn*e|y{qcV+BV!<aQ<7l zV2z>TeE#I$bJTwX^{%RYr}d-ADXu>0-*e|1bDvz53jM!vcDLQ~{PIWfi@xlA(pgzw zbx-MFcvi^EXq_L4QlUTJawg_a3eOCAx?Q{le8R!KruAwv?=JqmY$xzd`6oxO*8kri zm;ddkpILDv@X$X-fj=tpYXfh_KU;ME+utMmoopU?B-%41vYrIBSEWH&hwD+i>c3F` zGyfd#X>s_f$S)4OnGfnI`yScv_9wgVlO=~!%ag^XtG>yXT}=Ni=>B*AvyOVxpVzae z{JU;r_*=d*8$8+`|32ft-@k-c@p0;Mfp7LdmF0R^02%=LS1r-9ndeu||AK?xm7e@H z&)M(p@Iw|<(0wgl(rtJ9|J(=cLRGH6`Wp*mPJ%|H<hdW3G~3;__xoVy^ltu!dW*OZ zPo+Zt7c@Q4=1l!xs?;*sGY(YtdxBEmWZswS#r|Y2s>w3Z`n_EGmH(Uf%IQDZ*95Qq z$+&RV{6CEq;Ia1N%$nxXHCz9wg#3D54IXRf?tK1L^|dkooLluCrXQwX{&z0=h;rB8 zxqGw~YJ5MvlbTu|qxpl!$<ls5*CA6-BkR=nEKtrjZPLH8;@JP!3J0XjU*=wN7kT}7 z5BU7FNU6|Y`3)Z?I?jK*Kk&oNmQ8=}vpf_7g}}G`wh!Aty<VjsaV;hLZ@;q7Z!M69 zjJAi1*KVtq{`g*?|AzmP|9TwXC+ykpHuc|b#XX?D$aju9hQyT{z=x^DEdwtL5e7{} z?0;~Y^XZ?5j2!%v_INGc)c<>OKd1xW+_e7Mia(zfoA<r3mlJ%s`r?W&@}^JxzsdV| zd|G{V#jEe02m2MCe3ZT|zGnO9d7vJ-*MCXz+P?ph2m6)pG`>mx|F`LZdREBa@7+!F zU3N@%|E=G1yK?=6nl86cJN?}+ihso!{<tr4aKGN4>Q!#3|9RbiC(rwOf7!R*PnlAo zKleKS*}bHHhWe-P{2cNV_AGZ3{r_9<m&|{5@M!!0j$hlq+m!wHS#hl0zw`OOiIvy> z$9$Q;lI>sitN;J~{@k}U{QbFdhy8c?NzXGv-g19`UI$u!@}I*le6iO2_q@M~>YuQC z-M829ZPEHayVL%7^859M{=ZJF{C@eF#1E0<zl-PEObxxnenk1)!t)0AU(VcF`FZ(` z{5lV#BQ*z~3;h>7DR7+AZvKyc&u<&u*Z-gR-u2IZk2VX}54D~DTT<p*{9rs%?`3o( zuu0zKPrAzQGY7?m|686E*vw+z@<ZRFZHCT|qDT8xZcgv}B<b}hT;=zviT|@6?N_^b zo$vSI&i`#G_bZa_{l6ys=~6Mz$!dY3Ux|P33;#Owho9$H%>QJT`OYVPvm5ZgvK0IA z-Sb|w^7j6Dk6G@wPxxm4;qN-z<J@%<+}_n!y;G>rPi(y~U*pF@DP6f^7w1`X?dvMA z`1s(q?ZWeKEpHwu{-@6US5Ru_-*0z3KP)!+^k<Fwm#sf9JXfiGz45mBq8ahu=I}j~ zm{fj!#i{(Z2gW8*HHHPoif{Zr`8aK?zg8^PVyW_eY2eNIyovi9=YO_$2QOeNJik+* zOtG@lE!55$G`tZD8X`-667sJtBjj7T@s$26_hUbRmSE{LFl3)t^4{aW^+mf4HDZo8 zCO^3;75Y=RZNtR{=RdyJ{2}9HSpROPcuOs)8F}-*^dWE?&i%t)j>@{GubcH-R8{T= zF3yVo4QhI*9{E4J;)v#<e?}aqJ?%mlZ+Z_J20PvPpZ{aW(nEF3EmJ}3H{PrV?Yh@y zjdwipI$P&{sK6|bxV3>(>y=x?n(c1q3)S?xJ)M7+t=90rtKZV~VT(`QcWjb()c7{N z%1v>N+Ruz$t$$&l6DhYI-XAglXX%su8lVC${{4sgXOZ>FTlHr=kN7LEcs{;L&d+AM z|Fg*d9vAC^dH)z*+5c~Ph081ZwIAPCaHvnRnLOe8af^R*86Gl$$|gt#pU3i01eC%5 z6&tmD1{HB42fr(ce1Bd&kLzK{B>rnF-pprvC<9U-`yuX-QJ`JAgGKj~r&6JR=e=BX z{@Zz@Bk_7aie3I`nP~m4H<;2Nv0qs{+<wyjhFAaD9|>M|{ioMfpn1}m<L4i)*Z+k$ zwuAEc(x&rDXN12NOSafg+_T&*)PBeQl3vI8Z~uFK_}NnH`s+W>L$68SFRwWDo(oj8 zELE)ASl<|PezwQG_{FL6$J?@5?Hv}+vX5ndSjBw)+j{X|u2Q<cy&HdbKiJH2{+GGr zEB8;^1OEQ^_|w0rZsQ;DCg#l?m9_0(>#bX!^Zv^D&v)>-&^M89?^_DYPjYiq{$qW5 z<Fg*edC&<NcR}s0pVw^#-YHkg_nzASuJuC?sN7Tkv9G0OU)$s3e+A4Y)^xa;{<8t? zRWj$?*Arl4fBADFNB^WfVT(8Y?*Pp`hI~-wC>QuPzu|+(N%f47w~swREukq3{~Y<t z_vFzl|4-*7|G0lTKe_&&i_M}r|M#;ztOh0cSKm_)rVDiay*qEcLq+eCNU5p+RtwxS zeo_1@PPk^9+tz&*vWIS~oL7AEk^k?1UXJ{Udjb|~{Wou|U3vcFe(>_}?Yu9izn=Wv z<>!}6D<1vd{or>-$mjZq-CtXFx?Vb;@;}}G%^%3H-Zr<;eezB}?kqU}^0&ta%a+S6 z|Lb@j3QzLCzT(n<$QB^Qe=nQ<&-t`{=AZt6v-|g{%{$#*dF_ALl=xMR|L=Xvzca~U zXKT?v*0&3vpI14rGUc=WhS~FzFQosr2W_W3w_m~br>Bbkl@ni^qji5qLbm|9o_Jmy zVE<F$guh~CtJ}N%pLT<?k;p-Q)iu|iPVQH1eqt)M^WW#)pghdu{LkfoXH3jbFT3_v z`kfUn7ww-Oj+px2?Bwq3kf*ctfAI9)sej@e`J5lL1L4N}6Yb}J?gcH&*u+2ob2rbg zIsfi8rCZnRYfk01n|r_i$zRh|pWeQP9{2G4^of;!KEAK0=YIC`=LgIC&o$&%+IxIx z<~;5C>!O?CNo|u=U#eYyde?4?&*_N&WVg^hMEQIFPXqB2?S=}LGrtHP{V|z8xvY-$ z<YtpqznXV^dJY;x<~o=z-1Tj4f2EAuC#T+1c1uj_=YWpd6|T`g<SBP|-$vf+6KXcO zT?OyWujBoAf&amtb57s#*X*At;5K>Bbhps@#h~^~hWo#W`9BLo>h7MX=M4RITzJ0I z)A@^DUq5C4uHR4Xr$Mh*{iJTY<MxpsuC|!$Km2*~pOsDW3okypSiX$2PUK<4L_3Mo zpVBAQ%yA2?GX|}&F_!&z{MVWDivRso<qX|_+_&NQ>^X0B;7|Em6&Dwr|Mr~Q&VTWy z{n9PA9`}M5Z`yCo0-D))ulS>;caPoac!tD<jp=_|o%TB{UiII#2~_;v=RS0gZQk4W zx?ifZL%w|%tcmYE^-qYyo7d)cyw;cBnIZo+?qB#P<v(A{Kd(vOub+5*|IgDVd50HY zUwn&YS9JK4)VpWj+4bcYpZ{QPIxqa|%zBZ3k1ww{rSDNA^>TUVujAh?tNd{4UG>+L zd*61qtN+^-VmLpQTyhur9sHBsv13Bb2DhjC6FH_!eX*<;1kDBfQ`V}O?>6;c80hrR zf4r~LO<T6AKvsBwnmkdDc7slr`+Mb2Gi&^+z@_<%ADre){l(W<AaSxiGvuZ970^yX ziI0*~_VM_i`7QmaUj2truNG+ccGHCK$2b0!<$Wl@eEy@n@|V@7tG>v4*QhPkzr6VT zdxKhauDTU&Q};~<O&`Q8d7r|uT%yA7zNS-si`&$F!JY3NU%r0WS@}=(zYn-~Q$Fp% zX%21I-@k2JiaqQ?7I*#60WHY0Jdz&xYtxqch?my>AFfJ;{yHaKqx(=|qTL<)y&X@I zO;`Q<>;&?NYu~rCzs|&a{bgS_^RvmPU&jB>A1VHS*yeS-=U?Gd)mb4=%SAt0rpO0= ztG~{<FJQ6O{MW4aqZhyW|BvZm<b>yw?3B*G-&nsJv>r}=N#NIdb4SqX-JiQ7KQwbL z{eM>pG@|z_U$jQ@A;-jh`<-^oeWGl->dRfWhjE||XW7AiQ2Y1I{&x)p;-Hf4U-5F# zCZp2=`)}Ag`#sHH<QDq>yWo8Hr|l6sr`|gr1a+&wPk7+X3EI+b%kwaBQg~L#&uY+l zQ~y^i{uep_r}~NgRg?aIE7{V&yfgiO%Dk`hRsX;Be7ksghWw0u&uun-4t^FXZ;}14 zJ6A1qao7LQN0qfFK!<m%mCrnPV#SyHUyi)fxA=O0Tjf6Ug<oc}``ulC!tld^lfShK z|FC~Mo-%85l*YUJPyT0re&(OhH^(RU-l3?2^=>wAC8I0?Kg0|97l(0sgHD7nQQun7 z_29p+%~?y`DSzramm7<7AN{-J&-{+%#-iM;@edT|{nFvy%yPfC;?-syAF&##k0#4E z2TX}~WcwKRXz#okzr9%_j|9)&5^(Fh>bzez+(-W|W$IYHV8Rny4$Hp=)5INW#beSh zEdS*md-S=$r(dkkf>=N7d=NG1`?V8)lO6LxoydRkzaBQ(HOViT_<MQNzNYU&VH|(| zfv2z++G|QE{Lnh|P|ozfX2UN%iHrx9|Cw9=arEA?7vT~5qtR>gPt;)+cS4V^+k8J& zk>Aa%5$(Jx@7D!Rjqe0CqHKORF-~*TJ!#B&^j`wwG)K#m)tMpR7V_(_Fndw_?=<WE z*%OY3&yW{c(7RAY|Kf^M%P)b>sxdvHfA08%;Gfcq0&lJdt!iBln)VB|517un!Od6B z>6f#O;d61;fa$Es9`n`)PQ9PO;SE|NE^+X=K-b@$Ofz1K_NZ4bbW5$5X#vmG?g6cp z|Lx6c5Uw%9<CCoEs&A$TUFW~`SJ^kE;>gZJ|NI1&O{z)nJ@ronG@m^6htVTJ@7BLF z1=2v1>YMCA<Iv~DYFHK5pWjfUxR&)ZxFPjlPoT{B#pb`2P3teN_){F-ywAek0osy! z2bzI=EIjSJ6Gt~_#Z?#RAcW)lZ#;}&bN<ggXjAI`@rVD<Z2l*d6~7~W-l~bu%~?-( zJpXpm=C!`~Tl1?2%me;MIod4Ru|G%vG!HA;^5~z}!A1c;&@f_X(|M&QAEo~;7IZQ` z$!((bKeMS|ljHoi=G^-xfHrvUSL9%yShK|Ksk|;|Y)0XccBlIr{Y&?`5_v)W$CvTE z56eO4k-2?vZCQHgUlhk{Pf#x@p8cUgv)%1@eNg9me)8WW`F#_gm`Y8pmwU75{5Nx{ zN7LVaHki0Ss`u2thi#u$ivHR!{M0^X@v8lcJLJ87IotmFt1@FhcyhK;D)i6s-7kv& zs9XH$|2otD=EMJf|3b3j4|lk~(R=lsha-KWjq~DF_l*@}(k`U`PUp0n956>-<d57T zOO^9iSG<|e`%nqg{B!?M*<$nW(Vb`fP4AaZyuO{a9yD=NXctwW*Yer(Ui{)!^FM=X zn&;A&^lx8xT~x!C5%NvnY|8o__HA=Q>rI{+uKM?#>rv&uQ=kn|&$e5#$?cf&wR!UX zbN^=e<X$>tDYv(7=gDWmZ%lo=o?731)qEj0>hhYD+p$%99{uo)GTEYaL1v@2XhifZ zyV~us<#R3TC;rU7b*Q#%?zY=Dzpf?UI}_Q>H)B`9!#g)WdrlFGxGl8o{M~fjdG@sz z@7$g7IxH^GPrf+En*GeJ+=J_apX-L$uh0pXH=k0j;TrvEYw%9ZCn~|q_-5FZ-rMtI zPVPdloJlT?C*)6_zk6!+Pj$)9;_s^te7XBfKPKf*?9`JX)>d!b<~xWPd!{~olsV_+ z%<7K({XUNAIx$-m)E?)tiu~Wrccs&4sza^T-M6e)x2^lAe)p95w&gGH-P=~z9(MH` zztKXcWK~(+cYL>BCosP+Xuo}R?y}2*Jv-kwExWk2?%q59ZAlBQy$klUSp8c%*C+qe zoyd<ze|z`TpEUk{qiNwA@tJ9V4)LzoyX|72`~RhHa;CD)_gMYrz=nq_cD1<o#ixJD z$ouh8^=e*nd9JPVnZw_weXX6VbyN3sUY&4jj)?mCc{^GE-kbL2Ro|+4R`thDti3o< z-GcFEmuSL=EqX8Nc3-Hs+Eeu6kYa-Oom}blH}ziY+{!y3Y_(&b|DNWXLi=x4eZBkD zyEA_A%G|j(ec8*)wh3Cl^}lsnKK#p`y3^wE(q{s5dQ-3HU+&FWyzl?&vv+nU*xgz< zr#z+i!m&vYuScuoUrZ^SeOKz%q>bs)(Nppl>+Z>x%0JZne8RWWiU((GyZGt9X!VW% zTNk~yy8kn@tmXgnZ}HoEk2<icpV)tA(p&N9**j(DoSn11;F(!e^zDk)oTW#vh3#_N zc=lfWi$`_WUR;e{nfs?IS~|9L!!FgY*Dsp=IKAU)erEEj#q4K~-Op7%x>Hx|q5dYz z>#A=5{>#RdUAbHT^Yiv2?=@8I_Wvp^*WT8+YsIau#Yfjy?OoU%)-F3^(jOyc=jH2e z|4o{nv#tK`+1j_aR?paf!1r|g|7Xw4s-?c#+X%jXlzcfpz4nj&o%;V${Tp(m+1>U( za54BOeCPg)%lx;w6RH_=)-v6YI=?k1I5x?e|KOiv-&Xh9|1@=*8vpjp`8hJq&YAa9 z&+eAzoawb^V~%k3RM}sFN`J$hCZ8*-eXu<^EqY7#_O)-el!kKt+cr=C)~V!I`Fq~& z`f<;Hk??$7t24iP*B91*of-0czWKdJ&zrYz%sjE}Qu6;p>Q%?0UWCQ{(GK-kQ?c4V za(h9}kNQV?b3gLC{|SD6KI8a<Z4U!(zv=t_|5&!Mm1RlZ>~_xm7goD$oA~$b+xYGE zcmI_}|NCXX-Q&h3j`~LVoVPZAUwyOMU~rpF|7YpZqnH1yTTlFNuU&roe5v?6el6?$ zy+{9U3$4(5ExGt7-=6*jf8QK`s`~Lu&cR28t7WDCGUeU9Xz?%oZoTx{>G5A2*W54Y z-Tw8<2Qjnn_n#;}6+4^1ZDVrF{c8*FirGYM;!XWxUh=wp^%;q63m5rcIeyDx;xAwO zE7MP`o!K|1JMVGw4gLR*X0Hv3-v8$3ne|_HuiZHBAMah|Tig1!)ve{LzrAbvm(wds zzNLNH_F>nOZ<DUMicjB`_A<}@?VW#L>tDXke?LdJ7<Bd0Hu){N!QZyYZ}}T^+vmSM z|1F^vnqO!2uKnX4v#pb>Z??wKbLZ*~E`7bN`t^J9I>X!F{w>co@2flOleg8LZ)@tm zO`-QKu6*3zxnt^ojnnHd+2`#}KXLooJy&s?h5NqF-*AiT`3hNihyUTPm+uw2wJql7 z^xAWUx8rx^><{>=-Lp9Q=f7ju<Z7%;jQ*Kvm1f6E{mgyxt$z9G8+Dpmg8%>38!syP zx~t%KQ2y<xSARE||Jn98^0wIT^!EP`W^Zh$-`V+nTfvPzuG%Nc+NZpouD3nm&Aqyp zMv2O|^<&E}9KW@rWM^&PkM5oCzj?RI{yq84yZtS%)a{7&?YX%;`TI+5cwWC<_p;#j z-(TACUbnTb&)=0WX=CW$dg-^nwlxahT=&XIDEH3o2X4pyA38fV{u5v1@=w<$>dw#I z%vzQey;OT!#GU(Buiq?Z&09Kmy56jqKkx0%{PEU5Tpn#u^!khF?H3ily!TWs(th@K ze}HD*T>I3!7w_*p!|<*6^=7Nj>I}QTxLwYF?jM}H)?Q=p)i*iS@4ws&oAXS3--5fW zyQAj*+<Y@SeRKA2r+OIrU!U-MC-=Hp`4@{)epm0@82@dF%HiuO|2$1Lm~qWufA@py z<g+Ou`E%=EOcZdNUXi}lEdST%W!}#B#OiOn=Uv0A$KSU1>%jtrT`!jv7>Imio3&@Q z9^ZPtR_3_+C3+HT9$s3*ZEDW`YSF@img>i{t6xrTZ|`lp_H0*%!4;qTleK;vj`|mH zQr;|JR$8Zt>=mgGPF_wA)9jZWW)J+eXM&o8_A`eger0p_-+P~XuOwL1pjYvSSl5KD zGgad*<Z`gjTFj{5vG?pkwF|4-&$RGo@vdX@ToL+g`zdKolk4q!_N89EYIl2=k=arf z<<1J}rnCRt@(;YWj`(wIS(AYO4$T1h79-|t(|a=~yqQ*T;CZh@o5p(UsRio{T<bjC z7tg)^>%c39Bl6#x+?)$?Pk3!K-fWcrwb4UXMZB1OCRd`=0s|$*`~`x%vM;`GGwZyw z@=T@X%@5T^VUbFkRA2ni**M*O_8o1zmFFTKpIKtcHY?mEeAmT~eGd!&H9hu{dYH0m zPScL~9g@D8JZ_8fGGB!)m#q*weW+3Fy3LMsIoo5ei@o!utmZC@^=|m;B3km`_=DhR zUGcd5=$#+Ds$M@i<f)Qd@>4aruG@ZB(UVUPx_&l#m;~7SU(Z+HwNk|7kx#x?NvwB_ z=dz!(7S7x?&9iO)#*NDqZ%A}lhz5)4M%Y}|-M%V#PTZqdksQuQ*>DY>w|DQe<l42& zRr)4f_T-*#c-7mw6w?z6XD$xDy)i7Lia8}Ks`EO#?IFhAe;!wYHd>3G*7)+L@j;Y* znV`gU3D!6AH)CCT7b-mBHeGyDer<H*WB&C8pBK+)Dw!5hb@x=j2EBcIZWWz2TdffM zeAnfB&lYZ)9r!4gLz(^h((+3x`eF0MUoo|7M<xVpsA^f6o!i6YbbcLsqnzrujOg{d zuUP0CPRW|1{Pud@^6ght&7HmWytprHu-3rm%Fo$NXSJPQBv~oX+43ZzdGnpyFHa`l z>WlVN_n-A-)|(w_=X)935?`EFo3Q?OV#O-%gxv=w8fEcL-M0Hz^r3~*3Iv|BIcE2K zxxJYykF(Z$&BoHTp`{iA!L?Tf>@Pl=t-eC=hNS#C)eUneCau*myX_(=zESJWwmM$P z)zOkUYo4!(>@^l@jBJ{_uxd5)0m1uH@0cfgG^E*@Jb8WZkjb~}t+Sj=BsZQ}`(=IG z$~JG!i7UB21jTwCX#0A`^NGXG4Qsxh^WpYc9K7lLR>S29M@yc4za*(Xv&FABWVPC@ zjzedc@+wb>ol>cK&-ZvI*UgiX$p%bIvTrVBRZd#bp?!eojYwA0Szg8M@kdgw-^^a} zb3*9M?)OG_q@D@{zq<X_W1)`NL5Wn;8@}aNR&RPC*JHvyD{9f}JFzR8@A{k1ofW@A zWlqzRld|t`&v|Mr!X`E2RC0B5WW@>ToDRvDSsM-4eOoWid;WssajTHXnaX<Uk-PcZ z?|eLTCDBoVE0|&ZeeTH<Pb|w0XP4T0`fsB3#IJXh*&Z$DyRavmeRgQpCa*pJb}iVO zXILuRd9CZ)^t_4Jp5}dBFD`j(okC#$13eYlIzI1ZJN{`N4YxkBwfz-i@JF}$Scd1N zoL{X@6)tm5=VRu`lW(c;wcyk~V0}jFJcEI~tWKH9<<2DkRz~erRYmCs%j4hmM-*Rg ziAt+6o^?Rp&2na+dGxxDcclxDxz&3wS(~_G?<M*8M@L)R;{E?7&1SNyxv@&*%yRMS z*9F2n?^g+$n;n_DV%GjwH*2PU%Z`zI=RK`LEpJCI-_<J?S9`Q&ubtsCyKcJe8hh4) z9ah`ilFpuK3-jQ!3Y`=8YR$@DiPOt|$2s#$Z9WtjeAOjPMA|Cg@T~6DdqQI7@9ax| z+y6J${Pfya=1Ssz+h2%Xyv>`%eJK3)&#w{c>9X%S%g$X)V6$`H5?<Z0wLSXQ#>1j> zwo9g;HspSz6~#Ph?m^XUL9rS#d=aMwvwvTV-u`mguLoRL@7*rgTei%6(UjP~JB2^< zn;zlU{`hX2&90ZH)Q+2FH*8lq+NZtpi<Y5Y=8CGnYi({w?b@<K_le7=lcnaJZTr;f zO=M#FSIeGZUemQ^t<VbBh;0YwJWZ;eE}lL=qPus4&f%$(+`m5fII}U{d1`W{$u^~9 zGq$=%oXgiT6Z`(OI_qvxM9R+8Yg;&OHBFoSZu2z*+5BD6Ml7%18eYESv!gL<x7PKl zYSVi&GVgwqet+i1gv!>R-q*@!Z(USt7<Ycc*S;Mcx3dajI?L-$+&j{+)%nV;DI5vT z*}03@qEhAib9PDWT6m!-qq;8VeoC6smYdV29V-=`dTqVJ!_tEt^1i0+&e?k=?^Ry4 zXG34qyZo4!+sz%r*efQVSiEcRg`%Dvk3XkfE@6CJyn5G+d5PJ%9T(ffzVj{jE${LT z{{8u_R=8T@%pccgR$S(vbDUAL(Jgm_^3#;cfTpKcRF6*D_WBCz=I7_i#k#7OmdxI2 z@$ULu>xQ=-r?>2Gd3}KMUYKP59MgN1@`*CRk77l>nY*t!Dv`UF?a)89-LE(L9XMJb zzag#mUmxF(iPMfPczrVI_T|Qi_1)HYa&otK-1>fc?S<s6(eGSU@7=s``4QtDtNQKF zjt1_nzUrsB%(QG#<*~VYf37+Du<z=+YW<altB<$v8O3yJ&6v9Gi}}M4;bTj$6{zgE zb-p;bV+-eb=CCcd&Rw0D+n}q(6)gU+E<kGk8uPg|+bX-R&-88a+kXF_>b;d;4_dvr zyW#4kKCYVU>Qg?h?l?EcbBTM@p@Yvd?ij2;bt_zI<=Yz*otu7Vz1tls8zsJT%IxHv z5bgW6QEMm1XFrsR;I3ofUZ57?$Ev(hJmrU*AB&nt)jpT9w&?PdtUbYB_id<MuhR6N zf8BR$ziHNwKEDlhkqU9iT#}vb#C!T6TVze4ouawQqucj){b*CT&U5a*x_SE?d;gqy zZy#~45?Ejrb+~YH%a3Q5D=+s{sy@A^dE<Q2Q}@G+dIx=`uwUEOa_G+69;eRzrn`ie zy{P^vUAW_h`39>O`FvrO(+`}nzp*2+S9PAz(ya?sV>a9DnaCgDz97p)BA2HkeI2jf zapS0+bCb{hHJ8ncP3x{$t~bZ7d|f;LH%Gz#u)_z%=IB+XyCtw*Jn;R(8s?(?<~Ob+ zooD``u=C{Z1GlbnnkJrJ_~krP^pE_LrwSG%9zK<^CDkc6SD1&<)Zp6TGm26xIInEK zw#|*{p-1ipy@2kefx8P2Pudkwo4{OmbBEw8-laKwk+a2f@?xVOdxRf2wdC<Oxst~Z z!&dlZvmOcm&a@}ulzO%A!m6y@F%>i3Y3@+V+VuO<(Fw^0qB(JiYfmXKS2Wl*`7itF zay$QR-ovGib1Z*KpPbeIsL_e{fDYHR5<&eLd}b`KH+;$CT#@{3Zs{J2DO<$#ManHC z?v|*gh*!SmYYmk$y?6J-qa4xl=KWg@U-4GF-E{T$R_T|!Vhh&Z|N3b0DyDS-yX7~3 z>nZ4uk5O##)04_NDAMwJA={r`-hWSLuj_FNJ6KhFqfBvAnD4b8Yzu6q8}c?DT^H=N zs&u-m<u{X9w_o2*K2m$1Rj<5d(lKB2wH()4le)F9#GL<m?Cs}Xxw!1x7u}n*XRST; zV9jos$P0Hx{Z7RAbli=uc;1~GSUV;9Xm|N-%h_wQB_|4)c<wLp)r<Ld{Ks17)xK^_ zjP=Pa-l?2tPK3X0*PgIc+9C1rF)ikW=Beg+DbbN-`j3yZtywlxwZ_|A`iAP)35^;m z1<o?IEEzFMEDP*2Kdj^4+P2qVA~*Z2*K0!_|9iSi>f+qB94^<dgokvkSa~{lQ=L=V z&p#@=4jr}E5V9Az-n-_u+tfnNH{z2IOs!zMEs(W_za`t{`RQjh?N@$1@)bEg<G^Z# z2akGt8><Q)><axS%4im<>f?ItV9&;rUNNkHd5SN+=x=)Moc3t3Cu6Rh=A~rzCYSY3 zUtYdC%S<hK+04}s|15j_`TDl=)2<}#ik^GF^y~C%x9(iqdf80vS*~87Rmt9`*Jqx3 zeb_aQ`{?q8YkyDpSS{B!_k_s(NzcyZ%Ucw_j@`Qb?c0DycZ~(MRp0SAFfTrNx&*Jw z+ljaQ@8*}}iY&YF^`F*^XqG+PuXa8ZUBwx4_msokRTs+|yBFS`_kD%O8VR%5t30n2 zUq8B$@jm3;!{u&DiUPN<pZqZG22Z`nF2Az%GtZrzuqkt9Aam>e%w_k?j1Qh-mehXm zP|waiv??Gvn>X#+I-S0@nqHQiwrTPb0*}uJ82)?U(#Ti+VEeTIj=3tlZCQyEFO+Oj zUVM!2fSb0`w`;}8OAfimK4@|KUzD*iV%fe^TKYOW7Y2)zro9lWKB4utr2NLQxHxI? zcMJOF=q_(B?aQ(3d!6S|oxPFiMcYOGRfqqXZe2QY){Cg`_qH-ex4zSrmszEKX}<T% z<6E3XVkdoD!WujAlaI$wCZBIjdY&bpns#hnwRYmG91l~U$h9Tc^RKp)|C-pi_HW76 zCqnPvFwC2JyZzrcCuOd=%s!S^LKWW3c^!3hk&#T)?mX88l`7><rmAsK&TXrs!`60O zS@Y%k^((Dev#uxayt<~x%yim;_E#R>4BPkZxS=@jn%n;0r9s#4sqD0ScVcsN@4mCb z*N>*SB)k;P$>7_0&TmumM5&x0Q{IPW=XhQA$gX=FQm?F&ye+Fg)8g9cmM`YcqOHyA z_GYU83HIl$O?>)3Z(XL%u~*NsbHX<s_M0Clo@KM(ZIVy)-DlG_A584|Dr~=aO*E(O zBE4628&@)?FIeYa;<!)9E+9kMJM)_6#MfdwSFYS4T3eod_Kr-ce_B=Tie-Fh*VoNm zecozy@q4pa*)TExKaUoiUH*_K_#Myu@{>X@3h&5s72Cc#{Y5u2NIdS+or&tltYUuV z$|t7%TyrGp`;LQueOCAi7p`6QSn}PO*jexP^-3po9TV{G;XZ2b#@fBGH_7(O#Auz) zIs3}KMp$*t=i1jQ-yF;6oP9&OL*|N929L|z<I|Gdg5r#PN^Ju6M6FFLXxB;5wFt=5 zwMsbq_;|F!mJ=KOU!AzHKuB_K@q;jHhwL!6LygQz|E_kv$vH8(w3L%;d8A*WR7pbP zvmdXWWp7W@Xf*n`K78kv{CyuD`+S?Uy0=>IrSCxxl^bvVCCv9JIL_{}a@q~W0O{cS zGbX+LGBMJxv)ug4w2u9STkU1a_ejLMcpi;Ww5a@$KX=k63-2=mh3?Ou+}tN=EbbR? zP+neB=yZJd-L+wXJG=_lujmu;-2FEoI`mP7)w$<M64pVJq9f`xEy~L_-+lM7c((Et zhWk1mv&thgQ)XVjFTwZY_4S+4P7|fBFVg>}+sCq}?B#{D&E_KC+L(P8US-TTh`Ri7 zqV~b2&fQlo-?O-U?qsU8u)@p(p3&x4{d6=wzH(f6h<)z<TaDk328YJ^u;wlKz0vt` zd|%${=@#=2<gYGy8u^&vb>FKw>ugeAtlTDBm{`T|X9h=QL3V%t=P!Cow!Y)7Oh0w8 z((R3vxJs1^zsW^MzV&rKcVtZ~*1z;IZ^EtvpBhTdR-bqI*p*THx~k)z+}gr5YT3I# zB~Dh>46@ZzHNAH?N@M1a6KntJiXJI3x+TP6&bs&-V@|BahFelWUuziqS>Ik1<C>MX zw&kOM==@jd^QHZl{W*Qu(USY%&c51nJh_#w+Ae|eNA?E2-nPc#(Aulkt1LRMyB0=Y zl{@$IN60kM)n_kcO$*k!X1!q!Q}wzdlHIqrG{|$QFW7uNq1a$uO?Fb=%mY!YECa-k zI6Kd)J2Gci@J1ii*=q&0T6egw&;GEpW`mpk#_WQBS9(M5J#+Z%Rl0jV|7FYY9}fSH zUYoQ2-l=BeXtR9#W$(q^XBsYFSa$HH?!n#ZXBu^;Rc_ch@7tfX+jp-p+H%=Lx8v?y z|Fh0(%NTE_U#__IW{t6+X>Q*8Hu(#hDVgVw1hbWzc}sRxu9$OoN5`UVF_VJRXNMiX zaJh8JYNprMS`K}kc%!#kb*ub=>!qElf}ejiFBF-3b<5(q*F3grS!P=U?fdk(r1^cn zg<NcN5j*I=GxXv5H_`GUE2pndyOI7TxXCwc>Bq*Uw|>mmU9>6sR?R2#Us>*5*JU5w zS~c}E+yAPZ|MPAbf1g&Ma3N;9QO5q=hpV>t&%N~HC`-yahk2%A$Cuo)dzIJACavsk zo={|#XL9$!ftAj`?{TmS@R>ROI%;UUJnH&{*FxP^YJK(M4<~<%xb*Sa106=Ala<%+ zE>C^xusgD;_<F~(wZAqz`^CJbZ_VEqZ+G*z-RZx2_Ta}yZ8PrONIko=+hSSQ-c8E$ zRfXejxAbxS4af~%aW8J}tL=d|;x2qkypoWh$oIbQYFu1&*qXJU)~)_@?aGyqs>(x= zEA;0(T++H$)n0l1qlf<aXImfIWk{$W`lhqt(DpqS_0v=fO^)bg<g%|<_`tJ>$!V#_ zjw!o+oNsvq<n-*bsJ<n;ZI<UN)`U+Y8K17Z^4ye7@MxRb^fTC6_WuHl=(5*-2G;j} zyt$D)J^9j&#OBS9R$q{txS-~dU(DUU7~WKg`2q7b9s8BgKDRW<nr(GP0%K!w#*31L zJd+DArsPc8-hA)!UBm0|j_?J|k`15z+Hh;TNb&nk$^FsGZ<f9mDS!U(mgkZvS1I|; zp=^cr+hlIfl>0m{%t<=&)xXYHB38@Pw>jACSu*?mjP<L;wL0diU7l9Q;HLSV`^e0R z*PaSSxNO~}|5i5i&dclrx%u~xypKP&ey;ECDaTq%@4WQPN!|M0BY(fp`;f0CEi2bt zUL&}__jvxTnoY`gtxji_JQdc@*qUe)d*1u5Sx@k*MQ7i=U*`SiV~fxHy?OcB>(?sJ zUi6F2LApBYZ7!$vuHJL`Q@2jPts@`*DN}jBtgq`GvyeMSYYsF2-Z*z<wwqDSmS>+! zt**VZtFAt3T5oB$GyKu7&EHOKYVS|Glq;I*bNcmxUVHho?RVwNZZLiClCHCQpOBls ze3!YihECs|zcbbyKAHXf;)%R{d@@ti9_^RadwoODwy|m2FIoR0{`paVOMYy8ux<CX zvU$DVrs`<sKV~htRkZu0!T#CVt7W-MUu-J$X|gWjnsdW6>hb1OXYW16YxT~{??39M zFZQ%{kKTFD*_TBhTRK=5&+ts!_?r12TYSgNue-L*j^A2#Roc1K)$GU~OPh6Ep_g7o z&yI?@eD~qZC(}ZF+uu!j98<irZnx??&YRs+%=ivj+x_i~eP6Qga*yeR6SvEDbLLI5 zjEw%rcTeR0s|CNeG+*1jZtL@G&TFlA*aPq1+V=JGL-q;tkIe7SdA}>v`smeXTUV~L z$<O)DaOuIWkJ=Aftmb`NHmP+VSI>%Dw=yChY4_@U3{|UmzN-D}H_;i^zi(HhHhq0F zRr+?L^`YE%)3;n*sP;|HSoE%#?dC~>IdQT*EYr<*`Nvz=rp=YFe%JlIytC8($J`q? zo8znQsVtKBek)si?4b>7U$xEkw<0_AuGA!C8_R}9_%D0$IKlr7<5D}BKI=1obmbYl ziya>eZm_@eBwjw_+wG&lkLTWd(eJXxyvQW-c<|SQRrN0aHg-*#G3(;@9p+Wc-ww{N zn-ng?uU65wMvnXL%>MW}qPN~L8r_fI%(wgFj9`(T+>M`)AK%D+ETw=++ULiQ2%DcW zoLk#oGu><bR(!rBtbaXECWG`h=a|zA8`+(;4=gFQOR;R$l3BGT$FBB!_w`ff-`rW5 zd*VWuf}`Buj=f+1Y$%;^yYq4MLz#2T+0H%BCTE|zV33z*`20rhyqJ7@n|pN?d;Wgd z(R=tYhn(zhu|prW7A-1Q{Ia33;7GJ#(vuYzv-VxPUinCrhy5w<)*8D{ha49%dCt4{ zW$`Bk_iOFb|1{fuV!tBp_etw-<D@dV`5*gFJ?#&fZgw&{{NZe~{8j5uac{U0p1I|v zjq)@3&|@w>?ac`VTvzTW)fCK^s|@X2F_G(+{JYa`e=oe+b6WbZj1T{bbc^)p*wQcQ z;zf6wQvM}<4Zrf}yUN{jKVr_Y{D0o}?+w4LcSyTjb#UG9gZINMer(<t-dXO(@c+$> zzsK2Lt?^uSPbOr&uj$@I@%r6MRZrx1zB(a)dE>@KE_zi?_cXs1Cp~(9`DmKbR!1AR zv<e5^O==QrqhC(r4`eBHo%{6i<dUt+LZZ!Io&0ble*4vLMtjd3k8HPmHt9zwb6?HU zW$LwW53au>9>rI@_iEifNgn%e>%O%&&(@2R<+!Dv*Ov6|i0_weafLSm>n|L8<@D~h zbMy_H+iNCeRQTR_zpH=NlYbn~W+l}A+3h&#_`40FK~MMbuef~qr@g;wTg$dTXFjGs zdn8v|;_q16KKate-o@ucJntmV`F&sa)HmJ8r1#Z2{5$Md-)L*RQV^Xlk-L8B_tqDM z_Q}j!A746gtXF!^y<X0Jp2ip17Ue6HJi2)@Z(nb8LBOnsi`Dntt-kP$E5G9n$JZq3 zUB+L{BEP#A-m3gte@OM^tcPauu0`3MC0b9S)6~;vZmrwaW?8**(f@5Tvg_x+FOCs? zf56#IHlz2p{sRl!XZ5d{&RyHZC2Y+5JAQ}S#=l~{7yg*$UyRV_&3vq5SjKqo=On+Z z$6E#8o)NoUxxF#JYp&V%usa90tnR!ccHZ%BdT8{A@__A^TrS(P#u{F{b4z^bmHYc= z?6i{D8n@yC)8b^0{o8L=J>2_MuI5j+$G;QP`ewZqDZ9Nsysy*b9e>eQL;kRh+bdUV z^WOCP^YWEn{O*@$Sj^70&n}eR_j=pkNjJZFr{(@Ul>cDT%-*+gM{Y?4&wVSt$>z3x zO78v%TmL#ui!Ql+r*+NRzfMWD2eW-GBzSwSyl<9WzP>oJK49WK={K<{f0y=mWu%m< z&MWW{FE>kjFqik6!SmF$uDj3P=-r|DYr$MUKiTV(*X)nZ&!5&B_4vKa)g!k#*YdTj zm3bg5_xjB>X}$|*845Qu-QRgf;=%sxL+)=E--%1_*MAnCzv=kquRD~#>Q%2d2<urT z^jczX(3CZ4YxWmkPqJ_-yOyrrH{tT@<a;b@w>yVwTF;JT=l8uWwR-o5siB3j>9cRo z$qXwux0&~Bv1T5plJ1x1MYBGdwUy32x+Q4K*VQ%EZLiE?U8N?zSk`^;?4HE`%d)Ru zKD{pbPpM+T6V_abm!57pe;p?OKD1?X?D~5a{wdtozVa@Mt<`u}a?{V>Xxjseorep{ z|JhjPp7p9Xd9m-fa<J@nfwKAhQvB_6=Ly&U5d6<QBbg<P<&bRLylsY`UtT-L<G+84 z?lPNO^@cGq{7)`@dK+eXY<tftqjx;aRW}1Zd+kYi^?e(Qlyzyq!&@5LUa(fptvp(_ zJg$1j(zzw=Y3EO}%fBgEw&UQ@tq$9d@$9(NzFBII6A$b2t$b~7W_qmrDrXeB>0NuV zY_w{~#QdK%*Um6a*ZPsZWUp`8clki=nC~4zaUt7_YnSx?4f($Rr`4v%K6hRm_&a~G z=<dAcR~s{0elzCqpH9zO^l#g<o7r<;<ps~_ThINN?N)P?v+P`nm7Jj#Tb8Lk+ps6O zN>A?LJ;s#8Q|X7kEQx#5wqnzVt!~n*j^`f?^f15g@ty0`7Ojl94Lf`7*LCviTkxj* zR5pFPPkPVc<n>;w{#ies8}t77)4J2<3=(r!8~hE|&58|6OnfbKd&4gw@w-o7W!v4e z-TbfP@iOhTs$pkt3w@lSA+YTF*1$7;>UK=47cUG*PC3+a&EvqnThW<O?YZ&ix9*<T zys9|zyyE3^ResgSzJ0y3ZR0%Y%g3tT)z>FpU%T#P?aeFqWO63>m#QtDsCDs~dZqX4 zyWf@T&pu6(&Ru@@dH_q<@7QpQmATJOSlD$fy3Zwga))UA&H0mfN;gX8JWD(hlNaXp z@uL5aPn%_v>Smnz>#h>h9_taiB6aR3_2`rfNuM)6OfFd9c>CL*l>b5hoAl0B+Spsn z5ZUy0%JP-RV~llIiYC=NiqCpf`ZafIMc=z`GnBUQoA79T`#IOIQ(aH>+r<UH^^b5m zpXuMQVbbL{^6JSO#VXe5t&BEHW3Dsf*$|}6{-=-e>#oMQQ_uQBdN*~|-%^~q;m*IF zj{B2W32%#X4ijvjbammkavshoS-&vB_6b)NAso-J<;>sISO3kmJSDWns(FnPpVI2) zH}55cwpdMG^UhgJbAe1MXVl&4Yu>!yuxq`p_k~xCDXfOm*F3v*->~G|s?XP7h1*_R z!(+-OcFEteC@;kGv<vg%dCaMEyYFzFi3pc9V9j*uNM5fSI(O#Qr^5feO)HKC7v0%% zW8Q4nKla(ZjkDjL|2f+?><F`qnDvQ|uj^*t)qVBna`(|kZ!bSBaz6LNwocY-x1Ppp zJLf$+mskbM*eu?t8JT?d=dAT7zMf|jwn#TS5|-1|yIwycWZ~jFkE~v&Jp8km!P~Ux zz<UXyoS?;TXXvb18j=0>y~MUPp1e15GVGIW${v3eP`kP5-1hlO4_80^6PcCrs{3@? zCo$7V$6KtktpoUz8QC+QG~72-iQs>{LhjhaqfDEu&hf<t@IU7LYEakx%JH98?0!!d zv9cb;YVjinQcm{vm1$Wz@4a+Et#)?oBJbsYn}1{-KR@-+=YU^#RvVu!o^*WPQvtA( zO1e)z5$g!nyteXNIZx~ZF>A>?Ny~L}=Ot~+j<pGNnYq*Js7Uk`=Qk!Xv5ftpexIst z<vh-tdUv<+RNJG;{=%G=56XEs!^}cAwAN}|vjdqCaPu<HRNGu{t=o}ZeN~~=nd_P> zR<4+psP_E8U*o^0&9owa?LJ0D>cbl5`o-P(!Grn>WH7Vw_`6v1u4&3<dX;798= zy%i5{%2m&Lqv*3KHF~9G^zqVFW=Xe}mo9jiF>B_$ZL=d*X=wRWOmpM=vG=oNK-lvj zRt3K$Tr)E2k55=|b?(VmHk&*cpK5qtcvZ8h>BR2`rr^YNckY^ZZ#`bW+qQ-~W<vP1 zORUy=H<j#4=zXCdu>0D|-gDEObnWKXwY(PD8dg{$S!-?d{cxAwl@kY7y_hS!Zc;46 zX3p-n=R1DLI*W&JTCZw1&=hp{UE$^9yg6=1<a&|NZr$LoCwX_D<9T0uOZwh!%UdTB zdS%v_ZK^(Wbq{;!=XnjuD`p+PQ8Yz0qf~!WSA=s|_M7(-yAD+Dcs}9W<(KmgzqDaa zwYB`~bZ2KdkI}Rh{l#wrufM$ee8$Pu&1{*gO5fjgSn{B?ve_ng?QFMIrLOyA+rz&< zxcfQperbOux1rkY8Lz&*_n6*hUD_%YI(^%ES)nhd{^s2Gh~m02`OlK&y6%zU6{_z| zs%)yJy!_&~IC}cCUBAu<Pk&dt^oM%<qxAKg%#zn#lU}y!8)t$~Z_#`4`*W{Zt+H#& zS-)O1{ARLW?w0&Z^DnV&&AU|}vNQhu#^)*D17%YL<MK}n-QX*gd;LH@yWd`a<3EAj zs%CQeOROhZcsx+}`1hAf?CsCuMFuYVwcjp%->;JMm2FeWWc9SecP8DRvf=9NlU$Dq ze%Z{~cYn@?tI;Qfk~nMi7QWxElJhleQ;Bs;;g?F8lllHPUdg7sjO&j|il}JUz5Ppe zVwQkh|GX7<wqFg4k*v^Hx^Y3qD7PT}uvd8ep^fzh2Ms?OzMHZ9R{bZtdyDopBo!L! z8fLC_-+K64o8;;K-`sEX_uZdR@b=z|jqPGbqJG7A-_L(D>DJS4FF&qGT=x0x<;dN~ za=U$AyE0!Z&7D2>km=31$mDn3EMlGS=ju(BSl!IA_sh-OOH+HN)qc6@{>kt7lU>ep zMc%m-hH<SCxxamlMY~|w<>#;T^v^~8irM|OdvoCbhHlekU!PZ$ygvCc=irNLdHK^o zBZ&vrx_d{z&Ckq?d46%O@`IG*@YU;A-BMX*mAPEs=FfWNOwYzGGy2RfOYxq(u;y=* zX0+8tW!sAK*K0SP4HUed5p23M_rQ4(RfA)>$7Vi@Wt!}?{%qLMjoz;g&5T>WIKgF6 z@9&+G-Wl_DD*kJ~Y_{9wsbE`j(e}dTxl9VrW+c6yw$t#kYVjhs<TlHX&%z%2SiBUu zZ93`S!;QB?`g%3oBOe(jzCQ4qeebvK{h==JvjaQdsn&&R*nJn9|GVS-wPn*EM+Mq9 zui5XMHm54R%gFM0^8Is);6iH0sy~a5@B81VkuUc5A|Gdz?esPCUU%+|ELkTjw57@} z(pAPGjQz%aLzRrLPMf-9UuJBwx;0H*b&rq7BF@@N%JXjg_S$}96U$mVw=jA3HA<^P zw}FcM+NL%8UUu${{L%s{^rKUr+O}Wao)g&=_TMi|pxE};zDxJtUSQp=@c+X6%8wHx z<Wp|VmR3n=KANsy`|ixsMM>>v{bE%&&70UGAG|hJT`0}!@|9~0@5K1`x|}npx||## zw)u3L`}R4S*AsH(iejH^Jm1TC)$)^Tna72<ANV7`Fz-2&yney&n;oG1`?Y9Omqpi_ zzD@g+JubYOe?sdK%O<OX|N0aiSJ$hp4zGSw>SZq-*tbb9qvHC3|5X#CzixV}aodX5 zzq+DX?etOpUgOn5Kli0gzixVb#m(2xFY)bNZn^F0i<j%Z20i;RP5ifX&Gn-8s-C;P zpNqbV*?gTm<C?qv(#6;8Qu{SSv}HRN`_#;P{=|2$d-T)!P3NPwCh9MHy(&*xX!^^N znU@#z+)190`YN1n`$ECZ^11s{cf7Uz;8ZoW;LPlnt$v-EB?hi}caGg#F*T`t`PFM4 zvzJR>uX?jM#EI{RtaH=d)1`8|tABPMkK6uzv*1&W*G=zO#ZR4kxAgMuv~%x{M$DG2 z*tzjw;E%1xa<^sOHCofY`%V<UZS38DyW4rAD$h;ltB#r7|MFO1WcAX^=cYdR=C{zg z^r5)<K5x@i-21oRQgpokceU)~)~#~255KQ3d%<*n?^)sclW(@^eZ1Qj`=hsWv2l4o zx#-9ItFK$iE8k?wFPz18FSVT|`&ZtoOqa^JAM&hA9DVO6uXtI#ZOO97>x9b|Jh3j# z{vOxAx7lGu-rIZG?JVB^?6fLfDzm@aS(iATyq~Y}^Y`{Gy(fj=_{Cr8y}kMMo1-zd zS3XNm*UftVZB=;Olgb0h<uhAWan~N;;|zPRw(1_c?YFkTMo<oD3X@k_-LWaT?gU@# z0~3DfInN%h-Jd2HeTm!mo~rM1|G?;3i`E&6c7G_g4z9ZVrPh90?$VdP>y-MA=H4uu zz4Nq%RkiZ2Ga+?`pAD+c7TGlGPwv{PF8rv_bHT1$+1=f7LGP||t^5A>PS36So;7Ft z7R<6M|FO?3kNexT74Nd`6WdvCKbb7|TS|D*p7np1$nIL;YxlHs|FJJurfoZU?(P{A z(b6sr5uc=KZl%V*SGr7EwZ_iZwO1oQ%|5rCWv!ia*!<5&?v>RYo2Huam37mnw!^Qu zx2@s6(^S5DX>>`|c5B7$4-PM1Th=bMdP%_IT?IdSWQEpDO1J%H8sSpe{wvbD#Bu5d z?@F6rQaQ_Gvrb24siz&CyX$|?Kii1KyZ--ak`-FBNPJ~i+~*_r>gz6oEGga874i7u z_xbVLoy9|JwpT@doSXMG@3LAYdj(6R)XvEJg>qYOKDLwpAF6NKZ}y}iU#R5d*{9oW z%8om(u$r{}&4dN^dvmX6UD`eG#_ZGiw>Rm1SpMDSW9{$i=+(+MFU>xkeDrx?pIyr9 zdp>gdYmVo9{T3ndshxSE>uL9^Js)lqzfBC@^uOW%za5wR{U7aLUiPbFUw!`LDS3<6 z)c>hn{$6TLeekZ^`{z%}`y6cZ#rCM)f6bK}%a#Z1ee;F4_PyVJW!rh5jW_+960>Q( z=f^4;o7ew+YS>P{ESK?@`e@m5vSmu0pZM*YFYT91m&u;~)VlVihJ2s>eYf2&J{DZ7 zcqy&V@x-a3^^W=U4}#IxDyKhPt#{3B)x%ZYpN+U)Z85dn8e|mpAmgL$!__?Vj@y)7 zUUHgU%O>r#(3Vrhf2YfY&EJ&D8C5%TjY8LHnQPyt?_R_leD8sxkJlCHJMWHsQdzcm zwd3lzUtDjr_t{S?IQhtR8qcAiUol?yt!o!9byhw7@7c!}w~x*JX1;x8+n&Be8KodE zWmE2)omMYi9Jykg$9unV<?^S$YgxVt-WQIGsru)(^=prM+QGDw^F438+MM##wf$;( zZlw4R=I<hx<gM-oZ@GHu%L48DUnSm4*&dlKdV9sq6nEJWQ0?}AT7j(1+l|Zr_)p%N zb7=Y73#_FF?4EpF@v{DTt;R>QoeQS%Z|@O)we6M3$}_^(1Lk`FWVX7MF<F*3am9g! zkE)l8-#_)LIArb~uCr=2=cbi9UM+H-7JB<-+nY7FYJEaqZF_kqU+moR=~LaNRsQXL z*s#BD?q9W-(ieL5HWh~ZvhP$`FDRe%)hjk%;|(wSET`4X_Y$_aU5|6W7H4IC?)#G| zxn=Q3kDj~oI*jdASnsiQ%8!hi_w;-!P!-LWdziXS=cD8kky)lv=^ZEgL_|1sgzgLP zlYM?Ly6}c_JY%9tt(@m4?OjJA*Ne=ryf!s}(<}Yys%z1Ie>_i1s$#poZe{wNc>N9a zCaybt*1X+N+P+wM+veQc8Rloi?PK1m>AqNS^_}U~8*@LY9KV|Isp%JA)SJNI+fVYh z<y<>1Z7OwsRb)f`mIW)-gg6%PT`4Y-cwzjY_}Ta8>n%QfmR^6l>ielpchCK~e0Ak{ z*+1)d$KCus;qvqzoBvDxb<e9x=|6fsw)|84<=ygM-*nsVvwnQ3-*3jpL%Fv9Z?0W< zd~UeP-Y4?a$C{LlmYubI-<%&L_xsiTQuQBpYyTZTcK@x_t7WVE>{S+DH=ZwB`L~w; zZTai%^8U5y-){b!^!ZzL=BnrR>-p?IObz{<Z~y-E?Q)ABuhgg2e?9l>-f@|_5Av_7 z?)~0wyUu#`yRJjoPQvdkA1UAW_I@8(@H_6k|IVCG#oOaHn*F|dqVDjw-S58H>hIf9 z{deE`d%w<k%h&A8nl9~Sv`&}PzU+G;|2L^$PYw4<&5!tX_I`hqNx=jA>+;`!UgVeE zUUu%m{<A;-_}AP1xcQK^xV-Y;{LtmKk&zpYS-)Al^81_bKRS-jJI|AIW99urbKlR7 zEATD**Yeu@osGJ|zY|@Hcu(7LTo+&S_sh2fd`};z@3;Sd@AAF<N%vjf$Ju^wx-Mt^ zx%+th%G-a}yMNc(b!z_nZ(pzb$6eWAQ}U)(Kc#NY$4?FZ?`vL7j$3}k-a7xlxvAf4 zYrK!P{(hEsD?91Ee)!&s`=<(5y1V(mDEzop`n*NyMb+Kr-zz>|s}qm?b?K^nZ2eXF z^|zOPpA`IlcHMz`vwWH2cS}~O&#&0C{r$?)@SHin@5yD`#Tox>`aiGk?Y-^ugG!!H zdbh7uOwRcG;lI;rFa7>=Hhq5CpIuuod*8PyaeRNc@6YjP+;Q6eKi?edO}!lM8ot-Q z`hJ|e|K2~J1-;+f+EkrbQ(tfTerDqQe=lG2_th?cen8dTe`dkc#^!%DZ|v=?KK%X3 ze6IG_u7$Q<ezU_X&+OcJ*Sjb!uHxV<`Q1O)MHk$Yj<+xUcER(w&Ex3Xciuie{4A&H z`Rdqf^D6&NRkz>xzdp|<%jxFa_TE{)689I+tKa^=(*2F?mwxl`n#xZ*=F4TRwR?Yd zemYCpostI|t>=Dv^s4rsfYsN@7gu}p$=6)`>f3)!_rHJHCFOX(Ov&=sd*&41+m&{= z?R?#viG}5_Ti(yFDL5WJP2a}k%i&Gp;cD}Lp6s}1dU>7YmLGpEexGym`33psa-WXQ z2|i}O<NO@P_GvcT-o2f8-G0}a>(}o;{ku2kNd5JF!QX%VzBh62H;ez}!ON%G6djwJ z`F#J}|B;FRvlo|d+4IuBHnUy%o?O}K=e+;-mRu9>-uG|kgRix}?tGZeelNQ0+wbOj zKE3*1JNEwj@?tJ)c}!W&W8=qC%j0Ywf0mWwpBfi^@qO>d;J%%p%Y<s)Hk(ghD`E8d z=w$W(AMTw>FRRTCy?Zj-_}ado%Zq>M?fLOA{l3+TihnzU^P^t=KDqtl>U#08H#L86 zRzJNmZ;SW;Kd1k!pHu$lqrCo)GRKQE?jGASe^2_ykMFDg?Os?=wZ6W;y8O$ly=C!V zP9<Mo`n@J){_pcuSy#2==l;C4_&ATv`{Ua0_7?<xo^$x!ErW!>FUMr<YJQz~{C{`x zrCE3V^?z-A)%rbZv9Vvpk1yQuvHRZ~|J-k3`1XVRG}*YFfA-$hS|0Q8=F<)8=Jqo` zKK?CkTl@Ire*4$mywlIre7LfU`CHt!)BCUO|NW}F{$=5r)#X3y%8xD*&XfGs@c)+b z-u@qE_rLDmD}Vp*?d|XC-XC5vPrJPS?~=-^zf1pbT=Qw~dcV3KsplKrm%E0qTlu0c z?D8(_zRquzX%VIS{o8u#f1OF6x98)|fA8zIz1deD{9N{H|K>f}|0{k8o{tOvnfNR9 zc+I2N`>KvVO1<8yU;XjYG;KeAzMbzjOniLZ-|yGsJF}nLZO&T0w7m5HyDsDR)xVA_ zr^SD}P}{%%Qtom0eR8$0=1P0jg!`>{x$o2AS8KliFSu42KEKBCpLY4Xq8ooTRa@Ib z?V>N{pFhT#|8CQ(nScH37JT$Czi;^Kwe#=!|9<v8*S~F&|8CD~<?6kY=agPkjcn`< zUt_cA&5`$2_iDqlKb1aQS^MtKqF1vv8u!iJUiN;k*?yzMbF0I*%qc#3OICizi{FQ2 zjruASejl8Cf9GR)ZT^3m*Y3|dY5kUey3X$Uilg_E*;4ja-jFM|oe*eHbj<nhd+Va> zr`_Jif4Q`Hd#&K!Wc&B8g5#xr-c&DszccG%T)FyuJNwF2-+ypU_2;X#_&K*tKfdz8 z<Tn{dA4LDFJv-;5`<>FOuKqQpXT?nqx2LVyk#o1(ce|^e{{8Pq<mxR;zuQlhskyWH zyx2U8s&`vBOC8T2J#JHaT{%AW&A-5Z?)$cXt4i?ur7fR!_T2ofDUajrtMtBpn{1ox zXIX!7@qN3WiSsj$|0{pV_uF20W|h;`Q;wqdWww8Kbh&)S{|iR{|IFSjCNuBrxrV#` z@$){PnV>yS`tO51hivt2ejJ~5+kIMWwdZNS_dT-;C*~j4K0end=kFEX?Y#FtE^vOo z>i6Rdu9v_4O1gEa|FYhydsAwzKl*NFTYO>P-f8+4pC|Bp_s4&Fa${F*UCytBm*MsM zKJ7U?kGuB&*&oN3$?kr(NnXun-<p!|k)P|Y&nT??HZxl;e&>TX8>R1CzMOs0U#!;f z#UfU5n`)Q!_v61j<U0R&eobV>zrOW$#_Bf7&#HBUC&f#Dy7E@OZ~ynZw|{^Cz3$)4 zCgb04D}E_+pa1jMuv)h8t*!r^@AtM$FZ)w?d`YnX@6V$94lVY7_3y_Ue*c;`hl9J^ z{?>eWxqk2d*NGF8qq*wCzd!GC6rbk1!pG{}Oh)6$QtWd3A3jUAkDBoRJa6^h%}c)g zR!@(=^nLD?llOn<*;F{Ye*Mm#wsv;S<vweX<@Kdkz4>c4Ry{svTsN!o^}W|}cGZW% z`RD(2{drvee(3IxD-P97mX`mK<NJ8i3EjzjaU~}go}V)3$Bg$cl#ADCSk-;*JRcig zf4%d!XwRCx53gy)|4;pLR<nP;MfzWBetX-p%ZJ>{b?p}|+?RS%a<RJmK3RkOkHz-i z^giz^d%aQe`TZ|1j~tEPQ~YQRclq1-+n${WcH2{WeRaLX=bz8s?>%X6=Ksh0vhC{o zFFt>5XTJZ_=<kl|zWPsxgx^`*pIv+K**oD`^LHh^wQH8sk+VoY|NQ&!cYpKac9^~G z5L_RB>v`vUw>`hV9=4vE`{U7L#s6RJem=@wez)|6y0qJuyP3B(ZTwwtUUvEZ_Z`Mx z`@ZY#Ncr>m`W&mW>&@jK-uyhY-)+Ca=ibf#F3+gE{l5SHpT}SJpa1)CfA#*Y_oX-c z{i!@0?!8{-|Cz46{&p{~oaf*7dsn!&_BZM3FV>USz50ANG_zUk+|A$JoB3DmdbVMI zzvb&U^>aS_(EPdAUFXO1)7oNpKUBTF@jh<%=eviR{ocg>Iy+@`cDUW1Cx>5`{doD% zdy&7J-+kk^M-QL>`SDo&v--jr-&d&~JpAqdhp)Z;ZzI0$cz=-dd;H!9pHFOAe(kQ+ zi%E0-$JHH^zWz+)?JTo5Q}+KWxG_E0j(4BYix<7>|FfgcM*DuYul%v~`Z~GlbB~Yb z`&gx1Wj61%{IWzm&i3QU@B8c&H!S<V$Nb&@yP@|Yr_0x#dS5iDDY@q4f4Mz*@3OOh zpW9!4ey6AR|9NxmUwyLs?mPS1`!C&X^`DQ6e~YwKeB60VS^oaV3$N?SA2|Q7dU=Su zyk_sG+j~sEf2sQMB3tX(nqM!w`1R-hJ^ypRblktJgnzB#zPCOcnkm2k=Q-o>^m%sg zS9N7h_qWdd=<F_I`EAzA{nd{bY3KWV{OY+s<(F=?%+Bxq`nffg^Jm9bY5!ix_?_p> zUbFYFlJ{5VJ((}p5x1#e`p(sPKfkRD|IDs$^KY)s{oBQdt>w2oJf8XdtaQnv+3Rad z9y9vCxBq?DzQlgd^U}T3uiY_KuPpdFYnORk-QPJ4-*3Oqw^_2}--B4AvcEakkF)7T zz1OXHxNW)3@87o7Jen52?yxTAJ{NED);Rug++_Qx!jI3bzva#-y1MCC{h7HH*SN2r z-)+A9$GW}zS$mVd?ykS_`^4?OH@`1v|F8PEH*UK4+qze6`Pb(b|9l)?Z~1UWY2VH` zyM6yspTM``oUhv2UpTjAve%vOSqo;?%J;|Vo93Lf@|^SU=UVRDh40Vwugfmn7h=5B z@`_BsAHBo(Z$vnI+dhxp`A96`u59FN-GXgD=1u>=<g@Qiviq++%C-6)H?s0KwOCBB z<NvbawJT@TTkmOIwi~7Y*XBkxg*{yz@kD6L5kAf+T~+Un!?wRfjY_5(Ij;WmC2#Ly zmQx@l%qgsf#}~(&3T$u|*EuA8B>mg}mRZX)jXyXjN-L(ky~n)ZnbiJ!Yx&#wGrqXT z_<gXv7piox(ob?)y7c*gQ@zKRKKgv`i>1bQY2R(PZf74c3sTwOQS*NGhUXQw-}>Yq z`F*KW|Ml*z(D{ek-hX_t_K)B8TJ!Uq+jcI!EL8UGz1(w&0P(Cmv;S<q>~qzEUx%@+ zbuW_T%B$}E=zoh%`N8a8>{h!Ea^&Sm%~+zyme^LBBbbxNQTZq)LbS_ArN2q3QSo_S zZ}g(w?8;{wmrZ+N75qwz=g^arlWhuhm7a;;P4Ze8teL+$u=GiZ!p=25Pvi}hW@XKO zA9>hsw@1RnA93>vCLdvDN%?q{@#>eIvz~-<Mz8(2Li}Y^e_D#bwHu0#s}G;Nl;Nen zym|*{G*Dub$vxrfeHNgxj;Z?B-#y=81sahk)r@qMah&gd;rr6qOO5Z|cfNP{em_b! zV|i43jB?)=J@Iy-xdx(_S1xO|k>ara{qV^x#dFEi3l=QB7@uxC?`7fpX6w1Gul=VS zeIYg9^2NS8@|;Kh<<7F$Z5aEQrGMx0AftVMpLD+5YjA#DK2z4}`F?ph1}e(J@oQFz z8O&YtS!9;b+M>P|gRh(J`M>;DesojQ+0x#%UmK-fyim^lqqljX=(O-Z?S(St3vSIW zkj?PgTm0$zJs0lknMsXDAN`)u^1E}R+;0W(``(5V?fg|Lr~jENe6_mD=2yV>%X^nc z+i$#hVTRePId-NZ>%#Sgm>(&8T)g3j&6$J^%CZ;SPPy$aH+-CC{`L%i6z}98y`4Uf zF3TogP-tvE^1YMu_qCKy%TLamk<PH@{bb>7R#SD(e!B7A_N3aJtkXhUb{R+BYMyZT z+%_G@)!Zk!9<ltgY22spbK_OgrY$!TOE=02ZSm6A`~IMNdG^a<-ILaTAHC%J%3|~Q zV?~Mog_n~3uX`MO|NXnRb>0s?1>xx-jk_{5d=B?!x#X_v-Y|9cJ^2|?>HB9g3*YhB z+{5=>Hf!g#b1S-Hge9Nzy*{zy&$Y<&$N#UH-X43aU-9N1Rmrk%2j(n1cGjwCTO8kw ziFf;KUwjViESYk$FK>}cLg$ZpALQqJcpyLPg{Q?lyZ+_xV?VL0+x*y(ZdQ9v?WfrP zgPlLzd!tP=KlLt-NSjr8=sjOvclpej+pM+UdYC4E6yeelxi9>W*=Szu%B=G5H)db6 z<t*Qt8XIudX4c89cV9A|g`GVv^*r>E>8fL^{w1DX9j;z{eI<9=`ML7>ie>e=*B<>W zYq1V&$<n-WaeM0Gy50j)A8YFl{o646_`M4*bDZWczwrI;t|RgnK6kw+7Cc#gKd63! zZZ&i5v*<9{NabTwHu*2P<ZfYqF=X5JyOmQeHY@A)I)0pVaIvhtU0Ly(jb?jqn0zZS zaNIn{Xy(<DY}Hl&RB~t4tqs2**{j^us~4EiIgeq-B)iA6rt+Itq~4ADwDfIR{M{>S zO@da}UwSx~-%$T$$n<^tkJlN^GxV;xZ~suOCtQBw(eOi`50%-Re7$Q4=V#8j#}{wE zX;tfVed5#2x0N-P%HEsTd4GMB(|+#UvTqk(uc;MX*(ZEv#(fp@cAH%O*L>T*oQ|1! ztiQ+fVS<UlrCpNQHB-Ns%dL)77Y}fJexu{l6F>Q+=!2E7=J#FCP-fIoe}1suEu&N+ zXX%B@|BTD;%C3}KI+3~V_=Fj&)oZh@V=jH4cO(2$UG{0AEx+P7HAOgvX@lo_e=$e8 z>L{&t{q}u{ywJ8^%8{;f9KzHga|Y_0cHInIXMc0kku{6t7m9LcpUCR{E9=}8Hu*$W zT~1VB-=?+q@2;Ho{Nsw+n@6JN-4+h}#A#VNHzvx+ChBVA$75M~sZy2^XP@3~nfuhb z|F4OSo!yz^fyp_Rr?%Cxu6X9hms(msH}Bm!t_kNKWbnTBSLEqm$yBwXIP1rPYY$#c z2oGuf`{|^E@xQsP8}{3UJT}$fyK5Y>{iW8gOqE?Plkzv;m;RQ&tIT%a(M?-V-hQ;6 z+m-nqtJ~X{=-XjDCY7bLu1@~$m+rah;|@M|+1lLiE8m`ZP$p>g`N(sh<@+*&UL^&G zADT7wUq%4WM{nMZQu;ento~n`n0!d<e~F)tXigtnSj6m)Z*yLD*xJ_pos)AYJ?C4= zp4z1Cx80T5SKt1t`S9D%&2O#5{M5~7<<<KeZP~H*f?ef}4;3Z9-+bBd@Rr?Yn_ZSY zQEtUkcZ45kW4^!@&i1P5YhAwgf{TAk*YmB<{{GTyyZa2b+&=THeJ+I`4t}gt+FkX$ zc<S=bW0$WrU%VDz5u(hVt>NQU(cru7w3TFhy<y*}+Bv%JkxgO2C$;h{I?GoqkV%a- z$ob6TSdsc%ox^W^&Uaa@r<V^q)|8#*?t8?lQ2%wB+lJp^^Fki4s9L_b`g!zYSKBjt z3io7ea_6tvc3G}1%SJEy(ad=g{d3-53S9l}@|NU;lglb@O$n5_bN}cXsYz~I?tWBk z4^Ne}d{BPP`@qplw%7PFjr3L?zcpVFH0@HbF=x|*i(A__=@uK>zTPYrXBxQwE4yXo z;SV83TJZ;#nfLK!@mgNb+Q_}DAfxvsSL4l@Ml!b|D@>Er&Xm7uKC3Nb@0Z(a7Sew` zvg>Qd#J3eLe3cG;hn0)oOjzLlWRm*>eeILVTDg{|b{$ZzlCoKJ`R?r1?kQ1nhWa;p zuC|wbGPACm__Y6u#XmR6^G82?Kc18K`(XZ`v+vDjmn+#=C?s@V;%lk8?BAv9U8BC} z?DH+VErSdk9x!~geYo)C<-^JR0v*jSJ}dmXr<}MtGKF(L|Kjt9J?_1<TjYGZ$nueK zyp8{gxLbCo`^-95?!1!}t7G?htH4iot=RbOx6d&(-j^uvxqNeXE3<Cfk`sHD%EZLJ zH9a}~W>MEOri*SrUi@*oTp*bpy`R^@%`cy`>_%Sp@AFj+cdxvdR9p5_CHy7VRx8o@ zy54&(&h_fmYfYasw_@qEsjC8|EF)HaQoR#<`Lfo@KPnvgZ>NB!=q^o*GdkCI^s|)) zDE?P^Mr-_=CS7;@0;{w4RP}Y0>dzSWe=wU8x)zk<uFm@4>~XT<s=T;JhHsAZLYdUq z0LC}d<oe?RN^a@izSU-ByY0gEg2$OtejmGRwt;!6^~YVyzWtjO5SXo!@OSIku1g+M z!(}}yKx<*Nx907Zjy#!^t2=3l^}7RE^@|<n-Fn3D&Qx`*v@qJXs;bsNhL@d5Z}JLZ z+ixNde6$|v91_lreDt^S!q3xBW<|}myl}E3d;f{`uRPxCOKo|c(q9{JC_-`H{5c<5 zUW)YJU32ck5xbq0UAnKEI4{qfw?oc!qgBCe#S2nv&-Pwx-h1YQ;P#r5Q*U?N-q^r> fWow)A!K+16r!T3$aqjlQ|NLn>Y*(50F*5)F^SDW~ literal 0 HcmV?d00001 diff --git a/DESCRIPTION b/DESCRIPTION index 64f998a1..4092c831 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -43,6 +43,6 @@ Suggests: reshape2, MASS, qcc, - multicomp + multcomp VignetteBuilder: knitr RoxygenNote: 5.0.1 diff --git a/R/SoaresTb3.2.R b/R/SoaresTb3.2.R new file mode 100644 index 00000000..3c6c2776 --- /dev/null +++ b/R/SoaresTb3.2.R @@ -0,0 +1,30 @@ +#' @name SoaresTb3.2 +#' @title Doenças cardiovasculares em Honolulu. +#' @description Em 1969 estudo realizado na população de Honolulu +#' (descrito em Kuzma, 1998). Para 7.683 indivíduos, foram +#' pesquisadas as seguintes variáveis: nível educacional, peso (Kg), +#' altura (cm), idade (anos), glicemia (\eqn{mg.dL^{-1}}), colesterol +#' sérico (\eqn{mg.dL^{-1}}) e pressão sistólica (\eqn{mmHg^{-1}}). +#' Cada indivíduo foi classificado quanto ao hábito de fumar +#' (fumante ou não) e quanto à atividade em casa (pouca, moderada e +#' muita). +#' @format Um \code{vetor} numérico com 80 observações. +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' hist(SoaresTb3.2, +#' labels = TRUE, +#' col = "steelblue", +#' main = NULL, +#' ylab = "Frequência absoluta", +#' xlab = "Teor de colesterol (mg/dL)") +#' +#' rug(SoaresTb3.2) +#' +NULL + + diff --git a/data-raw/SoaresTb3.2.txt b/data-raw/SoaresTb3.2.txt new file mode 100644 index 00000000..4fb5e2fc --- /dev/null +++ b/data-raw/SoaresTb3.2.txt @@ -0,0 +1,81 @@ +TC +278 +182 +247 +227 +277 +194 +196 +276 +244 +192 +118 +219 +255 +201 +9 +209 +219 +228 +209 +209 +171 +213 +233 +226 +209 +200 +200 +363 +209 +200 +179 +167 +192 +277 +317 +146 +217 +292 +217 +255 +212 +233 +250 +243 +150 +209 +184 +199 +250 +479 +175 +194 +221 +233 +9 +184 +217 +150 +167 +265 +242 +180 +255 +170 +209 +161 +196 +165 +234 +179 +248 +184 +291 +185 +242 +276 +243 +229 +242 +250 diff --git a/data/SoaresTb3.2.rda b/data/SoaresTb3.2.rda new file mode 100644 index 0000000000000000000000000000000000000000..1740064f45ac24423aa9782f4af0cdd6810d597f GIT binary patch literal 208 zcmZ>Y%CIzaj8qGb?3e6X$-pq>|NcK#><m1N5=<-%F%Cu?GZ_RKlxFlMggj8wnr9$$ zaREb%maoZ?Fa5!n7^E_!G8a^}Pq`)R_;T3<qsba<4U#4d43Z2NGEPVbmPLFEyIU~* zT*n!Y{f0Iji%lC>zViB$`q{uiao*m0C%o7CNG#=9bYqpgSMY}{UpH2RE>@$3A5D0R zR!n}8r;)pZfibnA_*$Hc00;j9rbA4V4rq0LX_?F-WV=dIyS1>Y|JAd9y*U#+f;g3b P?4G1~sHLUiOsEF{J)l(V literal 0 HcmV?d00001 diff --git a/man/SoaresTb3.2.Rd b/man/SoaresTb3.2.Rd new file mode 100644 index 00000000..b74fda2e --- /dev/null +++ b/man/SoaresTb3.2.Rd @@ -0,0 +1,36 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresTb3.2.R +\name{SoaresTb3.2} +\alias{SoaresTb3.2} +\title{Doenças cardiovasculares em Honolulu.} +\format{Um \code{vetor} numérico com 80 observações.} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Em 1969 estudo realizado na população de Honolulu + (descrito em Kuzma, 1998). Para 7.683 indivíduos, foram + pesquisadas as seguintes variáveis: nível educacional, peso (Kg), + altura (cm), idade (anos), glicemia (\eqn{mg.dL^{-1}}), colesterol + sérico (\eqn{mg.dL^{-1}}) e pressão sistólica (\eqn{mmHg^{-1}}). + Cada indivíduo foi classificado quanto ao hábito de fumar + (fumante ou não) e quanto à atividade em casa (pouca, moderada e + muita). +} +\examples{ + +library(lattice) + +hist(SoaresTb3.2, + labels = TRUE, + col = "steelblue", + main = NULL, + ylab = "Frequência absoluta", + xlab = "Teor de colesterol (mg/dL)") + +rug(SoaresTb3.2) + +} +\keyword{AAS} + diff --git a/man/labestData.Rd b/man/labestData.Rd index 24932f76..8a8c53af 100644 --- a/man/labestData.Rd +++ b/man/labestData.Rd @@ -1,4 +1,4 @@ -% Generated by roxygen2 (4.1.1): do not edit by hand +% Generated by roxygen2: do not edit by hand % Please edit documentation in R/labestData.R \docType{package} \name{labestData} -- GitLab From 2ab84a08d170e471ffa94ad7ffc9de35031085c1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Fri, 26 Aug 2016 18:34:20 -0300 Subject: [PATCH 2/9] =?UTF-8?q?Adiciona=20Tabela=203.19=20do=20livro=20Int?= =?UTF-8?q?rodu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20M=C3=A9dica?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresTb3.19.R | 28 +++++++++++++++++++++++ data-raw/SoaresTb3.19.txt | 47 ++++++++++++++++++++++++++++++++++++++ data/SoaresTb3.19.rda | Bin 0 -> 216 bytes man/SoaresTb3.19.Rd | 34 +++++++++++++++++++++++++++ 4 files changed, 109 insertions(+) create mode 100644 R/SoaresTb3.19.R create mode 100644 data-raw/SoaresTb3.19.txt create mode 100644 data/SoaresTb3.19.rda create mode 100644 man/SoaresTb3.19.Rd diff --git a/R/SoaresTb3.19.R b/R/SoaresTb3.19.R new file mode 100644 index 00000000..afba682d --- /dev/null +++ b/R/SoaresTb3.19.R @@ -0,0 +1,28 @@ +#' @name SoaresTb3.19 +#' @title Doença de Chagas. +#' @description Em 1992, Mota fez um estudo comparativo de crianças +#' filhas de mães chagásicas com filhas de mães não chagásicas +#' (grupo de controle). Neste estudo foram foram consideradas +#' dosagens obtidas em exames laboratoriais, medidas de variáveis +#' vitais, antropométricas e de desenvolvimeto motor (firmar a +#' cabeça, sentar e andar). +#' @format Um \code{vetor} numérico com 46 observações. +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' hist(SoaresTb3.19, +#' labels = TRUE, +#' col = "coral", +#' main = NULL, +#' ylab = "Frequência absoluta", +#' xlab = "Dosagem de bilirrubina (mg/dL)") +#' +#' rug(SoaresTb3.19) +#' +NULL + + diff --git a/data-raw/SoaresTb3.19.txt b/data-raw/SoaresTb3.19.txt new file mode 100644 index 00000000..03dd59cf --- /dev/null +++ b/data-raw/SoaresTb3.19.txt @@ -0,0 +1,47 @@ +DB +1,3 +1,5 +1,9 +2 +2,1 +2,8 +2,8 +2,9 +2,9 +3,1 +3,1 +3,2 +3,2 +3,2 +3,2 +3,2 +3,3 +3,7 +3,7 +3,8 +3,9 +4 +4,3 +4,3 +4,4 +4,9 +6 +6,1 +6,2 +6,3 +6,3 +6,6 +6,7 +6,8 +6,8 +7,8 +8,2 +8,3 +8,8 +9,5 +9,7 +10,1 +10,7 +11,2 +11,3 +12,5 diff --git a/data/SoaresTb3.19.rda b/data/SoaresTb3.19.rda new file mode 100644 index 0000000000000000000000000000000000000000..1faaf968b36c08ab59f9a2f40cba796740c04fd0 GIT binary patch literal 216 zcmZ>Y%CIzaj8qGb3_0ah&A?DyzvTb-7ZvXnEfkJ0$T%1?%wS+JU|?f$G+@}Ak*R3l z!*a-oM_BEG;!KAlQ!by%kXyKbm%${1fl+g*14HHlwgv{d1(~mEd*967;$)x{D!bW2 zIF;eci72-S^9lSLQVQQ?aHu&Nvvj4L2&;8c;BqN>aL!T5u{uz>Q^479!feMCH*z1I zJMu}$x=B6p!VD)_BZmh^c$dGP{P>oce-HzkpTxSqriY*3y)e1KA<a24?oYrS#svoM X`yWMS_6lkL*gZ+}P)pOYpx_$-&X8Ap literal 0 HcmV?d00001 diff --git a/man/SoaresTb3.19.Rd b/man/SoaresTb3.19.Rd new file mode 100644 index 00000000..d29cef43 --- /dev/null +++ b/man/SoaresTb3.19.Rd @@ -0,0 +1,34 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresTb3.19.R +\name{SoaresTb3.19} +\alias{SoaresTb3.19} +\title{Doença de Chagas.} +\format{Um \code{vetor} numérico com 46 observações.} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Em 1992, Mota fez um estudo comparativo de crianças + filhas de mães chagásicas com filhas de mães não chagásicas + (grupo de controle). Neste estudo foram foram consideradas + dosagens obtidas em exames laboratoriais, medidas de variáveis + vitais, antropométricas e de desenvolvimeto motor (firmar a + cabeça, sentar e andar). +} +\examples{ + +library(lattice) + +hist(SoaresTb3.19, + labels = TRUE, + col = "coral", + main = NULL, + ylab = "Frequência absoluta", + xlab = "Dosagem de bilirrubina (mg/dL)") + +rug(SoaresTb3.19) + +} +\keyword{AAS} + -- GitLab From bcc6146de7ad557f8240a5298a13d359e96ac69f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Fri, 26 Aug 2016 18:50:38 -0300 Subject: [PATCH 3/9] =?UTF-8?q?Adiciona=20exerc=C3=ADcio=208=20do=20livro?= =?UTF-8?q?=20Introdu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20M=C3=A9di?= =?UTF-8?q?ca?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresEx8.R | 25 +++++++++++++++++++++++++ data-raw/SoaresEx8.txt | 36 ++++++++++++++++++++++++++++++++++++ data/SoaresEx8.rda | Bin 0 -> 116 bytes man/SoaresEx8.Rd | 31 +++++++++++++++++++++++++++++++ 4 files changed, 92 insertions(+) create mode 100644 R/SoaresEx8.R create mode 100644 data-raw/SoaresEx8.txt create mode 100644 data/SoaresEx8.rda create mode 100644 man/SoaresEx8.Rd diff --git a/R/SoaresEx8.R b/R/SoaresEx8.R new file mode 100644 index 00000000..0b2e3e1b --- /dev/null +++ b/R/SoaresEx8.R @@ -0,0 +1,25 @@ +#' @name SoaresEx8 +#' @title Resultados de uma prova de Estatística +#' @description Os dados apresentados constituem o resultado da segunda +#' prova da turma C do 1° semestre de 1990 da disciplina de +#' Estatística para Medicina. +#' @format Um \code{vetor} numérico com 35 observações. +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' hist(SoaresEx8, +#' labels = TRUE, +#' col = "darkolivegreen1", +#' main = NULL, +#' ylab = "Frequência absoluta", +#' xlab = "Nota na segunda prova") +#' +#' rug(SoaresTb3.19) +#' +NULL + + diff --git a/data-raw/SoaresEx8.txt b/data-raw/SoaresEx8.txt new file mode 100644 index 00000000..871cee17 --- /dev/null +++ b/data-raw/SoaresEx8.txt @@ -0,0 +1,36 @@ +NP +6 +12 +12 +14 +15 +15 +15 +15 +16 +17 +18 +18 +19 +19 +19 +20 +21 +21 +22 +22 +22 +23 +23 +23 +23 +23 +23 +24 +25 +25 +25 +27 +27 +28 +32 diff --git a/data/SoaresEx8.rda b/data/SoaresEx8.rda new file mode 100644 index 0000000000000000000000000000000000000000..fd44701991cfe09fe91aa2815b4e2d5992879457 GIT binary patch literal 116 zcmZ>Y%CIzaj8qGbJi!}tkbxoQf5Tt%|8G1P1RU5HBpj3&W;ie~DlmAY3Yai3XEHFD zN;U8@Fvu;abUpIRaN?7d%bB{eL}%-YOCLNebfM!}gNIAd;VIk<XO~>~eMF*KfQMni V#R|KLb*@qN;zh0&0TV#B006zCDP;fv literal 0 HcmV?d00001 diff --git a/man/SoaresEx8.Rd b/man/SoaresEx8.Rd new file mode 100644 index 00000000..04f24073 --- /dev/null +++ b/man/SoaresEx8.Rd @@ -0,0 +1,31 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresEx8.R +\name{SoaresEx8} +\alias{SoaresEx8} +\title{Resultados de uma prova de Estatística} +\format{Um \code{vetor} numérico com 35 observações.} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Os dados apresentados constituem o resultado da segunda + prova da turma C do 1° semestre de 1990 da disciplina de + Estatística para Medicina. +} +\examples{ + +library(lattice) + +hist(SoaresEx8, + labels = TRUE, + col = "darkolivegreen1", + main = NULL, + ylab = "Frequência absoluta", + xlab = "Nota na segunda prova") + +rug(SoaresTb3.19) + +} +\keyword{AAS} + -- GitLab From 22f1f8f9c509ea0c2693e69521de659deb79675b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Fri, 26 Aug 2016 19:38:07 -0300 Subject: [PATCH 4/9] =?UTF-8?q?Adiciona=20tabela=203.1=20do=20livro=20Intr?= =?UTF-8?q?odu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20M=C3=A9dica?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresTb3.1.R | 26 +++++++++++++++++++++++ data-raw/SoaresTb3.1.txt | 44 +++++++++++++++++++++++++++++++++++++++ data/SoaresTb3.1.rda | Bin 0 -> 210 bytes man/SoaresTb3.1.Rd | 34 ++++++++++++++++++++++++++++++ 4 files changed, 104 insertions(+) create mode 100644 R/SoaresTb3.1.R create mode 100644 data-raw/SoaresTb3.1.txt create mode 100644 data/SoaresTb3.1.rda create mode 100644 man/SoaresTb3.1.Rd diff --git a/R/SoaresTb3.1.R b/R/SoaresTb3.1.R new file mode 100644 index 00000000..79c6f1e5 --- /dev/null +++ b/R/SoaresTb3.1.R @@ -0,0 +1,26 @@ +#' @name SoaresTb3.1 +#' @title Teor de gordura fecal em crianças. +#' @description Embora os gastroenterologistas infantis reconhecessem +#' a utilidade diagnóstica do teor de gordura fecal, até 1984 não +#' existia um padrão de referência dessa medida para crianças +#' brasileiras. Para preencher esta lacuna, o Professor Francisco +#' Penna, titular de Pediatria da UFMG, examinou 43 crianças sadias +#' que produziram tais valores expressos em g/24 horas. +#' @format Um \code{vetor} numérico com 43 observações. +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' hist(SoaresTb3.1, +#' labels = TRUE, +#' col = "darkslategray1", +#' main = NULL, +#' ylab = "Frequência absoluta", +#' xlab = "Teor de gordura (g/24 horas)") +#' +#' rug(SoaresTb3.1) +#' +NULL diff --git a/data-raw/SoaresTb3.1.txt b/data-raw/SoaresTb3.1.txt new file mode 100644 index 00000000..f9060821 --- /dev/null +++ b/data-raw/SoaresTb3.1.txt @@ -0,0 +1,44 @@ +TG +3,7 +1,6 +2,5 +3 +3,9 +1,9 +3,8 +1,5 +1,1 +1,8 +1,4 +2,7 +2,1 +3,3 +3,2 +2,3 +2,3 +2,4 +0,8 +3,1 +1,8 +1 +2 +2 +2,9 +3,2 +1,9 +1,6 +2,9 +2 +1 +2,7 +3 +1,3 +1,5 +4,6 +2,4 +2,1 +1,3 +2,7 +2,1 +2,8 +1,9 diff --git a/data/SoaresTb3.1.rda b/data/SoaresTb3.1.rda new file mode 100644 index 0000000000000000000000000000000000000000..24edb52efdf1b5c1505fc66a092179975cc1fc14 GIT binary patch literal 210 zcmZ>Y%CIzaj8qGboO@a56$3*~{nG!xConK@S}+`8kZ~|(n8Cncz`(|!keX`1u+mv+ zvcIp7!v#qxlgrXUDJ;vpmalxlz`(%lkdcrg$-t)UIN=1($u}|^OZ4U*Xg`0vY{p5Z z6xD!LUae16yc;DLG@k#-a&9v@*xR#Yb5cscgatwt*+r9D{dUR7Ok}m%Vw$xwS!m_9 zOPziqnn^`V6}q;X)vaB*O?<n7=j2V%2D>ejo0Ah%wuL_uei8FPVFkzfP3s>`YS3<y R>Ob_(V>y?Q@UEm-2LNNFQtbc$ literal 0 HcmV?d00001 diff --git a/man/SoaresTb3.1.Rd b/man/SoaresTb3.1.Rd new file mode 100644 index 00000000..78365e6b --- /dev/null +++ b/man/SoaresTb3.1.Rd @@ -0,0 +1,34 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresTb3.1.R +\name{SoaresTb3.1} +\alias{SoaresTb3.1} +\title{Teor de gordura fecal em crianças.} +\format{Um \code{vetor} numérico com 43 observações.} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Embora os gastroenterologistas infantis reconhecessem + a utilidade diagnóstica do teor de gordura fecal, até 1984 não + existia um padrão de referência dessa medida para crianças + brasileiras. Para preencher esta lacuna, o Professor Francisco + Penna, titular de Pediatria da UFMG, examinou 43 crianças sadias + que produziram tais valores expressos em g/24 horas. +} +\examples{ + +library(lattice) + +hist(SoaresTb3.1, + labels = TRUE, + col = "darkslategray1", + main = NULL, + ylab = "Frequência absoluta", + xlab = "Teor de gordura (g/24 horas)") + +rug(SoaresTb3.1) + +} +\keyword{AAS} + -- GitLab From 82f20106a11ccd385daeb0a162a4e29f2307d442 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Fri, 26 Aug 2016 20:29:49 -0300 Subject: [PATCH 5/9] =?UTF-8?q?Adiciona=20exerc=C3=ADcio=2011=20do=20livro?= =?UTF-8?q?=20Introdu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20M=C3=A9di?= =?UTF-8?q?ca?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresEx11.R | 44 ++++++++++++++++++++++++++++++++++ data-raw/SoaresEx11.txt | 25 +++++++++++++++++++ data/SoaresEx11.rda | Bin 0 -> 194 bytes man/SoaresEx11.Rd | 52 ++++++++++++++++++++++++++++++++++++++++ 4 files changed, 121 insertions(+) create mode 100644 R/SoaresEx11.R create mode 100644 data-raw/SoaresEx11.txt create mode 100644 data/SoaresEx11.rda create mode 100644 man/SoaresEx11.Rd diff --git a/R/SoaresEx11.R b/R/SoaresEx11.R new file mode 100644 index 00000000..955c7fb4 --- /dev/null +++ b/R/SoaresEx11.R @@ -0,0 +1,44 @@ +#' @name SoaresEx11 +#' @title Resultados de uma prova de Estatística +#' @description Os dados apresentados constituem o resultado da segunda +#' prova da turma C do 1° semestre de 1990 da disciplina de +#' Estatística para Medicina. +#' @format Um \code{data.frame} com 48 observações. +#' +#' \describe{ +#' +#' \item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a +#' recidiva em pacientes do sexo masculino} +#' +#' \item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a +#' recidiva em pacientes do sexo feminino.} +#' +#' } +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' par(mfrow = c(1,2)) +#' hist(SoaresEx11$m, +#' labels = TRUE, +#' col = "darkolivegreen1", +#' main = "Pacientes do sexo masculino", +#' ylim = c(0, 8), +#' ylab = "Frequência absoluta", +#' xlab = "Tempo (em meses)") +#' +#' rug(SoaresEx11$m) +#' +#' hist(SoaresEx11$f, +#' labels = TRUE, +#' col = "darkolivegreen1", +#' main = "Pacientes do sexo feminino", +#' ylab = "Frequência absoluta", +#' xlab = "Tempo (em meses)") +#' +#' rug(SoaresEx11$f) +#' +NULL diff --git a/data-raw/SoaresEx11.txt b/data-raw/SoaresEx11.txt new file mode 100644 index 00000000..163075a6 --- /dev/null +++ b/data-raw/SoaresEx11.txt @@ -0,0 +1,25 @@ +m f +2 2 +2 2 +3 3 +4 3 +4 4 +4 4 +4 5 +7 5 +7 6 +7 6 +8 7 +9 7 +9 7 +10 7 +12 8 +15 8 +15 8 +15 8 +16 10 +18 10 +18 11 +22 11 +22 12 +24 18 diff --git a/data/SoaresEx11.rda b/data/SoaresEx11.rda new file mode 100644 index 0000000000000000000000000000000000000000..d9bd618a790b49eafaacd6ba5208315eb918506e GIT binary patch literal 194 zcmZ>Y%CIzaj8qGb+>&M-!oaY({^0+AHys!l4H(!MBpmeF=NxcgU~phy+`zD7kqTP_ zLxvPvLw<<FWyb|<zKj!>wW;+8X?P@ME}O;d!0aHv^+H!EZB@=Db&XtepU1~S)q0v! z4lm-ocK4^|W<$m6IrFO7Kfk}L#M=|Qv8;<hFEQHdhpV8FDRXX*XUwGrgP<NEj~9oV z9bB7*rc2m;yV$6~I)Qolgyh8s&bnnhyt4CBX2L8@r@AA_|MZ@86)aTDIFq&l0CYJ` AY5)KL literal 0 HcmV?d00001 diff --git a/man/SoaresEx11.Rd b/man/SoaresEx11.Rd new file mode 100644 index 00000000..5cc1fe2a --- /dev/null +++ b/man/SoaresEx11.Rd @@ -0,0 +1,52 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresEx11.R +\name{SoaresEx11} +\alias{SoaresEx11} +\title{Resultados de uma prova de Estatística} +\format{Um \code{data.frame} com 48 observações. + +\describe{ + +\item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a +recidiva em pacientes do sexo masculino} + +\item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a +recidiva em pacientes do sexo feminino.} + +}} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Os dados apresentados constituem o resultado da segunda + prova da turma C do 1° semestre de 1990 da disciplina de + Estatística para Medicina. +} +\examples{ + +library(lattice) + +par(mfrow = c(1,2)) +hist(SoaresEx11$m, + labels = TRUE, + col = "darkolivegreen1", + main = "Pacientes do sexo masculino", + ylim = c(0, 8), + ylab = "Frequência absoluta", + xlab = "Tempo (em meses)") + +rug(SoaresEx11$m) + +hist(SoaresEx11$f, + labels = TRUE, + col = "darkolivegreen1", + main = "Pacientes do sexo feminino", + ylab = "Frequência absoluta", + xlab = "Tempo (em meses)") + + rug(SoaresEx11$f) + +} +\keyword{AAS} + -- GitLab From 145c6dcd9810650ff7d9bd338d4b16b462586d9b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Mon, 29 Aug 2016 16:59:53 -0300 Subject: [PATCH 6/9] =?UTF-8?q?Adiciona=20tabela=20do=20exerc=C3=ADcio=201?= =?UTF-8?q?3=20do=20livro=20Introdu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADsti?= =?UTF-8?q?ca=20M=C3=A9dica?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresEx13.R | 31 +++++++++++++++++++++++++++++++ data-raw/SoaresEx13.txt | 15 +++++++++++++++ data-raw/SoaresEx15.txt | 30 ++++++++++++++++++++++++++++++ data/SoaresEx13.rda | Bin 0 -> 276 bytes man/SoaresEx13.Rd | 39 +++++++++++++++++++++++++++++++++++++++ 5 files changed, 115 insertions(+) create mode 100644 R/SoaresEx13.R create mode 100644 data-raw/SoaresEx13.txt create mode 100644 data-raw/SoaresEx15.txt create mode 100644 data/SoaresEx13.rda create mode 100644 man/SoaresEx13.Rd diff --git a/R/SoaresEx13.R b/R/SoaresEx13.R new file mode 100644 index 00000000..7b29926d --- /dev/null +++ b/R/SoaresEx13.R @@ -0,0 +1,31 @@ +#' @name SoaresEx13 +#' @title Notas de um teste de psicoanalogia +#' @description Os dados apresentados referem-se as notas de 158 +#' indivíduos que realizaram um teste de psicoanalogia (um teste de +#' inteligência em que o indivíduo tem que resolver uma série de +#' analogias). +#' @format Um \code{data.frame} com 158 observações. +#' +#' \describe{ +#' +#' \item{\code{Escore}}{Notas atribuídas em classes.} +#' +#' \item{\code{FAS}}{Frequência Absoluta Simples.} +#' +#' } +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' par(las=2) +#' barplot(SoaresEx13$FAS, names.arg = SoaresEx13$Escore, +#' cex.names = 0.8, +#' xlab = "Escore", +#' ylab = "Frequência absoluta simples", +#' ylim = c(0, 25)) +#' +#' +NULL \ No newline at end of file diff --git a/data-raw/SoaresEx13.txt b/data-raw/SoaresEx13.txt new file mode 100644 index 00000000..54407e58 --- /dev/null +++ b/data-raw/SoaresEx13.txt @@ -0,0 +1,15 @@ +Escore FAS +33-36 1 +36-39 3 +39-42 1 +42-45 4 +45-48 3 +48-51 7 +51-54 15 +54-57 23 +57-60 16 +60-63 24 +63-66 21 +66-69 21 +69-72 15 +72-75 4 diff --git a/data-raw/SoaresEx15.txt b/data-raw/SoaresEx15.txt new file mode 100644 index 00000000..9e81f869 --- /dev/null +++ b/data-raw/SoaresEx15.txt @@ -0,0 +1,30 @@ +CGC CGM ZGC ZGM +113 159 1.07 0.52 +181 175 1.20 0.60 +254 181 1.30 0.78 +311 188 3.13 0.86 +334 200 3.20 1.08 +145 206 3.70 1.23 +221 213 4.40 1.28 +256 214 4.57 1.31 +312 217 5.20 1.40 +344 231 5.82 1.55 +163 238 6.07 1.55 +225 238 6.13 1.60 +275 242 6.50 1.92 +313 244 6.82 2.15 +372 256 6.82 2.27 +163 259 6.90 2.40 +231 260 7.23 2.41 +296 263 7.42 2.52 +323 264 7.43 2.57 +375 275 7.43 2.60 +167 277 7.45 2.63 +241 279 8.25 2.92 +303 281 8.40 3.02 +325 293 8.77 3.05 +375 302 9.54 3.57 +437 303 3.88 + 314 5.50 + 344 7.38 + 394 diff --git a/data/SoaresEx13.rda b/data/SoaresEx13.rda new file mode 100644 index 0000000000000000000000000000000000000000..2957a999731b7b191dfe8fda7715b9b59e6282f4 GIT binary patch literal 276 zcmZ>Y%CIzaj8qGb-0<ex2L?ul{|Em6KXrhCx&DDVgM@=V``iN#3<8WB7~Uvcxl}cA zi%F^!0|QS3<D)hyDFy~+2L=WPo~wdO?XPsc^<Xezc3;8lAh(p^jKPG!t%U}ULj^r9 z88dL6<hIf@P*0zJcPY=R=m4?5bEL~_p3c`Zx%BYGl=iDfPp>;~xMk8M)q=azUL6np z@$GwZUq{Em1k<M67nuv3bHDbUT*y==ES$OCF~BR?N2sGaJL=ljj*hSYHl{_!*QV-x zIaB_lkt>K{>8WCdrA);PT$&zRqcf_rKfT#Id%NP@|7JUE&#kOft6DH&rqm0ytqRXJ kZoBI3<$r0zw16Hh?ezHFg1w6NNAFDZ6H(Ezw%x-303d97kN^Mx literal 0 HcmV?d00001 diff --git a/man/SoaresEx13.Rd b/man/SoaresEx13.Rd new file mode 100644 index 00000000..baf9b724 --- /dev/null +++ b/man/SoaresEx13.Rd @@ -0,0 +1,39 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresEx13.R +\name{SoaresEx13} +\alias{SoaresEx13} +\title{Notas de um teste de psicoanalogia} +\format{Um \code{data.frame} com 158 observações. + +\describe{ + +\item{\code{Escore}}{Notas atribuídas em classes.} + +\item{\code{FAS}}{Frequência Absoluta Simples.} + +}} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Os dados apresentados referem-se as notas de 158 + indivíduos que realizaram um teste de psicoanalogia (um teste de + inteligência em que o indivíduo tem que resolver uma série de + analogias). +} +\examples{ + +library(lattice) + +par(las=2) +barplot(SoaresEx13$FAS, names.arg = SoaresEx13$Escore, + cex.names = 0.8, + xlab = "Escore", + ylab = "Frequência absoluta simples", + ylim = c(0, 25)) + + +} +\keyword{AAS} + -- GitLab From 8c10c0070d14ff85d8618d9d289152f57b150bb5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=82ngela=20Luiza=20Cunha=20Legey?= <angelalegey@gmail.com> Date: Mon, 29 Aug 2016 18:16:10 -0300 Subject: [PATCH 7/9] =?UTF-8?q?Adiciona=20tabela=20do=20exercicio=2015=20d?= =?UTF-8?q?o=20livro=20Introdu=C3=A7=C3=A3o=20=C3=A0=20Estat=C3=ADstica=20?= =?UTF-8?q?M=C3=A9dica?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresEx15.R | 31 +++++++++ data-raw/SoaresEx15.txt | 139 +++++++++++++++++++++++++++++++--------- data/SoaresEx15.rda | Bin 0 -> 657 bytes man/SoaresEx15.Rd | 38 +++++++++++ 4 files changed, 178 insertions(+), 30 deletions(-) create mode 100644 R/SoaresEx15.R create mode 100644 data/SoaresEx15.rda create mode 100644 man/SoaresEx15.Rd diff --git a/R/SoaresEx15.R b/R/SoaresEx15.R new file mode 100644 index 00000000..c1eb7d76 --- /dev/null +++ b/R/SoaresEx15.R @@ -0,0 +1,31 @@ +#' @name SoaresEx15 +#' @title Concentra\enc{ç}{c}\enc{ã}{a}o de minerais no leite materno +#' @description Pesquisa sobre a concentração de minerais no leite +#' materno em 55 mães do Hospital Maternidade Odete Valadares em +#' belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As +#' mães foram divididas em dois grupos, segundo o período de +#' lactação: colostro e leite maduro. Os minerais considerados foram +#' cálcio e zinco. +#' @format Um \code{data.frame} com 108 observações. +#' +#' \describe{ +#' +#' \item{\code{Grupo}}{Grupo colostro ou maduro.} +#' +#' \item{\code{Mineral}}{Mineral análisado na pesquisa. Neste caso, +#' cálcio e zinco.} +#' +#' \item{\code{CTO}}{Concentração do mineral no leite materno.} +#' +#' } +#' @keywords AAS +#' @source Introdução à estatística médica/José Francisco Soares e +#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @examples +#' +#' library(lattice) +#' +#' boxplot(SoaresEx15$CTO) +#' +NULL + diff --git a/data-raw/SoaresEx15.txt b/data-raw/SoaresEx15.txt index 9e81f869..bf330cb2 100644 --- a/data-raw/SoaresEx15.txt +++ b/data-raw/SoaresEx15.txt @@ -1,30 +1,109 @@ -CGC CGM ZGC ZGM -113 159 1.07 0.52 -181 175 1.20 0.60 -254 181 1.30 0.78 -311 188 3.13 0.86 -334 200 3.20 1.08 -145 206 3.70 1.23 -221 213 4.40 1.28 -256 214 4.57 1.31 -312 217 5.20 1.40 -344 231 5.82 1.55 -163 238 6.07 1.55 -225 238 6.13 1.60 -275 242 6.50 1.92 -313 244 6.82 2.15 -372 256 6.82 2.27 -163 259 6.90 2.40 -231 260 7.23 2.41 -296 263 7.42 2.52 -323 264 7.43 2.57 -375 275 7.43 2.60 -167 277 7.45 2.63 -241 279 8.25 2.92 -303 281 8.40 3.02 -325 293 8.77 3.05 -375 302 9.54 3.57 -437 303 3.88 - 314 5.50 - 344 7.38 - 394 +Grupo Mineral CTO +Colostro Calcio 113 +Colostro Calcio 181 +Colostro Calcio 254 +Colostro Calcio 311 +Colostro Calcio 334 +Colostro Calcio 145 +Colostro Calcio 221 +Colostro Calcio 256 +Colostro Calcio 312 +Colostro Calcio 344 +Colostro Calcio 163 +Colostro Calcio 225 +Colostro Calcio 275 +Colostro Calcio 313 +Colostro Calcio 372 +Colostro Calcio 163 +Colostro Calcio 231 +Colostro Calcio 296 +Colostro Calcio 323 +Colostro Calcio 375 +Colostro Calcio 167 +Colostro Calcio 241 +Colostro Calcio 303 +Colostro Calcio 325 +Colostro Calcio 375 +Colostro Calcio 437 +Maduro Calcio 159 +Maduro Calcio 175 +Maduro Calcio 181 +Maduro Calcio 188 +Maduro Calcio 200 +Maduro Calcio 206 +Maduro Calcio 213 +Maduro Calcio 214 +Maduro Calcio 217 +Maduro Calcio 231 +Maduro Calcio 238 +Maduro Calcio 238 +Maduro Calcio 242 +Maduro Calcio 244 +Maduro Calcio 256 +Maduro Calcio 259 +Maduro Calcio 260 +Maduro Calcio 263 +Maduro Calcio 264 +Maduro Calcio 275 +Maduro Calcio 277 +Maduro Calcio 279 +Maduro Calcio 281 +Maduro Calcio 293 +Maduro Calcio 302 +Maduro Calcio 303 +Maduro Calcio 314 +Maduro Calcio 344 +Maduro Calcio 394 +Colostro Zinco 1.07 +Colostro Zinco 1.20 +Colostro Zinco 1.30 +Colostro Zinco 3.13 +Colostro Zinco 3.20 +Colostro Zinco 3.70 +Colostro Zinco 4.40 +Colostro Zinco 4.57 +Colostro Zinco 5.20 +Colostro Zinco 5.82 +Colostro Zinco 6.07 +Colostro Zinco 6.13 +Colostro Zinco 6.50 +Colostro Zinco 6.82 +Colostro Zinco 6.82 +Colostro Zinco 6.90 +Colostro Zinco 7.23 +Colostro Zinco 7.42 +Colostro Zinco 7.43 +Colostro Zinco 7.43 +Colostro Zinco 7.45 +Colostro Zinco 8.25 +Colostro Zinco 8.40 +Colostro Zinco 8.77 +Colostro Zinco 9.54 +Maduro Zinco 0.52 +Maduro Zinco 0.60 +Maduro Zinco 0.78 +Maduro Zinco 0.86 +Maduro Zinco 1.08 +Maduro Zinco 1.23 +Maduro Zinco 1.28 +Maduro Zinco 1.31 +Maduro Zinco 1.40 +Maduro Zinco 1.55 +Maduro Zinco 1.55 +Maduro Zinco 1.60 +Maduro Zinco 1.92 +Maduro Zinco 2.15 +Maduro Zinco 2.27 +Maduro Zinco 2.40 +Maduro Zinco 2.41 +Maduro Zinco 2.52 +Maduro Zinco 2.57 +Maduro Zinco 2.60 +Maduro Zinco 2.63 +Maduro Zinco 2.92 +Maduro Zinco 3.02 +Maduro Zinco 3.05 +Maduro Zinco 3.57 +Maduro Zinco 3.88 +Maduro Zinco 5.50 +Maduro Zinco 7.38 diff --git a/data/SoaresEx15.rda b/data/SoaresEx15.rda new file mode 100644 index 0000000000000000000000000000000000000000..cf46ca1454a995d0165e1fdb57711dbd4875829f GIT binary patch literal 657 zcmZ>Y%CIzaj8qGboL*pF&cK}T|NsB*fA7CYtYSKM=ub%f{{J_e1dbT^Ffup<urV}b z_~a)ZV3KaUo^)`@B%@qmAHfC24lITYClXg&ILLh2L2<ETui#{cE18m<Q$Ee}xRu4$ zz`(e`gaHI{)mKO{&tG!VW@UpgX9LS237;9tEC+m<eN7BzrJS6Qa)47r(AVE3Z5ij{ zD{=uQ7iT%7NHMVWN>#PFT{*$P%l^{)UVUKe*@O%h$43HIvluE5uuu5VQ0Nvoqui%J z;P`(LE<I+UEz9#;?{_Zm;51ufAYj~J@;$?;K~=C}wkLPBlE>yOv!aM;Yr`KL3yRvk z>BZ55LLR)QmE)a^^zOASS*Ul#rKMSP!DKPhEHys?KY?Hmi%hkaNwb-5JBeMg%XG@f z<nT50_PCnd6*{xwQ0^AaW`Se3Jhv}Daq8T!MSZ)MJ`iY5O0kRbaS4iexb5)SwG&@0 z(3@tsOHh1%x^cqZt)dxhlV2T^JtJH>-^;STCoK1Kg!)z2cbd+kH9^`vZ>Mh#Fxn(A z(=*j*4v&?BpZpoCr)IL*g@WFmW-2#y=JT%44|;Yl)h;v0N1H`l^-J3)>$eR;x2vTt zyD)tgcw~B@rt$N#9T%81GUbZ1&vQ#&(hAaZTqa)N!_M^U^xguE{Zc%}%}YF-1F}_g zk{ixQKjb%RI@~9@DC$kps?tkhOwRqz%rorx{@f6HwkL}*Xs$w=lrmF;D!-q?Qo+Tx zT<L7AcfL$3mM*OPa$r%7a>Mc;i%TB(@qbz25;^<V$_t$=^Bx&xU%8?1SGTy4|ANXY zcE+N8oyS&ipK$$jE-tpt&MH*d-rC&m@ss~q9;puhFK`NaE&8XzD)6fLishU|@gK`o Mf?GK`%bCjy06{_&k^lez literal 0 HcmV?d00001 diff --git a/man/SoaresEx15.Rd b/man/SoaresEx15.Rd new file mode 100644 index 00000000..55bce77e --- /dev/null +++ b/man/SoaresEx15.Rd @@ -0,0 +1,38 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/SoaresEx15.R +\name{SoaresEx15} +\alias{SoaresEx15} +\title{Concentra\enc{ç}{c}\enc{ã}{a}o de minerais no leite materno} +\format{Um \code{data.frame} com 108 observações. + +\describe{ + +\item{\code{Grupo}}{Grupo colostro ou maduro.} + +\item{\code{Mineral}}{Mineral análisado na pesquisa. Neste caso, + cálcio e zinco.} + +\item{\code{CTO}}{Concentração do mineral no leite materno.} + +}} +\source{ +Introdução à estatística médica/José Francisco Soares e +Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +} +\description{ +Pesquisa sobre a concentração de minerais no leite + materno em 55 mães do Hospital Maternidade Odete Valadares em + belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As + mães foram divididas em dois grupos, segundo o período de + lactação: colostro e leite maduro. Os minerais considerados foram + cálcio e zinco. +} +\examples{ + +library(lattice) + +boxplot(SoaresEx15$CTO) + +} +\keyword{AAS} + -- GitLab From a7bc6abb9ce98d08fc8d92f1e784084a890177d4 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Sat, 22 Oct 2016 12:09:48 -0200 Subject: [PATCH 8/9] =?UTF-8?q?Corre=C3=A7oes=20nas=20documentacoes.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/SoaresEx11.R | 41 +++++++++++++++++++++++------------------ R/SoaresEx13.R | 41 ++++++++++++++++++++--------------------- R/SoaresEx15.R | 38 ++++++++++++++++++++++++-------------- R/SoaresEx8.R | 23 +++++++++++------------ R/SoaresTb3.1.R | 20 ++++++++------------ R/SoaresTb3.19.R | 26 +++++++++++++------------- R/SoaresTb3.2.R | 28 +++++++++++----------------- man/SoaresEx11.Rd | 37 +++++++++++++++++++++---------------- man/SoaresEx13.Rd | 33 ++++++++++++++++----------------- man/SoaresEx15.Rd | 25 +++++++++++++++---------- man/SoaresEx8.Rd | 19 ++++++++++--------- man/SoaresTb3.1.Rd | 16 ++++++---------- man/SoaresTb3.19.Rd | 22 ++++++++++++---------- man/SoaresTb3.2.Rd | 24 ++++++++++-------------- 14 files changed, 200 insertions(+), 193 deletions(-) diff --git a/R/SoaresEx11.R b/R/SoaresEx11.R index 955c7fb4..044a36f9 100644 --- a/R/SoaresEx11.R +++ b/R/SoaresEx11.R @@ -1,25 +1,27 @@ #' @name SoaresEx11 -#' @title Resultados de uma prova de Estatística -#' @description Os dados apresentados constituem o resultado da segunda -#' prova da turma C do 1° semestre de 1990 da disciplina de -#' Estatística para Medicina. -#' @format Um \code{data.frame} com 48 observações. -#' +#' @title Resultados de uma Prova de Estatística +#' @description Os dados apresentados constituem o resultado da segunda +#' prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina +#' de Estatística para Medicina. TODO É um resultado de prova ou de +#' avaliação de doença? A descrição do dado não confere com a +#' descrição das variáveis. +#' @format Um \code{data.frame} com 48 observações, em que +#' #' \describe{ #' -#' \item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a -#' recidiva em pacientes do sexo masculino} +#' \item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a +#' recidiva em pacientes do sexo masculino.} #' -#' \item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a -#' recidiva em pacientes do sexo feminino.} +#' \item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a +#' recidiva em pacientes do sexo feminino.} #' #' } #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), TODO página XX, exercício 11. #' @examples #' -#' library(lattice) +#' data(SoaresEx11) +#' str(SoaresEx11) #' #' par(mfrow = c(1,2)) #' hist(SoaresEx11$m, @@ -29,16 +31,19 @@ #' ylim = c(0, 8), #' ylab = "Frequência absoluta", #' xlab = "Tempo (em meses)") -#' #' rug(SoaresEx11$m) -#' +#' #' hist(SoaresEx11$f, #' labels = TRUE, #' col = "darkolivegreen1", #' main = "Pacientes do sexo feminino", #' ylab = "Frequência absoluta", #' xlab = "Tempo (em meses)") -#' -#' rug(SoaresEx11$f) -#' +#' rug(SoaresEx11$f) +#' +#' library(latticeExtra) +#' +#' histogram(~m + f, data = SoaresEx11) + +#' layer(panel.rug(x)) +#' NULL diff --git a/R/SoaresEx13.R b/R/SoaresEx13.R index 7b29926d..475608da 100644 --- a/R/SoaresEx13.R +++ b/R/SoaresEx13.R @@ -1,31 +1,30 @@ #' @name SoaresEx13 -#' @title Notas de um teste de psicoanalogia -#' @description Os dados apresentados referem-se as notas de 158 -#' indivíduos que realizaram um teste de psicoanalogia (um teste de -#' inteligência em que o indivíduo tem que resolver uma série de -#' analogias). -#' @format Um \code{data.frame} com 158 observações. -#' +#' @title Notas de um Teste de Psicoanalogia +#' @description Os dados apresentados referem-se as notas de 158 +#' indivíduos que realizaram um teste de psicoanalogia (um teste de +#' inteligência em que o indivíduo tem que resolver uma série de +#' analogias). OS dados estão agregados com as frequências absolutas +#' em classes de tamanho 3. +#' @format Um \code{data.frame} com 158 observações, em que +#' #' \describe{ #' #' \item{\code{Escore}}{Notas atribuídas em classes.} #' #' \item{\code{FAS}}{Frequência Absoluta Simples.} -#' +#' #' } #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 13. #' @examples #' -#' library(lattice) -#' -#' par(las=2) -#' barplot(SoaresEx13$FAS, names.arg = SoaresEx13$Escore, -#' cex.names = 0.8, -#' xlab = "Escore", -#' ylab = "Frequência absoluta simples", -#' ylim = c(0, 25)) -#' -#' -NULL \ No newline at end of file +#' layout(1) +#' par(las = 2) +#' barplot(SoaresEx13$FAS, +#' names.arg = SoaresEx13$Escore, +#' cex.names = 0.8, +#' xlab = "Escore", +#' ylab = "Frequência absoluta simples", +#' ylim = c(0, 25)) +#' +NULL diff --git a/R/SoaresEx15.R b/R/SoaresEx15.R index c1eb7d76..a67520dc 100644 --- a/R/SoaresEx15.R +++ b/R/SoaresEx15.R @@ -1,31 +1,41 @@ #' @name SoaresEx15 -#' @title Concentra\enc{ç}{c}\enc{ã}{a}o de minerais no leite materno -#' @description Pesquisa sobre a concentração de minerais no leite +#' @title Concentra\enc{ç}{c}\enc{ã}{a}o de Minerais no Leite Materno +#' @description Pesquisa sobre a concentração de minerais no leite #' materno em 55 mães do Hospital Maternidade Odete Valadares em -#' belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As -#' mães foram divididas em dois grupos, segundo o período de +#' Belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As +#' mães foram divididas em dois grupos, segundo o período de #' lactação: colostro e leite maduro. Os minerais considerados foram -#' cálcio e zinco. -#' @format Um \code{data.frame} com 108 observações. -#' +#' cálcio e zinco. +#' @format Um \code{data.frame} com 108 observações, em que +#' #' \describe{ #' #' \item{\code{Grupo}}{Grupo colostro ou maduro.} #' #' \item{\code{Mineral}}{Mineral análisado na pesquisa. Neste caso, #' cálcio e zinco.} -#' +#' #' \item{\code{CTO}}{Concentração do mineral no leite materno.} -#' +#' #' } #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 15. #' @examples #' -#' library(lattice) -#' +#' str(SoaresEx15) #' boxplot(SoaresEx15$CTO) -#' +#' +#' library(lattice) +#' +#' xyplot(CTO ~ Grupo | Mineral, +#' data = SoaresEx15, +#' scales = "free", +#' type = c("p", "a")) +#' NULL +# TODO Estes dados parecer ser pareados, ou seja, os valores de zinco e +# cálcio saem aos pares de cada mulher. Então, cada mineral deveria ser +# uma coluna. A tabela teria que ter as colunas {grupo, calcio, zinco}, +# nas colunas calcio e zinco estão os calores de CTO, ao todo serão 55 +# linhas, uma por mãe. diff --git a/R/SoaresEx8.R b/R/SoaresEx8.R index 0b2e3e1b..084698ed 100644 --- a/R/SoaresEx8.R +++ b/R/SoaresEx8.R @@ -1,15 +1,15 @@ #' @name SoaresEx8 -#' @title Resultados de uma prova de Estatística -#' @description Os dados apresentados constituem o resultado da segunda -#' prova da turma C do 1° semestre de 1990 da disciplina de -#' Estatística para Medicina. +#' @title Resultados de uma Prova de Estatística +#' @description Os dados apresentados constituem o resultado da segunda +#' prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina +#' de Estatística para Medicina. TODO essa prova é de 0 a 10? #' @format Um \code{vetor} numérico com 35 observações. #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 8. #' @examples #' -#' library(lattice) +#' data(SoaresEx8) +#' str(SoaresEx8) #' #' hist(SoaresEx8, #' labels = TRUE, @@ -17,9 +17,8 @@ #' main = NULL, #' ylab = "Frequência absoluta", #' xlab = "Nota na segunda prova") -#' -#' rug(SoaresTb3.19) -#' +#' rug(SoaresEx8) +#' +#' stem(SoaresEx8) +#' NULL - - diff --git a/R/SoaresTb3.1.R b/R/SoaresTb3.1.R index 79c6f1e5..2a30a0eb 100644 --- a/R/SoaresTb3.1.R +++ b/R/SoaresTb3.1.R @@ -1,26 +1,22 @@ #' @name SoaresTb3.1 -#' @title Teor de gordura fecal em crianças. -#' @description Embora os gastroenterologistas infantis reconhecessem -#' a utilidade diagnóstica do teor de gordura fecal, até 1984 não -#' existia um padrão de referência dessa medida para crianças -#' brasileiras. Para preencher esta lacuna, o Professor Francisco +#' @title Teor de Gordura Fecal em Crianças +#' @description Embora os gastroenterologistas infantis reconhecessem a +#' utilidade diagnóstica do teor de gordura fecal, até 1984 não +#' existia um padrão de referência dessa medida para crianças +#' brasileiras. Para preencher esta lacuna, o Professor Francisco #' Penna, titular de Pediatria da UFMG, examinou 43 crianças sadias -#' que produziram tais valores expressos em g/24 horas. +#' que produziram tais valores expressos em g/24 horas. #' @format Um \code{vetor} numérico com 43 observações. #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.1. #' @examples #' -#' library(lattice) -#' #' hist(SoaresTb3.1, #' labels = TRUE, #' col = "darkslategray1", #' main = NULL, #' ylab = "Frequência absoluta", #' xlab = "Teor de gordura (g/24 horas)") -#' #' rug(SoaresTb3.1) -#' +#' NULL diff --git a/R/SoaresTb3.19.R b/R/SoaresTb3.19.R index afba682d..7c287644 100644 --- a/R/SoaresTb3.19.R +++ b/R/SoaresTb3.19.R @@ -1,18 +1,20 @@ #' @name SoaresTb3.19 -#' @title Doença de Chagas. -#' @description Em 1992, Mota fez um estudo comparativo de crianças +#' @title Doença de Chagas TODO título está vago! +#' @description Em 1992, Mota fez um estudo comparativo de crianças #' filhas de mães chagásicas com filhas de mães não chagásicas -#' (grupo de controle). Neste estudo foram foram consideradas -#' dosagens obtidas em exames laboratoriais, medidas de variáveis -#' vitais, antropométricas e de desenvolvimeto motor (firmar a -#' cabeça, sentar e andar). +#' (grupo de controle). Neste estudo foram foram consideradas +#' dosagens obtidas em exames laboratoriais, medidas de variáveis +#' vitais, antropométricas e de desenvolvimeto motor (firmar a +#' cabeça, sentar e andar). TODO não deveria ter a variável que +#' distingue se a criança é de mãe com chagas ou não? Esses +#' resultados são de que tipo de criança? #' @format Um \code{vetor} numérico com 46 observações. #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.19. #' @examples #' -#' library(lattice) +#' data(SoaresTb3.19) +#' str(SoaresTb3.19) #' #' hist(SoaresTb3.19, #' labels = TRUE, @@ -20,9 +22,7 @@ #' main = NULL, #' ylab = "Frequência absoluta", #' xlab = "Dosagem de bilirrubina (mg/dL)") -#' +#' #' rug(SoaresTb3.19) -#' +#' NULL - - diff --git a/R/SoaresTb3.2.R b/R/SoaresTb3.2.R index 3c6c2776..b633f6c7 100644 --- a/R/SoaresTb3.2.R +++ b/R/SoaresTb3.2.R @@ -1,30 +1,24 @@ #' @name SoaresTb3.2 -#' @title Doenças cardiovasculares em Honolulu. -#' @description Em 1969 estudo realizado na população de Honolulu -#' (descrito em Kuzma, 1998). Para 7.683 indivíduos, foram -#' pesquisadas as seguintes variáveis: nível educacional, peso (Kg), -#' altura (cm), idade (anos), glicemia (\eqn{mg.dL^{-1}}), colesterol -#' sérico (\eqn{mg.dL^{-1}}) e pressão sistólica (\eqn{mmHg^{-1}}). -#' Cada indivíduo foi classificado quanto ao hábito de fumar -#' (fumante ou não) e quanto à atividade em casa (pouca, moderada e -#' muita). +#' @title Doenças Cardiovasculares em Honolulu +#' @description Em 1969 estudo realizado na população de Honolulu +#' (descrito em Kuzma, 1998). Para 7683 indivíduos, foram +#' pesquisadas as seguintes variáveis: nível educacional, peso (kg), +#' altura (cm), idade (anos), glicemia (mg dL\eqn{^{-1}}), +#' colesterol sérico (mg dL\eqn{^{-1}}) e pressão sistólica +#' (mmHg\eqn{^{-1}}). Cada indivíduo foi classificado quanto ao +#' hábito de fumar (fumante ou não) e quanto à atividade em casa +#' (pouca, moderada e muita). #' @format Um \code{vetor} numérico com 80 observações. #' @keywords AAS -#' @source Introdução à estatística médica/José Francisco Soares e -#' Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.2. #' @examples #' -#' library(lattice) -#' #' hist(SoaresTb3.2, #' labels = TRUE, #' col = "steelblue", #' main = NULL, #' ylab = "Frequência absoluta", #' xlab = "Teor de colesterol (mg/dL)") -#' #' rug(SoaresTb3.2) -#' +#' NULL - - diff --git a/man/SoaresEx11.Rd b/man/SoaresEx11.Rd index 5cc1fe2a..a0b86f94 100644 --- a/man/SoaresEx11.Rd +++ b/man/SoaresEx11.Rd @@ -2,30 +2,32 @@ % Please edit documentation in R/SoaresEx11.R \name{SoaresEx11} \alias{SoaresEx11} -\title{Resultados de uma prova de Estatística} -\format{Um \code{data.frame} com 48 observações. +\title{Resultados de uma Prova de Estatística} +\format{Um \code{data.frame} com 48 observações, em que \describe{ -\item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a -recidiva em pacientes do sexo masculino} +\item{\code{m}}{Tempo (em meses) entre a remissão de uma doença e a + recidiva em pacientes do sexo masculino.} -\item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a -recidiva em pacientes do sexo feminino.} +\item{\code{f}}{Tempo (em meses) entre a remissão de uma doença e a + recidiva em pacientes do sexo feminino.} }} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), TODO página XX, exercício 11. } \description{ -Os dados apresentados constituem o resultado da segunda - prova da turma C do 1° semestre de 1990 da disciplina de - Estatística para Medicina. +Os dados apresentados constituem o resultado da segunda + prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina + de Estatística para Medicina. TODO É um resultado de prova ou de + avaliação de doença? A descrição do dado não confere com a + descrição das variáveis. } \examples{ -library(lattice) +data(SoaresEx11) +str(SoaresEx11) par(mfrow = c(1,2)) hist(SoaresEx11$m, @@ -35,7 +37,6 @@ hist(SoaresEx11$m, ylim = c(0, 8), ylab = "Frequência absoluta", xlab = "Tempo (em meses)") - rug(SoaresEx11$m) hist(SoaresEx11$f, @@ -44,9 +45,13 @@ hist(SoaresEx11$f, main = "Pacientes do sexo feminino", ylab = "Frequência absoluta", xlab = "Tempo (em meses)") - - rug(SoaresEx11$f) - +rug(SoaresEx11$f) + +library(latticeExtra) + +histogram(~m + f, data = SoaresEx11) + + layer(panel.rug(x)) + } \keyword{AAS} diff --git a/man/SoaresEx13.Rd b/man/SoaresEx13.Rd index baf9b724..147f3efa 100644 --- a/man/SoaresEx13.Rd +++ b/man/SoaresEx13.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/SoaresEx13.R \name{SoaresEx13} \alias{SoaresEx13} -\title{Notas de um teste de psicoanalogia} -\format{Um \code{data.frame} com 158 observações. +\title{Notas de um Teste de Psicoanalogia} +\format{Um \code{data.frame} com 158 observações, em que \describe{ @@ -13,27 +13,26 @@ }} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, exercício 13. } \description{ -Os dados apresentados referem-se as notas de 158 - indivíduos que realizaram um teste de psicoanalogia (um teste de - inteligência em que o indivíduo tem que resolver uma série de - analogias). +Os dados apresentados referem-se as notas de 158 + indivíduos que realizaram um teste de psicoanalogia (um teste de + inteligência em que o indivíduo tem que resolver uma série de + analogias). OS dados estão agregados com as frequências absolutas + em classes de tamanho 3. } \examples{ -library(lattice) +layout(1) +par(las = 2) +barplot(SoaresEx13$FAS, + names.arg = SoaresEx13$Escore, + cex.names = 0.8, + xlab = "Escore", + ylab = "Frequência absoluta simples", + ylim = c(0, 25)) -par(las=2) -barplot(SoaresEx13$FAS, names.arg = SoaresEx13$Escore, - cex.names = 0.8, - xlab = "Escore", - ylab = "Frequência absoluta simples", - ylim = c(0, 25)) - - } \keyword{AAS} diff --git a/man/SoaresEx15.Rd b/man/SoaresEx15.Rd index 55bce77e..4efce1e8 100644 --- a/man/SoaresEx15.Rd +++ b/man/SoaresEx15.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/SoaresEx15.R \name{SoaresEx15} \alias{SoaresEx15} -\title{Concentra\enc{ç}{c}\enc{ã}{a}o de minerais no leite materno} -\format{Um \code{data.frame} com 108 observações. +\title{Concentra\enc{ç}{c}\enc{ã}{a}o de Minerais no Leite Materno} +\format{Um \code{data.frame} com 108 observações, em que \describe{ @@ -13,26 +13,31 @@ cálcio e zinco.} \item{\code{CTO}}{Concentração do mineral no leite materno.} - + }} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, exercício 15. } \description{ -Pesquisa sobre a concentração de minerais no leite +Pesquisa sobre a concentração de minerais no leite materno em 55 mães do Hospital Maternidade Odete Valadares em - belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As - mães foram divididas em dois grupos, segundo o período de + Belo Horizonte, MG. Foram coletados no período de 1984 a 1985. As + mães foram divididas em dois grupos, segundo o período de lactação: colostro e leite maduro. Os minerais considerados foram cálcio e zinco. } \examples{ +str(SoaresEx15) +boxplot(SoaresEx15$CTO) + library(lattice) -boxplot(SoaresEx15$CTO) - +xyplot(CTO ~ Grupo | Mineral, + data = SoaresEx15, + scales = "free", + type = c("p", "a")) + } \keyword{AAS} diff --git a/man/SoaresEx8.Rd b/man/SoaresEx8.Rd index 04f24073..b4a40511 100644 --- a/man/SoaresEx8.Rd +++ b/man/SoaresEx8.Rd @@ -2,20 +2,20 @@ % Please edit documentation in R/SoaresEx8.R \name{SoaresEx8} \alias{SoaresEx8} -\title{Resultados de uma prova de Estatística} +\title{Resultados de uma Prova de Estatística} \format{Um \code{vetor} numérico com 35 observações.} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, exercício 8. } \description{ -Os dados apresentados constituem o resultado da segunda - prova da turma C do 1° semestre de 1990 da disciplina de - Estatística para Medicina. +Os dados apresentados constituem o resultado da segunda + prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina + de Estatística para Medicina. TODO essa prova é de 0 a 10? } \examples{ -library(lattice) +data(SoaresEx8) +str(SoaresEx8) hist(SoaresEx8, labels = TRUE, @@ -23,8 +23,9 @@ hist(SoaresEx8, main = NULL, ylab = "Frequência absoluta", xlab = "Nota na segunda prova") - -rug(SoaresTb3.19) +rug(SoaresEx8) + +stem(SoaresEx8) } \keyword{AAS} diff --git a/man/SoaresTb3.1.Rd b/man/SoaresTb3.1.Rd index 78365e6b..0fe39a78 100644 --- a/man/SoaresTb3.1.Rd +++ b/man/SoaresTb3.1.Rd @@ -2,31 +2,27 @@ % Please edit documentation in R/SoaresTb3.1.R \name{SoaresTb3.1} \alias{SoaresTb3.1} -\title{Teor de gordura fecal em crianças.} +\title{Teor de Gordura Fecal em Crianças} \format{Um \code{vetor} numérico com 43 observações.} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, tabela 3.1. } \description{ -Embora os gastroenterologistas infantis reconhecessem - a utilidade diagnóstica do teor de gordura fecal, até 1984 não - existia um padrão de referência dessa medida para crianças - brasileiras. Para preencher esta lacuna, o Professor Francisco +Embora os gastroenterologistas infantis reconhecessem a + utilidade diagnóstica do teor de gordura fecal, até 1984 não + existia um padrão de referência dessa medida para crianças + brasileiras. Para preencher esta lacuna, o Professor Francisco Penna, titular de Pediatria da UFMG, examinou 43 crianças sadias que produziram tais valores expressos em g/24 horas. } \examples{ -library(lattice) - hist(SoaresTb3.1, labels = TRUE, col = "darkslategray1", main = NULL, ylab = "Frequência absoluta", xlab = "Teor de gordura (g/24 horas)") - rug(SoaresTb3.1) } diff --git a/man/SoaresTb3.19.Rd b/man/SoaresTb3.19.Rd index d29cef43..d1cb9bd8 100644 --- a/man/SoaresTb3.19.Rd +++ b/man/SoaresTb3.19.Rd @@ -2,23 +2,25 @@ % Please edit documentation in R/SoaresTb3.19.R \name{SoaresTb3.19} \alias{SoaresTb3.19} -\title{Doença de Chagas.} +\title{Doença de Chagas TODO título está vago!} \format{Um \code{vetor} numérico com 46 observações.} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, tabela 3.19. } \description{ -Em 1992, Mota fez um estudo comparativo de crianças +Em 1992, Mota fez um estudo comparativo de crianças filhas de mães chagásicas com filhas de mães não chagásicas - (grupo de controle). Neste estudo foram foram consideradas - dosagens obtidas em exames laboratoriais, medidas de variáveis - vitais, antropométricas e de desenvolvimeto motor (firmar a - cabeça, sentar e andar). + (grupo de controle). Neste estudo foram foram consideradas + dosagens obtidas em exames laboratoriais, medidas de variáveis + vitais, antropométricas e de desenvolvimeto motor (firmar a + cabeça, sentar e andar). TODO não deveria ter a variável que + distingue se a criança é de mãe com chagas ou não? Esses + resultados são de que tipo de criança? } \examples{ -library(lattice) +data(SoaresTb3.19) +str(SoaresTb3.19) hist(SoaresTb3.19, labels = TRUE, @@ -26,7 +28,7 @@ hist(SoaresTb3.19, main = NULL, ylab = "Frequência absoluta", xlab = "Dosagem de bilirrubina (mg/dL)") - + rug(SoaresTb3.19) } diff --git a/man/SoaresTb3.2.Rd b/man/SoaresTb3.2.Rd index b74fda2e..cb44fbe3 100644 --- a/man/SoaresTb3.2.Rd +++ b/man/SoaresTb3.2.Rd @@ -2,33 +2,29 @@ % Please edit documentation in R/SoaresTb3.2.R \name{SoaresTb3.2} \alias{SoaresTb3.2} -\title{Doenças cardiovasculares em Honolulu.} +\title{Doenças Cardiovasculares em Honolulu} \format{Um \code{vetor} numérico com 80 observações.} \source{ -Introdução à estatística médica/José Francisco Soares e -Arminda lucia Siqueira. 2.ed. Belo Horizonte: COOPMED, 2002. +SOARES; SIQUEIRA (2002), página TODO, tabela 3.2. } \description{ -Em 1969 estudo realizado na população de Honolulu - (descrito em Kuzma, 1998). Para 7.683 indivíduos, foram - pesquisadas as seguintes variáveis: nível educacional, peso (Kg), - altura (cm), idade (anos), glicemia (\eqn{mg.dL^{-1}}), colesterol - sérico (\eqn{mg.dL^{-1}}) e pressão sistólica (\eqn{mmHg^{-1}}). - Cada indivíduo foi classificado quanto ao hábito de fumar - (fumante ou não) e quanto à atividade em casa (pouca, moderada e - muita). +Em 1969 estudo realizado na população de Honolulu + (descrito em Kuzma, 1998). Para 7683 indivíduos, foram + pesquisadas as seguintes variáveis: nível educacional, peso (kg), + altura (cm), idade (anos), glicemia (mg dL\eqn{^{-1}}), + colesterol sérico (mg dL\eqn{^{-1}}) e pressão sistólica + (mmHg\eqn{^{-1}}). Cada indivíduo foi classificado quanto ao + hábito de fumar (fumante ou não) e quanto à atividade em casa + (pouca, moderada e muita). } \examples{ -library(lattice) - hist(SoaresTb3.2, labels = TRUE, col = "steelblue", main = NULL, ylab = "Frequência absoluta", xlab = "Teor de colesterol (mg/dL)") - rug(SoaresTb3.2) } -- GitLab From ca79f4bd0e799bc3bc5013a30746ab7e52619469 Mon Sep 17 00:00:00 2001 From: Vinicius <vinicius.cesar.pedroso@gmail.com> Date: Tue, 25 Oct 2016 18:50:28 -0200 Subject: [PATCH 9/9] Adiciona correcoes finalizadas --- R/SoaresEx11.R | 14 +++++++------- R/SoaresEx13.R | 4 ++-- R/SoaresEx15.R | 10 ++-------- R/SoaresEx8.R | 4 ++-- R/SoaresTb3.1.R | 2 +- R/SoaresTb3.19.R | 9 ++++----- R/SoaresTb3.2.R | 2 +- 7 files changed, 19 insertions(+), 26 deletions(-) diff --git a/R/SoaresEx11.R b/R/SoaresEx11.R index 044a36f9..236802f6 100644 --- a/R/SoaresEx11.R +++ b/R/SoaresEx11.R @@ -1,10 +1,10 @@ #' @name SoaresEx11 -#' @title Resultados de uma Prova de Estatística -#' @description Os dados apresentados constituem o resultado da segunda -#' prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina -#' de Estatística para Medicina. TODO É um resultado de prova ou de -#' avaliação de doença? A descrição do dado não confere com a -#' descrição das variáveis. +#' @title Tempo (em meses) entre a remissão de uma doença e a recidiva +#' de 48 pacientes. +#' @description Os dados apresentados tratam do tempo (em meses) entre a +#' remissão de uma doença e a recidiva de 48 pacientes de uma +#' determinada clínica médica. São apresentados separadamente para +#' os sexos masculino (M) e feminino (F). #' @format Um \code{data.frame} com 48 observações, em que #' #' \describe{ @@ -17,7 +17,7 @@ #' #' } #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), TODO página XX, exercício 11. +#' @source SOARES; SIQUEIRA (2002), página 80, exercício 11. #' @examples #' #' data(SoaresEx11) diff --git a/R/SoaresEx13.R b/R/SoaresEx13.R index 475608da..13b45943 100644 --- a/R/SoaresEx13.R +++ b/R/SoaresEx13.R @@ -3,7 +3,7 @@ #' @description Os dados apresentados referem-se as notas de 158 #' indivíduos que realizaram um teste de psicoanalogia (um teste de #' inteligência em que o indivíduo tem que resolver uma série de -#' analogias). OS dados estão agregados com as frequências absolutas +#' analogias). Os dados estão agregados com as frequências absolutas #' em classes de tamanho 3. #' @format Um \code{data.frame} com 158 observações, em que #' @@ -15,7 +15,7 @@ #' #' } #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 13. +#' @source SOARES; SIQUEIRA (2002), página 80, exercício 13. #' @examples #' #' layout(1) diff --git a/R/SoaresEx15.R b/R/SoaresEx15.R index a67520dc..5dae0fa8 100644 --- a/R/SoaresEx15.R +++ b/R/SoaresEx15.R @@ -18,8 +18,8 @@ #' \item{\code{CTO}}{Concentração do mineral no leite materno.} #' #' } -#' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 15. +#' @keywords TC +#' @source SOARES; SIQUEIRA (2002), página 82, exercício 15. #' @examples #' #' str(SoaresEx15) @@ -33,9 +33,3 @@ #' type = c("p", "a")) #' NULL - -# TODO Estes dados parecer ser pareados, ou seja, os valores de zinco e -# cálcio saem aos pares de cada mulher. Então, cada mineral deveria ser -# uma coluna. A tabela teria que ter as colunas {grupo, calcio, zinco}, -# nas colunas calcio e zinco estão os calores de CTO, ao todo serão 55 -# linhas, uma por mãe. diff --git a/R/SoaresEx8.R b/R/SoaresEx8.R index 084698ed..3fadebd4 100644 --- a/R/SoaresEx8.R +++ b/R/SoaresEx8.R @@ -2,10 +2,10 @@ #' @title Resultados de uma Prova de Estatística #' @description Os dados apresentados constituem o resultado da segunda #' prova da turma C do 1\eqn{^\circ} semestre de 1990 da disciplina -#' de Estatística para Medicina. TODO essa prova é de 0 a 10? +#' de Estatística para Medicina. #' @format Um \code{vetor} numérico com 35 observações. #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, exercício 8. +#' @source SOARES; SIQUEIRA (2002), página 79, exercício 8. #' @examples #' #' data(SoaresEx8) diff --git a/R/SoaresTb3.1.R b/R/SoaresTb3.1.R index 2a30a0eb..c260ec11 100644 --- a/R/SoaresTb3.1.R +++ b/R/SoaresTb3.1.R @@ -8,7 +8,7 @@ #' que produziram tais valores expressos em g/24 horas. #' @format Um \code{vetor} numérico com 43 observações. #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.1. +#' @source SOARES; SIQUEIRA (2002), página 37, tabela 3.1. #' @examples #' #' hist(SoaresTb3.1, diff --git a/R/SoaresTb3.19.R b/R/SoaresTb3.19.R index 7c287644..9aead8b5 100644 --- a/R/SoaresTb3.19.R +++ b/R/SoaresTb3.19.R @@ -1,16 +1,15 @@ #' @name SoaresTb3.19 -#' @title Doença de Chagas TODO título está vago! +#' @title Dosagem de bilirrubina (mg/dL) de 46 crianças filhas de +#' m\enc{ã}{a}es chagásticas #' @description Em 1992, Mota fez um estudo comparativo de crianças #' filhas de mães chagásicas com filhas de mães não chagásicas #' (grupo de controle). Neste estudo foram foram consideradas #' dosagens obtidas em exames laboratoriais, medidas de variáveis #' vitais, antropométricas e de desenvolvimeto motor (firmar a -#' cabeça, sentar e andar). TODO não deveria ter a variável que -#' distingue se a criança é de mãe com chagas ou não? Esses -#' resultados são de que tipo de criança? +#' cabeça, sentar e andar). #' @format Um \code{vetor} numérico com 46 observações. #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.19. +#' @source SOARES; SIQUEIRA (2002), página 70, tabela 3.19. #' @examples #' #' data(SoaresTb3.19) diff --git a/R/SoaresTb3.2.R b/R/SoaresTb3.2.R index b633f6c7..828e1066 100644 --- a/R/SoaresTb3.2.R +++ b/R/SoaresTb3.2.R @@ -10,7 +10,7 @@ #' (pouca, moderada e muita). #' @format Um \code{vetor} numérico com 80 observações. #' @keywords AAS -#' @source SOARES; SIQUEIRA (2002), página TODO, tabela 3.2. +#' @source SOARES; SIQUEIRA (2002), página 38, tabela 3.2. #' @examples #' #' hist(SoaresTb3.2, -- GitLab