From 5c8316a0acf94e220efc9cb66ac3a8d619765811 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Thu, 28 Jul 2022 13:29:07 +1000 Subject: [PATCH] add lambda inits; update readme --- R/mvgam.R | 136 +++++++++---- R/summary.mvgam.R | 2 +- docs/README-unnamed-chunk-10-1.png | Bin 3051 -> 3691 bytes docs/README-unnamed-chunk-11-1.png | Bin 2686 -> 3725 bytes docs/README-unnamed-chunk-12-1.png | Bin 10606 -> 3061 bytes docs/README-unnamed-chunk-13-1.png | Bin 7802 -> 2800 bytes docs/README-unnamed-chunk-14-1.png | Bin 11288 -> 7998 bytes docs/README-unnamed-chunk-15-1.png | Bin 5795 -> 7698 bytes docs/README-unnamed-chunk-16-1.png | Bin 9137 -> 11248 bytes docs/README-unnamed-chunk-17-1.png | Bin 4726 -> 5727 bytes docs/README-unnamed-chunk-18-1.png | Bin 12154 -> 9034 bytes docs/README-unnamed-chunk-19-1.png | Bin 2725 -> 4566 bytes docs/README-unnamed-chunk-20-1.png | Bin 3376 -> 12160 bytes docs/README-unnamed-chunk-21-1.png | Bin 3619 -> 2851 bytes docs/README-unnamed-chunk-22-1.png | Bin 2810 -> 3388 bytes docs/README-unnamed-chunk-23-1.png | Bin 5869 -> 3592 bytes docs/README-unnamed-chunk-24-1.png | Bin 9742 -> 2441 bytes docs/README-unnamed-chunk-25-1.png | Bin 0 -> 5750 bytes docs/README-unnamed-chunk-26-1.png | Bin 0 -> 9913 bytes docs/README-unnamed-chunk-6-1.png | Bin 0 -> 7694 bytes docs/README-unnamed-chunk-8-1.png | Bin 3679 -> 2867 bytes docs/README-unnamed-chunk-9-1.png | Bin 3740 -> 2860 bytes docs/README.Rmd | 18 +- docs/README.md | 296 +++++++++++++++++++++-------- 24 files changed, 334 insertions(+), 118 deletions(-) create mode 100644 docs/README-unnamed-chunk-25-1.png create mode 100644 docs/README-unnamed-chunk-26-1.png create mode 100644 docs/README-unnamed-chunk-6-1.png diff --git a/R/mvgam.R b/R/mvgam.R index 64cf2db3..fa0875c4 100644 --- a/R/mvgam.R +++ b/R/mvgam.R @@ -1015,30 +1015,66 @@ mvgam = function(formula, # Sensible inits needed for the betas, sigmas and overdispersion parameters if(family == 'nb'){ - if(trend_model %in% c('None', 'GP')){ - inits <- function() { - list(b_raw = runif(model_data$num_basis, -0.2, 0.2), - r_inv = runif(NCOL(model_data$ytimes), 1, 50)) - } - } else { - inits <- function() { - list(b_raw = runif(model_data$num_basis, -0.2, 0.2), - r_inv = runif(NCOL(model_data$ytimes), 1, 50), - sigma = runif(model_data$n_series, 0.075, 1)) + if(trend_model %in% c('None', 'GP')){ + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50)) + } + } + + } else { + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + sigma = runif(model_data$n_series, 0.075, 1), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + sigma = runif(model_data$n_series, 0.075, 1)) + } + } + } } - } if(family == 'poisson'){ if(trend_model %in% c('None', 'GP')){ - inits <- function() { - list(b_raw = runif(model_data$num_basis, -0.2, 0.2)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2)) + } } + } else { - inits <- function() { - list(b_raw = runif(model_data$num_basis, -0.2, 0.2), - sigma = runif(model_data$n_series, 0.075, 1)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + sigma = runif(model_data$n_series, 0.075, 1), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + sigma = runif(model_data$n_series, 0.075, 1)) + } } + } } @@ -1134,29 +1170,65 @@ mvgam = function(formula, # Sensible inits needed for the betas, sigmas and overdispersion parameters if(family == 'nb'){ if(trend_model %in% c('None', 'GP')){ - inits <- function() { - list(b_raw = runif(stan_objects$model_data$num_basis, -0.2, 0.2), - r_inv = runif(NCOL(ytimes), 1, 50)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50)) + } } + } else { - inits <- function() { - list(b_raw = runif(stan_objects$model_data$num_basis, -0.2, 0.2), - r_inv = runif(NCOL(ytimes), 1, 50), - sigma = runif(stan_objects$model_data$n_series, 0.075, 1)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + sigma = runif(model_data$n_series, 0.075, 1), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + r_inv = runif(NCOL(model_data$ytimes), 1, 50), + sigma = runif(model_data$n_series, 0.075, 1)) + } } + } } if(family == 'poisson'){ if(trend_model %in% c('None', 'GP')){ - inits <- function() { - list(b_raw = runif(stan_objects$model_data$num_basis, -0.2, 0.2)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2)) + } } + } else { - inits <- function() { - list(b_raw = runif(stan_objects$model_data$num_basis, -0.2, 0.2), - sigma = runif(stan_objects$model_data$n_series, 0.075, 1)) + if(smooths_included){ + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + sigma = runif(model_data$n_series, 0.075, 1), + lambda = runif(stan_objects$model_data$n_sp, 5, 25)) + } + } else { + inits <- function() { + list(b_raw = runif(model_data$num_basis, -0.2, 0.2), + sigma = runif(model_data$n_series, 0.075, 1)) + } } + } } @@ -1180,7 +1252,7 @@ mvgam = function(formula, max_treedepth = 12 adapt_delta = 0.9 } else { - max_treedepth = 10 + max_treedepth = 11 adapt_delta = 0.95 } @@ -1188,7 +1260,7 @@ mvgam = function(formula, max_treedepth = 12 adapt_delta = 0.95 } else { - max_treedepth = 10 + max_treedepth = 11 } # Condition the model using Cmdstan @@ -1222,13 +1294,13 @@ mvgam = function(formula, if(trend_model == 'GP'){ stan_control <- list(max_treedepth = 12) } else { - stan_control <- list(max_treedepth = 10) + stan_control <- list(max_treedepth = 11) } if(use_lv){ stan_control <- list(max_treedepth = 12, adapt_delta = 0.95) } else { - stan_control <- list(max_treedepth = 10) + stan_control <- list(max_treedepth = 11) } message("Compiling the Stan program...") diff --git a/R/summary.mvgam.R b/R/summary.mvgam.R index 3dfd2937..a4a80e9f 100644 --- a/R/summary.mvgam.R +++ b/R/summary.mvgam.R @@ -238,7 +238,7 @@ if(object$fit_engine == 'stan'){ if(object$use_lv || object$trend_model == 'GP'){ max_treedepth <- 12 } else { - max_treedepth <- 10 + max_treedepth <- 11 } check_all_diagnostics(object$model_output, max_treedepth = max_treedepth) } diff --git a/docs/README-unnamed-chunk-10-1.png b/docs/README-unnamed-chunk-10-1.png index a24f22fed552e2c52b2a3fbc04fc2dda8d4e666a..47b99a583e968aee08dd14ce302ba11e6a9c4539 100644 GIT binary patch literal 3691 zcmdT{dpML^+n@4GhG`f%g`CBvGNnS}e8?e(?REQe0 z2P1_2@Rm@R!pt=2sn`hP6y-SY=>5KbzVDCkyRP@I_qo=(*YEz__gc?d_qx_8)5F~n zC8;b4gTYYFPWGNK*d|DnFCoN4jP1J3nyAR|aP>YcDq%1z42Fkcu`nzZhG&Ts5yHao z8^p#(#fnHOAOFiq#NzQHf`w-ZsaP2Gmzj!(QK@(;U&zA4Sa>XpPi2X)ki`-T>ynb% z^78mpET2l{^F>L>7YapwLOxZ<7uiK=gNVewOcQlPBFf1>1_qOA-N>8TE|i@X_5Yf) zy^S|9f2sgQD}E_&&6^sFw2I}2^Hqly&(}(Oe9K?e8pll$3R2`NskqPoIWVgTny{=`TJFxgFZOVDThd$OZ(zImCGM4 z9&SHTArVMP07v!(-7J#HM>jdlVWtr$(?fX+>qM19cohHxE?`oW=k_V5Xpb&jK)-~Q z)(VrfQZHRbck!cmrP=6ni`8txDta#C0*iEihq~( zi%R!?J@m_7O^fR||2U==I=``46`O$z@rln>Tzx;inY@A|YZHx3$&JpgGdrfmOM~<# z+DAQewwZUYfD)Ycgb{;H;7j!Z$1miIRxc>M@b3BKs1{k(Or+Y|(!4S2C@W`0z%j~7 zUmi$__DX{cJ@1bZQ zXB`r*Kf2i3+r_$#6PG~<^f2On7fIh8;%RA+`%68n_o2o&mh8)r`zqi^XyynNc7R53 zMaP%{gTA91gI&EbRz6osC$kY*Qc6ESgaG)T(YS#tia=zc0Bx?G3OQ5^427F9TuXmL zoBJ~C-WU}W|0`_UL9a`Y`?Ks$CjoY--LpZP;wK2hu-lgbn0a&;AnVUUl1@f zMMZ(fkd}Ai39sU;AZfP=QR9A5H4N9hsh_UTT#Nz7T|b#q0hBK}C~#J?KQ19%y$MeC zLMPcX?7@q8XUMp{0wzwDPjz`(!+fV>%D8$|lbh)z`B0Nvpo0`i)v#ga;Jsx7%-??& z>px1v5nAMIt9a;qCN2wl4EH;iOc~tCFgT^3mX0GtI?UBl<`aB`vl;GMzZm5hc0)o4 zLDK6EBEEE|DQ2W(uTLh9pjBWv|3BX={iZo_}by1gO* z4YK%RF%V;iAHOXX>99<%bd4pB9#q*-l~bRsf8H;vDuEOjoaB%<>JYpu=R1tAK-sSz zsM=ayfjA~kbe^uvj*`2C3h((DFyOI$*yP2fH)jLggk1h#$Z0_7l8pcHCPTD&**)op40Sdmj zhEf+s){ZyQzPB*g0qX`DTJcSOdLodR=Gvp*RjrFP0B1>}F@+LM z$@5@EGZG-A?eBZ(CS}zR+ zMoUJ%wQj48g@d7c$t$_>W_Y{3K$WO}Dpq13{c8gO z5>ugl8b2@LC=mz;h6zGVjQq<0Rl_l!dPp#I#)#=!up6Lgilpc-`pA=I8m8p7zhp$M zhUH=X5o)PL*-GC|AChykWr(u}#k;wki!$T_(YVfo`(0x-On0;0He^U-j#1~>7EKY- z#iA#bjOuCmnUSJMg^1+W7(`*^ZkHrk)%gV`=|D5ow&#%dquY>xuP?7pA}{7*0DqCjV)VC}cVy_YCL1B>OveGWHjJTd zy>?=NI(kwRd_-g_u5o8s#ukL7Xd+d}G6P${1Q!o!6guguXscA8wVu(G0;N@K^(AgQ zo)JZmukqqssmGDcBW%&Cbd7pYVMLbBmQ3ENRC2oKWC0I-12RU$fBOC2Et|x+jfnF# zxTMmMBU`5W@}BDz*lm&m2_fGn#4qM4Eb|yhwfOl{60yEE?PUj^La|5 z?dcS!qPt4n6CUGni}NN0ZMvurKQ97B5k8bT#Xf{(F0J?4*ChD^D{;-9&Z#2j6rQg? z<$}76$_3wE{^Jm3D+=Vr+Bap@wC0AitTefTMThrostOdXUaJy6N1vsXp4aL%&a?wg zU$67%U_GTn_81*L+NThA3VU-+U%;e!#XguMjMqRBiq*4A(;Y4|C2Z}7%2pN7x9Ugm z3fTe+N9M)>M8az%$)KvdP*Wq?1~*Z#16bDDgT zORzMvMUo|*qYzXSSB+cPIqctsZ$9zbwy;>`W_RahcBR!&>&ak)j$A#`HOryMls+Zw z+r49!i9N@9s$O&U2-U*3_sXqKSJsf6EAb*`=Q#FrIjYV%<%f!JJ8%ET>1NBf~T|hnW&tAdzku~Pv!KP0ZnKPvJ zM<<7dttVd52EJkTIBJn64u+L?f!c)S!tb@sxW-Et!FT#L*h~o);ej3InFT`r6kBFP=!Y=x^5O zvr=Iit@s|T=)pSsTz?uceZCS^{@01RzR5tV4+%CZo@r%_eTBDyil!m1vTF(TFdd+E z{yi1Fzc|4`G1yC<8}VkOt-;gp0{hj@a-H&Pwrhb;FmGOS&j?qN~p$PRE*o!fp)E}(F!JKeiGpSg@1dCM3sDZ5e2>z<4S_7i&L77N-z+FFfj4| zCuEdUq#Dqr(SHJxtwG^^!S`{E(Eoz$Eo8Tm6`E$TE?oZy*wZoquUunRJTK)tieJPr zEZPV>_DK)<781cN0(>}C1KSpXknrF2-$ELAWdN5GnSxaca{k?a0$_s0bxxlI6et~6 z4N6lkN^uzt%uTVK&R4|fz6M{rIu=NKwf1=P3Aq=JlEYCtLbjI+;o00(ngsiYO&_bJ z`sI#TVHkHq#F>4fipLE8;0i`3*h@Y5@U`+>xC)Zu(O8^z-)>}D{rFg`F)^%@q>#uG z{ELAj1OUY+vaD+ZF#>-MI$pZ-Z5&6liY1#)-!YQweW|dOA(n zAt~hpdShW-=$fMGV~OE{UK3lE4AAT57$ep^H6hoq2h9v{xVr9L<&^6Z-gt~}wg(!s zc=`MLL%!DEni6mPT0cXtn6vJCmA;7VC@p`)cg~L8Q2QI9+>~bMw-ofvOT^Lyrw{$N zM(OtKZmf4FMfR}IE9ut<(Z5_+m@jb7)3nVNcb=u!(A}svp__VWp|3jC=Lm~#7j!TL zvfgVUVd+k%etw1+|@#$)O!lLpix8YLk~q zL9^!bOi`j3g2#UNJ@%h4L&t+&_mBI zY|k*=z-Fz>B)5;;M{%KiBU(rg^WoUf_un0$C^fwRXvff}7U3wx79Gq1gW+h_jMwU; zGza+&esWgB5QOo(cX^bb8h=Ir1G~wEXJc9e9&rV$B79n|7zT!H=L79A35#Y8LkfhQ znI`qymd$#!nXa}cab%H*xizNbaD->?!ula_cZ34=d`Zm$?bK2gPkUo6giRqRv>Ow> z_5p_EG}K-kJDpeCqSe8zt#8)>h&Yr|Y`o<5&|~tVFeSe+sOb7`JQN~s!>umSq%pYF za3F6;uh*q$+I-&)RF9gQv#q)`R07=wY@uCB96E;^ZBqoMyxNsZ+Haiq_2%hK)R+0gJ z6vZ`oX?+7pwq0`W)P5v^ddA9sNJ^JLy>ac{dC5;$2MwF@a@N7xOZ;gGflAKbFC>c;A% zwN$|8dZuK^M#c2p2*S9;3c3afv@H5A-(7IH?nqwzSl%(NB|8{8YVX$VQ!=I)-CkWb zYtP==jYd!eG@h_Vy&yR`YJxQD+LR&zV8TRA<}vtxTca{ckP;XgDjR&Wkv(Ik6 zh+Cnu&VIgKCevXiFNw8uA|X6B+fGuh`qKdJ)OUoENufW^rG7sAVTOzyRc;7L|bqd3tmwhdM z1rC4-n`iO$W?P#VkBXB1d4$2chj`MW(|WWkuqU--8(vlbpU?XAsl%$MGrX>CWhplW z*DPbL2E5-%PYQ32pI}~s;FNJ(*Olcn>Kar7GGlqO`ng>Wk#QD(2y8IjwstrJLwLG7 z|6}5KtYp|3H>-Q!7p+X9By%G$w1uf=w3*_ds#(Z(v1182d6j-)s$pOJp+$!!MX;1( zy5gK+k0tTJ#%f~?mPQuwJKp!Yozs?jO^psPj_aPVKOiu@Z^-ryZi_8*ns3qN0-pOh z1e?02ufF+gxjps%bf2MFuO))wL=M9tr00`bjS8D@KJ&8M5yd5RNM*kdS6|mEa~f-? zn>HuA;3zObl5`knBGUsSJzzp$JKZHP?Hntd$oC@Gt~@I8h1oJ>pIg1KO&(YO*#7Z7 zWn>%a?Jqq)WN?sCNY3y+aiZVQtl|#(i{YDhxqC{Xv~qOO_K0zpwM$m3waeAZ~cg zo_2DgANKNR!DgXW)Mh3+>!+0P^O^7REC*1#b#0#|>~mv~V3=IfU*rb=mi|qD6wHun z?VDBMoNBEQW4vqLpOcPDBs$iy+@F7O>y?KMF=-%>zr}>aai4k>82c f9}nw4vDIBzN!(WUjR5Hfd!*gs)M*pCu`A^tmJEz^ diff --git a/docs/README-unnamed-chunk-11-1.png b/docs/README-unnamed-chunk-11-1.png index 76eb42ea33ba2a291fa27433bdcd3e0fbf66297d..d26267c35efdbfae482b9f2714e38f126ccabe3c 100644 GIT binary patch literal 3725 zcmdT{c{J4D`ybVyA)}8e@)6cN{GZdS4bVJu8zfOB#}BFKb}m%PEN8J7NxnF zRp-i@OkuIuB-_C1+M(^S4?OC3**X9M;cNdR9G$+;o!N1A80cwV4b7()csZ3eoQN&( z_%`m-Y)nxuOD~qI+hj#LHU6C#6>vUqmKM?S(v7qG+MuCMefw&j)?1#4!yVEHUOs5F zE=VP!G5_nZRDh(uYIt|gKTy@#<0>#R<;6VXrIA7&;%*VOd9}1T)=nXR>x})>MPrPT z`b1TR5lE4jAXRdg+5}5xg6tXgT(&L~vEOiD=67Gp>poB#4S;frX&b08F)1hKv6{=l zPuo!o+iQa?p)BdVMRKu&pJeF%igOO_1EWADS427J>mFj6dAi~8ywDBwQwOLDDAQWj zL$bH)W@6s*8-Xw^ps5)t80o(*U7Knh)bAoY(r8-MfT!1eScMK&RCWjZnzNccK#Q0! zKbS*$k%JWi^Ej~j1V>RxP`t3M8~qgrLaLN>Hm$a`*tZrA?R7sA*8*3nS8YMsw~nmW zlB{q2xClA(iu!!w28YVI?#;0~tc`;B!tzf4XaQsh*TpAFX5Npb3ZLSCUV#NfAGft6 zb4A=*+%+2!$p7w-&)SG-eDwx``}eM1SmUi;8e=c$QdNSCJCt?sq2lBnt?e^j+goSy zKMVK!lmQZ-)G&Zxw@(nTfU7TF8x)4w(-tiW3-vUgtxYS(AaB12eG4A@aWWq4zx;D6 z^(5R{Id)89=l!b3I#f`i_rW=ryi?*q64|;l4|T)ls5%T+aqK9z@uf2{S|G1`Q7Ln5 zX>>oftbn$?AM9)cFI}lkA{qe9ygIk#LmU89vsO<4(tDB@?`#4SMb{I4*Er6 zjrpQpW)ygm^uWR`O*kPkQ{&mcWP8+#!VFOEBo(0T=o7>#Ue z4ZrY_RgZ_qID=nxx5gb7LwE!@TE4H~4PdPLU+X+eqrBQX450ZhP#Aw5gzdSf%)FX=TORDOm#{ z3Y1S^h49LS#NmCN(gfC9kPA1L z)y<6DgE91_Q)LB<{I);P+&sHCtOAb=t|kTx;S%z0*cBgNDd#LAtG(AdM>ZA`BjB+5 zVq^oMvM_nGqLj;@j~4bDOE(lGzT5ZQ$aw;o3{x@ypO%O5&wCrD#P3XptLAlxlDRTd3HMYZ zhg?x)F8b@9d07(loO(e+`V?0*P3Ok!eH0mv;3c5J{NgQLAy9&#y?eILRx$2h)7%Oc z2H-TeqM$L@;tp%dUB;}@v+l=CllOm@$}E11Ku)m;@)`xGlTuBIQd)Lj=vQ2xO+z$T zk~nZ^s84^;Ctmu6iuuH-!+>9?o(kXV>wYl%;}aiazb{1tV|pW8Gg&-tg*C%d7ol(B zo1WXaZSou}?9aSBQnZtcC{on7)6_JmTd_?p9b!BMVpQ-eOC1$bI894m83b%zvRfk7 z#Yey;PWqh*2|qq-Z#}qU?@h&~xk(BkXH0|1TH&93GelNL)(OuVWaFkbt>oqS>XL`F z-%mGYhO+CBSDwAhyGJ#;;PjGFU~?AJ-?2JMDKsW9DY+$cqCAVor*wsJd_pr?SgkSF z`IJi>upcnPr5aHy0^NPaLePKHG7u{wMGDr)BV7M_L)C9hyu7HUZ}S?O-Dv9PP3cjq zUX5}?)I{-Vzv)w$G!{_+r2WNXDT2S5iz_>l(71a_Liq>fs@V}}w@UzZ4V4Q-Q+<&} zpf&?Dqz#^NhZohxMT)5F2NcTlPJ5!6v9mu@ELt_m7Wq;zzILsuN{6QiWb8bNL1!cw z=NH_5xDs_(?m3wLwDH*m`Q~6Nv3*XR`t|*#(n9`XYVBv#w&VLLa&UK==i~|#)6$p) zl$O2~wY`;@pIhy%+_GTh34P1Mr|)|s5bQv|nA$09UWDdNpRO*gmu+(J%=xl6Nqh1r z5DykNoFLVn3&SEk-grmnWa=|`xkEUtF~(W!ZpjMK51lK1 zeQWysoTMrOnK;0~FuSfSH!9D*I?#zksO}I9EWc1`5u0$AqQ>4o8NF05+mJY3SfTRf zZ)xQ!POc~XPH2L#l(G@@rre{N_M41D2&K=iN&@V6s$e!H`iI$*F>vh_`8~;TS&HauJJ!O{uDTo-oFl~n^ zn2dMWL>jc;@pYbWfd?P=$pQ}hYYxpiT8TlqI`%O+vVR}zai|7m>N^3tf_OP^77yJ& z{CgUpJA9|B=F~q*?Bf(x1ox)A^IYJ~{B=AB4;e&8$xM~qOToQt2lw<7p}A9t{VVj7 zdy|X{S@q#8H&~(b@S0t>we*glYS2KqSGz7)cPZ^;9+c(DuQmg5H&G@s0J7AMRWx-x zD($!PVW@1vN1)ZHD(r@$DpkMw8YBCtWs&!jnLjYZGMcHPhhrnbZLo=5ZktbA@*K3y zl}@lRQZ!q^dhOx7aiZUaoY?j``NY4V_~jnrm!s+_B%LfaCk;~zOU^CQaQx9TWCK5{f8kS`wP1`F0Q zx@2B;*s2nqWSurrlv^wa;| z=0B}rR&dQN$z|*2Nf@)` zqj4nsT%L^+9dkOc@-RiSJq?(t7dw6BFK$C0n!j7G>_FA1v3j+cx<_Cena zR5(4Le{F|HR5;`|%HMvlwxNIPV{bprU^!$DWu~|g+JRc`O3nSpF;M_~mC#*TGv#Hi z_-6q;T|Gk5904d93@=2|02(S6z48s=lWBFpFF@gziM&S@;mD-Uv*W>gq~Qe#<&wHf zJ?Y4A{@kfl>XMhG-LR@M}(SrVaY*K z(S}=VPmy@cr898`Oxeuj6SAkLL57=J5O#T z-F;$FmTPwTs(?sYlHR7siy`)fxL3$$_Sb)nFb-!j+U?4rA2qqnzn_2qJ4k-xeE-!l wOw565jq89#fECWKn&UsF!T*~l|8<97nsESAUDG*-^5XavA8+3C^8f$< literal 2686 zcmd5;X;4$=8jdjnp@1~kDzc@>BJ|QrQ6vz8lwI($DPmK$AP|Twi6U#m5~)Osfm}g` zVU?wW6a+>uA%MUEuBOP=h=LLc2W?@BEMZ9kW;s1D&a~6Nz3ueOeDgl<^SyK4=Y7sM zbG{q?zMh)uy6Ol7LeuM%+ZhC64+yUuwY@OoqI6ckA=Llhf$nfbAn*tT8G*+m@N5K` z11B)TBglBRfV{gwh93^Z#v|BlGF!l53m^^|!GSm&2(R7R#3TelYj9`n;Zg5K!5q)a%{efwV!1LuW!ghW<)=yRiBElff+tAL z((IANt`N(U>>x9zaPpW}A%kBQeZ=HWR6eHJB5Ttir}Y{zul+(FS?)?oQj6DOj2gAs zqimUfQ?lX`1Lq#lT!zisUO2s?H8Oe^C}&Px?g%MH^Qpu#%%~u$r&(fpXsJxi{`Tz}SW;78L|*qiS=BuQO$$FFB1&5979D za8)k+VZ|d46H0uih4B&1_J%La;lh`>JNkQmw&r>{+UPQF!>Y$>cc`C|f1OFfVc>W% z{6`|(_yV^(iO?2svw2AQgJardu=On@n+aP7oG#;94GO8Jvu5e5BcHBA4f7UJmD5yKypSuxsczW$hDRp3F2FlPWNc^I{L(w_*7(n!6CEY|yx z4DDEdRo_5R+HgF-5c7qux7vqXNGcp}t#BjlI+xX`A^|CRmj%@4W$#xeh$H<_fOatN2+LYa7$vW#jXt;m9~wv@_+rrIxn zKM}Zy0Qw%et}7a4`&qFzfu{Qx_1zr}g&yhhvfpuxJX3GE>(-+8u3JQ$#jZh1{pq`B ze5Rh@inc~RNIX;Wy8~UjPpDt*zM%=lX_&fwK*v9!k+#-G6bCeMSAluD4|p1D`?=k` zqHWKB^=j~K?Sgct_#9fBYWeY1rsn%hG+Fd_`VXyqBI*i#7Gq6+E146M5;%+N-x0b9 zgr}0Z*2H^v5{E{8E{SXXW0={HOqZ}v`=)3q#Zy9*NP#i^^-BH6@6DX-(5b90riU}0jB$)qaIUddd3 zt!Okigo0Z>>5PAKbUU`b2oRH>1A@urET7a&{(j-?x^x{ZtB=oL_&hFE7zxgkf+23> z>xWL~_OEnNp6+XDy;l|cwz|m)Yn7ieY=SMc;i^*eGX#&6u|LR9G`22#QWCxTT6)ba zqVGN;u6{<7eeWb?4lnk{OP?m|ah0uzaj(bha+beJQcq#yeFt zNEWA6he^|&>0C|ft8P#DuHohU+R|99U|I%!^J?69r{%TVC&$c7~~VLB(H=p6WfzFgy(M+dUnwc_Tbw%Gt@=D z1xXB_vLL*#xG&+K?4u=pFO1Nh!Z(9Tq77x5#*2=t_1mkVi3&*$`z7q*eYvkYW~=r+Wlv{>Qz^N{kr>m@9XM* zS3KRF6y;I!5C}xk#o56N0{H@z+9mjQDPkwK6-m2PPd9HzX%B&5ArL$Sn+L(uQ7Dvj zfQ4YO5IlCPfEv~dZX@zLLdkY7YAE!5`|NCo=k1hbn1Ki?estJUX6W~uOk~d!-iKx zqV~Y%uVg22&i;Cmq`}Nh%GZbCIlEJjd{@8y?6oQcWE2RBMj9#s-L|zBaCKS6+}FO^ z(9D$oKk&7@`&ygt_CE(O3Kut&9b1(x`$J?UIKCbytHovk`umDIDx2RcQ@O~NVu#ux z<8<~JRmSR?S*IxwC>{l?)|vgHdseANpR+XzZb}#Pj|_knzw0`FdfH&pvKPLJIcmB(Y=x|DBx$6@xJeBxWqyVFGPPrm&lSu zlWae8`VSQ>3E=k+VW?c4!ApM~U_U9n%7FY5XL>Iy@en4K>d@esqQa`A zG0tAwRWm!%0&5r7Fy5=7N8yn#!*4qgvVw>fl!XX8vN_yghHl>&ZG@JY*YD4 zkuf%b7)Guup_t|<6s}mWQyadS^e8%Qcd+ic2Z;~aJL=quPVe~_gnSylnuy>G3{N`7qdY` z1vm7G%`VRS#0)3w_Q@Z^~_v#;l)YERc;CXWI%W8(b)rbJdO+Md)jpu&ca7xLSRk5*N=aMOc zhA&q=z4x^-9in8c%_y$?^Q|*zMsKd+l;~6%ILS*9%3o|uT7`?nxiT|>G=KgFv>&`2 z^>ALX3j;dnqMK<32Wd;u2V0t*3DUKiaIP zv6FOe<><%pMN8G~IFBsFbLY~AeAT> zZyuwZ;kI{ep_vv{>csC`mW(wX-oPkWFVC)Ta4UA5!`m|#T@DybuS2bP9*5Uw2H>o> z$wz-lE?bq^lw%IH2{-Z*3Mnfc8pQF4tL~XE?FkD5>9i|zqjJ{CCTLP=qfYoIVdu&5 z(u~Akh#sR{c(TAxIBTN)=F@SPbrTZazSlt@2TNGCR83;CiZ)p@EQ7e^g7)ucS})HU zN4Ee;JT);NS^2o4aw0{l9`~n49{=?&?5>{GjpEPX<=@wzWqY22cZpk>s?_c+hFa%_tuw7y}2( zg#jvAK~OZwjd9a>DhmQ|cCrpPFSjXJm@bg4CILHz)l zSe~68)C%;Z$h>wS&zmlT09xkC9IpJ^|!Q`;?AkY#P zH7*{%tCBbgjE4FoJzG@n9YH4c0a~M7C)Eqx)1x1q8h#p{&zUY7Zrt$VC9>rYq=7xA z0_u8K=MZ-?MSIVOiG*?A)Z_G%6 zY3PRxdwEiJR-Ab5zW=z*upNJ|;hrWF6wnK9gSKY1@u6Wp3M2x#!dk}o# z!^@S_pB-7OHpkF=h4iM($!?*2f&Lv&QL!7Lu;|Kms~N$U zFSGmzIk~+)kCz+>IrX@=+d51_g$1qv(VLuOnI(4Hy>_dkXs_#u`98~C)*^yA^99jA z$By8T^Km7r8RRRxn;tn3J8$8={%kw1GZg3#d4@&&AV=GAGufgjjA&G0>~!N`+^pqN zyT-WGyEL#S$Ci-up@?kVGrut84b=2IuXa}+x^6!=s?4r`a~FegI#J#aYCB5bFQq}g zz}LU-pi0_znTX>f54vj;FmcyY_g@7(cD+gEXAZ zz!8kr4$iBi7_BjnW8^UNQ?Pa$=h!-=q4IxIk&2bGxx(VG-3>)s<-3ccy93QG2>2%~ CQLC2# literal 10606 zcmeHt`9GA=_xLjlV`+x08Cxn$gkmIPds?K8MwXDJQcNV-cV?25y(l4iB8;8Lz7(OX zqbR%V)7Y{vVZP)2eSQCc&+Gle_lNKI&Yk;up8K40?!D)nd+#~-+-F1sJv0}V3jhH0 z#S7=I0RS8V0N67Q1gqwDmP_2;3-OAvF6)&A0ssdA00#gB0I&nlXaH>p@GAfZ)d3s@ zAP@k89YBZy>{z*!1>`F`RN?9e- z{UE>lxpM(EH9;ez6dXWdQYcJjxcb3x;<<1lF@^xdu-dZ&V(eJuf3RapS-+UlftXTe z%s^?(z(C9Z^F`9v*tD*MgoIS$xl|%C_04cv-rrI?pwx~~8pF!}X|0r%2KMj3G;RSOy0Khct{b9|{ z)H{2!xp?lhvG<#~p>W%YrU1#mCIPuO%!TE$vX2|S`BH&X23zmtbjK^^8~EmpY4Q+x z%zB*oq>;hE%=H(;aJ@yju;uvm^(0|-=bO)@Q4 z*}Gk_|6^|KqX?sWu5R>*{iq16^;K?mf0d&9avDzVxQ=lPP-*S>(DK6q(%HQE(RXFQ z=2K?4;K-qu;=QZWe-|~X?+30eI(*z(3uhdlZT`#YDbxNeRhpw0#1>o^9Bi4An=<^Z z#VjWMRc0PoCZCd~vW?sA7SA`>Z1(CXEc7Y-5((?J-wtSv_UApY`0l~D@QsvL@DLN7 zz{bGJM{u&jcb9a;KyFm+CmW@O^~(ic^xObCaJORe?P#Z0ZOq$SZK%pfn+HA?TmoSe z$#sH~MeiBng%8i^e(F^U+?SMU>joTKR9O`km^9Mfa_Ji%Wue|XO58YFa3?2}nc^tE zVmh^Dw7A$S254))YEKs)7?>Sd<=q1Ks#Bjxkjmi#TOBA>juKH2V<6L@$@DcEsh6mGuqwmt0W+d z*9npEfI^LntqNB!Q$BRIdTQt#yX{VFo;#=0LsdgjCCYLH=m@R0lEJ->{5x72R2w;c zVuJJI2ZZ19(OK^$H?i_xn;mb%4?LiU97uNmM8b8{6KnSMwh|>G{*uC-&nV_bXi?la$NA zC7)0K-7Ih0=e`=F?A&GOQyTxNjg7D{k=v06)P(r-^1%si9Q0}_NF|gU)zKP%n4NHh zM)5@24j(Hnl1F_}F-r+=X^r>7xIc8|A}KG-ViMooO~<<5nHQ(|r`-M1(ksacOO{o# ziQ=z32>maXkWB(kP*{iKZeVHs zY9l1qL~zE;Zy-|*X_0gimV8)A7~VYttIUu5Y&g|qUo1Iu&%sy0e;Vl5J_{$vJeqoa zp2`OPQUJsGsBmQwDt6J7%;-=N7%J{z%oXTZ=9$*@p8#Mr0TA0|uC#S+aOR9Gu=;Sn zvRl{65rA58Q-=0FZ@E2uemjW?oFB29%~>CDlpL!C#ET>A0w4*dawu8I52pV`XQ|~W zoa7Oq2z`+Ixr_`^4N*osMrQ%VjSw=6k@CAU*X-Lok&ULReP0i)RwFH-cYD> zT(EBWL@<1*7--SBlZ#9wL9R(?FztCc5Ai(@AVf3^45h#5Ts|0P=H|JY2ql zh(yvfd%(>x4v2GHB^G3Bz|xRp87%1ucq{){0zW;j#(U?y{^D-@E2V$3b%CZcuB%1& z?x!_9SgZf))iQQtd=i@Cb=a6o6LvOm!3vLC|1IK$)B%s!F95?w+kHgPhXd3q_$ojf zL}CTi$07=A5?+F%BliSxdUt_#7|uYdB>>Ys&OH{kgJ%;M5ce@gS^T}{qY8aHO*X)F za(|n&m)#DzpX&T6lj(rc<7qR~ z@SV3_oF#KxjeMki6TH+J0g>J-M~Iz3r4guw!JkgL0#hg_Xn#>8J87a4ML;iU z8X3`!q`g6~J=w7NOd)XKLnJxd+CnU}c#8DuJyjt`SP3r}+-3sSXt1~FM8JG^My@Yx ze{3i}m4rnFgc_gXbicj{~^p}2!yIz0q;O0pdL2p>uZ@CN%ypD9g% zdmiOH8Y0%5_rZX_JRlKxyDH5R7Wv}XV@?<7IWn=EYzHU33N@ts12u$9D3t)71|neH zS^~7?&ovta8uOq3>eIR{v<(MJ|MIR-gKd=F1jFxbbtO*l(vR%|3ndlH-;)4>WWIMog8MpFsP`o`(}67ZRb!`emtNZG(W=s2GD+h=PEsKtrTMxb4lo_^rNb;rR;k3b^~-UwXA664iV z*ew7WK%VC%eWeiiNb{V~1Byu{C%)<>w&ZTO@xYh5hLNe=a|@lC_W)JB+jsM*j6Mt` ze5yUXM|LEB;e77ZOQomFT;-HM>~M*1ZusBqn;SVqb573PZI{#$R(k)kwMKm_VEfLo z`8kA#G_e_Nh3SqiHimiRfIno2+s2O%3d9{EHp^duK9eBD1MLFDc!a_g=+-P3l!8o* z2X8e!Xrfed;48!-g-P@IBLSgm2PA_&2f_~)7({>Sn#`j1GSaTH`}!QRK2ViCdNefD zVL_uH-ylbj&R#i+*)4j5?zj`|e7Sb_to2Cnh1zFo@t&*n&PH6jhm#V;{F*_B$Eb$q zf%#-N==ltRi-?b2JI^9LX_B7V2uY-teTW8%tbm#dBTAQAqf<= z{%08+e<9!iehEh6P1jA-t7T8D)Q4&%pGd*=w;^QW1?a)=CZIbDi2VLdw@gs<*6-UC3+2Aik$%&T;8F4P)wVa_wnCdb@)Q@EsCv|HG+q1ZI)?o z&e-g89&1m2Z=s}hZf>aXC1+xTvt-?w*e$afP60xqj@bRzufU|s8Y(o-I&Zay{_zM8 z7!Goi19!NH^eAu#cNThs0MNhw*6~sv5nr=>I2g`i>C?@WO=+5H$pu@Ki~tEDYE5gy z(Y&O%%GWR`3Wf)uEI5}AhuS!}lUkH-`$14+f6w>sW1&|)E*-p{xe@saRGR2|dm5U$ zmEo(DvNXBi8}8(rXWV3V8jGrG)7QMe%Ve+ND%r*vadunwpS?epxjkm}Y0Mp1m8Q`E ztSi*}1$hSno_@%Q=LOFq8NbMOv|DAEpDFR@?~%bB85$8bbP*ytozdq;cON7ZP6e|g z+VG7*v)n6>-oDC`teFrF{|Xlmc>SynK7jPy=HjWFDX2a<5`|b*0M+iIYCD&we9}AA zo{aqE`c6F^nS3N}Q}T;5y-N~k)gh>xf^|2nEG*w7c)gI>8IvZWDC}a?A8@=b^bSZg zAwLm>K4EC8to4oBNjWb=RO2Y3$Wtm6;pi)n1}u(SUyvwCW-T8FDeTg;`$|xuRqQ}V zf7e`q191^E+ahBvKHBFgVb|YcB{^hYt{9MSt$A{Q&~wU3(*r=6xH$iR8vQR=sj5F=x%;QjkjvO&T{7s z^X1!RJ$1}SB4A|tkl4;n=2B&B6KnkiE2z=d_a)UZ9!2-+ysrW*h5NKmybj*2Mm{9I z&3_TbPCX(`BLZj?h2R7hWxoPyXG~TWE z{_KXliz#Pxt_tGHJ+ARy-@v@BqJFJb8q>zYYxPWN09~ks&N^iey9s3^&OC-F|Ac$NUi} zX(@NIyfui>;+Ej!^A+o^@^JAYa{^D)YrPMw%J22HJD-nggOami|A2XdReU^jpUwD+ z!E?Fk@lzg9AP@2W3-4MRREu8XzLMP2>n&rH(jYrEnA`v~uolkAo+?}R0Pd8*Vj^WM zpC689BW9T*OwPKn29Yh(5AR+;F|Jd#R3YEney|$Dc_o^i%v|HId;!v(ze|N5Rj||% zSa&?QQz%MRq9pR0yuSq9j=<8klxH`Vn$9S|lBH2_f>wKLgADBDxhs%1+#?$dJ_!Zh zbj<-&Gp$hlX6#+yr$&}B_w#YerQ`eQJ%9K;W(xu(?pb~|kZjB_reHW~hTImpBDb58 zEMV4q`$|l0mJ1*^JDWXP`zZ5DCMcl+7R$Ucz=Rf(@pSYvozp z>)a_zz4@m9!~{gtqI04buheZ6pS159-7@ldtDC+wY86!2d?vC}it<5!T=|BFK*_Xk zMjs{H;^%X}Yr%)h0R78Qpe)fXz6IIeW(^|&DgcMAuniO|ORorfw%Eyq8Qa8Nn?BM+g&%h$=`1Qq;t!}4mr=%3k zbF8f+y2^x{HybZX#`|wdeL)Yay6$XR>+$PNO`fKdCMW)51Zalh*+~RpT6gzJWSpdj zGeT~veZ5Eq=Jby(cV?zv5*enK&f}T=qulk&Y__xDtANs`k9y5bs&7!aXL63%vs=`u zSxoiakep+~D_s2?&CZaAvR;fG(CXiQ2$>7ht^h-;u$R-AE%Fle!OXtrGaLqw9y7d-0+w)TMqqhaaqCEI7&Sq9d z-RvbV9UM~jnSd4UnS+rcY~5WeVr<7ffi^|mIb~87vU8(4sr<6>f_q#{-tt$ zTm~{sdP>L*r%-kT+k{Lv@!N4L>d;};UPe2xy z;@+U}2O%MkziB)VD^ZukNp-XVt=RVzb`xmu0&g5>dwklM(o{Pf{RdU~0L4fG?+QvB zrV$a1#XD~%yrI!ru;=F{eU^RF+=w*TtszA1e?8Os^sh_!$ZqPSX;t4fesvTv0GiEU zBXAg-yn&M@XRprU$@N0DG2mw0nZU?EN!lt2`a^;`tU>29H+kt@eP)oWx`T#eFpqBa zMGUZ#aSw(qfqPu@35bC^a41mf!R@6nK2oVcky7&qMM_xR8CdrTvYjBrK|?0WL4{BN zxasW&cdGEpcy&S}84XRI3njOBety{-spMQ6%N(30FkG^ne>fqqr2zWyYy{}FJp$9V zN0tuHu`G1FAb2Z!7>V_S>28-(Y#J^Yh!SNFpztZ2q+jp;9<`rx;A+&bnaz~7?T21g zJzWjl6mqXFz(HiCt~ymc$yhtHLmlkY8dYHej51kSjFwh8H2X+u3yN0 z-`C&D!+S{&zvhSLfIRH(ti5o}Y;Z?Y-PcuP`-RuGvggLsqQS=TSnw>S zG5sEq&Eg?s$i`Z_=jFg5Pv{+tW#FMziPk1f49&BGq#(-4AB)i0wha|G4`?jIdiU{{ z)6it&p_gGoRe>`x!r@{ZxY7j0LNS?=lq6xb*@u~Bzd^5Cyois-uY(OZ804*F7!wB~ z%@o&&fvn4A4<~%_BKbizkEI{p}g)*L|E}4hSI$?ti(} z4KQ-|(|si&t7yI#A|7@RDEHo|C(a%J!TxrldPKcnj%W&RKU;ks-#^JmvP3bspc5#T z<5iC7UM_Y4!`-a_;#IhZJa`sCk|N8{{K<;|ZaEEvdw3dhmH?1-d6V8e;fL3YN(pIv zx~A~!C(RVMzCa|yTZ~lXDTA2vi6bVA zmiZr3(vMOB=Crdl6@6VR;E7U18Oju!n+SYJngdS-tPays;rJ*vn)q*p>f>&C;Iepx4Ln5mEabz6D{=kxXZ}3+PeQueJR8!`pdDN62HrN!KuV6Y!T9u1&?Wx~X!_K1GjH;W!E=mtWJzT#4rtz>hWT ze>ao>y9^|v;gRC(9wwFoN5gZ#Uu>vEfEe9)6s~}$6#^`~mvM+#@Ku`j7-6-r4|)zy zY}nY)q!DOli1si(+yFmaGn&uBKzsZa3ej>-wQ^ddkdOYL86f3Trm)mZ@_CLp=|wC> z2KMtQA1(*h&PIFBDUb-%+5;h{v%y=JmB=!DB;=m<;mI;$q*s?AYd$yV#C@)x)@^4x z<*T*GYnqox^(su^7o9C)7~J^!ez9bI>q>T_DJrZ+4qRN#g_9nGwg}QS6qo)bWD7t_ zQ9)X8K>PQ+!nQ`WK$i0?1+aRO!BN7IdIcULbsHvNmpB0@jlpSfiVTe&1IF%9JndRo zZR|JqlFL{fUY>6pnLXLZMLP$y-=HX)K7@QEY46$Nq-gcXmY;!P3u-?>?&!K>0+cfz zt%um~!k`xio+5Qq2s{-of?~KpFjNaKwJNG;_!szV8J4^fu_gTl-zVcfj9sz2S|04V_klx!9O)??{m%RTnlRTTMU6GaznlPfn`=;4IinEQYpil zr3$BrcJN3TJ)b>Jl`{WZZ)`E7o^2F-C-{a0wE&y zBw}y04IiNUH=n)?sWTs$3*s8Q?mI#eh`VssbQa|EC}+?sx8E z-nLlMMp8PmESe>}Mz(&lF zDA4>skC5E{EFoccw%@-tPD@)wW9`cLJo!Ta#g{|iL=;?(=99}6Cq=Xa?#7arU>tPN zH_E4<+jy?X3)Uzl2R3?*u*F@3a*-_`4-!wpNyBW$94t$~@?LT-jhncljK+z=@RFQ(S!n#nR53RxnpTCfxG0X3rzo?x&PUW(=>7Ol&PwP?S02&@dA>211TK27w0J9mP3t8AJ9aV|nmN z*~y6Fui~*uT=+kzmM!uJ807m30j{1w(6AlDETXS~l8&sGt~RXIZ86_aUmse}{_gq)=E@hwJDAT&A6N9`*^$}tr}3xK;^ zq=EMdocLcq2T+CV^t_I7_CI6hBck6MR_COL9-y;bZJ}IN%*0&=x+@GP97^u7FV4U} z_B42afy%pllCp-v=m0{$5Yh`(AgqUQtSKvAA|I=iPMO=$-eL1#tlj+ zlFB$m8SY#5r$GCLNXrS|wHJ15ge^mbP&h&J-QrM^6jUSfyAM^8$)$A%-5)Uc08V^v z2>vS;gTkwo0;yYf=D0ir`&GXW-5--(c7PGCHzCAdhWglSbEJq5Eap!~QU?WT&$8e( zixX|V?Cw5Z9;G_b@1A=;<|4(@)X6CgQy0XjI=umdJRJ1;`Ebds;(>#bI}q48vc+*p zFuI$chB6I~`q_6~Z|SHQFBL~C(0N>6osP;Mc4qNjDe#fOPd}=WrcrJhQ!JC9>!bZ| zN{5$b{F*yYrZb} z_)E-*_>C`c1G!QQ+sResmtAtDr~lQO3-MVSYdpU@!^26>ogq}~I;^{uU$Lab6B-&k z+Z?2tPxBlIr~H)7TaH#P1D7P7Pvoi8MqVq$(%UNRlQuMXdiLT(9iptDkp!dhP-x2> z5OATwS>1=%Wl7kz!*x1Sbp2At-CXtTI>1A}W;)#=pMe}Y^b6cGk8UtHVtyOSY5ni8E3NjXD z(I^<6F8gz`nJ#G(b@E=6O%TUWXVG>>hf_+RX%g##04iwjF2I}R>sQw}0?;Eh-im&m z#{;~yUOM&?7@r7h(OP!9JB|+lXzW41{aGCcL66JjdtLiAcI!m@i7maCY5GZN-pq|n zwZKyz50)opct+;mhMGOiZ&nNYB$I}EYTYpZZJpJ%S;OT8n_vVhj`j6?$4GwU$y2*C zJ${2`ZV|(VJtV)j{WCGo+>(w4gR4`J?DWWX&9MHljI>u`6;V3_&v!T13qDJcmqgYy z<+NFGdxc7S*X%g?>zLSj-(Bf)R6*SmzD@{^JPm6546FH1Jm(0JkR((8L^jrWnO%%OM_zT`|**2bpo+qZ7j2`=st6( zowD`rB+hwEgvWLE^`!+DTJ7`DpG85lC-%e{{Dz_V)}8%tLN;@i)G*#Ua>I?Kt&=39 zDO?$`*NZVY^{x1w%CiDz@9ZwKhN$5kz5Tw;5+|6us!+Ht?!UYeQhWdsj$-})#&HHMf^xBrN^%3C@>wki@8@1P!_~?`0jI5DC*UcRbalI5K zTlz9xuUvmJ`R+HTLWhPer`Aj)|LsAvQ0lRwR-1DqZUzHpN$tfgZK{bbgOf z)uUS;k;Aa=-16Q&OXnVp7Zw(AuZ`6xnQn|8*yXV*+xgh0Z1fYV=5TP#tM$o$=;qE| zGeNGLh`|&zoRjw7dBd}{F)izQCc@EQPCMtQO-pV20%Q-%UhWB3G22Np$I^0)wiV8Z zEb~-XMBdFLTk8a+J_$&b3-uG~Vb>D6+hyt4r;N|xA@|GtA*{k zkDl&LE&9=l>bZj(Cruq*H2Qk9pr%ip{O8+}>b$H$HzzavSI6k;(ci|%EvT%osbtgk zu8}w0l=@7+ea2-Y4%*!ow%)?ISTvM9!84j7+BpLo*9SYE@m0!O)RO|6b-*!*w;M0B^P>B z5CyBr?32jR`ZKlr)%5;oRZfvQ=HR;JzK2SkjYb)4oq|@mrV5#UN>{(U+f8u{n*#a+ v>URRI+t2yD{_pN`{ExT2|CcX?Z8D46%CfUt(>C|+OW%LbN1<|3DG)x~mMWLVdsTr=T?e5CMP&5QzYh1JJl= z2W=4n8j-`NZ4A)RkBe}K0Ea{4@VOj5!leORgv&*c=J@#j>S{iRh+=#MK?e{%2dxl9 z-WzTGEC+RuqkA4@0DxMDyeM?WR{j$JlpVa>UHw@_^TjHR5zn2J$zqP)r57c(^%{0V zQwY-4r-Pri6N^m@n7wxoWp)mhS4TP~KWK4Cw(YLf2R;Pjqtu{o*E$E#P6?hO4C!JD zFNZV!-@x-2dyRmRn?^rjBZC+7|LyVUbf_^H_&3!slprRxpR{7X{${)?8r1r22k#Qg zk>?z(2KE^7gzWszb;N3XTag(4O+1T``Vpt!FAFb zY~!iE4)3)IEL;AiX?sY}rW z!xk#9Rqo3vQ^wRX2RzZh`C*|K2hW(C$-Z5w2+!)-s@p#G^G^}J&)J!=b7J?sPwWmf zV)1PX+4&VmTaRf$j6D&cAYoNN6vPEp$MXbNgk70-&wsr{YI@f}Hsp}C_qDI4t2|qZj{a9gx|xJq(3{wk zS-l}X^E8xi*$fq{d-*>(Zg1vPYZm(}x|oVT7Mj@gV`U}*k~VsFkKFeH|ENTrGP@h<{&Lj*AuX~o6lR=tFUWSRB*0MG!=CSVO zS`*Yr8xpO0)W){U-4UQ%^juUbV>*3I{4~LwQgj+#*ZG=z0O3F)>fVL^!CgHdMJPet zD8g?vyf#UF+yqEvirpLI8bBB#+){+GXr^f4G+pXk$yj_8$5#QPW8x3MTRs*d;}WGU z`*$fpC&^ecShDvrH_`P3rYcoA6;BFqP9b?LE?LUz;B49}(M<`5ojG)b~J0Ed$Y<$^4NKz}cwZt&98lFfE z54LqlSk^!J^nO^4d;3gx*q)s-CFXg+GML-ie0GwT5FI4uGWRQs^`n^&$L5#EJD<~n z H#hmJuj)W*3fmd$h$wZ-F3-g?36WQ)htGsA&b_nEs{!AtD^mk&Yj?JqZp#Uvgv~BGM4{_XG%rj%ELM#f8H;Ln>a3rJ zm;LA~3r*!YKKg|+@A%rGfLfsT8QiAl*JSrgqf>h~9P-#jNQTkSTR|rA6 zh=}w^mCzKV7<%vKAI|Ujf4ZOUeeTCQd-i(vo_XIjYu3!()1uMFy3C9`j1UNfSzk~4 zCIoUCgg{P3)6>yXZWnnb(_U=QhUPl7R~iHYK|mlV2m}jZW`;1ELf{gRi%JkgI0S`) zps)~B0t8EoL>i8k&CG1dY}#<;q6CeD2&d9$G!P1cJ;9y?+Cu^gi$!5+l88#6#W6ra z$&?vlih!6lP;KF~VrY?uJKn2^ z7h}=r1QaBJrX34Oz|!Quj07U>N+6CU5UB}c#DuZ2gfVJT`q$Ld)VE3(-=dY?qP5?m z(L^kSh(!?-{?$#Sg|QRH7)?@%R3ec&Mx;_3Oqm-Rs0~zVQ&ZDe0%|M)J4U3%e^t_e zCxJ?X)5I8+N)1O)iC7wkI+k$4K1rjQd7_3&Ls6-6F%I)I*D^fNv+;&N&b6N0r`kOV z??NCK+V!;obN`Ix%;T_MU+mjo?&<0ExpgLfFk&*ANN|@_$^HDAT}w~&0V+ySg`nF< zNEZQjvf}qts8p8js_XqYtkCme$K}w;ijjT4yl=Rzp`dvn9!B@*YMVVb3$8g1`j=>9vyJ%-bKVkW+*H-9DF4Af0_S_PLMqdc%+<-_xj}>;?~Qa`_#;?^&Zk9nay`uFK>`7CpoJvaNe4x7bh zzfV0kLmQ~(P}|FwSA?!+x2@WSCF}3u56NHp6tc8ov*}GA?mBX)KpJ!~gTn7DJXfRl zwmSow9~P*%bnZQMi8j_)+B3n39yQSQ1C!LYvP48)hU$JQZs9~k!9wI=KXbN?(f zzHMH*wE0}b6d2u%L}IBR9mSAzEX0OpYdcgw#9S{i0CPmxvoz3cZZrB8XnxRSGU?ch zk3@#b`k8MULX1uif@)YElRCVYJ2hq3(@moX3Rlk$8|c=*1eZH7WF5TP?$6GdtV@Y} z_4cJwgZcXh!fP6Q!C$kahT^Gf8~dpXvb7A99AgnMNLerK->RvV94v3Vi;``*P-C`f zSTJdXR(H2zTFBzZ((;QKJDXUKvsYs`|2}w(kq=j;zGhLGRXQh4X`p)hKK`r^_68q4 zejli@yMOn{Zbsjd6k|k;>)rn5@DPySjG6xnI@>&8=p3vVH1?^!TP#bKHMs^E>;IO+ z^6(@9ndQy8g-vxXjbcjStcsbx0EGqp^*{R{WtcEa@Bpny{{z7UB`}~$u*VWQ@d;H3 z0c7cb&C@3`=mEb;r5Qd2D)R*F$jH_rEjy?EV`~ySUCq6^w%(FHP!@4|Ui7IZ>3fnb z_tx}FM{ixnJ4@+`{D#%%7&Ej;;y2uFN!+U{x0Wb*4^waYCi$}d$YAOu3KhD=U6Y~` zMhrHp;P}wZGajQAcf~7Emr-FrUtbMkL1$ef!8qbEqHh}Mv*Qzvj~Vt`OCM%=5aD8 zG%PJTKgN-~3v5fNS_$}c;Zxj_!RPy|a;L`XJao{LUrS7bb&p3oCF{D3@W`LH0QeS< z2ySyE*(@v8p0CYTY9^CZf9)J25Xn{xy??#ioYWtcq(!P!6@Ay6ByYjQL`nY3C^!r$ zQ6q-C{er*@ba~=aWZ4EA-l3aS2X-IqQC*E{ZFYiq8uh~tM@>D~fNI8Lo;3Kj%f3L= z`5I^aKDG+N(N=rnS+a>ugrB^ABTQlyjqa;>VkC}>m-XIxo<=#A%E~<6f0)klt1007 zsxO0ZW2pU2ryre+b!z@w!J=5VeuuT6j0cnn2J%b$SIRHwc@{PM;e@`_+UI`DU4r|c zB;vu6IrvPo3NnzvWxyk*Rb*+uA8B1?9E#cGoXE;+RR5;}W-%qqJ~*(CScGq6P|QEa zi}3=pksN>rHU9%up9RR=axI$s($qSGt$m;#J(~V`SHv7YX)IM(hgd3ZZ@b(RQe1$s z!5BYdmvdYA8<=o3Qv-rBQ(YMk#;T?@nhuN_SmSoNovIp0?hNjehd;aqw9q0UW~4>I zLob{4t{=^hu`rh@i<+d^N%4Tnd4Wy*@q*x}y*>ACs3>eGk5j$CF$C*)cjUWe7<5_> znDv-oxPP^NnI1!J&io!~#6}p;0wY||6Q8GEd3dW6XI{;ufGe6s3tJ<)Z==I-Rb&o< zhKi||g@@o`AS^IMh^a*cS)!vBNM2UabfbKK~w8tB$S-DVemc@03xI=TK>eHXE<(7Af3B?Qp5~c8|6i3dp>#8sfEgGTCaT z9MR_h0Vyi*cLayz3=g>qwIHE2YR_`)GfC+`8R-xeuIgj z(mCRRAgi-AGntjJbP4x6xVWa?_zE{S!RHkN6UIfk>)>07r~Cp&-bD*1x8B#6%;AzC zM5Uz2m4Mg32EGwXbx#qwJ>mFz+(^J8E^AM_;0gB?*}Pdi(O}U>--{k86ZSlBLJQ7C z*kUYpEhn2Fi{^k%ufSP3eC5wLg+uTF_WdQ;5c(&F<8aWRhWT<}KabGF*PItG!Rtk$uxg19YQ!tOiuMATAK=BpS&GzV)+Xe=S<`$2bPWM6 zx6bev#~}U4gVv%(GVOz9_YpK{-7`U-xfee@EB4MF;C>bS(SDo4v&eTDQIS7YzO6L- z_riYaJvz%uypIdoIYFrV$ZVSzwbyY)nYx(sL~ub}IZt9my+c*c;GzXd#)4F-Me@20 zbV&kTllTokqh>4B?FGLl^VbUf&-#@`E9&|WpJ$OBH9f>U|6z+Mr*_tjxAOYtqX^Kzle7x(xe%IaAxx;g33#I+p%7eB&&%~zM- za}o|)`}{j0*vH|epYN)bz~Z7YW{eWAVbK|(yVyGXrd;k5K1Cm&5?JJ-(Uzf(3V93m ze(WfHuSM!-BXlDdf(%ms3^^a5zTRy9(tA9-B3;0U?7dyKedSc+I)e)z6N5|fyI_0@ z0Avb}6As`^D21%5yNp2F-$wMP9qv{5;C;;qe99eYbs4cpyrg4Tbu98ZBPNdB$HG4P zTBT0f6|-TmWKzpmK?8j!e1Jjj9ttK=4=qF9OF`hya}h2`;4C7}-JZiMl)vp0EL@2w z58A0nAAMO4I$5K0wCvD}<^|wTh5^YXoaU^KZq7kb9WFrky(|8y`{9CoOoctRpRNMz z?OhSW1r*>@9DuH2BDP@h+>=`AMDTbWO1Okmx=!kUUnz`}een*AdmIN=|CR>2vhb7Q z@jZ#1r{)v=%FZxPU8|X;+h)KkDlmk%PbM!!0B5lq#FP^GRGHmuQU?ejG zH|WXfqOK%BH< zZ0RLxyt`Z`A9Ib4kiVPedzWs)Bn0up+Ldw7I0r*nicXmqX^aV?1g17s71(`%?&%Jv&#xk-zR+Fz&I_{b z^yI?Le0IVGMBz20>S&Sid?(w(GN#S!tUKr2Dp&@4+Inmi3vL+zB|&cv6E5P+nzHZ; zB|jvA#+yW|L}X$8hV=qZDc3aPMB@6dl#rpOP`#~-vpoh(+clomnf2Vwm|_9?if+X* zcEa+Vb3hMba-?W=y^yOfboJ`Hl8A+&!ifmqmuc2$1mbS;pns!KXx2$^WJ z(}v3bi3Z4Ui`P&1h2&QyvK|rRl+yiKLimTKM_2h(Wf(9Xy{;DS5-pkZJUUaNyw60q zeLOokF+=qs7#^ zycIr_)Lj0IM*1&$BnB6<$ugk0U7Rji2WwRGqUeg&EJaaxm3dCukO*7eETsLhddqiA zSR~Ud&|wZXF!?g?poCoBw*(#n_KmlhM-AxeITmmBEXZUi)6D=)ZEUki)j$XFba0c@ zPNpaM=>&rc>Hn8pS`}g+dnAzH;@ttRT0$}pHXKH7y(?f#R3Ku7* zGsXb{xqVX!wwa}JW5baH83CYmw>P6{Yvn3XVt9<7B&T2XZT^AP*Ce@XdE1F6{V7a| z^7OMR$a6jTWr4HB@BC%|OSC=shmr=`*Gx)a-e(7}8Vcz9V&7UE?J;4ia*ChVo1QY> zK~8@PZc~E~QFk>*G$-%}!<4jC1nz_N&qu^4zFUDi2di6fbAAIa_bp#ob!6(en#OVY zKUmsN@PhCsEBiTCA7B4khr;^oAUL;NFjRys8&|4@&Qw{mUFW;bSf=tfN#T7^m}A4h z{@Yr2AX7P_5l@c%*)af4#_AN)REXR;1L$Pm6P#wPI}$!%e{#+OgZJxYOp+`tyS7SO zJT%@4kO54-Z$HfL3@b9%3X{z%i*cnZ+40p#esuXazL?HtsCu`o4HH6Fa5P!@gbwvA zGdS^;Bgt6naC}H~MSDpQr(91&u4MVad@p%kzG>L@iMw-F0SNJn2jGGt7?D?H5A5ihxGEra|~{`$Rby-Ab2n1 zWcMEcTJh`@Pv7qs{M{0!j>`7+fL7g?K^e-%T**e43J2gE$AW3Qs z9D;9omY2SXWGVaI_qku}Qo4>$TWY{pzQLz4UoF8J=SM)7gOf?;hCpA{ZI0&X^H8S^ zLz@wV+VZ$(4A?`sPNJxn8QP+k?IJ;OBw|q%!7GRp389sdM$GO(R$q<>#UG4$_SfFA zRBE#}r_}&GHy9-!ej8t>Bgb@2ha3l;Fn1%GQfQxeNs`{o;j4nwmoCKusqFCW^%j&P7 zq`KoJ4nh@UBQKCSVGAELGUYapy*d1G%C_z(C*Iz`$GGH84 zp_wV~vXi0PcBjI>8ffWf9Ey0Gr&Ir{#+@@t$bjK_mh}sBwIJ7 zK39j+*Xc|L4#Psm?~;x=0G8v`+16YJDmme%X9wR{Uz;%RHa*u^{sNxdkmJ9?pUF- zUkFZcK$m?i-PlKNI>Wb$5e|VhcO29JksfVl9bJ-twp#9>wby-}ag$X)0&ytMF`2eE z&{8!;tqyvWtLrxirm z<_T!dBJKgFPkVI%ul6I%@rYZC8Tq{;RwrMCwx$$LFtBj+JJil5?a!QVw!WLarVBc1 z53L;+A4)K4Z7e7Hy>%10!7KFBd_KX~L$+s2EWMaH9Q0(Dxf`aFV1?h-RJ zQ||ujy|&9*!_0u$BT!UZ>i_3wLg~|(=ur%;a@?#w>=$v87Z-#yNOl?|{YM}q;q-rF z4^)^8t)I&dxy0x+@RX}ANpV?7s4-AS<-53qt!I35LyLORzjS@B z+KwW|Fz0g&Z=&XtEYsF3jV>0}rSHg@uQ^x57B5cEW|IkTo-_q$x!u;hDK8>1#=Y7w zte1pdQU2oYcr7)?3c~wmE#~r@sJSHTf7!U(Ewg=t`OFeN>zx9dMuvLD{BCnxZ@`*mLbyOdF|_42gB}5L8xBu$h-&{FT`Ya6 zjPI;aUS9Y_6RWU;v?fce9*fRWBAg+Q!DDEGA<*fIp7i2pGjBL7M4!55mJ3%ucCHXP zzFv5%M(VX*yVxfSw`a*5F}Eb6PY9Xv>y!d+569VOpM@QK)BMjOFWn#7&M<*{)JP?K z`66ccVeSUA&Q_wT=n2}MIcY0LdPXpr>3Hp{BK(Xj@~sL&^q$cb>3ATCzLl;%BwS9x zAzZHah5oV7)5}Rr-a8H#XB>W%##AY;E7tF3S!cd0s>LBFEAqvkQ8K(+toPh?kzj>u8C&^Nk_b-N@3_$1O! z{Ph2Di#~0XzD~*ivx3M(mC5&>%AlQd?{AJUNNtUjmo=%zYR}9y>S|d|kXG@dK4aXx!{(sf5+!DUDP@oDSVYuy52d5e!2-$h|RYxYguR}uK~I?hfWA8glRw5 zt(bvMuJ2287Fw7R;Dk*nxlT6m#d1+zOi!AP{>XgiD!mxyq^A(LvmupoyLaUcZN`jB zytLOxwk!do7&g@TGb2p2(~%;JU(2+Igef)E-OB^%v9+jSEqV=m8r@eT zG)_?#ou(rYaW>xUvh3zVpleh3h;Dn`b9f7v*=KR3AhReIra$o}_K~is0XK(08R+ve zg&+sahiN}I#!S+6<3hp3s}>AXSsl5Nj(oqLy(X+{hbSmHF4iuGup%@<8j07wQKp>S zX)C`rkHmKC(1eNmY|4TQ%cJl0gWQmje63pmH#E4V4LBfjCIEsPi5hz3uJZ7<^d39Bh<aWq(Y zuX5`e0s94fT!TAPJfW}4xW0-m)`7xan&U&#C2~JM#Ta_@WvDF(&e0bmJ3b9UxBpYM z#begNEr(xUx~|&QKqr=Y2scQ%Jm$T@s{*r$dO01}S$tl*KeENAaRtndoxLZI@Q$e( zzz6!Z&g%fgx(5kB8PSdv620ek zf%xq+l=sJs3j zI>~w!gRN`L@#ohI`O7#?*;ioe$2Wr>mkVbnL;zP?iTCZm>Txth>4IY5$sODjW+%<*L2XLUOfH7M{Q9}x*oh>SnnbP;}+{eK5! h|BVsyzaAkTsqcjW&i`=9$e)}c>+2Y6muud_|3C5YNdN!< diff --git a/docs/README-unnamed-chunk-14-1.png b/docs/README-unnamed-chunk-14-1.png index cced2479750d3fa0decd6e52bb4ae05dbaed2963..c78741bbc64e6124941dde8d30affd859713e2d1 100644 GIT binary patch literal 7998 zcmeHs_gfQP*KUxY5R4*KP^5?uL_nnYP-Q40(h{n4X`zF3={iW4qJl_u=%HCCp~L%# zfPhFuKp+qlB|vCWLWi9A{s-SV=f`i)o^{Rax$nK!UbEMpx%Ns#8|oktdT|(HJBQgMwk&Xy(E&YYv#TAcwUU8vEA>I`eNY zSS;)>n_kk>vFUhhIuVPi6u7)8Tl=^Pp{{V)4(8{O)^-O%VL8tqAa(J=j;uspb9832Qw>H2#z z^!nnQVK9DUT`j=$Vctr9veU(0+uob^UZszmC_VpRq%5}ND%%H5-O!Q|m8TVgaKuB1 zxssL1>RZCr#;j1j%QeqqUvhih+llPyiPjlXKr}=*j2zq$Xb#eW3 zzUAorMYt{Z0gvKrv!Zya|3}#ntl4W>HaUCM-}_kdU>oH{H6+k!&Kdsp7PnrN2KCMy zB5L#Ty$H?G!SXdu?e$TeQPqzWU(RkGQl`+$ZqiKRj}Yhds;=4N+X&4^&0}I_Kvt~A z8UL5$Z#7M7=E)&y8JRWd@~cem1~zuQxy{(#|9Z2%URPsO1SS;;*!(dJ&YlyKEQ zl4rM__Lj_uQQI2Q`wSlum@K`9YiesM3ImQq{42latzT;~ahdtg$A@9YOe15fFHW;P zINsaQwg~)jDqa4#@JPpWF0$bOXm;3nE;%F)<9V_bnta|0tyb?HkK0)`!S!csT!7&7#5VNw*8KHAXEU!sl4ysh>^kBp3d;Y0n@)`UwJkK^8y{ zTwHpAgNn*Jf`!7fk63MaNC*rjd}h`tjhYrsn_W!2D7(i{sgrLPySfYvNBjjJ#`sUY zDbsG_3MLu)*2RR~QV$}%F)mbA8kC#aFS&}MX{APYTpe8pPTO#A@T76eX;nhE4NBdu z16x1tPDTeCjX9|k40!x%>c6WS2ay^wLqnGw!c|4JZidumQ2%B1Wnvn9)}#OFvYS0? zPF~I4^YZHXZd>NcPeM4a%l72$2ky>+0b(YWuiG|EtVI_lCMMFSdszE3i;IkI#2l=D zMS|xNfag`!Lo?U#x&&E+{Zvah|I0gecmsk#`7_?1@#}B}|Z41X09vh^>nwJQ9 z@q=+)8iWRn-;F_n0iwTOyVca*jVObStOBn!1wjzCQ`R*9pGOu`VdLjupwA1)VC`Nt zD%2)%*MF!eto8Q+Yac{(+ zsdJzx05rTT(s|2!*BVU@%+^4gb7jag1xW^vO444{$Yqt+S~W!{qbao_ZmO+C++iUU1$U^* z$4l(o!E0nuJFcyL{#!U=8A-BnXJPTZ&AmP8-G8X?nhPFT@A)S2lw;nkUOm?Kb_flS4dXgnv zn9D&sVi_Bf-L!CDuz|~CUxKv&xZg3#Bp;Q+ozcMBpTJzn?Fet*+noJ!P!P*HM;!eL z1ehd}A{iiroMx&p>Q|(Tu62*8t5@8RPs5~ z3;#F)w4IW1lebYXq@Qs7(x!5EF63y+6wmH{a2%7 z_g)8ab2~osr0MS7Q0JAL-}bvso3j5Lt$x>jSML8~ziP%DE1gWdWy*WKIrCPzK;#cQ zXA23>aHO+C8|1|Z*7CA=wCpN-yn6WCt~hjrZDb}f{3Y*-6_afXk3gc^jzFtz3UR}w zH|%svwE{%j+6>-pF_t-OPdKEYYr+@xmv>{kG!BclSltaecp9U1q(Ue1jS1UJJTYLH zXW)JFFXwCY(B?cD819jcxG>8+!u&6d?dHZ<9gE%;hpM##6ix=ibZ{5baob0zx5V-E z)ex>h(gmLHy>^UY!C@_^sCA<2%t7&orwqFS$0ZT*JKskPJF#|);uq|1HFlFiev|#B z?sG_@21MN4MXH$l!L&`!$uupD$uKdh`8b|L)t)W7%>KIf=0&vL5!w{hsqu zjg>1~y_{R{2DOF%V8B`tAhZ>#7DZJ(vp`R?o{ez5Uy~diR#Zx`$M4Ijx^n|nG7mRY zj^Zv#N%aGZk=ff~R}o(y+3{0mD~iS5`nmBEEF1n*@gZ|`Nz9PJDpv_7N>R^a;_`SBy=Oj8cK{xl7xig}7r6_}JM z{Nr{0aSYd%*s(~4brE48j2R*;=L}4*a{5z)*tp$ zDN9knk$c&GnU$MtAj*ER!YP;$7RpYc5DbI!3(QlCw03BWKdabAo~S8%4y}+|AC6td zO)tb7a@FTN$;!|hek#*;ehC~qat`(yzSG`Xt@??7T;i%I_rd%kqC(1{=yQW@eh? zdxK$4`pU*5tvQ`3Z)?|o`<$*6of{+!%O!c}5PR2-wkXzvn3A^Zs;O%z&l#~x`K{a4n zx43#m9{ti|?W=#M(kK@a?)~5hZ!X%hcQL((jI%FX_I{_gk~Jl-^Z7m4Uw2P0Kv(^S zCws>F9iUknrN@;q#~BzH`MhMnXlQB*?01qAUs$j|L<5$sP(epAJgD!DHbGl4?;`Os zrlgL6I+9<>WGf=zzp)5+K?0r{W5z<4-6p^@U=y^V(EJ~Tc0$zr)B|AfeBeZ|3?OX_ z`folHL2VY@^rZJLPBS#FOV- zBWqEinuKA_0s}(J0Ru2$1?OiC0%BHUPZc6((`GjhXL}L-%NTZ6R;y`aOuZ(-iqTG% z8|)d5cz(yJ)$Wr7&Vg{vBnxU2a&xaZ<7xhsyFSN58$Bk5Yb=*WT@c5q%)Q@|qVeB* z{TNPq=DJUHO$=Fj*JkCjhRlju>fT~pSeI=`Gg_JDvCW#WMIIOcJo6y0CWtlEZxRTJj7!M(%$z?{bqY_a=_2dz@qe35xK+nI`TfyL zg9SMdFJE{zX?FF+>jT_@S%MRs+G6>|iAj<;HmRQ({NfR`@iD$7sj*aTDE8)lyGi4v z?NL{;ZIJ45I9JnkQ>?r3VW{8pwovgGP6g2WBlFF;0oR@1$>lvPlsDbDx2BC}a+lIq<~|Ly zZ!4$1SoBusIM~$!ma;4YHk55=PC`F`ayNWkB_Tuz2~QumOId2U(NHzZ14P;^3=F2tgo8ndxk+Ed%q}ZjeX>$xGfq}xN)MH%r zgV*BH6FAkEAJ6kq&me$>?`wdOkQ>Y*<=k5hFXsLhIF%?ZW*rZWZ5n%-hkfJBXk_U> zU~&lpCYS+bzoAo+fBc_9r+7#yFSpA`2mH2eh+i{G5kWX^9tw$i8oVtJ>BbN)a!}{@ z{~XnBPDlEIH#ET78`D9ol&C*Lt3mCz|K%_Z9$W1R3O8Bn1Ju#0(@GJgzT;?%d(P}~ zWw!dfPu}e58=Ii(6a-Oc5&Z)V{NRQm5c(Qw`z#`1;d*Xl`%8_^`hM2&;h^=|E~;f6 zVS2>68K{u-4%jSdV@wE$Ja9P!7!`-@mZ+)SMThXYZ)J-xd$>0fZ{*kkqcP+brqRS) z;*+TW|2R9u?{nWDk$D2InE|1-5I$fo2(YAU5=Fgb?f0rh0(&Lknbwf9g4>#e8^h+n zk#)T9)KRt~Q%desi4ck zl(|U_P6gVn<9QmSR5f`7LJ~fO0%uUQ%zOuN*}I~0R)p^3?hW;sqdfg;Na;=qgcrjf zJoHQD&M=Z%KnW-@&5_IONLSoK-zS7i*{K1=7YO3;OsBHU>Uh5$kS@O)r4s=<_wVk!pW^VJ_fks1U4O1~-h+ zYK72a9hSijx}`dQf=}&b8xR~nUZzQal}0;XMNy5Od4rN*Ed#h=1Nuv!ig0F~+(s4h z(ls_P3|_-^Y-4w`CuKnYC9`@cq8d`MB4F(}dZAweSG2(Ks#jNAKMftX&-OyKy!;2| zNf4x>O{lyq%PIG*_{p6IeBoRs-U64tJ`v>?sfo+q9dCjn@}S^8!|09Mvzl;z1{t8? zbt2fay{_n^yy}93NOrp5#v@27EbBC!Ki-4&#ZjIX!EExy^&E?thh3k)f*WyAL_4@4 z15yIkV+tfR^wGcO$xMScPmU%ZC+WhyA3uf2j-Th=@s*0;F6osWxSt-p;x<?<`S8jiF63ks*>~^!Pgg^rmz{0IUO*DZ|8&2-I`#fj zDDx40WwQ#*tUdWB>d$7B(eNJz94U8)sCo)$e&%oj2(5<{PDzEB0l6;7camW0;txf* zHv>o(*>*-hq=h2-FEiEXT)#&MQp4V$RWT3+~5SN)_eahoBh2A zr3GC{$+WsDLHDzFR};V;grP2BKS>G*#R8$ZP)fq9#;_8|sZh|3a*(PdyqI!-o=HAB zn5lY>8MI=b5#>m5E&$EV&6(!R2`~AD7Q+4+9DdZZwZ6$Yl6oQ@(J!=sYWvQc##!IU zaz)rp!W(Rn|Av@+ZqMwYShK5mn~_SoaALPNNIXMBZZj!BO3!n_ya2e*H0ML z(}U;?mz?S`3sdQS1VQ0e05e~kyP_uRAs{PbEBxoF|=JsvqBGPTfNx(mFeP|{^ z@#3R4sLMF#HoC~DQQ3Q4HVsl4e}d(W3GRgZp##4?vmlt?&dQwK1dObypNG3P3&fOb z_5|I#J_BeE$%TqS7n4i3y5d$}LT5gJ!w=OK+%w0nXY-*iMTA|34_?%atM&P_2bCKr zb&)q^ol*3rE}MD4sUh(9mPt8@PXIo6Iug*M8BY#eb#=8o3Ji6B6AxwgS&osi`tafk z>7TCUE8fm}V;CMM=!O-&<{3Kst2Yj~`m*)t72l|r#~5Z{3!Z;w-}bO={3~~$lAxO% z9f#j_e3tU=5)hL3wSmj;{U@ofc8tZI&BfSq7G+HRi&!MPU!|;g9}dl1Y^4XX1rEOh zgr&H3@3MoUFyH`Sa4y}=&)y}piR>r+bn62fM zB5{ItNwc;mlXnjd-tXC9`(u$SffYWJiOgZ*A5>d;cvhOHgpn!zA8z|~Q;_2!AtsjV zkMB5E3W*jqU88dPo&c!R^=CCgqc@VgTE6(I20CaetG0@<@}4vGO-wfLeE0Dz`?Iyd zA4#J;XbV$ji}lC~s+p#i)-y|rI0+8+kZq6kZN~|Q^U}vHC}%B#n0-Xm%h=U-h6LO- zFHVbUwLonuhnIj!WnpJ$;wR&#hbGLG?8~9%alap@e~3daizxK@>1z=NtfRw>kWU?p z8f+u<#|LMVMq?^)QCi)noPNF^WqXQJ(EB-SAc#A*q|%yxe?!=eujV_S6{K6aWuqo) zsE~5bVfwwg>3GU)5?7D8sr1iYEfG`AnN89Ex`+&KukXDRIhJ^$2eA+Ct@qv$i#{^4 zOWaTKI&V>3aKEf*ziIi_?WC%>f&|Apx=(vr9v&?%t=W&peUh>}oA*)hs<4;hmdH$Z zt0R+Ua}uTS?L_jMIMTN44Z2z06u~|fzB(H7+?0yS#%MweuWeP4mE(uWIB*Mie(lKC zqWV6{0#m3?lGSZZsEH#bw5>^|_-0C;D_K`Rk_Pg6L%C13{tXxaOxSHRGN!7VH12A8qE! zoYQtmj8BeF)`tCG<_lym02bkCyOgLM^16 z@k{y6=SRDjUKkg=fEXA zhhMNrBaArycs-7>Kcc)u*RmXWme70OjlJ<$lDYYFO-u2lRFuNjAx3_yX zb?)U#7jsz9LwmD-qfPJDNNB%7(-I~p!tJ*!JQ^yRW4$Jw5Adcki3v>`x6O+x-d9QY z^{dUge75mz_lP?6__XP_Ie!4#TXwPgDST9N!I<+8<W5-u zQe8ElRm82)W=svnL|;40Cbr;e1P5U>&s3+uq2*kMA_myGr7U;O&*fKSyO&eP4eQ() zK#*}X&^9FL8|pO|>yU^NqD{(%ElV@Qf3O4XO_>qnsJsw zEx&^|%~SOUF>RRQ(h>IQYViuM@4q|@6?`hwgsSr)Hau_DoV)Vf%TVSg-K?*3gLN~0hbehRNGk=k(NcdUC z=)>$0{#%RV(=T9yYi-xoXHS*bnyXIV z2K&rAdLwX|vkeIg0-TO}Y0#;c47qCf=6Ci94#zBEPQB+VCGA7xJb}hN4>=*7@N#&_*Fu^8mmeWF}#A zG|Y7NI70UGP%K}3MjRvPBR;?wE;6lh$&zxZqm_3+=JCa*^Y<>ho6H zl}1dC9(yMFGfzf-h*W-yJ<-bYziGPvmt5r_jZrk*t?~4rus5(s|g@ztYC{J=p=O;-Uw#G3#BF91jafE@sZ0#I#$_c99Nr6lr6geY$AKiiO^~#+leELP zXvqY8nbC#<+J9W&S3tF&YiqYW*KTRiZo%3836Bqnx5h8Vw+Vl*L)#_H*rCyOXnc!% z&I>%pJ%5hFB>+HzB)oXbv(02GDiJnP7&&;4_aA+JFjhjK^a4p)< zzvJNA+S+CSU?xFwCc$n7jV}o^XuNI0Kg?%vGc!0G4ghd~Bo45{pASw_5+{j&k$~SK z&dv_^_dak5lDGsk4j&b5_b0;N0dOrXxS51M(f+u=Z}ZPA?(c!E8tb2TniTQG$P)l4 zyZ%&AuiFP30Js4t%Rkcf%ihX~w*H}*)5{}q%SGbV1YebeU~uEs>>G8tHM8$@#Madj z$>|t#73LOq6*X3VXIOR1{`S0dQO1b$p>ajJ8%xzYe}|C$k(NV1*l`&AMdP7va}<)e zlEe@D@7)nd6Br3t+F{)8IOR5+;mmR_%j;L196hF_7>s7KiOS0qZHlI8nQXMGnJQsy zMou;jivN5!gw(#xRkhi2|C7 zS8Tw97VMg4fw5?lD#mFNc^K~OwFKZE045ImzoXxnwvh{c`aoEpQg0~$NYsA|wA&TwoGd~jL&~{$ENcX;O z7AsOa70`_ycOe0CCa#2;Zjju`;T^*jq-E0)xt;vEqAw+r_@e_ATbC3`NxD`HJ%O53 z`?t!LDD#;tH`fu)4V#woZ^K*HXT4c22usU+v>la&&VV+I_jj`?sr{Nnq;_k|(E}A& zZ8W5(b=CKo(G}RVg`5YjN;;i6QYNCu7snn*F=;|;oA6FgR8a||ss-E2sJ%D_f90_b zlwsT|p&JTr7>^k#14)$D+{8W?0JAsXyD~C3%BnO+Nuc-)xv^|mUrN;wsq6J#66u}x zBs6)I>X;s3Vs!sCO}TBOF_QELjD(6xct%;DOjv0~dchT7x!cSK1rTi`UI#MZ?AKRe zcOvC4j1(|d+0gp#EwD!Nyp=)Hr6ML^JFHj!;5$2ZLNdiMTRpc(2h-__1ME4y^*mL|Ahk(--VPltV}GjX{DK1!m~NB_6R`=1XQ7H! zanF?Kwt}v_4p9sjgyBL$EgQVD5cuWNbmVQMj+l8EZFMre=`ECUq={jINEpl@jf}oHsS_d|JtE3p1&Inp z5+QCvG*pnZuObh)pFASj*|jCnv`8ZzBUu(Lm;31M(8p5789kV}0#(b&ILVap1l&IrarDZGWQ{F$+*T>Dh1^qKD!73vFY!DcU)JcaahT#5sQ(=J!WmtSCTWxoj6`3EhqM|o{Df~Rx}y& zn^vE-c-cp?vfom%a!236C#Rd+8W`6QG14p$rwNaBA3T6>qsqZNj~lF-J2l$T;yOV7 zaoBNr$&^^4-HrmOu*;M$gzcu>5>fHx%`>r#@GphpGgLXV0KuTgqwa&1>3mW!d z)!?f!GljsBGKER)urYxpnhRq=3_m09Ng~Meb$NyQx6p(99VK$Z*R#1M3w4`=BKiul zaFfp5Cj`au7X0$F$V&|)d!L?`S8hL2@#og+=oIdM-xH)kfQckCd{7KB9j48i zN%X*2Z8C?GTgzT0N+(#fh1Y$k{$%;rmd)D&NhO6;_pf1~^Drl31f1gLBg1}|H_GN` z@APTc4Ih1L*z6XPaZe{>St=HKWm4Rv)h$hsin4^}k@_lJFjy^@mjQEA1qTZogWp_{f3n z&S_n1l5j*#3qX^GWxr8$aS|}OGuRNaeyh=UeaVKD31D}{Y^jhpw50I%36jP$qg(Kw zZOxP@k>9Qj?7TOL_P{goxL^wjc~eK=cU3HlrL;8G)TiEA_--*bO{=;yB{oeEtR(CB zp#*!=Xt$*jHrX8Inp@Ca0>uau8nDmO*#91!Ybe>Bpuq0%*Sll5rm9w_O;zaxHHd`# zzmU^*7gAws;>IIh4wJ-`j=s~EswNc{Z1)hF4p3lu_V9k;tU(wQHQFN(yw&;3u91pb8l3CQ+`~`EiatXIS8#DY8w7!ufbi?=lpqW;APK8 zz0M~&pWnArDcqG7YC@y{d_A}rtEt(dYB&>2Sz+1UarNwMK1X#T_}PD;Q=8IkaF>c zuoL-S&zcEj%1;xi)%C7Tc_RVS3n=b(ZZ_tC&opSi=J#Ikz(~r+H1pGqIGlt;6^RRS zA6lX>_`O-HAi3(+V?tqF(2Bh(+`apeCZw+**|6i2_Fzsboaw}h#NT!KPgjX0As z@ZD@9@zi`tr_8>TSlwy8oqqEIH3%t^o@XN19n*)WU{gCbyB2YIF; zFpjqsZb0Elkv|hbiyES><8h!n74&$lxDEF4*Sf6l{4TX1jM=$>9JU=xB8%7r;DLro zs_GbXs+s%WmYqJeND@3p=7_xbOpNMz|MT@s#AkwrAmZrxE}yvCy3c7n+mdn;@UhtK zpQ8sMtwGbl29WYMi0D=fV{W)nD`eAe zQiJ8RW^V4;11AzJwZ!8zrv4#B83(1Ak^24(SmkL%Z+C6Wb3DrPzXp zYnBVripaPOx4g>J9ako!`Z!Q;$9~d(YzsW+;Z>erL42CfBzB`353gj0%jI=Zo5-@Y z$mmiv1t6ipluFK*UOPuxGOOz#*uj0)>cg>)8M(v!GUCbUl~tZzk_M5(Bq5dQ4 z9Sl8)%Jknlz3V$7!1p@J6%GKA(Yz7-lZw;u$1xlA&8mZ1$$LLPJHx5xM(^Aw z#Ur%X_D;8-T4l(s{pyTq4DwLW1Ld{4>&V)Y9}6wsH(Refj>t~c^Z5=D`6VwiotG%r`#gycf0dSkdz5d>>?JsbhBr9{=Y*aV zLLJ=SGrpS&Uw!H!i(5@w?MDZcSeF3Jk*+!&t8o#~hr9=ze2qDRTEX z0QRWSW|0Tg<_YcsCw&d5mS=tI?_h)OIxpm!{^>$mqfzZW&10b&GBTZLHq_`9_&E znRe%pa;E7K)iYDCu3NKx``27RamG*u48(vy8u34Mg3z6dEv3BVxw_n759}^9;>xj& z6qC6qz+p7yJfdDVzdWm?N^pUS@hDn*oEh?69PA8p{IPD=w+G-3U=1D#U{svA&|FqQ zMK@(b7)o8#>!+1PW2uypA2`2Z`;-%Ew5IcE1+a(1v{up1S9msk9KhH`ftwf@_n_l z{LDz`c}~84G5mbn;H2O94wkOU!}X0ZiI{~`;HOODjfCZ{&c#B#OB$!}M!^ETNnzIt zIE)YDXHU!clq}s}7W=#;K1$j6F4ns#vhqCo-DIUCyz_Rw!pErViWhWt*7M~@3KG3E zSYl~Z@A2aSV-NaZYqx5-2M=DxJejH+EM281`szYmQQ$39hZbge^_P@Rke*u~av$?a zsr#0oXZpQ`R;bN07-7?~eI4t#*$k+UG4da9I5Ml68kOm#b{5 zFKS)!->%C4_EP;nPHsVRhlRNHn@b#aySe>RW?w}WH2KB59O_Jwn4IOVX}{5fCVfG>dyQiYB+m-axCNZd=7*)i+HgA_)^ZaSH~pu>O3a} zh?zt**Nl`k!(AvCnfFhM*!~+igsJOU*lv zV^u(96^1NmFw(Ob1)WUgV=BbCpH*`?=+qU+6gCs6J-k{HcYCWJVTR!g`DItiof}|z z)h8!aMwC7i;esj24KsKkg=7^zON;%cUnW>6MU*{jetxh)jZO!0N7>Q3ChkJt^lkX> zBD#V2Ml)7~B0rpx>GH}|CnUXG25%mtdMB8vkhepPFT@AZ`Gb77eey5JixhAS&F8HJ zoBVt=y=yN0c%^iT79d+`QzTt`;D&;$Py7kdQP8DwfSdcLSY zXLCo)>N_m*n;aQs9|vZAC29F5Ek3>&GfJ#T0maZXA3eC6G}R4SG(TwmcsmqyXHLPc zB>o(2ci^a|7ggBH4mp}2@RNp4$Ba<#&?LtOE#Jnq0{eZF=0ggB{N0`$u42{)jzC;# z`M**HWDpAdr*-=d-MSFOp|GlMFh>1dfs`O2Vj&piKaMRFpiwVP`OHGN`GuDi;dyXw z5+*XcOj=K2NW~4FkSG6?N3>YCN!U9K#(r8hRFEOe4tL2!)FM?`B|)t6?eWMWbiHM# zH;^XDCW&eKAr6M=gBV_(=`f8;VTy9c_W%ys-2RnibuJ0ZP}*nhErM)nDi6LQqhHg` zTGILyMov93O0mtmX!V*G4Rai&n^YXS2BZhuUmbW)SaSik(#V--(L?(PI zX1`9#hW9EH-90ybx2_(VTlknXWB}a2`;r-Rzg+%T>aX9og4mhKSndtp(*9CGVtBwO z{}#5zK#RxDXid3nv*v@|y!<>4w0_vYWy!Jz%_vcxxi`9l8xu*5SOBs=htgw|*^LSy z**mrLe+jxE)ShEb|hKYmqM(f-5KU>YpJ@_a~ouErH)nyQ426#|ltUSmR`>Ra`U_{6ONlixkTkNf^$+ym&Ko>zrzT|MFzg(hF*M)1m?;f2P zz9B*+`bH&X-<-8XlEWo2q@H{&d$K=_z}fdeOrcR^UoL-HlOiOua`K5-$0vtsrZ#s~ z{SE{VPc=>Gw@P2k5UZ)6HoiD(5lf6fmK(pK_X`ytSGOzeMQUf14$z%{+hfYbo?qex0Yu=;P4H&ek(kCWr{ z!7)lu6A#S|Lo)~7oB98am;*@lXCGFFWaFO3?28NLQ2MiOW?X8RzU{cTt1Hmaew7#^ zcbB)f^t04UAJ714*h zjueewZ**j*e=aBYo!c3-*;241d_|XUIm0fufebI^7n97CQNZoDCabCLb4*S8aZ!Yr%r7XZ(-NX%S82hOztY& z%j>m~%)VrVM`wWdOLr=>kukvy+X{-L6N;Mjx@k}}J3?f)$bO5UTuKwbj(*KCh@fJE{e7Ymjo~ zi;qHeSmRLV0BM6Mnh=vo&PRtBX1nbvpEl8o*!@Kyr>nY?4Qo4CIj!H9U97pVIclI; zT+i{{7w$VQYF9`ftzcCS!6|@7X;COj!e}W;c!A#n@-3wO(KdS6S>DACny7* z4>7p~*9+%ohQtjH;qf8l4JP^(ByxtkYfon+49#Wsqo4D(R~1t*c{E*9Df&Xmv<@&b zs&XQ`e#5CjE3(`ep%B#>`=4+zy@#9WtLdi6`bl>#j>WwFzX9nNB!(~8K*A=gugKu5 zK=yZPEg*ZotK)L_g&+9Nd`E!+sjzD}pBYHFGIvFDYKS{OcdA2@OwpN8Iz?sYR4H$f zesn<*vG~nQ14724fzbjeJVW^5>A%`p5g~10;bcHg2%}NrtG5u^Fs9~KXN~k1I=kQK z#Eko@C=JLOsy=^FQKsy{c(zHLx7d6i%)ayi!juV+yM`c_K64kM2 z+e(53}xiK|F=gd9;Ae{a2{O@7D0FcIZ3_4X$G(MwCq9Nskc(m_YRFTZCYFbeVw`Njh+ zYSfJ`6iOpmm5Lq|JxWFHq|msjMU6L#i=DZ^%DBz^SZF5i0oiO0}PQQBlv*FE>*QsmHF!?X07+4h(fuaf4u z?|9O8aF-3fY!d@FpHGR|**;`nEq#fMB}ifEmdLXyy{jI!R~mYeovo$hyCyrtI) z%wSDGxkvKet2*#xzx1P6AlYRoAQ zKjsl=pD%p+otS0GD9p*HCRtQWR&AP_>*Mm@;OF0U>nVEpZBD2{x4+&9t05L?Ss-wJYzL zJsI0RQ$!9Z#+uCDHe$!-%@G+;J_ROrm%9UXKGscw46YsVUG;2Tcq>_6K`w^zTayg6l1p?u^_sk6 zcs%fZn!S3tL-O4zYUjj3ul>_B+%?*P9u{LFkgiT9JU8_zA{lHqN96}!FSJTbrSQvf zE!eoa$%ihZOc(xwhc~O2)Upv%lj3E;)PvOoCm^cL-BzvIR8xidNt4Zl`1rp#pZZkP z@&`nKJWb@w9A;H31i$uJejcQ=7&p0#l@{LB7E%7f${p+H1~JNv#T+XxI)9QhvTo=^ z{=rpN;W`-YKu>|$2hxYFd{(l=7q9L69DQmEnza8fF#bP*`k!M?NS*_^$mhp2fJ}kK(RHk@Lfl{5EaQ=v%lEobT`Wky8qx)rb0%TukF!$K|iwj_`pxo8I{r1Z) zC9vIpfXBE9)2|f%^Rh9Emkq+WofwJBOBXXfBP zb-*x5;U)-%SDBZ5N2Z~{J`c+=mC`y02gmEN z`SZv|GwJaNb&1(k3;m{26Y(Y%%+yw$W;?rOG%1#E%Tl#YPqCCUQ*be{LORSG!tU7| zrR$l6Xd2nxhAr8D#&44a)9`Cl<-_0jXA|xm+#1dCYTV+hbQn8CvG1o3y+Xo_{Af<) zWf)hZTwyafChNxBXaZV=jU_+RrLD0$tC09%U5etc1?G00ZzJJ5Lo!%J(r(S&%2mv2 z+%#55OYdWJUUsXx9f3KvbggnTkkR*HB>ft<-!XcWwVEV=jA{If(>AAQ2L3$4)Gd(F zzCY!I`|BZvfs%U9n9rjZ`{n>V1{!jJUAkAQ`KMAq?^v zI2JsJUB|&dekOVJ-8Rng%LOtiiGAcr(|4ySPl$1A=l9Vca{ECi`?XF3K_fREl|4W& zPdIt1nW`$K@jvV}r3VEa_&*Ewiu5oLBcTza+_oMEg0^H;<0o=Ugn+Mv{bNl4q@l2e z8sy6kiY6KkbrB%g`Jp#&R^#{3-%?oTU&l1dL`0*@t;^$P zLeo%*bl)y6zxBg{t$>I9)`cVzyeh3(zVtGLM|ytt1aYV)%ofdWQtT%zr-aJy1YIC| zfyVjtp8QsZRPdyaz?vkoi{c2x`r2?Mr#G2I3V&}fzklmq*eS)vH5XRni~hLca>o=D zAp!=@^KY@udF9@r+;5_Rxyw>y*nh6Po3#pf9={A2p_?7iiFn(RHt@+zv=@d~?}U7M zXs@_Hc}yRXVgv-rdGv_@K&JBNSpWupI6a(_n~#up>pPL!x?Q~6@oVIW1vz%5ww=5g z79~gngD9dkdgh1%K^iZd(`J;ZQHYNe63_SAex>Cpg0uZVJ$VJ49 zf6*ZdK-sU6v=D5;4emB1EkiglJd~cxFRpC)^so7j@mgw>!LD;5g~>GhFiH^_FT`Sy zB*7YYuP>`p{sUi93mx|l>L?^F8}>z4GDrupDgU%(9Qa$`V|@RDU(&XSQM}t>Oh4>$ zxb7id!ql<+O$nNt7p~-{zrPMjcO@rGCe{b>kYN|xDC6=z6H17rf39n&6*oI(7kkom z>wrqEYlj4+m`%8Z4DJxqoCFze`u`WjGpis9z#7>|f1M1SUBc|09l~~b2f|XIr|@OP zQ_YPFIa?P6aP~m12qv1Rc1kukJ3lX}h0zRz*dIVab}rOMu>WNH_RL!l4Kj>B^%&$% ze|Ph zE-R`#@`#LV6d~#iR{K(gYtW)wUKMY*JD_}h|XxPrRaQEq7d+`JYD zaihi+Ant|#wMuMwpd0r#_>WMiBq9K~PK7?S88u&vLeIfWAP9d=mT)NQen2SZkxmLT z+dyss?vy?EMB+`z>m+aQ5&tN%8m}7HE%ly-<4;@l1I+mWpTG8d3RM~U7WTs3jVhF8=NG}RcycTU2Ix)&H<4Z^h_`J%q! zmA=kSu7lIDy#?6^uUiZAHg}V*SF{C#oLt+>x&IK{R(lB2@|hfY!@U=<*pg^#br5B9 zxPl?qCt0tYN5#h%2`4?WHhf|8H?d`QBw4CEL1We;OaYJyKNKXjSaz>bg ztU@I=DH*5{SDd4TON`P(R1px@7bxojYnppWT!6Mc-F^u#8=PcHgI&9gH9HVVhLvt0 zVe&xJ1I^oT>i2epm^0Pq+z;cS%ia#hxrsOQJKxO1R6R%h^;gP*vo)(( zKc$^{BmLF7q3qpcDeNfJ?FQSGoTs_Svs7e2aAb5OMZvs`<`^I{$9>nxGxBDiU6g)?zm$p$j z%KagU?Ox;#V-u)$R~r+1rGC2qx@6F0R|Y8OYi15bcST0grUG4YAo1X1Q`?@ukntT6 zxF+KOy&}L+!Vz-2bHNe?!9Q@bC3SL%lEEs)=q3S zC3aZKu-x1@aF|zm0l?VHo?KiM4#m1nx&I^~W-Vt%UM|JtkBd(dDzQHeTl0APv(4c> zbJwbG6c^|>mN3H7p5$40pWsL@w9VH3I@#y!VexbCBgct^v3nEIK8{PkdF#~B$?}|! zUVsydkNPLFtWCpj2}pC*wmQ0cR;N317GRnBVTZd4Y^38_0L*y$@-KAeb`Fj|*Ut zWXpXYhiu-{VMA2tC}GS_pOGTI@$>%UsiXfL?f#7TArFYKO%p#aAiy0@-&UcEmpaks zZJgj{sf_!KY_WV$1NL$BeT|=9lN$EY>*{@6vfoUb-v>)CevmQI!`Qq1xTmJQZPDX7 z`OR#byj^&BA>`~V*onaBxYmicS6<0eB|JsRJ80@7nA45|J@)(k#llz(hht?IZF!3o zoaRBreeZLYZ)O`C7hN1K52K}8e-E(BrzM`BDz(escRPG)W~IxGiQuq$KO4W)|K*aY z48-+l<}5m&AAV7QkV`&|{#0M(6ujk@f6wGceP|HSW7^&l2wy4awRWou~p2a_{>&>87Ry|M4fOl*V zrY5LJ{=evew$F|bF+yw5LMd2XxJGJ;ZsdDW_cse7$?!Z+QXbLqVL^%{^jeCETe{65 zs`ZB@&4Uhf34$!dwCmQq-_bw_nPzXXouq~r#lP#k|1KV>LZm~_M|g^SE9~=F{etA) zwr9G5QOhU&O8PJpFP*J=|KkxFknHV3(`QWy#q)=;KvpbseUnj*G)A@+TFLqjC|?|i zJ}!1}s)khF*wnd*ojH}_ME#B{w)p=Y2D2xgmHxkH!AsfTF}AvGaf#kP&z&kOXvkMS HhKKzJt-oIm diff --git a/docs/README-unnamed-chunk-15-1.png b/docs/README-unnamed-chunk-15-1.png index cfdeb734aa3151ca99c288d83b7121f245ba1b2f..9a60b2d35affdd7ccb22ced93b202987690fedea 100644 GIT binary patch literal 7698 zcmeHMc|25K*q<`PAlZ_vm3;|eB$Mrm?2K%Mp~y63DfjKvKi}t``+V*>=lgxm^Ld_g?&scfq7Wv!EKIyiAP|T}Ur+ls z2y_|`0-cJ2($QKR3!l8DRqPN(7CN*l4FUpjfDQ37jTaEDB3PVJRpQ2}Po5s*kp|k2b;wfe4oX zg;T@BsnlqMb~FNkg@drPVNf6}il+bNVM(+LOQK*&R4j#rrBJXGYC?K@YHDf@LOTb6 zAfZ4c6r6kR^({d#hrYV$0300Qyb z>1zWP0U67<=-}zryOCVHa{7Hp{^Tx~J}vW#_t*JkCFSoKuo&V$yZ)|#eCzcMPJr1h zaeDsVKBV@19a9qSdULDFTOGF z`*8d-7~454J?3<;CPI@J%A`m4|DFGbLGWhVn%Vu?aiO!uek@SF)oZ4^cuIuEDZJSubI5=1~9LIJjOBBW?!lw z6#>epE`D*UN%(sBcYHSJT~AHE?_tPqeG7zOLLIe`Ug!OSu=ZmM;PY^b#&63X+3A|v zhcEZO-V79as8KAobaC@v>)Cd5R&lDCkA&T1ybtcM2-Y(0{!|;c3(5(dZ^)sJ+??Sv z&B2tX#94elzRS?hlTFbV!VA6jr>-0Flt_igX6gl;2DoUBS^|O3)B~+aoxYk4?0KsN zd8wc@umo`PJ1o-&GCg*z=J|X0SsJ@osL{o~@A{WH`$vt~`meSHaB#iVU0_JbNv`oP zbo}+^XE=QKU4yC>1GS+u~+Teq_~UnGYmdi za;-f|nGYZ(cj5-gHTFxsoEC~@wDclEGh%&O{2Qv2>O1SFROo=f60hM*iOA{W!8O^6 z*R%ZK1{J~lvR8b`T>sV}!Ds$w%k$QG;;?uti@+35?C17V0{&0lkG#V3-C^LmG}o?4 zeiDusrUPy~p2&P~5h9ascOBd{a~M(uky$QNS2SsPu|f3VM=^knyRLId0NyH*_(Gn@ zGWZ#Amvc7;B?$&*S-=8BpY&^Qc`>n{?I1Edl0c^_uzUfU*0C3uoc#wZQzeFe3dfuswLTyMQFY(CBm(YWOb^DFywcg#9cE1S5Db9kyT{dI%5Sd3|kG?(uI^W@) zoxWelz9I9v%3keH+xCrkaNT8z^i=#U15tFu({v8v7I=FQ9);)jJWRN;f8NPKqxz!B zDWFQEz%A4YLpt{!364Pzn38*ux7FgF-~7Aq>uGDLeQ=hfUDR5}<~)IiPnC%OvEJb$^rn3|pPm6|6%GgD2W%o*=f9!5|7%ys43SA>Z#^leOX zb9(f6O$wJnSY}7UtMQVIH=s7Ll4z9@Jk9`dpkus!l=8XzcTA*e3}%qibJTba2l|rxW2`C0vC#C0(o5c@+AON+94w5`oC@8Iq^%az)NC+gRmh zSf)|aFv&J#uSAUBd=CyE4hSZ30X{Q>DbjAw_W;u)(cP<22ZBn)uCL zE^ruYg_MMNu=k6ZGTM09lB1XGL(J;MgXQhAd#bU@ZT{8DLv2O(2t5<#h@Bej;^%Hc zWrD)G<7z`^x>FMfx$z|Dd02rho#7tK>c#daVF9ul^OA%B<*Jr1rUO^H+*x$*ouh{q zAn&mVejPzMQ(2K!qBXaVu;uk0|#{?{1og&COaZ$cm@N zoQ=%sqbK(2lFMb$^LJ*MY$CuVX)!98v;j{9!Vzg(Q96EVpq%-Jb;RFEf-l*97;kEEE% zdkF8G$as52ViNvVp(LbIsaoAsq*NIxXEMfa$<;%kW-&Xs_e^G-YM92<){F;nd3I_^ z7gY929wcCrPXV1Q%%c~Ugy(GRBU~~X>LpeP;nIq1arsY-Lr+t8-s|i*}_lBq7 z>6Wcv`*ic2aQnqc%8kTM3FLBK-A0`j-#L-EVsg=!TzXS}%>UMGs zCapsSlbnPf_;HWI;P(S1NO`>tuB5&ZktiG5@*jBgunM=RtC9k*d^E*3Y|rJ{y;gin zwd+Cfvh)C-qKvN6wsr}H1dQ|i;fd&U9rHYrCxCsu>Qn=&)})g{fIY_*q-?O#q7%l- zG6;E+(vD*2K%8xLO;=BEx1)i+1AUMXfb!a*>jOz5k8PUIIUvE6S|1JQ9S}}>mh(6I+~g^2MBc}PqdEvr zF9ke{hdSaLOzy0o6fpbRI}7LEiL7YJkS?fxUD;a&_7M{*AlMkE8+6P=WU3_5mom9$ zctdXS`INqqE11h=1U5YxpmL?OIm>7hD~smg>c=fHjtil8Cp|E-gm0n<;ipHM#;@OI zvB4}cvbG-TF1B_IKxYip=AdU@-B&%{^vmW5i^ACm2l*#G(qhJ0Umu3@{I;+6NA z8|H!@k_sKE?jrSlQ1PdVrDy6(ik*W=+d4sO&nf2%&`+fTD>YV6mdUHb3x>b^9fsj% z#gjb!J?H|-lZX{b{w%K8gpRWKnlQeDT zRA1nyinqu#3mG?b$0`NWGgnHNJ3D$Y~{XnPbE&fD4=Cq>kaI0UFXB_uAjBL9;=-Udl{aF_gvwgLA9GMxoje~LFVyCe0D-P2XSvJLQcYb|BgN# zX0U>jvwx=T%o#S~a_eYDz~B`a>$Yr;JK5QH+*@?tdgFuB3O+D7AlIGzHhTmE?}^xd zSAmZ@NOi>Q-*VR>x8e+yfMux%J8hh>P)wnrssQtJp~x)YV2ub)>u{%=6OdxE@L&6J zD`>qi>}fd!IZz~Xm0%uw9pLK2%1=@M%tUj_m9;|kMXfp6} zSXxHo&T%y+EppQ5XiOJzO&c-8^eqG!xq!**h?!MQ)kdsabfyo*~``mGUT=mXGmUwO4x+`ZgyH-^y~($^G^&t{7h&iT_^OVQw#qvm%qM z8J%0aGhq)s7!)?v|b^z>b48$l{ zh6M=$ceN3NVg=py*L~#6?M3^K*6#tew*{lVaN{>5Z<8ZuP8(QK6(>t0@NU{bYF3^YT1ia^?R4CY zDSEV?jb7=M{;a04-E^5pm))oN8d?uQQUM;NKH+dPLOgYtkz)H{LbGVxWvb-J3$!h^ zq&LNk5|Id$ae*6Al7PBzPIk43#!tM+!>{krQPLcd%B}Zsx1!B`j5EC&10FhcqazU0&^UPL&93v)Z)AtnS)~f>-gKxK( zTrqy4w&a-t&7zrC>Y-X>sJ=#zu*)U%z3eYv&ZaWO;t-jEV`f=v6}^v#AlnQ#Z>lh} zoZU&Ayx(I;UP}_X`Qg4A518c&?E3Jd(8#0nu)_SIUNTu=52uN-kbBVM9}jBZzcogY^vPn38qo2kn-9WY{a&W$ci!y zX>sJ-R-v+tn*>-u!Qt7_Iauzl8+@*d4yZ`h$aosEwCj?b)n!wULO&LR!W9nw4nN7u zydhKIJXg~>&r@Hb7>t&+?ZIMJisRv-)wG|%>YnBwjqy@0tYBQ9Q=93HIUd;6qucUd z^f2F?#u?qIEzT7LOm{wb*-<*Rsa5WZh(-lMSV-3M|IJM!JOo8`IWyxNGM)I-v z{g+g}k_101#8jMsM#-Fl?Uqg6L$tSo0Xcr8YZGsp?vtir2ZwiFE95nAW3%92_LT2K z@>W;7U7BkKzhCmm`=dIYk2JgU+ss7qiLOJi#>4{*Ud<&;_o-3Nr}+lP*@y>4%~B8j z1pDu^f=lE^H>A6WR>!W1+Cz;|66SNh9r(CYOGS;SN8PC&$1yX2<(h%NRN5xBy z81eaJUEnWyldiK9^%zXAtHLqj(rZE-?&uZksP0#RN%QGlU5D4|9AJV=P5O1EKL~b? zTLX$7=XuhS)Ht`MD*pyrw4??>;in}4MGl`R64M+ZQuQ61&zVur6U-4uzlDCj=OG6s zR%@|K=w?N^17=ieeoF>wa2mScMEt{`4*mcFm)z$yE)Flmw}G|9#wAefG}m@DGGJrq(%2;C+H9od`M9K3S1ID&us1p<8w_fKb#^F%!8?a^b!QzU{ zBA?RJ4HAQX7LKz13Z$IwRS3Iv)~4z{?G>48m|ti|_zQEWKXyvLrqnmY+AM|=u{7T} zf3Wb&wo-&=FYo2}m^Lq0-331lk>o5Uy`bX^exk=$FlOeD%|EOrC!`j>ux4d>;d$$( zgHRdfb)pry_zJe!!{anp9qf~qg7T$#8*$w8LHBoBh??#<{>~X*l18J=Mj;94mIopY zK}Vi~?P6x#j>cSBiOFJq-oNLDKd8jGd3k6$ZqEL}`|^pgSqLDOV^r2jr_-;gCl-KD zd~9H2O@EyuFI=*G>cI!msPQogF+cqr&zSZzdK)F2?kecZoIYGPoCTtPpDZvul`_u8O4}4G-R{{}Uy=hbTlW`*K zNe6!3PK<6#j*J=BZ|U0^^;|<|mKyG0`mgDcywf@Y>0X$mXU@Y`VTnP3{g#6+Vq8b{ zL~UB0jFPSZa#ITrmfQdQr&r4v1>EjUHlu%x@>9hZ5ccI-v&N2$8?9jGB(Zn z?Uvf4Mk72+*8%+x_s|vjfFTCc;e8SHy%*#BZQ`qJhQ5hw*~iMHfvSfxKdSeB>Sqlo z?*MIQ){cfz@bRwa$#d2Ax31vnyzLF%PDjMYLe- z2cyF2UYph(I}dnvyMKyOj~+S9<{V^FMcTeeAc}V(ajKj7?l0WONAmMw&U%AE8|x1I z(UNtM=eL5M2;E$Bn6M(?U$Jkn#&v%Y&oN2L_5G8agXWy37|2G+z0&v8X7g<>ZIZz} zZ7vd3RNAhsVddai8|rL+)*gG;`@ABDMG{`RF?=Xm7}*weFIwI)A){Wl`SWG!FDL8y z+o((n(SkF8JE1Ex<-BZ-z@nBoF`jdwUBQU!pQ?un^9>GiTbOsmb#0b(QHRCCuBX`c zXHE9$xWTDOXAjH-f3#D4+nuxRGo)8I_N|?z_V;QEFTcj#AH_#Xo$o3^d6kbJeh^&N zj>4gL_}(IK;Zr>4%k*NWN@IAja$8ciNu_5>ao)ARfDqkrkh|Yfn)f># zejh0XKUZ(*Jv$p+iw{9ZLMoT5(k`M15U=mwxcjwDUe&2OCW+bI`9!8D=Cka-P{9;w zm0uMNZ~8ZEb)&3+@uH4L{h6=6H_79&fD;Clg!h_apbGV9^BND<=6>~ojIs6iw|A1& z+ogfjL>%rs>?8A_&PSG7UCh31iP*@sxgz#Al!{gOk-z+OkI`}|XW_NEUYF--{}ny~ zkLQB(Ed7z?vZ~R-JaIPuUUA^({g z+*h7!)4MJrJ6^6lmdj+go%KBN$Yh*eEuh>Y(RCL1tB>#`i0-J);lj+1{929v7_r#n zVl2c{niYuGhoUtc=5`8HSY7k3?a<=2y}hy(h#*JR76}eDg>@uEu0m&LZ@;{mf}z8# zNDyxJC3@`WS`|gaaXUF>Xqt?j`ItB~1t>RH=J=X{W&hgC^%ovDtLZpFd7FMVru!>~ lAA$e>sOo=nUN=KMWfLOERjQbfNIQH4>FbzimulU^{0A^y2mSy6 literal 5795 zcmb_gc{G%7-@j)DBN{}O2#Hb>O2#sSiU>s_YnY0WUH08fh4w}gldWXmOO1UDitJ^Q zVXWE5GGiHI_ssA2KL0%LdCz;^^FGggf3EAg@6UI+zt?@v_d4hMeSFQ-5XK|U0{{Tb z=(7HG0051$2ZkHMW-jht*kLcz*REJzVy^(81psJ3OAF9q&o}_h27yhn-?aerU-VxW zS__TSV)HmQs7~VI=)Y~ye`}y|1T>C{CJ@jB_PpnzrWPh66L$Uj0~ePk`uZ>B<#Ad7 z4$X!Z4u{6!2<#h2pyCL7I4TuK-HVTiNC^&3b9c|Yb}cV2FaQ310vaHowFo%2Kei&3 zK;0wk?NvoY)VzDw+}zxP$M^U5Q*l~U9GXgCgYAZ`MWybsu{T&-yGKCpQE_`zwhU#?)(? zrcS*~!Y7mB&cog`rq1=X+<3c^lP%HimiJ?&?-UUHWcI9Lvs2qGVYKCu4c7E2U~3{n z*Rj|%YR&6aAYm{wOqMPupE2<~xnkO^bUx$q$nH0H=8|&xvFok%Sx@WRL_(4Fb>`VV z<$S5a9;eq^x~-)n=Sqfc>_2{2FMvvX$$O)drQ8J!rZ*{=5q=^M?kSCg*i9=tMOr`m z{G`q1e0|qIRR~`B)h_Cc$X(PY)P<(fVw;I*O_k94ys1JTJNVD`E2z=WOjGGs(Jm>i z0S|S)3||iHiF&ivyj?Dh%uAXAzYLYunkXel*KZO+yykcFWCm;*%!=0Np!}rpMO?>zbIIt_`LqGxI+KcZs89aYJ{qBi#}L! zyS->PS(?mQ)tlsTN~ATqBV@!z%LtfH;?F4jz2y(`tTp!x4kQydo1*>d+_4u`?HN~P zRmzXp)_sKYQX=Z@{!&iiuiv{zBwGOXJ~JOJBXiPL!A;>R_3#R4{d*JneHg^VMuj_X zuy@^i?S#y^W6gpa;I5o6QpvWsqG6j9PEVpwkrt@T`g&D{uCrc-x6%0XU*i+%t#Myy z2Bp$EH_=p-KPY^f0t5wrnz`@HY#vZVjYs;=a*(1nss~=S@h3b}Upx;@2s{ckqBE__#)>X?cxqDS#&%8MZ;;temwpITpS#cM zW0J(b=J4u)P-Nj&<0+t9$wB`~X<$cFbix6QYm(_vLnh2QK8(RS2Qk*OtbU9vE>}K~ zMY_=~bxjy(xojQ3&?+3pc-3P&QKkiD-0yLiSem~BD9dZ>ixWk~NagL%OalN712o5W z@LQB{c-8+DxvK1_{eKsxYl5PUgo@D0a8)om0)*611vd*w%Kr24`QWT$<_2gO10A0+ zSx;fW8YKOyY9I^)LS6?BA5-Os+MHL|qsK=t_mzL1A+5MoHFxB`LH09NP=-WQ@6-3O%Uuaj0-EcTw@K|O!sWb1qdUztbAyjZ8V?C7*od+Z+QiZ@tn z_vyK;0$Y%5j6)vW+Q_6=DuUpJd>G#L6F#a+R0|rRw$9_VtNo;l*xE z)5b6fNdfQjb$LU{kPx1+dxVAsk~+L>dFUtF53yuPQm@0v3$V=wxr*ZKQiA)yH@QcI z#)!Qvt{}MRE@_Q_aTkDWb9SCP+L1(t5=kD@e!TgFipOXzhU<12Or&BeZak(D2hRR6?lkbB2cKwl-GM(f?6bNsIH| zJ@x1u#tG6QdOQ<=S19w9olO_lpm9di>~6}br95GXlO|pKtNGixS;a(XS&b8JGTwRvz6 zzr+GNek6gb)~@roxiHPdHLl@0#nCsXZOt8d%LH>;jM-rT^WKidE0#KXtDP^nRn_he zbYZ!Tit+g+c5_}w{vPo9^&snX!M>d_IN2n$fk=}RHhxS5D#E764E?4Rll%;Km{ z(Je|))}9|J(5zPci}S2FTu@u+JybP1<|`}5+XS7|2cme^5Oc%(mDlbqT;5v%d+t+J zvr$kPV)ix_+_R8mGQq?hqI(UNG$?R&o~^*)$^8;m6gS(T7of_>0S9?MaWU-)1IORUkVzr>*hy2kZ{32g&>v;d@Q`mD-3J;}j7JssvKbc$g4%T`w zaY!Y2e9(NPi$r&azI{aMFFxEde}8YZJ*GoNFG77PZH@_5PbZZyh`B0b*`(m$j^crX zA%+%84!eI2`!Y&d#Pj>xJ|?NIYN+kZ69OF&FpY{Y5c` zT&9Fv=8A0o;Z@I`K(cWk2r=$oopF2Joo(_))*V6-9Nywqoxa1Z%sITkt!(Z8;Tl(^ z0J`A&cG%VW2Zq&VF3Gt$8K+Qa#Gm21dt*T(Akw!_z33i_2z(p9Uu6X-q(%oL66)7H zk6O^0-LOxu?gq6RZJA@4ma+TrHwNCe;i%@moAht7n|z$61v~HR`0vRNwFMhS+GAHf zsh5<22{B1OA4tTxN>om&&vFc!S3*i=Yh-I3N%WJ9Z!dUSz+F<(4i!$GCw!_r2f0)e z1K_$HP26J`i(BKn1c!xhOup*hE=L;YpxaS;51;dztjsj@&URF5FNmX*N5)9mj4!7< zoZhbVeNmpc?zH$+?(U%L+h<#fh9EvxZ;*Cm)yPA*g+K4XMkU{YhiWccGvZC<8}eke zu2}aw!>*dg84TBiLDOI#v%Agnj+cO-nAzVHe)VK}c(w9HpRDK5!^?#W+&=pTXC%Nj z8HSm1;exTRls@xMZKW@Iy=9#k4EMxt#?Oe3r89DgEFIznOoCQoIw_d0$Qej$(o5KI zm;uEEiW&!?#>MWQcUwG-xYWL}9t$$%L0BgboUvZcqf0JH?!UQ@$~rXEve+;uBYHp3 z4er}tt3$+M5;Fa@8Y3~~vhIJv=?&EVp2MpsCyQ~rV}rMP-VM1r*lGI~`kWZe5{vX2 zlOk=9Uj)2=N9wpi4$;=wc1Yy%t?^MA%_=L0XB=FQjb#kSXKzN|I|)$7pZ*oFAPSJ{Z*} zNl88v$KF7R5L&C@+NkSgq1yM#zGcMHc_W#Ol~a}pG7ii+J41r@it zPJ?dqo0ESm5c8J%!;{qIR3u$14=pxE>(*p>+Iy1 z5L9^T*dy2d+x%O1d)%=^lA~_03Cp7XN2et?MX2K7d*Xgxi+mZ<75OL$h(-!IdVNx^ z0y-CTlz0zYC3}E1psbpL1et1x|Suq9Wj4{J`Y$L)@KW>dg&V&J=Oh%DB`YBRz0A*{lr(2 zp>2MMf1Mz$VsEL4T0Sk{)2;|fF3{%;ihC+CZGs=bwr6h7M@Z4UIF2_8FCo%OwY=H` z3_xfb15Q)w%VGS5x1Y66-90$z(t><;Nz|RIM7{)5U$7G+ah6M^MNl}|_Isq_XAni9 zAXn021&)f^WAX%+pr7i(fW7F$0PtDihuV%#sC1NFY! zpwO{tz==L3#-U+(qAcvpS(S1DFTJzqt--hh5|y)NWjC7(-v=Cph$<(GWbC)8$a-K; zRtp;lJ^eMy&FNMw$tBD^EO7#Q<$Xb?ADJS`SLt0o2K3QS0hMktQj~q=#C;gaadT|D ziJ%%kzDq1wYBA)7yEw|C5(y()KG+NZcPSYmi_H=^!Ky9g{#@`!h8$K&a_P!*^^JZ+ z(!sVuIbBp~15wu34SBRI3OG~qAWUJDh?hz(DS_D>N^<&04Nxl9smn1RNLS)ZCQKg1 zkYBS-e}yVRrv}1TXqepYix|9dXzx262Uce9k)4Qs74ndxkT9h%>k?4$25yfUXng~| zB1&6*$`Wu(?$nbivt9v*Y=(Fp#{(247^wlf^}F`F325ys3XG~b2k-*k3NVr+4-2wr zzj74tHtqHob97N9fjk^JNS&ZE2XS^ia&?OPN;{uTB_C#dJJk$8KKR>} zEc5__GC=x;+hFo1*}+zh(W$@X58AjGGk<%4Cc;qW|16rG?f+lfE@Z>3-8owTSrd>V zU+87!#;)bk^j{Qix1v@@IkQu~leMO2_Gg!WzZJ;GmeqV8?{DD< z*;O5?qpZGtn7tNm3_{k_zP1f=^vnd4LnZNesXIz?wOl$N#(j@bAwaqEpN|Q7)(Ot) z^i?&6(OuN3ic{*VX?eW+N240o`4d2&!nP-E=vpq{Yx3-?2=_ zqh3}k81r)b^;H>TEAoZ>xMBhpVQU`pl@{&-BE{J>QSSw&R}kO&PY8%y6qPF7jIsq7 zYx1-3qBU&uEpyVw5piN}zTh3J5!n@}mA}8&_&Ia$ckuc#^~TUKbM{v^Acgt^uf9Q# zD;suQ$IMMniN8J&JA;fbpvQj$S~Mw-DiRVYqy))RozgaH(H$~cUAJB_`yR+t%Y?SK z47NTA$kd}>GAtq*iU6sehQ_3=3B{NeC6nS3SM7~r6i5(L7*J}Ph(x|IFGTKu9 zN3-ie`kH|*#Wu>%G6Pv0U6;Nb-;E2^ByD_HYk9rk>zBCOT@`lDe#dOdXsw&Pd2UBO zk|i+qcx>OYABL&OV>ai{j5f<~I2p9__-)%*h+m@e*`eB#7gqc*PxED;R*CZv#}(+G zX+liLO?oaf#WNI8KGmJH@di%qDp|IkC9Hp_cgg!E&!Z8;$+%svU8Ue^->Th?)!50z84nd`gBE3r} zN=KS>$cEqh?7qAE?C!Pu*Iw70narH~o_o%jOmaTwJFlNUQ6VQ`A^`w^T=kKnHUNMa z+<_#5;9BG_A70=p)=$-Sm2g#@2>|c{fFuCe0OaHVxfZ}10!T^%k~V;30$^hU*x+&$ z&Ioso9N;A<*CN+y#X0Z-|hO4kU4Tf~1X&qzx`d zNhaXZj21bdb=3vVgIp^_ORKe2s}*Z=6&n{1XNvR0iA_LZaZyn=R}uaRfNgEX&Lmt#yXpcr%&S)HKb6HXa$nqSCPq9mbO!*6&sPW7 z<62?`05<_u#fQ2+Z@03eEoV{LD+~ROx3>G7mpx`;-->AD6?kvFm=*D6ynkzgR@gq< zXv1r~bjgAL&(z1!n&CJBhn*v~8~8*>pS`>Htaf8LWr5J+1%=j5_6MqAbOxUINzKpj zq!HX`i2lD7o|Ha#C8Cbz!6)Dw*Ra^YX5-Du;ytR`gU<@l`xca0)J2CeX37+1o2KFF;%Pz*fJC>rV)?<%dR< ziY|%ccz?hNWA*->m8Z>tFz9*>B1*YG^iiQM5Z`NO`$C`desH>3i595~U-f4{z+h6z z=_X3OlL5=Qdn*lNIv2GaW5xp~*%RvUr<}Oc1&JBK%Pqa(`@3*wUJX4fXaRZs_j>DY z7yBY|7kl!k`eU=OUmtQ`ia94(jDt=Gtuy{f?=jzYVGpurR**uxm;eTiY3P{$sa3r> zu*wbLkx1X{m1ulQ2;7hJUlV|{JanOl#{BR;Li0dl>SE35l|5V!hQZ`JuVhMsR)uwRTaU@G7*9vZDpo(5@-+Wz=Cj5P zHxYCV2+ud2>;jYZ4xs!(!Q_JTDl|3urqh{27Yt=7{_&1v;s!L8$yT~j%D2#bPi09M z>(5v42B4M`e*BV885z%Z%31TzK=D!(H70})ywQj&$|>MK?%jWq|E^R5Q*;|;avwUY z%%4_V1%75?_bT%wH0eV)hp&m3(S&mGURETJlh&BL8qOXk76YB`EOT?Cf4+ZkqW|7G z6VczPM){tsbf86B)?R|L`Zgxx>-%55EZwI7D$yx@Cjn%J*eCeCyK`Goq+CtS8-_oQ zkKmT@ClqH}tFN>9n0)?yr9k6T8N7S)H=wbdN_DR`{i4Ifz6 ziB+BVbS!-9U~=El+MNK8tq#Q?7?_6|5aXO3V;wehS0GVnPB;?C{geTD8Jb99a3|dQ z&Yt1z>uV+;LqBqjm?#(EpW`Ikv4|fN>nHhDzme{eebH-IjW3?{?a2#*IJM366Q{$2 z`+mDJ`zMq-RIJnTE|o3LGI$z<)v$E zaQ~Bh8UL(=_=Cq(7u5RQLRwzoYD+pPGJ%y;m3S1};K#9NZWEmk%zhZ^D*u)&Ro4qw z49yp|WPhOylF_2wUYN*Ur-t`x_SyQTi9%jJNA7EO(`_m_QyUR@BL)x8CUPr zd6yD&YHxcu2N~~j--&ldD%q3pAyZkNEu--W4j?w|61=NWvMxrdb}?vV*+8eew#Z=o zF?jo3AkuQrT1~-bJim2MF~`(;kD4d6moD!+UC=*> z4W57Fdj>MxMwZ7%P%w<+w;peaH5~n72?z?4LCe7!Bpi58hv|sU)-jVD(}WC63k)FN zy9AOt1vD>Y;@xbT%J%p9cIzFKI$GeGi*sG)t7# zP=D^YPH!Y%Q&1!Ekrl~zD*y>`U4u%;)-}9zFr7+4C{lP$sA`p(LThvcfbXu6ZOMjG zosMRc2{jPJuh(AVxO2{3HsY-Klk7tWqKy1~^T@-BKEJ#EaoE%zC7L%by|7+U)*8Jt zEp`Xx$)VonHaSMyewNbmC!u~5BeAzwjCFqJB8Rw^Wt{whlaYxg_4q;Bc5#lg`TVVP z4-qc+Z*0cfli@Y)qW0_C^y?RJQg~(duQlF?A0pS6UCj z^fD91;=PtrHqx4j8tzG^KxQ8GV0r4bFw2(}=KE-i-$U@4f^`zQ^tOPsYqUC_>Ci$? zrc`gn3r7iK=9S-0d^bc}i8Gv+m&45Tq;+_i;Jn`Yz6RQ^-3{?onGTM5q6rzj=lgER( z;VE|_A%%E6u{NmDD!?R@?=4#_z_@S|u4&U9@gYR4N^I0#<`d0h_(h&;{dkW6D2o3$%A~M$3#ZL(f3H;R*;whWFl=1uV5Kc ziytm2%xq|J(uz81wx6vOm=K|0XR0w-&3lITF5&l>g;3-CAN@1A675J$eoVCH0dXW8 z?NkoY;|?hUlnK#!^5c+b0+WOIPb%B3>qys1Zpgw!B>(eL`DlWQ%{Q$Kf^M^o)TP$o zHl9$~?&OzcO#Oy&JBvvwZOvyfx6`|3qXh7ya!D7@FJkWyCRBllwRwLcgG6$KCqeYe zGuCv;+wZ=jE#>1Y!h~eU*;b8^mDWNc+o;l=FT1T}mTeEAa{9K7N^R+rZyG+!gf7hL zQB3Za#Yr4&uk|;O0IZagbvrWZfq0v~&x)D$sMlW3d#y?Mj5*ks)Jfxq7?!GmN@dAQ zys#aHK^c6L+qIXYLP`en1v53G4pPwS77n+X%9*Qw{MvW7S!xPruDRKhZqLoX=Wu^b z%i4a?{k4f}G9B0K6LtxrQVfO`jtH-;uBu+?1`7*EP(;4k8FbRrA|f&eh@A5~@vN!; zLP9AAQndWt1AFXOk;$j;@qI9lk#p_2;KXadMX_S#3pKlqbvCo8+TdAiv;T*@tDURwJ zZb(89EjjbYo#~HP4>QJ7uXEh(!l3gQe!GRW>A`F9ck%CwuQrI43Bsv|`a|t=!vuc2 z9C+^bX*MK$&X!5_qO4Qvx>!u_=!|a|QL{{C*T%(8jo~&qn5;QwVtGtoKwuzg_mBTx zV6LfgpMF5F-4Sbkb(jE)Y2?}VVAT>w-$F=$#OLiN{X$bij3Y*O6bgzMSTcya)$Er4 z9&=cRrg7JbhV)T>oM9d#fbX689DeDFFN5x+Mm~}3(SLNifdZL%n-FRf+83c@7BA!m z84pJ6m{^@|15zZir-n@ayFL$WmQ9qz?~Xj{9^sjOR(^J}7iDJ?)ftirZ?%f9)m@5? zA?^qD+xK<;xzr0~I;kxu42w9k;ie(V|E64ZV~e%tt#P5s#6pYf6semA%|CiKc9pvE zf35P>nk(~7|2&zr9(-2sk~H#p+sGr?;0|-MYS%5nhJp0WH>c7cjP4qRV&^NZbc0lj zadVsdZ)>%cD8_q$fEVVoTn)$PLBaap@$V6$% zvH4Zk{822B9!uCzq*^D5mg|62vDyGmNpoK*i+o&bp;gZ}b@pOsPK1=*RXKvvl$;Fp2-9nDY1X=#n?v za>LQeaWys)KB3MJm9s&m=*`XE!rCP&bu8(;F*Q->;N{&EYTMU|%r##qcle0BCp^}q zpvG9H2&CTgiM_RrOIQCB>fY4Zt*+cCPk0T zCwXgeyWSJ;X7A=?l)B>ZUOXJ^Y8Ci?je=%mB91g$_5@%Y;&r7_o zjI(#TUAc(N{Mh6qO64f80k~*rok?JBNvobt^*%O=`_Cu*e?92`zZK0;>F4I^6%8eJ zyMIM}>J1{J!kW+DPa13f;sG5e8iWpoLSsVNrkV&CplK+xVY8 zlT>O6ux}v^pc&#LS&lD?3~Yw!!j+pQh+3v5rH~pKz2{YfaL9 z%=TKY7XQz>o`)?CBy|#kPv-m^^={w5#I(BI8{-^oy?(i-CKU)7*y0dPFwpE|HfQ0W zV8G_Y9~hPM<)@R0chv8mcyn6ZC6Klja4P(;XqHhqsp|wE1mc@aSrAW1;S>z6!5x+D z>f_l%YJ}=;g8q#81Dz4Vd)tKapGg1W=AAX%4D6;__IiOP3iOU|-S`URJ1tE_P|Y#7 zd7ukOEHoXo^w-)HrbtzRJ+1>{nB%!{iz1bV!zinlP4Z#-N9ty&{B%=jaO~GI|7F@~ zDGx;q?d_KB@}HzaqjJpLQ)}dKmZ{kIn#>4O7MQ(KFnVuq0<#zBly=$dYO8!?S)#oy zQ*{>u*LZ-QdB4Sw4OBlk;k6pr%OQoa#h7l?u0F7~+WcJY6|)V+6iokj>su1}aBx&S z*01O{GOK9PZHxuMTx;+yjf`Qu@nK6y6+6a3+3_BtM=Sf9bm%mS_AfKca)xn{2dNR! zszQw57Js_!*(v@DWAIV!VaPPW0=~FjrTmXXRJ>0t2zB2Ofo3b7jgYfV6@dZWm0~ik#wj)L{VZGY(PxlyE!t6mM1wty%|v z@v?;oEt?z4Vf)gDyM1EQDtOQ}09hig|L+2!Ib_hA?l&uCAF7F zJ&?U3#B((~U1=zG5}JYib=wt>j9ugf60erDCPr)aWje`Is7d(Bx6T45ies;MG6t+C zAe(vdjc}3_L5!@eOs=)q!Mzz^tpIq4e1nwozI+5;a%(~0aZjbW9+mZfL#8G@aF{UE zjthv2>c#%HBtVE}WiOJjq)!U%Pi?L_9xVF*-e)`Hm>#UoDr-*)3pBSGsS2stT-F0V zUqdI*&pkue;12}s2`IJ>M5adONt5+=Mw!I+=e-Jg&9{`!EA^>x_jdog_VHKK0Q84r zd4ktOC%Wc+eMMNRivp;%vwY2Wm>!u+3QOUY2T9kF(Fojq5!Xs1h5?AnHL-(;fIhfw ze$xFqgkJU%zcFG!0fcsL+(4KR5y-N_bb=s?dtJG53b1O1M^k7udaH z+l6RLL-8n@gQdb*J!>u%TNIvx3dA)gdVI*jPsV-I)~NfyOFuL_vg`B0W0Vt37C*VW zICJWC(|;k~4;B`KQVhA{G0?-(h6OJXCUv0SD{UVe0~%DY8mp{hYZs-cd=Hq zccQ1Cuf4{zfPHa4#te?msORFuz!6^o{s!q;2*Wn^2adIxm+)1RIdY-2whjLU>Auqo&K5`Kf)v z>X4=i=@>$tZ(8C96`6R9!g@B1Gc9<@Xh;BJZ_E>Bt&zVOt0$uu zOWZI;>5_EptmX0S(uHOpx!B~wluKB^#Nh?R`RC1WUeA3`n2vxk@RtrFWji`aYS|`l z>0fWlkm<0JM=yykUes74jEnX&L$I{-?M5~k&KksoGp1W`wAvW0J zv9~Y1B}vl%))OqhKyU$H*)zzhvMu)WX|yJPTiHXi0yDDH@>%e0K!)?o94X(p^^%|p zR!_tg<$+(xPVV!|bbY84{vD2w7f7V|`KI!XSY+a1$s>pfHQWj><{bH#mj8+WO2K1m zMmk&FPnE(anop9*{Dsd*q~&t&3;#7%`zvLemcKrD>r}o5kIvv)5~!BnD?Rd>_&Grh z3)wKhc@Mr#ssvP3Tw&8UYPzNmc*o%^-};Dt>ofYYJYwB6>HO8|xTW0q*X|$gdxEwu zdIoU5JHsa=hLz#bbus|?7RC56B4~@hDr0cfF{}X=pJ4G+ck(xfyr21&3*ciL8 z@^|ahUVp>JrtX;&vA8xpQs$-s7@mRq!2yRqp&5fPN2C^k$^D)NM}9+F114CLi~&b zOAl_eQt>N~x5`4dCpSwT(hj(oZ`|pjdeiJ)BiW+O(?G&71x9at`4mSDqc*Jep%9^L z9sLXb3;zt01U~Ws^u7lKjylP;N>DlZq=mi)^dH|?1%&jau(MXrOwX19ql;2*KgymShq7WuTWH*pr zAS=`VvLIACVz0OHetA)F`*KTuxqtyrTv3~|(odBJtznkFwU=I$ULs zy8feZm4@Gtx#tTN^S73jw?5|S7gYfhzVBPk$NK!dqoF4Gz3Y0}AO$JF>%ipa;iRrD zee+BUBk<-+HMu8Q<8aBjPRA(vlvd`$w-1}OtIx_KSZ4nrz|y-Iv|3iPcW_wL0EG1$ zp0lL!j~%?D2a&$)K5*$%=%nzEA^snpgieM;HyGk^KuG2xLh4ZoX3>X2yYqvQ0#{C^ zu4s+LAvttfNSsYbl??7(>V2Utb_{Sq13p;~yL!cJn=hhT``ciCgxj)t zU~Y3`^OVl5F{kbC4@Tt7#W^8L*Xu)%h@Obua-He^;Du?xBGY-rsp~$WCzz~@iu9}L znvHE2ls#F)c_p96vfQvrk2>oT3J$B!98oi^eV;h!C6m{C&;R+}{37`}9?z0-3(5kY z-g;nebpuYy>CyP-a#K<;l=a5tZYSd0S?#DCP1ah*QnwmO%jP71T9-@V^;-&8wkeJ6v8YmcMq9 z6Gg7bPtx1@m)S6m`NO=%bfLtD=VE*<2SH7w27pPfmUK4t-JceeCZ8vZmzf*(&0~;QPA5kmdCMo{2^D!o zL5l7ADYT-GZ8#MNIRcnAVP|aae{{P1H7Z4+$@rNuD`H2gb;~)j8Ob{F^MMKTKXaBk zF4;m&@71!LXH01udAjGE=PS`&#A(`ly&%8HdtcLW@LiKtuj3Pa*%;pU-q~FWfe6Ik zkF}bWz8_v2Nb=*!8htdovkrHOcA~u-W6YPSaStXj$&;A^3bwNCMQ2{2)?JJSDmv%v ztH{hDE6ke5DY5bnS$@#t`qzK*4!Xp9NH8kri^x9_(;pW(PJdro#0LeCF(=Xv`e`X1 zF~Ay>P*JIE1JlD!ZsalOCigB}?`6e0Xn zGbs&zKn*PME^ys+45I8iq?+t(IWmtOJ(nS{JddC3*TbVR7Mjm-bqz?IXJ0V@_;2x# z)6~>NPpVrOPb)6QdjAy{>Rjapif&@}T8Xc%N zI>w9wp5$)GuKOD!&**C%wtaUTY2xE^?1n%Z~*_`b3LbB$XEEu;!CyZ@v56^9?mZ2itp;H|!q;MRu(7uuS)Np}eCWUfWBBXhrTR`}J= z4nDU~cB@$$xuyZVRiS@~532xBT)xt9-ajY6=XLS|nm9@E%|L28bbzu)xOW^&5Uq;; zqE}`FD-yT1Kb`PxOw+J}lV4^a3}ybbLa|_E8K6GY=2Hdg#qSw1ULLk`XG3I%jMCskdy#A*~<%!m4FvN@9o0Ux3 zHJ@*y7nw`OKnUP;G4_ZaQ2vBY16;`oQkWk&V&)h7Z#>6}4BRUDPNWj2#0DUgvK?XI z%Mcs^hV_#w>hn^-MnQ!>cCP6bthwe=J6fjW2(GfCuS*%bj`^U3n5>;Ntss zzHyHY`%(6<_M4yhB?M$fjf z!Q4zR8zeFJ(tee0Kcc7H&#R@2H0*>gwVd8X$F2}oQhSNix%|=W-aGm-_tmCSG4J;M zFAl-sWQ1Sega_))&^@?3@Dw}>T{C$udv?RA;|qCX`hiL9?p&_Mr|(k*rNcrVLRlYq zT+9J|eiG~fzfotQZ~uk+qPN4@T0mZheZwpnTc0VKY!IA zoOn`uGDMv1c(cE6m_qanCiQHEWJQG&&u7Hk3m_vN#lxNI&y2+RIzQ~uhR zKBZ}kg~iAj{gam84RBW%vt;zz-MpSHEv9+7QeTZQll_(>n>Ezw&`hl57``=E@WULN z3hL_^f%7--Wo^T&u3eAsZ|{VwzTh(`Fq9`r`hJf=&l@S1Or7btv@P zyD^}`JFUyGz+XTmU#riE?Y(Xo?_%ikLcfLhC_JyAk(OT=UR#RClhXeS80LAfb?uPM zLp{_u)h&(M{?2bQaVk*^8q51W5uYj(cQ;G#_%>6)u_Sc9c6xZ~>u}`>AmhXPwKq3J zg1?J(IzVb^c1E+qQfuvcRXJ#3!dFsR2|oWfiBzda>avDlx_d8+-F3`^Qlx5r<`v`d zxkn%?x;PazSD75zi97V&ujcQ4L+u@8;+rB1Gd;YR6hryz1Q`=`ZtjnpV;c(_^IEOP zFicUz?@zuN#Z}E-;hicnx{|^ml`z9xKh#o%M4uDRMX&_Kgn}c9Q#+z6uck{Bvp8H{ z)ID^1k9kI$QulFLL;2Iu`-1^H@24(2ktGBiGJv0lr^cgwhg$l(*e!jj$^x5Q59lNh zIc)f_U+3Bsm~J~j5V07C2hd;SXGC0@eH=@6zW!tbnaJ09{{(Q1+eHrD0UN{^#_(T| zVJs1A!KT&cy4JLan%P0cUnT+)uQ&no05=?zNR4|A%|S%pxsoEzN$47? zQS>&W)-2%h`7Lv^^F6hV=2a%-T$$D|)J|fqz=iJ7_(@1>2FpMZsq;pjK2-ei9Ax|Q z7Kx?HH67>(_fXHbVC!2?`Jg6C=@)5#H!2ny?5k<#n)S%VH`6azI_737ks5ErdJ+xQ z&LkF|L8|z*?rdJ@bm)$p+DueD-IZwE6*{Zb6~IXhI*rz8+>d2+@Zs+HoU6mXuVlX} zc|0?EIrcfOwjnB?4SXNg^J7BE0*%c|8jR--O-fksTR;WcDi|aUVeM8{!Ti%aGW|jK zY?~Ot9OO6NqZakQ-AXn_7(j-WQjUy{2OIn6zP0xXy_Niz*w@>1CHA!{K5aRK70yse zwJoehC-DVkG(C}nTA_ym>YI^+xUCF~d9sajDCng;BR2rMIP2ixYt zHnm@L9RG4f^h>pkrn97wBi16P*AAC__QKg5@4oN0ozTu3B~TCIou%W!vhU7$$Fx(R z5N}zxTjW~ezH&uE_h=fuyp#6o^6wSBND7s#p&cq@b10q}-0d)FpzZiXsYYQQ!0&!I z2Xu2shEc{v{Wqa6^P>fN92UW5Q+(?!Hs}?F^g_+@PM7UO+MpC~-kODj|86f6e%xa6 zf3o0-Ta=ygkRe^=;Y&?jaefKug~>ZHf=q^+AL>KgF-}&sE5q9h8PdbXdfpZr)J%pb z6Ylx%Xwp6m@UKtnhO-H4RZAE%nVXC3( z-TPT*T!wp^Yy*9zJ%40-UH=U3&ZAvPtKtnPg08f%<|fU{A&%&vo??-f#+N}_Pbba& zR*ESUIzH)-Ie@lS+dh$L@{Om{lf~oG(~A78bRb)$kr1utKh(z1U70#i#F)Y2l&szl z(Ep@7=^9Y^##_m-!!y%0cwzm<`HUh%mfPz32E1Q0}8C{hCi11M5N=~5H{sX_qhp@Vc# zq=OXc(xoKyKc0L3@7#0NS?Auh?##Pq&%9-3?Y-VTGtaYkl!2ZGH3cgL005xY(!6H~ z008F!0MIQmB7(;5LVbi#eKCMOR43E`fFc0k2vAf6C=!nG07rsU6I6t2MS$ZU^`DJ! z60hh;kZQ$vf=oO9EynS09**(Vjs#70wPQ8mc=<{|AYKs=??@2E_;|yXH1u)yA_zvp zc1hT$FE3}X*vo3i%jx*bX@WaJ2)au<(++t;JIE25=H37RP5Yk$?D8mZ006E7wC>%0 z=%2BbNg1?Q`!sTS0J`P+Mz%`M?fW}ny<-k zSiQP{RYmUS;Lk2jpa0k%_guh+{s<27oKdUys3}6C#G>d+!235<=X@JEt@V}KJ(&+K zPC0-y^h*_b^C@1Fc|F&p&xbsGi6=BdPdeTGaDHk&=*n2(70R51ne#wshlEP#p>SwU z^BHZ!kD&`s{|^Gku=B-tks3B!zA&@3uGX;Uwt3*obGZhO5Q7|W`JTo_w=%Ptgj(>r znljz|BWvHB$UFOOmrBd)0nLKqb0oUHa2+>a z!T4sTAFscnRQD;?rl{3#JWbgix+^ic`V}`Ek)^le)F>B+yI6?`4yVP&srs;};V#b) zh%Tv$)P$o=IM2@R;+mfvT$kM=gP>P8cGuO;PaYN0j1|2BZ8L0t=bG%|J|3YY5?-0G z#-&_t?{@{^TjGz@US1v=G{wN0-+B0eFcWbd%(QMRYbDN1?seR34r#E>%ZavL4^W1 zoY>tl0YiGLwSbv(Z`^kV@0=kqwP223TRh52ffO~WoqX}0QRRg$h^n+bUkS9CKR0w( zP@YCC`hxLhgMg6vF0d{D0!&WVIzd|yx{*b^mL`Y4CF^A0py2%FQ<~Uy8Q5CLi8U;O zLn$uO;voOhR)l{Su<`yRzcc}e*3%C&3O0Df*})Ga9nUKuM-;gC)W^cOB%j_2C0k~9 z#aEmqzH*nhE{^x2VVV_FTgtI7f)~;jW)NNM-#TY)1%?`89{1AxBgOxb`+~rowQ<9D z|2_ZzVf?RwK_XSRRZ_W5hKQhmd(CWd!Y+MNEnTzpG*FO-fP_ViI7(MpPT!liy1k~5+~tMJo}PbOsZ@S|U+Fs0w~$yZyJc+QfuWy94`8%AUal*OuZt~!i_ z`+o5KZ^Q3jAOF|5{D)x+&=l9pLZn>lQ{)`$r*AcN~r51hQhD-@HoX`b8)Fe0gZ;d_!LBWCKBQN3g}D>E48C7=*3f zlcX>2YcDAn#YA>4(%n~VxsQEr1M-YT zfnCC_51F0z=L;}~z~o~+pR^)gD-Y}DFQwWyW*fhvYK7WNYK?D=rBNx#%zTIw(k5p9 zz3h*Blgcn2AD9WAjg1{iW$zk2EzyybF5yL8!(AKflX@Ik%h_gwtodvRK?j5;6{dY= zHUYJK4IZk*y*x>}MMYNjN-Cmml*c6P#YIu33 z;DC+Ei(%rK%|Ou2#cqzIVO2Lb(I% zK-w&rQop1)b)vRAYAM?8*H%;uSkc-h?aW*UIp@*MN+;Mnb3tLlk`xna@_($R*zfs@ zYZezCWHy@W_EV4r{Y?5K=JD~%k}nQh7_B}BpjV?g#V~yvX!PKKyGk0Z0 zOU!^k-VzX%&}{nv0t?fXo0Ox4;44vwSE$uK5*(d{-Nm^ek7(jZQ8@e`THEX~+)VC~L9 zl8B@;(Ojdk)K69bPDc1NChl8h-LP(b!tt}s0P-Dt-nR%`{s+{xre4IyE7g*;dGXm$ zig}H$M2=~PUKxftxP?OH>flIKvlhSGPZtOZXm_hNCeunXA^N-4Tywn>Fq}wsuWH`7 z+5S2^Yf$3DrUcwep-K{|j7Y-{gVOg}eq)WZ0cP1KzNWFw$&C~<86o9);q*&77X9#De*(WV(K-he{x}@`Dn94Ee z3;hDpQE2LM3v4eO^K+a|`vQ7W-|dHels4N+wu9qK_km7R;UR)~^<{oB{7i!hK01N*7KxNekKW zW^6q#a6tnv6Om4B3R2GCIT9@WQW(OMNmOlqXN8S(W3w$y(mCRx{2Y0ChE{&n@W-E9 z^Xst;djs2Tf_RFKXNcQOqSW#Vu!!BaC@WG*&5~!2SVj+ctmG3!sU~{lWNohSAQl{) z^Y>KDPaa{((SasHH>`yyCp!JqJCyqm(mqo>riLkm+lgXH<||W0QeKD+UntA#p(9pZ8ldr%iO0^qRy%i zHm`jdr{S!m4dFbP~)x%Tp!QXMtLr!5X91ZqfAXy?QxxN_t)mnkfUw zdg(N61%TM@wyQW0UX)$jPQy0k%+METF_~o5G6bfnDSGpZg;}!kR$T*w}?q^)+R%T zPO{aVBH=F6f!q{w%XJWTxPJL5@>-jEwLmwGza9o;nNnV$N7@#7bIWIex9F~RQ>3wX zoy%|?a2oFzcw>$2o4u-2PjJHTsxst2gqfx4Num!1xT`y?kL7*sTIVFA1uCFWm~xj8mJyHecs&5WJ*-Y=va1Kd z25&6Q@`I%IO>`tV-TWfNcwX&xS!~?k%(2&DQo~N-eW#{YGStpuG^X9!nW~f8$le*_ zt|5mCk1f*USl;k2QiSd@stcKk&lV#0XJquVgWkyLX$_b@UBJZEh)>3iMp5(;*P4-7 z#F_DC23gugl>TfqI?Bi>6HFMS>$yJNYW4um0`O=VzcWEG8Sdvb2Sw_tUFJpI@*Fm0 z`f_k*ALG+P!ltR+PY(~^Xu49GrR22S0QG+%dON%xEU>X=z#qj(Jky$+ko?o~sbbG| zF^6%+>`@xVqstO1%%Y^2+v%@<+*|iNq&Askd$Z9tDAyI47pr|X*4}aN&6QnqYdXs~ zv749N;zY{{P*YcGSHzqv8@M~%`i1?^-FL?8SCT3GrJCsBpHrKzN0t(N}ukIS2bI_m6W$L$$Rvu{R@&CE+6P|E64yc$>-(t zLwlkiz38|HD3ETfV9eT^o1lf-4L4&d@JQ;K7E~Cp(NLbg$`FW9nvh`42C2ICo4)0| zArqi0SqH5PsVTNvPSK@*Nv_N_zx`PO<~$t6R#83zam^bkFbegH0?-DXG(1mu2Jjd# zo&M4fFdqQ-?T`LK2j$^nEdySX6TUa9$zI}ii<=_e6DX_ zW2oo|Z}m2Pe-1QlHHE!(NxbiuW705IkRTK$0W4nSe+s!DF4H2jy9H(A5g8Woko>H7 zhpOJuu5Ez4mcA)Dm<4K9^O^YqkkKVjdZ{I@TEcsF8}OX2 zw57YU-~X5FD>5my`C80yv2T4v>=U%8F-wM5egmr^)bJ3gJ8+ackeeh4&|?myAC2{+ z`wW(zf{ZE*daSzEbP=aqL$qOxiVf@0SNndEST#P$RnqRWA`_S76TU}=$mD66 zP)B`>2ILUXpcv?k`yNUSWtW0xuwBw_?O5$69lp;)`|n`lKYmC51wa0i;aS>@Z-Y|b z!eipvI}zdv+rF>LLQm~fl%oNr1pxl8A+aBx2R3~+{si-}6wCS1;VO}BpQ`d7Zvdxk zA@b5igLCE$C>82-Uuq;0Lxu<@{Di|towgp+Os7!?lAZ9CJ-46{@?MMXouF|~?bRUN zY=-%?KP1B_2!mocFuCn|2_Zcj*~#c$CPiQ=&rK+5U(n;Uc=@Z#t63wF8`oPnpRfRd zM+SXlWSHj`_iv$8MkGO?&FthWbhflrF(^P#!6Rbg)I_8I)XKl$gRvR`JHzAFg0os+ z%^XZ43e_TJT!CXuW)II%lW&%k1A|yip|gSYH3#7VYYH%1^FyNQ5?Ouv19v&%!H
naUz1o?z&L9r2l!j$Wn0xWHbHX0HZ^ zsT^Ts6t^TU_5ET7{1o83X z{V&=k0z|V#pB}2%CZCvBu0aQQ*H`bFe>S#nbNb}4{A-P_YAr(yQ*Z*LwR9+AljCFX zE78d+)#eNwBs7T#rR8$(KM)E3ln8%y(O=XQTcZTH83z`7LDgCy>i%-;yNy`_KH__yXAXXI| ze^J*Ad@k$6@tcoRsXD_vsm#?T`y=JgXz&h4N(P4p=4^0;hQB5E{{Nw8{tYSfKlJ5) zj95Uu&Um!@VChei$VI)gyIlkWaw6@YQ@;kw<;4r1Y_0E80^Ol-f)D!*^(X3KNhN*T zuK{v-Uo8$c+J{O|ej_VI`mNB}W($2c0?ZZSV*puY-${)TXi>0eB@9&(@j8s}?#T7A zcAl2Qo_FL*c(;*9k7?Q32$zDn#a=~LKl;<8fu#mZt=-oil1AGrB}w{ohHE}%7L08> z`M`3&^70MXRPYJ-4woc)BzjL!`i>Q4UemLN%;US>%#^ow`7h<{|@1D0t^T5 zm^l)_vo7z~64|Zs)S2xpv3Ic9EFQ9SU;|$E^*!{I4D69)et_34qefvw`%q>>I z9mMu%+@4SZ{AeFAA$d5-k<31UKZ^Ee)8wTVyM?WCi>?UR{U-Z#_*yarzKCBp;YBPm zo!eCqEjC6is0&Y(gG&fNUBaul3V-ukPS^0-iv-p*1jUi}QQ%98SlSflzQ6Y+b8-bM z;Vm*1vSqY#_f*KQ%+q}A%aGK0QLHUldDP~=2aRrtnyH!j&Aq6+=!O`1z5Y7a}49Qy#ThYCvN)A}rSRvUfR z1$s4{1Ox?U(7d*WMRUG^i}6K|ta8_tXNOraVv@?jjZR`|lHU~xWPC@%i!}2} z1}7#|lO+VCAEq#fEd@o6fZJAk$z764cFd?1TT#t#h4?!RuT3YK4!y9S`>K)L&r-jG z=l@N~?!Z*aP)?0_Ca83`zPs>)Kvv{LqNS5|lY#+}#S6b8jRLg?oe^vRWJcHaxPCo@ z8lq9tn1jVPJoWmjrm9hP@nYtT>2e>Z{K!t5ENvWx4h_|Al>l#du}I85-BDXm>J08W zi=iKZld)CAhX4i1NQe_e+@$QCLYn^>wwrP{Uo*Gu}VpLJz_lmc-d=CJ#(?N25pV9 zj>$VaNyPSzyT43MXBS3x-m0+}dJ_Y+F6cn&?nM7VF&((W?~Y8zLWN4EC5fUNQHXv@ z*3S;88Ef|i2wC)7(pn&omV*SX*hgqmL78 z9IZA4{hTvyF-I_(MkTR*DieFlOf-2Jo}Oy@a0zX?V_f;RpWNwiL56#MAb0WHAYrUg z+FvL1I5w71OoBAr2q@dhFE0m`=AQ+p^l@A*e*2k@Tf zrj~t+FUfD%_Uf%=v+H=QLgk~xyK~QHpGat%WlCMenqcdfz4_e)uwxcijG))K8RiJB z-Sw9fYg=`;byv6R`No1B*Bn>fxW$76gn!qSA5P%mPwZ!yQ)#Y4F&`aArss9?m}abA zRODeNT`RG%h9y4J!?_V96_$+Nc`CQbgCZjFT> z%laF_uWhXPr0yQ^YhVKgpP+s9=GLBPOW}=NLG5Okb1J_z?O-dv7VI1Jz# z4LK=zqxG&$M>=)79IH2w`H5x!&V@2~DBUa4xFR35e$%VOdt3Qa5M_WH_ji9p$#2(n zTC$xRWDq1Dwv_w28uka&|6)(Py7l`5D&*~8g!ts;C#N(=pAMn#Y1H%!Mvp7oTTCrJ z|62LA;fE2Dj^b7gpb0m}x1GGl=@6|e{Rr@ZnP3KxYwf7^(= z^GlV*K9%mY4l~GfR8gVHX$3gZwd{p_Ez1=7hz~>LB83G&$K*L$9jXdT@7Q3#taL5Ow~V=MB>UtY;`Wb zwnpYk)?u7FeX_3Ft@ORKcFTBVQ(z{rEp9fH315C9EB8hAQsf*BW}}D9MBFC*6t}{M zuvGcTQhtxJ7Na0ZUAEE$fga8ctNCNN%XyiOcwCp$c`V25he^n%Grul11^ozS2*Nbw zU5;_OdcjvA8%XL$9@^7Z;re5}&A&??`k92hl1L_TUFT9PmaJo*XRyN59n{L&YjejB zOS9R@&uP9gTBcO8H%#Q`wmk8Wn7B?}zss}m2B|{!PS2u|CPcr;XGg^Ckhy*8G1%MF z!DiYh$_I@c?a+5i&%`XXU4L>cxZN~Xn#$bp7DQ#`FPM;p&!SPsE0R}Qb;uw{EFK00 z>08E__o6PbeR{gV-zrOIB2s*#5)-P4VXL{f(UjA83!&4+wrS?d1MM+0bbaUMO)Jvf z%{JdQ?_S2mhIlO{>xmAzq^dxvsDUCVCgLumb-n}`0w3^(BBdr}!DXOC3qMxdiIlfO z-i{U2c!7yt@mHk@l<5!)@gFTyKR`(MOc7rW6e0Hah2!qKd^~@kotke6>7QgHf7dzu5gIJvR)q#jFquTd6JYF#6ei>w{YN&3 z_07G09tU%W-)g{w_oPySDiK&O#q8S=1(RyQk3K1wy%Y4=#56H7)AZc(mq;McszbK8 z^=pJc0v?bZ@aomQ*K%ZpxEy9ujjF!w6X*K^`GunG37KQXCEqlOk`8` z>2&B`q)Y#bagudN03gM$tn_>wGw(B7kv-03kUjR8N|nl*jMs08(9L_BdhY=(Y`zWQ zII-@)ys6FZ{Y8rHx3iEF4)c)6J$t*urn{6cA)lkFrQiQkrLt!S%aCjL&4o7GcbYG1 zRGToKeg=5X3g7A~vmTHrRUjFEz47nm99{uTZ8;f?Fsxtw;43Yw5Vp-@Fzq`MdJND3 ziT00iRrGA79kUL(`Ulr?$zG$OEoQc5TDY5ujG){fZTe1OSJx~PT=H>m9)7EE#nCWd z%tD^57F;`3%#Ss?q`ID=hL$B#Jwn`ltK~ha^vO+BF#Iqfy?7DAu%hU21T$g`zC4l^ zRxMVFPB!sHXHMZ}G9f_w6tB>$W8gP7+cO@sek#q^i>v0l?g|6@O=bWw(R) z#)>&dsY0V8)3?<%3N5h&tVbpLyL&Fxg%Q)FHjEs6kVm788=_jtdb#VyjA;_qFEDAE zi5U7iyct^;2`r`zO1uYgiGJr`?;T60{ls;giIrvv5_K%<=Y1k@sZcTi z&}pzA>GShicvdY0{W+zr6~}@wtqQ z7En{|8F?C|gI(`oqc}o%TCO}{L2Tm<047Fm5GmxtsfX;S21k5Rc%{a3V#GKVEDdon zfdOQFchh0R-b2}s63^=WSm&-32fC}PQzjtz%V?{cL_wQ{Zz8n1CnI$3>Jm>_E^8+M z_>l?bzvn+*_5J(eF=S z*lyXI%YY_AW~LOAx<6}Ly4 z6-g{qnpAi_^?708^M{@|M>W{b^>!PhJiF?b){B<1SCL`rGJw?2_y1Q^&R;ymKVj>W zTPPS8eyJwf48rT!uIuN%IXL~@E_+2}22}|S3Uml<494|iqLo}hXIt9=NQcT!erE#dv441kj8y9Kn~v4% z+s3$@hjz6OwnnXrY%Bt{IedhjJFkHOf9nBVk$|9P+L{ax34UGMLGo^#*#^?aUl&VAqKzRtPsa~@o^GUGoW zb^rhX{>zt)uK@sr&Td$47#q2`Z@9-E=C4{@H(`$epaTF%Kt~7AVfSeOl1)T5#QxR+ zkiX&I4^ju2ro+b5*hF;~6GQ$ZgZzgBnMOpWQISLIm-~6jrU%!6+CN8ez z$rB6@*Mk8mX^m z5s@rv8jH%7U=tf-nU`f$u=mP?y5tlB00J$)8>B7hwI=`wi(fW2ypGOUr13^kiNc(S z50=P^8-v=u;pP*jYu|4KXy<*@NI6}@m}!6alf~-26n6}gV{}*!@>uUDY1XHtQubY_0ff%EsBVKUT8gSl!QekBUsD zSGwPGQcU|b+Xcr)ueQ8O`rM&1CO3rWQhIxC)$q=0#OQ;F*qAUcmg&xBg=kW0Z2Hqn zCs>a~VxI_qIPaq8P!m)M$+7bj{>8{lN*%3DI+tO8%+Vi~ytA?|@BeS<|KX0^R?M+#(3{&=ON^ZZR z51i|WrF|ARA29i*SsOWaX0K&7JYW~GW`UqrPv&7t+>o?c(&L+NaJh2l_Y`lO&wB>1 zB(bbm3MLVGtR0_?cw^W=+{i>%k+8`f!^!B7{>!^on|eZjXe}0+ybHb_-xgEg$}os2 zb7KqMJ;)?qsddzTE)~xkfZXT2pX;fiO?yF8$R>g3vnTMDy zhdAq821bsj#$I!&4Po#v;*S`qs9l+Y=UDpbtJ3bRip7rPG}-tuT!+q`C= zeM!RE?8-=2!mGsuOeIgK(>%;#gm<5uuyb5ZWm{G<-X-kb|D&t$@YaK~UcUcFw+n&A zmN2eG=vCG9g)2V~J!b7v~ub6{xGIpsUCn`+qEbSW8r_g@lXSyJny zBA&WSKKRWC0>HulIr#u*v9|^=qV`W{Nd*ueUkXs~M|cl|d|sBpj!2dWVc~)ot`*7F-I%DDO4I>Jpen+Rl92u9s?>f zBO4TL?cwy|>oSSyC3^#PiCzta(S9q9RGPE?IjjK4e>z&J0X@;>G=LkCgmb(RR6Ma+?O%`zFPGktp1jYr%CXZ@UmWE>= z^az>~bZ!m3Ctd|ho*pF3w>|)ZdcNqx8;v=XiA}r1J_j0n*Eo@z@^4*Ex@UY)TDvm6 z!5A!GK7xI3m8JB+!2?>tL(8_lTm4;=BWoqvhjAK_q=g5Td#6Lc-mH=k*1GUl3c_zO zr>&n1%B!_~egCroJD^z&D0)7kK5qF^FZojhyGn6({`ma;E(0blmZt(^phA`LkiUom8O?D@X7?n zw@EimrTv(g&`Ba&I+Kq{NpEM|gKQ3GXH@aa$8xn~!|G_p2@Wb916TC3#{_HrlcWiK zko24Yl=!lVROX-_cqU<>;EfG7Tpen#uSrSV^5_XmH_1t%pOr1m52xX%3Df@Z(da=X zFk$&2_f`N&6csxBflt5SN=Hz*L9-w(zEE0~k=?is#FSwj46*pc)XT@`sgPPrtLKVk_1(&FprMWxT?(YPa)I17|RzfAAEa;oO`%*PzV8GnWpk5vo@$%_` zMsCi9hKI!H3YAOURV6}@%@6c3Hy3ZZsr!sTX{n}}W2W?|0twV)YQPqdH{5>s2O1h9 zDtPzHYC_?}_bv+&isc68+i|}at3YTe!P2Zx36B2cmcGeh_JQus<Nunv zwRH*nwDl~U(GW17T-l<0A2l`;1rZusBnmppIwX^A=}qS(cS>njFbn~ZT1ij(OqD*I^ia0U4YumK73BX zB7=WKS%y0UCJo<#C3E2u0Bn)P+%2Hn>Ke6n%=}@33n|^!uW}7?`qhnfhF; zQIUQ8L5fiSz**KZtEXv_+IDnWN13uP*- zwjUDU^Z&W@3*-Lvdh;Z}Am9CFS6vsWdCn_ZbSHzmDtb@|Jv$ZZK9*@ZnH*90oU@wZBqGK(fh@!k{`(N``}QSMB+kRY;sqEa?k+_ z3=HDV0qdo90Cj}*%xAc4`>!^*=L%cTF`2A^MxrTVt*?j_FYiW3L>vMo3R}(GMFyz-Fqv?Ng{-Ocw~iC znUDEByk_eNr}w#A0lnf5{ZaZuC|YStDEMvb=!&FP=)+SOs%_TMm`~wt$!;^q?gN)t zPiGRo%wPE|h)eJB*<06+==Ayf$;VW~mea!vHFwSa-Vw+Ze|1=Sw^ES+&!5;{3e#=w z`m8Af)->DTTnZE}nzt9W1PHwp9232F?$~ldMBjygz7>!WDoHTlnx16DgmXhkxpF9$ zVEvtFhi~D_3-(W!6;F4sONb7JTVn8Br-pG=hv*LP|3s9lr_yu#Z*9({9EyEV zl1`(U+}mBT2U{oGRpus>4Zta>YF;E?8?;wS`bMOy|CfaMuuo`uE^qe^XV&vaF2?WD zHVs>UumwU5S~H>nU__!J=D(ueJ^qo1*u)ak%`)kuAzGxWHDXBh3*Ld0$mq_nk*Gq)w

5J~;5DD!EF@lpktV-Jv*?2TKCR&o{7EZqE{%5ERuLUckRfrZD+}nH6 z6ES%#{6YW;JRUCEsLB zB$h*5l^*&2xdI`rIQ60Wrb1==RhnsbbAb1r$@AKWd=^U;uO!=nMtS!?F0=++LTue? zhh-|<=1{QxC!W8caIh2?;{&rFbnDspPl zWb(eD?w7ZkQdvVv_YZX69m^=>ceD#VLKo+yoJFdf2%Aq@jY@xV$l+cDBCs)4`S61%bom5*ma`6#Q&W5`Jy*11fq8Ye~O6e+CuOOX%$d=y*>uJHb zpgl>{uk$(4bR|7v6-W7nSi_xSIlgb^#h0F6<^%O zv13nW9pg*$jo{$M&5uR$vd~QLQolUI9A#ABMaWkE9xh<=7S!9jR666;Wp#o>p9y?( z=f0&FMb$uteZ$*BJF)l^f%1d;$_p=C^K5>M#2E~n^g2fofIoVM1;+&jqaamt)fBgZ zlL1zc5$*0bl48X+W*o{6-8Jt6Ptj3rkMxBOX^muf3V_qbPN|vv>a^h5$2v-0D0vvda8_kQ07Vffha!ORH~e4= z6j1@x9>79IiiiaAMvvU$4kvgvAIrrFHp?FV;|=uRS4sxV3irDt0lg1*vrXRwSULY! zqLuWk$tIb8v?#m1<sEvd2jGG^SEwZQI zW>+Z@$a9skXpXZu^-mgQeI20_DzQc55#;3w!dU})lOo%4^JKXpnr;j)21-Br9#jDG zf_X8A#VDOU&HT{{zQ>!C0K&3JGE73rCR=-~)0=?l>mEcb2uMZ!%)?hSQ6%*?SM}B1 zEfb@UYt>bkFYU6n;#kH=9fg zW;4@|0@B-;2QPjrmA`A7Y90tZSed_izh|qH54-iwJ}B{X#OSW?_ZQKQ+&3cXXLh|f z!EE@XE%a`UM1au)%@gd6zo+@9mb?uNIRbRnsLTJ zH6miF8(td|)?ldJd|Jo4a3;!A6ATv6oLKZcp}Bm!?aBa`Jxw}9SaMdiV`m*9OiQbu zy|v_NqSOC!D_>S~OjaGR(wqx6Ewpr0tK77)vJ-h~=1(%40h0N+|4kzPpO)7Qj?s6k zCbWAS@-|J+Q=ImvUc{^te$no9n;96*v_N{LYt9$?@1~cm$M%v7hUQ}*KKEqlov|K> z{TjX{nD>X&acKcUp2_&li1K~rc#`7h^4R?1J6bue(2KrQoTF<%bd$%l|FPNfSTHqx-c$8uh3dZx#g|R2jLR<~;{FBr@9kXx literal 4726 zcmd5=c{r5s*Pocl*o9EmBKtCuC1lB7j7n)J3^MX1hQZiUJ!7e4iG*x@QFex5m~1^% zzGV%e3`RwW)tpX)mJ`8?;o?{lB$ocmnYbIyYcNGo2hqg)UO zgxAK}{1OCmfX1S`aCVmD?7rz9i}_rzy==ka5Qshmf`RDkL-bQ17&7aHh4dj9eb$pQ zhDM_?f2J{HGKS1dR!~UMhooR2DPzon3l~Tv5*Y&_Gs$EolM)rxnUyt`qCduDQk$EZ zWDIjGg~?>iumsF6b|q}Aqd2kFPB;jJuj4lz=nN>i0f8JM*_fMN4$E1}^^N@c>ab;& zPwL=HAB8z+FXW!wE>qfR;j7Bi`UZcIZ2av^1@@<^b*f!o$lrQk_c5f<117FAC_MpH z3AhL!l$!&HWe3~up{GoU*#C!Od-~>><=UG4%ddBbh)`+WzL{hkgQG+;iMG;!T=+R9 zYvyhep$D|NM%UlT3ruZ2)DOgVED~-BSxQG~(W?sDT)VHF`m)kK|qjk45l_Ae}*R361*4I{gR0PyaQBW9%bDt)Fb*Aysaqf2OhR zPPDIjjf`IALs-MTr11_8D2GE0O})P+GKPjW1RTU?Hb6&TEr~eVg{Skgb+t70CmVYQ z!M`u7jb@8Otpd*lhylKAKrHSL@bChcTI4nzoCG8~zo?Cd{G|Rk2x{ga=Xi1XWl`6A zc>zz98~uCpcKy0Gl;KoT$OUBt5zrb?P>I(J>%$6mIs6y@-TM?%q9|T6_aqs;0=b_l z4vloOBH|(D-Mm0ch1{qvZ%5@>KP_=I+lq`jdKjzGiK<`+n}xk?#z4;9j= zGI}{wR_Jt$qpc3s$&4nGl7hIAsVoav*RgSaHu!@_7_nhSVvk;v;A|-Z>{ZBb?M`oA zbh+_XEDmk#%jt+SOI|J=e?yfS?Q#Y_>7h6+pUZ0bHqcyb5l30esT|UU%M3H3w3TFT zEw_&S#NL)u_PX2vQQLDY~Px%C#R6zMOa4O-$b1h8Z=~57fwnS=Mq( zjpC;6;EzE$(p>1T^SJA1!WBAv@^2Jbd)S5rZ7Kh>r|xs2G*Z)#vwU+_FsBy*&A^-i zV-)lSX777z{|l^NI|H2d!RX8pmbhOrvGsQ8^HMoB<}tOzqM`aE6a|OV%XUvl~Csq?wlOI z?UT<}=h{@1@bkr=UiNdv6xE)!`U^OFi8b_80n0eeHLs7WN%@L9=-pTEGO zml_z8#T$`EYMqR6zvNuC`%=_4^Ye3E&0~B}{eep+2zLy-Ggjwe9lCw}Bbh%mx9^x< zilAC1TUCM9#RPN!%U;VvV7@)d%UkW?^&4~IaFl|IatuTrG00|{_3}gu_G73rjS9B(W7+6-o;!E^4*~Bpa&&?H)3#u| zS%BU}P30rM09-OoOqjgi<9ok)AYJ9?^_b}H^PE^W0^ zRE@~b+9VNl%Ds27eNhcHU{b0NKG_B-!wJj2ra80)x4Nh30UoC9Zw)8ZM)Sp?4Mdpq zNp4qMoH4Wk*gOJrz-)PQ1@kDIKAJKC8IORyZ(PA};l+JPJ}{mNjLjALHjACFMYs1y zkKV1EdIVez(;U7~b_#q#qoS}L9icy(qIWVGt#_(Kc))Gg;2&)!#KX;#__#rC`Nt~# znp+N;Xh-Sh72ayO(d=v1p@qr<3Zu*fBn(>a^+Zv3H~(=1^CS zU()l>J2q-nMBDrZ9DYeS6Uot@Z_l(=3|rQ!J^4;w;U_kN5tt=%E=*aW(WS7%IOIE{ z=QQJgw?;j&VjP?J3X82>l0W%-2O=BafVONY{x@M09V`S(t86ZC@8;h`=F(<(Zi!BQM zc2!sWYfzd(SVUZ}EGqf&PN~YgM6NS-==|xOAEvWDf?OEz(Rn+Lnvb`!8D=YZN4ilB zt?}o@>}#`T{Oc<-t$Y!q$5sEDvi}~*<>N>nt=6|He)ZvK9r}xwQy1mMp~cd7a}Dl+ zov%$Rbw5!LPDfMsHFCUb@(RYl6bog?sfh?JeB@D*M&Fz*>ViOaMkeqJFgLeWKzh{*qUI z8)5k^L+G$TRKJpIeDoDhogcF|fF2pW=;u$)AtD9RZRpgjcXyIpCo1<^n_?W}>>`); zbmAPe-QhDLgz($6ojOsfg}eeVNL_ccB5p=U%7fEA?a=t^OaoZ<`7(EQBMEaj-vbfV z=);2ba8(OIFn97XdM!&zGb?+)_-02roX=1Hyc;a`MZ3quG1KAlzIfiz31>YXkBp^o zgIwCaM~g{GD!QY^<_X&Ic<0C*6z@6lYlfy6ku@XHVkwt!Ts9s(+*1{6$i7UlGnUSK z&LLaiE+loQTX{=B2_PJ-zn8JPSWAJe^h`ftbfB=29D(0%mzMZ{;C@*z8+0XHhzD;t zQSVKBr_QGK;LG=as?CUV&jRcbKYQ;+fjaW17aF$7+kAix=Z+etw|}_+YvAX6L_HTR zKG5&*7z1?+j#{{_;fQc6y3>uT2Qh|b9;=7lTASbm;U2dZH?P2fPodEv&^4?l(D2Ph zwiMQ~25-f#1Mut0p|r(z5?jLAcG^NmDlQ)YGO~BAiAR|8 z_KeTFvR}f!qobPXYa)t@nGr$D0d2FN)2BM< zPg75U%Y!ma7rL7G9%Ogt@kh0UX1~z!&X^99WL$CEd}yav&WtWK=l0?~Kl9<1&(Pzu z^hl&hrB0uREe_e^AkycB-0<-V1KcED&?H6as@N9KidbyD8z$mMRV`=-maJ5#yq=F^x5O!OWe26^xV=a2*|Fnr}_1; z;h45yUP0}HBVP5{fk|$pG)tl+j5pq5B$#l*_w@6F8%Q%j3NBl;dm-8&uEmkL(%zf? z;l0TI8T^reJ&uppPyW*UxJQ|7aNm04g%YP=VQX&4(}w-*=SJ%J=QU4KAE7h~p?QRx zuL?73w`IkO2LLly>hJ2BSWI%!eJ+lMQobY4W_V~ADoZdNG@o0s7*^Bh?p z_YC$U?DY5Xi}k<%?iOKx%0x;a_*_6hH75jG{NAw6Hg<5_Qu7!p?7yW$hX0c?^P5l< zUwH1;4`U{Ma6W`1kNsD;pRRXCNU^u~&(y33F3G#&w~exHm|l5iN2e%#$hwwOEqZ1p zGvgPd^7DF0*4fvyG%>anwk}%(ZU-Xc=((nR# z%KeJ6Ii1q-?(6azV`++TZ91_80+OE_GqL#1Y5WEKghvi_PFiv|^UGE+F9xs0=M>n@ z7rS)_za0EtOd1M)9O45bX+(4@>akYLpyrZ7_vN*mnwr`gM}T*V#==YP@8&15X9{_J|i4G+GlZLq(bH1)Rm z8_yLfv$N^sc=s3eKWx)k9?#VuJed9|MwxqQnQG}_Rwk?~9`k?LOQ7b`eyMF_vs}3A z+=PHN8h{V|UD6C7topYT_|!e$SIjIs;Wy+Q6tNR!aM6JeuYsyg-CRp{J!)EAx-Qp6 zALov4tz+&EoS*zDnpB$IB)YpWu;=;I3gPQ>{{X-NjBVhC)!oj?gna>G4}dK+jR%kU z;mfe>EA05%FPcz(=t3Z|B4L&x9A*E%Z;osmAIci5RhN1G=6C)kN} z0DyP^0CbCRHY$>(uh)sYrv5k$mC`?yf-@=m!g78f#Mn{LTN!Mq+Ddm zjU$t1+uFztP%dJvSi zna>ou*yJC(JZ!Y-`C74F(QABLzCEW>emXr(-dNJj<&3Op;Q%1w?}9D^K)pXg1xB%4 zG?x~ZJ5Osp^xxOxW&mb39FV0e=sumu)C7PqH}I|$DAA6ZrH_iqK_{P^QDg2G+p z#xkGqrH&5rnOozrKUjIoG4RbiR6}zp!me@*sG)06%{nAUK5bdwQwu!wRF*C*Q>%f-_``BD$Jw+aB4V7S^q^@v8ZZpOAVnF}xH(}E044IS0QSX2^}x{^v)bv!pR2p)KqrdBV8>fG?(!&xEZen1ox za&}q&cy0bn_DileME;nsV+f=;`(B6bAp+2~KK|XyFw%a1yyNWQ`#l--7)?QD@|!0n zC$akip2^1hc^nWReY3xvM$N4vz($@u`y}{%br)yqcr42^ciAc#2&sQvGXK|+qt=PPG61b>hvw?; zk42s_wb7`A_lR2)X`6$^ff>2_zmsezzve}mCe|Vmbn@?~j_*(1H!ksxd9-{v+iU&E zsOooVzkbz}e4`-?&EiZqp;`Zdna3~0H}7Xs2&Ex|Op}z3ab%c((xewW)ZiQNR4C22 znlQLyFV(W(_rb{ErX8sXj!0mwi7nA6He)53Qtf+C)1Bzg6<$~UXO91wx~-_OMD1_> z|4#yA2kQIX+I5@*4_fY8s>Z3$pEbO(^(-*ajbuurLuhx%K=OjT3s&?fpQ?yXA0N#v zpyRR|O!XahGSzaB4yGBpe_ACO3^U$=_^yPj7Ai*TL=Ga@5WC^3ZGCR{}rD$m51b4?OO4iQY}ZRgxqwsnTC8ejLu(P@62a?m8}K_ zg*?2131f6R}r zm-OJzp@Ozi|DEjiP(6( z$0AM(c_ED+lwIX`az8rr$lI;dlD6(l%v{dx29iF~;_!S>FiR!D#E#L48^t$ME=xGI z;8Q?w9rACR_=$FZW)E0u&CcgV)F>?;eA1EYUqxNo`ex@2RxuR^R%jKHYH#c&p zhvVv5iD_KIgEie=)b?K%zuv-BUa`NPbY(+Qnv3|d+LA`(+Uvf8^KE%gsGhEY52|Xc ze@RWLj5G?{G2#Ei6LhvP~5tw1`>uY-Iz|an*HW!&x|7`Lj{?HJl#d|H|u;?x)^DZ zZ$0j~#xhjh4icYAITF}>9>1IG_H%U=_+w*L#$`0%(1PA)1!MNC<}C{YPK^Ya^YPO_ z%Anm3m_4kZZ6|Y*2~KQn8%_;Ep4X#B8&3al?P3IZ;&DT*Rd<4ljBHkL*phQ2o@LD! z^6QGI0E=*b;%$s=lMMXYD;Q5So7>M6r7Lazs@Obr5BR<`^Ssk%*g^C-2{jZitl?#r zrDxQ_Yq@ff|9~M|9hHCmLcMKQYB$?sJaC^=+>^;#gK`?wylFtE-qx`nc;qT2OLXnIOU78YJ#YGDs65 zECra%R1^t=9Iqor7I{Tbocaf;EH|p4Oa6o;+LI*sDY2n~$rZ)|1{lJnUnVB@N~k{- zX&;V^xP*ER`RlMTJzy~kg4(KlU%AYL3APVP0Fr}I;ZF>r z$3^lU2Gp&hD)q~vEJegrW5CZTN~*%nzw7vr;IfRZIlJiCZV z?zYMu;s0t>SqoCsTnV}A{65O3yP)O$7-7qWeO}T|Srq>O&XVnyRxB6nSi~jaYnNF< zL*OLXN#$|CR8YR=*IAvYc%5n6PmJ>^M%!e6O@*N&Lb_MsF-(GG>8u>Gr!uGvKyhSk zlF!N>J`HZ1y*J?A%sG#LyVG3FhCi&@9Z_cjFNY=$D7lNM_cm@<9p!>N?u5x;4Rqa% zf)qcPtL<)Xc^>13fs;oCZDwxw5lkIOKSD5>)f_WbULq{9uKbrT4^X^qWURxtQ1HN z|A}M;Z>(FNrD#s7kwL2u`nElA zqk~~Q&C|EeS*&Ko{kOoj8ZEDGVlQudmB#S(7xa>(ta)(w0rLsx-E{iiHI+9O25hm{ zGd?{l?q;Bm8)=0EnG+`t-{=`&e>`seT)l)Y=0Ye+8n&OI+pdVvOJhl*1#6rHi*{KP zgP>3OLyh{5fCTXLG1qNUakCE`1>=i0_N_fG^`7r%3sYiEYJm4$VXp z*V4h4J9uR^sD)Hq2{1!RvaiSL3iBaTehCxf{92M;zm;&?H+Qxdm@vx{ZLk=Am}FoP zbg$4o<&|#IN9-kKb;oOE)<|O99fDlt*i&s-(*+10`kd2#nvMRj+FY@-u&WcW?u5~lPI5zzFWTXYgvJcu4+-kXhH~-;m2wGTea7JrQ;3=39zj;)FyZoe2lyi2N z=w2VwGp4|K?o)`jS*!e&4OZnNE^8&NM>gdFwPW847l*&RNBpE05(=d%U@`>SQ9E|g zGP1(zY$dY;sV^#cHpWrsvBQMmw#S$+)J0F%y{O~sMeJ`i^#kK*&RZ)cf5v-BDul;8 zxm8^bjEmv2|Gb!L#xN@b?3u5tENOG|hdN~Nt|4{Pts}rMrE)mg!%)Bup_Ub|-KqO6 zwmMDnbYFGP&_rqC(u0LB+{=r8KWcs>`G=iU>$KS3T@VxGB0dCD^8g`-r-kCBwUBYg^)gk1#NFg`d)`xY8Y9#i-3K==gbdKZ?j1#r_RBV| z{|eSS!I^j1?Oe*HVpAtjHNA(U;~WF7fh+nCgz?Q@OqOv42fzy!YWQQ+ya_(#k7u;h z&fB?f*#&N!9s?4@1c>h+EQ4v$GgZMB4EUO?#Hvfydv705?6Coey1QRRKB||+f0!}& zOeJ8h>2@LiefHIMjWiuwg{$x}1IvnJR)++WBT7Glu#Tw0mMT;E8@(!JYZZ^)mBAx* zEC5-b?*0Q&@INc@p9_B9iu5t{+`(m6onNRUbc;@HBaY7+k6C{7>rC_l)rL%ejoNR# zg0!itzuL9#)x?UPj)sx3r+!wW*H^4prh0)xWd*NX%K{?4cZBlS?3(s45U1j%2pPi{ za=R%V3{B$dF8*Sk_g7NhB=rYe*-4&=Wt2M6t>D%xXG!XTxp_*mX389`H`l?hg0{UQFwxZqi^W2wk3VUa39|o02&9 z#;E==$nM>5OkiKZaR6+qz3X*d7a$|-%1kG9)`J&+PoVr?*5yBNG5@cwGBqJr<1FA@ z%@qF(yuFci&g^K1h+hxN;R=RX?DQ9I9gq4@H_0BQchZHM@RVN&wxn<=uBv!`i~d1` zGy*q1N>4$m(4Di15D8IA^xnv(0MzBKN6HI6rRR%OsWU1!)A`wFc4VmqcJ-a#(&*qHda8H)C6o%Xq_B@lA+@bH_mO8=I-o@;an+F593Wj79&O!6IkKKRBKygmBFp|IlyOxE{d)asFR?l?(sUqK+F2^6`k7CcJjdKjAB~#; zoL=&oWF&B|hrZdao6({3aCzC~j$IT}ZtbdvqYx|X5f$WFqZ__eT1YCr`etajQx3h4 z*N-*{7vk~MK0p6>=qPa~4VcAWF)_`V^0~ZqD^(ptu43diS?xSG$89aPC`-@hOgFu| z7p^$LJ{ekDnBHk#LsLDF$d@^$Yzvw>Vm!<@;57+C81-l~cziXhnYg9ZXW~@`LBQn` z4(Wedniq82H$gCzX_~jR$@|jSK#`5Fl!P`gR$>%Hc;>i$ zJLeE19r4L|JNlZ);c1<+vtO8`O;gpFgzSyU857eMH8)$6AD4Z+*7m$=@8v+Y-@E8~gULW=78OjSX3(Z-%eNgYmJY-br|~Xo$nV-= z*nRh?=foT1syt$RczW{yUIpv4C91^wo|<>JSi>;EES3`C-AG`Y6LsDT7&RI}M;B89DtP_5AWiIHv-ob7 z=dWlJtL^U$TisSD^FTszbk}WDaKC%bbhutronE`0nUdbdx7<3qZ>+Zz?uWBKDOP^kn%iNgpRAXgxvvXe+e*#t zyU&0lxmRV$UwU|!(O0a1Np9TA+ zdQLqEAz~jGXn~W&t|ms?{vOrLkC6cvlyf8lz)8Ap7ls!VW=8D5o9i!uV8g7GTkz72 zAn&yf5=^mY$NUE7z8#jkDji{z)m&X)Q9o(p{Y3Bb3sICbT-#l4hJN>~a9>Jdw;o@g z-g;0?>Z`uP6I(N8;{?Cky`4BR!9@d6CHT`O>|DLd!^U>7xk`k~h&y5P*^R&~BWzWYW}E~! zn^7?g{9176dx$|nmqs7|5(d~3G%M~k64Z9n%NMphCLbQC$?oq~E z=mVQifx5jfd(GAz#O=X7p<~-QmBWMZXH0^G?w};tTS{0fcBg4he3GXE$Yvz91P+3r?l=ANX^>bSg$5F1>d8TM?$d*3wv|w5B=c&|AHVM@~9rJc+ zsifL5w(Q5K+48{LPyYm3=-7@Qm&TRlRDDN3=g#hqKU|2sCDZJ7VzE?~yBA;1$CUGi zbLd4+T+~gP(kpu*ja)xgQ_OTzQ-1Iw0RD!)gPL8jRXS_5F{C`#2%Mk1poPT*RxtgZ zRv3^ka=xEoyFR!3EmR@GePHA3MW}2@Dg>7e>vE(@wN}5Vn)!Oc!z9DsFk-$lwrR{BTkpWgDZ$`S z?{WV&bH)ql2*+~f3dw!;@!7_`LjlkDN_K9`qnuF1hZjYKVp}~V1HbgmD-u~6zl9k_ zY<0%=F~XeA%#6(CSop2B6V0ze7`O`r{U6M|;BFTc>6Sf|JXJctH{{!4Q;AFHE}PFq zPmE*=yrA8$nMOxs(g(fFO^xDR1Z;mFk5nW|;W1Ld8AFFUh9851a4r}*Dda5Df_BP! zy{?2T62)>49m7vw_W(f>11!uyMb)NS#z`*+-X7eJ#iqjy$<$+ZLFLe#q^(&spH)mq zF)eDP!S0Fp3Fl+L#tP=S^qZ%-8CxJHutM6Ej9)n)HX`WJo8N@nZ)J(*=KH|Mke%nX7%6nj5BeWJ)|W9owrK;9;?fp}e%^|{sg&EwoOn)f|HJU0 zRPRV1n{wRcpMyWhEv2q>;7z z-NlDgYWoffr2}{|geTQm&4^SYg*~CgnAL9kM>Lao6JtuTc02(#g8R9X*^t~?PQnI8 zKF1FG#nNnS6YDu>bw!QYC6``w*+VQUlv{(_hPH7ihA+Rmz}p6x*QGW*qr+{ff-790 z#1b{hM*~e+xPVb?T9u;9JtdwU<1hCetW}$q&$~Hqf&=lxM<&tr_H01Mr_NFad;7ow zyP#yEzWDn_5VL678m%@;UyLaoq@izH$2DwKaIZ9IZB5?4r?}tqC-sorS`VrpauZ%M z{fC(}Eg#T3#}Dp7J!FqniH9xN>*Bc4h|jN?s5%)f8ErWWrc;bEtudk_hb26yG0!w- zOVssIPrb6Qf|m)1=b1_93=H?k-BfzP{kfe!4pFr_q5QW@QFFlx6O0Rk^ZIV`GIaB4 zu8LQ=t|Id@-)&0*iA$K@M{fG-j0%>u$`DS%VvP|B9m5ynGgI3QgLXX)WnHfvq63Qz zmA>aUmHA5Xl~DWA9(&Ib=u$8qW0GMDW>*Sy8V^bYfr#J0PW{Ktb} zns1lJjdI+fPrP!+W4OC?-Q?;@?I_(lqNM=keCs0UI9Bhk!^M_1+>E2(d&z)5UPw#F zJZm1S%<2QHCxo|c9e;Lpas6s8BKg{=&u0;l_&iC~+heEY`5FWnXQd%GD2LpLyh)&4 zkQ|S&{h~Skxay&b^SYUpr zq(O45h-LUx+UBAp%6Y0~>);sMM?f__CB^3QbV>VE8V0uh0G0E@nN%7sLmrPrdh$=c zcMY(Bh2UcOKCRC_Fe0iCIM~EhAykC!^s#g^dRG|>7heU*%|I4$O^AO~x#2Y2wrem; zxhF^5I!a2!3ldj!nIKVW$%c&&;#AEmUREp@z5@X3wxwP)8SoNgM0=^j8DLrNGUOR zXOP`nqMu(%V#V^3oY`BoEYHxLi`R{Q87XQiz2Lg?=A*&==9wi*QA%G_>R=`F9EtKC zdGfnZN#iJSN!pzP9GFFHJu$a^AFy){vPx38hWi(i{x!_tW>LKSmsB5>Dh`=J?xXoB z7W@_3y=2NtyH5cq=YVr}+&&<0?u``%KKL7D!2duF1loA}FWCi=60U#xU;97eyL7f7 zyPbxGrK6kQQT&!Fj)ARlQxD#WhDGY6C-C1Lr<{Kf`133P8|h$|T7T4Up3QK&ivPO@ z93!!p##W8o0opcj#-H13dN-t;NoL3Of+@rUT5Fj~Lv(QVW9tv0?cS*861c+;tbfNZ zWcfD_86-uNX-xCawG~on+w4W4Cf(d`eI4L?EX-V5= zVOt)AcK#_kT*#?_D4vR|eOwtEZEDkRF!8n1<12*+xxY;1&1NqyYys@Kw4PU5`8uXx zhtdTQGRFJw_@)1Vl-H?%DD|3tA6JxR{Aeua8@pc9U&r&ml=4KmEd=R^GMYy-PO6%1 z0TF8dnqZhe99?ug+;Y&}I6*uCo$M3*n_TKXi#*wX0;tMbz0+pdC-|)ZEZradBH$Qj8Q$(bQ%FaeT5BuN@F5=V*3AT1y$*+h^eAUO?^B@G}VQOQvl zK$3tAQG&qo?c4hAZtcETTU+mSRabYPbNb%fbvzrzV?%99GFCDG04Q~C-?{?; zAPxXv*GS-(6327R(aVdkvHo4n%PRmV1Ar@_oCLVmUEV1J%F2MN^5u~<; zbr*?(f=S9ik}HrjbCGLoTwPsV=L*za)YV;FGzJGZqS4)HX(Q$3GfB!b7ZtkaVb*>jPNf#HFR+r+7EFER@%MM9Vx2^mDfU5JK6YTaaas~iyK(#r9Hmdj5ne`=7_<5fvpnPPGl)GFM zHrq&oTIIoJ#sWbS|3wdd;NSB=>65>Hm3%Lg-*~o%wbD%t{xlm3Yi-+nMKOGDcLq1J zJ|nTtUC#H*IiP|c%wD^%lyx~Qvef3b7Q=~=^}fm|3<-XR9?^(CJ~-Xz^M7=oBo^Q@ zQh)uY-uI(ms3$WG9S$x+bo4Mfgdgj9f5wrlbS>piy=2?myd7%?50-zL1%EoTK9X2R zTK?*d-y99f{!+s0FhKl8iS{=OLJ)fjZ=D#je`0HA-SJLOY4uic5Vqb(qaye9*tKAZ zOsoe%Jg48wFitFgNL zb~n89>*$a??C}02jZ|Oj+$mOs(=AJ3qSV4xUr8C?rPI=>)7HNTogLd${GPfHOHwKL z#CQ*y+J))`{syB6csNM+DCRU6bjB*-3Q$+>jXs&eek%NLFwi%m4Rw}JjB!eHhV z{RSScM3GVyLoqrQ8vi(QoFWj#S?~J!!~ko_{}W1U8)|@ zN%Y=!o^l!NbMg>d`!K=*x&`_7&u%Bd(MEGZcrww!G}Kib^2epYO%L()H+@>IeFwP~ zlS2;_kX=DUlrlFPgPH=t6QdcG&6qU_FG zdV{9nq=^F%Qy)4leDtkmihe4r-%@QMdDPecSw!jz(3E*qtgZh`wIFUEP+t~5YA3ca zY~Vj&vt8i!bhni(eUi-c7lEUc->C%+onAsLp4_vqPU0(2-yyRnA4m&HN-5ly?u+1E z35!KzF+?cgmE@oQv<#!Ll8VfOy2-G0?ySSs1yH4-f0g8gAgI_;4?WP^RbUn9QBUp- zhp84_Hzh;KOAcMJM{pH?ZMKc*nrqIMhTLfCKZLPiOA_-(d`Y$SEq(g>R{8HNie5Q% zs_tyMV^53yBr2WY#ITgS?@MGk{=F_$pPvI%HPzNWsvw@!%c%Cme79gnOwZjZOQ!H5 zn-mtbWTiTyY67VKMiUVPDtLB`Yxn<{594h$i?rUY!S`}>Mf_P$7@XdMP?2IayJ)NZ9+3WRd zN*}t-bVPOB_B<6K^wLi#w`_pv>mROV(U1#p0l{~A)TM6;nlE@!2fuwy2_ii^?0$a$ zS2x_P52{>1zYD*}N`g)5?T)1WB_?98&f@B&g##?l)2Z-`&9yWU1J1$lX>ijEYs;n)5w99IqgKr z%?+x;p$G`trUCnn1k+ahVolNYN}gWP!dSEon;i)hv*jTE0U< zC{Z%#s8`WcATBiZ$Fr+Q!ul+f-ncvlnQ&r>Cwvp(^~_sftX~_%(SqYv_t93 zA56bg0**@#=r4v$p@5E!%bD|zkY_%q>Q^wn;xX%a@}^f>7f39!P*L&EVwl)~87|t` z~oT^2nLZ0Z{G0+#L(-16Gt;zd!+I zOa1N7IEnmdM8|t#XtVNXU)556X=g;7^uEI*X*UWC-l13#aZl3L_f^SKt+6H%?C~HR zknLfuaL*&MzEq+jQB)7~=9<%gx3*ja#cut=#DFRSsuTseX6dkx0X0Wc^f2H_5(Yhd zg|fu-I(5O00$Z39RNfd(y7YJcB8phRP%*xN-?!Z?Di*#{khuKh1vo<*DUCgR{u#rH zRGsDwn4cQ$LqOD|Gv|{mzaBCYdyzyxr}OAZ@B677^jw3>9EOPPm&j9|rV2!oC+^b3 zNB9Nk(}L#94YIf-$%^DH_6%a?O$!Z5T5La1Au#)@9?9MuP8cn>AGuO(Z08UW?Gc&x z06;QVtmT#vZPqfm+H(Kw6Ps^0g&MXyXxKdS~X76;VKdn4dVm3s0qY56G9iH4?=)%Hw0 zzQc~lfnwPK%e(T^D}A^tF=MTq^rO{vfieo_9kT#gLuQSOQ;qZLB_2Z=i2;srBFHIJ z>}WuW(UVLaDRd2PDY=oFLk39jvG0y$=Fr>Qx^cg8^$x}e^lxSX-ctfD^1t@hfBu$3$q909 z?J|$d#Mod}0ro2iQg#(F=KDSi&a%@|nU)?g;0h5+_OW#?6|z1d0pK*qTLUF{E=S%i zwsNF=<}xem1pk8GgGM4JJR=rx?q6xPQV$tp{S1o}nj#N<%qzJx+HlY4|YhdswAz^5U5gH*sFK5j7?NmI^2Hc#QPPZxf zwZ^Tr&LYr}HqoM%zAhd1fnuvV6D!NBV9g=5;-4puY%37DW|LHZt(frQt67w5d_w`{ zpnSV21^y?T$|04PsDPad)(_ynem{3p8Bn|BD!chXhBH3VO+_;v?k0sjh$P=-6dEQX zkDHhbN9?!XNmu&_(d`HVYQU8@vc8(52}9dR?Qf31ldN9#rD>g4}1WM^?g9RW4_Wqkkn=j4IMk7 zYEL+l3R&}=Ac7_AYM_JweTH?(Co6>zfgCqNGz&S97sI)=ML{Lrqp{Oo7V_Y)H)wIC zf{=$kAtFU>K~l6R&5`;@IUXZU>P*$}HK(limwO>n8(~Q?xvpe=dSDoyi_)^hQY3P~ zMtQK+k)`hL<)Iy6b)<~%h`n@~e>KtLl<4FW%13S9*qKOEqB49jQg_oa#e-*XaT#cX z!~%oRH87KZHbyo{&vae{s&qlDve~{49Nx36&4CJs?#WWG(4Fx)srWTOz5;fD35+WRfqvcQx?s8+xHRT@<|S)t@mN^|#|Gb|Ii$2yy4g|&V2l*I8|vtv zjdK#GjD3F!!y1nlm7#JezSQOm z?ejqf-s^F~COXM!82)g4hdKKUn^y7$F5c&FzzEZ)pN70*pmss0(=O|a{0fxi;qsf~ z&e{9z`q92u)sY*mM3|}g9AbsQ9;rSBFg4oH){POv%oe#Vp-+2gW*^tX0~)qveB>?@!X;n&lq*JF zby|o2qK@BxZ!SmDr!;bT1pNa_ceE49+HtP%%Ju(!Fm+j zgmeCcp-GrSQo*>G;U){<7lCU+ZP)Q2Ea6kQt=>Dy5s3FxSH2cE*(dDQd5;GF6Nnnp zCqit(b^P-(!}ooN+PfLV=7DSUna^JP=Wn=kp}gvciJ_%rW~T`@w1Qzx;o@KI z=r$jd)FG5Lcv@YpK=%$KCx&^UydqIbOSSAUH`P_z`Zr6{l7;MF+_P3)z=*TyCe{K= z2ay{lSUXxrER}xLuT>s@soPT8`rEvIiCtQxtB8NzSia-`5Py zo0RLbf9J#38x7oMgAMuY6Lu0_ZEd<#kq#&AhN|swx@3OEL0A+AySjZvX>c--Vd(l) zc$?oFp3k5?uOt6DlRE!{!r}iN1GUln4JlXC#he-0Al+ zFX&yJorzS{qzoou5_@k|S#K{H^M;(LsqXjFJjZDeVbk$(RNvf>uFO^WZmCCw!MjF< zRKF}@uRq3GF$sH<^5NkRGXqGW?R5eTf+iN)%EN_-S>uz2J4dxpYg(AEm$8r_) zvxHiMXi!q#lt+$6;Sx3P_5manwDazd7*0z4%24@+dxd}==p#ICmGTEVs3^|_CBuxy z9if9%p!!vp~%NI8r5gk!i#MSlzaK z<Lzz@1)>-s(oEk8rCIziiD`g$viu${*&>qDFI-7;95@0rT zu>f2HRRjRet@7;iV~xVuI)L3^&m4O8>W}k4w)H($L`10xvrWD!2{YYi^g?gm-JJ3- zf386zf1C}fSCh?QUN3HyDoz-Y1p6N+%t;x4`_l{Q)jumEZdmTJY>fTRndENRa=-AH z?yovBBzv)ASmB >u)jSM>J0OGG9y#G*}y+no0zE112)u=nrCj) zvZ1g+a?g*Q-@?97c0Fc9LoX6SeqU)SbVa9)H2hZK%O*yBo_BBWEhug8eZaGXy(B2n9`VFjsN9qN{cUlg6qM|>u zdAP%a*|(&sd$}JEPYbefz6!B*SQm>_^P!Y%JH?_cG^X%LG{}QS3Pk~Y)`S3qsl&?3C4C24ZVKih{enYV$n>7Q@qoSl#DX$DHBe2hvM19 z`k#>wp7K%WWr9X2Ohd1I8pSshA(qV?Rqpv8pa#u2E0m6w`opiKC%7R+i!61;x`YV* z85)EVWrudSaZbBGEFC02tuN1ulraGH#~qc4cFG1u1+~8Eq51>X+#L$aVRy?z?f0EL zJ}lWNH+scn8G^6pFWl`URrzo(bo*#BFig!@u+)SV!GeF&+L0q%<^-xQG6#o@`G2ek z>P&7EkoV#s!_%%}-W=L{-M*c15*8McmIdP58I#zzREJ(}It%YV%+QCphUPZfi(|jP z-(|E`r=kjO>ARc!-DEY_U^(>BRczu~5oFMnVWZE7)l?S4ktVR8q?lLu(@w*crRUYa zwzd|Dv$+qUw;*q?T2A@q$b4IZ$uBFRS!%XN`p_T4FSK_ z!9|)9b=%uewqEy~|Ag2gd5qVm5QaW2ah2)>!r*N__FGjW&)V8rpKom+IB<~S=Y$nw z95>n*4e>W^I)*EF_kM)Ptc!!uE3IqK42r>Q zK16)eT>S@3UZPjeiRByB`MW(KL)znW(3p)g8*(`6A9)D2@jdls<#yy1+#sDUq+%ol z{#MN)XxNK<40&_K16+giOHhj0#ByD<2J9~%?G>E&*+Hi9JN4f-1Py+)xIs-wg$ewR z9z4O;OvCJ7l?fA)qosR)S5I~9h3~MfGt5pD9`YD{oj5i<6}Dqtq^qwX52GZtCB<)L z#aYWO{84C3{4ltey&Y6&@$zE&b{DPHdaHV^!Xv^P`5JyNeZA3(0hrxpx0_WJaLcWY zk`{hkfjpVnWAjSo*3OdnyEf)meH$u`wtg^fyVz||A2yDinEqyaC{#m*G+mR+@+q{i zBJj@AICI|>1SUe7pB≫O>P@FdYPyYd9T?E7_1@^zWPv>Jv6}?Je(p69`*mJ@rTo zqRyqPI0!nH9J4Aq2s-^+Suc=yV*@bXx)sVRHZr$(>~ki5?(=chLoMdr9iU=g(8nJ~{byY}T{}mjWG$VYzgAO( zbz3=c_>mq%IXdjje8WiY6D8*}s?nZz0IGbol$EevQ>3?iaLJ5|vgn|2=~O$w*O=BD zFXaEh;nkpSxmyTrXr_jlO?}-^cm9*qQTFUl!8uYn(eKv2fAh#(owr{I9G$*R`5|i5 zj#WUJFHP?zdV=`Mr}4YXwf9TzC`g)R1;h)hj%tbc7@eDQTPn=-qxBqJs5&s!Ej{hY+aXHx1 zs2&Ep)4=$)$58;6F@yeR&%Dcwg8=NWzKGlI>S^iUy*^3U-&-PXFyF%_^zkyN&LW;J zKMX6W#WhJtI=6qzdna${6dI=2JfC>kKtPMTna;(rA(X8pOZ6Yc?Y|%1M#QPUG~J)3 z<%tP`FPDHa5>zG$eq}M;^(o+c`6FfkD@LlpxjKJy+Id-Of?&@Fu#Azq{OTwYlzAvH zhoDXe><~9O0M{1KZvO>8_U%0mgnfpe3U&9ot9C||QhmLj7zT6w7Hf28s(5`HQuHI5qu4OF?6acl+T%QMg z)`zbY?s|uS*%>U{dm6TQTYTqP%UVh@@~)*4Hr~=EF(Y>PKKVNL6{uUxVO6kI7PtP& z>*;Ez?j=Wla2>lU2lyU-$MYeN;v62fs^WC^^M60SPa?`VDKuuI9Rj5R&9L~(%@q4J zjxF`3s{>yx#&m1id!&5j%K`wu{hTYP;=ZlND-yU{*6DZjBGWDL2w8=W1Z`?O`g#6K zACe=(Kj-$y4t_Kfc)9#`c;h)L-2+%(cXPpP*w@D)?Un1Iiy{4X``kypy2ad)*!ZU4 z5*{-%$;vd9{;)+OheJD3`0>lxUT3UJ6)h5zul!ukY8I5K=D{ zj;v5;fF&fzt3`{!6y>jom&oWpvksZJqT4O?ttQ&VgVD(n|_mn;*x~ zmDxK=+)}m$*l(`H<;(vl?uyFQQhY`1HfNq3N2Hp5|2R)2CrL<5!Xk|$OvmLkhVT|W zZrpBM|5)?wM_d7B7}ERY&N*eW+TUMV%QqGuH9QD&r7#k*)SbhfoOdzT?k4$Cp-5@L z;5!f-$!ecug~51)*^*L92Mg9FAU70SjL46Wx)b;KU>HD!Y}%0 zzlBLV|D^I>40yDCMG@G-B~nzx77A<%1*JeAvZa;ommpvi=HPTWz;!xrTz# zc^Ba31HnFP<^pZY1rA#}SI5*RhM;`*hxw~IleduB(LzY2Pv$LR3ND1YOm_FG;YaOzjAmaMi&Y$6~z$8-o6}7%RQ}5S&3y#RuudqOa zhUeQn&@x5$a=^OCv}{LJy9NwR1tflrltK>4=rYw4@B`Gm9$Rl{vs$v!{oPhIydV8~ zm2y?6b)g{OcioSY#|2^lyvX+_D)jd3Zc+0$;sm#pd{oA@gcY4@L z5^vuhRqP)3V|q?x6!?u+z6ZgT{=Ozy_t{$*#RdU|`lR$nG#!*C=TJNN9@vOskd$v6 z(oJ2w0Q-mV90o}raYV=51d#UKUhITAi{USaIej&_bjO2H@7Q!9Ky`&Q@qygV%=YSK zQ9%AbwE)+5)FoS8h_mo0Qq7BBqu=c$^~%cQ3kpAgrL8p|zkMLR$wC!{k+`^CEuAlV z^EyP#Pae#SP4r(A^L1#4f5>I#WqXU9c|w7y9VhsaFBZHWzwLTeD8nI0@3uNnO1K)`%S=;2!40w-v~>qchHt?Bn#>8DZ4ITJ&r*{)5vE*(#gEN_3L>s9DvQ;r?Y~bae{*1n z#+<i;^HtkX+>ZRr`Lj#KFw^LD#~{ zv_H0g2@-zMWOLk zwYV!Itj>?&6EX4Frz1Bq%rBQ^gW%^yq%nV#CSsHEGNLc0nnWHsGK|(-`$)YKm_jkbTchYD29)gKik=cotn^ z=t1J-?s5fbX>W8VhMlq;JIjG}H>!s#wwng6*2Bb-uhv|l8!H^KzlWzh5$hvT@ARY2 z4lwIcyEqI|Gk^9Cag#FpDdwyUF^M|`2NxWevKHA}C_G?w<^A@zLf!n{v>#$q8{MJYgxA`TgDye9Bt5}Zh;C%NAq(P2dsebZ%z|C7n z=OXV{s^g#3N?5<({?sG8^ICFhK4`$QI$f1-* zmC|C$EU&3aGgFl&V!bd!$v&S!lTe;i!&}e~`JvA)$@2bBo!%5MXxST*VnO?vLJRak zBt1p@Y;xKvz}rFS#k8qesNi({AoHF`79m9hTk!7z)yM@lSd{Gpo|##g{MkYgsR~5t zP)JN|lt$S9y`)w;#7%zaC}K`JuF8OGXg#DjEMw>io&d)_!~iH{T0OE-Pa@sH&b}%4 z@d7=336DqkVyN9;{~QJ$iqe9>L+x*h%8UxEL$-R)gqQH} zDXAZP@@iZ*kp1ai$8#|7s8^o?e|J$tzQdw2e8cib*?l?*%~L+;07YBEKQM9c%01Le zP8y`!w)9A~#n(tU7T>db0}Wyh7?dVn1m5Ne8vGo4ME+&+JJ4Vhak>A*N-QL~-ZC%_ z_hoDyo+s-!_y+#c01@=072RUUmUWvjYDkcr+1Q=3cv>B=af;7=K%;+ibh~)ayNFtWC>QTLn&_qFiYu`_J0(_WU-xYt%xc zf+Yx%@8dqPe^0=!~Ge@Cl!YeqY?<0;q;8qG#80Cj9gStKJY zL69iS(JctB6)yQv&A&#dooQ_7-1RMEN3~UqI}=tu$bmO{O>s$!3qkdIox}W7!r|ew zH$7qwiZ9}k5ua6J$?s$T-iB7^L*G(+p5MQI?K0=~Y^vnT2=s_#vO?I%&WceNwxW)^ z#Tni$W9F2qJUwq@c|BMlrn$o~*=Dn)R<{?^u zk}VNJ?5I*|=;|ohr1%ye?rUrIoplzU)lwVA7>dd9p`Dl3gLV@jg>~R~>Ke^E16hS+ z=M^Pf^ii8&YNJAkO0V+J_0PZZ!}%pVdpY4*gp!0?5qbQ~Q$%qBv3g2{t13-&vAx?{x_It@CNv?`Nb(R1t%- z6+BpD&K^ECEQ|hCq%dVeaiW|7B{aZfHNi!N_?rn(#G|B;(I^zQ*zy4C3pWec?*_fz zvOZh0rCDYuck3vJ$d3)%N7plEcG%;pGzf4F$ijOvxH@%n2AuQ3>)RPWYPX~CSHX1K z4F+3&TVTi&CbC$*W4?zdV#6kY!8<|nqvWo>8{ozOM>`h*!JV}hc{NQPd(lxZoJ(Q_s6Bwx9 zz<|=MzQ^VhZ1VBs2{AU&T?hNH#&n4o?!#BhiBzIwJ-w7V_MOVfTPU@$A+KUzr?r&h zVNl*#+Tyi$%?y!jb1u{x^ouq$_~pLJd3*cM`5mpUlG@f3h~|Z|UTWzDbF4wDF3bmP zHlD3IKvun{XA@|5g`6#;!C7YC^!jk{EEZB>n|J|wO zDQG8ZmxGCU@+gch`kS3d2jZT9K|$r+ZK*K_@x8f~a&9DN>u%rQkLDllRWUh*o=91+ z2zK0~K={JTETXKz%EHFanj%)J8dc*>$?h+?mCE*q$a{ayBowd67-+aQEWIhZ9XMhq{TzUnYFzn zD9AJsV$##3Ru)6fkpy>BZCnj7#+shGM*}L#2%KwnUw$t9fH=7AAB7EeAcF)kZUUMb zG$sA3Lbak3R?s>u{cn`0VhJW7&hvk%SuJsRsFpceF#VbT9>Eb*g5;4PwIJ>!#qSkm zyik6#zZ!Bf_Tf@-31uobE>XNDl&xLMsQSWMmE_W-fO6b&e%`#5B);bTug60ruMVlx zBtrYB?q45LZ1CgQB_kew_`gxATs!~&gSmNHVLwn_!qN;LO>Rc}m@kbF`)%nZ z5cK=sJ9iWzoo?Fy5ZC?-`%LUYzJ()&TnBScF817Fw>9RC3P(I+zlk>Z-u}lOA17}6 zI#zG!>BY6Ri6m0qw`IR1w~)2kCAod%XHeNYh2L)=Peyb|yc+nB%i63@8Nu8^85P{D1@1>{cMn-I27QhaZ#4I zGm@y4ZAxvnZ;fQakj#n^WkTZx#fUJZxh2 zMQ~YXo8R+V`+o)Y|MGx;xIPyZMi~}3u^QGAI-?@Rw$=$UO1oWGhc4sg1PgWfjLzF% zXtSTvuKF$~J5A1xC#tI=AGIFs88v3waB7`SGc8=Q+JJD4)*hKo@ot}lvj2&0N&g4B f4gAkWww=f1RB8kSnOcMr~Y-P%>iF#zq7nLH}ib4^CvPTc$ zYl$W?Bil%}tYytM@AN(I`JMOu>wW)t|9bCp?sI>x&vl*8b=}Xo&wcLeNwCJ5p*Tf2 zVK5lV{H%#B47QKSp0^MO*o^Vssa^KsV{K_~%3fhGEDT11VX-jmJs7EqZLkp*M#8ek zy&)ozNczW3s;VMYu~Ova?_pv0NU(cDtUPP$%F45~p5C-FE`7`&m2NYd`!T1EsO-|W|Wi4dSMSN>G z9FuXZgI?g18gwh*)=B;`mgzth<-=b{{vnF0>a*vpg1|=K@P8s4BOiKJtQ3$L4x`I0HEf z@@Ki|2Jrm}us|jY{3(XH9Rrr@&vEWW-t53-ew?^`)*mf)tAe>ZF->2wtKywKZ%0Pd zflY2>ojI#90^%0W)WdSSjBJ)|y`5-QV`VA1V`U|I>BjF;-~L`RAR8xw3zpOOE0_xG z%!fHSF6%?#;=7x*QOLXOIxVMYc>MAteaVj2@kD!PMKh}RF}R>2yE#1}+XeLUq~bC= z_q?h-pzX1{>bWy4Mw9dWsM;IKgYK41ucj@-|Y zOIqBngtrqlp{b5~x2DTHSLZ8HjwfBH2iE%1?fNmmK`I9{z))aFvOjN$;^y|+i}3ZE ziy>0-*j4Mp^9Xq?nkG1W$VX*@7-ueAZ0- zdkHCjhr-?-N8gS5%2C0e-<1ICEXU?|Rg1=47j;8T<%VYV+WiUDJ$7$vK zUx1Z_WG|W!n-rA2O+1L9J!`|l37+{xw^bmJE6$WAG+zi~ebd zo#P65>Jwd<^C_Qb;3wGa8U%M#Wr+Oy@V$T=l=ze5lR$&B5;lE8^VAARN|*C0pV6Ji zPw(=4B~>LSfdmk4rmb>ekeI^8j&c~BKYCc|IjVpuN~|8zm&`O?rdKXxsN7)F?q1-> z=%7F=2Q2%LiMIjuNzoHrrR|WwMuM1UK9gsT|6)q?Z`)*V1e|xL0zL+t6sRsSCy%yl?O9n5zV=uVI73ejR<+JUUgtYSWK#OaGSFHE4bdat= zF-_lnoA?UgDU&vyYefnSub3ts_Li3gDE0#L70qK3gm|JxOAeUw1XNYt5%bQ`NLYJsB+;2Uvo-iPa zHejJi!%4%4C4cXVeV3npm)b14XiAW*vr~qysJ%yqY?~^=>z}Um#NH61xSUp(bDqma zh02D>q;UL6o=(U#ft(_x1;-sq)SffpVD`X4LuiWh+OcCJfsA!2M?DN^pAckhgGPVpbHNi@?SEogx3rFYxAirBl)w*!3yGr zZVg*w_L4)F*=5Ph{wFgtI|*`(Ng))_o;fRwz_A$qOCn7KNW94=k^HE7J0zy5w{1y^ zfVl`9&}`6!l9hLK*z%YpqL95D_Fq6^!PU}CW-DA7mAZ9!Tb%3o3{tJirebW_i7h=1 z1M(j+i@9$J8FuIQBL*^NP6|-esou}zIu3@7mh??)^ab{?&19CF)MMfo8@!d_MU09#d{+hC~Qs;E*}u?*w3 zhfqo|(shy}{25ry*KTerz1qN|?1?GYyeT`3 zZXG?$RJmF_`?+6!XGElaI!tWuaLfqL`KoN(sZWs@8vJduajy-;>@SYT&wuT;9` zJ@<9>Q(at|!1T-E1zTif%5ay+JnjDStN?#$V)5qf#M@PwCn8)6~snHm7$dp zuHQ&4VL7#vmu>`mi|T^1^88#^Ims^Z4(F&DcShwY@8-Re_0#4~Lf|h(miejWVAMOE zR_D{?w_QDo?xKb{?&k2s3kPQtN>c&_8eRkGEJcK_%j{DpT^aPSk3c`5Cr>s^Eo0Vk zx$HcX!kqEvgV*=xWb1ohfxcJ(nb+hp7R%j0MY;UX36t%2fl}ivbls zc)L>buF}@ez@^G#FO$w64b!SF8FXIr%}$ZbIeA@3DVzB%ZWh_NvvpHxbnuV|CW$$> z<)BpaW=`H&g!nz$2bzjI(()4!YI*MQKzigCEe4)mDcI;KQN5SDn|k-Ez|N>ZLsIaG zmwGfC1Wu2pncbS!&C9PM(I1i$_#?BH>-Yu`-~iBNF@q-UmK+9X_l|M8J6(aX`fP_d^jbrw0*cLjH2t&kGK<_lUC%U)KJm>mf?X;ir7! z6XUmtzVSF7H2rdWm!z82HnVPZt`58r$y*>Q-nz^rop$zbw0c_;rMLc;-goQ*XqLRp zCsxcSF|5X&sG3Z)&~=TP(<`6X_j5<-gq&;=FJt{!FRv(>s9qH(kQtjr$tY{;HuvX3&769X9?~M%s0i z=4LznYABeu3!$3`CXE?~j35Yh-Yr=lxxwh1$2#S=k?WZL8M-t$q!u*3@oq^^PpmlI zq0C=_Ghp+i&jPp|=Yx=7g9p*&Get&MdvGb^0{OS=XE}6Mlct0oG z-v9Kt6hk9Lyvt?$a$h+mzva;W>;`jARPwjx!QSIhBMuQb?# zQrApw{Cxph$ofu&Wh(yI zDPElBxt5aMqt3AW_B!rPKTTrN_t*CMC}j6q=*rK82cHsDS;cFFZrg$L3vb7+bF74U zf}uTKjkbs!2}Yi;8u}(PPewf zu2F|TNgw70rF2@^prx=QSJ%QAs<<{|FR_KpDfz3g6vGRxm^Mn+3^Gb{1}!Vqp?KVtB4faZ`;|m8WAJINxdV7hSms2bipp0dxNRh zFJUWmvfK`4%ZF3W$}klBIHcN+uip1ABOBZvQF<~G9OK>;*~QJcvbVdmXZJAwMP*;c zRc=DxvAcE5I?CU1kDQ!L+=s1}DKT^MHOITf=E8Q<;wHgjn@`sY))#ovI+113M(jH$ zA~rMr%AxFzgX&Py__|1js%$3B=CRHa0Wz2~4HCCpU-{b7t>7JUXNa@MGJhd88h;eZ z%Qhs`jqq1n4x@Z=am2N?%D|fVQt5T{#l0&TkoTDuDK8lZ#>TNK?@imo*5_O`#|13l5Iq_Lq{f7qychq?j#ncvt@+e2_ zee?X0wIXYWTuh?hgPxB@VaJnt9fpe5{5Si}v*bDk3&vn-WvG$mfVu-BkzS4}m~iAe zDccvNELgI_v3$exBj_*+iwr2aKxMy(s*EA#a1HSRg8gsc35q!`GetJFP|_iavmlg(;q9Ftgy#3a#MCb+1&@419N_*K8j21 zi%@jBjEugy>maVg9oo^mwyVSn=TL=6FK746(K8;paff1c%D#79LAKm%YD7;*JSfyr zPYf@xi0=1$6*K;-`g1~*YfKtbjt;o1Wu|KhP?`nPtE_5_shHu}pHa0$AFADpGs2~c zo34X-@->!eo2Eu*s8)>K7Rg-lBtbuB{MSUHuCs_gOTEwGP;9;7&h8I^Qez9MkMalA zGZ~azYU_ib@EVJZz-F?k10EsBu^p-Ub>ST*qcCq!NlBzh1>mE++;;vPxJNOJJQrvv zG$~bcZl*9b{!e!(At$sV@>Aa~FD|&;| zb(a>ICY$i!+Ro-kBRXLZ(L3n;pfGqzlVI_7E&TrqPP2q&mu8sD`LF-{pD{PZnUoq6!T$hQ^KtJ0 literal 2725 zcmdT`X;4#H7LLtR5|k|{vLiaOD?u^FfS|G~i!3Ue7!ZQU78fwGr8`6rBa4k}f~?9S z!>T4|Xz+m$7a$@a#()MC2?`Pk2w_S3L3Q<1O?B1G)XblGRk!Xr-#xc(op-5wHBuK<35_sgJj5Cl8V3ow{W+satOjHn2Juu*%fgYLxq$=e~McW5QsE~#Kso(g*K z4OQ~fBI&uXV>^yvmlZJ1+Gpe%Z!!4;+;0o{veE{-;EkwcLs8y(m7$d~J|2IS6t^b6Q*eOt9Rt{%tM^4n8L= zE!I91mdoXD7@huLWO3c%3OC@{0CTeHdwJ-t7LxL{1RQC?V(LA0G;f^gu#5E8$EHlg zt2UIINb?Hc!ImrS%=YYk;YLbcw)dG9>ruCn=j#;@5OI4=!JFU z8a3=8-!}d-SITYp^26g|Y1i%+l90kx#)SI*cB#QDm9qideYC%)z$illqe5PG>F;?Y z^tkK!xvJIl{HE);TD9h7L02pd)D>92SzepzDK12k_n#k(-&0$h0%+2MswGm^kmFo8 zY^-wWOw?!HuKKn31>a+)SP#^z7xy+LqQepxTOCx*B(GRYhnXo3{U}LNi2)W*i~W1r zN3b3mRX6?)-unsc8MYyak(&Tp7`eUp8bpXnxwEaLr8Dp!HWdi*7gwSXZ4!0`M*?o~ zjW#p&?;rf);INKiLS?YDcw^__yK`*z*@2C&$eF&;j>fCG{`bQ!$^lG`vQWpe?JKAP9L zuX6AMQE@0J2Mi9}0n`5I<7;>AO55Jbv0M*l~ z_$g#_-$#BzUC9CF%#Nv)AtATz$;N-^A=6P`x*+2Uw+@QFcjg>^W2|X41*h4mJ5STy z_Ez#=Fi0T*mt}DIZ|lHpdbF&B+kq8@Wg2EOC*QU~#MH8>G;}g$IKLf;r!@IG(iJ;Q^O9a%cPenDR>jS!VU7n%{95^mr}eR($4g zuy?9xn#zSIf5j?+-O0YF>hC5aDm zCDnbQ4Wr)gEe3w(&ZG9Y?u=@mo~%>8x zoek1{+2F+3u+W#4LG)VP#Y5(~LOp1W#s?i$Fc zJ8&Vf|BJWqqcb6QKQSn6$7J2RFWA22^+6LYOT09$9$qzKVPCX@&vEcbZQ@+vrM<=9 zPGLUQ1%GDQ9D0<(ZqJKPZ3gJOorN!YheMp)vc`_i84b3do$^;kjH2V0}WD}`U zr(m7pfyQEwA;74HJ>#k_US283^<6+N`J9?2ysO$nA~y8maB6$o!p2U4a%w zKeXV1IuGQV!oLuJ@|O>}w0-7?FyPd3Rci*Kxu(P$r2EU~qsyI+dtNHj1*3gVYM*=v zevRqTH_PKj6@6?B)3EBBE%D~Czb18ONjd8@#$Ao}cDXbFc6om=IyMv29f`X0(|^-k Zi6r-q4lWP}G~HI(O?zu6tC~YN^6#k#?xz3% diff --git a/docs/README-unnamed-chunk-20-1.png b/docs/README-unnamed-chunk-20-1.png index 11cd2c9feab1419c0a42c68e9f6159ab9920f13d..17b517ba30273312900558920c0b476ee3ad33a8 100644 GIT binary patch literal 12160 zcmcJV2T)UAx9Cq22)&6kX(~!DQK}SC5s)fK??Did8l(jX5D-D6Sm{lTfb`HpXd!@r zNE4CX0!VKG>Gkpd-pqS*-@H5X-TUU9nKL{4?6vk@=bUwR_WrFEW1z3eKzoT6000K9 z2lpQV0Eh$t;5*ci^DB=})qkHCUIx0x>gOc@C<1^Jp!f!G!kzz81QZnkC&lyQ&6v}_ z8k}%AC*0XZ6D@IHC~#zN^CbG{@I!v+9-Y4 zIhTJ$5{yzl(4Dj;Xgxd}gg&0Oqm69i>)4!+2{&oPxdSik5*85aK&G*`|B%KyV8BodKZsOa; z=XO?uC$S(_`(j>Kfo1jVf5!cmNYzDy%~L6GX!nK*HJAA3GlP$Xz3s-XRmj8JsIiX# zWV-gI96>d`VdErP>s6_s?n^ad`tOcVc6!u^rdN)Mtopv^BcU>HgpaitnsOp=T?e_h z_ve&C8Z9rZ=Pp=ytHh5e4Ia;t39hE#{nZKTX`M{+Rp{#rReZ`zR^Ah=_pzE17%ES@ zfa-r+oy%iMHq{?wAg_WF7Vx<|N_+D*?>fQyzjf;FuFgA7YzZyu_ZQHZK_=r7*-@It zMp<4}feVl7q^m=F-akU;rJL&F3wS~b>Ltte7?BuW-trfOX_eAcgx;-n(V*h>LYG1+ zi2nMbx$0>ntvOjGJ5QWc5K(VN^gz`CJ*$fk_|B?H(lir*7(q-BWlr21^c5}11TFac z7Of@qfaWh?iG{ifx5f;O-h|59z8^e-W=!;zJv$DgB#R%=61kd9C`VYxC$gDw?si10 zwMAwdtZUX^L2HwDp(eKPf1h-yTqJ8KDSD#WrUL!-hQo?JUpsNF7tK$ThaIk+@zLRJ z3enf?o;1@mQ&Ena55=@=P;^~~%bMit4m0m&D_tfH*6J(g0n+vUwE`rM5(IwEGYQ=q z@qEQO@b!c?!SaLt6Dd=NCqjHmnam{7ZxVr1OSDvT4q6pY2sD_uYRKdVn10@4StYs@ zi#1v#MvO-Wo(nv@qhLzwuRyfleRV-sg&mL-9DjF^S%NUI!AkauQ|XE{mlF>n`Ka-a zjV#zuN1~hB+Yt9$p$EqU4puI$0qq z6o{Mk$!VXcCEEU6<^+FYk7pow^-B zUrtGoxInl_2y4>B-?tzRcly@ecD_yENMqHE`tY9)^yL;MhfDLd7~?0lzCSHN39TkJ zGEF-orOE;`5qH{;ju^7rTVoENO9_9Z{TcK{MWCxwQNwrB1Q704bsmwF33R zA4yvCHU6xdk;SUC{NKX&k5N-H7ts&-Kojg`=hA!(MZV+yX46dh z(n=f01ZM~2B2|dsnw!&(H~rPy*H||?YMDfP%;aHD(DwJ)lo5(er}nSOqBBYFUg(B~ ztu+XV(WXG))^bmYV(1!PrH|8XnI4szq8(-tx9Y~AtX@zfwL=AxG*EJGRQb;i#Tf5L zLpF(@UO&-A-i&-Q{R1SOV71tTW<~92`(p!DY0aw^-o{M;+1;npip>(&b>g4f9ZmSQ ztMQ9HZr1*_@+cD_%J$XMfw+8U%m%Guphc*Nnt9l_&yw1#XTR_XSTRz*GA%P3=qY09 z$}{e*N%eZ)Jokb%krl}DL8lf#5;C)npxWc9Cc5Mo#lro6*688^xwQix84WP`i$e@+ z!cBI&>Wdy6bT}LGg}7(FSDMh21t{)f(~EkE+@&~f(qg&`J*VwA5!@mg;u0^+B zNrk3ehpXzMNA&GsKrY*cHLK`19uL4)*VDSgah_;tln|i&oF-VOh0$)nj>sLVsaf5=Z&}d+cd8}y zE%V-oY8B8_f9S4TS|1ymvT`?TPXsI1p>3LL-ws3x7dSAGi=3aA_4}9!xr3B4P=xR9 zYX|AylPGr-GAikSvjx?k^vFmvk?Ic;_#X%ev5RUoj$O~;2@Y8VBQge@Lc>2mE`u{7guW&3h+oKFzph#NCW%{98VL!M8+weq`DB|#_GkY2g$|IC<2X&;Tw$$uRW@qOKY7Gr> zX&a6ELX!t-xn=xkTLu#4z8HUx&rXTLWQ<~snyqJQKe8#*{th!`oaKqR^xEY%JF{fZ zk*1EB@Yj@fY6FjRKx21BmDDEE3_Hh%H89o+Mn+erIwqh6!S-QKhj9;nW^^)$GLrs= zop#=9zCH6*R7a?aiu93ga4Nm_J~|K#OUZ+ZulUzOu>D1oH>cet?Lnlc&lZH%F2=hx zcLl|d_GQJRr}BPhjmz0itbU z;o`ZYL_EEk(qG_?u^~vptNYQC1FEi=>esjOuBEmzcE6p{h(`0uyZ*Q;DV`zV#goA; z*pRiIFuEc_sFH)Gw1>#ENkm zIi)e`E_iF4gOk@a%CLK#!GqP%u)dX#o+FxhbOLIh#AnKzZ_y^xW&a6Ni*jkNtTxZ6 z`vIGvENrZO$@b|g@x64S@rZ_xlr{xtT{URxH~RYx(oZ{jkXp=w!VJR^X*(jUka7WN zpWihDIv42yq?kLmjln$j#UR>wo}4IhnK0>|o7#7WHRbzei_}AU>=?%?loO^=a#P0b zn_mdxSNo$d#)D=nmJ)t$B7K@cn}Lq`q((5x1Owk-?%U%_hx$CTw7JMAdp*raA$&<9 zDw~)1wR(yMOL)B{i@QvJ+uXH6^8%u+`~q72D;u$*-^rBWgR-uuIN*O=@HCCtj$1`A z4#0%AbR+1o8$D|j=JxJ2f?^(jOB^bx>n4qGVi7j}S^c7NPOfPB%qx)O z8mCQ10alj6MzW%Pn1}G|kC|K-=IgCV&By)@D|-7+P_vN&n!mQtHg<3(qMK^{+jutt zq5;Z+iBtwB9?H6aibCuv%9CeSE^eG4}&b z)h8h|5i)3h!?wYyeI4^~E8dgmn|rf#&Z~mdxew^)sY%L@|L!fjTI2Ys6=yZD%z#ROITkwHo&bl;&;tTh|Z zd%lX=SAJph-Pwgr;fH+14Vk~9!}=*V=currfa6X*tXUM<9WQsJvD5m$SklfDRviu9X`$S~8S)8ZS|4ZKj6q{&FE}*GKeM z3W5dR$>EntudkB084o1f?%4F$GbHA`v|28kZx=C}U8Xhf_C@qR%aVn+ZC-hJgrb3e z)eHWrwJ9?tun`sPu*QtIqwsV|nwfn>e!y4{pTlRw&U51ZqY8hISZo6W=G(6Pnopvj z_wa3w_ZRIiIs**;Qbl`xbS$!cNy_&ls-KT^qmL?}uDMC|%vxMl|0eoVqi@pWaST<` z?WD!ue^wd&GecHRzsu8cvh*lBjk(AN+pgZK%-JcAQ85A1o zh{X@gIk(&87Kz$iQ{R&?Uo*vswb5Es`j|BuyiK1s0t3>Kq61pyQ!7CA_q8)XtDEZ4 zX}Z^&UrkS3noOCZ!28peS;hkQ&hubS&S*CUk*sKUc8iXt<1d7HUUr!gN8VrHdHQo~@qf7?gw6 z>~AnFHmmp>rsNu&ofFp?u)B_rsFg;Gt>7qN&vTr1U5IuSbtjP5On_AYoDMnur)l%^Ib0iBr@J#X4TJO@{Jdin$%w{toJ zXgS2mlWz}SNkEFCz|o*_H_2Kt_zjZ`F=u+Lm3rfB{Wm6iD-n7tcMiqS z$y|C1fHdxcuv``F;DoM)F;23F*)5`1 z?yhP(0{AF|NmgY7!*IG^Ez1v%_eY+Uoykq{WeuRx+Dr0MIve9m1xwE%8bSp-VO#dU zZ6!TbYxCaZ>eAWVoYcyz+YLyejGqsbB8~)?Zza2Q;2)!{Zst69B|7=%)5G|LxQMVf zJ(tM5XtU0DAZva6^|`I!@+8$MGeOlLh!djb?S!`>FxG?^gZpNr8&JqxF&9g(z!oGx zJV@EABK=XZSW>ttKQVEIVK^XW5L}~*iS{({)_2Lfr%FM7^c{bFIxYBoi>4?F4?c02 zL=QQOr6a3H+)A|8?lg-r*V;muV1e-;>%O?g^Ik0WqF*Y z^hh-}P!F@GUiIPrA_3h`2U#+Zghy{ogZ737+ch^>oKpj5b%iO0PeTWuAMimD8?%@_ zVJQCE#oD~q)ec|W-Mwz7)C4g8?`B`!w?H+z_;xL<^5W*nPjoOpe}m>@mMThE-22rV z(z^(VMi7kDbKYqmgGtMQ7|NkJF0^L040;UnXds0pBjH3pbY}MPNeW6{bp(-|21rq3 zC&)$|t#?Kb9b0V5sTh{;HNBwOO&N)vt2^k3s{58M$iDW1rcZ2FX<>8mUqUl_wx#vQ z{j0=75{hZvQ5HP7kV-OJa8=s;bP*Qb{l0zixz!uQe)zB98x=jb-20xlHzi9o+GZzB z*)hTT`tXW$3rm>bk4g(z_19Ukp|&ND%ccRN#68Gv*uyPq6hGts*w#_0>fBku>?j37 z4TgtJzk#CAtp+;B5`o1{rV^9c#kUJ=LJH>8)$ZOG#tp za-i{xuKv}-ystJ|KvOJ3_CN*MEG{7;8E}|@ApQ4udq#NAAC!QeuS}MthI}wT3z^F`NwauSIN^DNf;&_O!d%B+cxeFB<_Aqg&C`yO( zH4gve8Tth94?Yhi-`8yG2x{=_{zYK5l4OD)Tj)v^7yDM4I_i49HSl^#J){E>9%^RB zn#NaWEL|n;Eq+Beom@!AO)`-*7p{HAfaTVQ=3;;;3>7#uIIw4@>9FvRKLED=g0aMs zKbr`wO=;Km=>-HVen;`Isq-)S+E*|#Ani=DCC4|DGL`P5?+)bAO|g+Qoo9i9+cpo- zQ^^Ua#A)8E#E;)|>zr>aWsIlpWC5y*9GV8JzSHNZ@$pe`h&9DN@>MZatWwj|9xQ*y zxL-18+x1uV+_UGwFLlh@eq)%>stpY<$DFeN!Iam7jys|rs*d_Qv5>Cv21o|UN`kGg zf|c=nwbm{;V}g&=;rAdJxa|8rXi6o9noJtyM@TM1qPdkY6i9O11yYl=Hkzte7{sTH z;e)SWSV%1|>i7|M3^rb`sWs74S`ie;DTIUbhuqiyF0~ypMVIFF=N%T#?l3J6P@euh z`BHi@UvHZ&tF(7bJ?l*=UEZ#dvg{Wj&!-&Imu}XwkX9tPhg_Szq@M9>*^pGHyj~Mt zZ4C*ECVc;~u;LS(Xm;5+N}A(fFjpv)(KKt%{p+9yP#9uURZU?%pz-MkaXBx+3+u|t zmTdB!d;MIYqSY#MDC&8LXVvuYzYNzejzY2d+i7=(`YVbeaK!9TnHQ|+6$l~pV1WVQ zfgcjunHoj3ZCPpKS>UNThncCg2pv-ALbl%Yx9h_LATQ8;erxXaE%`a|-%)j;r+Yd^ zcRrmP5c-+GniS|ogQ_@9LYP^2Re{uXL;$lWR(T=unY>`P{$MthWEWRUS0{R+8M&;0 zm5n3A%xs^*7y{26=v6K3KibAfeEi9*w{4Q}ZuA0MW`NC|1EdaX@x8DUQ*M2~S_aSy z#y^e{0A7wbFdel`jwHbc0+ z_MFg^-x*o8$WJ#g(P@i6H(YHLiB4!K@t5>#w44d!-}+aEW`6yfJyS)tIi$hD)HZ~th9jS zuv0$k!Qjnu1n+_g^ymzjLeq&pL%dB-RFrcGmO2h^(&d zv{{qwY@_ZyG}BjF!5Om`leSsx;NvXgoLkJY` zGbpB<@(sL77pi)`xR4#JPX5;0$U=e?^qfy{+u0iw`x7tQn*QB)_kZ3{NdQ&K#+x?W zXf*`|GJu6tM2*O#Ca=%bv4;a2lHd$BPzft&(gtPLyum;wl%BEAP$=YuxH;3Ei$Z}e ze+dX^(uzVs3~Zg>4f2_+>aQ_*SdHfsxV+1k z9gN%GP+FTMm|~b37W0x^jQ`OCldT^&_dwQ8tcic#t%eVs|I5MxZpREY-Y9Ut$^DJ% z;mb^E!8pSGhX@0mh#P`tH)hU5Mq=zE;sd%06evC_1PmH?r`1&p)<-4OUO$4zQFSc? z$+v5>oh8#Q(+!6NvV0ewYOy5C=yjtfu3*6KmSqD!bMo02*4H_v&v_2e9^(n@_wMzC zkgu621TpZ}(jlH^UL2Y@Nh$$)-6`k%(RIOn&iT!9ipVw_-h~S=q{Yg0ePeC%lU@${ zZuw9dQt$^5N)pU-d$y$5`}Po^|66teHC`?`0#U8^M(W`&Az;@z3&l6B>CYeX#etilf`?ySJ_S}JC+aBXTqJo~ z`PTx_^gC!Xx^6awg->_VJz(AqJ&@kZ0C$Ut*}vbp!eScdIi+aVV?@n4^6B(ii~dvA zs6DFYwnH~S+_goBXKS1SJG?Kcywrp4{(hP7g34@YSW7H4zJgEv*@^LLTy9iEG23m>t)8!$Yn#!lu5jNb*sofRZ|8`51CBj1}~ijR4yip1_U zTzgkep`4?~Nz}u0v&Z97I0G`wpAfM>;tCZ1DBTTyCrnv+R*lvDr<-zgf!zGn+!K&g za^AKSMd`OhNQR94(FHRQ`+K248obH6jA@&ND`3w*?+DAKH|2k{=HakY~~+HryF z?;#m~Q?wq9hjcO;0~IEin1YQ8bnDELyYls1>x(qzbsAc%^Rzryi&nyZ6*(Ej-wdsY zY!YmUbx+vb0n*=n1$X5ZwbWOfCj}J#lM7&mmbrk=NoJ$ud9>!y)F4j~Tap{)J*cUm zEnlzKHwS0gTi$_~KELjfou5xtLKJCyFq9KyTaEjf(6cPj=dmEc{i<}mF7f)Z9^JwS zc-QV>3x_-MmAi5I-$kF_krlp5a(y<{-L4{6`#v>zh+@#iG=;QkXy;j`=p_-lM}8&l z<|-vb%ip5@huvB$RDI#zIx^*5WU+VQkUb6yC;Or2gQ7+fK#y_`EQ@Di{V)a2#Vm^u#8S zrNv@K($|T+j0b7BcL&i_0~t`b%2BXgAHjk5W4vnD& zAZL@uO*LeFv9_XW$l9B7+V*%th^70PQ!Z<2i1mxTfOg5A9^)~Ipw44yPQhzM&JL@U zLnA#dBRzxLW3{rlSxINgSLq{4Mj&Lj_JMb*|E;Z|$EKXG_PFe~pRD(|Eu%1U(tf0pF;IK8D-aCo1NWQHVsCdBLee!}K@{tPB(2R!r zaP@OlXnw}pW%yBnccv33yc3Lvy1!TVsH98jb^3cZ(gTG?b?v~#VD=-zdgPgOIm01- zu)8TxNh8ffek|JOg_*uYUq9ZJL8XxP1%2I;3N~ri+UMin^FvoL+rIVc#fo5tx38Z7 zLTNJ}(mqyFXt!3;rZh#Q`5W|pFUFx+1kEe$kv@v}?@nBU7ot9N?Xr|M8#uTs*#D}L ztN>R_sY7>X%fQFl3u-Hm8t)N$hTf#~- zSS&F+6!1RT?Yxl6F$G$!U(h0s>#B+oVc|0%T!$QJUfkuQ-WBpB&zeVFFH$M7-YlT3 zU&^Ak%S85V&b;?gS-aa=}kb?ePLGF<`xEwvu4``k`K;{zH#?~^E@$M9(IM8g&#KPt?vxInjNO1lS^9%~ z=!dHwHmEwt5&ZDkWkPVcgD9UYUsKCZjo`o;{M(*KYm9iCl}4NIYxJLrIjXZ9&?@YP zMAx-RAOT^~IeHK`6q-a~CrtxQs1w!6kaERf&=!;vdtlBaOWg)!;>)y~%K2>0_0EN@C?w>p;x{mwN z`J%-IC>IPyp!!m6CeV_UDIusBX)4_vf87L)gPivuu8o?~| z-a)%Am_SFeW^vy&TeeL{AOi0`FX*gXRbjL(T6hPgFSbC~Yi?&NN{;+if3113kP`um z&t%x`1EjuMUeGUCkCaZifZlmikx#cf-)_q1=Z0b+iwF3HaT4eG&r^#y?$_{MB9;lf zYPGDPAAML>*<3@g6_iuDeGOjtXWK&pKKpJRs<7kV#^0(c8!o`fi@1knD`ST(&}&@N z^E0GG=FIwKJG%5rou_V~>&~3i8t_ZnZXh3@K226qt!UBraTbtQnNXp@PnszRUSa|# zD*p1^8|0ZiwNQVj+`n@8Hp^xJusSA$4))zk3zCDxYfycYm)!48a0!ir9=@;Ll51`J z3SW(|MaUUI-1{m7UlJRLyd?woRtljcE&9aAXogly2L{G>o0M!o7b!Rur|kh9R(*Gd zr6*stTF=||hJ?KHv84l@eTSg7Muh1lD2rzirg%RW5Tf4GQ^N6yvwwKpa&4IYO zbaj67#x5fYgO-xV_u2oFZM3QtBOUM&K@KI|M25k4((1V?FtklO*??$EtBVOYN2p87~X@;e)gaH?9U^-(9S38-wZoux{z6 zBR}IO4Zr-;^aGewTq*;kmWOwz0WWzSTmc5`xt)k~y}t!#fos;XdeUmqr z-{By6s$*Dv3p!cP}HUD?r8}z>R<^KhSxu(=->AMd3 z&LqizQFlyWEY-xq_h%IQCtovS6#aG=f)A^mX~-ax9*WS{b6ay9pmR)9MN+r!zlWZB z?Rp50-&uPyo4)>l*JMGxP-9e8ef;Rs^+%e03P=R+Rs!QA)&Gz=`<6rHKeD((u;7~T zIiTC6LWO-jfsC%lmV?Bt_@Eh+q)Ja3t4KS(j;(2#$1&n^rXc}{hG z6;-MuQ7;y_Z=w#i3U8CfVux1`f4`gAC>4dP+15b_lQ$8?LdUyTrTp_5P8N>Vrp*lZ zN8il!Ts}alMU@JH@N%S$#zp5sqx#8r?*r)N{#41s{ZRW`#$2nrPPD{OmE*qCtLjUojL3liRud{?&?Q=t-`v>z%>sjSwksZL<+Axm{>4Q!H~4?D zT|eSKY1#!>%iIQfp>#z2+@kVkIIay{#dVuZU9u8eRlGT z{n-+e`3^HfCbrApYBBw!IRtGr5G$i*d~%)JS+>Gfq#)*wO55c zD}_gG`IOk6)rIUGk!3iS2_asVTn9RNn1>2kK@?ogN!` z3MEJP5faq*TOgsfq%%T?bc;m0XF?GZ)Bf1w(}x}+WQ6?)}|zzI(s>-IHrBI#L`$ELIMEho&fJ2Uja-hQTl}7!iiSz%VozkqI#n zg@F-Q0qBAd8i)8p1A>S|2w)PKA{qup!(eC_B8>>6(TFsTh)IMoi5Mn_#)N1QlPMCh zD3pe*EDjCBq0u-TNJRuGi8wS72NFW}D)9crTS;gMl7TiSFT-H6b*p1dLqOqK7);vD z*7A^RC}T1wA$a)Z7Hiw=eFa($r#=J=&bQV3-K$;3;&zuHd4_@bf`D=vjw3-Qo<#uC*)<_YbcyKdtW=JqMm`k0NI~=H~PM>LL z#a;>q4FRgEO48t5#<$516aQeyLll>oh*RrP{7cGAcg=3K5ws!!Qhvv@mzDZ-M$;z~ zHvZ(Fa;g4Qv@)1HJB6*8S4N>Fu_E&9cw4UfK!~(F8ZjOzUFml2U?5tWCG-@+bFnAV z+3DC_@Z|bWIxa}Z1pC_iW1iQ!^+Re4!ebZwShI;g=yI*sdO_#RZDUc*A*R6dY6VK< zb))Ya@3OholF4B*)`8B#YwZQae5;CxMJe#XeSNn$t~E-t)c`2S3{{3{HILGZJyUoLdJLN@}udz(10e$G@AS$*QcFY zfgeA^*DUC;;6veNTlb$tDq>TsOr_!1qBC%vq;R$K4MwCN@=D#)3Xd`+eiq+qkTV{` zeMmMuZR9~Fp6ZI3YlK$u;6s8xC*!_YxSMr@TVRcollu(e>AQtONk@)ES%=rpqt+>W z|J2F4{PSDiMRD(SdIloOxk%rqcI56S$I+zG^8SrecQYF-1Y$$M_l-^O9A$NBhi;C$|O+K%9zhVsx0s!iG1hnMU8??rO;zx+Q3Ki_@ip0zX4D7t3g z8(y~tlt1R>)%{d40w-Dne%XgdGj0{2&@v8JZo25Esy2B7@th0e}PfKsC?N{l)B z)VbBI9$_lJ@|^XM7)XN(%9=5PhtIDChx=NrupM~cALSujCuf6#7> z`(%Y!_!zWXLy4|ab0I}XKi^)pWWlP9QT47nfp8ZjwLH?Xtq)ag02O^9zz>N)nHr9) zqvF?sBdbE0#$rUCpHLr!Y$&LJIof}k!Z#rCgre1w(UtNB>*7t%9IH#|;7d#X(PaI6J zItxAhAO+P*ncH!)@QUqvvetphNQDNc!0ep6{T5$t^lMuNDpPZcGQQWF9gqS`xmX8G zWO+d7O>VvJ**vwdWy?TK>1>|OfIM1?%I4xO8lk$r%?Ia3a z!@K9Uq=}UE`Igt(gS>l>XAYlrb{kH+R@!zcb8lnlqU@#xtFV?f_Pff3ksj#&#)s9aPgTR7fFHg#E=4Fd)L0;6% zkvZ!N7ix8;QiwNRs81*A=f2l2ok=vIHVq0AP0kW>m@BUb&pc9~1S(T1AHHo2uS?KK zx>)9KST?pLq}Si!S^N`dYxj22` z`^bliNFoq1@&WfV3D+Y)e6-)y;S-&MUsfjQ@O66CQXh>bk9?RA{;rbo%C7{hAvfmY zd_esv!BSJO4Ni`@enNY1Puo($Ty4=>;fO4Am@?8F*N&V^H1TV>YVu`;@e9j8OTUG7 z?UTk*vK{j@;9?k+*JGxGYGs?m<(_K0nlqh6mOHvj#4jtWcd|Oz&Vwt!bpZ5>_J zuP*N?&Y>J5d7qn(34@8U&|ze)x9PAKus9Us;{ zc7@OHoVE&xPbWkW_P(1`Z63niI(poR%o_a~zm2edrq!3A%rB{4@YXMnlvYNl zd?_(91k=2)e5r7rxaj)E`*6G(Aw>#UzO2(Ni}9QM*Z@AVPfw11vd5vbn5!4pU%-2N zf@OH}A&GQglzw1SX&P-ug`OnfEA~$t|Gx>&L^2Y-t$pcw%Vzb@$JWZxvcv)p`~fHK BN#_6n diff --git a/docs/README-unnamed-chunk-21-1.png b/docs/README-unnamed-chunk-21-1.png index caad655e0cb249f25e3fccec31a811b6310f620f..a1a1c0fa68670a9a4c63416b5092be96b8425a3a 100644 GIT binary patch literal 2851 zcmdT`X;f257JeZnQ4nZt1qFpsT5$mxmktmEZrGx1-R%1+K_$khkgx~|jbdX|=oUo= z3B#yh6eKK$ojf`q3JS_1i3#B;0u3Y~5Su-D9dOQZ`iFhy%)fc()UEG+x2j&|>Oe2xfOij~qKso_P7jn{t@coMyA4EhH)9IyW&z7G*&mjOD zn8Sf#UPi{VtgII=UUW4!3aYAv={O+_OGP4>Lx6?pFsvS;CSbDZsjt-kUq-g~IS&9j zyoH8nKJ(x>0BAZKwL9P*b4S{HGXAZ-UP?%K&Zg_a7x!+Q+}z2i-YJJ+=){35r^~xo z50L|zLo=_Wt!Hnpli4r5cyGkM!=p!qdS*#)LVDx>Uqx*#xEc;TrWHI6=;{8anE1&( z%mV&UTyN%(_fu_8Fuiyk_#RWuu{56S zO(PM=yfq%~8a6-ZP-bEy)gs4^;}+u0Sn^oFNZeGFlf8tzwj}k_?%NHg->m|@T2#)S zeItP%Edq4IxE!a#wg+JZwxrR+ft>rN9o8|30thkw&(sdyxAaQF7D-&T<&jKjw6!URSsGm}<21W_;=M zZ*5s-v|$H5I6l6p!I(L#Qgzl^fE(^>jEy}UXy>K0O(Lg-@Y{N27ZMg7Rf-Z6!k!=| zn!KL{Hiz{R10x={24`sp=XNBe`CLU%wrP=FYR{c(X(0l08OX{y^nh}lomH>l2`v!I zMNBJxYnwlB2N_FGIEE7U)y@3UKLzkv?vOu1;*OJZ1pC_q!5tSC%xE#i1)QsCtk?@s zwyln-1gRZHZ&n0XxF+dlC-&pdBWmOVU~=o~X>V$TY+vGsoWflWXcFOW1D1 zV5|n8bsXXmh9|tRx18%)y_y+RJrupUe%CSj zzPseImzf0aR>=TaIPz%~a(pGbcjt8*|CmJ5O3=pvMGBfP2iM6h%H5$5ZE^mEEwfA6 zek`zH2#S+RuRlq42KL@uF5;$^P(ZFxAlz2>6`IeAg3?o5Nb6%CO?2GXxLogHO=_^_ zlLf9xE=3Z%GIUUpBiJmR_GXH z$XHIaDGMPj=G$3~?x+Linxx1P1fLiT+*|%?#`<6g$cn(;4jy;fveN3~i-w1Re3!1PJE=GsvE%Mg=GV?lZK$Kv zf2nyemhKSAe}3#j!k!ms@<|_OTdmt_Q>dv!?ZbEtBiqs&c=gHdM$k08IiC006nVdy zfT+oNx0}xw&c5V$Dux{cFe0ogPgIX;g5h0^i|Y?#d!td%t~gS4A+b6F35G|ZYvpD6 zHID)R?_3TX!oDtSC@wV4AFc8I#C11%Xd$BjjKGY zO>+?vSL;afo1lv+pGSNV5%mvhad&#E9U-7~YCi##PF<1n0;2|t%u@q1rnc4mQ||_Z zB>RVNrq#enOuJm_0geXKZEA3TpP~G2820m-!UlC67k9TiZR}IK*sATQ--3*(+;l`J z3fvR0MHlK1*-ibM74L%}Ma&N^b57vbPG#eJUK#ok#Vl&~$DdVZHzEw;!Webpu8K)} z3RMOaZ#`LDOKa0rW4uY}zS0!D5 z(;?bRUjEGU>VyZ)AwxlC=7pz{q+!&TY-NBbbX4Xz9k1Xk1EvK1mww2~pD5k8VsG5ES zXM4E@!Rifh6Jp1ODHfC^oNK)vxz*cOnP0sU``h4oq|B%$>yi1(^3$qwJhs9@FSFYg zBW#w5Ra1}SN78&G>{M);G->Ea6Fy22ilvPN*Kf`0@mJ>VI&u=fxl|P`jHDda;93`L-^n=5v3!|=ecyKv&5qsM8T5~> zp~>CK{i4m)G-f1I5vsS>He5Wo`E7N<_fy3`noz7qI%hJbCQFpbeEdIGFxL0%R(M~_ zG3&2SOu(_sClB+mBjK*JfTsant@oH42omS_;lD_` z@h3wsj!az{lr!vDzp^G83ZSmQv}&&n@~O}fF*o7^iAPHOFrSLkiw2m5Ypmnh( c{Z9hM5JmR=4SV7S79P7t4?EjEJ{bJtAE#Jqw*UYD literal 3619 zcmdT{dpMM78=q=0k&v8*gb88D%GfbvA~O=9oF!)4oH8`dQ%my7p$Iv)#$?waX>#ab z3`6!^T1!#nJPxl;au|(89!% z@F#rzvIto`|377ae}X?-n5nIuML=Z10*{@=6P7qRvHcNjp|Bw~w*AK+d07M=4>k)& zo0^1de<3eRD1=4WAneSytcQQKlXl!Q0)g1w`n7Fqzj*IFyhDnuwWSNah|lDmd&`zN z`o4;Ppsu&AinV;7+qfzuK6>L?W}C&?g`&iEC%SixJXXuF+|x$ktRwp8PJfGd15n

^e_dAS<{k~5D931qSU09f+8h5WYOrCr9 zNXS~J7ZPnTcr!(?GptFp{@75YB$*b?QEHfDa6f)oNP~9W!U53S(b{nHn<@=y21q3g zSM?T6NuXzDzMk*AWL_ENU|D>Ns|Ppi*g`0saN3_E=NY$EGZ{@W5d@_Bu-ejG$ui%ah%Pfv@>0 zo2!e`PeKg2$40#bHNM2{blBdsk$l1%U z5}*#0#WnMEGVLkA3l@A6IJO^Dk_a{Wq&jZ3CJUNMu%TMsk^a2sU9BphpG0*{54Xaf zPd7mWcJkhXAMyR#3#Ttcs&VXMzP??CIFQ_(%rMOBnE1~x4a)$LZRoa8cm{ZLdc4J`MIe5X$DD~mA&Ukj%O?L-11&ua|PyI$DWx{}+y zY~ztrdP7>J-`AB9VV9}5dTx1I(vUnT8z!*$m4GONGXlb;yd|4jNs)rTkaqMd{~Lez zrln4J0MB(NuTqr74gP`SlP%4@NQ@#FPSv76q<6Pd{~+P-i?kd1p#x_VL&}#!p@vm#{*EPD)sjQ>OJ{%RzfIx3f1jS`&P=QP{035 z{11m63uTIGC}}d@7wv66OFnEBH7EHs1@+J~FX3Ekk$7-LQjl^BfOovX3)IaQjOMaCH}}MX z23FoC2~w@7Zq}=8835c5mp=Q)vUk;?uC>`RO*1Rc#pMr`o)2?D&4S42zGT0J2a;NZd1c++&M8*v-vbHDMit(M_NV7QS%DX|3)%I zr|T}Pf8%V7Y;Se8UHRG6PR#YbHO<95?@7FBq0W4dAy{|w&sjlRA73AM`BHiQp8puq-~6CWX9V=z zoj*!5X2-b%&Fn_n>;S{0`2*4fOjl{fV#H9kAz%hHp2{9LzHE^(S)6uze}D$3^_iuM z7iQDWuV5VU^om|GwEK|KHy`hiYBbvho^<42U(IQZ$DT9>~$T2WcQ5~12 zCNPpxBL|`N@X5}z17Rxw6y>dAU5@KDJL4-L5`{ZJ76+etBA~1}{*mo)!&5YCQk~Ok zY3VImr^_04e8rHEiPe6vUt}THW!lrPg18}QJcwdr!t;7nXis|NW=Ce0GTe(?R!-3!T7w$^;{>*JJPD#2{Yjblqvclh~ zS2)SP8*-`PRResOV}mnLkXKd&MT{<2Ih2P4HN0y6Q&9rbShn4+(b7eQF9#`; z?mTro?kzWPp}<)Kk2CMEsV*yg0$|1 zJZ9ryO1ZPYQG_)0`Se133ztaF@ba6A%e{Npq3_|hI=xmRDn8XU^UCcd)nYA~y^%A* zEps;+>hmx4_0POsikA2!DubJHG4tosDQ9#W^3L0oxD8vI zHL%t2Nn?-WwkOV)IMy}4pJHZwHFWS*_L)dk^BZgw;p}T3I`y&KDo2$5>eQ|RqVW41 z#V4j-=To`q!$xteN^cdImFIps=4ilSm35h;}1~B1E zrVWj*jI;2S5Li^){KC4*Bn?_>t1{tDO{?MM;A3C0#_BOkP9`LGoIB?6FhHliYb$6)>iTx3|qn4&R@ddG@`lFQ*coWWXWm{ zG9}@vgaS@D)JFIi1EifEf_mAxrpMdB5+ru@Fkq(!YisB^Hf#Zq`m1L`_eYHlUxk(g z2khY5(xK1j1RRYpX5G105qMk*$dj#0-&5AkXG&(INoJ`kV7fDP)sGmEixiaAj`U&_ zO*E1zjAx=lsRsdf1?BCxh+vux_NVKN^q;SWvb)zRAs08%)vok zrV49fZ-bUWwim5l?CvlwjNTY8kQkhcEg~;U@Ds`4tTGZk%Oaah7n*1-#lu?!QLDe*xjESCLSy`%E3bOSND_668>1mip@tN}VmJ45)S>oy)3I+pCY=3&%>2vK r3sVn=EqynCf;~NMp!jckbO^;vC{L{}oHCC3`q;B2IapU)QGovdooc@| diff --git a/docs/README-unnamed-chunk-22-1.png b/docs/README-unnamed-chunk-22-1.png index e9b91617fb901fa9004bee46fe4e726c1078703f..ebaf0332a79b2f3f04ae8dc2d3873cfdbf9e155f 100644 GIT binary patch literal 3388 zcmdT{cT|&E7LP-ePz|6U9Rx*}q5}dUp!AZFL`6lADq<*sK!%RgATm;7071cEL8Lb& zBp_`f0-^{gC15C#J`{9M?{|OqymIfm?|pa9qb!B^ zrT9T0kPyPk%mxJ7!vsnUga<%Oc8s?H5qsYHk~ttjAUFtw2EpMVI1z-V01co92cfwD z@Bj#rf&QHVKxi}oP|%cJA{<17!-;S-5e*^|(L}~B1r4I0;S>gu0@QaYl-=Fhh={hV zECvzIAQBl2fU*mab{WK72A~99F3?@w$_EUA&)>>E00a_l=9WEeeueHJkl;0hnenAi z(n3yB@YpL!i}q93P!11zj{2&c@$C}yeex^E&{cf{Uo$XZ_44_Nn-$uUZh507`jjJ* z?MX^jRS)VwPzi8SoGT8hCX8<}u7p9vd1+$`b~68eAfIaJH>;WiO`6ev&P9vLlsAmJ zmlXvAt3x|9)~CBPd%DCR!UF%8bLZ_3Jsh6eR!O~jbv2i$#b0hSJ!N*-_xpGTEhGok zW}SQ_sB7`eP@l)UoU?7XzP3Y32~^v;sf}^;DX`@;JJ}KEHV^6R?oHT`%7(}^3;$EW zE~9nACC)Is7Ol4?)gUvK&fJ7fNs)xcljrG|RbS0rie*kbkvC8=+=NsKfV-?JMw1ec zIlmK|p}wWN?t@QV7o`aXcC;P9*VQ4CGGA~kSw{KLq0`;5%$bgxVCqMxOwyflF2(%Y zq{}X+F=D%GfFmRr=>FO-+Hq@RoJ!y+;oYQ#`LA<$sQf~Z&Nxerrc9hg;>&OK4jST4 zE^@~HYV0PI;=rahwUi{>6Ltz*&{`A4D)uh#LB30P!6O^w^1v@};&si%z_1l83}5AT zFLitK{URGW5=?#xCCMnI_>{yF?w5N)2rZ}9;ubAT{nfZjAK?D6EzAb&VO8M*j@E#x zb$(aY$d?MO#kFM3M6reeqc>dK($wGkd$@fPlfmT9s~kyY5(Cnsobj&mP&HI|fhU-E zFKx_Pb=^XMpN7k_V^yC9w*km^v+wTKgG}wD@dDomY|y{7`A*+tY3W)EiHnd&BrkfB z1#7~Z>nUF+Fx$OS=IJ@_ALg)rr;Z;Qyf-Bm)=HKZq7~t=Z|Fbb)5kx( z&G$GI7fTS-({js{(mrbv;^Zbd^Y(7KNKZ_0M{wZJJO-bIY3bwS+`30(oWYTAkz`rC z%CvHgb3wrz>$GNf>X9pW-C;anL;P%ogSWGT(htqNC6p))ocL^p-^iYHUD~qXO;~Z2 z6RCF?iTWyu7t7Op=~9vX9@7Q0eVC_p5TAa%SHw~Gkse;lZRmJ-lg@$%*yEP|rCLp@ z)T?kK?Uo*We88A{Ug*w%y31@qQgD@hDU>AAX}5w2ONm^NE-oEV-;H5Lz{GsyK*PG1 z>~WzE3NUHX#g!y4lLh)(Q&yiCcgDen>%VQYrp6^`ztPS=2NJ@x`^1RE>^^hAQ?L{@ z`6?t3DYtu&OIx4nQf@PQVRO73t{2G`2KrV(+$d^)O9_bZHsjLt>xi~wg_SsNY9XX9 zDQ|CG2o1{A0FQ>Z^5Y9yyxdPW_;n2DSqg@9AYX~cGK+Ap5UTp)GdtT%hYL{B-#mC^ zEm*^Tfh$08c{|F|T5|k`SGm18I>+fcH_Jj$gk{?mH(ZE#Xf(MNtR-8PRJhIj4eX-A zw^^&Xk2dC*Y|bH95+EpItJMYVa-As5up&&)TZxg6>pQJ}<2*1(iyLoh8PR@Nn`mxB ze^31&tNZ*7uJ=De8mXC_Up*lxp?~H>l+yahrXJ5TMVNN(nGHeOve;_72jtP?!Y-r< zYs)NhNfJMupkzlXJa@*FwUzAj&c7GWgglaO{HO@z*K1EqW%j|}@bw_GBeA0RI*1mq zpWRbsXIzU-euI2ft`3)Fz`T^Jft%|VIMqE0zCb?2IF5=Juj>T6Kkd9mZYzI5u#-o z8UB&gJEuhqVx9!0LLOVPVw8>N4vRqNeIQpQ?!>ryn0CLi0)zFX@%`q96$S>OWDU_h zw9eaHHY8XFT$W^JR9U6y>7@JvK1b-^OraM3_<(ddglL|IC=Xzu5R`g|l=}zee0|d` z=7_Q}#zP!B^ibJzq2mYq&2(^Cj=hn;U)qyuEdj_^q$oKUy@%F-Sn|7~6gp8J*G~s4 z{D};}1St-L(2Z438bH{?LEZd<`|*(>IqL{%+LsVn@=uY*{_9S>Wi~EQnJBt(Nv{Mr zVRZFISx0!51)y-jHJ)P4cV(=d5FuW-H0#Bk7>AdtkVa-hS6^hbrA30s{7^!N}y_fY3;q`0&vx=E!h`v*4xswN7sT~ z=5CF&WFc9UtJBZ2agOyvp+DXl{$%Z;z7X0vSaBs^jr#I#;`O@?HkE!4(BTasI6?s5 zh=wiOlzh9~B^knAkvmKfnV0og-nz@BAk|O4Y0F-aa^#~-=PpgICVfdwbQo-F8@#7- zW)ybAJ3xpnbaAW5`|7QAyJi0J@}rYoa}v!w8JEAvdtflVS_HjVDPUM^On~eOlL)mv zG)8{Pq=Q%jb$Wjn3_Y0!!q4qzPp)n4V4huT1uN|S?5 ziC!21Lblzq6i)>4$lAJ!P)mb_+`66}x{0+^PFX%Y< zU-;_3x`j8~>?vubFVTnpL4D zU`A3|nAd#+&8j8=%u{h6N@hVnd)1ylJ(@~Z9nUg^E>|FzK22!*T|xK~eUE!LMd>+7 z&kxM^c8oPhm|Bv?%-*A&lP4u~DnIcs|$gE{pwEPNsVRq}{`wrvg z^GN*BZC_Aw9U`X5$EDelBYa?>fp&&qw-H+4}TJGBQ6&dYuB%`8#& zoycmp@jp^p$f)-yn`vew9R#{|KO;7Dv`BcQW%j4aol|c71``hfJMz5n6NY z0U!Mw3cH*`%SYI*#SI@gO0Q+=+;Pg9>9AcM?e`kAr>qtuky#=7>{zk~yThKuK6*WDVH!lv!(saFMG*symwfu}0hviBF7MbCD)_+I<@QT16_{m(#^EirS#7SB z4xrvfXxP->2%DMmhJsxV(DI45m*mr4e2kdAx#@ne)KI$m7A=Aet3Up(F)>+GX%i~a zhxl#PEe&!v`W^~4(`MFa!1!TaN`$bUJ1#2{WQ;E5Yc*|J)9SUQ>0nDnIo%=wXHj*` zuT!QV=`_;^w+qD}OZEv2uzV#S_Vr4$Y_Uma@~&MvAxK_XO;+8JCvIa2tiOG%QmQMp zJ*KmA_UU||-5p}bSa}XM&z!}uWY#{EIo$l}AjU(%(0_gQ5OaX{bw#n6#BhWi{k&uB z{3Z1^O=uOqOaY+uNO18j76$b3I#g+oH*%qzMw_p3>-OTm*TQbZ=Y5$P8f)rs1#U&B zfq~Xx_ufMrf!d}H)>_aDmtSfzU98ZAgI#~=mHz?DKUxe_hdf{k)MC{jn9%-sLlOVa z+hQ#7S)o+6^#x`+70W*}-{@&snrpk&0oAJ=t&+z(Y!s!&xhG^U?o+8|GDFi8&Ohlq zQ*^CUdBV13X!=$uay6w*@@@D}dMg7meci1Hfh}NK-NW2s-)j8I0(<$Zk%_Wo^OXxO zsNcvjdGf+aHvDYAyd!mC&XG0tu$W*dCV&N+BVACwST_76Fe>3|453UZJU^v~4eF7d3-p{btb0`g&9ZK3Y7i8(j38vHXmP5$yEI$-(62RnaFq zC1yMOH%;lCKN3XJheAZfZU_BN0v?Kfo3jD=w=JXWo?x@r{9rq6q^9j3L(QDpN3T0q zQB+~l0w#d}G|X!Yqbeb6Azh&m6_S>hNsg(@TSZM?jZMgeQY*)q*{V)bhFn6d#4STi z9;RJ+eCyoH4TZ5L4QRa#ZZ9AWuL@RfEO$3YDsdlQuk(6uWH)^{Cfrd6T?zRenG59w zd&k|Jo2Cx2?$^58-wOh#NTcWAn(>)dG;eOOnn(WvU8*n*ey%v`^kbS13wfs=C9~oC z{2@1mz!vK}poJaleCL45AIF*_Z!x%BiiHwwGT6=^vfw5IH+K_r*Z*L_=h@$VJbq?3 z*p+)Me7fS z6`GyvyFd8sWe zpg?yEc!EE4SRwn@3y^5ou{2kIfDZhzq2PmVS;ilY?ziucp zr$YH4a4A3;o5~`1FS54|ILT|^$Gtrg`Y9$gn?-82q%s+?ss1f_yo!>AtdeQ<(fGOX zj`q5*>8r6-rS{IXvuRnP>sDBMUv5g>B<~~d*R;O0*Cb_?Lt?ljJWxP9#lM)%5`M#L zXt*zDFt}-aZ66}kd3Qnc{6+q1O^BdYWMt>;+epX8az`5o?KQ4TgT;xpzBrP>%iA8Q z-rD7Q5&3uEgxL!9MD=!Z(v9*!NbOmx%aA-3YB%$<2-nMTF<%5|Atnpvr>P=CzeZ#K z?Is6rX26m0{mm8XIC10s5VFvT&m9*p9;3{S(TWpDPJ2Gm9f;}6!>M#HFrV2LUoDL9 zR`2xSf(4K0^^B?DBZ0SaZJ>N^@Kl(($0<&-v}1w?tHd)IQ7sxGW4~-x+Ca?b_zc)H zNMnkSd)I@a?llo!TRiytNie4HX^Zx}W94$5^u-~Ctrd3DNbIN4<%KD)kQDlP*DRM${L4)wnh{x|9Bu7fGgvO<;Inf1qB2)k77@l0i5e3US_=yJxn_JmWEKrH zH;Y(A5kFTXf}D^+^g91QJ#;Hc(m~G{7)*w{-o#p??wx{0XlrkCz@1VgDCVE%H*6t% zdq4m7eWCNf;|%)UYZD8JujE|hL#LB)Vyh>{pSeBh=c^yxFaP}I_wNb}9wQR=9Krdb zejEeOO!hm2+9d;+oY%0^} zN5fk+>v)QPVLkCAolESFrA*aL=73oUlY%(e zD9gbNun3`2%|Bf-=3uVC#c+b8DyzC^Orn5dqzpJJdi9Os-)m1#ghOfWI3^@EetqKN zk~gMf-fpC`qGOJX^oI{+f<9Lm_IiC_c@%+U(V|guO81%fY}U|Q#L7PUM41NuBuCuD zQ@jgRRN-g7r>ds5gy)~1eIJ}6;Lq9?c#wbB`KcV?n-``h68cKLon4mF+fK*fILTzT z`9|Yq5moZ}aW%JQRyoB)~*W$<2azq|CC;Q$?cXWivrbat@Cby+LPueK+Ze$ACo2nErs zMr6Y*gufA$>5|4gUNy$aUHHEKCf`ZFKO~qNU<41|iLWh|M#|{^OCXWichMZA+Og<0 zNK{AJ~T#uz?uqwe@5v8BCfu@k1Qff^Z z*}=D$OH7ZU8ZOc0?@wjB5kjY*q6Yki>gwcaQQ3#r)o4^R&|*8$#5#I7aj#=}){#p= z(@z67>V?2oq;wk7T#Iu&WjD!q~r^I9~{Q2QULmO zw-XlClAKbcF~?aL@aQa}1xN9;U)#d@2~^4Y^!YfQurPp|;C0TdJS-1EW~b8S*GHWK zQt&!IERBLgs~m11voq+|<~zL&Ukth&B014D@M_r(g;si@*IGyF7PNHLegjl6H{Sck zBPKso8aE~QMPOyex{XY?Dte?(dXc6g?5}2C&91)?ntF^uagRN3iBkL^B^8_) z?fvrs(aI-E&xVwOxBN4P9-4UU^w)&%DVKsiX_makP0Jp(!YA9AB zP=8Z7T(*)Gi2m5tQ&o2YP8)U&lHi1<`>f*+CDRC#oEEa-j2}~373u6)#Sn4%p8VD5 z+txQ!6FL5OEq&PT2FcWD_u**bLyazIU6xJm8*~5oJzvWE&k1$Bt_hAp-rIH?`Z9Wc z&M9M7d&!D`L?=xSlk(X+_7e4oCSKRnqD|S{8iz+A6`65pL8GFVoi!=a>&irP)l+0g z?jKi|*~CAf^$V}-dnKV+{F7w{_~?NdP*s3cm^*^P6!~|1gW)7|zeE-;?)3-8h62u&btFe2S`yhGHSv3piX$~k6E#aFptljw!-drIdA(1p z@TZD*!I>ij(yIUl(%GfnYSGMguDmuGoM=$u)J}AY#0p;v37$8sp&9C&IzntOJXX^To1BivO_6bA# zG#WOGpX=HZ)5Dk?az0t>5QlW`>^+z#x6e2G(VM~&2dVue@@y8S)Oy4ghuwEV+$YBy|-8<^rOp(Ulg^Mji0xZt1qQ>x0kJ8q$o98xlpjzI^|ST zQIibL&Kf86b;}sW=#E2$_xXAu8`W}a;a-hr(9Oo|lgD@mgz~i)Q-Se9LHzjFv&3H4ZXxB3stx_Zp>owT3X$xVaU!~ zt?dEHzK^bo^tCp85Seh{CT}iZ?24@9u#fBkj=XDX`&ocJ3uTcOAw=6lYmqXSr+`Eh z3L`s(5TVrj^QY@^IS~reUc#2^$EHtDf>lVLfDcn>j*rwYkGmbyJiY;d`%()I9RjE> zuz7P86lPN?LPV5r#=AxL^O8UkW!EB2lH8U_AmJ?(SKHxD6Q}q8MU^<)z=vQ|f;8(B z6z59OT~vw0o?Y+rT)5Q{+C?hVWyu3Q>&Va^+o9YI?JCRi-GJGCb}c9Rp;&id;PYj- zZH(5JX>$P^7}~SQlpARp{ihy^9o5VLU%U`^c~%N0+wHoQem|w2p7d$w{{l&U|3B<+ zox?azB}9*{3-8!2AUGHB$MBSu_3l?Wa$3@~re2hGIhbnmhY^^ToBrZ^;VG z2=>SqSFw9+sM%e`?gEMRw_vjr?3#oKxTB#bvE0+JSs5 zn#Xx5jM(co?DW5ADtseB4M}ZxjDYe4_UrkLk}aDN;a~nyj+putqG#W}LpV@CmCY7Y z;h1y{aE+}LSj9~b^Ow|?@ac$BR_1UM@f(I<}<vDJzap%`$In z3zHc$Fb*euMUe}Q7O@It#e-_&@daAFtw-45n(t#psKo0ePX#oHLgZ5o@ zLjd3mk$i!oAONyS1c8(Y03?FQfFwc?i4b%m0+EOymjomLfCPY% zq5!0*C{h%R1cQ-KGN4FkBodm3j3fh71OOBPKt&)x5eQTSK^Gy&AQYj|MQCzKDi;Nm zi;9+mq2*9;ITTtRnO7c(DbK^8ApkT1fhM8RBoY=3z=B1wU@#UciiLu)kzi~d28+qV zVlXWrKnsKnPzwUlf*`b@AuVV`3!2bEAcKU5isGSQJQRwL1mh#2_&f|AlZVG(h9H0; z2xtgF24o0<9zvss2xJh32&5qrdWb|KAV35XX(AFl5ec2hBO`JGLq^^N2D6L+Eh7-i zXvi`eu}mNXy-Xl2lL*Ts5(y03m0KnLK zdYx(adjAjrU>np{zik|l^%EHv%B}HNdqu6VfQy`KxTZUsMt+&TE~Q=A@UM)Rvw{ry zwUq2GmG-e-x60pou!=umG+JF{^0)Q(Uy`V+tKO=r-kaY$4$jcq-CdO3!lom~CZD{M z0labjtO8)ZKrO&XaUKYdK8O1hZa;fV%KLJfJo7#7|3A&b^>QPfqoFFBd}ngr$kaE} zSKKtv^$mR@u){g7^M`)-93cFbVC)~i^(5-$NjMaJlCUygGR4C!e+r5i3$3p^iI@7-QxocM;%ixzl3)dBsf7*A(8*di5u zYEW0ot$=C5rMFG-0&|!(?D6ylHO>*iRBl!VRQOSO}&ubrbhbk%k|#-GG}pdjxOBp zdbk}4YEN!8v#J%Jj*H_M8l_pG(XLi=W^QIMzX(fyB75Uqml>f^y59{vHPD9JFnO`$ z`Hp@;P-kJZ8tj%eC6`j40Z5k{evUl!TXcL?A(T)4ay&dP`%d`vpn^IyeFQ_cJ%E z`MMb3tqw)kzzz_#)=J}iR!wQH@v`BUFKUeR3BT8(%iQZ;3z;wb{1xs+di4GJeGRpU zb-0FVsVL9#_1L~wmk4EVuQ{G*6sRr@U)4T~1NFckGiIody()xO3n`9OPX1!84qO_X ziJjPSZB=zC^TdTVnXfIGd@@1Nml|>kc9m19Ru@rtO}Q5n6{q>c&Eq2I2AwLRePDgL z4R_b0Fcx~0(}B2kredr0B?g^tBPw(g=-J3cra;ueQ!VZDetV%sV0B02foZ-`384_#vQ);U}7Lx*udJ?H=OZJ zX5;y&e7k7Dk>`X0|I{aG#6b*$i1S9*diIlD${Za_sUHqItB*61lNL?2r9?-Q1_BMb zXy4LJ$)_e`bz+q1D7VbCb_c6?4~qsVdo`JZmy+It#{~=qq0QDP)7^t;%)Rw5*_OMG zs>x`36=$bM+YH(kcS*%E@{{W`bgfkWBgA>%6z#ww9}mOxc&_kQ%C($IyGGG;kmS)^ zs?^BsialmAVk_`{&0nw{&<2++)(cO+=$=&S~S1 zbmiRrq5FUefvsMMutkbl)gk!NfXDTl4=8(ln|AKL4z?H)Zg9K;1T$4RtTaSvypD4j zsGG9X$!1p_vw9m4a$osy_P#Q9W1<${#%hZ)Vn}&R|Kv%hXQ{hS#f@0I283szd6H6z z5m$v6KNAME+cL2B(2GM+Me_9#h^_fO|Md1~MnK6?N6GwJ%KT7?O%P;^BUnW7qZZdn zT?*F;yV|c2JL&`1FdiA|a?bwdlRII=2e@mHeKlC6J*)IlMTQE?&FAv8@1$BuJw@-P zH+^ss_TB4VH{#*fTbsYv)3(u*BIo|c=6@*6TN3n}o9eDNqQ=Zc45FiBWiBrLCYOBH zG{BUvSn~U4a{yud-#b6Kw9esgn$WTT`SINxneu|PVXp^|!c%mVT!tPIq~V_(ZFZi% zdHY()!pYOnz%xi4mBD53Bg#^w!w~1p@tQ9|&hSS&h*ma(x4XiBBgWRacMncfFYICR zXLG;NYPXMF3)nDW`2|m8fgZV#nNY^u8lTkbKGyA?+wy)I#GptkD-YZX%zVn^4w1d5 z+PI^aXdhvFvjU4$wu)%~UN(TLCO!)EIqY@ARqZAb&thdb%Wq40wNq;B@qeL}7`Dop zv7|^{&@@_C#~SgaMZsF|k!N+bhasaHFemqqLb}2WPu*^~J44N=fh9$vnhr_tSkGf+ z{@T5kwmX;{qeH)=7f$rI1=?g|-Rg-kke55dj-%Qri=<0+QaY7ILhoayEa}Nk;>2GX z8W%&0-`6p=#={vRwc{OIDC2|^L4D*(zCqL!C;cIdlJK)u<6&aP%CP-tB2n9< z{=gwgv&g^;)|yRmpBpHr^0HrQXBo+e^SvWK=pk3{0OoHP>qz$Lq-g)jHHs>*m%OO~ zyM}dOuoBtGHR&p&fzOS3)Z6#nRjmD*ObHaqlDAbRu{c(e^OEm9ft*%ut%eSDinN z6~yXqzEOpqN<0^Nl*~V)3Z7Sr{4Q@<5;}exF2|Tj%wVYGsB%pNsS|0 zMj6k}`aJ%l(EkoPw0Z0bUBcWle#?0W!mby0*O7xpoSV{-d%~BS(s|CF+EXYVKESfx zb35UOz-RJu$P6K0KVvT9z0sg3N6i@ZmX*n}cH*);_n%!IL4=wA{4F@;%vNQ*iC%7$0F8#rgy?E*h9?T#g{)G(tKAL zs(oCQZ#Kg|=`YTG5ca|Tq`Ug2RY1GGt5c&XI|lTnhNsIY$GS(k{K!rDaN!FuwA5-{ zC!wA=m4yqT+Ua%*ZOA7&TAJAGC+c9HXuB1dp*QW~D}AwWGpc#YO!W_<__Dj}%k@Uf zvs!`|>VP8y)23+iSn*JnML(R@G#9-}h#YvA)ON!vVD=b!etL>$LNW16j(b-Smbc31 z2n#LtQuj@|=aDe|xlFyi*Y$7yPua<9Xi#@7?H6w-c^lUkTS8?O&$=qiTePs$MGI94{mN^!bJgk^{ zZ1Njr&-91iB|=3>ATiJBt|Ou61woxZ=~5f^Ka*$=AEgFM`{CHHOvZ62Ds<{e$UB&n zOL7s|n}pp`K37!nJL~Qth$aSCIV83^h3+qC4Udsx3Bk^;n(q4W&yuY{I*CUGrW#i( z>y@k0o9rdiZuS-TYzAhyI6F(2Ck1V8{fL$bn0aKnDkVJ`Xbr%p`C*KS*sJOT6L~- z&FSFsvmY6cSWrU_kJrwP8T9wyihYhnz@7LKv4np`A@Y+a)mVQ<*%!V`tOXH%)gSs@ zMA8yoQ50v^_9s^`_D^|9q!Rysk zV%E6362ml`BYZyc`8Sd@B^OOr_>m9e} z8b30g625jRZ+Dwj#P9e-10}g`>~!lNP57P77;`Dt>fZFTrre5ha26;9Q{!HFvvqsP z`W{^U`NCvOKZ}x=b0v5evk%1Seln11{@Tq;2q(Uq6*5=S8p+l;KWT1F$uutg+33P$ zd6gcxG5~kxG)-}EmIXXkqR|v;eK&ipez}{9x|~-K7cb3K^@rh%?*tJ$dB|zgTh`>3 zvwgblhT17NzN+xl6H3dmZ?Kg{>-^M&KTaO_^PVf)6Gs`blwD&`!KA3(DvW13kb zr(AbymeS+?*S za6!(thQOlVE&S`YNi4@D_}|SY!nVH54^nT9X65rHO#`Qq@nH}3`k0D!FyEv;Nra+~>P(~Uh!|Bys@vofjQ6mQ%dCaHv54F=F9(VF&%<#w zH^$YqxWvPyRzN^SjSuJI9P8|B`rd@u&*nx8FoG;T{l(7xqg;xbLc*6Bm?{!|-V7DM z*iA^hrsp%_vp?6G4Z3n^cj=&>CbPWyYi-&TmkBI1{gPL^nXCVCmfe28^m%8O^Z|#^ z>;%FJR-sRNd2^+hGhW18qJQ3XUOfL+gY(rwuK)!Bg)6R#p=KX81+Yq0#bYu=ZtDZE zLUvDh#UV4sCnvRFCV+Lq10Pdl??04x27dgqJME(65^?n;buoB{E?B1TQF+eMvPm4A z%?{R)<)apGxS#=xl8b7R*c;uBXr5$!265QHM(*==DV#M<=~KxJyumXitD8~o z+Ra9{YZU6VwV;L4|AE$Yj%ikz-6^2TOkwPj|h6@s1nxjgS|q zoMO%a0j~LPS$Hk{3VqY&7mkwVmUJ$tW(Ha0ecDq9pq2D}!%&jrjj97D+k~dxCuCRY zScUi0*c4OD{2v}AQPX%@-RJw+S@+ToBr*;+e42Z0)PFVIP<}zA{Tz;2N!$fK@K-MO zuo^pc(FPr&QTz{msSaiq>5}Vgge8_5U@a<3%_+Dey5-77-YVSZn_4*22%}|QT z=2OJb&f>lRkEzDJ)4oC8BV1ynZ_HTrbq$?CtilTkwi<5)!L8|eoV{UVy$hpRb^3{ zlxt6$U2^H9J#Vs6x*;b^{X7aMr%pEME26Lpvg0g%R(|PJ4aAwfE#Bf*%#Y`bYKAZs zYj#=?)MVb5TP&ZY_A~5m8$Yzf8`b}=+0NK?D3t37-*ArQnLBWt{Qv%B@QByi({z7* U{PGv_p(j9FLr=Z@jy?Rp02E{|r2qf` diff --git a/docs/README-unnamed-chunk-24-1.png b/docs/README-unnamed-chunk-24-1.png index 720cc0e841e3e50e3812309f41de417bf3e1e493..57da68ed76d60f5e894cded19e4ddc1d5c5119ef 100644 GIT binary patch literal 2441 zcmd5;YgCd+82;KQ$z8*;v$a}5c`GfmG8MeEnAhCAWrm7rds0gc38+j>6D+qZp-4$F zEtAypmI_!Z#MM`%$kNLT(UJcq@djU_K z7boA6i|z<{yWSyVe!$>)*UE&*Dy?V}deU5Z1M1~+7@HPG){R+6ZN*li;nrFr*=#j3 zP2>2NtfmxgHVrF&G4Yf~jlQ-h6@OFAG>qf-bIbFRk2kVY;z+RA$g!GQ+3FDZco=!p zuqb4yY$g7?W7qlzOINsvlhafBH1R$@N8R1%J8raSBnx$6nKAQFBe+LeeHuPAW|nhL zfrd4wgpo&K6*tm}V{7X5L8EU)q~7E0BjW)M+TIgzi?k`a+0pdAP`JgZU_lJd5p*K1 z?HmtpB%P7^J*?9@8pN;O3|^lLP0A>cq>mF)q)t-w|3G$cM}M)WZRv)VS0}>IRr72( zcj-|=MDVss{o7PKZlsyO5SM`$v01M2Y_x&yIxUBnx%Q&NBI$sm4&OBh8kSA>$m}WN zkC90z+`>GXMg$_VH43LAi?K}etofpd+$rxWiyfmG&?52j+ZbuubKO$cH^%Y&OM3`9 zqNsguXfK!}vC5s%@BkV%>&vYFPF#Pd7zbDj#t8uzBkv%b<*2?ULl31DGCVaCpE(uhruDliRZVEvjNUl_O zD3IKw%>D~%nhnu5naLc>hUIs6YYS?GUidf2T7i%U_70PaK6)2F@;}Dme)6QC7wpho zp4AQ$?VSP6g2H6T*6XQcG28#vNW})=ob+I6##UJ3tN@R0KJk5VDI~wFJtYhaNhh;_ zzMb|}IuqvbJzh@C8SPAO*MyV05{lGFsQa3de=69pY!&WY%Y(wE5wYaeS_9out+p>5 z7~LrZQ5@2{VP?AqhE+F}2)&*3ES~(ykr6*v&LK(R-y3<#4P^)m)2kjC(zF)GAZWdM zx*5_knFvwXuW<)m---OKwYjM#(EZhFLE^of^zvwpi*r!6>#i=K&JGZM@z=#UKCWw_ z9l7AXLI=$b|I+o9o>a5}G$`?Xu8useV8aulDfAdkzy*r%xephqJ{P{mGYE^YHdQpw zXBcV<8a=ON7QN6rFG|DhO4=xi!^(ld{RCdraRIWF&aX*Q*0Ift*(CCo$?-y;NOt$s zs?8hmfmHTn4zGIT0NYIT;AUi-x{{+PZXJ%D-W!@f7Hucao~-y$RAizzNqxV~QCmQK z*@rW46$TebTbmPAeRQQ!086Zh4_a?O?au0te@_|Plx+{%uy_A<++2u21Ys88kpWxk z3DsTA6p3lcNKIeghy9+&K<_;#Wkc(HiR9|CrMok8TRjhxSm&5t#0Ku2_UFwVZG?>n z=^q*!vs@G8@qS1$PoG{=w~>wGEE zDpai+J^qZ)ca^hIbnu2iuh4*`Z~d{%D&fv`aTaYCtowcy((&lhr&*Ixs9JJn?+{C@ zyz7|w^yx8C$J4#{xWQHr6lKd{6N5+2U-yM|-z$+?#Ry)~ZZ>RH>I}mE^A}ZUhU4~CeTv*=lyiKH1 zzv3WX*!>qm%-vXwX9OhHvJ>%d{uNUQ`-^9l9II_y&6mo<#ml+eDUA9D D$_iLm literal 9742 zcmd6NXH=6xv>?Pp0w^F=5a}3@rWBEy(2GhCP`VW9ps4f~48?$eM5@$8K$=pdN|z=` z3nla>9qAA{0bX#=zTJQO&YsDdsq4Ux5mV@B_$0M6pW)~$I*7<6{JFvM50BHUp(g|4pKFKem+rK zJJHZ^USao70Qy441(+m>RG+8CNn4UMLHSD4*o};grupJW-sYNXLq^6$rlqQ6;GMdj zMjkj<;e*O^t{qJ*bR6^5=@)tMT+X!8y&|S?ys(CFgfAPFwU8=jZa9}_B@g0*k_0AVgVOL8O`H5h0F=3Kq68oc@j{yRWuqJ&uMIzn<|hRaV7DoGqlR))H~5@t(EaJqsrrm@q^R(0$|C;n}Me)603{A`1Wpi`WWT+EH^qNs6*Ve{1bpF$ZTn+f%%DJ%}%+| zN`FZY{#xVv-gjUF8#TSa*Cq@r>u;vC!$i`8!4PyV{Bc3{)nX+UP3j^;Y;!2l#R6;? zcux$eYK{Vzb>CBaPMB0X?RI=5z~DoyaO!lXXUZLUr;MF8w@I;J+&m)^9{$oFs{3@@ zSfrMp|2wE4%s@R8{sMTL`BZHC%NXO;QlpC7)q)~L2Uc%rJ&D<$w&zM(MI!{IoQDN( z+6cWirgT3P?o>RC|5SaH7{Ss|HR6A2yx;iMdWAxb&i9qm<9JVg4Zk2?v1c8&2HPc{ zsdlbXPXW>*9@>cW=bzS!&P~R@$eZ}qU9ZEIbI(&^P*C@YyMA)&gN^2n&VQ@?MphZv8cxyV-V5!6^aQ>g8<7D&H#F@kC}OH=<6V8q0E-j@2xU z(&J9C)x!ts`7*h{Vff?T0+&%oS8@H2;KOipV*B z5NFQ9AkBHcB4}u;(^4y@udkE9cyfm|^6ntNuK7hrEGqo-X3IUd@mH|H_t zuB+K<4+U360}{{UzdJRCtK|Vs|3pAu@P=hDFfPj`PRIFf@~}nX*r+>z?cn_1F?9|( zU+diLc29xXFpoYH$C%lZqw$jRGxhbche(~(IGU1#@wL`z7J%TRm!+L=AU0GsKnU|- zjcjP}=%|<7G{luY?*;I&e+(deU8n}qO*1RjDxE!X+97OkEirb1y=}aE$;t1Y{v;qT zBdUM?B!lzuJ?#{+Gr#Gzd(Ox)4=M&Pu#JeVzEuS*8CG(@Q_;X|R<}IkT2IuuRYkWP zJr?5oE{3%XX3g8_9ijNgOMHrDVK`^%^z7&<#!R$2_GZq+Ctsf4FT^oPHR&($rN4D% zs)W~rhuZ@6WSIRb-V_eVhK9=l;}?y;(z@S9UrRN6%3j{-nRkpRyHy4hKZaSE%oJ-_ zwR+yZ{p{v;Zmh}espB7c>1LuPqOmvhA0btdDK#t5@yA9-_3|uPl{@3Ug|Yu6?j^$I zs2Co_6o8!8n^p+#%5N1=iXf9`J5w*`Dp+tCE4!U3xn#Kx$|TN-NvxNt1uSMKo9P9x z?BcGsqj;g?DMvGStll2gh64cc~0MQ_bb8z!=vTR6aowaNNUvT zun<+mDI(&>ZP8NSRP6zaE}^?vj+NF zh>{Rw%ar^6n}%~gN>D620ELYI!~_kYIVV| z3;|Tgu(L=mbU=*?*8TqA(#L#S;CuKEAZ>*JsU|f^HjmmpBU*zHtAah`6V)}vpuCze zmGcXZGvS?aEoyQoTKFaq37gCkA>k+aKLdhWpqrbD zND$)`0Wv$=b{a8U4Kr?a^x#6PHvw4B7?0z+aZw>A?@+L#vo*gm*i@DfIy<^}X{KOn zDGCqyB`RE`(fBH!4C%rrq}z!(F~OXipeWu5;&sZz+eLfdt}DtR_h$=}xexAU-PX;7 z&)`l2CW+vHAZomR6BST)>KW9+e3N2=CN3NHgywc&oZ=S++S$rGJal2|eOFy>s_JU# zVG|VdkMj1AFp)z5lSuEznqwuJId>r%uTe??D4(I`LqX+g&D1$H50=i(9{Fr&4BM{> z(GPR=TE;NsQdu}7rjqv$=Pv_VZ%HBZm-iNP`r72A>B7RUL-C#*<%umoz3++L@PcT^ zX!uJmx~RGJ1q6B8@@@COxTxKww4Ju(c?1{T)z{Yp_azUSy_vjyHjIbc;xB+vC7`jM z8qn=#1U{M5d37%S23S?~!-S-bS-v~)cILel&aaA!p*@;d4FbEN&`1x1B{^^<#Itd- z#lYAT)5JkMT9-%M6quzkM1Xz$(k#QU2?%FXd<-Q~_i{Rmu1rv!v%7vO5J z$1twjwoo4g)He5uBEB1*TMrMtQnY!eyeOoV+Wm*_QPMb^)q{}f3yoGX~?#j#Cvg!6xk?P0m{S+wL<25LZMaVNRx=FTHBm3)FZh zcY9@ug41ePM!JCjsqwkpKSI0JD_b;ToBP2W>NoVT%=@(6LHSOq%(*8yk)pp?NG)vN zHYo`^4pI2%P|1}*(iac4WNIJCiRdT|y*qTT8a64R#3j0UBT&6p14{K=vM;S$lL|2U z^$(NXf#V07Urf0>OIb(Z<;oJZ>u;YAh5;T^b*#HSIs|;zaf{UWdgK#U0GF#pYFIhb zg}Eg^7iJ5Xw@eCrUwaVqX=Z(3ER>&*ZdI~P6Mr@lU3w5xb_^Q{t@@L?cpWu{sqDZU zcEdTA1zgyX8%%aeRi_17WXQ`BF|fGt0zjY?0?+h`t&m4t25W@tc-$b@+8H zS8+n_7z@hU?(IvWuy({t$p8!ThmYH+iuARtV z%ryLlCm60lPjKX4WRpn~YirM(aM&2f^-$6x|?|JrKeX9A1S>N`QaM7NRv9CV) zUIk*h5KGkcJ72si^8jZkzV*UHn)&J3b-yA9XE#{Q_u}e|iQ|^01ekFtGIHIVa-LXg zG~`_b?1yd&H~9PQ@TtAbrS3$vO=E7}$2Ou+uX=_uBGe_5&Iz zza@Fkz%@X*@N(SjRIzg|Y=a>@t;T!DY55_cxrS*LY+KXgYP6$aHMCKw0jWL?Z+q<; zt#ZfBkPW>u0bd;npbBh?)J>>`?ceTw{!O;;LomMH+~4v_AjhqV0Lq|9-3o7{0i^9n z-wh|KC@{F;yfX!-)Zx4Qnbaye0-n%~KL*k}{PaBd>;Vch)+KFX^yXNaAS#<>f?dgT zudAnR_(oiFiR;$TqG735r&XO181Upeg$1qPVWvk0E3TQ1OE>4f3h>{=JLx4&ye3MU zUBuLvndsNop@%+3Sx?ovX^`)>r`AsSGT=2JHg6?XEh;I$J4h2|cWo>4H%|d|(7&gV zUV~1MMUd?!3~GUw?l*gM(3=y}STew)lP&{7Ni%A@=!P5pqQJwnW%FWKtfEA@6C&RY z8jB(J-4V;@G-~SJ0VVGw<=GM3Vq+9dyj3=g^0bW_MO~`xvnx_CS-X^yioI08J9&|EvZC)rcXf z;HiH`uIkV^R%Y2@@?cI|;pCJg9Zw$RrT3-TZ02NLfv0A$@WSuY<442IP_XBUJ0<-& zwYINzzNXiFoVnRhE!1G%1N4BtdI9;(ve^)RClVU?Vb)#eJ{d0V`dHp7b#`x=2 z4IY38$Kqu=fqe=6@)6GDMaW?A!R6@7Lxxypr~Muu6FxrOdHZZ9ZYXJ+kU5l~Mw-Yb zT`01v{AlK+$EPj`0&6ek*lPaWXxM*dF!P)6Em+j654cjH)U6|q((C;JQ1iEQVi=wK z+h{m@Y%sIlIiulKizEJ%)uDgi4+mvEX@^c0ohig48g7mO=qWw%tU}?Exf2Mp_^VPU`*-MY|2-m;8 z`AGRjX><&fkN7g3WbyO3&Cb+ZG9cgHz2U`fQWTUfOnb>~uCufIebU-{czk`iFs^ zgntGYJeKUn37;Zi2FI8iaF*N>jWk)|6pYXDC1l0`^YZt;wtiw)Hz%0!rV3W$5vM6Z zLM|{2utyw{u&j}|Lw&J-tv$ioYBtrl>J;FMHKd>t!>HT3I9G)TmfWTKDjkD&oTkUZ z8Ardv0eh!IrS8b%&6HIb=|f9rzeu9{IXRIN4ST}o*t3&GSqEVLdX>*}N5taa=r&Pd z*VCcQNuwW^k@pX}DcSs9?k?I7)rgUoGfWLhzT|POX&Cf=Bt)s&wFlX; z6|e`yRVFOj*Pn${6`;g)mrw)LElReB>H|w@)gUMGGZ=Q+0Wdk;Q1Hvy_&qe75-$U< zgr)Iup|3YRl7dqALv%Pb1A3D!x5P3wiFG)Q5|nA+aJ zQ$89cAmHZzj8jPL-A#l`|6BM%4osFJ*ZZ+S4C%nuq!wdBL|@W7>~VK973W$x2EiD} zkp3M=7zDmc1VYJUg7>=`36Y zbtM+ID#|C-*mLjsb5Aox1!*gv`v=fI#r{(9QNC2J_aX>frT|fFTRd8kop#;GzhGbr zllKuRQ}Cmwg>0GkT{qBL#uVXbtmRKZeL^0}VB~xzpJp`oHC*!jsb^pReF35CzgCWB ziy84!%f!a?N{@@4yoQ^HZ|}0G7U2cCfwH;X4>Dhwi&)nGNW6bG*T7QhEt0jfQkAhy zXK~1JwuOgK+)Y0VT8@{s^+$Tz!_&t-ynMEp90KB3Z>3L=ms<6!LCSZ~SonwJY0t?7k#KuzKCi#ODGe08 zJcb8MpTO;J8e;3UWv*8;6bK)z(pvoXb2;^$n$0Ay+k1^g44$lLe?W;36z|)wHG3b8 zG)xe} zWG+bjPvOFG0~XQVnda$dwkd%kXOjyn&pHDVPU9IhC+D8k;(ES5HToc^i<5TId|Rdq zI88xFy!Z~ktt>}eE@dfNh_nC5$%>F+Hcz8}{Ih<-Z`}e(J+0K7JQHW5-*_k7VzO?+a+lL*F)lBp zF`Mk^>3qv(JTF@>ytT-T%#ThH?@ZhZfAEm2PvFIdXB3R|?Srp!GUl#Gynog8V_R~X z!2s+n$ro>VrPKnRUFCh6qgpF787jq@0sz6ytN~I-xw3uJ{-+<=UH7s;dTR{VU4tXI zbq8i%B&RuP4*;YDuWhPE>=6I1uKSp46SlRev%qmbRDtx5UTniXeL57pr7RQJzv)Eo z@;1PCVoNfy%%;gO6Dot?43Oy_^4XM>;79(j=EH!|vUZ>&r*y=WH7u&*uI+xpdamS7Oa)yb~L8diJc+1ibZg&fx%dF#!L>ojVH^!1oO z_jKfw1byATr(tEqfWn9;w46sxv#I>I&IkYh%2@L#AZb`eBZe0+4d*@yFGyLYC7fZB zjhnRNU_W;n-xo-4VS8gaaWzGjn=V&PR!dt4JGZ__STiG*v|M@8Ovq zgonh$rNU4VrJG`^1pnG@(bf?2K6w?cD%A08sSBYrM?Q~_AJQu-Csy)CBnDsBN|*b0 zHtZebGvAk6=&nv3o4>CfdoZNTo9h^r<_W%ewZC#$usoX;mxTw$usWXU!?5|tkLNiT z?_=>=XyfE+51oi5p^vnKhgq>%Ex_A5`s;tcp3R(ToF}Pp)q%8cYlTy0)j#%oo$MmL zcg@L!QO0{aU$Y}(Sc_lqF49wtXJ=*HE|oVJ=D`BVwj72YgtVAR?Sg*M&>>S$fOyS%y5d?6(kG33Y^>Nbi1${B~8T z4H!@$3(eX}hgQX&?=+)|;EHD6K?2`oNO>?a=N{VEEZND6O!xZuo~Ck|c(=Z1I~n&U-Z`o8x`@?D`WT9f~k-J`u*TX5p^J2u<*<)%vU6p;>h zDQ|9|U|n9rIn>RMGl*#k<$uehq)DQHaVVAK@Vu2;YTL}YGM+aS3JGg@Pf)o6pVYKo z=et~hduZ&6cy*mKC3J}b&}uhxgoJ%J_C}EU$DB@L{7*0?SFhjICL+QO$2m>xx&mgr z0md5wfGaj4fc1quJWEc)!fwJJ&E6A)GVl&_BcYV;HZr~F-IR1n)vi$-47ro}$cx|F z?kEp*+~VcEa$Nl}7w~1)6ial#h&|+5Rd`)S|BhOe&l;pxm`!|tV+-%>^U0}3 zptdrkkDigkH_oj+y8bC{6jd6-+)l300a|R6qxbWE^saxjE&83tr_RpkK!KsHL;i

e-^-mK+2+>_dp4R3@rOi!BWkj_gNY*UZ6}@`@N!0V2CLlL-@=62Ng`b4-ZMyL( zVUQ1e^p~>e_&Lk*oxR7;@wp0HV1}dDAvw=5MTH0U@bPr}52kHOh$}(7z^1iG5v5@+ zT?BY=KjPgrd2(gzGR0m(P7%fFSXc2cB(GA4aT7$qg@oV0unQdCIdViqH7FuH62oA? zrg=1nEtW`^KM9r5Lhdwo*3<<=-cuUB-;RviYW}FwCL9S2?T*eI+gu;G89Tt38{6|5 z&B_+}j&~vJkIG^joD1i`{^bW1=VR=Km5XD_E0bBOI88)0LoT5*^)sb!Z&;!vha_}% z9wINQPqd3BMIh0^Yq`@wKodK}FUDLqb{mb;CP@2Zp66<1f0kl6;Q(rP(kWLx=c~A6 zd#ehe&v9CyWF>@ru-6@3k|A0+TXU42FT6B-FCBoh>C3zl$Jvys!UMgesoy^6y@~9Jg zT77LW^75Q^Z{20?R4q#iTs!S0=wtAgA8f+f-YfC1ThlTTGoUwd?MBxWI%MYCVv7L_ z0w;I6w@oOLP9SFLD-P%JitGoyU2NU!a=vvLAvq5E?D{@V)uoN zJR9m-I-P%JNZzyN1LRAy`-|Jczls>sQnf3GbE5audBo-TR@G=jg}$A%c5 z-X$8;*?*BAUOZngo?^F+a%FHOT&=*N>eoLeSb$QTHFB9Bq?TPw^_u(FTdAu z{nt=wzM#^DV!?9k!&5_dYclDyo!y_ei9y|*kn%V;I;;k(G*n0b*q-y*eXB2VTgg{I zQ*9CzUoFCEX~6uxAu_>4pz^_cy7WNxCjPMEzviWMT=Va5`cDu;P{sWzS|DqeO+ibF z%@oe2iZx8vNT6Sj4rz7FZS9CoU%lT~oghTtJZ~?FBx;j%u>F)cH1}f_>&K{fF~rrE zkvp;Zun)gOT7cKTc=TpJxTGA^wAkiq`iuV?%$6z@m1mxb{=j^9hV3Dao|2M{9~ui* z&86lRbE_5#=0fK@Y+4H4qW;$2t{GF^AD>4dIN$R337{(BdF(G8pA(p zunIskDJA70mq0t`H`(q2LIIh>&gxThqiY&<^&%tzFU5*_SdN2wQrs<_cjKMQ`_6xl}1Hm;oQ6pyQwl; zS_pGLr3DcYx7==xU8AY-jU}aXuFq^g;KGkfr1xcT25;9}hVb)-w25*1*BNr76{DY5 z=fKiSL%6k&%&n4uD0NFD0Po;P3g!8QZ}38$nU;@k%blF@bh@Z$DRV^=zdgaO+txFT zj*ecY1)F8cl*|&*n^B2S0h7&BnrAtq-xo;-e`F-@qQ(4^Q*yy0cQwBzvndM8)}zne z*}wWKXnF^AdMBn(BtWB;|9|f5ZDO@dp7eD_R*2qz8$T<@v&f$17$Yr2*o;S1FngJz zgl*jscRIxi8-~7p?>3=l#CV`QlzfNhDVy(qj?w7FK%8fWt5aW6A2yIDdQEb^phg$R<5f z{I71EM{+%QzvD@L`Do;X;Of;BmV(kb@FgU3f+gu6bkhRa!oMuq_h$tiUHU)X-Uy*@ z_k?GAHx2#rOxq$w_d2ePRebv@&6Z?A~nyd*7n%E_w&e$^2S;R~P0~Ol|%|e4H~$ka#DZp?RO07Y^{8mINIRT!(_VTS?C31PQm;D7<-MqnRX3$S0U6niW5#E zz|n4Xyu~BL7UuTXHQ52xFR)%q6PG@S%dRk_v@Svfk*R6-P5%lp3bYbi7&RqvsA!#< zfWp5+=CxOT-`mFq2AQqi3?>meQI~a!uNs5f+)<}~C!+=A({~I5)GfasHNsi{U)_)4 z(L#n*W_(MC+qs0a)6^!7tOVZ|BA*EQI)2@Z2D&{wRO36Wt$n0r%yoCC8{xLZMrL1^ z6^Drf(aQ(Esf7AbHt+DB&|57=0kGne+Xc9}-Q^=qcuOcMk`fIw&v0s%tcKxiV zU@;(M3=9+lV~&^@BqjzE9)roiAwW1Zh)Ic~F%m$a1OyZ41T-!IO-#Vy5^&6sh6jQ0 zAS50J!oy&A7!r>};xSBM@R)EsCIcVN1UVlB$_F9x5ukhoA|Fl6$1y?6Cld3C%#l$H z0~Nzy#Yjvs23d^36o+RNhm(sl$V4=VNW&2sL?VMxhXmCjVRcAk9R^m1LDq#M>oUl7 zMjk%(&~(i&+@FsK+96@#Q=Fw}4)H5^0DAXCX1R5H02 z4eCWBdT~skdvU~GBC(go1g)3G=w%Rl84MZ@L1Qq6!;!<`nBfd2!iULBWDJwZvpB>o z4mV3g&k}L7G$x3%G{!80Hp^fzh-d~8_d8@7jzMFNOb%xF%#pFbEfB{1fb8D7R(>E5 zSJUrfUyE1XEfDCio!%8K)1a3N_?S?r_OX_ds?$=g%C{e0bw8|~S#;e1?C_xPS8CLL z=|h=SU;)=MRJ7N{;v5gYGdH;nR(;cwqotd>`7Ol<68gYh&Po;JUM4nPM^ zzvu(uas}=|E?SB`SK+w^Ws~A!<%a-~ER^PlsPT*PKL3BFv+1L@Fek=VYb`4_KAFC! zK<>U`*0nqNB5!-&{%82G+M>&6H&|Hr$H@LW?rQqz@cio@j0lO>$Lm3$FJ*y6Ie@E! zbI8>o;ROG1n%YV0Zae=cdS_3Ps1pHV&ktJ*X!NA1d1om{$fO<)mLOF9P=UJ|vy7bl zO{hpIjMenc(h&A?xCrv4jNETgBR>N-Ww)|!q_{w?$=B#LADxBxQTXNjf2J&dX-O<2 zu)dYHeY#lL{i~LCNn2C$X?mC%|Kj%Q*NgftJDsl|U%lIN)KmMd^>(aaNxR!}A`k@y zgmnZYPEkyBB_*tO?fkjI=^u=#Pl7{g^285NVlHcJYNlyyFLr|g`iHT8Hdf`>jF3`Q zaDS~B$%oUft-Mpx$#q$3=}8t!j@wDg`=V@8-jyd;&F3#);?SYkKcGLblv#dl)_w?R za?C$zl&slhta%Lzu#C$L&?95J9mjc~JUW!CM*fK!W*n4#K8M|ZUeOtp_hI8=GA2kP zKKg~xy;Tk>1!b}TS>rOKok*^*VKEhGvc4^LvEwh+<}mX!%4}Q_Iq|ZS5|3C|A5#7GE7 z{rjB#&9g&Ro;*-4q@>kB31Okw9KIxZp~26dRp=|(c%Yl>uV(>*(1i06UT4COV7F6{ zad#1lifnS0l}$C{8OJM*iVW6|SnDfHIVk?}^VEnx$y4}EHfZ{_UZTj|0;TBkgaulW z+*v}Pp-6qJ-7BS?u)f(NJJZo?Ar9KM;PytD9G~)e{iSnh`b$&P+=KP2BHe)51=2;k z^%p7-!8@tZtf8%hNzTi@z1{Y<%l%5qUqcl1j$@7CH9>2<&(Omm3NJ#@x=Rah;wK)uR7~vj^lx4@()3>_ z%9)@&Sx?a*>$)3DTx`4;Tl2e~U8rEOG%4&}f!$^qz4j&HiK*55(2wJso-V(sw(+0o~R4ORN2EV)z-Hn z$=8-zQ?1vX8j^@8O|-M`&qI1vx{Lxz6}zP|j-~?vDf9{dWWC^gKaU#%RMG_oX%-E^9@)<%{V~8`6t^9UtNz|ui_HPFjOChdHfm5y|2Pe5b*{6X zZd1Yc)$|=lF|<202vQ=o+KE1WSGMHVM#@AcEz_-;OQmP4PeO0S*(`S=Dso;{qqU}N z`uGvOzAOXfx~fEVnEhbx4RU>M`u*j%>7zl5Lue;iu-!i2riPokj9=WBLWExH90CZ;H^LCR=v{{5lh_d_S;|N9?pYYTVoSXQ1)Cfl z3!OIY@!G1UYsp{TR6eFdIXd>$-xlojD748(V4j63GdcfF_435H!8&mjv0{LB)Na6? zDP_&gZ9-3fOAs^t**QU8h-7`!cV%ITQwJzxrKa&Y`cpLdKiYOhQa;eJhp8~&e{!ze zN-ERSuGaEakxjalPtW3bC>#sKe1NPH?8vVLll=Y&9q-<|ANO0LOQM)+1qBNyqI}Mq zXjV9%E8j;NJ2gOueroslrB-@u5H##9;Ql#kD(7t&AC%pNGWm0A{Z&8UtmR$wMeKS1 zHz0GHj|YmgW=)y=E5Z}@ciAAr?yf3u0OrJhm7V11g0WzO5Hes_9TOi2r?WcE=$rWP z4R^G^Zm$SrN~SagZ5%NC?vwy7NMdPUY)lr4zaZRrWtyvCE=Y>t%aiO1cwDP>x8aBd zOr*|d!Xk{LP?b-XTRsKUp4#M9KmDlba574+St)H?Zz=nP?fIuS+|Ox77WJpmBX{Xh zj)^ys%Ut^?_Lo(f*Lfe^7O*u}5w~M^GU$+Exj3ETF12qhlT{f&1@L=Wl)oHU1qi2# zQ!ALl&&K;yv3Z}n`oo{Wq|c7nl@V3TpEeIrhHSNw5q!2otuhVJ{S<&F*zNYM9Bz|L z)|7FFl6&k*$232>m;)$&EX{z-4nL+jG#Us6VwMW~jZ3$dx(wZpFbzV#4LjUv?(@4FddUhejuLJr;s+ug9f<`D(r2Eho>Du>EWVBQ zFN$@PN}haAF&nc7L`)Jr{wy!!W8XDbNMS;d zqAUC~3-vQBEjEi@D9TAW^xoKeh-FlD#%DD9cX-7>7q_R%|5Wb(o40?L=)XIS|JL!O z8EVx>xf=nNI{LOt@8}i3d=ASl7}S5HNc-ai3F4%Xm*5mcvcmy-)wjRX1l{^Vy?3TN_#nnY*@yFkTiT!3@hXpTtVsTdLDAv66>n{`mN%YpvM2RdHP| zUl|t6Yv1M3|Lz%g9>-LtI`(CX0_5_9S%`iV& z6mL0v+}7x8k$ahtO+D|_9g5CZVNT8a%E)!b2L+p;@m)Os*U{s{Y6-0t#EH65?m^YP z(VVXHU+3_uTV>XJ&D$)`z8sMwpI(1ErJr@;w+PC2+v$0NffqH4iyHQI#TFwl8>_Ur zfrbQeO3SYwD+!y)y7kGjJBcMNLxUT8-T{txmfGfACX?Ou7@{r-(nM{KjG}6dncdy0 zTRt|2yOTz(`nYBsMD4M+@B!>fasJZz1FhDdQafPdEaGO0Zn4g068tZdUCbXuu*!LQ zN#2gOk+Q03SDw5O@qXdn3(*{Je}ii5n1W!#rh}tHalBkEoOCI>cKN2X&R`o@y0CT4 z*}3+epmT3|5X{Zj{0=v}y?~_en1bBX71NMg_}vB))gl?)ykF9ie9Yb?b;6-aMkez8 z!n5~3!S^WHQRdFcDLq%z)ch#pBBW!`Le>!SJZU7$~@nA z##->AsypcwS9hNm{P`K0YP*l==>1UdALpeemNy`3E~Li5UdS9vpHouIMB%ZVq|Ga9MF+|&{NwI8 z$pvc1uel~9u;eFCx7ZKLX+`z-C(c3bjQn^)7jwqmXF9G2XL&gc&J-Q_-f{M0$2TwR zr{w#=8#{ z-pnm!N!D+MMQ(*zg}QzIX%hk`v8{vC3poGT78GQ?Ax7oK5>R{c^Pe8wWfxabhy}K& z;qcIGkun+Ks0#Y!FnnjaAVZ84sd8{iFm=mGjc3>t3XYzh8LG(36pkj)weIBxweDwa zX|XDWh^dG%bLhl;>j8SKG=(~i{IL z5Fv;CqUue0$F(EG)_K{|On%}E4$C3f%Hl2#yv+QO_!aUMzy9EsVOL;*K6ysIS#!VR zZ+|nUzxaRrnbr9}{-!%2@@xlL`E?%io2RJUw|~TX2$jt$Xu!#to75$Pu=Zkq6=6vG}2(Ip$!v%%k3;F`Pz=6A!WiKTzIv-o8I4%8c>`qViSn7vsWvC027Um8i ztQ=LIe*U?eZkG+c1V)zc5Rr1t)o#xqpOGf*#jP>a+t$KX;g0>B%Qt{YHf}kyO2u&r z!eU}T0{P`D-yPewaTh8DsNPWt+3qRPI(@n+HpsTfm&Sk3%NM}j>twGuXzF?%u$!M)eEDJ zhEw^mT!xyu_Hgx+eN?18H#sF-^CQvX)ye?-7UX*>H6jzGs@YKcgY?|k%#biN5^7H^ zVcwO*S@IfyO#m+MAz8F&qpbr?qCxCm_@MfLnS}N6yX!K;t*;^Tcz8CA&)Hb$I090U zGPW@JX4iRr_1K11PsT~hB-HnZBB7@(*V4;dRp+19F#53~yz}eVAEK)2c1*vteA9GA z_=CAq=vwwUQH+Z5;VA*n+w931rq_Wig+*xLz3bDcV@kzIXEYRLf;QGO0r)3U*Y(4N z=L0H+s_;tpw%gB|Gj^#r)_wp_!0{E E7d0p5d;kCd literal 0 HcmV?d00001 diff --git a/docs/README-unnamed-chunk-26-1.png b/docs/README-unnamed-chunk-26-1.png new file mode 100644 index 0000000000000000000000000000000000000000..95e7e7803d676b9ce596c206d8421dba5768f2de GIT binary patch literal 9913 zcmd6NcQjm4)UOO;5R4Kfkr2TUEkv|nM)W!py(9#QmLN!!!N@34qKqzjH+lpk7$i}n z4MHSp^j@M5gE#WM@B8Qd@!optduzSB&OK}HIeY*1nZ55ld!KzyI9yMij^-K-85tR! zriO|>85sb2aRbT8$jJ0n1S!bKE&<^>hN`4TGBPPHwfo0UVzc{4Z6}Amz#tKlE;QB-J#L33 zmGc-d7%fMJ{)d9LBSVwuNEm1m2^x(ZM~`FCIM$8~YbS?AlZqV{ODY$g*l{d& zd>lJ|jy=a>&&RRn=k?y+^?rWsadDj=KKv*zA4kiLqwU7Aq(VX>(W1vMu5%IxsTw~& zpTOZJT3XJrcK-m-7Z?}KBqUOOo{=E^l%xsjR~lv>WMuTM7x$%3SIjdqGHxoP61pEe7vyJ!fNDv zvQy9`wm#sqZiS?c(Qw(_QM>`zjLHJl03?L2VO-V0&RJK*F!#%KiS3K zuvzhKVJ$9UrS;^|=ZI>qVZ?Z^1%!)@Xby_MKQuOyu3gxd(sB73ZN)|jx#PS3DOJDP zGi^xefQc;;iqEq9?c2hn4Le&Pj=1*2nvW%Yx5i0`svyLx)$%(VTG0o9{m1eNTaQM1 zqVIG|3nLg_^Gn2jPr#h*mPC449Td3NN{!1orknrn(=UP=jp#amN|<<;=sM=8faQl5 z>8`*fSGZKB1u5kc-27vE-eoo`h=nFCN$}s6`TMhjdE^kwR^yvpa?C(HUx+_tUxqGiCFaTf3< zJ4-q7;mhL?=<~W~ zc=EcFiI<3t=5NoHMq*{85v?9B@y-B)V!)7bAVy9JRpCz1Ev^&IZ9S@~%GP-snQbmC z8-{Ecle6#m1$#BIMpsd+gYkLM>m5P>S8AV~2)t3(Z8jS9vS9sA?@bM6jcCiZ0_d_m7iGr zW8j{;v(l67XO|Svrr#x|Y_1$NMIIUv_KT%k0-6Wel3gczPzEl-8^G7MTBLMI)_pE6 zD<}Ew=g_yLkM_W(q#N-DRjXeJ1)r)#NpEHmrHx<@4<<= zjpj(tCoarZujjdXj0a+&Z}y+-6#-oXul?-fCHR~XM!p1Ay@lFV?+~HcRc1a&?tx!r z@{n-gUPZ8eVGA4q%^rNwbzQbB0$1JKz>>i#fQFfOf&`w9G*{aMh!YL$tQ`S9h4%}g zO{{yi0Ya)mo+q7lngE}Q`(KX$gx6q@gIa@T|EHM_ya=4kPBmYuUvQj<;uF7Y5VSn0 z%9hTW8c=IMJkl7pR|V|L0Z<6XaRcZ+6(CCQ81QD@$1i_XnGTlD%Z-!>ILr3Ed9Xu) z7`2d+DyAK-UHS`q9S}CN(RTIH><%?>UU&9_19vzO%0AW8IXj%!S~}VQHB+q<0cqTJ zM#&va1b~08kkh|hyn|x}Y^ak=e?maq_7YNv->8gct^H8}N>2|%j zQcN>^pgy{Emid^DBG(O9kEqAVQ9PzkD1;i(CqTTsT!SIqnZCf`KrwjL?J>DXB|c4* zj{l~%|CHgu#QW)QVNmXCsth#{|FOz^Dv8tj#-uaJ19?3W_!op#D%AbBdg*Xf{IV0_ z_P)=+ItuE{17y)b0PdejPR3Z{=Z5WhA7<{|Xcw0JRw) zms+=%#wuV>M~uA7tkO;p@dt=Q#xVUyE&)ywpP(cH`@FwJn@IEH;L-AZ=uC^0m`--* z)F;*m*W|GX*-hBP2Mb=J>yt1R|2=Wg+~{I0ZJUiJDm5|h4J39iypioP>SeDm+9<2j z^cY@ATfGtDz{ctV&2~@6;j$$5%1!D{!nZF;;BqF15edr}>wSPiRw+?s}V7+ zP^dV+9WC8&;qg)_8v#>zD@$2&THHVGeMQDPk1G<@VW)_ao5b7B!D<+aTgMMwz8$~# z6$qtLLoVhh91re=djrc9(E<$0TY$}5BUhKFWFQs_r4^E&wB1|>PHajqbQdfJkL7Bq z8SdpnoAVte`5&fm<=qHJ5_pGVmwkmwyjwVLQ$KSJgeAPcPHuE2nU^KLCmyZB)q-1~ ze#TZ*J7p2Q*An{FhNQ4>Yy#7bhsq}()Uy$LkKaJ%mh(amiDw(PmhEb+0pfRsx;J3D z>$=6@2l9*<;j^*4sZqU-*&IH4gdro@>UJzUVOpYnhr&e#S1FGmfbkv(3_yyQs$?QB) zxrh7G^ic%ZCfh5{kzotTb7|tW^9~hA``8#~MBOIWD}Hrx**0F3vWL1Sbn4AGF)^YGYKW+o~0+sNZ8Uyjy5-{)nA9a+VJvMEZUC_iGp?<_n9Lx zDpHkoe#;3afc+*HT+4#NPnRMl4WX@A@Ndejko9*_0_YX|yoDI`Mz>)a)SS+VdGQy( ztd47=Pk-xOd1Y=1$KpYGd&b|{H?C$c0HV)F8@1QIJ+$4sx6<5r*^RkS>It@~hLLK} zv$6M|F4va7+g{0!j=7=Fgqb|mQ9KsB)ekq$)Kk5o(#iB6U$2cTKvuJaN)bs&T$6#H z>vaGz8I?b)vK}dxWC`3$pe#G&qnTGk|7wg^I%8*8-R<~9P=oM2vJ;ZFL6=6OF0G0g;yZp5h9+Ire6xAm(F z2SxmkQN!Gw1cTi#dTNGcp_#V>-cdd3r*bcIWHy>m{IjXh)N46d1E3pdiDzWo#YNRO zX89?i%qxCPOTgyp!e)BQKO%pqDTa<{f)lRjjDUjLJ|B zBw=;vN-oD?Yf1Ex?j3kfARTb{+G)a>N~r?KUs~}9X*vq((v?K@4#JowVN;tZ08Ak5 zIrHLebQASd&SgeT?%kRy4hDs~yD$M-9M?})iqyl*;tc;oLt=OX8`chG*JQu?pb4VdCZ#!n-E7o;cSFnF;o?y z?Par20ST}hze}?coyz}pIzP^`Tvhk-r3{BuW0o}aF*!=$)e=3how!i?D+yc#<3%Al z6@@@ys;}OaZZ17Kb$81e>Nla=D2Z%#{qq=5D{PtutyMhi@b{d>iU5X%41BlPl5o%i z{(*-kuS8D|7N7Vp7s$U$w$Ood6YszT8i^ z-i(?(K3kD>l^(&Yh49w->x_fPt9Iv*RY5|3au^2-54 z`Qr^+xpoIUhR#R<$lTPuTIz~bWV5#4QmI-9IHvk?#^xs=iZo%WY7JsT#y_3n!gG#pIeGgW4r`CdGXn&?tpTTL|rTkt{v$ z%;YPV5x{;lstpKT|B8TZ=~L}HtRR#AFi_;WFJC7Q&ys1|8q5TII5sSb68ZBd<}yXD zQp)Au;;m`g+#FBHi+KpP+y6Qy_BF-tDZ7QQ&FQz5nt(G}VXAe-~ElRBxRKwoE1s*ED3c6Ub3v zD)p{@-~@Hsr5E8B$_PH`Xv7=8YCHY4iDX@7px}A<*%em=jTvk9^;x$MKLb%-lYz5- zoZ?9N_sNr9Dv5mdW>;J?R4Z#IpYULktJ1iSK{p#k{`}Hf2FmOro*>Og;;K5r00raY zuJX||z7u8K$5(%#W?vBYPmM3Ws$XeP9maSpG^SS3D^Zd5#+imZg*%r3t?Aa4|CsiC znH@Odt~`+*4Z1auSBO_0&3e1K^sbq@$AYT6hL+Yu47A%IyPuP)aOkCWSp7JlD`N5J_h-N`^`>u8^>14YSRJ+eA! z6C4Va)F3s$IVv{lo0A~v6}czhlZD~$A5q#^N`o=`J_e`T&A)>1mu(|a!?ZKn9=^W` z6tme9kH>xt*%QuGu448dZt0(BtzX5oa1_%TPDL+9H7xcFkOW2wqBBHj_nt0Sle{nN zarRV!VsCv(s&0y$Yu=l)Md7H3&Ut{K-%uSrDpg1?>PLXRqk#(c)<8PuO3yB`0UU!L z#{x;q4Z(ZDdjx}}p`Z_GtmHsRDT!92!ynRQkNLGh4!@thIo#cxJSL)`dGVS74OFU2 zE+)K-Ob!n)FKA61Vf3gD^(Sc!TE6Z;NyPvQ#j^YAq*$ZIBX`NUOGbqexc6~~IPlH4 zzE^KLbG%Z^)F<#_UDH-7A-dD_u~W)urJK3UZh>&iij5zyzL!Z3DpP=v0E{!aDrsq> zbWO1|Y8sC3>u=ACbKVrBUX4zEaA+j5iI{C>YHTpet_?N3V`F6P7?EfJod2puxtj6f zI>3hv<+qB0-rz>V6hN3(HA#gC?W7Qtp0DM&1oMojN|=zc3j+JELj zY#I~Q{jN>T#L4&;XgjdsSANkQ^hSsO6MojPpBO0v+8Rjx{^Y0i?##Aos<^bhd5Sw* zjSXDvr=pVU zPJ0v%yF3yvwM-tpUlpzYzR_W#$u25WGgbT-M8P9nqRWDc&k8># zacbap{O~GT{+n&kqO`rr>bsAa`DXkYsuTe6c!q6!s&kIaJm zzWDn!iIGIwJ>pkavFi8$k+aFgRr4O@q|-zejVE)K^7#G|OVfTqcrtAo6SqhL^t{kY z$Kqvt#6V`i-b(4H`}g-N6DU8If7A==8Gn;U$*W1`^+{4mTfu7&Ey2VXL$31(O_G150&o~7K+UaS=S zm1VT=P|()1#FlE5$156s6T_;ZYszC|koJ-1zON7d*d39?f7M25Aij^yy*Vf@46wH{|ypAHto)&XmaBrg0UvL-S@1fx=>4fS! zj8UjNg(I3$)ynk3y@w`)?~A1YRAG;80QU))%Y#+{`#I^ZwLi!O>8X3`zP5uf9NSWp zdbRm0sMLfo`&@M&!u&#D~I<+@J5WZfLwCpreIpZe+Tp=* z3F%P$QjsfO_0SLZU9>IGe^5c0yFTQY_+x$E9_FL3sil|g?`iyOL5sI|<^3)Ay*9=h zu!ovjy4)XDmSY7w{JFqkA=Wvj7028<9lF#q&V3 zPGIlQM3aX(?s0@4rXQTa%f}Co&2rMVieg}Z9OF3wD++LuI34c&D7moKXD9WC@E^Hd zUrSxz=i?9=hH*^H4pzK8mCeo_;u1hZ2DdmZCadfe8e;|b=6K)Imh&1}trk<1%|cPv zSGJa3J!GtD+z^vPlnRSLyBH(Iwd=ryWU8vE%w%zZ59Me0{g8tjHwt`%kPfjYU5LMZ}k+-MK@9cN_4vZe|sd*jw+4 zM0u;|newpqIVAR9QCuWYQZBHsn>5A_lDkIzFPX}JBgz7jBK@#|+}f)DOk+Bs=y%|& zrJJs@LHElZC|&J}$I-f%+APgG%FG*Z0)!a%n}GuuPi z7{t|)z`@TzT8Xz>*>h3syyo^)>?OD4mHrN1Uo_pkGX>KpxT)NGjG*Y9^d8ro3A*0~ zgZtGS$gwh@4UwFKSCVg9D}VlUvx^y#K-(WP#Xh?8N}r27>b-hOPao;=oBQ-O@m`#H zAp6H4D|h6c8dJpQZx*hBz>h)d$b6FD6)(O$7_W4Nk+4FIe{k!%HfZM_=q4Z4>YDxe z_3@$-eO=I7A(BdOyjPG9i_e-_RAuU_tf75q$Zjv7qS%d3hc>k=^rExBXA@!{BiD05S}}YB+)caO z%r>7#|JaG~=l=nB;W5i<@T3FO2 z%W3&dYc)Kc36~peva~e&>bQoXe)UV0~?oY@4*GX3WBe4@A4R8SnQ_0i zOxP}gcz%u7ct<<`VXV=bsK5M!JSsKIFoz_FgRP(OC!h5Q^Uyj$@1YwaA$DiZ!E*ho z>u^6NgelYOA%dCZhPpn_SNf?7y8uh4j3!W4j%*3r!?yX(#BbT^906BU9H!zZcBVT< zmxvO^e`?i;v#s92*TE1ZpdQH9Rn4lEvKm_*1uir3jeP;RT|o_+DitYEmvu)H!zy!Z z#rfp7f?qpvmuYv)Mc-!5i8Kzpf%8IQUL^Nz+czNi>9o9w6tbzhW|f&+dp&8T*ZjpF zAn-&THBLvt8KZz;t`czYAM=30Jn(0GmYh%y1xUZZlWCNI*3rmA>dJoDHgDX_U@yHw z_Yon-?<){M;FuX6Xij0uL_E{6)qY}O-A0&|&Au2;U|#-folMo&z?tGsLtk#Kz;8L~ z972%RNsYY?=7LeTtKi_#X95RONcL~Yx1~qhGYq2^`|UTaJHF#FR#Y%L>UO~yf_=W2 z67sY0>9$P-G?-`oPiJ3Dy!9hubE>GoOuH_~`o@X4)54E*hBi|aJy0R)c8Dk^iOncL zz9k@Si=4hD+V5M!?QRY4U=Hww!qxNH1qM7@hr@Ky8(r_mfE}TY|EGa=6({gWCDcA4e79Y%oRN z2QId}gKoKCTra}ta%<+V6ZJkq*ABJQ!+$w`Un{&o_$H*6fNb~v_sN0URY4YHE11D-cEO`3cY?(II zzY)%?#lf}x1ZIlW&#lt@7sK_gHe4nl*^d+n41AG(i8V9t40%buGZ!dzIn_1E_(rD+ zvVtdi;n?P3AZtR_5oqUAzL~iKWyHPk`M{ky4T?P0hwIfeDk+PDM)IC9G(u!#l-d_( z0q7I{*!MD!tJ^){@Dk>4)4Q(XVSkIxs@=`WO-W;bmk`cyE2LrpNw_st_0g48|Dp0X zj@lh>FX8;f(2t^Xcg>KmIv-w(-BAXG4XiKce$Ec=?4OaMh)BrVr&0NQ;QIr>mzc#u zd1oaf(B=o=7KC006)2jX_CV`$a}^I{ay!zVYQhl9HeYl-6Ja=h^!5X~-DE_0`IbR~hGb;?`W;);(vp%PbNU9r1YoqK|$y{U#D{rsLDWj>$O-lpH-o!Bfe+Id&d5350b%&R%|09)4*!g&XJ3KsOt zNj`ItYWxP49!p){W75!WB`WqZ-lXJ$wA6nSeiLZq z{;&%}?|Oir))F`@xH}h84;HZDQyB&12NH;}ds3x+Fnxe5l^b?US^yqF;4t7GRDcBh zx^YmSWFh@mf_Ho(=#1Lkf0Lz53X*pKJrSsP=>u1T7sclBfUNHQ6a-DLk= zXLv|q9**UCb$$XDum-B%%|Kz!Ew})7M78C+*t;Kxw_q(t8jbY3Vcmf653cm!x(e!7 zSZytWrWyCwp3XW_a5N!RH}0t^2+^eFwWCw0zq;G-8(jG74hiHrYCh7;BcN5Ew}6;0 zj83VvlRlJER3(9>0y268Yh$E8q@PxLADi6M6;9$OF=(P1dhg$x)K3wE(1N;Ta~`03 z)3PXmympppFAz(rcV8frxIr51|5wMB-k($DLZ=-BqL&9Qj-Y9(>Zw#bd>Z&a0Eg|G A3jhEB literal 0 HcmV?d00001 diff --git a/docs/README-unnamed-chunk-6-1.png b/docs/README-unnamed-chunk-6-1.png new file mode 100644 index 0000000000000000000000000000000000000000..5816314b475244ab90dc927f5c4e9a0411b9e7e6 GIT binary patch literal 7694 zcmdUUc|26%|L-_v7+c0(h8$ZakwRnVWG6C`qU?sdd`bIy6r=RD8n{e12a&g-!;^D`q52sQ(K z?F$G503BpBJpzHapnV)kt40Y%7jN*V{)v*5$^S&iByuH*#;v5K{bUIVvND4FPoGRe zkZD3R?E?`qxpJI5zF$c~RFae{$;y?L2ZYM;%F6NaN*aBCymEj44TUmJRvssl#w%%w z{EtZ!2>#2SkI-4DMAfX6Si{Gr#! z-0a&}a?#ZSkb$u$n0U`1ka0Ea2q`QYsSkk=0MKz_(BxatEhG{U12G^Sj9~hIk@Y}_ zI+8b2zTBGm=C4H4WO`fB<)twvbJhC9)ZOG4zkCGKSkc@`>uZOlq#i-{wdi1%+1Im< zg~hEyS~oIa%ajcE>?Y? zoNcON5C3+bSoPH}e@xLmcd=8PklEcK^!$42)%K!ryQ}hJKgw4#Uub{08M0kF_GRN* zXy&t0{j*@$a#)LcPVK@n#dFwZY)SPPhOg7h9}84^0wD3_r$obS+-_EPq>Q>3NX$$kL>5y z~KA?;reoR;TaSvX<3@@OkXO6%Tynk(YP$tU(DB0C-Btu z^qjX}-KMRzLPp{S-?N6IU#B}@3vWHk(x8%^xSY!~`?5H=!`xyA;0Y7Pp=xi+9cHZE zyMK6iu1OF*>^bTwkL5!98aoahc2T~fki`yh{ouM1V=%pQWW`OI!El5Cp{5XX`t9_?KVTjdt zx&emH1l#MrtDE}T$2dRDjwz0YbZy4myO&l@`Y|=Q!2O9MttU@~r98yG5Q+D=S+UW9 z+WEl%Pi$Fz_`_@}(QFz;0sW>^t3!n!L(bY*>Oq^1^nCmVNHAWBI!omT?g)WoIZW)? z#SSfM@G>w^yM`&YX@D{iAek54rns83efM&P$KzO|!xz z1knDvmak)SZ6&HV#}R|$^cU~HEaNvL-S75&Wfq)OVn(+WkGANB*xZ{$A>axKOtRQ8 ztz%ZD5hG2puf)KZywBU7tF24DtdJ0e^$Qp`6NJ+Al6rdC^4X z*W7@HI|dDu053V6{Ubqw*axwGDMq^gF(3jt2*8TB8CitMinq*Jw1Zw^fIIXSxBDCLCMR7auB&dDDdb zoLv#b#%z{c_KNx|X%_++9%6G7p{1^ghFw=vVS@2u)FUy>SMXikC4mt>IW5|}n%;s~ zH5I~i00WyXBz&cF^7kVaF=l(6KjKI0h^lrJ+g-I~kL$gf;D=kYxGVid(sdOCprk7w zYjP4EPBR{(htqxsOz)ai-hdNms{%$J^^h+;3NqdqC%p^Bem4|<_5~!c!8izv4p#^h z2PosQi@cpp*l;z+a(->T;^4p&_sUCn-P`W56foHd0@jCiH#}^+>ele)sz})cA6%yn zxMlM@M&Ugqf*iaiH~1LjgEKgbYr+cd6WrhHzP$qetyB}_6@BK-;N&(2oXP&#+cTf- zB0n%e<53H_>}z}46$d3Hgy5T&G0+mHERM*3{ob_`ge5tZC`h4P(DkZN?BsKUBQ&B6 zVZw-wW{c}i?}0Nrik}{jF}_5?b8@xDLZ7Pd_%{0S0Nab@M`70THN#87E-WlT0XVRK9k<)kj=VBI4ioA~WGH{0VH+ zuh2u#A$Jb%y7RBCGGWBY%lbcK_4VXAyjJhL(+AD5PCo+XrH3xSjXgz*noPu)vcziu zKmjabpl*B;6V1MEoy6?Z4}k7hMP5tOb>rV5b~6`*`$2>;dU}Y*3=DOZZ&MS0j6c-6 z-K>e0M}sI>ec?p&oPv0bx&<0$pd+I=KXajES>-56aKdCz-$#YhUD z48Yc!_lJIJ^XbbGoB_bAzIF`{jNwh(kQdy~^2P#4hu?nF^vnf9$8SR$9OZoYdr;vO z44@;H2L(v<*n*)7fnp;Ph%$o(QULxd*QM7r|WK3BLbjgDCWyZD4>D&&B6AxUsefS@JeSZadzUQDLA=) z(v_?8308;z{;}diW~2sA{(i+W4A6e#x6dUd{}Q2BfXQ4-5{= zLg;U-$j5ay4{kp4zX$D@YKnT=VBJlXZ0naBzNI^vfUK3Q2zgmdUnGd)3q9Y`R8nyh(99eqv2NF^%qO1onkR9xT2~entN{NS^Jl*7Szu9Qu8Fh??0>A>)QZD z#qwPfW6N5@8pauOOA2|-$D)x^x|;hKdcK+%14SalgmFUF-50^{BVk(9vxo~YH#P)K zoSWC8Qtk+ocf^#oYF3-P-Q`Toqm&vI!U`hGsytrlC48&KoCP;7IK$d-T#xi zYA>*ouJA@ZY`Ahr^?@0vqT6-ZZ>l~xfQv<5y>7+$i>u_!Zt|}S{JgdNqJGmwzgtgj zKGyi%V4++9;b;A^#rQK-UONwr!r!BL>%Zi_z&7FG+uRG%%Sc)MQw`87ZywqVFuy*1 zyK=qsh-+5(gZC)(x0okTp|?xFb~Ln&{`RXw^Y}3t)nI_>NAP`(4~z8A&VqdkyuoFv zp@*x)`=3E9t@yFO=O&Ka-?lz-^hHEB92@WUoE2TryqXwgheBG2dJWv}H5T+K8s=Ce zK9jQbczCSoyEl&5BO#5?bQ=H#5_NSlsZ($w>9gmMSKw*yRgu;Le_FPGG=@% zK_ktcozt!S&Ej;*Oo5pIe+0U1Hlkt(a$K|AaGE6X$Z&5Jk~5kX6-v}kYhP?qzbfdh z?&wI_GMfyvOBkwk?kM|m9p5dcjPrWcv{e0rv`nbjsk=mP^ z4t|}&UU!x}l^}M}H@zNUg$7lK#I7p@~Ugu8I`dZ|rVL?|7hka=UVz%0VS~!MyR*YyK^xFEi9& zWuNGTNGLu+`mA4Q#3nCV?8|olUVzfxZe^fL_fpXvAu;3okNa*PyZX`GB_q7(SJR2O z@5hqyT+)1A;_mR#T{xf-R7IB)?t71SYyZ*&^ z@weLJC=_}gF(#aBA{A8|AQQykf2R;IjEvHWpx1V6Qr z6_XAqP|Emnt*8`P+!;9VkoCSR4AESD?XfMXt>PAJeLldi zQ})pnNOWg&4X2*#aP-`yt-X{GXPg(b~B$O*F{&^QEj^mIh1fU*Bj+ z7$gI<-3b9)w~T;<#79?HV3E{DNH!EC$QFo_t+@FtiKB_y0g(03EhZtjIW4r0fBx(&lkaH*}@- zjgTTnkB=l!N>?o2KXJ=(} zEo;=#P-Xf{Ad2M#_lTsF1s2y%9MspQa#ND#>4%YMmQ zKAz0LjUzzz^Qmw6MjLFK-wC{CM#`RU=f7*ftFdWL?SZXT@1DUV(m~WaNM^3{&K;A1 z$&NQigvk~N>!2VVo7?g!DhdTuWZA<7o2Lc*?uj+%>#|jU_0M8EBYGb46s5mL<88gj&bs*B+r@I()A(HX34f1|C@jF$Jz?uns0^m$N>#z?Rh09NPJZ%-Uli z%x>qv0aikQ*#>W?Jh>PaBTPMFrw4SRafFxCu~F|8`-6V{=x|zmU*)C=q8b75$p9hn zZoo$yTQ%`V$J-QS2JQ3w&=<>UpL`6QkeiVpDEEa@Ub8vk)AE*mKGuF7{Ca}iXXA6r z3uM`O;+g@sIdZE>kEn3E2Oqg4bJgQ} za{NqX^ZolHdMr@MeY)tUvrZjz1+^u{Cp+=8ZDX)0GqK)L&J+H~`XgxNwKbTmPbx6^ zG(UMx{LF3pMn|~-xZaD)+2ENF{D&w>FFNq98eQ>pwj2TIbZAo3KE!+LzU{!~DxdmP zrc?sOcRG(tm0tQQ)jJUhDAQH zSG)~&eeEYOR}-wdlUzZP#-Q>cEO3`MK0z{B9||Qm8=_ zysJe#G%w?I-%>^@e&@-dL5AAw4a<+KUZyPa#(Skq{S38A!sm7;?-nvI9({MiK^l0- zR-mU!!T!jZn?Pz}_1XPURad>Q1NH))>6bq;dt8$}Lhk^9=VC=SuX&dibzIc-{UAcv ziFYfMAy?dy=E7y}JgKz$q=P*$)8}6bYrYztB>cXX6<;k*=*)@}iqx3uGLPZJ?Qj_D zPT(<0MG4L4{Z1OuKXXg)ngoIvUmk)J=%0O`Ae`rRtBRQqkG={Y1N?F1Hf_g76BjymX=5ZqJ3KZ5wEI1QXg1cz)4k5odF#)) z04}93c2uko$8v!^k|B`pyZus2_4xMXW*3o7rq%@o#iJ;5aW zQ8&2zFqmfzwH_~pcjYKh1XGvUI$d)SO>__hvMbxC*Y<=t;5mre^`(o8J_@5BbsxH`qPw2i zIcErNHJ(d@3^g0pWwpW?lJP}D40)+@ii8iq8kTo(E@}XVQco-YDRSqWhJ3+(Vu2#3 zF(Y8yK?K!r>aD9Vtwm&5`=*G=zRp8Ra8uR= zdNJW{|ADaRf|(2r%MW%>IGuT;f!-j2(oP#{&A}M|%YY!ky*${!=%Zg2ENz#IaI0()P&!MgQ_5h78;Vn=KvZf~mL@a7 z>(Ix7=0@I+8r^6)Pn~SV+7d664T>QL<=#Ktx3W04T7LpBGpHckFG~aQ*-Eu*^s-!? z3)v+>r^})3)R4c`;xa~}!RFs`G;nYPWE&e=@>}9XXT+(R;_PkKFF%38Y%oXDWDU<;wVuJFLttO*WTbS&iW4|NWP*E`OAb)nX!PMz(CrrE8Lk*cNR^P6jd z!QYP#sGUVR3_U$6BR{)Z>Q^A8?keJ)L|B^TvPUc>SGvT#>9PO3a_VpY@>bUwlO=x_ zi4JSgyBKY%S;$_JRik(Ar~Sngomqj0qrDO>h-yK1Gv-$+2^zy8R$;qEt~sO2!@*OB zQxcR=%HeBVm9sH=#G@Q>);C4Oru{2srU%yQ)B7YY!;jy1T3mDe3X~d-{;{4$!h1Bn zZ^cYxKFj9zWxW76gV%Rx^h!0v`fCymZ0qQE%s8LBq*KLGk?!uTI*(^SIe=xR@K9NMEDZ>Aw+APTCwOQ}%xu z>9-pEKq7tew^I)Gj_>rC`4>5|1@F8Ph{^%fwDlV-4gvyF2 z%IwI0SF}sS09F;cV1;r+Jq+S4Nuh_+Q6c<4ya|Wp^%~Dob($|xYt>%|vmjmOW%DEh zy(ZH>?%y2kyJ>WtuxXNnr<4WFUouy0*ta%S%?*%~vPmt2mLoiu@})pb{=%ieZ$TSB zKKutbrJ)?MngZ=9$KpKtS>!EJqL_ZJ=x}S(LI#e=MK3oS!_xHLw{OxI4&c+51NdY; zf9c0HmbiyVevx(i`UDYVZGJDh@fO=hNOY8$biZ}F)SZ5sSL+st!|3NAjS-15?DFb+=nI+uJkq#)0sL8lyf7-5@c23y- qll6%T{fTrCqks7SDs*^fpV3B)*SbsfUdKUP*FfjI_H#|Ui2nkUbsQD| literal 0 HcmV?d00001 diff --git a/docs/README-unnamed-chunk-8-1.png b/docs/README-unnamed-chunk-8-1.png index c2fe638f5a6b6d4096f816474eff1c804ecf4ca3..e3274b2419cf3a338c1273841b4c7d4d94032701 100644 GIT binary patch literal 2867 zcmdT`c~H|y8jX^WaD^iVkQ;Ge1mqBf7z2WnKtKT%1ym45nM4EyU}eXqLftA73J zySUTOOGDK_6$Aolc;m6VL7){v#Y~4ODUfY4k0r$ty>rJNoMHum&>#>2ghqqVR1kr! z*eD`2h=5)mR5X=O_%lr)pb2a?fi0(^K~zP80HX5QRKA=|0I}t4wp?CMB5{g}_*68X zuYl!>#4^mMDk8aj8Mw0@4pH2u5{us#2Li#Hm*)yj%-skONcEUE)?-f+ZR#5DP=&L; z=gdp*g1T!rA4CQiynnYe#DJ~lsI9qbyFyCpYRw@=r_w18)%Hw!6d!u8md-K@HUej7 zgrCr|g_B!7=qQ*j6d3vc1N}k(NK--m*}oKW6B$B7NJ3%}>mYgsSXaFP?0!H_BMaBL zf2%Zet#oYu6;cCGxu+W?&miffG)SYh(iR$A49I_DEG*UP$txb~G}^s!qGni?9h5Bu z#IOxo?0akPzk`yk%1OM&dL2P-OnHH?Yr1e<|6-jW$TDqy_}awY8O1FQCvzkG7ZEAq zMJ2M>+^qLh41~-)dzKP;+H_u`xu_1b=)1J*}-{Jz<;rzG4=zf`W zyjsT8xSk*~R||mpKbf8)%5~l(+rD9!hgxlm^|AJ18)T-&x`A0`N?tXzt!u$|BE;Eg zD#qTia&9n~b4&I6GHseh$#}Y@E{=tP>1GA8P=bqs_;UrORpw6MZuk(kTJOWrc}A$? zm3)=!7mvRWbApFD@*JEic6_Nt_;@-ny(^sBGUY_LU6HRriMHjU1{+>w)G@6^qkclj z)=y<#`C#`wc;TdE6?hJz{lfptkd_9JsxEEBS1ZU(l=H&)9LM1>-PVAH_}9IKKg9Yd zIJHybBkg-y)Z=sfXI12hSIdqY2HQR=Nq>uwP1Wq%(gL`1z-voIR#5+TeT0mI?%(uX zj*#bJv)@SipJ~~Th8_1f!h`@LJF)-bb9CJ$XPLZ&Mk>UVhwO!!WbJ~K9uK1kPw4M; z@U5Ep>u=h2<+OP6O`00OY_=-mug`;nU1yAe(b4?Qhl8IpjA+`a?Ta`GP8Xwal0{5p&X|co1#nnu-B9n z2W`w2(v|s$CMNyClorM<^@n^;+ur`MUtlJtC+Vnf+8}0p3}zj}H8`VjqRAVkwthYM zt8rFG!QB)TIfkTVK;|f1;A`ziaM`2RI(>tZ=69iI9mvG2m<@f|2@e0}J%kftU)N2)HY$xPxFt7aj_Lwc(_V?l#!CT7BlaBXjE;~$Y8XYxYY73u( zW;ZYW!`7k4{NHyYzt7|$o=Ylq0HOyWL)*g~-pR}u;@)}rnxvBoSHrRX&eNRAgmX^h z?h8T>%T*W$u*B`tSnC9m3@y4P?3hy?!ivlgs);4_XwmC9voEUOjM0xm_D>Fi$;cS6 z<~p3n>@*Cnrj!isP`Ku-7G`7OIiZJ^t)B_G`RNlukZAh(SecA-)*|VA(k=X6qeRyI zY}f(5d6GJ5_uGgtp7qnVV3>(g=_<#CH^vtj4~@y3bR$~|(U|n?=}UkoELbzxhF+T2 z1DrBb>8PXR?!J-pc5TQ*&PvA9y?A>72uVTAm1IDb(>7`|S5Fk?3(H)fnvZu-9)rhw zd{x~};&rhTn&6R{zt1t$y07PXLiyXPj$7ksX(6(yCSf;^sblV{lN%r77;F60pT(JiSQA zIS$B=dTQ#q=5jdmZZpi}s88v{XEnFLN-q_Hg*4@H2XHIO^NX!B*-C?8aVAyp8sOYA zZf0m>A{`8S=h72*aoz>9EWW1O;7JCCK%O#F`!E!fn=ACr;9WRaDtrGrKf51xePdzn zgm~CKCba&-*OW==(wX4}Tr}9^`{R9K<7M>SldAJx62#eFw*qKVhJcb+u6bdM23Qx+EV$ED{qr!-t# z9Tzir7HdLz(^Kup(JnCNijSzb$JL|QROHwtQ7gs2n!V&1n-gAQs##?1Nv{y%!PP<{5tH6woB zVuA9cb1P9BH`^;%>+hieX(2=SDC+Rw(({IrW96`eMkfP*v5Df|y`4n)v}O9I-*BwZ zO*$2mM=xF2i{|t| z0}kiI1nme3!{GZ39xwF)ZXqBIukrYwv^pmKu?y+9hpmeHYNH1VR5Y#n z1wjYlgRc{6=J7I2ad@)V@w{B9!YZ9^^Xt%1u7Uu7jh@bAll^6Z!vMHc zw>MC9D;PZP+xP6(hAivL84ppvTV8t!*!Pw1P1*<~-l#}1k}#0Rj_FksbJrtH{OE&e vy}B<4l`eOtrO0i|=e}DCe+Kz)8oou%5hOP+;}Cb{a`Wqr^TSqc3n%{pC6q2P literal 3679 zcmds4X;f257LILzASMJiKoC%HWwT{9LVX!q^D4#>Dg&2!f^A)I|xc=f{4V5q$1_mR*Fc=ty1|zVb3WP8) zf|w9LGz>)2ID{Wc5KACH1dG5D(J(ODk7gPHMxzmE91)8EV-YYc4vht25sM`fJxNS# z&d=x2FdQ0fRU}#tX{lx+Sv$3Y#-lpEO*vas`JYFv zUU|5uL#^P%xa6}yb7mx3OBpUB1wQ}(fYO?EuLUbt&b+goOYknuw)i&sG4*j`!rqa4 z*}w6tV_uf81`Pe)<qF;Z`Ov5CD(82HhnBMs^KPDE<&t}KuRkPf`3%UA}! zZ|ye37Spb|1%Tp`yUvlBkxmGaqBn5|S{JD$&(}wPR*QS?HxIa^tc))b&K8y`etqr7 zTjkeAtfiO+V%u@Hi$H77c%Yu|hcTigCQ3e0SikL4ICWls416Nv6?HAhA01}r%VYNk ze&(4z*2P6e2^qV5ohj7~Duu;drQKt=xUQ$?(LPO{p}hjz*|h9Xk}`!W zaY4O~T$HB`&SmaC>buD%GJ3~46~|VGNXlo4l<#Ar)Yqc5-XsqX5+_ixXvi{#LS6z;pBnL3aAxJVUXwr?c_U6{!=Q;#cLhL4Ht ziSX=o&T)(wIEYxZw~P!?Qvgkgh~!P{J)O^S(Q3i~wKzaSLOw9sQ4VW<5wKm^(VM+V zV)-0bx>~-C&pi_*meL2ra_=89N?v)49Qo?eRFIA^96QVFjJ>`M?xKF0ih>JXlQ98s zmls>Le3*~DW6+7|6_A{|nZbRJW0rFJP4~3pC{XDIg%lmuk|0*zaT<~W{4L8mydx3`cL|AvK$hnazFF*4sUrm!E5eZly)~lf@Q(| zL=j!~7|&%tkIkCWY@mM|AED|N7($$|K4|>o;P45nq``7SlgP5yJCR_^I@2nO>Am6H z3~sapJ)S({pVW!yFz4ymf=1M6v`=8x)%2as?~0eLu(@1C_cBs9y0C(~pNO#GspEKR zH8~^Xp8gp9KxG-o6zX~g9&Yv%T((=K+^5VD8Jlf63Av|Pm$-s$d^)b1qM*?Og&S)Z zszttQHj6d%$bX|{GAJlftJ~t^6=j>TFE{`03yuoVIdLhTI{C44gdDe#(H8w25mS2h zkT5u5Nuf{Tk>pA3-c%1lpE=XSyQ4Y{AFE??&pEXaa;%CQMeW-q9+XObX@lhsXoo=^ zRj}3v#OT#l#Y5&H4jb~F6~Gyvto0qOczXh7_*V%NbO~L5x8A5B9dOmz*UWq>gnsG)@@vWyx7QK}Cu znNs7@)Q`~n(G?f=ccpTf8b)1n%D_mwpW+w&GG<$N*I7hUa!^b&5>2?Z7Swa>Mk@zH zAizHSFFB0uJ%=yVhpWf^1gA(q8>*q-dP-MVj?TvojWI%ojIkW+8QnFnE%pt$1h5wj`$l^hswmH*X zJfmesiH_(BULmyTt9E8078ySP5wTeG7w8?$pnJFi8^?wL`K7^P?13OpG|J zEWQJibwhJzoi18JcU|zf(zD#{&{YZG#Z?I~Ba3e8a0*0A!(~n?f*o<;Xw~CIv7z_6 zEi&S$4GC`-d*4`Q~&924h+bwziex~wp>_2V> zjL;h<;2w){;UmeIEhqs1YU{3*Kbzdv4UyxD=QaKE)OZ@8X8z7HYPF0 z?}nIoYz0fm#e+K2WBj+CV=VBsXsLsBlkvmDj$Q zBCk_)3Hjgp<}Ad*^Y}^hwY7cI{;X#HJ^u0+oAg=tnKrf)D!Qn#J$Sxk^tBbU>2^iY z2)Cf9Noi$Tx3`~-z0~^IQRYf6ce_ir9G2--e>OjnXkWb{F>XltsmOJJ6*{zS>29CZ z1KT0gY*x$Lc*O_cL$2Zy$^q za_tO1a_E!R15tOp#qlWA&+*NPQ5$>&{5Q_e-v4sK?E^p`_%b>clfHB*Kfbakx&6BG z(}+;glAPY7^Xtk^x^~U(dt@1&<$Jx7{*L^d#r?R5k=Zu_=9;dVafzV~9a z-M0(c2i1ESP57j4Zx_{gl1c@tr7b?P!9u%dbC~0TkM*|W?Pkj#au_y;Zar$NuCy-D nhYscouzz!~{QYtBudGPwmR>>!V2ZWIxONUC52)gsPNKORenu9nj91hgK4*{j}7h2+uy)oNIJ#C?O;OTY*9q0 z&{5yh$EznYB;tWq)g3+5bA{qkjivV^D$+J9a(AJ$^p&j;h>OS8N)~X#&x8pA^+8HiDjx24?sCMI zjXK5eUQPtUr&^NB=7W*&a1|9?@4}mjpRS1aN=b`o*@h4b6InH7sSkn)tHsF5f-=;! z=SK6V+n2(H@!c#z1{B8#{PB)cP(v>J3la+lsvmnZ{j7pAxvRE>WbuLoUi0D=G`^%iTUt&N^uoN!cIAn4j$~l;MMEso;O4RS-7!$I@?@dh! z<^`k85z}NqUX{Kt`s=$J9PELb5Gmn$+CJ9JQb1UavBOpA;bLp8C~o?*9!oaGVjp>#Qm;5g5PYSgzetz{4AKcJ%(4f;fa zb-jjFXNpe1#rLWTZ*;)L0rB)Z7RLEAgf3_Mm%rn*YyOfMb+#)84Bqz?5Kj69(b-I$z_wbw%x_A=UUc`j6+%tjU5OkuOF)$pa3zl#>P=w+; zNaI5~{jisJ<}DH|Nv6dtpc7}ClxkG>lh%CA#Zhe|&~D48rUBKX-IZ3KFd{jS4TAE# zyYWH5`HX6`vzn>8ja)dJQoSCkk@$BAJsK{iCvghAsN`+D$35(gjX0%Upx}I1uVuN_7gV+ z%fBMGF*?~dsRbUA*VmR`mDuPY=Dd=)P&VOD01kIl$&rDqHuA@hb_ zfqERw5_Js0Y_%GU%3-DmYPp458$cA>=Vj>2E-c;1lvW=lG2ng%9iHhp3BeJ-YthZx zv=fYeGhqj>4)$EB`J2JQxLNT=Mdu#MRzd9-SM~zE@;$Y#msfuhuF3O#ktKNp-pSDcpP)YQ@372+cAITPs zkBwf0RED0~Gw*vFqhhQ~;5c8WCkAHJVYsmJ6I@W(NQfp$mY-Xu!w4@HaLzGDo%2iL z7sc(SonkgxsJd&nO*4D&ln3#_@C&v@TZXzbcfSPe+ToUOB3W1Al3y)Uc}Azx3YcVjbw*>j-qeEIKzE)a!ILL@;rc!Q6k7cJ@pfWo|68*wG|{(1 zeHZeAruG)T*x0|(_Eiza$c!3RNw7D!7F>?seTM+b@~WZ7Goi!pUpBNl{uyq)WNsn2 z>=1wOz;2QZw`@DQT^Q`3b93(aDCYZA{{17p?w+4L*qc^x2zxfxB!ra`l|ItGHsaSB zn@)2S`^av>XHt(P72W&l%*wF%aCfJPfLuXY>ggeN9?PoJ-$r${!%gp;?FlM0B*6q! z6 zrm{P)B2VE5=9-RLyqUW|o@{Dl9qgVrp8~lW|4oaxV$xypypDnQr>u9qlzqM)mF_g) ESBcdph5!Hn literal 3740 zcmdT{`8(8W8=o>`8Cx+)mZTwuY$e7xCEH9Rq@pBEbHb#uOvv7$nPf=}p)f<1sBB{! zyUzF6O|}%qh$-3EVvud#>HGulukZU@*L^*o=kvMm>shYnewJuETZ}kV4hjN+#Iffr zE`dOMID88i7T_~xyQVw*%G=J`-jZK~KqwH1079WaC<=(c;5YaP1tOq+7Yd5PCj2WC z2q*%B7q6y9L4hcIfdHbg85A}z+s=+b05NzB29H-08rqhc%BG;$Y`(%9sjufT2s}20 z$K#89g4ez=vCZ#Lgm~_nF9;;j^xO8ddB1VxkFy_ZVQL>pU7+1_`Br@>qC@{re|d)V zaNeSdzHB>>_pI`}r~#UR>!{rzX6P_KIQ}zz4Lh*FolHMlj(sSgavUZm0U?_M96Md) z|2u?BhqAo&P5u(9RV>p#3Pg6@+sX1Up^PL5H_jUuMNXB})s(jMh({-^EMDCztsgsg zndna!B*W*)=^7rhWCYUK72RF8iP-#W=QT&{+JG?Rwh)9o?*9Gn{OM$RY=TYOQC5N` zre$iXElh!#V&gaY@1p(PDp6H`u(98=yeaQ(no>$IT-Yn$=!57J*l~^q@_W^%)SiNV z=e3if0POfHwTnSuaaQg211#z9gD>uw*ex2g>NFH|_$=UQT zPVr0ac~k!38Oc|3?-@%b{T|W0vP!~^uJ~ZbdX&?dg*SEr-Y%Jc;KudT4K9&`w8pfn zxCg>jX`I60o1(?&n5mNfwTU`IU#(UU1jq5J8yAnEe$NW7pCjkIVT~?% zQ;z~NUwQgAc`Ai2JFWLP(eJ$4QYX#P0xm4!YTPuc-xbjXz8rEjp$~cB{Bjk|PxVyR zS8zTVCJ3@b!aifXakG`l!a&mrd4v`AvSPKsgC7=5x z(Sl_w^VE$$_y1(WR~hR;;d0KR#k=X7=tNyvp`Jc2koUA4Hu3>|1~*rD=!0ulS#AFG zyR|dz#C8ksY?nvEIjrOy8S3V-#E%6)x#TsOnu#kfD>*`*v{Rgm{0W@ti>)86c|lNNfSRNaN3nD>L};;8a~;d@w_gbKdqPu5GP+`NKVrGf(-1 zf2dnDT7Dqp=IW1)JVN2rf-Tm<3m@Ad*lrlkSy=*h%rN6cp zAwObE%nFO%&fU4(kb!9#Io`MS0|C?NAuhp`%*Pmb=+6=r8Hu}}c z=BJa#8;GxY+{wZF^f!W$&>X+IeM9Xc2{< zl+urt8VoW&BKCEkM(m}K-DW)_y^l72j?VJB!lFHykF(VR{crpIt!p*1EeDO}=$@)h zk4;ijT{#Di6v=7sXnz$2781$%1a^C&ree?z?wLF$GvZ0+?%egs%q7KBW5sMWksWuX z+R$IID2E_dwgR=nw-2U3P4ADuC1^yD;^#x*y(z?tlJ_N_>?!v2G6T+xSr)o?Rem7phy)MOAZCx}xY-3umet(r`936z}ccOoG zbKR4cy@=B=<_a$V!stP}qSk^Pw$wp24_p^}IUH~G{^4vlBnEU`JPMV+C zH?*liohT0+pVqhhVw8S!*~F7Ksk+fVnA@DIH9PsMgTU-|^NxLTTXX2=WRyvRWAfeA zaqgtqc|bw6rMa~5VfH*dA`UyRZaktXpE~qZ+!+%i1|drucS^`lw>Lj4YkG+4n>nx^ zR28(VajX^C)kC=(q6VdOGDkH%`LIcBD*GZa^vQ+3tedu2pfB3!d5bA=?>8uJl^G@8kni48 ziKp>Xq_y&c=+fapw6gp(Osunh^~)zc_z?W|w|390n`=N^{3RmPkqjL2sug7k`KG`{ zeq>}LkRm@?0T}ghl(Zs@N?KgL7O-L1ds%-9(Z8=q@UpjDvE;R`EwXt_M>a=4790sh zTLE|6dxUOEW^OdI^sc)~Qll=4XMDE{dIxVhAK>uO`>3n@SmtQD$bKkJw87^pd%>Em zdWy?nF-PlbQb^@FRfh|!tZcg+8S-NVny*PLNd7Ilj+36A^{heTK^-5U*znx8?EKR! z*5c2H!;F`56BgBx2L?$c0Tve`;hq6D=?sV+(SH@XTOnShlSVqo;T%=_$lohlzQ3kS z6pm#bwPa=C!#byUJIa~pIBB=YoLq=HPAB9SP>P%bR_A(VrnX!QZwuVt#6#CG9S(^R z&CzA%K!4 zCP3Y>&BG+hu*6u)fG((ZHu}D-+A|sXJQBSc&HAbvxW`_6H8@7QvSH?zZJWCBY8}`? ze!);;VC}n+m`@IeXz#gd{|YO>zkt*OMY_Xw*aVmF;(Fi}Erq8<7H_7vQ6hbM#=Tso z<|6T|2QK>LH-nE~>?^K49Z^Rfk?83SxaA;-tTh9e#Lc=U>1BMji}vt*sMosnVIwiz z6Y}|S)H}d;Nt@c;b!6x?=A+LrDz#>TEMSrTnv*nQ>jxfkzyb&n6NyPC`uPbbk7edU zBc2x}q(Kf^lv{^_?;j#8l@(>qG` zH@Qf5`!}>+W?L&h-s*yZ9WmIf+qFR}&G7!wH+VVQ3+=jAFzO!VCiRO%L5mna%q3HR z(=3u>k*Iv)n*uso#r#(DX<-P0PHh z1I724h}%$!v$jT;i6EcORFVMYayLvNoa&Ru0ew$82@yJyPemX>MibV+9?o~Y|NfSJ z1b*SKBZS=f5kll{G=U!K&pITUwYlrxxYO9N*`>lj%r@ldBrYL6=fK%@K1XBm+`~WK z21FZD12)4g0{9`}%*M?EvW6@h#>GBpN}fzV&TYic!ES78%)#7}c|mHM%EjRQ&PtEe zCrMXdaP?XiXMaR0KhW*6N_`OHy>rx%>*Kqn(q+60MhyG@F@Q*GPe@eyX1x!fMRyc* zb`@x+{SK(>$QX@4B;m1%O)Kv;fHlOh?)(6vRzqi7S^M$+!m#ibmOn3 z+EnW-^O<3_x4WiXzHf}l97bRcHWANTbVZDa9Iak7KOQW#V_sX(rnIQ~7K%>F{$zP4 z)8bU375zcXiY<32g2RxISIpp9ZuHX}(>Y}iTcwhiZoF-`%-o0XGndc5%e~YP zKeXgiecV#?9cEswCtGE+#LdQ!=C#E{S$=7;x>WsqS$VGRfCn$PubDzQll~^V!p6rv z?)GrLd*gWiPWjD+3yJ^GlA3ZSUkt||7+&dEL(KlvcrB1u^^x>DFovtbMHZ_b(G`X=_nz Hh9~_8ebEDt diff --git a/docs/README.Rmd b/docs/README.Rmd index 63ecb38d..36a5dbe9 100644 --- a/docs/README.Rmd +++ b/docs/README.Rmd @@ -15,7 +15,7 @@ knitr::opts_chunk$set( *mvgam* ================ -The goal of `mvgam` is to use a Bayesian framework to estimate parameters of Generalised Additive Models for discrete time series with dynamic trend components. The motivation for the package and some of its primary objectives are described in detail by [Clark & Wells 2022](https://www.biorxiv.org/content/10.1101/2022.02.22.481550v1), with additional inspiration on the use of Bayesian probabilistic modelling to quantify uncertainty and advise principled decision making coming from [Michael Betancourt](https://betanalpha.github.io/writing/), [Michael Dietze](https://www.bu.edu/earth/profiles/michael-dietze/) and [Emily Fox](https://emilybfox.su.domains/), among many others. +The goal of `mvgam` is to use a Bayesian framework to estimate parameters of Generalized Additive Models for discrete time series with dynamic trend components. The motivation for the package and some of its primary objectives are described in detail by [Clark & Wells 2022](https://www.biorxiv.org/content/10.1101/2022.02.22.481550v1), with additional inspiration on the use of Bayesian probabilistic modelling to quantify uncertainty and advise principled decision making coming from [Michael Betancourt](https://betanalpha.github.io/writing/), [Michael Dietze](https://www.bu.edu/earth/profiles/michael-dietze/) and [Emily Fox](https://emilybfox.su.domains/), among many others. ## Installation Install the development version from `GitHub` using: @@ -54,11 +54,16 @@ lynx_train = lynx_full[1:50, ] lynx_test = lynx_full[51:60, ] ``` +Inspect the series in a bit more detail using `mvgam`'s plotting utility +```{r, fig.width=6, fig.height=6, fig.align='center', message=FALSE, warning=FALSE} +plot_mvgam_series(data_train = lynx_train) +``` + Now fit an `mvgam` model; it fits a GAM in which a cyclic smooth function for `season` is estimated jointly with a full time series model for the errors (in this case an `AR3` process), rather than relying on smoothing splines that do not incorporate a concept of the future. We assume the outcome follows a Poisson distribution and estimate the model in `Stan` using MCMC sampling (installation links for `rstan` and `cmdstanr` are found [here](https://mc-stan.org/users/interfaces/rstan) and [here](https://mc-stan.org/cmdstanr/articles/cmdstanr.html)). ```{r, message=FALSE, warning=FALSE} lynx_mvgam <- mvgam(data_train = lynx_train, data_test = lynx_test, - formula = y ~ s(season, bs = 'cc', k = 10), + formula = y ~ s(season, bs = 'cc', k = 19), knots = list(season = c(0.5, 19.5)), family = 'poisson', trend_model = 'AR3', @@ -67,6 +72,11 @@ lynx_mvgam <- mvgam(data_train = lynx_train, chains = 4) ``` +Inspect the resulting model file, which is written in the `Stan` probabilistic programming language +```{r} +lynx_mvgam$model_file +``` + Perform a series of posterior predictive checks to see if the model is able to simulate data for the training period that looks realistic and unbiased. First, examine histograms for posterior predictions (`yhat`) and compare to the histogram of the observations (`y`) ```{r, fig.width = 5, fig.height = 4, fig.align='center'} ppc(lynx_mvgam, series = 1, type = 'hist') @@ -129,7 +139,7 @@ plot_mvgam_trend(lynx_mvgam, data_test = lynx_test, derivatives = T) We can also re-do the posterior predictive checks, but this time focusing only on the out of sample period. This will give us better insight into how the model is performing and whether it is able to simulate realistic and unbiased future values ```{r, fig.width = 5, fig.height = 4, fig.align='center'} -ppc(lynx_mvgam, series = 1, type = 'hist', data_test = lynx_test, n_bins = 150) +ppc(lynx_mvgam, series = 1, type = 'rootogram', data_test = lynx_test) ``` ```{r, fig.width = 5, fig.height = 4, fig.align='center'} @@ -162,7 +172,7 @@ Another useful utility of `mvgam` is the ability to use rolling window forecasts ```{r, message=FALSE, warning=FALSE} lynx_mvgam_poor <- mvgam(data_train = lynx_train, data_test = lynx_test, - formula = y ~ s(season, bs = 'gp', k = 3), + formula = y ~ s(season, k = 3), family = 'poisson', trend_model = 'RW', drift = FALSE, diff --git a/docs/README.md b/docs/README.md index c27bf8d6..ed5fcd62 100644 --- a/docs/README.md +++ b/docs/README.md @@ -4,7 +4,7 @@ # *mvgam* The goal of `mvgam` is to use a Bayesian framework to estimate -parameters of Generalised Additive Models for discrete time series with +parameters of Generalized Additive Models for discrete time series with dynamic trend components. The motivation for the package and some of its primary objectives are described in detail by [Clark & Wells 2022](https://www.biorxiv.org/content/10.1101/2022.02.22.481550v1), with @@ -83,6 +83,14 @@ lynx_train = lynx_full[1:50, ] lynx_test = lynx_full[51:60, ] ``` +Inspect the series in a bit more detail using `mvgam`’s plotting utility + +``` r +plot_mvgam_series(data_train = lynx_train) +``` + + + Now fit an `mvgam` model; it fits a GAM in which a cyclic smooth function for `season` is estimated jointly with a full time series model for the errors (in this case an `AR3` process), rather than relying on @@ -109,33 +117,159 @@ lynx_mvgam <- mvgam(data_train = lynx_train, #> Chain 3 Iteration: 1 / 2000 [ 0%] (Warmup) #> Chain 4 Iteration: 1 / 2000 [ 0%] (Warmup) #> Chain 3 Iteration: 500 / 2000 [ 25%] (Warmup) -#> Chain 2 Iteration: 500 / 2000 [ 25%] (Warmup) #> Chain 4 Iteration: 500 / 2000 [ 25%] (Warmup) #> Chain 1 Iteration: 500 / 2000 [ 25%] (Warmup) +#> Chain 2 Iteration: 500 / 2000 [ 25%] (Warmup) #> Chain 3 Iteration: 1000 / 2000 [ 50%] (Warmup) #> Chain 3 Iteration: 1001 / 2000 [ 50%] (Sampling) -#> Chain 2 Iteration: 1000 / 2000 [ 50%] (Warmup) -#> Chain 1 Iteration: 1000 / 2000 [ 50%] (Warmup) -#> Chain 2 Iteration: 1001 / 2000 [ 50%] (Sampling) -#> Chain 1 Iteration: 1001 / 2000 [ 50%] (Sampling) #> Chain 4 Iteration: 1000 / 2000 [ 50%] (Warmup) #> Chain 4 Iteration: 1001 / 2000 [ 50%] (Sampling) +#> Chain 1 Iteration: 1000 / 2000 [ 50%] (Warmup) +#> Chain 1 Iteration: 1001 / 2000 [ 50%] (Sampling) +#> Chain 2 Iteration: 1000 / 2000 [ 50%] (Warmup) +#> Chain 2 Iteration: 1001 / 2000 [ 50%] (Sampling) #> Chain 3 Iteration: 1500 / 2000 [ 75%] (Sampling) -#> Chain 4 Iteration: 1500 / 2000 [ 75%] (Sampling) -#> Chain 2 Iteration: 1500 / 2000 [ 75%] (Sampling) #> Chain 1 Iteration: 1500 / 2000 [ 75%] (Sampling) +#> Chain 2 Iteration: 1500 / 2000 [ 75%] (Sampling) +#> Chain 4 Iteration: 1500 / 2000 [ 75%] (Sampling) #> Chain 3 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 3 finished in 40.4 seconds. -#> Chain 4 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 4 finished in 42.0 seconds. -#> Chain 2 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 2 finished in 43.9 seconds. +#> Chain 3 finished in 43.4 seconds. #> Chain 1 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 1 finished in 44.3 seconds. +#> Chain 1 finished in 44.5 seconds. +#> Chain 2 Iteration: 2000 / 2000 [100%] (Sampling) +#> Chain 2 finished in 44.8 seconds. +#> Chain 4 Iteration: 2000 / 2000 [100%] (Sampling) +#> Chain 4 finished in 45.5 seconds. #> #> All 4 chains finished successfully. -#> Mean chain execution time: 42.6 seconds. -#> Total execution time: 44.5 seconds. +#> Mean chain execution time: 44.5 seconds. +#> Total execution time: 45.8 seconds. +``` + +Inspect the resulting model file, which is written in the `Stan` +probabilistic programming language + +``` r +lynx_mvgam$model_file +#> [1] "" +#> [2] "//Stan model code generated by package mvgam" +#> [3] "data {" +#> [4] "int total_obs; // total number of observations" +#> [5] "int n; // number of timepoints per series" +#> [6] "int n_sp; // number of smoothing parameters" +#> [7] "int n_series; // number of series" +#> [8] "int num_basis; // total number of basis coefficients" +#> [9] "vector[num_basis] zero; // prior locations for basis coefficients" +#> [10] "real p_taus[1]; // prior precisions for parametric coefficients" +#> [11] "real p_coefs[1]; // prior locations for parametric coefficients" +#> [12] "matrix[num_basis, total_obs] X; // transposed mgcv GAM design matrix" +#> [13] "int ytimes[n, n_series]; // time-ordered matrix (which col in X belongs to each [time, series] observation?)" +#> [14] "matrix[17,17] S1; // mgcv smooth penalty matrix S1" +#> [15] "int y_observed[n, n_series]; // indices of missing vs observed" +#> [16] "int y[n, n_series]; // time-ordered observations, with -1 indicating missing" +#> [17] "}" +#> [18] "" +#> [19] "parameters {" +#> [20] "// raw basis coefficients" +#> [21] "row_vector[num_basis] b_raw;" +#> [22] "" +#> [23] "// latent trend AR1 terms" +#> [24] "vector[n_series] ar1;" +#> [25] "" +#> [26] "// latent trend AR2 terms" +#> [27] "vector[n_series] ar2;" +#> [28] "" +#> [29] "// latent trend AR3 terms" +#> [30] "vector[n_series] ar3;" +#> [31] "" +#> [32] "// latent trend variance parameters" +#> [33] "vector[n_series] sigma;" +#> [34] "" +#> [35] "// latent trends" +#> [36] "matrix[n, n_series] trend;" +#> [37] "" +#> [38] "// smoothing parameters" +#> [39] "vector[n_sp] lambda;" +#> [40] "}" +#> [41] "" +#> [42] "transformed parameters {" +#> [43] "// GAM contribution to expectations (log scale)" +#> [44] "vector[total_obs] eta;" +#> [45] "" +#> [46] "// basis coefficients" +#> [47] "row_vector[num_basis] b;" +#> [48] "" +#> [49] "for (i in 1:num_basis) {" +#> [50] "b[i] = b_raw[i];" +#> [51] "}" +#> [52] "eta = to_vector(b * X);" +#> [53] "}" +#> [54] "" +#> [55] "model {" +#> [56] "// parametric effect priors (regularised for identifiability)" +#> [57] "for (i in 1:1) {" +#> [58] "b_raw[i] ~ normal(p_coefs[i], 1 / p_taus[i]);" +#> [59] "}" +#> [60] "" +#> [61] "// prior for s(season)..." +#> [62] "b_raw[2:18] ~ multi_normal_prec(zero[2:18],S1[1:17,1:17] * lambda[1]);" +#> [63] "" +#> [64] "// priors for AR parameters" +#> [65] "ar1 ~ normal(0, 0.5);" +#> [66] "ar2 ~ normal(0, 0.5);" +#> [67] "ar3 ~ normal(0, 0.5);" +#> [68] "" +#> [69] "// priors for smoothing parameters" +#> [70] "lambda ~ exponential(0.05);" +#> [71] "" +#> [72] "// priors for latent trend variance parameters" +#> [73] "sigma ~ exponential(1);" +#> [74] "" +#> [75] "// trend estimates" +#> [76] "for (s in 1:n_series) {" +#> [77] "trend[1, s] ~ normal(0, sigma[s]);" +#> [78] "}" +#> [79] "" +#> [80] "for (s in 1:n_series) {" +#> [81] "trend[2, s] ~ normal(trend[1, s] * ar1[s], sigma[s]);" +#> [82] "}" +#> [83] "" +#> [84] "for (s in 1:n_series) {" +#> [85] "trend[3, s] ~ normal(trend[2, s] * ar1[s] + trend[1, s] * ar2[s], sigma[s]);" +#> [86] "}" +#> [87] "" +#> [88] "for (i in 4:n) {" +#> [89] "for (s in 1:n_series) {" +#> [90] "trend[i, s] ~ normal(ar1[s] * trend[i - 1, s] + ar2[s] * trend[i - 2, s] + ar3[s] * trend[i - 3, s], sigma[s]);" +#> [91] "}" +#> [92] "}" +#> [93] "" +#> [94] "// likelihood functions" +#> [95] "for (i in 1:n) {" +#> [96] "for (s in 1:n_series) {" +#> [97] "if (y_observed[i, s])" +#> [98] "y[i, s] ~ poisson_log(eta[ytimes[i, s]] + trend[i, s]);" +#> [99] "}" +#> [100] "}" +#> [101] "}" +#> [102] "" +#> [103] "generated quantities {" +#> [104] "vector[n_sp] rho;" +#> [105] "vector[n_series] tau;" +#> [106] "matrix[n, n_series] ypred;" +#> [107] "rho = log(lambda);" +#> [108] "for (s in 1:n_series) {" +#> [109] "tau[s] = pow(sigma[s], -2.0);" +#> [110] "}" +#> [111] "" +#> [112] "// posterior predictions" +#> [113] "for(i in 1:n){" +#> [114] "for(s in 1:n_series){" +#> [115] "ypred[i, s] = poisson_log_rng(eta[ytimes[i, s]] + trend[i, s]);" +#> [116] "}" +#> [117] "}" +#> [118] "}" +#> [119] "" ``` Perform a series of posterior predictive checks to see if the model is @@ -147,7 +281,7 @@ and compare to the histogram of the observations (`y`) ppc(lynx_mvgam, series = 1, type = 'hist') ``` - + Now plot the distribution of predicted means compared to the observed mean @@ -156,7 +290,7 @@ mean ppc(lynx_mvgam, series = 1, type = 'mean') ``` - + Next examine simulated empirical Cumulative Distribution Functions (CDF) for posterior predictions (`yhat`) and compare to the CDF of the @@ -166,7 +300,7 @@ observations (`y`) ppc(lynx_mvgam, series = 1, type = 'cdf') ``` - + Rootograms are becoming [popular graphical tools for checking a discrete model’s ability to capture dispersion properties of the response @@ -187,7 +321,7 @@ generally near zero ppc(lynx_mvgam, series = 1, type = 'rootogram', n_bins = 25) ``` - + Finally look for any biases in predictions by examining a Probability Integral Transform (PIT) histogram. If our predictions are not biased @@ -198,7 +332,7 @@ this histogram should look roughly uniform ppc(lynx_mvgam, series = 1, type = 'pit') ``` - + All of these plots indicate the model is well calibrated against the training data, with no apparent pathological behaviors exhibited. Have a @@ -230,45 +364,45 @@ summary(lynx_mvgam) #> Fitted using Stan #> #> GAM smooth term estimated degrees of freedom: -#> edf df -#> s(season) 10592 17 +#> edf df +#> s(season) 9799 17 #> #> GAM coefficient (beta) estimates: -#> 2.5% 50% 97.5% Rhat n.eff -#> (Intercept) 6.7903687 6.80207000 6.81400225 1.00 6766 -#> s(season).1 -1.2195360 -0.69113600 -0.01805058 1.00 1148 -#> s(season).2 -0.3756616 0.23255700 0.87754060 1.00 1686 -#> s(season).3 0.3311623 1.08547000 1.74926050 1.00 1291 -#> s(season).4 0.7601807 1.71293000 2.40989250 1.00 943 -#> s(season).5 0.9775409 1.99061000 2.74627725 1.00 1008 -#> s(season).6 0.2905659 1.17240000 1.88569200 1.00 1335 -#> s(season).7 -0.8170403 -0.07231265 0.70870172 1.00 1568 -#> s(season).8 -1.3389330 -0.62788900 0.21804803 1.00 1527 -#> s(season).9 -1.5114313 -0.73440500 0.25402155 1.01 1289 -#> s(season).10 -1.2088775 -0.40804900 0.61770060 1.01 1360 -#> s(season).11 -0.5854214 0.26404500 1.15971500 1.00 1840 -#> s(season).12 0.1264563 1.17210000 2.02600850 1.00 1331 -#> s(season).13 -0.0829266 1.30776000 2.16766900 1.01 898 -#> s(season).14 -0.2867956 1.00881000 1.83292975 1.01 876 -#> s(season).15 -0.8963223 -0.11125900 0.52009368 1.01 1097 -#> s(season).16 -1.4019710 -0.79470750 -0.20794542 1.00 1767 -#> s(season).17 -1.5885960 -1.05080000 -0.39074417 1.00 1153 +#> 2.5% 50% 97.5% Rhat n.eff +#> (Intercept) 6.79015950 6.80218000 6.81431000 1 6808 +#> s(season).1 -1.20317400 -0.68312750 0.01746606 1 1039 +#> s(season).2 -0.34217647 0.25609150 0.90302028 1 1803 +#> s(season).3 0.38097955 1.10338500 1.79252475 1 1762 +#> s(season).4 0.80091535 1.72666500 2.44061925 1 1272 +#> s(season).5 1.03276175 1.99367500 2.72996700 1 1117 +#> s(season).6 0.29843772 1.17278500 1.89230325 1 1392 +#> s(season).7 -0.84398567 -0.08065355 0.68787680 1 1811 +#> s(season).8 -1.41318800 -0.64321500 0.20129283 1 1323 +#> s(season).9 -1.56880575 -0.76334700 0.31739575 1 1094 +#> s(season).10 -1.24017525 -0.42983750 0.64996255 1 1280 +#> s(season).11 -0.60767142 0.24961800 1.17260975 1 1705 +#> s(season).12 0.08591474 1.17380000 2.00801000 1 1208 +#> s(season).13 -0.03388641 1.29483500 2.15689075 1 839 +#> s(season).14 -0.33679847 0.99392500 1.82216725 1 813 +#> s(season).15 -0.96419433 -0.11696200 0.54524333 1 1123 +#> s(season).16 -1.42184425 -0.80551700 -0.22757412 1 1959 +#> s(season).17 -1.57080350 -1.05019000 -0.41779690 1 1377 #> #> GAM smoothing parameter (rho) estimates: #> 2.5% 50% 97.5% Rhat n.eff -#> s(season) 3.342319 4.193245 4.924771 1 2348 +#> s(season) 3.321265 4.190605 4.934154 1 2996 #> #> Latent trend parameter estimates: -#> 2.5% 50% 97.5% Rhat n.eff -#> ar1[1] 0.5480065 0.8894520 1.2333835 1 1485 -#> ar2[1] -0.6901515 -0.2757840 0.1333838 1 3345 -#> ar3[1] -0.3370276 0.0536795 0.4015857 1 1235 -#> sigma[1] 0.3656957 0.4580050 0.5918796 1 2251 +#> 2.5% 50% 97.5% Rhat n.eff +#> ar1[1] 0.5430310 0.89219950 1.2556305 1 1493 +#> ar2[1] -0.6911293 -0.27678200 0.1547917 1 2967 +#> ar3[1] -0.3486109 0.05792415 0.4070008 1 1333 +#> sigma[1] 0.3651319 0.45930700 0.5985543 1 1955 #> #> [1] "n_eff / iter looks reasonable for all parameters" #> [1] "Rhat looks reasonable for all parameters" #> [1] "0 of 4000 iterations ended with a divergence (0%)" -#> [1] "1084 of 4000 iterations saturated the maximum tree depth of 10 (27.1%)" +#> [1] "24 of 4000 iterations saturated the maximum tree depth of 11 (0.6%)" #> [1] " Run again with max_treedepth set to a larger value to avoid saturation" #> [1] "E-FMI indicated no pathological behavior" ``` @@ -282,7 +416,7 @@ component (smoothing parameters). plot_mvgam_trace(lynx_mvgam, 'rho') ``` - + and for the latent trend component parameters @@ -290,7 +424,7 @@ and for the latent trend component parameters MCMCvis::MCMCtrace(lynx_mvgam$model_output, c('ar1', 'ar2', 'sigma'), pdf = F, n.eff = T, Rhat = T) ``` - + Inspect the model’s estimated smooth for the 19-year cyclic pattern, which is shown as a ribbon plot of posterior empirical quantiles. We can @@ -309,7 +443,7 @@ important in the model plot(lynx_mvgam, type = 'smooths', residuals = T) ``` - + First derivatives of smooth functions can also be plotted to inspect how the slope of the function changes across its length. To plot these we @@ -319,7 +453,7 @@ use the more flexible `plot_mvgam_smooth()` function plot_mvgam_smooth(lynx_mvgam, 1, 'season', derivatives = T) ``` - + We can also view the mvgam’s posterior retrodictions and predictions for the entire series (testing and training) @@ -327,11 +461,11 @@ the entire series (testing and training) ``` r plot(lynx_mvgam, type = 'forecast', data_test = lynx_test) #> Out of sample DRPS: -#> [1] 709.4488 +#> [1] 682.8037 #> ``` - + And the estimated latent trend component, again using the more flexible `plot_mvgam_...()` option to show first derivatives of the estimated @@ -341,7 +475,7 @@ trend plot_mvgam_trend(lynx_mvgam, data_test = lynx_test, derivatives = T) ``` - + We can also re-do the posterior predictive checks, but this time focusing only on the out of sample period. This will give us better @@ -349,28 +483,28 @@ insight into how the model is performing and whether it is able to simulate realistic and unbiased future values ``` r -ppc(lynx_mvgam, series = 1, type = 'hist', data_test = lynx_test, n_bins = 150) +ppc(lynx_mvgam, series = 1, type = 'rootogram', data_test = lynx_test) ``` - + ``` r ppc(lynx_mvgam, series = 1, type = 'mean', data_test = lynx_test) ``` - + ``` r ppc(lynx_mvgam, series = 1, type = 'cdf', data_test = lynx_test) ``` - + ``` r ppc(lynx_mvgam, series = 1, type = 'pit', data_test = lynx_test) ``` - + A key aspect of ecological forecasting is to understand [how different components of a model contribute to forecast @@ -386,7 +520,7 @@ text(1, 0.8, cex = 1.5, label="Trend component", pos = 4, col="#7C0000", family = 'serif') ``` - + Both components contribute to forecast uncertainty, suggesting we would still need some more work to learn about factors driving the dynamics of @@ -401,7 +535,7 @@ our AR2 model is appropriate for the latent trend plot(lynx_mvgam, type = 'residuals') ``` - + Another useful utility of `mvgam` is the ability to use rolling window forecasts to evaluate competing models that may represent different @@ -413,7 +547,7 @@ non-wiggly. We also use a random walk process for the trend ``` r lynx_mvgam_poor <- mvgam(data_train = lynx_train, data_test = lynx_test, - formula = y ~ s(season, bs = 'gp', k = 3), + formula = y ~ s(season, k = 3), family = 'poisson', trend_model = 'RW', drift = FALSE, @@ -428,32 +562,32 @@ lynx_mvgam_poor <- mvgam(data_train = lynx_train, #> Chain 4 Iteration: 1 / 2000 [ 0%] (Warmup) #> Chain 4 Iteration: 500 / 2000 [ 25%] (Warmup) #> Chain 1 Iteration: 500 / 2000 [ 25%] (Warmup) -#> Chain 2 Iteration: 500 / 2000 [ 25%] (Warmup) #> Chain 3 Iteration: 500 / 2000 [ 25%] (Warmup) -#> Chain 1 Iteration: 1000 / 2000 [ 50%] (Warmup) -#> Chain 2 Iteration: 1000 / 2000 [ 50%] (Warmup) -#> Chain 1 Iteration: 1001 / 2000 [ 50%] (Sampling) -#> Chain 2 Iteration: 1001 / 2000 [ 50%] (Sampling) #> Chain 4 Iteration: 1000 / 2000 [ 50%] (Warmup) #> Chain 3 Iteration: 1000 / 2000 [ 50%] (Warmup) #> Chain 4 Iteration: 1001 / 2000 [ 50%] (Sampling) #> Chain 3 Iteration: 1001 / 2000 [ 50%] (Sampling) +#> Chain 2 Iteration: 500 / 2000 [ 25%] (Warmup) +#> Chain 1 Iteration: 1000 / 2000 [ 50%] (Warmup) +#> Chain 1 Iteration: 1001 / 2000 [ 50%] (Sampling) +#> Chain 4 Iteration: 1500 / 2000 [ 75%] (Sampling) +#> Chain 3 Iteration: 1500 / 2000 [ 75%] (Sampling) #> Chain 1 Iteration: 1500 / 2000 [ 75%] (Sampling) +#> Chain 2 Iteration: 1000 / 2000 [ 50%] (Warmup) +#> Chain 2 Iteration: 1001 / 2000 [ 50%] (Sampling) +#> Chain 4 Iteration: 2000 / 2000 [100%] (Sampling) +#> Chain 4 finished in 6.7 seconds. +#> Chain 3 Iteration: 2000 / 2000 [100%] (Sampling) +#> Chain 3 finished in 7.1 seconds. #> Chain 2 Iteration: 1500 / 2000 [ 75%] (Sampling) -#> Chain 3 Iteration: 1500 / 2000 [ 75%] (Sampling) -#> Chain 4 Iteration: 1500 / 2000 [ 75%] (Sampling) #> Chain 1 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 1 finished in 12.5 seconds. -#> Chain 3 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 3 finished in 12.7 seconds. +#> Chain 1 finished in 7.7 seconds. #> Chain 2 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 2 finished in 12.8 seconds. -#> Chain 4 Iteration: 2000 / 2000 [100%] (Sampling) -#> Chain 4 finished in 13.0 seconds. +#> Chain 2 finished in 8.8 seconds. #> #> All 4 chains finished successfully. -#> Mean chain execution time: 12.7 seconds. -#> Total execution time: 13.1 seconds. +#> Mean chain execution time: 7.6 seconds. +#> Total execution time: 8.9 seconds. ``` We choose a set of timepoints within the training data to forecast from, @@ -475,10 +609,10 @@ markedly better (far lower DRPS) for this evaluation timepoint ``` r summary(mod1_eval$series1$drps) #> Min. 1st Qu. Median Mean 3rd Qu. Max. -#> 4.06 16.79 117.14 106.48 154.41 248.58 +#> 2.815 14.735 111.162 103.530 151.525 244.586 summary(mod2_eval$series1$drps) #> Min. 1st Qu. Median Mean 3rd Qu. Max. -#> 39.99 49.87 294.22 283.56 445.04 666.35 +#> 34.93 41.65 311.68 289.32 456.17 675.74 ``` Nominal coverages for both models’ 90% prediction intervals