From 46e6ce393da0b4353369f2eb32d5ced52a8a2c49 Mon Sep 17 00:00:00 2001 From: Carine <carine.rey@ens-lyon.fr> Date: Mon, 22 Nov 2021 17:49:51 +0100 Subject: [PATCH] add examples in pivoting data section --- session_6/img/pivot_longer.png | Bin 0 -> 21560 bytes session_6/img/pivot_wider.png | Bin 0 -> 22270 bytes session_6/session_6.Rmd | 60 +++++++++++++++++++++++++++++++-- 3 files changed, 58 insertions(+), 2 deletions(-) create mode 100644 session_6/img/pivot_longer.png create mode 100644 session_6/img/pivot_wider.png diff --git a/session_6/img/pivot_longer.png b/session_6/img/pivot_longer.png new file mode 100644 index 0000000000000000000000000000000000000000..79fa32f7655e2d016ac6500802a001482a75fb25 GIT binary patch literal 21560 zcmdVC2UL^U);F$W9UEj2gFpafMxCLFfP~OgN_5m97C<2&Fo1}Fkr0q>CA4I`j?xlP zP@^IsMM`KQB`TeW)PN*P2ptK8(DFY|0Poy8^S<x>zw2A;Ti=>li^nJDoafZN_wTp& zJ`pD{=*=5sH>_B(V)K#1rYBddSVLQ}VrB9AwcySB-P;eXSaC{p#Pr~4|BfM6U^L|m z^;4iI|K#fZb6FiL+V`%07)JPf<n{wg(_>f8OKv!Hq5U%K`yH#^hY{B(pE#!UJ^FX4 zKwbIsO0JGd$KH4zxPR}H{7<`9-;dg%sae^zsWL7qCdTt6qGyaXBIvh%l0fSYNgGHX zcs?+Y(V!fBv#3a&czVV+c$U|r^>a=35zwU-D;ke3D2pGIFsoLqI6&LHdGma%YR#6g zEVd4@RmuLwz19cF%_~;CK5&aCwXY^ywI;hd2ozG=Mq9aJg(OW4di4YJ{2&T9L-aQ( zc5a;-k`wvJ^1Eu+Ej<3gWxr>~A9e9s>jJ!*Qq1nPehM5d;g+p)X1{8+PpjsIN<(#J z-Xeqh$fO%dMN{2Jf3bAsRL8W3&M`s{G#Jhf<$y}h&!o)>&L2}fn{7$~b9sQW7AK37 zt#k)nm!!dH2Px*z>lM(eN_R=9$pg?Us1SG!y@CoY7FjGLt|_j!R0OK|t^8t*DyaSc zurl-o@n`?GXJOxOrL}s87$0q|XX$4ri$-qW78HKI&&*Nl)NSeV7IwHCPaf<w^ZA9G zoKd)O<cENDNKB?}en#KqOSgukp(eDVCr>l)Qv1mXnen(7FGaGVsGir6=b6~J{{fC} zomqZ$qR-`Mta^I!6k(+6tj}zLNPo1L`E_C^w5+cSNX(<wCI9$heUoc7I`OqLYM^@| zp-7}>ThhyValtU3|MNp@O2%1_k1u`>7P%!|b*-G2tKzK>gDFPcZ`_6P<LJm(27Gyc z&)30ExL09irznrD4W?$3DTQ>|F4rm6r@fQm)!%j;i=U<0CmB2C=OWcG)+Jxxzg5In zW;ACD$iz5@@i?=h#}h@iRqi-CJhQy*UeCY}PsLL#6Bp0S8Z5jZz*}Bc@6f?+jguR` zzl~PKJKaQTZi_kBS1KHXlUv?<x#P}JM*2KnUa<C!mnOsXGv>Wj#RI%aX2Kpu5p=l~ zIF+I&&TD<+f5JpD&77ro?$IrB7`pAXzd7|Da!>ANFUrVAk1-)PIkP<mp`Vi0REQd> z7y%0phO-uh2`5(8z42+v;017uo3YGs<oL9ielFDG3oj1EuiBujuwRaMr@DNg+(+0D z!DQog9d5uL%iS88>!q|v_jZV?zfH_~M5@660&kP+L2oLLXh9;z3uOzUzAFGT(<+xH zS#%Pu-<&F&!pR%w4sf9_fK?>CfqsTo>_8PyvgkpSRf(|4Sj5`AS>jwRc~%lk2`1(Y z@y_}>^MFUGhF_DVz#IG0wQ|q$?>bP#NAmmwHr}R8I1jt?sNV;crmu-I1wV9dPm`SR z?=*ak0solo)oJU;MONPspZV8d?y}_QwRB!=4;(Z{s^VEOe)-JhSKIYiB^?Fj88bR< z7y9sXfu|)f;^P-~ErKbm*c4?YAKmuM1P*n+$>vtunRBj`Hwii(;2Z_mm8?xuc8lgO zokcH40bal82~?7rwZV+ciok7P=OPV1W|qHnso4hoB0i9bW}h*uUBD`PxxF}K^x=zN zex4TQ;9?(Sic-NBfA0^qU0khw7zZDLu`X4̜H`iCt>+<OLZpR@GW@t4%a58Tfz z4+vM1<?dLVRR%9^H+E~PzNX(f&?s8p>S6!jaP%o?VzUA^f85A~Rn2?<A};&7niuyI z)xkE;`?>xN6ya<XSnb^$d`{K|stipD>@Md?*{#d{9<%``3D)!(9N~cwPjH;U;8^2G zthUt-LK@-Xqj0dS<SMXn8L#$=7dQ+#pUT<bhtBMo3#rItL^g<<ceapUZ@qQQ34ds} zc>oc7Fw@}%E-{7G_9hn+!YkN(GAS*3^uo3zXBs}FigXb=5BRYN%kO!SFX8&9^);JK zz_<d1|LmC@u?gXl;!_)^e$EHp1)U1SJ#v^?8taY%)W@{e^R>^meH%srB$KE`et#&m zX5m{@ZiVma^A>!lnaCknH92eggJTeMD8z84Kh;yw%i6W7*O%S-shWo=UTd9U7a!wV z<qs3-M=?Q9_d0U$O<sNGsi=YBqzna0TmR*%?4#4tw5aM|9(i=;d3rW%Q7_u58tHvQ zj;22@EAL5}lHCeP(DQGqdF$)ahZ4ND=1%A*L0cx#S-Sfw7lBL2VDOqs*Me7Ksm?=r z&3qA{D}Rseu|Iur>*0kJRm3h>QOu+yP5&qJU0a9kVjAutc#bc^k%nL&SleH%vXNMl z_A=f$*=iK##^SVUv$cs#BGhjs@G1tmS$vAwxhEpO{R8@438M^cjWFnUsD`+_@?s5W zb;ON`4^`M=J#jOO_5S8d%9yCrP_v64`=2YPMly@0hH4kMH)2g149BKD@9mlB4Oeuv zFcSXA?{Zl98vEYk^8C!?Lg3zARxfPCTYm5FxS5-^klKEs>0n}F61Ak$#F~6be?mI^ z=%RA$fJ&+^&Cxg2e%?SYZ{~^rXrn@ZVX#S{N@iKGiAj4NHt->rFx)P%l&Q@wnZ5mh z%YG%Wq%7PO+Y3s=6r&W`C!&{gx{W?ZKdQeljo1Bn>D`n1I0-|);V$c6GRu8!{oF*{ z$+ANYB{?Bz9gHXqs`-CvcK^JNU^QaE30zt|@%plJ%bxz*djJ1h;sX{Oe%Bg5mvBVL z;r;H-k0Pgif-rH9@8SX&BPC~j=ldE)@6j8KS$Qw}LbOIgAC3{mg>JFw4IjNa?mYIW zqD!bW_`ZL!+teOMe^`@Q^0WTsuLtjqUJDPIS$}Ywcm)DrG`HFWBl#z3Y@au()MzG* z%#`jeY!AMl(Y-Hdc721HCF(nTj`X!z5<2$#5;lLmgj$f6{>ahYq-ljcZ^f!#2_sO# zC>l;ag*omr+FjfH4v8p=Wnvp)_vBa$q4P5>39sc9bpwiR<no6z47^ItW4*aLH@4H< zSekDBK#haB0<&aDVhRil0+H1eT=%o~Yp1rzEVNyaKpFbXTr*bnmZ6;D5lOLDmoCX< zI*0oj88GUH@Lb<`rTX)gyf(G@dznd=QmMwX`N{A_Bk4gbZf1_>Cc%i43&DB*bi&%0 zlo^qOpE*#ejbdQ9t}uN98eSKjF+%a$pP`(T+Jf78YzT?adYsn7WjAEqn7Kd8jaodf zjWtND;d)KNF$M$nlz9VIbryx7O>j_O!<G9OzJC}RWF-}ZwzE1mnNu=C$g?w5)~5-U z3@&8sfpPUaQZOd?p}33?Bg8Onwrg<BIUGF|hpLPt1?Z<TZ%7Rezfd^72~sS~hLV>* zq%wih7oYpa3M7>@Mm&M#3$@QFWBh*E-{*(6cKem_HU<;^8xYItCW|&{m_ij#s9}IC zHld@MQ!k)>7d(he>OU0oVe4e8uifJ92&eid?Y0jt>$@7+XAMNcQv0dMVAhaIxN_|g z+Htw@NqjE4%j%IdO&>vv+JZiY4#p3Bdc)UaH#lW3Z|v7HKyWt4uzgS+se9}}pE#E* z2O?SZEdRN63oq@4q-j-)qn1fS8v2!Ebzr;9gS1hqS>2vMVD6~)dz2;>u4MJt`4CE2 z@K3pfmvgO6u)k=HM|CKVD1V4#veuJ%NHTr_Pjfq`zupq)8?ohkKAOXCIz|3P#{z{I zh6!L7fvtjO%sJj_k=9Q_PZYrNi!^tw1{U_YMGM}GX(-X4ZkVBL+@V~3jrfX<r&V4H z$Bj9nB<NBT50#J6$a2mmtL;H~v2h=!Nn&y>j02IS@`ULf?S2{b2M@JBRt8srC6mi} zlD1OV?lKr|48JD)<E%w4KMpthDv_|s*nF<Ag>hiHlMgoHP}lLY=g+|e(jK6LL}3Fj z68oX0fHD%`<su&rl=Jce&~PZ@C#i`1h7$XiVBQ1PI~g6|O6+@a+rtsE9Tvw-spj#+ zD(+$ut!6^jVf4;Vhm6ZyPe-zznMe-Cj2!0p=2XCLL00SH5R6DnFhJS(%*0?9Tc76~ z&DFLz`l)cGYIR;pCu_VvJAuU<&-!O4_HN<eEBgtnCcso>MC?z$=~>AG=1lcSzj=NP zg30roXgV7Q4CSSDU57(e`$xNKGr&4r^!RZ-8((4~$>EsiC*wpLb@ILUC!*N+)x-PV z*Jio0t9fVrYTv2PjJ(pp7z^GcAgQ7m3Gd>gV3RHC2%c3P_Hye}2_1^2M?jr(Wt?QM z6~#*+S?TKYD9!#{R+g)guk1Z0wIw|xfMY5XjST+u`9=py656IqEo^)2tmm{2zuVP{ z;k+TAjX%p%?+^OTYkw*#ro;Vo{V2uDrK*hFuU~+hDbS#{U5Q&5>It#`R^MGFQ;YV{ z!R_zV^x{eR&z0w*#{P?r|8Hdex3dVTeMp;#4YxlV2!E}N*ThHw1l{`Z;X{*b)x_`S zf3#0r(EsH7y?tWzZ0lp>+QoAPI>Ud9G}PAS3&pw_C|!E)?c2BWBAp@20n${^*YCTW zh5kow-t-%#TQ^t3HgCbKzwk_A&kH-LR-i_(T3na@!mADG&x_aQk8~xL<jt7$7fzQS zE<pxg__F)$?363F-auidTG1gm_iM_0zC+pF;K}#Kha3v{_hWy_tU=gz*Ci#)CqMAM zWH)*G%d0~EM{l={Ws^txH)e_kg)L=a>RTDm!P`A;`4H;NWL5RODqjvi-WauIrdsQ$ z!n5KFB7upwo5;UPs}ZhV$g3i=`H@2riMtQ>v=w}fc<(Wxkw158Dm+thQ*iGqxq4~Z zwbBkf!#_5=gt8Wl_+9s@q3L!~#$AQG0|#CS9&&+hJ9%~UNQc(x_VNuSd7iDM1A#Xj zB7sy~T!zhYdYfG_&VAa^!dfw2UqbxL(0>Wi<7B@P0N()o@`IQd5Nm)%5@Gp0K<<)@ zRKh>suUu??iDH1Hm(nWe6;xvJSTC0S#z=glBfdQ>_iW|z1B_;7x%kb0X&sU&fTLLM z%_4mvmK=X-3Tgvjs>P=IEh+W@>ZxM&{YKx0EELJfc5?v^YRJ3PbK0lui$|<Za7H-1 z?wLUdy-&U1XrnX@T`(#bbrnv29FR!t9?jw!%izisduC(l4dWeO)!Nr35?Z>9jO^#C ztLXyg%N#ztkeOW)nAcKlPZ+gHR+|%4$aQ<S-;Iqa=;>%3RVf}$n`n5qFf-!ZJ{9Br zq04AQF*#~hC(vlE2FCl`*U!Y!U_}E%8gD)?-R7iEa&S>zY(QxXxhsCSo$graGtx0; zpU0=cBa7JD%N8?U4=@$`*mW*{p(-4IyA(ay)l6HB#Rc4~@eVE=o7^|bYf<ar%843$ zbn>GZZF9XzFKQzXs|`gmpAnmcuddd;xj&jSXJIT0E1ft<?~XiCGEmk2CIg9;ii-NE z(n{@U4&JG*8<@e>NIVzOHu>?kaRb~B2(QIOt>j(VDGyI?`(igWl_iHFoPx6!p2c#> zZEBF3aH-7bgTcls4Aoc*<fHpPbnSBTNmEg<?vkdZ?c4xgP;ws0ZO$jJXI(-Q;-&So ztFSow^9#Et?z=R+!q4W97CukMb^r{vd9OX2FJv~<?>e6Fq0yK!Cb-vG<t>cN!T*98 zZ7cDc9z9wnoCth8GGURg_M)&Sde&i2F*axcsJon3i5EL-B7GIDk_Lg+BNnsqG2z=v z<LAe!i?TC=CZmU5zgxFCRHV;mqJN_$2RagJ<|oX~2I%{s2!`<CB=rsTW<^h;zVk_C zHG`gD2?BmScGkSu)d`P|$1-s}a~Zr8hDy!?IO5+Iv-vNnw$>#7m`hl}NgkFdd@8S) zpEF>%8`z813j;H6T8}iv#iU@F`X7ti`Fc*f2{{nnTrn?CQ#R0zVm=$S^SyRJ1>^T4 z25o==T$HQeEPaNv*#?#rm4aX0@2c{h06|ul3aH{mMwJG79{)XK_Zwf+OSt<<l{{jj zSyAFdZ^1n*Q}YJB_6J~+nLBZP;`{AfTk(e#l}i;Y^$`L~4f{?*HB4;8JE8c8g>m*E zu57@LH|-W==k4~YKm|kFxi>bVet0CI-Z*5a7E+#J<Fd2{<miWAgD_NlNAA$;pVxg@ zov=OUNmMSI|CECtvd8!xM4$G;&x$4otvwb<(tov>rD)2>xXOH-11f7L;W&KFMRBJk z?-ZQ%hZrsIIW*k^rLbF}>_T`Rkng%b!03BqXuX9OTJa_0inymv(Nk|3!{+OLsXq70 ztLU`~rgcw(1XZE|TAu3A${j>p=bZe&K8|T67Kf6)R(RpDxNhpW;-rH9A>XD6Kt^f5 z_K#o!d!=-2|Ad48Uj2Xp%ZmIc8$_}cu*I6ptAQ0*?06aTSQ!OrZ^vR1;-hd(UO$IP zZFRYhlrqMkZ)OBJBnF*ud4Udb!w0FCrF9S`0=ChV4>9(T1J)t74JUZvFFWaA&_Nk% zM^aX(gVn9ux`wm<V+$7QsT_jRrg|G<GPcA1h_cez3$Oa@x^8z~j;$>?6ca!QG><)~ z02?G`3+9Di*?OjU_ro}N;#H<QrLY&?x&fGh=tIu3RA-t`4iNzuA6Ij0Ka8$iE3Bbu z014aWMOgqgyf&g0b`3SZ0M~j7S?s%k#jf6;a>hG^-w^6&QgLJ31jh)-XgW4aihkjP zdF}NP{9%Ys%-*@5YdsW3vXmEU%8%oGPowpnO7Xj$b)|GMt%(~E`cIVQ^QG=i2+~G! z#XBQHmS#c^>=*)VodWh?hH@y<DZ~!lULiFYF&oQDulpoVY&%8|L=kK^=Cbh(OWd2c zc9ao3i!POF0`($#HpC&QpbrRFU;fye6xfb?mYcjUZS}9>!JJIdO{)DVtE5^>CI{~; z8aok&D%CeI$BWIB4@uH0p8RA%@~^9`=K{&u8l-L%vXK33v!Y6AQn$u}9m^e(LMx>7 zFtmJNaq%#KGIR!XOEg9T^CCYdKwHxe*r~SLMLRHByKpFiN$gqO`LDBVZNn($4uXcR zt>!5@Q`yv9t~kB`hcd-`<vlNYrax}e!idV+3CYO)ds=P9;@kO)gyAtx4rBlw`-}{3 z>kZ%3GevK=hE|K=<Q(FM_kDto?&=p$vO6vT2d7PhZ{L=Vl*u|3t{w^Y!&x(BgRg0* za60QM(~M&R@q&rNUg{l&*a_JH9HBE@RrbpcOn%yho9K|;zBvq=8Rka0ZZzos%3T*J zq|C=!)(GMrjNd*CJf@SlYBT5c8~*PV7=s3>%#RDZf|}+oR`QDZvkrjEx=_VSV(?sx zXr1jk&;+r%4GlZ6%uu`R@(i#ToFbaCU2HIAAC5i~Hyr)F<4ZO^hsAUu93QoraIFir zS{Mj`AWGaA4z<PPnBQ?Z-VThPG6s$y#gS(EKa}6%`BWxX0n{E3?B{0@z+ML;O<;h5 zFH@HaF>UR|KCPwn%$n(QT~F>7Wh>ikEMoI7q<+obt)ViB^l&KC@Nj8217hIhRuTm1 zo92~Gb&E=%36AC>gR8I7tlszxJYqg+F^!*~C95??GO<xi;T^da=^|>;__V~FV_};L zCSSXm(`cc%qrQ0-8C=H_b!iiax=NIb0Et)S9w19|uq}Pe^T?sb&2a)nCuK@vCM0P! z#5;&OtI9!wqVXGoX@3)Glj9g0AN}b<-cI${lF;aBz=gVpMQo)dMzEN!$C-6Vgi{cj zj>4^XI)mEv=q|aYGKQJoWn9)b`w4;zl*a-bs_zKAsvlEJh0YkEN|l#FZBC`?V>OP2 zzI3<lEPA>91riZ1wJnC#k2kenpeeQ(%3FQ{62Z#&3YXaWYZH+i;6s}zdcrwTnO&3v z@q6b}DtXUSX$mfVfTVl{u=d1Zu7zK~lUFw+t9Y&o=cZj<Xt_5ew=<E5oJSKLHB-lZ z-A*vnJ#Y#3m4M@=I!q+lW08Qjwb{tz?*zN1mx!%5(|W28yOW<0_-wj$0U%41t_K|m z;GrP(4Ig0HwuZ;DY9qOkp>W^~Su5kMMdM6pel>aUq!Wh<wQ=;VB5|7xyefyiz@~9x z@F4ZtJ9>2;#^~t}X}8V>DA26E{rxI+t00SO_7$+cBA9qX47~0}H!w?X=cE7~*cqXA zEQ*<$HP$1c(Y2$*e<YXg5EaLYxdC4THq=?0jFBMqnR7RXf=owD0r#;Vz~u)H9Q>JR z{^3=V(Px<u)^%pTu0T%jrLJQ|2peHfn2eaL9p7alS+zW_z0Jh@NPYM=Vm99h10N<q z#^G%TvNYgbc&-%n4n%OzXpiUgr1?aOvJv_wpnZ9maCTYgtW8BG`X%WyYsBYcqM_PY zB$JoHn;Yq$p1wDTNuQlev6P44lM;qp96Xe?4FG4a+Jua?pWR}E4fgH*ZsO;hqzgPv z&Xk94u)%$ug{}eTz5ZZR{F<nB+@X>u)6=ACz`*ceWm}4Sv4F&_;>oa}R{-=%7d^k_ zPKVK){qQ+s@}cSpXhaj8#Z~Qy@dOJ`jYKrpy_r~N(cq4{u59en0nxYTPXLX4ACnqm z11yO{wV@d6p_Gj3FZfm;6%O(yz}j)Hb`0<Z%Uvi&G%rO5Fdb}dYy?xYH1!ysq{lQX zFRWF+1Tg$a<(9sbe)({vZDvF3>v+QiFYH+uIcw-$&BdL5UHcVidybKJ5wynH_#u+I z95KrEBrs`zt7+gJFopIfgI53{H9r)F7OvE{3csLKaj`%=r3`n+gwhCRY}b{5Jm8vW z=AiCp1Uw#VtehK83Medb_+C9gb*&aggnM@z{N{8U-xNu0jd8Wk&t~_aKTFe;74r9G zqyleP<uHH$aEAX-6SU*1cnFVfRYW95vNGii0tj`$X0rJqJ%t0;$r9@muY^JK!I!KI zNY!ulXANC8g=mT=+XaBL*Y!!YL`)JatR*m)@C8ooKY<m_x?9-)`VFLu#qWo}e$!?o zlt(Z-bxWI?N4})6m@PM?((<3>tI(SwXNyrHc^vQ&%0(o`wCn+L+Yo69ks6h}`7Qc$ zzxQ?~17^?(Fdt1OlFqUCrr{C)T*9M^L8@TCQzMygw1dI8wDYq)=$4K3qyCVfXsYB@ zd0)Dux21JsM+*zG1q?foCBRs}IQV--$^+_1QiflnV~I35R&n#2^9&wVuG>TJ2l%Zo zR(=-1#?XFk8p8y34#diZo!aH9jEOZ|tw})Z(mjXbFy4ve`ZvG}c}!~un}57)Zh@$K zPou2l>4!bP&#jDv6)F?t1`qCL^KH|N<+E0ywisO^lrfS-=Ra?0(cQm=ys#&-wHkO} zT+)N*OJR;Ef_d!rHUH>AAhe!L^y(ANqy6j2-$l$;b2)=4z;6DLaD=8}9`uJ^^ySXT zpOi~ms~m|g$$mTwjTi0L5F!QG3t;@qo;LtyY=dT=@+gq(XUzQ{t=w&-0SGm!!D>w- zU|nt(l%4RIb<KIEj6pZ5r`F1Q>~f_T0a{p*{7XX62|`yaM)ga|sJ%)vAmI!pVKb8l zO#2zDU=J0=3<;5$Ud7wD^Q43B?5}sMC<?xST_NFHj;iecSWCmCUZLmETh4e>)=TMQ zdaj7(?w5*Mf;1>WzaLfsTJjsbCNfiT3;di!^SC%IL=i+l+ixG;0TfVb4D;{V8xJmC zrSxlymg%{F1;n?<Q9iOWy$4Je;j7p${wGil;n=^xUC5=sguRx0_F#`e^>3YAM%{~m z{2Q45U*r8XVhsMRokfH%=Joyp`Trf1gI)qg@mJVVzrMlq<%jz0U_ia}lyKx4b?yBp z$oJsG6o$16yl3n?{;ha{T6(d%UvR;$z!77kb-~Ux9o%0s>--d^%W~kEMk{CDbPDW# z0%u$75Nh0u2{p=roHD?Jqn-|UrF6Co#DqXg2H3CMMT+QKc_obPB5TCfKA^$oH#U|I zmDG73Y)J3PqhC2bHyB=&U6dRo7ce4mwDpYrjZVMO8mmifD-H9n&L#n(rKr+f{3*yE zwDxCA@~5J#McOCuM%D7ST58I|BAEwzhA8&0gva{}eHBZs3wMolFC5Hc3zH8tc-kx! z&4+4s=IGVrm98(z_wbx7DR1~w!?l##3JsKn%dDDqDP4=}NwYPnJ>4RB4x%RK(j=lW z&=zjpBNrW~2RN*a?I)&aeu~#hvqCx(-bYQ<3G&@6)L83-dmB{phRPm{&hM@HxbWQ! zBV)ct%dc$SF3)FNv@Y0DU>o{;VGaJ_p9nX61#<ZMLE~o&9ZWfoe7%-GO0)W@b&6HI zbahpJELL&;d4FPqtA6tAPyAb~nuR^fE3nM|0iT}|CNT3B;OB<trIvktKnO3hfd6uc zmdL7atmE>-H~R3~1Jn{!`dd3ojw>Sbn<wns;rvry7CQiZj!Rxjh%;QO`K{^Yp8cum zCC}xbnoimC&!)s%PA#G6Q^wHC3W;}skT?wsB{dWt(7cbEd3ej))uC)UvbXgMFg5m+ z?sLV>q~FrYNuC=E{f!p%rEGKAt_t|V$k@<7yo2=u$Fn@>glj}DCRtG4SvH*VGlo1i zQ{0(-w`{twxAk3#mWH=bvyU}*W9Y?Qa)Z&tGm9<8_2qXZo*H-=bPq5_w&DN8!_+4L z4*K||@5lAvd#ZoI^avZT4*|>9aw5S1xVs`VqmNKXGC^a1SVT`7#S7+ZN;}4*OqzVq zKl=4<rJaJ2ly}lH@5aZ5<nZT}Q8dS*B;v;?g#ybDAo{4<g_8Gk6tEfr&*jqcYHD)! zSC-p&m%EN2(04&k*((PaYYkQ<Nc~Rw$m2@_(&Slso_CP)>|hc3i~^*tXWdg<m=mtQ zp%>~xyUTbk?|0K@?4l=-!Tb-Y=EW;xpy}I&n*oB`R>rK-y?Q4GEst>s$2rEVN5BQs zZj*;Pc?U`sS`xE;Frq`fA~?W|sF?Rz%))-(llw6YXZgU|J34|GM)Yj>90$FcjO_sE zZ1di3cJA@Bz_vyIh_Q}8FJE3r2NsMTdvLIO#`kz}Mm~E#?By+BRx0j4SLNK7yxZxO z;5P6PLXNy?vnv2&xURzp{kiv&cQR{$SMV|9pvx3i-wRR2Fb9zcV@Hg}=kZftQaY=+ z%+}!xp|W$Gv+C(ryQh6*%OS5kFv(bIh)@gz_eTt~r|6T14%sqS3uP2*WWCzMQEWov zI-aNkFQ#+2kL*93t$k8EH3Gk8Lmo$(0~z~)7wL~!X>i?_NS;s;$!v0^D5S+$jfWr! zE^xEUK$ocFfg%cb_)&L`-SO*#j1YMTpF1gV+{{9chC<d+l#?$#>Kx@sE10bMag`G> zUWxW?gJwg7h3{Zw>7u7hhjNG{lHuGb#i*ku{(z<Gy$9~dl~kj8j`1vx$IT4{Fz+JO zzv{Xuq*=OQZZKB#C8BJ+Csib#*eiX2_)(XOViptw8j-GSywkL`^A<I<v@JqyY71ep zv-Ud1;`o}x=k;BYQ9eQP*HF~*FFVbE=v5Om^oURtptpsubfrlESMgjZB&DwRW?*s0 zW5b&4Yn2H!xEB~G#>_vXJ`8i?N*WHu(!sjw;^|tmAJa6p0V+}nP7{qsx@9Y!6gY@C zsv<GYoEryYss4fvBVk*IjT~+c<0DFLAZQGy)H5@b@uY&8(lY=#%l&GCx1*#bTZBdi z0oNw>Y5%)=u^aPiL%;+8c>&vL&bj6@gBI!4Lj(=_crgw}W*jxv0IEfJM*)`XoR6Oo zT5<3w4`BY}|B%Be1l*JC9ujk>uc*pBF}vTFQcoUyt4NAd6j@G<0p#|os=GXf>HMnc z`Am||!gl@qG=My+c(<FAw=t>;`zPFUZ`;cQ7|)czq2_%bA>&@w1~(@oMV%I<O-)fZ zfi)f5bdiD)rPyeLps5SwxPxjVK+|xLY9|F~Xz*D?rjS)Dq&D%&BPIz}<XyL;N<jPw z<6`QWVvCqYs;C&W(W)c5wJuzvx+PfwjxC;WScOYCNMsIIe)3uiIc7)j6cSE}=diWL zAVgmPED+qeM+$>T&r{o+0U|9*P1AbpOu*A5_735PT<5BJA)OZ>7Sk82JNv#D&RBHE z@@a2zwr~|-De%4ucpr{1fc46101S~8fNYh#YS89Lu(-$3%pKLfj|N+W+}|L}x~XF0 z1k7NI#n!-ex)?#HxeDk}hRSt(>NI6xYvCUI8^}6S5|j7rjZ5ei`GfSKhf<JT{1Koj zt9(?7vJ-wLwuZmgyplKm{L-<TUXss>6ltFConC-wn_eRCDY?zeFo8j8qZ)<GUDaNv zvJ>MM00Q6CFmOnyC&1Bj+J#Ma83FlFOjZ0-5RJ9*!pz_)w)VUNjWakb@3jXE73hNx zoS!kBf0!9p^5zWs2?QkiGO3f+ya%B|_-!MgbILq(p|f>J%k{X1?@CN)q`UxEehA<J z$bJH{0UWG50S1-OCW&3-56)3HQWYis;h^agkX!UJUIs_+>8^p8p@#tEpBb=@ZBE|F z2)27EN!$JhlB%%Ya{t;WW;6{MJX%}RiRwB5TCQ^MPlyru3$-Mua~cgn7-)JU;4~&q zfj7r%8Yxwe{6G)`gJ1-0^r}CBm%ND!dS-l;&~%6bJj^8$Z=qEpuiFXy4S;q}!5cG{ zdZ>(yw2JPP87}6X(WqB|mDW)ehL9|8xpW|k18xEa#&9kLIW%UH4H)c$CcLOUBZDcB zApj{|Fkk=LSn7WEr;35dI7-HJfmA~d5FRl7r)wP6?VPFzJPW2qVaIj+%$o~lU9Dyt z#alBrXt1Utvjmd<HO3DYhJ#}xnS5VLNN~5OPV2OpL{}SsoN1}VQ1E#K`0G^>Qkgbm zJ!ZUx2<Cp5CJh{ls)GPZ+6<YIu^xCdzR2rmF&WZ9U>Ooh!BI|LpU;^pY%RJBXuw_$ zo^sJHc-Rc@MVQUsR{uh1zg;nk$@igbS!c1}U+oGw`TVl}+Ecf^6+<EE^WZU3?N`Cx z<-I`ZAGmf4mda#((40z@<Cw68W<BLm%=x^gU%>(m);C|oE19OQ+R4_mE0Cnc_v2=& z7#Z$A@26?bZVdJFXK4HYtw0Pi_~Sc9{?<fhoZ)DnA`y6hP5>&o8AO>Z4QLHjq7krU znS1TX)nAS04}->My~O)iB5J#>`)^**XB;9T8JBwxQCtBOpR*uyXbqEI`9O_c^pXqR z4)zfcG6*Kj=>xi?vpZn23Q*x<$It;L7!uhM+C3pe0BQQffZ4F40v1KU=x@dC<t%S+ zM_6j-=2~IJkLSMcgdEKr;3)T>&G#r3NSkrjGu@G-!-!;+8F#$Sd4@4ZV-pw~bW(%* zP9?vHSH^CA3V`s8=+^ocNL_!3VW#k9s-X=Rj-(m`q<SQ_od+B!vlLhgv#rEu@Yiy` z1ONQ?xD=;pZtHaaGxV!TrduU1TfJ=R$*<8Ev)?mHN4CuKValZ;z?rk=EPWeo!m?oI z?q_1f4)w3=EQFPeq9e4R6fZm`RF<`8FT-KWb8_;pqBoKvj4;!0#yYcq6j?HpRirYm zr?I&X_I$!YV?zU3G{n%!tZS1-C>uQ&M4YFFuwDQfZV#ck%wS&HGGK@U85<@PjKsm{ z^LA5`6$PFl`94903YnG#BpC%w`l*MB<BE_i1W6m~S}1aW>sA-1Q_`o&-rcNz9)x$W z`BVwD3m)4jtPgm745LbK%bg2T=PnWMkizVCVYteKvxHL;Rul~SQf^AO*Ff8LYW>{| zZXi79IPhGqoI!zISY-p&dIzzt&!`L~q9k;3-A>WQQ3PiO1DE)mKiC31euuLBUUT?1 zmvSR#;hwp_j><J8is*vKRX@;}$txIDc~WHx(q!IuAgcKnjB)N*9poZ=C4a6oWL)~X zDmI3BW?ZV9_<^^juON)E##sHMnX#i6msU4!Fl@@eBtJbC3VPth&6Y(t*|1`$q_xjT zGelPNIK>Gpa$^Hz@yq}wTMLbHx+434Spl;yK^D219!{0cuVHwu1wua{^-MhX7bo4x z6)}@x<4Ay!f5KGw1GhF?d+%GQK8Q=C6+M`^Q`jCopnZ|+cAD{&O#A@Ln&9XIhMr@z z<-k@N<4WooBd1uHNWuJc<dSP#9HAiP^kN;qqSn2iwj8DSpMnc$i$ib%$h9Su0HP(9 zam(^w5Z$;47rudvf4Xj$fDDLqTm~%SmLL@Jt(|YU=uh>b0uTyWb^(h~2vjf%K%jp{ zLo7G?t@Xe5QeEaRg%<0Jk<p*g)6yuHdVwG@qk00ro2holFLSusr0!6rY&-qYwSS{V zX2*;rrTe~%V(qnstU!^V)=<U1mQeC_J^z+r4Lpi@z@dug-y=7w^`JFxq^m&WS(%~M zKI0d%(GYGd^Xx@%XU-*VQDb1BE`YRizbMj-lf@w&E@!P`KQ=ZtTH!XyaFD^*N2?*! z-U1)pyp7A@!&)>(+VkaRssVg|KX_%d^x-9eeZNHD)aEl~RM+-WYNK&Bz`HrYf!UWD z)WHve)1vR_mh!7+9J&0`hr#XHlNyH_(mUo{za$j+)Vv>>M3=5H%nx|iASiQaD>16s zZ?v)muIy4vsjhY3>m#d0E3b8bz5IBM_-&$=ABL}ATiz3YLXOLO;$Ieb5e0wSBoHVS zuhYLR?!RvmXj6rW_30wDvHa!D%Mbr+e7m&7%k3;}nm_I1<=~#bLU2g2Lz@#C=%3HU z(i|LXL<R$dl5^zlE*-wa?z!ME1Q22ktbY(0I$!2M!G;VUZ-+d>eLBMSviYE?$*9by zLD(=CRlqxLbaOQp_KMzOgzrPsu6l;_j&5mC7k-S*fh!h0No|0WAryP=>KtFl7K(;< z_q_dB7I1eX4M|lC_*6Xvgrb`MRGhMh{qEhN<38=_)(({PkfD+L3f|py#&7FU!s#Kc z<eAT7&Ikix*n193f8y(XMTk9r!Oj(wM4zE_7rEJ5VId{^A$VH@)yk*LnwzY}-oH^a zKX$1lDkmp>(EdFX^zqnZwpuqEauR&Ofne2u7d<r#Q>8~$$bp}G=D6gZQ^$m+gnFLC zTZQ8J&Te=lv+S8&SR(e(DZosB2mghxKvM+X8p2E={C>c3dp^s<%m%ooIN!;_nXZ|2 z#CKF;v#?BiYeZ;rL4Q%$7FP;s52Cz)H~8DvmG?e%4UO+a#a=BYejM*gfduR*u4C37 zFaZAp=nYWquBo17Y9DTuvMgpEq~PSm9{%@cNZ)36X7(zY{E3M-@tPj=C}|+_h16!q zjq|loGPFKaD~i=}NVSB>#A#YM1mdz{Hu}wd)?0`#n<n+8C=@-M2*nW@WE-r8P0>>c zdkX1y`6fNZ7-jX=jkPh?uNc^eaD9i8lCJV}RoD%}PxFBCxCwE;U6t;mfe->j)Vm)h zVe4YN${<g}cRoRs5JQ3`O@-~ddTjm29Y*z;bIyC?aP-(wm*gbf)V+rovu$(UtE@%X zx&1GZSSU($qqi1-I61&_p2Y2;TsiQ?N8JVwA{#jRt{`l;GGm}kjY@7Ezp8oPtC}}G zNz>lO$lN8(Qa9>}I8U)}<X9(tB}<8n#)Wfn67Z(-NTyi(!}JuBl;ycMu9yx6km1e; zo5$?7W^;VpCCLmp0g96NfmSm5xK)ehEV$BcL#h5!=dtZ0LI~SI?^Yk0o2bHE%JO^3 z!Dsf=n2%)`na}AZ8H?<76`yek-Mb^1z8cLt`n(=%B!H0L^o`qqI}`ReF=p^Bd49S# z#xEiZuY;k%2V7yu`DZ>Q8$;Wv%(`md&!KOqWn)@0`ZQ4VFxNahg;hUZ$lnhu9W=DB zrFc#G1JwecN?^}XT?x};sXnztuWk2~4=^$Y3CS972=vPCauTy7L_==W5wt)QqzhS0 zs5hHIZ{~l_-fqWdAE-1R3A%8toyk|lp!axzusL4lF|+d{eQT7rm>v_c*tACVM>no2 zIVt0moN~q}BMIs`a;VMS<I`+03&R2D2~0kh;rm$vT}u}23G{aY0mn|GATc5&L?cmj z{QRg?74He0$Inx5j`pQs7@<TaWB^%&*a{=O7Bp6{HdPC++5-v0x-^F_K~n1zNYth} z1+AF&81q{|QUM$^9IV0md+<9eEV+bQfYLsWVjoF}eKGdH0{~a8bYHs*%xT>;&ntfR zQP~#hqQolq8AISE(ayS%i;ms~0|tIrge0`8wm4LoJ{@%m<%;&3Sy6#ucvX8-M!14( zs8h{msM7nT=jAt*1MACnB-vpip;nQy9t5Oo#-_F0knJe6*sb1=(c4Cgsx9Ux>SW%H zJHy&zpD$G`_IeaEpq=kZ*`k@DjLob!-rZR`9z#;Fk0XD=`KPpj;7@vTPtB7CDXr%v z7F%h9_K!Fxh<q9&<W&SP&>_Y#p$uu1J9b?2ekmZD%7)UgMdu&U<Ux8AbMle0KD&Xs zzD_v%`GzhO0TapW7Boj8v3R5tYCxG_N$$%6Gz(cVRH3dslE`EQXe25sHrEMiqd|l< z<Y-ra{S1oVop90%ooQD;9etHTl7u2zZ#%?-h^dE?N3A({*|3_0bEoX=YLbXu&+aJT z{BK1)MY2?P!t3rP`AtZiQ)q%|(%YX(R=S6UM1c<M12Di?f=)%$!zi4oXWG9qA`$Ix zz*J_Ax=fU<ocs7DzFRqxSyyFor>-kSk&Um7#W*AiL?Kz?&*^JXnNgnk>is;6+!}eW z^7GX^<cpUxC}Azls2x9qRtc8_&>0MN`CFCKB>XEB9A&KVW0_MQ|AL>RmL?l-TpAmL zWkQHx%*XC)x<+8=9*o7scOW=;UtpAG6w}Wr_w_*{k(oC7bnZjvK_VNkm2V%6dlse& z(b15e;Hv|nV$dvPrm}*uTb~Ul0US15a!I}xIcJ-A%BZ*NM;u)^ls+9aH*j~Ojx&Ph zOkq4sHgcNw^#{(Xt><}1C>RSBb$wb|BAgE?w!XkCx)RUM16l>ZTAK+}#0u<ap5{O* zwPN$4*T0rBRT^s#XuERDT&GQp3*6(G0k|pRnCA!|xBx=}H9YR#L$aoxRqY6Q^>gq_ z05Di)QAr?Ik(oT-*&tE2u=Aw;>O13Cl$>^Ra5s5;>j!LFy*h=Bw~QmTH?_3BJG)!4 zr`c|R;CeO+;Lg|nq{aP$_%BgAX)>@Ksr>W&!a2g){cJp|lVNcOo7;beLNbv^%Pc`| z(yR_7W^Ou1AvyT{Dv?Vxo|WE%qxU~}<4o4OGVS{VfaXxnKp1p{o#klEv&?bswB1e4 zK;&iCGi-g9lzy;Xxiv+hMvyH$Zq*0;rJfFtIJ9b>oF!Zhkf*oY0Ulu7%4wm#=Ve;V z1J!%WJ>Umg=l9Is$*cJ-c0JBq-<;V;sR!6sA$|@7PC&=aoKoKqk)dECqlsc2M>reP zHI05ua^NG1kt~T(ms^0oO@#voc9eEWG;q$&OVXHyHn@j>Vg)urA}U|*Nm{d}5-cf^ zwUDA^A)LP4p=BW!8{bPoVnYs)4}XKz8FM8sKoGm%+|GGwn))<yD@O0NSyV<f@Qa6l z%)wRb6R{7NWh+b%Z+pT6M5<@p7R^}ty*5hq&{bX00T3#-a@R3vA7B_fJlv<G3E^I> zFx*Qt)2AUKk#V>H)t;ISfI6~PZwARXZ^wo?KRUzJ=+a=SW`4$SLti~>GShj33+QZ; z|EdJ$vt$EPsEOEN9{izb7#K<hK}Ez55G3Dw2ioKKeHbnPwb*7C0*b*HHgdb!uT2>3 zqMsZ?G$IYH7AK1XhmtsK3ir^w&(+v{fL3MKuM~Bk?8|nw%nD`p8~d$yIkc9RsE|1= z^)7JI4evYB2Y?0kTb;A?nt`^Ts0*Px4!wE_=$m6VmxMWQ2N4!squ?ZyUpGo1WimKA z8(Lu%%I1E*;I$USdK4ODCs?NSj7*I$P-x=&%zckFK2H~K+y;~Zpbc6(z-ikFW&GUV zH%QV0_!SU7r=rrzkr<6Fxbou~ugAG58+{k79}iH&C}qbDtPMi9r&2doPe(8T!o7IH zNEnr@@_3Jd@j{MbtAYJcBnhUdr7`bnCi|u?0R&%FJB!a_^?wAqA=O`99>w!~UrJUB zJg+Q;#KgkjgM+RPJSVeOHs7qLB=2$SZv!e0h9<v123&W@6-rs-wr2vV&(90Obc-Hv zMPC~uo91SuIVu?RZ(ai5lim!Up=b>ENb5w&#?oE=kwDw4L)u=0gV*<Yq`Zr^5@jfl z1LmrS`AzL}xT2sg*UKEdMo&%N?81-Q0baW<P>g_BKkgu->8%nHY2f^k|2|W%@I+G$ zm6={J*O9pTEM1nCmIMr~D~=XiT$M$v@*cE|*Zz>y+RQ^=LU#^dSI5M*>#-ss8t$^) z;h{h38KZ4_z+K`T{wfYEXLPLiV8du2sY>{^>yo*z?5hc_=guF{rUS$_;W(m&^#P~2 zPAL-Pi`wTMTdnbfNTFM0%X!M}5XgnEhcPim5Z6P#MH5jyc)1Mb|K9*jks!%z*~_@( zeFPT6e+QbD0Xm=tmLb{y0d#pF2O0d^R8vQxn?Ap5q(oofASD>CCtNza#V|jRF*Dz@ zI(%v<)Ocgb{@k>g?oZF?xS7W-7A7D?VgAPZC_>e3#66|;^PgG-MqQx?d-Bz4KF<Fz z!x#Y|Tks<2r_RX%(Y4Z-TvlwQ`vV6y|ND5c*WI}kq-;QVojdQAwdkU!Ps1C5gT7J1 z*>Gy}@GBTmbNu7&Se4dFghx-k{Y<Y2!0@jRMfqQ4yYgMId4sPQ54lqrw)Vl^C-gsZ zQa4T}kza%vWeZbVzo0~F{mN-Z0oW0K&vm1TUUX*Ns|DLe^v57RJ;+*q6$IXSs-06K zY3+)oA$$2<iGKEZ#u#rq&pCN#r_q7359EJOXkA{Z|4k0-Hx>Aw`p1{r8EMJsHDi zeS^pNl#_z1U+AYiM)E;2!TpfZ<42Qfn_qcU1RlynVp}0>EJneC*9}1fch!1CKySK0 zQjYKyZmc_3q76A%+s)jP{sFMH`5oZ71gU{Ily~(Do{r{EmE4<WQQK(~S;#j&IkT5+ zvmT`v6o0jDbu&BKFAiZO2#62l&s~iUbh9^-&yy2&uW<k&?2GyAr_dIL7fnqg8oti~ zdd4`k{X+t_5eknVoAU1QIdj~GM6NMvNJ^KRV$^;XLXKYuzdx0`XZt;qH}BNyYuevt zh7d)QK|uLp&hvMW{}!3Bl!$4xMaMj_kr&TQQ!LEEUnWtTTVA=e`*;pF)*B}`s$i`B zjwbtl9apaQ&XuJ(|ACgxcMd`~4YMbB&T`}81mQ3ca;4i2(hn52?E0spRmzRWzeaS& z1GHMVlQ0xQVl}!b=)0ce`ndvs2i~5ZsJ9@m|5Q=bPPQd6LAfR+m*gD#N)W9BGI*~= zg4i)hX9gbfhZ@RQQXVtE1y9dG!P6$Id2_uHKvGa+No_>zhw(z-XY9(n$7<wFliNJi zrh%XbIpmEv)aIrvXZnl~pUW8b$%KR0UQ+dPlr!VXht9LCOZk%^X+v=V^8CSv{Yf&^ zkPL9yLQy)C)e0P&a}&UnUA#{Le-nLkAf<uUBnyJMvoytcX9ff~dd^B#4sgsGG0yp* z4afsYS|yQ|A0uo@CrK4f4n&zbi02-J>@|e;miHo>Tka^B=>y)}gfjAnOzWKtnTk84 zFKu~FM{M=8phSp-O!3taz^sqU=-z+GH=cWeYa~uR+uO_L`{rcIlYZPy-S1i1%4|}= z*@9p#;FMHH$!j7eVMR}Esg78~)lgpLtRaR`?9n9NkYU$A{_i8XDlW(bwJbKLj8p@I zNGr8w?MT2uTTr$LMk5>cy}ggdoBp2Bz5CFsexRJdz+YGKz=a~uBlc>tQ=1$kCcSPT zS>J1xDr3{-ug3xQ8ZN%wLJoKWD>gIrS|I5SrhXO30RAtsK67TP)Ok>xVLrHgLYxN$ z%Fp~LPBK0@@dz4`;zMXe_-IzWS=t2xJ{8fbsQ}$V5xAXZ4B|ZU41AyrN+{R=0f!G# z8~-&6^pSqDb9%_<`h?%*6=UPiAnwqcCV=$88!HfPrk1ABQJgWOKvIUXucv^Kd0|hC z4$dJ9d>5SBi|4y@Kfmj3Fe`up=8uoc2_g_}lb<Edy?8EYTNGrV&-fh}^zXnPQ(>1v zfs5bs>bW*qQ79wDawO|GcJ%iOnOV&a>F}R7l(F$eAbvy3VteT@fDaA>dd-$f6J86~ zmZta<@RG)n2wg^kfO61*{vAZ&3Pe-E9=p~~J=VxYZ5r5c?Ze(BGwj|@bI9}7%4Jzi zOpj+RFHz<HkVG0^0jq<i4?%+)UUoj3r5Do<IRif}t}ysKhzE|TZLKTKPS<PsQv&Ko z8)4d@N6M8TRY0ZBZ>3E*qnv7iI}Bn96FSYGZUat2FcC6wNQ5Sx^*X4bBF7`;xQZj# z4c$mm8-mrJ$Ft)Vcowabfn2ruY(9wE$t<+6#FO??6>iGhK^g5{I;wmBF7-6AF327P z@_TqWj9xYco=>kc^5)2iX77)OC6JqhnP{SVzzb~yYc$~z`Rdqba;Wo93-X);mG+Cr zZ5O8D@AFTyeIDhj24;ZtQ{eLk8<zE4TP8oH`z<L4V^qouc4p)*-mwAgeY`4qC~Ty% zcEJA_$X-=fVXa~P`Wvb9v1L(r^nm$ut&GGNnB!$O9yqhM*KN^^&QgLsW41TL$~lEj zUE!7ri`Tgf*+}$<$1@v2Iw}Yl08_RcqX-_Mpg$-97YJ`iLN8|K{co=zf*SjqTZ9(B zu=Ft~;!%8hz9lPyAC_Yl|E97yLJ~;j@vSt0YeU8~g5Tvas?niHvo1|C4D6*n;C3%m zMbF~`m<gA-$)TGK^Zn}N#N!51z~Zggu#uh6(bmqjS<KwdgI<X*j0m%jp0p`oJN6g0 zc8i!}Hso6({2qRnt+B{!-$!Q!epk27(U?ilz4O0wa#z7{N;|ih;*pA5OjnC%YH_Z_ z!&(aC{EtTRU(YeL2H?M?4D-LeiRr(tycoUtm(~4e&!8M2=-vXiySt8G>{rB0&%Pgq z@+v8hopAyGi7jGyY0}xxO;BHKpg;JTlXGLY;@-LWQ3xdxn&N4{K`gAAVfWyKSB<Ov zOx@6DjgXAKSzZ=H{_NFafIs$pT~v#0I215Nkkpy_Gw}5w>j=%p8*M}Tdl8a7Rqp3X z$3iOT#RYI71fEEwtmOslv_n?{suWgOW6&*7pH2XFf!G2>)c;G;+p9Y+Kz8m-M;Z<w z=jU8bc@PdlDKQnDWx)++bR6}J)MpI>^Ss&=weE7EdxtK@)uTCW!}3n8c*_S~+nz8x z8P29RN!*CgKE+cH#5?o=B}x0|qTrFqTlw*#H#gb=^(0%0tsI!9oKV4#_wUO9V!pXt zkMOH?E0h)a%0yoj1leqeBA7l^S(WQ&4j;arq03e_zxpUYW*lLbAJsr3yH$pZl@uFK z1;HiVc-d24(^any0U3U$5yVEd^>(Q`F-Ev;o3VXa&bxd=+@Op*niKa*4h|s%hD?f& z>8N=_;>d#x0mL6em%fDl$TIYt0;1#@lB(Ex$5>v|cp-JDHv)ueER2ao7n-h2-(!I8 z@^aC|%NBF8)+`zYmArraTk_Rk%@VRJ#Ogw!4j*dc!9ob*u->Nu<O5$OGHXKbBEWqH z75ODzQ}>`TWVOZhAh6V*=imF%@`BepO^)xpK+9TE@yr|2iHHOn?G6qU9u~Z0WkyxD zHe*A!m~N%%Z>O0=4<5FT?mf)7BDPhjZ7QL@!F8?RXwVTnL0Q}>K+U3`dg=JbmPjm0 zx6>3-g(MTpgsvO{yn<P{@{?2}C%A8#){C@o09--p5};WR1$FU|*saBj7ayEw^S5)U z=e}<clc!QH^~oW5P->?dAXCt)3EQ#zFN3gtAe;>o?kG(59Z>`(wi>ygsKmOkH1ti! zC|<h=7Ku8?bwL8)ID&Wai)1BU`*6tvC~GU7cw+-|^aeO9#k@9hcDURVpXZRZ0SO4+ z52U1kKjMK#YGvb5^~zLZ)=&rt2sB)s)jbT2^F<4ph4s1Mm<pIoD4YpYV&mbi7zWq* zbNGSd`5=LWpnlFQCsl5^fHbZI_41q>HE3>3Pz=uGiHMd-uSD~qY%Q^UBmUwp9Q_w? z<<_+Ta6%wsK@&0-Ae(#Fj|_&3>lySTFTMe22U`tb#L0<yuclSH_mhsY>aP)9Mi;OC z0m5`5pUh%H)nm>wTV5Btzq?zJ9CaBwYl+>uBU1V=2j3~?+MF59+Fp!A_&lzujfbM1 z7S#$p9Hj6ar8Swq0GCnhU<u__pnFV|WoSju1`$_eoQ=(k*n7=-ttno+k8%CZF_6FS z6C6Qbt1S|)OUYb1F3LDLARB?L38FY^*Yy*t&3ftG^*n-gs$L7YAjM1fSh#IwssD5c zj0y-ph+Q<W4pN;FOC2SQ?ijGMWJ>43^)Hej1&E|@-NqY_md&h@CtZNDv}*PuoOb!D z{Ht{mhGY#*EwXeV#r8C0paJ`6(%j?4T+5`6rJfO#2?8<~n{M+`G!dG8sold?#st4Q zPvz4aOP7v_ua_=xcd2NiHX~h}00r9)QcV2tshv-J9&_@B70yF3YpnH5GxC|ORB&y` zx*g_^NDbdF*4_l7{ifxe^}k|Jp66U{qGhq{3Fwr)Gm-p@by8J+*Lb0OTPV2GuDbSU z+1Y7-cmE915V7-i+i?*0DFY(776tGa$mt}00QS~Na8(5wLF<fHE&-@ZXW|*Sn`J8) zP__aDjAj;MBVXEi|HgngXZ}K#^Eq%=$CA|x0GF4nrBgi~_zFR2vrBO}I6dV3P~eAc zL@lmJ`(kUNCF`(nwQr8*&P`yEtW3kawv}@B^DglQ>W5?mj(;o)!BvVhM^!h#BFRH6 zl31iHQY`;1$p02J4oZEC#Q0AuFVYC&_Lo9M#5EV`95Fqh_Qy`(LfH6tNxCjYrh`(; zu_OO=<rQjGJaETUPV7g6Rfd9(x2?f-kc^J}oY)M#?*qKPnCOm>nYJHYitGdB1H5|Z zU!XC+7WI%29V^zaIk<Hwn&f`#2T7UL8?Gt+xUmm)fHIx)PW!Unq|82yMP___{40%j z;){{?o_i4TkFFzD7hbkV*n1tkTM{yc-<Tjjc_T-BSXLZRL4*E^ubTYRA7DL*-!A<T zUm^q<U*eZyqYp9&!5V-211^Su{<ZWcOk}iX^}6-`ZnIaRw@1t{rWuFMU;qCAnruA> literal 0 HcmV?d00001 diff --git a/session_6/img/pivot_wider.png b/session_6/img/pivot_wider.png new file mode 100644 index 0000000000000000000000000000000000000000..518b82ce92fdb3ed7c7fadf0d5e474e9be48e9e5 GIT binary patch literal 22270 zcmcJ%2UJtp+b*u-D9%^_6+tARGAfE93?Lz)$f)3`1RVub2z3CFW+Ws?)j=gvf{uk2 zKt+j)fPl1wqLL7mCLA%efF=qYN|0Ux;lEEPGxNLi-Fv^gzW>s-NKVe#d!OCj_j%su z-Pe!d%vSxV_~W8Qi&p)5=)iA_7A>VOTC})i`7&^2ap1eoMT@N1zaB6->EGPT3w=iO zOZqk~9{Xw8<0(h)o7ErjzpPI+IbP)|cyQou_`c<*ZLdD2tRQS{lp3w@JiYJG%a&2u z?{=M$BQ(i<zqvK|c7R!nW#dwleCCwcvgx;{yRYWIzbn2Z_O2cIqWu*kO6sxI_N}hc z^-W9S>Rr5=?3)?C8J!$IBpeGW)y~<KxEQo)(W3G%#@|Uk@O31AoY&B|Z`(Fn>?L<J z%(^{9-1n{h5BD5lU+1Spv5ltr-r{McsYiO-!M#!DwB)!rv_|f(%A8#u&0H3X^_ve4 z{GdQbPbZIG_HQo@ZhAB`zEpwHFHV_hp#0pD?^U^ekKM}sV^!L<I>})@+^n(oF!up| z<em<~r0eX%Omqpky{#9rpHW-M<A#hsGQHiz@befIsLUu_6W%mab~ljXK07TalY+L) ztXM-(1T_*AS?(-%89I2SeKb?rGJ>MyGIB|lZbCzPAGw6w1U|}uOOl(w=h^3EXP=Zj zC%J{?j@(Z;gWUJuet5Rh`6vI2mMzo(%HKy5zP+|P%LQ&O3N#z7ow*R)(qcQFp`DY_ zqNm66{>u1@Qt=o_9n%pS<5ws%EW1zwbV<ncWLjr=vSDD3NXX1e7g0DC)~#;L9)VcT ztN8;l(W@o@2QOzudiaQvZQ*&xe9xww3SXbjnj~{Br!RCy)J~o*q(I>1&hO*EE?EY# za@JQmy?usy`<1;ePFogCo9DX<Do-~Bcs6BSwIeXxGw{s(!M@O;#P*{_!Avx2u_oWS zX-zW=HZhP=J)C7%!uUFrsZgQnAZoWldhJp+1(Ky!TJ>JY3<&PMM&*5Q;m%Ap9Xvrg z5()8%!lKSJ@j<iRof!cl3WY5<b~@jNQOLBUt*3_%C`I8Xcp8__%$5_ck76cQk}P7E zcIMzAm&-*wZ+9>@xI2An(Y(i&-Zm>k3HH3+yX)y}*u+Sxl4NOpnxK*`Xr8H%%xa}! z0%i-bN!a0p7P@kYRrfM;K=(5|pZ)UvS6o3P?|qVK0CBC<)%<~IC@f&Lk$7BS&dhc; zBPu5i5mZPPkw`abek5QH{3Kil8e(3cICE2&KowmV?P<Bc8y5+=ILkd%I;Jr296A)E zv$|s@lU;iq;ty|136p))a#hIxOq+-}-xumEnU)n>aAsGi$CWcyV|KOZ@`RsQ1~{{z znkD4Zi{!x@SUJl%S)VIYH5`;daVt`WYC&%eKTi%Txk3OhE$P?@Xfw$qHp6Ntb!Ngo z(<kt~6QMO6y&K2Xwc2dDg{TPMq>ieE;E=AIQ1YZV;6na-(y{z5H|@ZmIkg9$WjYfn z;Hj~ntu}WIj0Rjv0$*ZY`#$GQ-;S1&ESpPVMmUal*Up}b6x+?<J@eSGH)rR%&fyB% zc5me)paQx`ztOvcI2HIsYWo)4l0}PNHnL#8<24uc)uzvS-X8=Nd+S+kCf%{xKz~l^ zI|IHO-AfLec(Xy(aBej+8x47tnaGF=U7r2YyA#DiF9lzcg`EzRnf^xI-AJ*Q(7erC zxU#p|VBli2e`FuCZsj#sF5K8l)vzJ#dobh0Mpn2&B|5mlD-<HM4cG9nIV;Nit|7gn zOiz!pRI4brtJpySeM&TvvO)cEmKKg)1)gz6(Vdftr=v2Rg)fj!!CKw#?J0>mAp?d4 z4p^Q4BP7e7_Srf6iWP9&R=llEfseO-7>0Bjna@cC26XBwX0B*MsjFZM0mZW5^&dTh zE*{o7J=JBnyDa|#?*e$YOha63v?Yc2)GvBiQi1>KyM2Z0(<H5zp_hs4>Unh=^NT-@ z_GI&i_%G0Sx8CbZKEM0UE(-V9`5`ja(jt8Y?(M#czduwlPQ`uJCmoiz?tP3b21b}g z)Zs(cS4tZ1pWz&m1{EuJ_#TT}KfB#|tD2HeUa!$|W_a%Q@3KOgWvTVu-3&Xk0Hk}s zl+&W0S-AQ0YoDZ>eXS*_gN0PEU04U4bsAvU8#C2<T<-AX1@iRDitX#T!DBq`&}WjR zm6F}|(r6!Ara-?iV5Iw5ik#r!RR1nX@0o0*SCX^~Ha66q8zY9CcVd>yrE7e)rfF<U zzmW;Htq}ukVRyuHwYldTeQ2Xf>yRdYx)%+}CNP_Hc^YTs$p*-}*u>d6B_1o2r*H75 z3CHx+z#Ijgz6n=wUSN?Kw`PCxG%xjz>E(6O$D-b#vRh6`6Brs=Ki~K4JQtMNeMs8b zkOjj*tBuB5eJj9AOCBx1yq@mJ5a`T(RmFv&qa`zh4=z!lO~^ZJ!mW6;@Z}QnJ6}h# z)gZqkParc2xrE##DOFO)+%2;=NhY=AxqqpN|KiY9P;B2S#FzM6#ec6$$(9h%URu)B zI}!TBescK?`J(E(;*pOwO|>DT+6s*A$^H)pl!E&5xKm>eXNteQULmR8c>_JB5;578 z38T7NTG<~G*Mcfo?#LCeErQQ7^xfdgky*>vj9lI|XHJoO*33?xeB`p^o=bZPlZMeM zl-%pR1J+`>Yr?Bs6`up~)_c7x#r;LnFW=)ux$S$C!xHoR-YQ>o*Ivo1+(`biVDBr@ z({J9Tl)pD*j@~rAeY!}T(c7pW>CmN7CW0$`&kJmrxuL<IS1B;$dI}_i`#;si{}{h$ zu%c9F_nH6q!Q?&vbl)ad)eUvCI!-Hfvsfu*t?LtQTz_MUUM06S#Xqm!OFS8PB*9y+ zvxa^+E3$TmGq|dWQH{+ZW}KO^5@h4z$1c55#})X!ZP0TKS01gY7<)N3^;zYI9LW@+ zK;;z3x1&0FB~&y{(>#(y!0-u-Ee2#pb&jsh_N<t1w(B3M?jxU(E%Yh!DSEGtvmo^U z8JiO$p4d(gl3w?_#LtnThs)4o^hdjPIBqlAUiF(BjmoQpHM%TO!u~{Ko91<K0s(1E z-UG_#MT@-Tp4s#jyBY|Fi*1DQt-I%X>E#W<a9?DnMMa!;t^RH-v19Wsm5qHSJZ*Y^ z!0#?CpJ<28hz7amPPF)=u+JjFmgGvuW~F~ms89vw1YT=ln7hMt=B*TUE%494!gh!w zOtv<;nODU1g!=ob9_v)$a9O9jjbyZ<YqFuD6D%sP&P6+QC<#ic@MAd>vA8Q?SRCgl zJSDQ7(kC4Y?Ws99w*Xga<2t1_S5V<`^ml#%nh(%NcmxJIGu0pMM6fk$C|_%Hy~UcB zQSHxyrvh6$HO9|5%lif4W*xmtn=4?Q0~{(mH3XlHNtCzU{yqZAtAJ&kF=zUsaMC!> zyj(_#f(F=S+=51@Orvnd+h?cEOBn$X^IG*6zot&;Y&05g?YT=xt#Lcdc@xdpp93bB z_2#)7Z}5j7(1ppZo0DRO)mo0@rxf`_e1u>xe_uKJxu)Tl=Ty!`2iU_r=EUBz1rPMn zW;X26VUOA1h{H@@*<o*C7Rbuml7YsPX&P81E!4<y?yIY?Gb@E{2exsE>v_pN3X*-; z!tNx#FgsmrN>gTirc6ZeYQhR<n98Sjj7C6nJ$BTZX7}xVhPmuE)1VjFUD*w~6v&S< zfP$Y2WLUPCZ4YZi2j~4@h7_27nJ?5as6N>O*>k|%y22sS%rK!0Vf@F{zpSIPXI<>L z4s>u;wwZOp_9W^krDb^@pUA7r_CMuVYBe%(O13~sYuoq0ziyu0dthZ=sei~<0*YOy zthM^UGdX(C8Y$(9SK+Wh7p7ysSsbokuj1PBVqgbncVbA1UYivB@%JG83m;{htTnJ% z89E<XUhFf30GZshp-WRLm3l`*G`<_!F{IqpZ6uiVOC%p{Gn*=E5$yv$%j}$6M8Nz( zRCHj-7RY(9VGL`klgQTSHqf9mlbIVhn~wtXGP|coouz3|;VyRdip;g1Z1{|{$*yHx ze3NSzB?cP-3SiS*{T`j9eBQqv-hQ%_cVAmNz8K#c?x2q2`Ym@#uS2;P3yJ6lnuxC` zS<0HP37FMJM^%S(hxYWj<NOxx?fp}ODZDGXtJjxIjR8Ky{Ae!G#F<42bv4^TPn~!H zZ}U{e6=1&CBAFF1_mYm%x$9GN|0?}Fa61$Pb+u=y&QwDN{pKbLl(E_*Dy9W*40fJ` z%zm9j44?RY-_EC1*&Uyvp&{?0?V`bUJnu_XZF2iMdZc~X;5D0rh_f~ePd@$;?%gLk zR<1wfs>d^n`a#y44ckeZ*jf&hCZEoG;%?-pcn3;q;AL6~4k*N+gS#C2d*OYjZd!rf z2J2gf&b&?iN<qE%t9nKitpg7~t;fG-ziD+h^;67)9^1C+^Qt34RqDt=f?>0nsayDP z*m&Y40nBiT^S23Cei`GdXzJJTZ&q0{EszadVwnG%hV~y;;9soxC5d5BogcSZ>kek2 zCSDxi<mA*3Q19sV>({LvuJi_oii$plt}uO5QIHbrGwJh+(lj*c3xO+d)4&yDc?lQ= zi&Jf=x=LbJD|42;*tTt3^1At7;y{u7s_~FvQC?+E8T0Fq=FfXQFJ=s!nW$DNi^HFv zKB2ir$Os(~r>I&@{~XxMQTgL$woiLzh3`;7`xJ3>_^V3z&F8|)DqoGq#B)8t*VzYb z?CVMkw-oWDnd9%z0tI&}JigBOLfTFCK_hyaYf7hY$wha5_1M#P%kVt3QelH=RCv}v zPo=DDNt0>{R>|~r_f@^wjsiAv{sVAwW<8us^B*YC+9qv}&?WoF>aV#eTGZqv=DVe& z%=Bv#+eHnL(Vd^}_66o}th}$@5A=g@1jTtEo{${{arC#>BYk4Z|G<C5SJ*V`b@6qa z3w$vjsfH~MU8Is}b6=-+p(m$9PLs$iC>tehXuahUSn%>&Ut+6%$pNJ$^MJpi%3Wcw z3ie98dr{W$%+#oTO_K_poLQ5j3vTubt~w>XZ<ZvOhyMWVu-r}7&GQHdX#mCv0rJR( zwgBkon~ZEBa~uLeagK5LM^SUU1F|<D*B97_`8Qs8_1PWXbaqqvs|Zjz^6bC0a-oRX zqA%4&L)N@ey`~zTC{(S6`>`)E7vLS!mX_(EGF#)Xq_Pmw@s<`=uu*<5*Sz4mh!QGg z0(|X&LALp60&ix#2jx@XRBcmTn~fJ8&Js<{1njaI|CUfOV$;?P5fiOH`uG@p+}eK8 z>Vq6T@!3>umc>Q8(jsv@wZLZVHR^<S0kN)Ww~BLR^VX&sJ!?IDSs>?Hg>%W^aFDTl z1azXedHftS<kFtm*VOM__N>oKxoo`Avo>*KqIZE;!_XaNpXxoKnqTv?`R&e41-0^I z_B?6Bg3oO+mFMPIC-+S51++(=SCt0S{MmTIJ$0P?L9~WV-yeh~FT3_)kHfdcW1V_? zANbMbxUAqGnSfk)yL9_)BkSg+0;_`4gBH07nKt52?C3>!7q(vpf3IKzy+9+>^WD%- zd_qA%)6`TLN=5wviPdlAAy^y9!q3lx#RNtIJErZ#WVuT^s@jE{)ii#gl2>0V7S`q8 zJO~EOW{2=Bb)@Bv4U-{ej%A)@Y;*D}IC5`2{X}+p(XRDm-|0y?<DNoQCe+MyYq|Zh zdb|Se%+${qzPJWUOSe;brT^NO&WX6h^9FRmJiOo&t-+%AdM6#L&fT3=?7`TjS<nJJ zuSm$Ubs#<VNQ!p*cwMMvvo1=YU+=*ul{{-SL18nO+7U4AKcE~73!R8&cK}avT;IuW zPkOJ`hW2>Kr4BvMpIAP)kiHyoVdjtu1u~4>XS-F2oa@0r-#P={Dp2-v(FtNE!vkYf zV{NNqf{m$}D3oRbK)Lgs(}mN-%p4Dfe<&fb@z<nfLaTuQQJVa8lp2n#RB$|sJ>8qo zmOc8Y!*^#uRO^DTPJzs~{7n9_)&+atCVECqIY+^f*{g-HFiARU1>ia}4P2+F@q`X+ z{^bb3mhAo(0Tof+yD;g{H`{y<M#Fea<6_kPBAybQ^B(DpgR<AKS37g=wVs<Y+qwGG zQR^$+{7$6A^@JO5Z{||pxK_p0$%ImCf5`o?fey(JJ}rwlIW_VmM_%ZEOD6m{YexmU z{3rfZQFLs-Piu_)J_6$``_H1LJnN91*srWHi;$TWoY3=Dq|frkHw}YlESE$kN$;WE zLXEVMb(Q<S#rG?8Id8@-;S<&M#9t!n)nZkMr$9q_udYYO_VBQZ1s?J*5xU}5jss13 z{-=_tHDFVLbMD#Z2V!O}=I+{7fJJA=@|qEl4=$Nre1YkD?#U(6!`Aw;MbQ$YzC_Ed ztv5|`E#LR`F24$x!h)Z!iBd&d)C33m`oWQYP3?BEC5~O4=8L85X{Dl$J-QFh4+PrR z$;qdj3G9jz?J~l#&dHvlEmI)TR?8+vs*?;kudcDRPy>XZQhaY_4%P+?JNEkf)^i_B zo7AWwzg$R9lC&tTaPv-;%Iv9EkshnwX8(}hn>}T#j*GpHfA6CHnn>7XrX0`Y-9$07 zDoH007GyUS0T%avngtdbV#Skm`EGt>U=S_DkaS#c`uT82x9Or72NYkx-`OSw7NY7= zdV9Z<l<)U~#)GJtDzXk2_1KwA?0u&Z`3dw1Fth}WDe-o7ga%e~Als!Z(?vpBSr2@P zOiVL<Sum=zTK(D3x7Rtco3owF@?L_?f$iB<zhB2=azcAA;ov0=W?9ZE8wyl}-)NsS zNZTQ@Wp#VIo#v#d5)lSr-)n&c$=v);BqKPO-yP{U>7*38mUr%p*_AFU=JUuHd2Dux z43$g+{2fe%721!J@Igk=oM|eL@(r(q+5#r#qEs3B{sWyj^>*{!IPGU>)T<(e2bEUL zi}fW`8CcKX_ZvVI8#6E&PmKeuin4-ytp~mxWWl7N`!*Ra?M7vSU^%yw^nuf0NIb~G z-rQ}1HzUTy4B5v+F#-?%E<Y7YoN1?3`2L5-i+aER;=Qgj<l<(fesq#)XB=P?n~73> z=@ed{v#CPNF;og*6x}Z!zYe*m8bqikse%SYp;7Nl{nwFy8}pq(Hj)kSW*j-g^NJb4 z(s1nYJIcGKZhN)b2$<W^-_$l%*Wp+_q@gFsJSI(;P_msdM$~;t%28@HzX9w~dPCm+ zY^1<=GI+CwFnRPBbSWXAynZ9Ic~ug1hVr<zN6;aqQDN-dNfKW~oJoZ{XrB8R@k)<f zzcqM0siHteJ08k<*6z&((_bWny+fP}x+9|TTEDSs!}&yGCOy43L1US)!MFsWGo|F| zkPHf&HdISbHT1SSpR^Bn*oyQ>W_%<z6$)Ex)Avlc{aWB=rFQgmBv#{Gf;P{qN~pVu zgM*jz*a(xV^HL40K8mf`F@zusd4YL$e(-$ZNQ+1N9aPMY-Ux_Cqo2%gDeCr_F?}O+ z)t5O=6L!dyd#hf!(uJGt2P=4a%<=}86pK_{{_s7!s-gJ$fpiN$6^B#g-j0{i5Zv0C zTZ=BO_o}Z`ZZ8`h%3EeJ_wFcFEGC0e#n&mPLR$H$Q1{ktz=^Lz16C@w?xu@+jcNCY z+t<d;Ja0Er!_Cc6)->vp71#`PqvmR?r=N<}>r@Em0m{m({$C-aldT!!t_Fq)FD;~& zuZWZ_=ISk1QX*hfvSbH~YQqX84zki&06Va|Hhw+MX_XMJmZ$e=Y#gZTYlW>GCkxaI zeq`{8X6#j#6FAu9z!zewCFCpatHx8HzSUY)&cucyh>eFbGS`B>Yqr&%seh|>0YILk z69JfJ)l4~eKsgGCO`j=nWMJ8zFS1NX6l09#ouUc1<Ln6oPr!NxUb+;XCLYN>5xUgB zNxk+?%{?k*c2;Vq0BW7H_?pXQ%pbX$)tY=_lLA#C?|42`M5WlSFBN1@(bRASSeB;o zo97KHyBl42eTQ!BOowVbS@5=hVBIe}IK1BT)K5xWdc9gwng0r~&<9j#4I>ol^7;v{ zEhoWDc!6G~bd)d&XwBn{{gY2y#A#o-TU;Zdl^9%Xby&@k3r*ZDzmqYnZ&dq|T>uT{ z%}gc4P(4R-y*v}1iasICwvb41bXMZ-34K54(PCw2d;^VA|DzD_F60-02}*o$C~EvH z`IJ+-hYVe6K(Cfpb5(;XwIg%fQcb&v1=~5F$Iuab%Xa_d0AdKt)D*y0dX*`^!o1Ey zSKs3k4|MQ_UE||__8YVe_9S&2ENCX|1}&Ms#*dRWd~<^)zLpI-)EbqW?IB3_DzjUE zlkI*@k=|LAh<CRpf+6u%{SX0#ji=d;I<-`{YZOdw?9MslHHHiW@Z|Z!A=y~Q34f|_ zY;`L2EEt8yV6!Sb;a@s4z&+A=Jhm?xu*)!jic!L@b=L)*jX840xub(|vZd9a+1MS* zPN&vWoasaYo7zp%rbmx}_f(W{ONWOZLUqc7jrXl+nWBvsqCTnFOpDFW7w@3xNwdFs z35WeTaB7<<Gt&)hm=x&cD@D3<Ch<;}QuwC32YV?kd>uay+=#;KVq&Wwh5%m`MRo*( zNW>>TefPlkieN|WXFY3+4dxrvLn6^3YYY922ZlV;Q|^ea^OS;s!5|YOYBswbjm=nI z@7Mc*wCMqwcc(?ZHp?J072T{_ahU=bi6pubJsi7kW*f#RQ$UFDS?wg1C%<26%jkto zP7N)90@r!@m;+PFc~L!TEruup)1UXwuQIUN-I8P<<wgr}nI3&7z??yO$HmN?)lFd} zj_?AlDaCxEyP9|2{hc8-yKUgw0?SZQf#<>ZquLM9D5vlXy(cp<R?a<xoWs)Q>*yN- zXh!7G)3>y~yg6<5yM0k_aelr38VMm`Qk76+@1UyGss7pz&!j<3_JlIKm0%wRxIm#3 z_zH<dyvNiW9yIalI_y`HIX))q&xV)3vLu@qv=}A{BZPXmf<$M8=o*jL;hnT}8N1LV zgoiyJSqY3WyUTvqg(D}(;(@~g3E`<v2M7uG!Q=JrGO%f@6`)|G2=53X4vqs?jm6gj zWCZ)C6hHV^z$?neufOegb4wuvaZ~q&5I6_t)^re!+J3F~>y7f9d-&FYU0_tFSuj_x zzZ<hUc4;3`GUdiL(xFu+Ejh>Xe{6<@aE{jInqzC|=@IW+t21Ge3A2TVtV&)iKaOhG zTKoy~3QQh9J8P|doT`kR^Sl_o$r}DJXhgrgXyR?Zi)<1WU*`0-HLX8%09gl-&Mz-3 z(?h3wAM9|%kW8&NEM3D*^8n$lsF8d5XgqBdO4X>jFQF#m)X>M<ogYwT0Yw9O<MeE0 zU}p%J>FD+#DPnJskjUiM=CNgO$tI{;aXPn<<ef<dIHOx<Zm*|D-VGK_?WoPFt~Ea8 zzV6V#A~vN}mdU)>J8Z-sO?rUl6XC_-+mk|m`PzcQ4BdF!!VX@Z4<;=$&L&!TNZ?l% zu6nnRHp(|jCQQPjtnQtA=~|+3>6)j8{s<lSlBi5so{9!U$H=||3hX7apD#r~gl~?D z@mcYq?iRjJ1xDZ75Ez;JWduH#(|d{37*V|J-3lT9*SAp?2uDTHQpw0{c|Kf`=Ak;f z#jTq6z@yQ;FiKs?vJS8cd?M6%SG-uTRoR+5%FF9unexK?!WR8f<uR^?t=Y;L1-x}v z$IBRq+&=Xvt>4Y1PX9GAK*s4n_qc6SV~l|V$Jp5|AKA$fD&T?IEO1$>Rgs!fr^HbT zBwDDN$k0J(t<hcRJMg`L@7b+m$MNnRM`yl$WM6AdOX$6NzF0s!RPJk(BWPAPZjfO< zkxrSQzRhB%*c|L6_L@;z3KX~h*&e#H#LK{Ypy$DJ^r{8sMG8!{wM8Ps59e!&o6N^# zoqxFkI)%GmCcWk+HIBBdYxq11ZSVlNMmcg^Il*4RM!K{7aFd%-`@o_`9P@tU<s!>t znS-ZXdeZ<oHIKPJUy6a?Q`E-AcurM!p~Yt~^>*@>;-jjPTu;)EGtsFS<Im_VBtno` zX<{>60i1r>P*o**?jx}M^**EG>s(R|0ygv<k7~4Jm6_3(Yy>1D0wWP7;PWMgp2ew} zU|e?~p`rO9nWIktA2`dSAlK(On}rWxJw$_lv)i?V{`~7+2^X`_Eq~);{$gkVQ8kD1 z{(5Z5JkVU=hZcfL3oTR9Butjsg=`b`w#K}A<KGu;y)o;~jITJi=}D{@8+E0>O~kAi z8XWn$BFDaVrp)1Y5YM@O#E7<gg3omPsdzBdd(AvWa<(Ti-sSXN<o~L(=0}ej>;R@m zQuQXBjpXua(6;&4T*7}bd-K-6x?=9Gy9oJ<yv8N8*KB#$|AMfy1>M~`U-tVlK+0(g zM0GaIe4Vz`SC1R>$Yz4P!K-;KIUH;6t2dvY6No!q@_QO~wLF(G<*-UCPWX-uhSrkG zzAcKn61>r>12Aa&E72uE<=UFWbiF<8GXbSu_|ex{HR1PdhFYaZ%bv6jncnpZk-6r> z>1Vq;Jme4GP1@-7z~NzUV=hA3HNMMeDl7fAEb59&X9T$H+JzQc>7y}b6*$)|7k z1@&&%Tr-+Ek#(0aiQf1QiMe_F6jI{;1ifs29IDZ5c<hVuy0YwG)JopnBp;pR&_HtO zost2TlLDh4WTr~&b0d)CD%zWI`F>(!wr=Q6yPv3w=LcAuL};#ZPYdiA9?je15)&jm zufUKm3p4>SS)WSG9)+WkhFKcAAD8?Gr37>|gl5snfAC(jG}k|PFP8f(JtbkN|AXoJ zUl=n$XU(s)g(U|_x7o-3Mspz-fMYdBzAbQUb0pe)5p&m(cFz?t+t|6H|Mu8ET4wL0 zid_=29eY+pZCDjLIUpTqQT2iYV?#%NAFVT<`SN9G@ZCmlIs5p0^z`twwTpbnz}hC@ zE$U9tR?=zX;$E;t-N`uhGuh$z(C4eZIf&m<AwU@op`t_OvjLYjSr9s9I?4(CCY-Ll zRlfSIa!Jp%Oz*M|aZ8R$b;(cIiCUu%g~4K_7|~SKTb0W7ZNs|8+avy(ydzk6cx{5y zk;34Cp#DhE4Akby_vLL(!?Y<t%I_}yc{gD)BGMvh&@e~s!2nM$^vUSG)1!^D=^)yJ z85!%GZn)j~E35lyLClS$@IKNOTQk<^(1Uqa_7WN&dC-D~pIp*alv_Jk8h4)q2gVlP zPV(=Le^mP`Apxd9**2J9<%$}(aR-X;A^Ql*n&DF;&$T?kw?0Cs7MJ4_s{Pof!xw+k z#c_fkVjl@=?Zv}8npz`E-ybWU8E>qOoS$>$i@)Bo5ANDyG1=`S{=7C+^fGXIOd$hp zh%gwNl4d4=qvLO1bxaaabZ_2`3Js}M5#K~tzX0Axwfk-LmJKD2aJ0FseuWRKbMj*A z@^<zngsnO#OO326j72B4X^3s}wJ{aJ567mHD))TTPMv?#^A2pdY`ohiXVY&nRy3oI z#?<YhjZydyvX6#hoY&`#RjdTzM}-)jAlg9F&_?ECC>|JH0L3O~oieWq8~n6<7$;al z7dol;U5yHYPfuj$>hoZw`xv8kFB&e@x7C7q69qe0ESE9Xj(~z~kg%DLfuMFk-zVoW z2=un(8CG(8q}xxxdu#E&XP`dBUw9W&Ffk#OOYCbNe+r;M!Mf0v#F@$8_Uy^rvunyu zV7{-4w^JPLSA3ovxM(R~Ckm))o|tXNaYQpyBkCPEPG>z2a!dA20L|ZuGxMi*+V<WS ze@u$pX1oWd4agCmF6w4s;^Uyv4V<y5Lc&X@koQgjZyo@fK_5&p5u^<Gx{D{g1w;n$ z^t`+LX~W{_Vt|?_djdfaS?@I9#v-%PfQD@Gv>6GqAY2@=$f|sI7qm1s=@;9T@9rmx zC}obg&I@^Kq)zz1T1&q?h~E91MJNroe;5R>yn-}V|3Xtr*BrW0;eD<@W&@E%y{Rml z;#@$Sya?u21O#G)vdK);;`-V{F*!+Gu+`(0U|Hi^>y6vZY1EWRs0Vt3-|E`Q%#)>i zOpKJ+2Gu0)>W+e9?1MZZjV=@jOOp%iKd!qg5Il{^?W~R#IlB(}BgMS<mX?(l^^SK1 z9wue?0Et&InqwSES6cCbuk+pr7x@7KbV2*WqpHNo34=4`nyU}&T0@V|L?`t-tVV!2 zDr*mjPA*y1voaAW?w}q4Q<_X2?jq6NxZ%WcDI3{v+au;?zV(Qc*#U8Oo$?1m-vB^Y zAJazzLLtZtFFs{~eGwV6eK-P|X#bHD>Bd~5`jk3&NI)t^lLP8T)h+ls$G`&mP#z8G z?J4wr2YLY2z|Ojiu0{j==k#sU5+pXvMbV)pass_brs0+BZZ8=+Ry=8^bYab9jN$#3 zjl1XK;N_Aycy0DZ#=Bt7(QbZ?C)g-84wJPxDb7-UlX`4R0Z}mtTcSXZY1-+eii=@9 z)skIi@=)26h6`P$Mjbn%m)rRA4`4-k!8EFt3SURcmqx9&3-Mk@7l}to8nsX=X7_N? zro*O@0L6o7`M`M=e>~=C`1Whd>)GXN5e}#!k{H$a#$uCjFHYX=f?xA0yun1{iWKk? zVTTM40|}ImMOvyM%{&aeAsb$G#HZK&00-GiFDAyJ0Kj}lz=Z4-k`9=84t9^UZezi} zx>Il#?YMSYMb`Mm+^sn72KxRe_-vjw231*i&dra``?xXXl+FY~A8E7<*ai_m)$~2A zY;{IU9RBNz-vQ&Rc%a*n1;?rK;MVxzg561TwNuJUl)U3=o~);D7(t_$kC=w7&tuz- zOljVto<P~Bl}0J19xRyQ<V+wFjZRD!dEj~`WLQ(;EobT32p=jn@H#>K<B5i{(>Sxh zpw7V+#p4J|KkN<J+YTlMT8LZPgAUPz_Ek59FVq<TRvL{OZJ0A(2)UHZ{-JeZH5~NN ztclvq=gNSnwg6Kv=Zvn;Rsw86JA~^6v{okU0VbazMgF6mU2$O1D)431gW*jA;?&V& ze#rpDmp6gH0N54mvVZrs&^kry*e4;Wegb>q60lryP81+WJ44SF#MlXp-t#Qt2eaM> zLejMn>Yt%zpxcz$Xq0xzY~v~Q5YV~Ni46o4d{){G*dW0^7QEsO(u8wTTdYb}@rjl8 z?dp-WKmd{B9}OB-E?enpYQ3s8;}68=m)?ToxU+cFu0zuC-}t+6<!I3tYn90(#{+ag zL>ZpSgDs53pL^9~leoW44w(>kf!H$wrNKX<%Ro;6d`l-JDU0WLJtNbEmbpKw|B$s_ z_@=Z}lQT=bkhUJ63BR7-zo!i>9DQ75{eB9>PWgfH)f2c66<cvCfO|JL8Y>O$>tre~ z%>jmjucL~hhw6;|`PM_)xcA24u@vfe1BtKrMEkN*t~Wx0q&9q3qd?P#ITs%e(Xl)Y z(y#RJP5BIjPDFxxXb1iaHA5CU3556$PCav20%TGG8G5aeVEk=o+g1Ci1Du}z(upIt zxMq!+SWke{KsQg;F}=?+#8<Dj_xR6*PD%AA7aQ^Okqsj`G&qZA01sP_VXE)#rwI@C zk~D0vI}NND0!&31qN~#s5GQ}J_3MyuVY>yO@>K+k;iu=_rneDn7EnUm3*21L1h9qb zW$Q;bS=$CZMOVM!z%tmh^okCrDm&j9FJ#rGtC!yQENHopZcgRFJPO1+Og7@28LCv# zx%y?i@ZGa+%7;E>Gw_~f1N&G{3ruL&!VEy4LhI;0cIWZ6{X<Z+MopRt%~gp{BpfyC zjq>*EgU0L|h+aXvaK4*ZF!89FXT>>kAJ`2WzvK<LAy&_DX40<r?pbozuZL2q2sS>& zKmZJ=iX}rGohq~`+bcbsJx2KgFTvjICCoc~lgJ{gv0405?vONGAf2Li*usY<?EE%F zJaBK-E-<tA(^hNMIA7S-Uq!xc`We8{pzcN!-cC{{mu<{k)hJmUXjG~}eanGo8ZEM@ zp+``UlYCyvhS|=xnQa5+AvVPs=r_iLz84Vn{L=TYcJ4JRQ(t{zT?mjWfG#h1XE~FG zMlH<&M&shZTKeKNU?ANpiP!|ykfEQ0t3j^=$_Y3|A1Jj4`zOkc6N1_fKGq1CuCX`V z@#g2}XjHhO>1|xu%)y}2(RUWQ4^s_ZBb4IcCKmDNAplsLuO>+V>wzIYm)$-P0m+6t z51lx!r6XU~=DyCQGz{ZJ3^EeOi;sGI1T4obgympmEeaR{o8HCcPFnlSbTn3QGf22G zMsxKOQ$Q|GlQqij4Q3hKnchvjvt%3a%a_U0RZYhNA3OHullHC(i-2NngPkpm)0@q! z!H%IEsfr;7Xe3|Yi)^mJ$5vKl{Bc3c-`YiQ1TaHHmZ{#EzBG+x-9KxkAhOPI-~qrj z5rxt|rC=9aZQ`lRP>tqdCxdLY!RBScg1s%Yan7S=ZRFeXMg&ENW<C*fH<g<m3|DoJ zpMDkS3T$*c!}qwweV4Y~W6N_^>fkz^I*8wQ5x4tAbyDJ5y_Nk6oDCynnGxgU2$B3H z&UT#j^|vmBB3|wDfxJd9lrb}{AoBQ~?6786bpm61w(0|}efyEllYv7!BwdnTr<fiZ zfIo4P8Ut)kz-`GaEk0ks(C8pO;+j4leZ3vG<Y?z9X|#+RuKY1r%QCLG@;7XlpVjZ@ z+ah5)_VQ{T?FZ6Qjw~~^1)o@Rhw2e%`0^OCz01)B+_?Id+Xp+B11E(d`=oO99RNk< zvCFkEU}$_l2W+U8&HWN!Sho>ut}-l~c1kR8>e6~_P*g;1%8Mvp9vN=(P)g|<pKDVM z9Y#nE)sotAzbC`iblUGg@;VR4BcUiuiPS1s<y>4%+KLh-+G{|A+I1ZA0iFaD)SXi< zi`ZBjcTJ&b`c0JO>U$Iv^cvWM1q|;D9GYyUlH@cz?KEl(HjhK&Eg35qiEos+kB&1N zqPj_g8@Ndo6ip)nqp+nY0vE1Oaq0%;1MCS?J`J4G5|*n;|4p$_L3$<?^%{sJ8sdQ^ zSRe*w)h<Y-3vEXLJ3>MrKmASbG1o8()JESj57=js0K#ef2VXH)K4J^zyJW8X1tx;> zSK+foFAx|K>_7Y1f3$Pfy8Mm9m_^T^=!GI?tCX~RzGg|4nvc=bGp@HhzB8q`ZA+bc zHeB`l$&@6J=Mqp`3HXEU^LTUdyC7{znoDKQv&9+6FY~gH#b>A^{=S`Qy>$&^uii8k zxdj4}0dDYdmEP07Qq_^&BT9*Fs=0GIU$|NU<r6c~STby%i?^8h&h&MgUuE>j9Q1uz z<z7WwrcKuZ9Fb=S@e6ES@a)oko0*U4(QcoT3--EXiTPMfqK|=JySV=kX1+@xw`BSL zg8u4N6OqICzsY3;>*z7seJqKR#%c89Z-kZe;65R{Re$>3-B^b%yU?CH724-3M|n-g z#?QaICghd{d(8yC<B4+aY$UyW@70{YJ@lqH`)@o%Bimh@9xsfC)VXDMP*^wFmAtQH zW1jzN?;wu?y{4m)K%ASXzrbwG5jDtY_66_!Yq;lVpTFkU+`!M$UC8`em<e;^`PXnQ z6#n0(&HgH4fj?R(VqyONMYu`k<{TsUw+Xax!+dc|qD&<aGk1fw>kDF6)&3mg>GAMf zppbKmOlGtMI)gw===uKrO^C*Hbh`>V6TUbB=!V}(h`4u5<KkP<y0oo0V<0SOLc9#p zl$4vUp`L~Qz_dhyU<2H}jF>SbifPbxyg!)x#TlU-ngEfR!V4aXy#jJ_96y`eSC&q} zCvuF%VdR;yp)b$(=hV`svU|;Z_rTqyA6r9h1bes7G=(dU-E6mSCAZoe+>KM8@8wOn zu}AngjTH^tnQsVm^QTeOP>UG?-@)f(SD*>x1j>Pz$SNHFK&`D_&ha}SpwzqH@ZP%R z;`hFFWCH>53SZ|?!Qjm?)E&bB?kZIOp3El~LS-{mogx|YgAU{o?Sx6-4(c5Qfn2d> zfQUcQrm79hDf7N6hF)8Q=$mz&{L&pzS}h{EYqE6bu?t#10(>Q7AE}lUV#vRc6*Kbf zwf-Yn49QKN>={mJ+<3Q5ZIXJLCPsJ{_bb%%N;A7cc0cfC-cxeK@OGd=sk}ztJ(Iue zA21R)AGe<8h(MYZ7FPfyI>g?Dnyg5NKEt1Z1qCLo?u&09>qISWO>+NK!>#CAc}|dj z+3S1Y{W^v(S_7_ue_oL)`k_L$cu2HkquiPShQbp8<}(?DdcGG-h0cr*tyoc}x7AKQ z?1C+~TU_rUsCC(lMF@&9Kv2k#*szd>6+NTc3<*}b*%pA%U`gGBd~}KPnAoQ@J4DP% zzvDf`ZMUf>GWE$umI3%6vGHA>Hy^#)Za(s8m@H6?@q1S+b-<1g@Gg_4?o*gIP;Sn^ zZYOm}cno8Oi~C~`R#}7x0ogQ<>J-=aSUNVkhce~~`~LhOZ*14fpK)}7Zu7xUls8FR zNDT^Y?f~2Y#ntg~R2CYgYKQ?hJK$Rl@g%%rk~4?MM19OoWI)rKaRnzw(=Yb1vW6ts z40s>PbajL)*kzOJH#oVx*5x?nJ0e}~vIt04SCsIH<*_ru?j2<sXSTi03nL*+;$&yE zLXutJ&>ua;7OtP9w&bss+LBiL>&6udzteDJb50l4yCRfz|7utijW7ex$X{t6FqFwo zLbEi3lZnl`Ja;`J@L}RzfT&uLUTe_#Vu$ZnL<F5?-?D;$DL`OP839AuLucNz_A4y& z5qr9yaG=Jt@a&(Nw~+LN1(wgf^M(=zu0yhEk+PT+$5XABZ%Li=>6N8lCd5E&54L+6 z7Icp>%Y7NZ;rnG&4anH<e!p>38#RNZJXuzR-e$v%Ta!Xc(8>=_RC(*|{GPz@qIr*` z{Y)}d^6jlN-|j1FFeEUj@etWCC&%kN?vW}6k;QryQ&At;-;}VqP!iYj542P$twy^3 zdJ?4dF||+|V`SZG*%yvtxjVE9h*6>=S-N6rLIMGVe3m<kZAId|lz#tULaQmWP6=^> ze*`Gul$L40$)Z{y>F%vsPX=0K5N+T19*E}i^zcA@bN_#%m)FCE3jfF=DRE^lW2VLO z+K)?$5N(J94Is^HE+KeNrvc@7m<qAmuW3g_n^eHVMeC(xS9kB7zBUwheD_oY<bo6D zO6#JCjT&~GJl?W?1W^cg;=)02uL%jw{;SS@T#3^7D<iP^hi@Rti{^k><f}u{rn_;7 z`adxUSCLX;?|2)${)EDTPp!{iTpSIEQjrBNJ5CiV78jR21&LBieOT}rJ~1EzcpzEN z2tS$5@&ktG?1q}|5T`<LnXE0|kC4UyBFfi3_<?;qlv`EyLFAlfh?6%9VEL3>1nZek z)LLYXs*`2L4Yjbkq8+1#DTFPrvw$K6AanzG`A2|iPx(V!jB*YI%_Gx{fVlh?H$ZhK zLP|t3Q-RJy>q4sV1`^yvJc>;?G8IZ<)yk60wZY&7r>vJc6PWcHIO4sxg)V8n7;k48 z0_MTQXYKa729xM0dm0rFY3;{^CbMW=IA`Oh%CqbQ8@>!u=Cb+`t%=>~A;&-1gpGuI zj!LKElrNm(2n?PN=cRFWB-(=&a64osQoo_C6={H`kbog~=+iI8Q~~bvNM>oB355cA zc)zUy&~?V>rFREbG5gH096i!Wo*3}nk#&xcumqrYM+%(j4wCN>7aw?>&~X(%lx>`m z>D1|7IXX6;Txn>&CubmAZwySjRZ)T}xbfZ^sZ_f0{^cJ)s(|=aiL|bvwBXo*{u2s- z>pQ-oq>85eJ53Cxt4j0bNTou;BsSLm{jkCHxYq9G#^b!cDnx0LxfRDre8;yfx`i{o z55M&Tx~Af$HFPNuR8`d*lw&4I5oW;Z`3<yT`Y8x0g3cvua?%JP9m*<0Xz@E6&d{iu zNy?{!`A^&eVqP!y-Q<)sFfL3i`#@}$eF~UxMi(%8?g7aM9%o`=8L>-b)7zF20uIxJ zKangFbrF2@&!mR0K={785mElaDFv+uQQ=#fS+Ac9hD(mvy%T>~!T~%3A27T9#}x_y z_R~tx2GeY?3$J$)`Q!^&6I)un7eMibj{$cubg0vUYX~))Q24|<DnU;47hy6;1dw4n zX>)hL_v+X?AS+n`Mg2lE>MrT;K1aVmSa%3Dbnhy_HOCwog%HNu{_9>??M9h#e-;p+ zGTP#yfeC(A-wz)^k{h2m@cea9M)y$m7H?^%qsyg${>)ywx~!9(6+QV%3XvrzvK96b z5**p?jtM~R1%D2+d~hBUp!zyrBBaT3#FTkWCV!F;7Kw<nU}2|1uxXW}dqhJ;3h+%M zeIOd?i;hL(6Vcx^L1sdy30F%61LD4AT6+(C0uw`DklU#jToze$t?fOc9U=ClYy~hJ zyx30U#eSpVq&GcVlL*BHv)S|?p_K->v9)Qwa37XE$5`+)(S`u86dRE&0tH)f(oP?V z$~R`5C$7D%J?LQM(zXQ8bF(e;9-_V#QH;rfD#&^%s_!@|sZ8V{Z}4F%0QOW|CP%;O z4mJ>Z4v|&UMbgqQ*=w{uZNu-hOx2^vwahLOH>BfBjJe&$(DlIdUao)}ck}wFKeAw) zlh~KxB=4sj3*l>dQ34r|Z|MjEPC&J?7U&Q;rgz>BSZhmb4aQt%A^jKyZGQdj%h9&@ zel^1{nobumDHzhRf(YJ(-#~57B}9o+z7pDOdhucZ3V!K3(g98oJj@s;BL*MTT8OB+ zd#Dh+nZjO#H+Z8d%>`HvWbCX@LuSTgnY|Q9IE~L)(vUu-bQ#Ty1WPy@E?N&1T2C_h zfOUX_S1gHy2#*~VBZtO=`tGEhJ7jk8ioh71{?&v6$K8-A@X=HJi3ZTVy1N`p9}Ot} zFn!vTo66IN4c?ta^1=6Ev6GY^t7|-HN;^s03$PA`FF=+`z#8mN#RF^TJqF)rH*`^T z?8q3U<A4yj3fM5<BN^kY316P6<^cFSrW}8n4O6OkMtgi^^Gkdjj{%8swNhOX<g2xX zkgkc^VoHvHO2jkw+K+EhIz?clbpD!-s%7uPZzFjCxz6x=KCyUlb(ZlE4MJ-4Fa#MZ zzsBOpmBE#XBnu7)=@1ZTk#tBv8S$i<I>CHO$)Q3A%JyY!T>ZlJJpm)HO;_DV$3Ag3 zFzY?ztrx>c%vNS6L6+>YTjSVLEM48$Vm0=mfD)t7GXPvsT^Bb}?>%Z(WD$S(rGQv< zBU0~vNN@~BKnz&!)Jydyd-cZQvUZ!gIRfdGq+-R@rAuTTKL~W9>Mv7}Y<Nno%dC%4 zu{?&q663>Q!5HcPGJPfrLNfJclr4#kSoK;>BxKjOsuUQdzu{D_96g<KsLy&Fl*A|M z`9Acmeb)RzCj}Gz4zB6;woWH(QEDYj+K@H6C%6Yxe-8}X^G~21j0Q5HJF79*c}N1F zchuN7*CRBb@Bv;=<jo=|s$1tA{diHKFC$TI#^^y-62wCfe9$g=g_!uig;&wX08yf* zL|Kk(uya^z0np5U__xH4dC>khse<ZU4lKCz*OL;6g%te{i1pur`F}%!3rz%;XaTz| zV9UQ@w^`iSXD$tz`9iM=!JU6AX10Bc_Qyar<kFkFPv<F^nkv&%PK~&Ze#$Y|Tw@os zI|eGN%*mViK2<das-6D1WrFpK!ViJmQnh(V`u?MyHj@1c{wuyuh>P?84RJS+X!Smt zBo!9Pokc<s68?Xgsp|{Q%$uBE83o<sM1Q+qT>6Jwf4@@ZR-+aTWw$koF)Q&^I#GGS z+_v7&GXbb;-c1P^AU{S}vbO130jd1GS4*B=3>0})3uKm60Bx|qQ>_40{_N)XNZO+| z8n~*7BLrM{#)<4nxd!0G#ToY`W`0I>h^W%nvCA%aR3xhWlpK9JA8vOT=U*W^8-hoG zYRpTl1?l?+w4}K-EzzsKbYIk0M$0wE_1h-7cz9p_+%g%5WG*idJm8@P2n;^Y540q6 zd2SrQ<$0pz|B&-M%hO2ipJQnL|EP&ioVh;$a!FmZU8~OaAhC!FKjh2|+9LqC$hG;q z?0f7AQ|rBwZO{J#;<Fl<z<0Vw#O_w3@1UVvJ+ASszP9YmN4TTrdt7~rgF*!%0CxQ| zFF-F?+CUtZ3r-anzupT}Tu(;^5FK2!$PifegrH~TZl$VNQIsH;=_CGg(QL~5D-<2T ziU{aQmMtk6(JZf_s{-ZQVNL2MT2_)zX7b?3h<eD!by+qUh1<T%2f^3QEz8Ulgu{m4 zK;S=P>tVVH;|_)ICq<BCXe+!$2LsPfm+#yC5VCl)I_ct}6PoebKKX~#abqC96Yi_{ zr?a&$vnSTrpMantD2t=fO*~jkT?E9XEDqbUSh_+R2NEmGI0w<x<tXN3K??gutHr$# z|If5~@I4QF&tg0KoC-))Sa<~_Y5?m3b_0t=V(VFvr%)+tK@w<)s&lVhreY*iSnSgG z=Ur9fEe8M_jt?qsyuN$%FRgs;tX96F1mw(oN@_Qo(pN51$cns)$y|G7{@4bTQyWq7 zNaoDvhF?H->yfiZQ+=x_!gY64_i-|N>{Rx=CNWrT160VJ2$GijGR?`r9yeNo<2w|& zvacA0foEhS35O1zKwd_+NHhe&Rp0;%FcIOZ>p7t(4Gprpy}hzQnjtZ&vddMEh!Lxj zY@~k<skl#p%Mv%uzUnCsJdET%W`bM-vbH?glrFVBzxg!JVx@c_M-Ru*=<p_O2eQDZ zPYNfej&eegnGNQ3RPY>Ru+yIT4H3TX-n*V`)~Wr-nMCACDSSjR_0NM4?ImaWg*z<| zQw@<Q7T|m5ax9gBGoAJ5KI<~@AVFd`tB^|EjVF@wgQ3VgWxG>Rp9uaB8nLAWjO$Ty zV3)(50(h)_x9iCjuV?Fap;60aAUtFWjxh+MKrZ2`X{koQ*D)SLWn)Wb#(j;Y)VD}P z*h_v$VGnE$3s9P!O7XK(>9u4kosIaZv&QJiJs|%Cj``5Nz^2biuk<r59v#P6^}a#G zz>POs`+$g=jfkkFogZ={w)(OiW;0-gXx^{A$$LE#0C<!UVCx(DY`ggWH~10p(6sP% z$0rJe#AB}s0Pbki4IZx|A2q4~%-0neNv~f*Cn2*65f+2GA%ZeI1&5IBV-KD~5|54p zM@Z8-WJdOhs#WBx*;nqXg2#iRreq!?ngdxS7xjws!&slmJM>PAAKE)`F#y3KzIH$d z5>1U-4{wbFt|U011e`zNt5vVMYCEu`>p|*oGwX3QdR)_9_7)_k!W}@{eAI}~2|M%6 zZ<Es=BqVAsH!Fn9vUGEpE#VZvYa`i#XAqgJmInqT`bVCpWi99W^<AJQHNw+BmV(no zDqwnl**n_&F(5cD$b2V~Q%-@^e;>UaWBgpxiO5LARD`T_3OZy^+Jy}Pr_`Jmm+W#i zBx8U4B2TvcNs@z%Y`nwI`9xcUHU%Ln;(DUizO2B{)OsL^y)!f62WF6W!T{oxji}$P z@|qOOs{r5Yh2)SX3ba20LUhG%d!&;tQjp3Skwp@(Z!8e))KudhzJ&@-06@2zdxBsO z2xx8nt5QwDFvz2dD;8Jz;?{zW0-4WI_<BnchQlc_a=p@}L+TIm&HIE+1IRxu6~C!X zqC6GpKVLXvM7RaFC!kvh66MJotgZvYYzc~RupRl|D^5NBMRBV73wS4Fl~Eu$K9SX_ z&~lszG7of2{U0vgZnOu;-2Idh!Rb)_K{q|TJ<U9+qNgz$rNYrI8t$2B&LLfI#C8xc z4?pXxG!YPAn&MBZ_%iN$ny5jYUQQ74bqU{`0?Z9aa+cDb2PDVrEcqE{Eqik^VInr- z1;S!7V)g6699fj4OdSW-BGL593mXDn%Uc^PN|K3uDk0vAdEZwy6$=i@DQ#b$7w9Qj zVdzi%VIaKfRyg2PL+njX*7hMe7l#8QfXJc$%7Tv6e(L<e>_9iAkv)K#@a`^*ULwPW ze+C(6kR*Nsq*>TlXKP}UT8uX*;N<mBF8ucW>m<9~r+X2QW|B7D@it<iK_C4WMtc*O zK!~e`ICGMo{2#Z&v&{b7e)#|HE}V=2k?CAF>`I=n1UqIH9~_v2vax>k9@u8b8NFB6 zOHSvHnJbhAGY8SrDf8~oWT7Of`kA}^+O=zsl;|VpO6=kU802<1DloooOl~Uk4K45P zjn7H~k(2JwS}y~sv64Kkmb_tm$F9-R($}Y?L8nyFuE7cVCBc11B&pBWgzSF1=f*gn z)3Fl4CNa<sFF6Bf!8iRM?Z{b27ZkbRZzF>_=cxY=)P#(Wq?qaO3SYOBJIFaD8A#k> zBUf?+(A{SKa4EheH>gDX%@B~%t-5qwo;S$L&6@I0ObOLI!p)4%`muyR{7`qS{qFQx z;npUg4LC&_cMLxoG9wZg`;$k%TBQ6r-C`V)nl1`-{5+Nefaqq41af$K7*P=tLSx$e z!oV>n$X*QMpUZ2L_{44yA&?xl!GfK3QNOjqdl7}q30u2qs3#|9D-c+1-f}_lq0RO4 zD3Db&eeg@>h0xH@Hv1n+=BDyzut#~YIzRkMPq~4@<m%^C#p~HTl%tEN|7RgtQaJ3S zL*><MCYi@B?Z!D`N{oc6TZjg@sa*e*@A763^BIoX&;(9^P%m+<J3)2>GWX#xezNHT zU*M<ke15kDs*97WYqC#Z>}_I=KSHbf_yW*2q7g}zgfTm%A&k;!S;{-dGK(5KlodUI za^bQ&A(1wJ|LiF{jDtV~;e(0Zfka{u*I}zpTAe-#O^#^H7U`4rTNm}m{fcjmN5q&< z8jD&1e^1au(q-zHJV6@vu?-K%xg-PYbL3y$9<2j6G?bH(fOW|s@`2c^os<?{?=@T) zxwYVvWF&w}bYRZs30HuC@(Ky|1AZ09%+NE+K0AmULdB~ckFg>IfS{8{f;JBpM`$q{ z9?M8JIT^aO*Z?abO#jpSNnv)pNR~FK>fiGRNs);J@&PMqcq$vZf87N*LB119A7ssT zF)@Dp45PC4Zypd^flA!P$+xT>d$BeU2opUf69BRs+X4t|-={6?p5+a5JoMbLXaof( zhDS3v=?c{GZ&E0s6(&cO#Q|0{=Mw-hpvRooN`eZe{<tLK<PYY@I{<e0;RT=$0Oxj| zl@niQxrCg459#;msNu7^7L&*n?vX`-bhGFm0eOg=b9WuEz(V(2goIkHRjP{TDg6;g zUFI(L0*U5tBph>`4E}}$<j|w3-Jh?)v~#mQ-y#Cz4{$yQkZ2PE90(Xx=gpcFkbMF| z4ZxChV-N@QT=jH;F6vC9#wLXEl??EbIDJ$~%uSW=bi=4nc1w|G-{WtmU}}#7P-cNf zP6CB-;#4vjtVkUYRr7!-_&KT3>=|l6qw&y8@iAcgc7FtC+x+@pD2CF<2k92>lObaW z;hB7dS9zIY=>t$b(qn)O=W>MZ*;e38nP;$prca3Y72xm+L#Fu7*tWgiYq8I5b|}Ay z^YCk*<?t*!5T63D$w(7`)Cy?vptGu=dcQ-U`Uw1ofr;f6uy?mrxKc%9Oo+8oni>c< zlw5)NxE=+m-z2=~RlQ(yz-5C?eILzxdnS@Y4Md87()kbFjH>~k2-r?UuD8uc9`T6~ zl`Z7V<}A#zjsNtAKpBz)TH5M51qu3y8Z&Kw)kEPnBsT{P_Tg`HwE{iPe|kfnx@Vk` zSsC$8l7IxDhG-Qy3lQT}WtQH91Ye;%*{4hG=MRG8?w<99mf-Hh0WyC?hSi8d5_U6* zwk<u2uYn#iq-f$v_J4DKXtS&HC4eN9T97i@1@PY4sBec-j|AC02Iu4e3J<F4M6!nA zNvm*GM4hI$+PJr@tbm=Os${J-_F&KLHhab7p_?dz7lrqM&4~oG`s{jhRzXOq;OeO( z;G`EuKblvm1ZPyLcqCZhNoYhrY(3&LGaj8;I`e4Dt^&oTf%sd-9|uOWo#zgPb9g40 zb!?9Rt7F4E&{3!n-JIcivfx&2p-{*4%0P=gFM9d=q}OEITQzrU$gZ41=~RPR7$QQi z0?dS>>F0e1{_oH6l%-$&O_Cb$e|4zmys!tX+1V3A;h8cNcCX2%W%o2~TTa>b%Vd7} zPAFJUqTYCSI9qnb3Vj=O6MxyF4ON8Ju}_tYHXj_9Eck`fJU}_~>I%szq-WHSgOb)C zmYgs2e{m3LTnJ5LY>5uJyHbWOve}&|r$gp>g`=kfK8_KjtAmy0k%@EZbOr3EtF4_| z7yG5x7o61!(qCL%T_wB0lsayP`V;<7mp_+AJ@l3G538D9H5mt*rOA{mRm6_~-xmHz zoI}KgmRyvaWQX_{zz`$FB8&S!{`~v%M=Rx*O7m~UJ^aZ4dF0oFxC5ELIQ;Sd0hlVg AoB#j- literal 0 HcmV?d00001 diff --git a/session_6/session_6.Rmd b/session_6/session_6.Rmd index a0c6f32..5b57262 100644 --- a/session_6/session_6.Rmd +++ b/session_6/session_6.Rmd @@ -54,13 +54,18 @@ library(tidyverse) </p> </details> -For this practical we are going to use the `table` dataset which demonstrate multiple ways to layout the same tabular data. +For this practical we are going to use the `table` set of datasets which demonstrate multiple ways to layout the same tabular data. <div class="pencadre"> -Use the help to know more about this dataset +Use the help to know more about `table1` dataset </div> <details><summary>Solution</summary> + +```{r} +?table1 +``` + <p> `table1`, `table2`, `table3`, `table4a`, `table4b`, and `table5` all display the number of TB (Tuberculosis) cases documented by the World Health Organization in Afghanistan, Brazil, and China between 1999 and 2000. The data contains values associated with four variables (country, year, cases, and population), but each table organizes the values in a different layout. @@ -72,6 +77,41 @@ The data is a subset of the data contained in the World Health Organization Glob ## pivot longer +```{r, echo=FALSE, out.width='100%'} +knitr::include_graphics('img/pivot_longer.png') +``` + +```{r, eval = F} +wide_example <- tibble(X1 = c("A","B"), + X2 = c(1,2), + X3 = c(0.1,0.2), + X4 = c(10,20)) +``` + +If you have a wide dataset, such as `wide_example`, that you want to make longer, you will use the `pivot_longer()` function. + +You have to specify the names of the columns you want to pivot into longer format (X2,X3,X4): + +```{r, eval = F} +wide_example %>% + pivot_longer(c(X2,X3,X4)) +``` + +... or the reverse selection (-X1): + +```{r, eval = F} +wide_example %>% pivot_longer(-X1) +``` + +You can specify the names of the columns where the data will be tidy (by default, it is `names` and `value`): + +```{r, eval = F} +long_example <- wide_example %>% + pivot_longer(-X1), names_to = "V1", values_to = "V2") +``` + +### Exercice + <div class="pencadre"> Visualize the `table4a` dataset (you can use the `View()` function). @@ -109,6 +149,22 @@ table4a %>% ## pivot wider +```{r, echo=FALSE, out.width='100%'} +knitr::include_graphics('img/pivot_wider.png') +``` + +If you have a long dataset, that you want to make wider, you will use the `pivot_wider()` function. + +You have to specify which column contains the name of the output column (`names_from`), and which column contains the cell values from (`values_from`). + +```{r, eval = F} +long_example %>% pivot_wider(names_from = V1, + values_from = V2) +``` + + +### Exercice + <div class="pencadre"> Visualize the `table2` dataset Is the data **tidy** ? How would you transform this dataset to make it **tidy** ? (you can now make also make a guess from the name of the subsection) -- GitLab