From 0c85f75315fd916e9a5e94e49eb1d914e3660cb4 Mon Sep 17 00:00:00 2001 From: noah Date: Fri, 30 Sep 2022 12:27:18 -0500 Subject: [PATCH] Part E --- .~lock.Schrick-Noah_CS-6643_Lab-4.docx# | 2 +- Schrick-Noah_CS-6643_Lab-4.R | 9 +++++++++ Schrick-Noah_CS-6643_Lab-4.docx | Bin 40441 -> 41279 bytes 3 files changed, 10 insertions(+), 1 deletion(-) diff --git a/.~lock.Schrick-Noah_CS-6643_Lab-4.docx# b/.~lock.Schrick-Noah_CS-6643_Lab-4.docx# index 20caa52..1ed054f 100644 --- a/.~lock.Schrick-Noah_CS-6643_Lab-4.docx# +++ b/.~lock.Schrick-Noah_CS-6643_Lab-4.docx# @@ -1 +1 @@ -,noah,NovaArchSys,30.09.2022 12:12,file:///home/noah/.config/libreoffice/4; \ No newline at end of file +,noah,NovaArchSys,30.09.2022 12:27,file:///home/noah/.config/libreoffice/4; \ No newline at end of file diff --git a/Schrick-Noah_CS-6643_Lab-4.R b/Schrick-Noah_CS-6643_Lab-4.R index 51cab6c..1767a9c 100644 --- a/Schrick-Noah_CS-6643_Lab-4.R +++ b/Schrick-Noah_CS-6643_Lab-4.R @@ -130,3 +130,12 @@ p <- ggplot(mytopgene.data.df, aes(x=phenotype, y=mygene, fill=phenotype)) + stat_boxplot(geom ='errorbar') + geom_boxplot() p <- p + xlab("MDD versus HC") + ylab(mygene) p + + +#### Part E: Interpretation of top genes +top_cutoff <- 200 +top_genes <- as.character(ttest_allgene.sorted[1:top_cutoff,1]) +write.table(top_genes, sep="\t", file="", quote=F, row.names=F, col.names=F) + + +#### Optional 1: Identify Outliers \ No newline at end of file diff --git a/Schrick-Noah_CS-6643_Lab-4.docx b/Schrick-Noah_CS-6643_Lab-4.docx index 78c7611ea2b7f37041b9421c53929508d8b54f87..2de48857676d8c27300f4ddb505fac9c87cb3f9d 100644 GIT binary patch delta 12324 zcmZvC1#B2S)@_)XlZKf&X_%RlhPh#Am~k3rW@ct?m>OnI!_3T_*Khw_X;*q<%~-a4 zuB>xp`)Yii+rhf~zz~#V!67g}U|?WCj3Vj~h(N)NA`%!tnSk~}T!heOQqUDhN)i@` z9W0d^_(sb__sDmzcvl7k^slRz`+ugc?{*5Rc=bc4XqE_Y3S8&YF#(?!h*f0FjHj>hl zu2QwDhZx1pmKfL>N z;>k_LZJt?l#y1h2@<+^`5yvZg*5I`BOT1OI$Y_IT-hI8S5wY}yo*WaePX>_n-!zI&6;6} zU-~tZ9-B_tb4(qr3rTK}Hoq{+h#>PW{R~+Tcj8|{&Rp7V_>IekEh!)iec=Z;W1%~i zRQ#IpBM)Kv3VkiBw8=~~VL3Sb8iJhQ%B-#Q%9*6FAkD8x0j+NVwbV%c5WN%r!z4N7 zphu6t?-xF>(`6UWr|=upxe0r5=gaf4hIN*-AX^(bBm%AR4=X-E@*t#bv8b=P+Mth$z zZO9{vv|K;}0N%zNJPw*T&ONGtbQbS-Zk_M*L+&~%@@Xy%UkI(8&A<>ymC_g)eWHfPg!RF)yQ{4$tpLO_=G{mV8q zO!kJyvhH8@_5aQOf5;b51NrAk@P(NAXI&^lG66}w3cJiG!IymEd%Ui5kjdim%8=sW zVqaAIS{)P0b}0xY9}@dkYb@K9AXIf|R(B)Mfi8eP#w%s2I6Aw>!-nNM%VjN0ZEcZ6 zQfe2Zw#nsNbMYSzRNddUyGx>E^24xgpT4XiRIbWVM0 z^KO~AS%EmcTtH0Ju1;XFQ}P+Q+GR#q*F&JPVO13#S->OOBq(F}FyyW-jP3T`@FSBfML=z=0{J9;`aqb0+)= zLUCI$$+dT_fUU64iu{Tq$$z~abNmVVkC1H=Q30ucg-nO~zh(3vAse=!+Nl1Ka0`kw z!5|Z|p`USz{%^Y>QKtv#|N5~TY^(&J{^_f-&-&LkDCbB9n8x-h^fRM~U3&l3+hqkj zx72c=Xa}Su8F`s2V^QTSsv{%#>i$Q(IbjFDDQ)B+SYE>SFkh7dQ zuTput7*ZO5iCDG1_nd&ZRq*F{)Gj|3Q9NYiJBE)!_7`4Q9NNklGWcL{@$KjOL8upX z1to$Yp8e|SM zd~QC&p)S!_IO)91cy?*_cI8Zju$~&IcU+Rjq5W=Znwh z%{uZwRF~#?=3@M%y5;Zt--k#8f^)~e=o@vR09GBzTH?1}eIfmAcuR4@-A)erFO+1f zYzN}z@uZulDwk$J)%{FbE8t8)D8jS3&<`DQ9&Jcnfk}h$GM4-2mNR%anY0)K9dREoRPJ5 zpyhMdt`j_k*P%y5JU3X0@XCx4YunGcjXu|r_X@w4!mh$51RA*ch@`{X2~`QQCI1_14nCDlQu+Rkf;4ju?N1HYPO0Li^+~Hw&Z{}cP7m#K zhiwUeUO5>dv8@bO@RJ}dj-(rWf0W53f$xCTqazmD(M@s0nhCuM@HK2~RS#4u*Q=##`~;We8eG?Ic2&Bf6nv z;p=a~q`_UNc#S}1oJua z#8XCEya)k_Mb+bU=Kc<8eidG!eXmlgI;;9Bv&JMt_2hLSYmhNnrMS}4!56{zMR1ivAtqU6xaIm%s>Me-&Wz%_$bpZ#i{IyNm zcs0j?>Gngz*8UP>YXszi^WQYy)Cb<20$Yrb5wTyQ{bI2Ewj#f2u-T5LN-+;TicEnj zEa|Rb@evC|R%*xT)`fx+0WYflSKrT04L)D&q;tFc#3<{>yhyJ6ro5o{Vp72h!0JV# zOfMDrn@%OXH_Ff`ET|_k^Frq6BO{Hw>Ol(P6+57fIpid<^Jn2XNNcAq7c)e+4O&B$iAzdDs6CZPU9Pi@d?ttP6)v@CQGVYfjz(eS;A#Tkl%N9Q# z7Wvc{LsG*{>3A>Y7cGo07-aspf^Vo!_XQ?-CgRhuLPXzfXTtnsfffAdEf7HO2NS8 zi*8V|?x#X_kXg*%1DQP2<8%~jRk`mGb=LNhE;oPWC%y# z8Hl~?yz;_NB0)?Y-)sqQZbpl)L%3yN8#k%FANRB;PD8$-_>A$#deQj}m!d{WK;I>s zcopVcQop^F$>*VkovH@x;ej5G; z>ru+V?nJg305>tQYeW7WejE`-n^^SwgxVqai(N3@FX)sU)j>4Fq?h3@V8IkFZK4&k zE2-0c`j=*DIs+3(l@x<;VR2fHbAzMmteUJ0v$Mw1v(i@^-lbD;0*9&&-6gU^PcnFG z5ZOPX9N}z|pt=((y>CD2^sSRfueFwy*Wc)&R%=`B0W7PMcShuWuh)eY%5A5Hq4m|r zZyJk)nHt#Fw!AaD$dQnWth;$lF!*2faK=^!tcQ24hgYq)bS&}q{M|*EbJqLh0%cMe zQ@Pk>Fx!2mH>I!>n@G9CAUiNYQ)3|Mss1p}7fKcxLGb4q7wN5)DkfqJxvT=^0sAHk^Qm>u2TL?Iu}aQhuFr_Tq0LY(_qZf_5Q?A)ti) z)Y^&=5O#M~rXC0kfkykODTKUMkYHG6L?(bq0EjC7P3iX$pHv5rULi~(L_=W3JC*L) z^4rFrMDtT>=Mnot%%Vqrf@A&K>Y;mD+*d+C06$mbt3~Z#zD=Y@8IeX_4h;d`PrKuA z?Qqpsc11wkn%yg<#tK$Q=Ik$HKW}0y)=)kt4AULTl=Obz-b`~KmDpT>%b*B}DaF0{ z0|82pYyF#Udpt(bOA>;r-7$s1OG19#ANPPI#`F8%`ZE{9H(Qdva}K#>L*DUBHCL%s5WD z87_(M?D3x+f;r4Q#}1mMd(ksLH3rE6~UW4mhn zP3&NE)Z{T}x9O=^#zbC#Gf`P}-0N*)R=NfchhPW6t+m8}S;Je#I*d+TF?%B*R=7k1 zULNRXUe_g433RkG^1N{h`!wJ3I`F-D0%ibVf;o%w8#rPF+XV$H>u8465u}#gvFBWq5wd3?Gye0YV?66v@-fo=jWaO!YYi>eF zXbjObJo%Q$-+5zV&{Z@MqajM%+#oW-UN23p#0cvkX*C)KaKCPw?v$HYO4-|wew--O zJS2u_G*Yx8Lo(2o>MU&drl7rWiNyHFJq@O<@!I-mkjv|z{qhVYQ;iAL*b^!$S9}v zATY@)smUDz+mvG>YRYyavuw?_=INni<14iv_!bDXm?i_fBbx%E7I_&cON`JUOj+F& z)0^2ChUH}REm*h-67+yOg*zVoREWb>)^u`q@C0QTT?-^E*@719?51V*4bo$whu(T& zV@h&U-CDX>^-3v8W~*fFdneww)iCb`dhRP3B##(&Jg@dJq9e3arh-KojS0eoxi}Io zH57j82P_AQPnuglwN*nttETn5F7yCBwgo0vR3$qJZ=F9xb!or>8nWra?rJ<#TuyI6 zkTbrK@MbA?9=H))iFl{hI|AKp|5KZn=cc>{b*m|kF6hKqUJ!ZCI;-GuGOVob%r^}+ zXp#8nD^iLUgqJ=pLw_Rz*hLjqZZe5e`}?b>rtfr!Nqphaq}+0gEV@`XAZDIXAy>(- zEnyyn4i^omm~g04H`F_8lY*A*fdun$ z?nkqeVGJyel9|7_cFW25u&)P56URhMceqBH)gen*@;p*}hw- z+d20G37bb;O1+(vO&6J-+YHOop@P$Hyo+I%e+zK*Dd#Z3ae(i-eI3mEY1I!ozVCX5 zp2c9^>^72$s-B_kisa;T;4r^;XJOTGV#0a+JbPwxyfY#~8AUEG}1qpW^GNnxkH-)`wlJ>d&ZD3`xc3Ual8Pu+X6(cxbXy~MX{d5Nv|T4IFg1ZA_zi3IxpRi|RR=>v zcxz31Cxtn=to|nKJ6vs2+pd)2~e@A0ifY+SY%KWW- zq@j(>Zi@N90H&e_*VLMvl4x-wSlPgU9A-@oKf0>T;|RS#v@2IOK#r=5A4E>ch zFCZ^E@ec>S!W+A$Ciid7>!Nava9q2e(~`Q5dk*lrc~|69^rkj2?% z=Z*RKPi3PHZ}8gq_=V?TDAhMe^@2b5#IUyj=_$%K$eQn=h1}C=JVxE(O!MIR0hFf& zcCwn<&&AheQVFWz_bZdOe!pxwEaxL$A<=A3DTLjX7}fC>_#+O2rsW&}V)j3MZSSGR z+WLxwC=@$!N+N%E)bVS%W;JwwX$O^N2+dHCSHwtxa6gADa${Zx;kgX6t82f33z21D zoe_I1$+1$`-?5=L*SQYT!IbcTz3va;q+H6~$NxT(cuYM}8x@WA#-Id$9 zG*WGQgvayC_WR<-e+`d%cl1CO!_+;Ww^|4;dSa#N5@|TG8H4LB!cj`V*BG`-HT>Qx zxzlZ_Tj0=SQ&o`?cN4?eD&e0KuPEsW_>ts|2eNJ3$+zC_8e3Ot8K2)9x{Vfg@-weC z!ltA;VJ$5N>JWKPGH-W~^zy%eP&A6aI^MsAIKN@Doken|ypPFss-3xaLa1>j24L62 z#;}=AjxIqS(#dIs)3ml>OvQ-ldTImel;5I|NWq7#Eu&Ig8Xfh>U!yKZX3C<0{xE4^ zr3+hpeB$nSuh7fSFiZMQrpf_(B=0ig+kN)NwY@MK^gVaNE<^CpmAn{A;vtA0e6DOS zj&hGY%{Q2KC2}g=!mmMjh@!LoI6REEomghhhCHHitPaszPUEVa78XYx0CEquLnx(V z28+hu|EQ?o!3<^z45Uq$?y|}N6NK*8ki`jRePXP1m4BJ0A#6H%2ADHWMBN(mwXDm> za9FckT&BN2!Z$s5@Y>*LqIMix%!0rjNgkJo!KZofdv#iY2C~s`$ltfw9<}WCe~YI$ zJ08sGpYb5g71fruC=_tT*kz!LW?|Gj6Hict@I9M_T?aQl5y-$r z^i%CJ%eXIxuDwwM*f6H7z|y#8i_nWay%KTT$Jz5D*7MgajuTlCR2&#S;t3*)-}^Cg zFpS!&sl4>zb`ANb{1Cy|KZwHC90XIb?ZJM~f8X{D8rI``e+5L<=lG;v@(O&(=XN|b zQc$8Cs#v&?112r=Cj-t5=(XE9S03N%*dQ8X;Uvwa7iO_o+6B zF&o$cK1QK2WRRM|0a+ZKv%c5Ww4 zoj!M~Uwl(H(mf@t-aRT8L*Z6X*-xT1bjvQjp0LqG7dajxM_tK-T@$Og{^JAe+qmkjQlaHIrUnjObO6_lw3 z7zvh{@hqsu{;f&VSwC7QC>1>=U`Kb&_qV?1B&=2NQzD^raCRoBvT6Kw=48S)-}mYs z#e@tm5|I9wHukex(edZfS>1l*#%_xWQ8j`B4^Yoh^zv{%$pJ8k@y)Fh;?W-eiXdxv zJ0^a4SfB$`bzHc!a&L?58>DzBLeqt@*A+}+rhbaDMzI)9Rgp7tW%8vs6|s6PWC!KW zPe=y*!=3pmQmF&(t`r&OedlX5iW$sC{aMI*?4lXkYXyIHvZ@VkH!ae(tJn5sn5&eQ zRpb1hJJadh)iME7WF!lcsyA0)LQtX3_jeC+lt68fINFv;;x_2VDVnGpySE+JGK>;~ zK3nU{N=c|j!-pmB8@)2$g`0^Mx%Ln~#q9;epWq*&%_OU_Hp84IU+NM0HAIiw?S^yS z&jDtw)URdBsK}(WvzcY?CrVo^3RpXJ{Q^8D1rgjYHYLaQe+UpenBR9ctv!*^;4ni= zY5|6X9XZqLWf4)Kusfc-r3ZXGN~HV#L#1zS9_RQQyJaO$_K5vHQeIov_S*|r(539b ztGjUrln$r!;!9~|QM(udu&MWdxTIs^_nLq3!4gd;q`KIc%`T6MgS-XB#pZqCr}7u4 zzb+!Op8U0lY&yn(GQ!egi!2SF;~zCuu_ch)=CZ2 zNm#vn2yplL3~(-*<+%m}cv z`0Id&2|O}Oy`EGtUvIXUl~+&Qh+d{W#uDMb+6|jlD*2N+(QUA#(R?2!NidU(bR=2q z_<`eVn)z%K2T=>;E85=&mh3NpY*Q!WrxqBap!fHIVW1{>EyNpYkzdVvh`(y&L2zo> z{)y+Sq|bKI#4*`sI%jrJk>=*Vv;p2r#INBX-vWjf4R|cw`%vaGIr%a~Zoinuc*IY6 za9(GcrUdFuTe9pX$ty^hwHo`Ayr@+*Hp-CzpKe0OjIrB6kdW2Q3z=Xe8!I zQ!F;gq4q%N(cjf_b_HjPD#prInZbip6M1OHWq2B2B-?XvOVScm!-0MV9u(<281Vde zuSk;Ly{x6y-L>X%#m4!!9?C_#9}$Kq6V9m-O&$>Rubws$ArpNpI#c3gDE+NwUFs`> zbm4DZ63`tOtBlsC77bIi+Uz5mT0JTwkp{bnA$qd>;IQx*}>Iq^iK7oiG z?HFG)K_O{PjkC?KdVpW9GrlQ3ut&)${?J)Z$b{gyEE_m4i~MXsg=UG6ZRbHMEGJe= z-6VE`?PquXV+vRv!L6GhZk|VI=kH+(<$;iKC+O35fo>u3VzdH0o!ZrU2c(!%Jm*2! zCOVT)_s@6%*PXoghWDKC(>P%G*?iBa_0R4TvO$9jsQ6mTwiI6!7!%FJOO>~ z)SksfAG-nGys2Cc2G~WfeC2j?ib?EanNsr>@e~f$PfOI+$}|Z2OC6}-MIk>txaKls z76*g&679qqk*IVG;5M7RE_^QDKIg{KHxot&7BjO$D}wXl&r5ymTRADuuSkKp59fo~ zS&MIxyNg$w&On1n6v~V9u&3yD+4}HhL{)Fs%$J6Z|-s0;-grF%LiC{I(r#(}9H+6}>;K6SV4Lk$7*``?)HN zZ&0NV+@CVjbYho1c4(7JqbGU+lX5B^OUuIEZWPanOKoGK)$3Cnx(3+6W^zB-%-RP+ zo5AoF=v==ZV%Q? z1kHLIb-9KV@nU6@@C5Y89_hv|BB<*RSMni?G}sJkRd#us3>P0=-ViUNC^oudjK-D}I1i4_Z31U;7@7q*>U zcGs^aZx<+zo-QgrfJgCji|%H{r8@2FJ&!$e8P-_S`g^Bd#3t3Q+fu2aV5gwO8(7Q5 z*M~1jc)4yRNKcT*I@MYqK0LmUFdl%jI)8;Khp#Zt8Rr8nF;@9K+?Jai0JxbC?L3Y= z0qc?%@2}ef6PTl$S?^g^1gY+JEzJ!&0no%u545hnIz3&~*3b5L9|#||WWlFVFSZ5R z>+2Q7zQUjz2JzmSIZ62`+E%)O+)b7rASsb4THXV@e->B&=Y(Xa$b-HMQr5G-ne5#l zrBOxFOHqn9Db3NI2w(vmgo0kh{Uf?BZ0f92{Eu1kC{g zJIn5nk8Rm=oo?>iyl*y~RE2p4YDC&)h?M}rML&)L&rb=v);FNB+V|J5XM1s50fYD$ zB1VDOi2hsTy}6JI3E*mNu&Q1UsgS0#66x|cv9A1MoYevhQp%ZpKBN$Y^+)_N>F4MjeWj2iw)L!rM z4xNWElHl}KPlbSl1*wZWH=j41*&0$tmzVZ`62{yR5$IMT=)X7ax2@~Ra-Hkd8ed$T z$#DLE31h_>=jgr`=4WNMA>an*B*rrxljZ2rt!}dy3cha1{@`H1c8p=&l2#y)S`Vcr z^NIOlXFdH+2;%fE8F^iIbpv%`ci>IS(=#uPn!=mn?=IwTrBGoqv1Td6i*TV!Nl?ma zPP_nlPc=DkE_qgTn7O5_>MeuJBdR$0vlK1Jg&Nu7-?x~BbATymk~m=<%0`;IlRX_z zQD7@rw<<%5n+)i^2uLuI%S_$_3IkXWf)Z=&xD_y?9#YODv49!)@b853pt!qtK{(M5 zQUiVoYeU~N9nBrQG&R6eYou4Q7%m(I*J^#}VJi;g`ybQ!BpOr+YnpZNihZvcSQxAy zpfzD!hJY~qP%D>SW55~nd+2rdoB z_QeWmkHLm*Oc+?WsP(}wT10`E9-;T)9^Cw4P)v>7NP8!O%}NvIs0Q zSDo92WI|2u6MHA5=pzjmeB<2QF-K>L2AZj@%|M)jDRQMlrcto>65J;_PX(mw>a0q%e&Ut23ES+`-PSdF~JvZB*d6CZOw zPj*17zl(@bh$-Dy=9D^}aK(7~MlAyjD$sX=@YeA??5+X&fn0=ExegtF!bYUC)pN;Q z3&4F_BUUXNRW)jjf6TnlbwZuwoB5TRZMaorpT2+N<-O;?w57+uG;(;}5`*iL4Q!ka z-jD&*@Mvu-+SvCfwI#3qV@tgcEFWa0ngvI>AxH@-bGhAV+`TnUD_K%CQ7m|*&bvOF z4ih&VZOv&V+c94$GDuG)S$9T@9Gv2Bv;ZGyDO*j;G(wNK;RzS9!E9SC7{QaPQXPGl z`~0?s>^MB1(}=NUCDs8N?N9P9>17|>mdUgTb2e#Y1m?E|5|>@#TvA!N>Jo6<;%2a3 zbO?IHA$YdPv?p?Jy4KxeO6Qe}WNe38o_cQ45CpLIrPl;Wy@PP0m zw%wA8Z49Q@meS1U;s%N^5EkMD``#nScR?qh{aQIX5pQO9HEax z&y`h4U0L~l6p!2U?5~AIY5$dN6x3%Ls#B;t&B>j@A_yZT^K2&Cl^ZRA0ysHudKuT* z4-Kp{_=E4sd~!tF$ky2y_TY`BUjfRi!EIkpR2N@{K^WaUBE;If^Zn;BVr2*Km&%@WfmVkQ%E(K5N zyw7jWnlv!87-zv3A=0_Orh6&-r z*%;sDolngOmR4nTf+&WCKP)gH7+&R-TSu0=ymE?|`?1`@{at$?ZhQ zTm;i$PK=_WLd@N+kp|@BoDD=3bM6vQ65Ef zxMzW6t>u_&4tsyA=MhE!g5*zl?-g*0YW*@J1~>^(w!;l&@RLgg?S`opvjjXro`FAT zf~(a@RNjyjlZ~%J4?y|(I?GqDFagNJc_9!m#U=JK!XI-TS<7+}bV@4403%v*)|-zd zM&c~BwgBAJz!=gSp#uOT{innd)wE0cj{*)5D#vSkX0h->`{3ZDn#E$}`YJ2B$#r1o z`89)b)T3tUys*sJ9-4u$j~Q{U7}0mOIez7E*FwqF^oDm-8?eXDYZ$gIzAq7{s*{=R z)}R$+^le*P%^=2-2{tMMJ!Sy!AO`14t{fWrw9u@##n-a)Z4)Ths<*|{soLY|`k z{x!NbW$ADTQ+83F>~vrx)@AO<^Zw&~zcAG{xw0m`@{owJ5@my{TwhmBKnu6S z!Ndo+-6)sK03;W?b9{IzR<_$5ocVbK$`x+<>P>tWOx};*>nKi&Q8~h3f55g|26l4u z2{cxOe34u{&6yO``DZ3migpV0YG0$u1&N4Os#+(=DrVCDH50 zjiTtHAW3&Ugfy^yxkf2MMj2ySC{d`dVKD&lCkm~>AB9pQZ z@nf`st0==rcIl;SJ>4>z6npKPM2Cke4$pAs>2sj~1aW&I(t3Jv4z$r6mea2F;VJ z?Zcs=BE^JeWO~;e)z7Hx(5EK6U=hqC!`h7`;04f^RhpR^ z0*#`dVwA2-7!3W=IxtPXe5v1w0 zi@WG0$zq%0vt&3qp6uhm^D;>u-ZIwh`t0WZtZ}M}T=RKi^bPChoSQ4;G9Kz_S&ZP8 zqZ%7c555nWcv#m%KI?_L){DCIjVcl z;yp_jqwd#-ll{gX?twXT_gFOjd3ju)STp<8FwCB~y~88c6SJ?(b;#jO+(Z~`R3Zr} z(%-Nh?2UzNpp`nu@RBA_Ua_Wv@;+P3I)~r}f`< zUzGnF`S0&Sf=~w0KYq~f8Tg=f3BDPm{{sBCtrY)%0Fnva8Fc>u&NA@9XrL3WpsW_P6;vpM*KIC|BEP2n93rD K+RgeW%>M)a3u~$X delta 11554 zcmZvC1yCN%wk_`N?gWBMAh^4`yL)ga1HmEahX;3ecX!v|8r)sOOa6OKy>o8e>6+@A zt~I--*Y4S~r+anvLOiuWASua0LSccy!NGwAhu0vHfuh}^ zjM)gGHIZZc0M00ki<3=Iy)8Zq`7fichif~UOgU6H?9*K%C=#=2JGYKjc?ALnZ zeS{cVd!>8od1RE5)n;ji@<9sXrduPQ2#{o|1K3qKv3V#7#WGZE24HL)D2tS$^*9Rm z4^`?4(;^i+VbWMQfkF;4W^U(WWKn*uc#!!=7}*XEbz3C_1nl|j=~=Fbqb8i5`TL#V zByQD3j2HqY86RgQ(sH7pmp6fx7@d+6!NRJ@A#+|E+C+d3oGL4wKsp#aS_x*7>}>RI zeC+VNGX=zF43D^Mk7tN`#U&q~P}2ne=C(=b?qqtM3f^x7kdx%AINq)VT-Rchv#8{~ z%(PPjU`$obI$zdr4zha>%<1vT-fOU%njPt@VT zIgP$dYj9SBzGB{(t!WTDZ#J%X0{-0&h2&1GGUeHUFPBr^`-V!guyD`q^{cMnU|`1( zU||1v1omGp0c}H20rFpZS&%|5Ua-{%5(~}$kRVJrr(h+j6R@t7M37b@pG!sd_~3G+ zao3)H`p`gn5Xn^KhOO7lQ?fuIm&=7D1g|gUrW3UK>Xs55aHEIaK8t{}jjY#fhU#kC z0DeN<3Lekpc$n&QG=|zI-X~l8 z>1^qakI4FI#97rupVJ=3gIoV-#nH`Fm-^y;U=zX*>DuKN*UndYyQ7V`w?9EtXCGbe=s9Q>GzH)Lk9^v zo};ME>^Q8ZAf2|@es(-I4a^ovauMagxBy*PJWaZjsC+zc>U0Jil>ofk7t!riBu?OI zK+eK^@U>h{n{AWl5ph)`k!foLM;20wMkY*X6-I&qD42bVppWrid*C^(#G=z5Ce4;yg!3q%)A{BqXw#`?62YfGH)Ev9VPjP zc}(bkP5OV&`70)hI!)LVnm?r1T`}D={H>34yHWl+;fe{juGdBY=5HH>Q^r5>D#w`; zXi)8OSY<)#xS&T`$K+j}Mi$P<<%QC%aez$EwH(YPY>1}~b7g-x8R9}FaP4Li|AO&E zLQ48E!|)Zp)3bj(+Qi;sZWIeox0Y#RVc()7&6gD#Q4BGYV$ni~6L$>tpba`NEVp?Y zAr7}~#ZG)Sm!W0d1T0gfx40$R8EnQD=%n{ZupgbLs8b1KK2UelfN`8*XxPJ4rge`D zY8jwy;4YJEi81||Z4ZNkL?6*>I&A{mk<4L7kdt38dD-y92kZ+m-`Y#*ekVIVOG#ea z1)o-tB4aMv-;xYK|Hi{Fwm#@Z)5oFxDebuKWysRe{zIWcq0GmU6TQehRTr!bz>g=< zmr;!8_bEduW=s?k$-@W2hoIycgF6NV`sfcE(>?D5)95AF%=$~-Qq3Z<0w-yklH;?A z@rfQsE5GEPeCk_|A23evzhLuKS&%N_uY^`niEQs_w<|aC`AOu?JGluO*%=2Jr>}kT z!GIW}<}IG!m#h4GAxdbe{?sygMaIkc4)NEixbT_20e_qdg8Xl%*4?_a|I1mppb<9| zK-Yz^C4T?qHv-fPh8ofUuiJ?zuh~c~wrLwjQrpY;y*pPoU94DJsS>hU+)gSN=3DdB z3nw}|Pzj7!K&THyN=0BqVo~>@;P}}o;wIM_u6Ra!{kadx%y$|j=AXqHzg|% zEtJ6+>sFiSzrzpRTl(U&M6QGFaG#a2GS%otB+b!l!8Y82Z>^!4YBgE2(rL`qj~9-G z#o1yclnfURa%5Zx8R&s6AM4g_x&oA7SJ96|g;-$QK81Q&*JNXb8u~dsDT?=ic(cq% zWqw~cMG?KTgF&>5T2t+Ksd9)7)!~sIS(lF6hprO=pz z;i6&;K_q96F_M()mreyX6L&Tok;{G8KeDrQPQK#L*CF{H?A7AJN%N9?rz(c;*+(C) zxrBgGlWeAZMZU|TF99m^;)aHSOEaMk_iad#18lm-eGeMH=hKpy7KXSdWI zow0r@wj@iaI-x0aY}WGOWu~zj*U_U28oR`2vHNOqpd%X9q!Dv8>Fq%P<(dEke%2J6 z^7KQ3l=kIt0Xns&nneCrkx8$nF)CN+A`-6*YC4c%_OU-kI5wqn7JAliCMu^?X;!2D zUkGqP(ki~d*G@@+uUzY07C_2cz!e6yuLO^p6D+q=zj{A$@ZB~O&JyuaL=Q+H3NA5a zyP0l-wu03~I#gVA5CQ|Z*CxwV9+pBKDyJ9-4ntCWMEX{~MqdR%7M+ZVtpaOBOy9ld zk8O}pD*IPtzG-xi8eYvF7qmcW&f8OP`zB_cjBog<0OLOR&_dUpVP zgm{YLW>fZKMe;}CW91_U`mx}!yHP%kzLI*|ECqY!YSP5z2e7$>kSL6yrHXep!sNs^ znZTKHNJ-*~j6fnoH9q}vP^Ep<>()|<^`{HHao?8fkB0<3b%zWWzZ3Nvx8Vn&-duONT^XI$F0#Lez&qkbDbcDlURK7Sz(?>Wh zJ=j}Bv~(;MvHAGl3K8%=P~wJX)=`J)b0i;kHic+WP#gAt!7<-Mn)8|lmj4M)rKj#7 zZ5!|X=X2o2;I_}hoo!{stR4i4QTB}hXg065c!?6h?^5YD79;NOF(PW9Za6TZIShg!d>aU0Z-KW8Hn(TydzD#c2b}jKdYAD*H9Q z@XfeU#$klrkl(W1#pwf89fG35B}CT%zslN==XBr<41eRtIb@CVvq>eKxsQnp{}syT z4Y@B{BzjH;1gqdb5+pmxv$a%;1Z(Ij65%IK?;Mg^qJowK8Zv5nCWk+@h?|--<1?gU zS-()yoKp=ravatLt)|mCG=1{u|E#j*l07o{sbE^c{FPU6?DNHiZG#3qW(;&kv7w%X z(Ucv)qz7}ByZK5c$W!?_6EkzlXRX7t!O{F|(#wtbq!E$-w~+Q$1U_Pg+woNis;Tx5 zPkAk0c`ctPdwTf*5ez2ko1b776j;5kz5UtB;x)W~X7H`B7Ck6Zt5^3Z@L8+ZH9~$d z4XGpoPZ;r#YxaY~JSF-Ac^h66oA6fNhLjVa{y|GtYIwRmC2zaqFdjT{4R0KKs(;Go zF^u4;`cP?#l8?>fvriDczHIo2hcowWFgxwWX+t6+Kwl5(B9I5JcfsFoDQi~jqtRl0 zGocN0gprJlu?NQP%Wg^uGp;m(bLSyA8AaRr-1=o_|}|L7ioOBB@liwH1`KZ)gTk905IfNLW#5JmkP4(3>H zC4jdl!B_-AW(pbRyS|R(8zf#zdFlYX&idLN_5^HFmmGKUJ_U&f;?qf!ccaq)#jhcn ztg?(_pCGl0rIT!^BVQMzM%-1)zU}U&m-Hk_&T00Y}!$8JD#Pzsik`MjqVWxt{>hr zOELmqw>j8v?fU^GVzJo60G-VXRq;|xj8y@Gq8F2H_mVG}ih{HcnL7k6{EDk3UU{lF z>#M9?79BqwG=VxoW5T3_4?t4bEl+_W<;WL?;~!#g6BBOB=z&nrb_X8ko{x9;%MuA0~{2T{6+yp#|xe(K3f)2II6^ z!=Jk=R=mtBs?B+`7RZC7!O9wrklioexJxT>KbN+E$j;W_PoaQ<0h@(#^N-`_6RrFNG zRxrbS9nUJg8C7eN3v~grr@3{(yd5hlBnC6l7$j8nN=!j2h+mHuxtM&D!^U9O<`}D!hu@Yref+yXKcl zX7>~0P0@l$hmbJLkWu7g>|Mu7f5H{+fn!IIBFeSe%V92gxwOS5218`Pm99wxEkEFOo-k3e*%o(-p*1$|E|(0E%@*mI}Y{3IP+5f8~q zRk1i@Yyz7Gd1c8RhvYku>}~SDFeJuF|%`ZBtMe zlwWSF6*OU=payV8XOvFqk3$VKNGI}l!7#lg+Tnt6e_V9 z9qNHEjD-hN#UQ67e;RA1t~@F!t0X4>D0$7I;seu3cAuJ`BKb{cMSe12mM4{;@2ibf zL1lc=HZ5q*jJVG{;L^Boi3+NITn129Ch){6b{(Xiqqpj=4AZ8% zvaINEA$d7rNurLP(qx_$M8B|}@5+rYL^&ZPhypXXM^xoDID*K|{B6fi-=uP++nypD z`f*0N3oIJ<;;(Dk$}k*A zA_QJIi!i|KGuEj7{-fks({&^z z{n+CEYaI6&u?lav6baR@FtWt7pfM;0(n2Ah$D0xHmSuNu@-Tro#(Evmqg)8K1DgtF zKKc{?pJdr+mJiH;A{{fL9-pV>EK@bDarCZY$?;hT9zt`}NpDwtIRP$M+!WyD<1d1Y+^n`cFz8ok{1Dczo*e8kRGJyL?!K{3L>X|r6Y>buRKt`v=sE~fxUKrf2t`sZU z83t((yw?GA*qEiYab+Ol^w$MOK3>)>~v&lP^13NSK%1=AVI; zDG0P%m$VxaT%UeT)2xiTj79dZ3+r_)lwWl5ZeoItRYUATf9|c%u2S7jxTSadeGg1k z{~XQ9y7CJ#?NhNUg`9ThqrWxccwH%6gg2YHwUPlZ?yzxI7f-*hT$Vlm!VNmc&==F{`k#G+m5i z&JN~b{SGqqFYm|ig(~^c5(7^94H9kxQ!{6T6-qAn%I>-|Ot0~;lk#+h_hzgCEVF0@ z`~oY%`@^96t1L0)`msVWafbSYR_RLKFBq@L-doG(Gp8cBT6{MHH>=fr-GN~^OX*JH zk?fTe=X^9~Sqr!Jgr@&zsXM8(DvW5YDzIeN1eg?aMj|1_n90UE_LV!ZN;lAF$2I!~on-=%)ck4_Bs7>76Ow_9_J4N+s9pHK^X zDlsnU+)*Ol=&-1+k;2KDr_TRpWBAh`m*5M0BBTjrrn8t6F@>Gs94+Z&NV>)~2LBWbSh_k2-uAlJ;L+s{6M}Ca zI?dd+473@w0-LYJ5?TrX2FzVTL*7^sL3f>vLhw6@cd+ngD?P))^8$>nBp>DxW{P_~ zHVjr}*ZMS6y2oO{QluA3y(^%l^R+#1ZeR3pkCkSkh^x{amw8u@BAv+OMDFhkz7*%zxuY4t@@h{%95|;}R-;WuN5Q6xzM_?To)Cqan}>in3b+1#yWG z%H!?w!oym=%>NefV}1@`xIWRJ>LJ`!pln76s4UK{gt)J2*bH-W@$!DI;&8dMLvyDV z2Yx!@XHIt?1$HkO`;jys^jhPB;U||Js=D9NwRtD&`^{_0@b+|K$ZUG`KK1IkNDITq zFa@%Q+y%g5`8mFG8O`RAhon)*dwIW{FpBc61WO2O(u@IdYljySk4?FTsS~p3?Gv3H zvAv-%2+a3^B5C_W4w^NG1HyGquHW5#K&W%NpeeOV!Kpn06=|RNkhkUUws*T4F4lvB zC(J+P^Uv0^i6^`}bgG1HiL4ZEn!V?33ZhKbnOt(0K2!wI%>o6#SMfgsaEUFyDF@F4 z+h3ucnh*h!ME=5Ds&M*rdgr(mFe2ICC~x4G|$~d(>R|T@bY(Vk0{?6j#Z-IBqf%WuqkD z!8#tuccvS6^nd3WfI^qwAVlCqQmb3~UL|n%ac86)Sb_O65IJ-fvbP}KhL>lykU^#! z%Q%c7$ zC2!rG03~@{DGT-p_kD5NCpNZN%rnS570nV*wuoSKL#9=3$Gv3ou!_Z-SIiWZpZL|_ z^r)1dv;*RnYb3V^$L(1u+xEDfMQS`y9hk^l434an6(t<9e#0U=saa;?m;JU{yG-Ug zoz-7%%Z@pyQK8ynhzF0CHiJl^J&d9IoVxSf`c15U4MQ2i^aQ2Gc3XA&DwvJqOr-$m z8aNlzK^`~$rc9s^>)!7_5dzDA=`3A*Iv`Eb^v%~1Q*NppC@q#_f)vrm^s_6au;@z1 z*o`-cb0Fg4iE}_ax&kNh8Whg8Miv;rgvN_P>y%*psYt$buNHB_6{bq2l#xs$2DkA0 zqrE$h1S>sye6$cRYXHPd^_@lIy_s+ zHbgWrxl{F3XfHQ##RF`6!(gJHVlC#}+FIJ_4Z3(#+f(agtSZtUJBA;A_ldLv!Z5%= z&D{_RK_*&1MIN$)sMXhky&9QIZU@LIZD;9W=qMa^9k0orVFvYb1#EJ@ENTS8rwiK; z;o{!aPBOwUNS5ez3e@;aCzshp^)lU7-q{X~)=A!-4#!Rywl5enbxPr6tIKttYNf~D zt+)NgJ@?A&wir*_6r0lvaL4BWXlCO^Y%CWsBhF7!<+BroSGBE_zF9C1Pm?YU~h!;>NPNi_waU7^V|cp+lTT~Do@Jm z6JO`AJ;9!KBCM=BXikxQlT{cvD-uBdG2wkzy~vf~ZJWNe6ipBsmACIyk=f~I@!e#5 zW^$s&z*Qnu=j)bob-&p_Iv0{rXy8BrA8yh z-z=-r!Kq1yEAOPG7%G={X?#&;)iOBe^Q>dHY|BM$b*~lM)hg^bLaf7TYY-2TX5dl8XU)78l-qjOve`h0xkH&_3W`Q8QgmNcJan@h?(T)U;KHv)5LCo>^M5(uXs^# z!=K|f$!L`0QZfw~7xr7Epwks}x1W}i>H<2o7@-fX(BH?kY7?Zk;HuWEVGvr7!Rw`o z39Vq4Z^H-0lD1rcZ}>Ew6p~);?rfpu6;B%>9wJR-9KY0-bjy{0SW*w-9?8%)t>$_~ zjRQJlH)+yBHzX`d^@9-eL3Q$eVbY!}d*Mx~P-R94!jYaIqe{zIK=e5+=9}Y>UXxXSh)v{wRe*>X6Wy|M{&(DM9 zP3E>bBPvM+#}(mGVS+}2A2}4pF&=)(ZD6aspfG}W`tYc{Duf@jO$IyHyLTiP^hY;z z#|YCJWm&7WQ==O}_1Df7#q%`lU5ZJT|9VQ=yO6vVK4l-t=%C@1){bwY5?qI%qi!8y zv{BiVH8+<9KK;-_XEnL3Y5?gp+!6|%!CwVutA}j_017D=35#uzQK>Z7=hXp^+Y&n; zFI+)1a&1i(;$9;xos_f2Ssn-YQIKbKi)B5`>0U^zAF3gb^j8qDB)&K{gulS3e5CZSs%Xd0aJ3d9!2wfq3m*2Y)Iz)!(yVrHv25f)T^|8Nxy%IjE$UoXc(ONID4Ud zmhG(v*b~>6-aYq#Z~6Fo{72KCY_Vuzs%Kj7bY^SaGU@$C5k#WwU$v zcsRZDV&sb&1$RGJ=F*Q_eAn!@R>}dk5%^&Xajj{k`u4@qHwMnj?Y{DNrN+`Dga?-$ z@q$0&{11-qhr`Fm%dPIe_s7I}zu(>V6#+5B0BSVqu{_yMUf-Wz4M-BOF0Rt$Cwt_# z+|sAM;4^ni8#uds>Zh1$S?sqKk< z<9~i2ujvj^yo_~l(z{$7>lNSsbbVPZVG|TW^LL% zuDJAc-)>XJoy=?Y*J1U3ZKpdE1(}ZCR&>hbg%js@j)ugiU%tFaDrZf6d^nTFAYR*s zc<92ZodpoeNniO_rgV330k@V20dvi&+A@#j1xY{i-Z_1Epx}aU+t;|VC7%*qGPwu8 zkDv!KB6m9m@&i9XBVq$Y+;|>3X>}74x(#j`w0;JIq;p;u;r3?4S8RlWzRiw5`63uM z76EPhPgDf!G}1Qxfn3~|3GcFS3#k7qUnFek(`aaA*v-1bJ^j#&7l%?0>}Kl-I?U@r z?+Cf*RG6+U$q@{+>hFtH$?HI>=fBImHL*MVMx%3ill=a>=JFbIZmF~dMUFexyk}mGW|pryNC|=-AV}S4jkO(YQ(1I|)^y+;@iFWYE%nHrU?ljJ>+<{iZ zx5=+73iO~W(M_W&Nk?EO+UinZ6&3?MgnUDWTsY;}Ejy8;(p~q`a&pd$UncFWu6DJj z%osffw04{O(MnSF;ZwY;lLAhHeyo= zNSW^?o16!RnGb2=Jm8TftdY7^Bw4>(W3ot3ovW2nPWzrUeuNBn#o(19&`Y}5 zNxLl}q|H3NjeNLu6m?d_$TQ*t)=ob;d=uG~OUH)EG1>LO^ZB;^?RVP4q+whxGv9tc zNut=5fspc%x;HF5@#JYLw_Z(HwUBcWaIt$WxxZQaxc_{2L^A#$q`p#fjg}ye!Lm;f zAe7x~tJkA)j(*%qJ90dIRt|e-QY$B(v-gx`W73mHJ&W?pHY~*DA{8yY^dCtQ98gJs$4H@P?jpDHy`N0I zcNVTNKEn67RdoG+CHe-w2y|UNWEfv|Le{t=S@0oM8 z&$iLg_Z@FX1>sJrLQY_?=jUWzpMOcR@nfGA4c+xorZ`NNsQeSU<%jmW49^G#^#(C{K2Dgx-65YA~RCI(j?8o+(e0*5k$0 zr{H2(eZ{j%gtxy4MuCeSGb7^*98Ku|NEjzoOBG~5I~@@wsvT}%fn(GkPp^qBiQ^eAd?WW#ovOKu@$p{DUwWJ5hZ5aorhVM2 zFUr|ZaIGFP@$9mTflql#`J6yRf>l2ZuFq#l1kZ8l1@ zoz^ln825jMx^9Yxsk{`->vLW!DP17MIgsBX^0mlud@lan1e9aH)S+)=(s{~iy4_Jd zP$jw56!MllQjf6}h-p|UvO>})EeCJV_@C1ub{qvHP8A1h`I#b~bj*dVnr{-Pu-BOz zrbl;jbZVSlSLy%G(EGi>wy=KE#k2ekdh0erAG}ef-(hsuBSnv6{76_bODKF#N>>@* zh2EaUT%iQJ1fZZm3T7KZ1kHW4VZQQy9{W*;T9n$Nv5aSb1R0)#MZ9t)L00vO?lL0v z$?O*KE4x97u90&=c2GWY9?QwC|GJoFeexq5qR&#;V6}en!ioIZbQ$VWMVVp5N#MGdz*Nc+-nMst0MYrQVB=OR- zyV7&d=tmSUJ0J5`dmdiuAgmz-jTPb}#9?*`(H7iy(!ZLhQQ0BuY$`CY@8#fsB!}P- zSYTLSF#jXD1zlx)h7S%GQ2$2(3S!OVB>j8!pQ1#xf9nwcspmlMFR$Q$pHq2{a=`Q7?4sHv#s!sTA^nx-HD?hCgz18Td3aQiPY$EU+ka{-xKmGrwtPK6X9#Y5|RO5^ZD#=Fr t2S{NfBJcM{fA;f__5WrC%oVhdP5uup|LKtbw$=&4&Y^