From d335b0a6960e118fe8c302ec99978171a46ba525 Mon Sep 17 00:00:00 2001 From: dsass1 Date: Mon, 17 Jan 2022 08:45:34 -0600 Subject: [PATCH 1/2] Added Section 12.5 One-tail tests --- 12-hypothesis-tests.Rmd | 100 +++++++++++++++++++++++++++++++++++++++- images/tail_left.png | Bin 0 -> 19400 bytes images/tail_right.png | Bin 0 -> 20228 bytes images/tail_two.png | Bin 0 -> 20297 bytes rds/ch12_tails.rds | Bin 0 -> 439 bytes 5 files changed, 98 insertions(+), 2 deletions(-) create mode 100644 images/tail_left.png create mode 100644 images/tail_right.png create mode 100644 images/tail_two.png create mode 100644 rds/ch12_tails.rds diff --git a/12-hypothesis-tests.Rmd b/12-hypothesis-tests.Rmd index 2961a72b..789c8ec4 100644 --- a/12-hypothesis-tests.Rmd +++ b/12-hypothesis-tests.Rmd @@ -37,6 +37,7 @@ library(knitr) library(kableExtra) library(patchwork) library(scales) +library(cowplot) ``` ## Decision making {#decision-making} @@ -203,7 +204,7 @@ Finally, there is one more piece of vocabulary that is important: * The type I error rate ($\alpha$) * Sometimes other sample statistics -## Conducting Hypothesis Tests +## Conducting Hypothesis Tests {#two-tailed} @@ -384,7 +385,7 @@ summary(movies_model) ``` We again see the p-value of 0.005, which leads us to conclude there is a true difference in means in the population. -### Ride share example revisited +### Ride share example revisited {#ride-two-tail} Let's return to our ride share price example from Section \@ref(ride-share). Recall that we wanted to know whether $\mu_B = \$19.50$. We could test this with the following hypotheses, again specifying $\alpha = 0.05$ in advance: @@ -416,6 +417,101 @@ summary(ride_model_2) This again gives the p-value of $0.13$ which leads us to *fail to reject $H_0$*. There is insufficient evidence to conclude that company B's prices differ from \$19.50 on average. +## One-tailed hypothesis tests + +All the examples in Section \@ref(two-tailed) were what are call two-tailed hypothesis tests. This means that the rejection region is split into both the upper and lower tail. A two-tailed test is used when the hypothesis claim includes equality. Then we are concerned with the chance of being either above or below the claim. + +But what if our hypothesis is that the test statistic is less than a claimed value or greater than a claimed value? In that case we are only concerned with one direction and it is more appropriate to use a one-tailed hypothesis test. + +### Ride share example revisited again + +Consider the ride share example from Section \@ref(ride-share) and \@ref(ride-two-tail). We want to test the claim if the average price of rides at company B is equal to \$19.50. To test this claim we obtain a random sample of 100 rides and compare the sample mean. +Our claim again is $\mu_B = 19.50$, meaning we are concerned if their price is different in either direction. Recall, we write our hypothesis test as: + +$$H_0: \mu_B = 19.50$$ +$$H_A: \mu_B \neq 19.50$$ +What if instead, we want to test the claim that the average price of rides at company B is **greater than** $\$19.50$? In mathematical notation this claim is $\mu_B > 19.50$. We formulate the hypothesis as follows: + +$$H_0: \mu_B \leq 19.50$$ +$$H_A: \mu_B > 19.50$$ +It's important to note that the null hypothesis always contains equality! +Now our rejection region is strictly in the upper tail of the distribution. Let's test this claim, again specifying $\alpha = 0.05$ in advance. + + +```{r, warnings = FALSE, message = FALSE} +rides_one.tail <- t.test(rides_B$price, mu = 19.5, alternative = "greater") +rides_one.tail$statistic +rides_one.tail$p.value +``` + +The test-statistic is `r rides_one.tail$statistic`, the same test statistic from our two-tailed test in Section \@ref(ride-two-tail). This means the test-statistic for a one-tailed test compared to a two-tailed test will always be the same. What is different is our p-value of `r rides_one.tail$p.value`. The p-value for a one-tailed test is half the p-value of a two-tailed test. We still compare our $p\_value$ to our pre-defined $\alpha$. Since our $p\_value = 0.065 > \alpha = 0.05$, we *do not reject* the null hypothesis. In this instance we came to the same conclusions, but that is not always the case. + +```{r, rideshare-p-value, fig.cap = "P-value for Ride Share Hypothesis in Two-tail and One-tail Test", message = FALSE, echo = FALSE, warning = FALSE} +shade_curve <- function(MyDF, tstart, tend, fill = "red", alpha = .5){ + geom_area(data = subset(MyDF, x >= 0 + tstart + & x < 0 + tend), + aes(y=y), fill = fill, color = NA, alpha = alpha) +} + +test_stat <- rides_one.tail$statistic %>% + as.numeric() +data <- data.frame(x = seq(from = -5, to = 5, by = 0.01)) %>% + mutate(y = dnorm(x)) +two_tail <- ggplot(data.frame(x = c(-4, 4)), aes(x = x)) + + stat_function(fun = dnorm, + aes(colour = "Z-distribution"), size = 1) + + geom_vline(xintercept = test_stat, linetype = 2) + + geom_vline(xintercept = -test_stat, linetype = 2) + + shade_curve(data, tstart = -6, tend = -test_stat) + + shade_curve(data, tstart = test_stat, tend = 6) + + xlab("Z") + + theme(legend.position = "none") + + labs(title = "two-tailed test") + +one_tail <- ggplot(data.frame(x = c(-4, 4)), aes(x = x)) + + stat_function(fun = dnorm, + aes(colour = "Z-distribution"), size = 1) + + geom_vline(xintercept = test_stat, linetype = 2) + + #geom_vline(xintercept = -test_stat, linetype = 2) + + #shade_curve(data, tstart = -6, tend = -test_stat) + + shade_curve(data, tstart = test_stat, tend = 6) + + xlab("Z") + + theme(legend.position = "none")+ + labs(title = "one-tailed test") + +plot_grid(two_tail, one_tail, ncol=2) +``` + + +### Formulating the Hypotheses Overview + +When formulating the hypothesis you first want to state the claim in mathematical notation. If the claim contains equality, it belongs in the null hypothesis and if it does not it belongs in the alternative hypothesis. Next decide if the claim is a two-tailed, right-tailed, or left-tailed test. Table \@ref(tab:tail-ch-12) provides an overview of the three possible scenarios. + +```{r tail-ch-12, echo=FALSE, message=FALSE} + +tails <- read_rds("rds/ch12_tails.rds") +#rownames(tails) <- c("$H_{0}$", "$H_{A}$", "p-value") + +tails %>% + kable( + caption = "Formulating the Null and Alternative Hypothesis", + booktabs = TRUE, + escape = FALSE, + align = c('c', 'c', 'c') + ) %>% + kable_styling(font_size = ifelse(knitr:::is_latex_output(), 10, 16), + latex_options = c("HOLD_position")) %>% + column_spec(1, width = "1in") %>% + column_spec(2, width = "2in") %>% + column_spec(3, width = "2in") %>% + column_spec(4, width = "2in") + +``` + + +Choosing a one-tailed test for the sole purpose of attaining significance is not appropriate. For example, if you formulate a two-tailed test at the $\alpha = 0.05$ significance level and obtain a p-value of 0.051 you fail to reject the null. You cannot then change the test to a one-tail test in order to obtain significance. This will lead to questionable and invalid results. + + ## More advanced points to consider As this is an introductory book, we have introduced some concepts but not developed them in full detail. This does not mean that there are not things to say about these – more that there is simply too much to say at this time. These topics include: diff --git a/images/tail_left.png b/images/tail_left.png new file mode 100644 index 0000000000000000000000000000000000000000..0cb69f9a86aa88b57a6a448f0047250b5ac358b9 GIT binary patch literal 19400 zcmdsfX;c&0w{L(DiXoDKpnyOCMOr{nj5uKkiZ~D5f+eV=RM0jeI4~$Orcj$f9NJj~ z+rQnm6jG=-p+L&96@+djDzn-k3IYy*GUc60RR!qV>wdZKet6HNYgv_3d+)RNZ%^l( zs-KoD^5*K9>#z;ytBmvSBAx%0BQOY`kjPdac}4&XQP zm!%F%;~kdfJH&&(y@2ABw2FCL*1YVdrCioh2kue_)sUs}OKoJS$d6x|A0MB83;fN` zztx-H*ISV`rJ}F5Dbl_vdtOshWK&aiQ&UrWSlHL_;GSuddgC2>^8$NsE$zJ(-+L>+ zw=%7_FTS@gueUG1x32bh^8W3zPQXJqbk2%xEY?^% z@}EZJIZ-%^C1A~+C0-VJ>O;CzHtLTspK8sKycfe$iX}7Hh~-FPP%>}A0-mYOx?=(-&xbDmqk)HbhYg6G;=Q3ashp+DYgYY(=6i&8 z+BqrW%oeczpZb5kZnK?)lgNnuzj7I!*ggxgiI(AW-cB#P%N29DgstW0U1n|uW-d_j zmq(u$R4rJCZyM$s?c25U9yhdxU;J`ol7_w9YfhX*r!F6*U}P@8lr!S~yimT8;DrY7 zNL*b@gmL6-yuneHYqSz&L*XoRlz@ceK0em;C=+83v(ZSfWFfjxON?7Q!tQLnlAn6G z&UT~+t|f5NkXOeR7`EjLpH>>2y1z9?!~2ZDi4Sg0LaP1Wt>KJad*gZB*(JOqd+S<6 z$MK+_w@=Y}y6{L8ce0)~@)Ok3_k*rf;l13oZTREcoDqo$_$+pW@;E9SclM;&1%^7vjLO(9nE9K;gj`L z%<^@orqsnp9$8;j0_%?T)MQU%5k|bK-pvVL`P2V;^2mVaySV?}KEjU;&u&~d*cM_D z;;e-UzKr)xNZ!wq4~fIs?1;jXf?aIG!!mqPu8t-{b2H(m0ncn)^N;7hKvvxia=>a_ zKdVKApEm5>DEY_GHi%t$p3s{(m{n#PuF$X&2(TIbsL8ckveHi9@yS1?RmPw5>yGJK zXt}mpPzf7Jv~Z-*Nyj+e6wMM>sHrh3Q&R=4R{KT)wuhC*PZ)%_R(ohf{D$M^h_>0l z=L?f0m|>f-rCkXNxo1a%TXYd$_F$Q=meJ#Y9EP^S|E$F+J{4V%yV!5;?FeL?)i zTE<3Al4z7E_Y)Ux4)cUZBoWPVAFBwRn9pvHYLd;~_qp&uj%4uOH?|>|TU7U0wy3qzsH?t@e9)zRn&(O(Ka2 zZmsqn@V!EgPNgiH;%^nydMj*jq4}TSU zz#sUu((RnkdrOb8RPk4of=?2i3-*`&I`EmvNHEI-9-*xYSbW6{L^ysx*gOkK^F@;` zY7iS!)zNB@1UEU{0pckILhwWF>>WLBpU#`FD{BVXDf8O;F9)b7RG zR1Q%g9gH%08L=@ed9Y0=1H6>oW{8=mNPZKBmt>~?0}@cy*XMP^qi_p4S!obs`h=73 zTQzg&@Pfy(qtbIjI1B$_brpv_FJ!$8hZDL|ouaX9v|LX;SxF}pUi_lTMJW_AjO-^tw$>Me`mE3X48$T~U!Ck_XXIMxI!H*EIOl4Si%- zQD5j#Rnqi^v(daJ`w-QgF8!vT(6?Uj=G{%VZrEzch9yKM;1fot<6E!WYO{0K<>T)! z|MlE)bKE2Tf1*Zi`aE-qZp_e4)}Hdw_iD^(z@spexgcZgAojNy=Le@rQwlmCcvs0d8^qcz02Nnva<23uSWh?$UTfIdBggR z+60}bmIzH1_L+mq92IhgM;iJuY3Rjwm^~{PM9pwpbzIvtLY!}bDTs=Mp9fS!bijDi zBL0E#iEgxM!5&$?)+l8Ok!%{8yw(u1U~OwEZVf}+Woa;`hNS?$J1 z3jV&Wzit~Okq_*wabmSLnrEW6ab`HXBm_@DeYB7LS2Jm~h}n$arV<KB=zf#6yOk9bUn`V9lCZ6;U6W3UwOu9U8AucjTj^Sej#)Il? zGHgk%yYJOtpfDFs)$l82A;J9t;}&0;j3I4J%XIdJ#ARKr=ARMevpV^g5F0(guDtxXZ3H}pu-d$qM= z1<1YWeA|KHz(yK}zgIirXXnBQ}-?T+cBk;Nzio*2VCVTVbO@9y^Z z20F&RO&tliecXUn=z)o^_SQju=`liFWo$!?(fS~EU;y++f4*eVpuXyvt|Nzqa4+ke zVItTSJ{x!(D3E;m3#3yXaN6&KZQ(=c0W+L!7CSM-?eyp0A546X-QHcc&7eN68q`5h zq2-Yko9fP5?a%Xlhk8_j!cbd{Ybw448YVDN#la4Wwr#e-y#M|eS`V#escG?ihkMi+ z@QyG&Qtd)PilBp&m5f{AqX)#_<^0GQAhjj#IUA>H=_V5!SM_M{c9`&vr2I?45*veP zi})RU#njvC)-Yy}=R;Xxt=b-qAQp{bpz?)CDv*1^iA?ZF!@D5q;aYVlQ#t^qQM&4; z%MNP3lVM_&v|JL4Y|=DLU$L1Z3d{_E^EW)NSl{2NMNOTaVkF3PZ!{)ZO_0X!gfiyXNt- zJpr>QAQeUEYLoq%D#HJ#RyKoy$Vfz6YrB!+)6oO}HD0~z%rs;WQO^GoY1=$r3q9B0 z$P2L70kY<(GOCpT{kko-A#OF{*W)?3x0l*AZj~kC^E%ucwdqQ`ZYZ&Hd)D9>$wN&* zTe-DWJdO!;zZoh1I(l%BV6d4uW3(sgbFfwH#teJQQ^-!<8x*VLYms}P%Xk)5#$__{ zCunN5B+NuX3_CP{Vt`j!yK6Pyw~(%Y7LUUe(XK4_i<-pFz5j+CKcs!9ZL=fxZQKL3 z?FXf?W`F}Xow9n6iM*LibXhN}l50wgVcM=3w0t>yIbgpUetmxv8>=Vj4?xdq5H_qB zT`wMk#Vke#)impolIXepfn=M0R@lqwEKpCWN~bjZX0`_5=S}C{j2~dj42bXhimA5j zuo~jTw_o}bTfVMuVmUBmV707(!N#JISbffzLAl6fTEb~kkpEQ6o~Va8VBO;ew_CV9 zwweVwzO&lSRKub6h;z)ULH?d_gTFl*_{69tt1s$dvytj(WbiN(Bn&iPQ#v!<7%+lm zoOh1%2L-?4l+0E#M9%HZRIhIQpx4wffABCT{VZ!1G4F;>H4}_Z&4={^{0D{Gx)^pk zsjWY5==7?G{Q$cKtQ;^b)r3!W94^Xj#%TpLJF=G?)zHioET+bV!vZOV#0}X4}zNud00v^=&#B#sZz1ss^@3!a&a@OjE=D1{(I!tDjxz zD5pFA11sxl_UNIC-r#iu)KYj-;tQv1@O-bjw=uQI->;jT_+^4oZq)>pK>XJ46R-PGSZia2yk zQ^nT5E3_;aA=3EAPD2YpeH6jOfh@?A?7_a#O@}BQ_bV)5NroyuTX@FCftH2t!uo5} zjM?zT(Vou%to#{RLHhk`GnYY)`q+`R2ytHwapE5T8v!r)>S)hOK)^yx;IR|-_H_WW z+6h)l{R(e_f{kvV?3~EaQfBmAv_5KZ=BgrgcJyO-KAat}5;!QccyJ^HVAzDg@CahU zjDZzYgs}h{7Z5gB>GNQ))O0w|@D>wNo;YC%_*kZB%GX`(UAK#j6eU*27>5L8<_?Mg zEA<|O>~gR<-i(R(zmtaRuS4XIAxwpnms(6D(L~!fIt?rG-`X5+k(q;^et7=d&WtTL zr)PA|7tP@*bho|!A?o$G-r+CDVqMsm_9P3zJ?PeAw8pG$&ewRb%dT@Wzo8s@C-1cHHPXniA7_bTGKM47bdx@`*epE5@}Vgku#ZFO3*>oyD`gv6N!zz zH>Z*zomxlcAKAgJ3h0y4W~xjKEWGCdcbF|;(8c#1g6v48omrF&tcqEoff;i3l9#iS zaz|KBd^GExNcLI;7Kdk&8z7zLFLajlxH|NKC^C^95o?49W6Dole_oWcNokOz1PO&J zuTI0OKtifv3jLFbhwH9XJTDSyDh+zTg2Inry&eq=&{9G@u5H%Z=sB>*v<=GokgT{@ zz?l=p^cHD&GoWJ6Kx;KJYI2sYqDaJ68ZH!sAk1I}7`C-@m+MgsDVoq@PdI>G_ z=g!6+X`Qt!meWDWEF$LNoR0A$kBK#@qQDh;JZDL>YvfPSLv(}ovnWKMhb7$Rh!g!c zM#uM_DzKM>`5%yQbg8i54Vx*7-1i!|wozqhh6g+&?)f@ct8?Up;vz$puZxIBIHx75 zL_H{EWN5};*T_K*0|w2@AvpC}Aw&jo8A-zfNZM#otbH$7ZpA5VN>P(^u7CEA{XkLB@vX%+B& z4}t=e*glxX z;~m1OFI`FThF1_ z1D)A`4Cht5(uR2wa{LpJaiqvBLT=j(XN^6yfy+B$!T@3ecT*|)Q;>vB&w7-f78*z| zlZe|=@Xh?1J}qJ^#Wf9|kR9J->iE=P7o~EG#P)q<)^%f!1ItXIEaMIT4lc~73pd_$ zJ8T--sYLM<>Ipk+nN+gVeu0q55;Kr!uf`#v>C1p$sK=}X7c`5`(UG&^PAEWWM|`4I zEdVgG0m7RY zN!CdvJM0%sViNFJWR;*f`d<3ns~qStmD2#u$qTAzj}1Ypt39rJ@81j*sLv=cm^-2r zeHm0ouP2Pe=A-F3*WF$MCEQ>f>K(W^PF=J*VcnHFozN#xolaop^H+BKtK%-!22PY@ zQD|5q-f9vtx*8adt_~o_T5v&kBhiV%ZJ+C`!~~e26*JocVWV=vu@KG>>PELw@u^vz zkP%q4{=_&Gd2xxls68xcQOMmBQh-8ewssgQE$cn*^2)$~l4BYgCM)Ah#_B$2AuDL{ z=eoH2ue4&$0z?g|wwrSUXh?$z3)j^bg<|*`)XNGww1vANh^jrUY|ij6?3?Y?Nj zbDjWBbOq}TPkEl%>WVxuqib!je^sjU)j8dx6FS)cC)x`K{CsGVY4?Wy2UOg@L7+5PF7sQd6YTank$>Fa=Ofk~_!V z@Q=U}VN^^iOv8PxLaOW@=5s7TEP0YidpYFz0TeHEZxUgmm`?n@XzTy$WDDlH28O+>kC_OtH`BksEu!3}a@Zpvw29IZfkXq8EV3PVP>3 zhN-Af@dX4Mk_uhI%ZZ&m9)L=hu<_%9W6_*whRRDorJY_i1Q_7IU!A+- zFH#m}J8WJdphAa@T*Am|Jpf4|$MUr9)6z_RX5PJE-ixRSMu2r7&vM7Bi~E4G)NHBn#Mto zoj-3$lb}K<)_#P9W64ZM3naDoniLpy5O>eLTKgxEM64Jhd_bg~;wakh5w#x>*(=-| zV?P4neEhdDt6@Vv!Mb7qYL6@}YPwt4uUExKvDaeaHfIIT6=Dt?a0iTeMeI!BX$yi< zfD+Vn#{=GA8HFrzt!HP>xO?5(<)QiA8OHm@%QnzBRSXB{cuhep&GbkdkDVE`AJBM3 z$+n#TY!@h1E{G$0qC7)#Img8=luS#BgQZ8K*k{4?^%!|lFM)c=oYE&)CWTB`e6v7+ z@`<$7q(2My?y?^d$jPOM>*&rGt!m*LTvk68g9?j*@+6dSYZFJ=EMv`DcT5P~x@R85 zq1Q$2Fa*p?o1T{)mUOw^O6~!sv4)z4H~a=jl|)qm!1(5#+8(p+uaI3|PizU|ffYV* z@*#FFzHt$#$+SQoqeogJ+$%tkp_Ke{z)n6X{{}9xIhS)nEMVr436w(%;>}x@?$`<{{fF3VC;Q{l%EP`)*eeDEb6S}Fpyu9 zk$+~kxXks{5?6@wHqjz@g6Foln+AD6K6-}=6)J$DCR2*4G+tK22F871ez$5(s!-;@ z7?-5_nu4mK@sWLH=9v>@V8(hBT`*%%9yl6MGj3q#l{&TXQ?7DsN>N#f08-rs7I^^} zxlk0(qCW9u!!swHCDledu~6L3jf-O6$rj&rR%~#kcP0vxJidZ%C{OpyYd1TL7D$Hr z$d+jE4!k1gPer6!7;aa7jYyN+0tyl{3VNjw)Ey7KZbom1SleM^(4^WC10PJo@B0J2 zYf;tx->qi2| ze+?!{Z_w}+aniCLQ)!VIo670dHrPD$LT$|qlDZy6z3?19Dcueje2wi~{UYc4V# zGDX(Fy0wR_{wnpe%+Ht=T{XDDNiAGF`EP?0OzEy-2+jtPAfA?xy8fYif*8cQJhc;o zdM1lLno*MIlUAlDS$lt_>}n~x_DQCYnsf9Q z%?2l!f?zi}kKq)GeQTopZc zvIBW+qdF4o;QCdsNuADYNW1YA1wXv8l9vI&{M4e8B?0Bqec?n!3jWdX>Z3AgS)-}6 z(QG2+rm=;1_-V6F=zjlL;FTS~T=Z7Ao3SDs&5pga^!{quq-*fn(o7R-O8L4Sr-uVO zlX-3kW9P5n!64esMv5V5IxEWctNFwm_sn;3Qkk?SBWFTY2g=n6)o<^)C%ht2#w=u} z7I2(Fn9C4bP=UchS87Pih^sb>25NDn?nM|ii=06~A@ez(5(tuh6>bPk7WNpNpzHYA zU~4*Dqq(#VXvLfg2^n=*v&M$~A4z^{S1#l@pMLC}A=am88{ewUf4kW2;aAeiOyxZU z2b^>%PP#Gd4W${I_iJHdSw@Xz42R21O$P?rU{h!rlTc~cCarVqhK7*2RGWG>3I!(} z9?wXaiOFjmx1eUtjBi;YV0N?w7LartQ6MUuwuhugtx)t?5*xS50`aAt`k4C^0M zI|kbgm8{+SS4pa>r8!?4W=f2CtJSTAG=c`VS4+f zP@tJfR7fkF3(kf46;zNr;tK8*Nx%=E?&Wwm}ND=86V~Pl8Z|K_U&oUBR ziFOBN1LdFQ2@30HZM)09)L&(d^w`k7vwYb5IM)|c`U7gM18QAJtCfd-eFS{=qWHtP zsjm&*Gl|6;B{N${7J?f}BK; ziOs_+?5@Pz+X$vr5@3XsYke_M80(gFi!N7>n5B0#YcbDPach(E+Nrpu33wOiuS-ti zRl{c)5bur9!xM7~JmEK}KQ>mq5ba?t&&M@+Ckod&17mjNtZ0uWWKS}U;#!ULz(Hp{ zB)Z!R=0hI>E*k--D@wM-{3x?{fn`RMBwpJu!fUX1y4aEqtWD>E4K`Afeh$^_YR{Pw z-Sy1sOuM76)<}=Nk>z@8EyFoJ%+$!#dV$G;mf;|*jiLw{$z2J(+0c#^)$oIKF_*e| z2`})1;~|@I$@qIFj6PT;TmN#v7(ID@&J0lLp~s$k!8D&_qRSLXw7q+4EOCL#903Bb z9QFzlkHgHH9=ev%*ykz0oObiR5KtC40YRP}UkKOQVlbLH%(pgN^vPg5HFs;{UF3N( z7xet{*{}&Smzf|}U0`}T%P8)|wU$wwF_h$nx?^`G;slRaZH~NS9$1?b-*L4&cRhV> zIA9c3Y6EGE^V8YSvT4cVAEDjGF2OOt22AMs^CQ5wW@s^;d)OD?kqmukMxWmhB54-1 zYYTdgased_4+HjI3LVH9JG`mQbw8uBJs=N{qTOUsXzvhHLT~2YU16_+JMWZwFqzdd z7A()vUNIAiPR6GS(1PjU7_chj28_CX8=PWT3gzY~%iz(+;?=Go2kUFJ*9a5dR)Vbw zlSE#3mm$!f+<;B#&jg8{4gU$rwW0ZR3{0%+ z>D;{{A(5Qm?y_@1FX6Yx<>nNEvWTt}e5%d%-^DP^+7A1S$v;)L^pDxbo(~L;K+!vS z3K|$t(<~_-nH=_u8Afpw%>>KQH|@5M@r0%H6dn zcGqK6g{@4IwC|bC_Z4_PpNb0U=P~>UH3LO;?V9uu&NfPf0Hf)*RN#;9<|*j2PTL5- zFD68iXJchVL~LE&8kxvjs}m=PT%L+>P)nR8dIR4*`0ZEQ_M_AcCxF zRcNY7g``vn>XRbb-Fir(&6mx$Zrqz%Z_q+{V4;zs>l!#*Fv7EQ9vVgqyj=4Yza{8pVqyqoPxu^)>iyx}1*vtzgY=AMn0eZC`9Lx`+>eo~dR~_pWzma@cFL zm6U!1MmfzW8mA{;2DYpyno7@1pe`?)V@cyeau-0YbE(LreEQUt_+)qe1Ybc{*N5;~ zWLRY{|9sE+i2f^QdfzVRrpho^H=^xS0T){i=APt<`@~kQdCB_~oYz&YXD$ay^0N7Q zldqtcarufrp4WYvX>kf{CxaL%Y03Fa0>b5p9j01tKi17xyn8PA!x_AeLRNSovFCDl zzC#l(TOzkrD)I|xx8s6^75U54Z%n~C7;=R(uRuY9UGA5LtKOoRTv-b=)(k1ShF$}w zvNgf->!}arD)7rI({S?Tp_KY|Rn)KPGq?t~n321#@al1tnm|S&PX;vAgsNPtiWRf= z+xj?sDBC}*J#C@@^I*HhDbJLNRL8R})JC^&Ll3K7(%A{la6kLIiK{4e{ABCoHd*(N z=l)J^4<%wa{nEYVP*af@K6z;s+`i&nlZi!9Vov191>p59Tr~98W8%xhX2QXrfq_6# z^+MxxRcrol^v!MGJoe(Mo2QFKDTmi`vJ>zV4Q9wHP4YdhmC)n0*a+7RCTRJ@fLOLZ zlD>mGR%12TnItJXfBtB97HYaH4b^T-s+;J0#O#VLvGG_0u&En)3Np?SnUZoikQ1DM zn>V~}{ab*2z9<(Kp^}NdC(I^-p+}PepnMkPbKF?qB*a{(+A*i^FIQq}lX;cqEt{_? zhu3qQfjIT=XPS>myr=V(d^u!uVtF;ZBdE+4%JLa&4e=Fh@*SqOeG*sSU(6;##Kxbc zfdAGf!s|L;lR$gTMud;bwQPtJs;RdmmcN9L2jL z9|z3Wn{s$FCqDrXU*8bVLl&xDXmo>mQxAu5q7v|qAOOFtQ=7P^8k_kyEgWANgtL(k zB~|@X;_(!x1z7rVknqO5^^*n01tMV+eD9lWG9)UFYLmP#2w{!u-i@2EpIu*!K=T|+ zQ&C!*LEzyI0p`8}M9wjz{bW9IQ_zd|=S`KRg4Qkpyro4#0~{y21J7NLkB6k*M*#L8 z?NCT8C8lS7%f0kO;tvSyDlfkc9BE34`E=GXZx7f)hEG~w4=Pt`GKQ#02zJHw#ZWX) zm_;gRq_mAE(KwTl`{{{fK2M<_D+BVSkNFTJ{eh>rkAd)UcpD~P8|Q_tzW->ttV@6e z@2CUkvliuYG>g_E+7^zV4c-GT^#@44cg!7FkD>IG!#g?UV%Yyv8L2S|cVwIiI^+H$ zcUgr1<9=&10k5c$Z#3>lO@73xT+eff3#Feyr-k|qDdgA|nR^afJ1RpQ$ny;wN-FJ( zaEZn&UkY0h=esS^bFngwrl+V6V_*$z+b>=rN3>|WRo=A2< zfIZqk&hmvcQ){}%UN_%9vuA9i+>2E4p4BqFIB)3HeRB!NL=5{ZCDjR5lsI)Zo>y{b zAB(p_eGVkI8rnK(ljx`$?}_K`J{CU$J@*>{CN(0QJ4SVO%Z@!MRhIiz|`gc0B`HE2<;N8GDl=maHG$<3iG5I@)gkv78lzIiaGNemlas^5XHhRISg!7_7*O%V*bOCcn6A9nKs zIed?w%#w8&`j9HDF;FDnzL!6$VU`D#W*-*T8TbO+UV2H&wt*Y2@yu@GB*lJL7`$5f zW)!>?HUdKY6< zcyv_=;FqI<_DQ~qAY@u*36L zeIWH@mm{7ZXJ4CBa~9JouCs-jY_m7#@Dvs#EIiI;KvfqpyW%=Ks7ZR-qASU;&GGC- za2`G=cJ8LET(IWUDZo0fJTsxArg@*RC-~9ShXyqX_^&J9Z7c*3G26=3WckIE{b?U) z8N|sE!}V(|PP}7WK9zUc&9P~+YosobRK}1wVYA6caUcln&TLPl&dGyU)+>Jw!^}>t zgvB>KVPlna^U=4?kESXN7CB=UtAwQ2yurjy9{wm-b=L{=SY?Chl3>gfdgfi)CzM^* zYnrl*(b9%}p;FBI2_W#~JIvo-NQOnQ^fxSyg-#8$lybm1#|ME!o-#st@>&k(HDe2Y zS^5X~R=|7my8vrT>b4U%uldAXlMFpcIlq_DRHFvv{U^@?2!PNS88x{imgiMq@e$PwZgNf=4L8 zhY!$XwnyNv!vAfNiu%5`1t;ci3gV~yebJYQcSY5eDXb5vAnx~ z#!d48cwbHi@6xedI^mH>uv~yHv;X5|H8>jB-1mz=SW!)l?%k}}4IL9tDK-e#mx>7g z=|qylZLhtpaBGC|3-2O>M?VI++`<=aIjrda0t3}Ss6WU+T?RlgAERPhb7H#=wkqG( zDz9=_5FG{HZYDFjsyJ4jecqjA-P2)xtLK{XbNADyueRrp^m}{q-Se2pZK7~DCHux~|6IAc_Sdd0#~+U?=!tJtK05W2Ro|cAweWG~V+L&< z%0JT=t!96DH?AkYsrKrc^rOmmduog4w0yKqe{H29U2;sW+UE~ZmTtCgXy9H3Bd%4& z_IxU=o%dhIEDqY78naU=eXQ8Ajaz~D>gXBOeaJ9YxK*rr{&VZE zosEUxws#-mrYRf!tL!9PJ=bHZ?&yQ^kK3mjE^SEf^v^n4>!Q3m4LFhd8xla~O&z1T zE#&WRIjippr8Ce`pypIFi0vKwsy0ZWU~6KU-d#0M2zzBf})MB(Zq0vi|)W z^MX#P@XZY=>w_ZnU!o6W|@|=v26bQz#3%}kDDEwX_y51eEuej0mQ+7y0;j6v) z$bqy%*o8{}!cS+g{LWt*vOj-3(*0Z+{tpd>b_Vcz`a*7tM%2uxDDi)rFTK{gy<@Zm zZ-C&Q&u@l|J>3&Cxjn$R=XJzy7S8X+iIiWSMz_Qm57c&}U*{6IweW4jnNY>l*sa|! zADJvZG;D4tmsB^c^0K@|d_`6M+sle?LHCz;hUD8h>8fFgUJP?1cJ^*M1|B|nv37oJ z$*C~Y8Jruh@67vc}!5jd$YT~+wks*%TFRYJAc?Vm>65yn~d~5YR;Kq zs#q+lj&}Pv?OShG@?bi+qO@vM^sf8mUP0L9uRou^6%c!z{hU-ZqijW&NLkr=ZSJ;= zp{{GwLxQZ7e|I*GJ5*;*TAs0frLybYgu?Ll`8n6-8j5Up^yLgG=qs?UQ5q3D2LRxj zGWK@Wn&{r6PYeHUZ#AizVPE6Fz606XQp?{x&~(MU%57Z;dM&p7vvp5Xz%cL)jaP4S z3i7+34#Hfu^78SFb0=b-*KP@U0a@R`+g3~ni7jmV6k$6+ z-QWWoPoIv9>72KsaO&qXXRj%CMCWYmsGS+vIoOLrI}43^p2zk@1c=VP>W+PLZM`!1 zd@gj`qE%IDGR_1(A40}a#xn<8UeZtIdD{N3e?;fM`z+6#%AVTTk3Wu${V2LFf5=b3 z=Tr)ujE19L6&&P1k-+J%Nl-Ey{I{{^V=~_NUKzS}KR8Kupswd*NX*CbfUeTb23z-n zCr*mG7g|AcFN6P{c;}oQ`|iF#2YeIgz_(as-@WC^hpFOyMyQwV=RM;Jx}=-+wt{a1 z84WKG&mq}dZ`(cX#}TL(L0Gi>CyZzMlU~U6Lk(hhD~_+c8f8xt|OOTjx7~%tSz@m?-Q#9+5Za zBp5USum%zz0m6|#fnjIgk(W386wSjB>$ zen4wReC2XI(sC=ku1 z=H~v~<^8#_{kb{)Z{zz1V*3X&`v-FR2P(k=2cn}^8(n`2R=GH6#gdh>|GqyY+0I3j zXh2veaNg>@B+?{H^e;K|s@pyi$(%HQHfvSrxu#?eZ_JxuuWF4kn$xvM4$|I)+=~6J zg{;FfN_;$B+pu32ZLl)YtGYYxX_do=b2-I%_lu|rp4B1gmAf}g7@d>-#bMY1_%!Q_ zLltSz1G{hLwg=z?M*K&1&+T}~hyzAj7{eaeJs2d}Fk;JT7BuL=psBPY@M%~Z{%z3I z=l>0Z7ad0Od*LZXJ3RvHa&#J*C1MZi_!xIheqv(FIKRj%0INvN-vFldaz?eb;`wiKMCfO6UsF z#8*trh5MAt8rMXEGbsw$?6y;BsV0hbapya`LrqGZEUF|+{HcnC0S*kdvr;K1_r)NU zWQ9Uc-=Xl!^#8xG{vWnw8&etr03At%e@m|W99+eCp29;;AOE?>b=Qb31uSS$`u^2M z4nw9^G!AF?R{hgpzbmHhrr!(pwciScX3?}5jikN_7v-=!ZC%lk_yE$H&#!ruYqz?{Q3Gqq z@OBiWtQPvNn?cgpLWouvZDVe$hk~(wo%ryHB4<07O%}GYn=!~V6u&7PtyI_S`htzN z{LdmLBk2I@9&JKDpSj*9jzGs;+=Y8O4VI?FQNu-w!xrXtfx4C&rRu_Yn1 ziFK&?`6m5rqtt>qRxy4A<`aCymQ7V(NpSmYg%Rqlgo|T#@|Qfe4m6~jR}lDb8zP-v zV8VC(l#M5segO91Bqux^3OEO?E*k%f7ajWP<%b!Y~P5p&erp7Z)VOnYND_-U!=Qf&`s-pMluq2HbWZXNR zHet2Z%=)P1&hw@Xll-Wm(-zJ`Bl!vIZOFn@WUv}?ck>gw;#A>yj=tvnfwKZ;fGX%e z(HByd88X-(h7z_)SivgIU`WpHGcYFXe1*PHGr{n-8u_F2O4l78P)0M$29J*1Meudf z3(4W>s-g|H-u8OILMqK>C!K_c;CVxn29-<_`l-UxJfF+HJ}ubpD6)pE0lpHwra|UnFsf5Y7tKdNG#;t!x(S6FRy~w|V_bz^JEJ3SL!^CC@w*pnf`- zty?e&o@1rG^tW(qtnmEyJB?)7g?awbU*}!gGgoB~BI!mpwXBXs)LCG;W^$n=-QG@Ocel zZ44Z0vke1kz`t0$V_8 zez4L4BiPXIYQb@t7PT=J8CS`hMac4aI6Fp_uU#6VVWxV4u~KXpGHRG~x9Y0={NP6} z8&o2!`4#T0VyC_IRA!0_a{fm4X*AA_`^ASz@WcW8)0++SHE_Vj{at(7L4zOsE2b_A znC)@uMsdmnuI6D4VD_l zY^2d_Xo?(MyG`qfSs<4m{7~J2H29fUgk-mZbi(b#V!Fo;!;jBr(GHTN+R6g!v?p}X z^oKrKs0YfZdK+QO>G9`6yjS_PdaNr>MXClB+tH3}KW&_5Mc!>sOD$Gb4=-)vy2t&k zQA6K1$ZvD#*d5f`saQElGnBGOeES~LhlJdYt5^>y?AcUWL)X89RvbgRJVwLq{TK6s zCY5T?)0(!wzym6*4`*l*xTV7;k*{Z|r05t#pTgJS$l?>-=z&v}#iBTtzQGh>NT+m} z@`+ma^el*K)}c}yAR?~0uYk_!6h-vd6|}4Hrg6Tfi%Y^8RGe`wf@qLNJGny#4HX$_ zpEsjDhG`>=bW|^w_?cbhexF=uns`DDTm>1DEI^%mS?QS-sVC zHUVcxD1fk+!aQI7Ijw8_)9FK@|oI|uE zdCxIBPiSZ8|Ah*ZJ;r?-pi-ltQnH5CMPZ*n&XRQ1iWxcLV!{*11k|q~9^?(6269#+ z&e$d{y5Jc|g&Y2b5cO!|5Voy*AYg0ui{;;$ULpK)TdMi{V|I%ny@Y>(-Yl1= zWE{Q7LP$({3DE1KMDJqerkQ@9brwFcRVy*&aq)5!YcNq{xJV9b(^^PylQM0}gYMk7 zyfH-VoXEVAYdDU+PZQ>tTZN0SZ4OesYN`4|G208GCw~8>x8m&VH&>>*(aSD;R;~CP8-_#-%>m+gl>`|=36Lbl{ zZh`-)P{-1B?sEr;z9j6akJ>g7!@wKfCW7Te$uo_o4J6oJxn04q)X18Gi>`5%``STb zDhZpt{y);ve#6^A(9)AEpv-F|!C#ed_0YO+0QvCSWAfBCPccZ+DSOrOt3;4UO?X3= zoKSk)FCi)3W?qzKBiP5Z{d=E(Dp{a85416^D+MsHc^ZXgGDdg_fRMaNBhH{TOmb5J z#wvKThPja3kwPJi^;K{+f~>+PbQP;-q=jV7+zOs4VfOQLq0W2_6=cLo7HGLc?VTx9 zcV9U2$s$Lykeok1K85o6-f;Wkh$0sByxUxu%tLxWpQ~uAhVT9>N3j2c=E2piBBZiz z$@=u&lvU~GvSM0zP;2WEE6g#wR(i-gMsn*tYhjrY8b5)YAUo-BdJFM^c*8|*!Oxv3 z2E=-Dm~Ek!jW5ZP70L)M&oke`OBB7U(ZU@u>m`+a9_m}YPV4#~F#;qB4AmtxxRTcJ z^0Im)bZ4-gNRk_Q)I7qCXC@+d^G~TkSDZ}m$u%4;yxL_N1nPfzSFClEB&-#I)Swk= zD~urVy}}H#i2|Y`Ev1yg_J(&x{H6|ctl%omQxsgY;9yccSZY|D>MlUFo~{t4l#hgc z;hWJjRBZf97MeMjZ4fgF_@bv0Olz4z;Q&kvKfBcH5Y@>WerAuBN(o&Xi)53`h1uaH zLkMk^(i+}*^OezxdyL+bhiakKGzcID(?XDBP45Yn0x8fJiX<`EZ(Qn$Eq3jGesCQ} zrAZ)0WzUn*o+Ve;l*<5%jyu^rD-c%jV&j$65htR8}9Swk9ohc3k2Dc8C zz8KC{Gjo=ua2JV|`o*+On^40lNoCJ7bpYBh+afJzLknNJ)DtbR+6jW-{;TSB(_KNC z0SQj5;x#M8UkHu#U8@$EYwvQ40{Aq}_50L*qF9@G4N1$-Qpf3Eh?B;1E473-eu%Wk z`=E*y|D=bBP%C~i9if2yb!3ugrb0Z|+1xlJi5u=m)DNw9Bu=uyhRTi{ zGD(;Z^j&2NDFnWNu=D4t2s|?#DaxOxa$z0YuZyM&Pi*ff0NG03)~?kN1ow_ut!7Gy z$=(Vi+-WdVAt40$ik_>hb&l3?ImX^nhz2?rg#~Yunvwh#LwRHd`<9Cx;r*do;K*(d z^{TCo3B5zXztdoyg5?URJpP1QeBd(SV9*=M>?j~MGPTzQ?cc8sQ%l7~)~)ieRAE}7 z(9AV-6MjSyLjrAt10+{CFTy;CnsshPxE~R}$T3op#sA~B z@E9_PG#Adxwd7xjS9Z#ODWLOL)rMIHf$}}=-=@WK$sUrUpnZ=A&COJ~yZj}VMXd4* zx4eVWQHKBX>!HbNEsu3Ng`kJ_tua;+w|>$=b@Yca{IxK<_-2XDD>xp1QYdDymtrm*{Eo=ckZroOmDYiwoAC`*#Os-dL z1nM+rT!3*hlA8>k6VjevgLZjlDH=(kHw$`DpRo?FB?3?k^6uzo zjnE6m;F5e>zPzq*@8i-Jg+HUdo*X0zlkESH({V`DHe-t-U!VHBpm%P4Q;fGH9jw#! z0rp^s|GBTy?XQQX3Xvn2NoahkpeRb{@xzlk*OufjI^?2|2&zK0vpb~qxB_@F$e#Q# z)yn%(KahD?2(?A2)#6D)VTgyyBNkcRCR*V;v5ul)L4rR=^egx1v9kDo7)g1&A&Ol} zY(KdWwARBs6|%TPv<4Fefr4h6aO#X_bCnN)7{ipK1ID$A43oZ^cPt}>h&uKs6SlB* z!@OeZJK@fiS9ukK6;Fxmcd^HNBEfE$e(bS>8O($z;d)w5R#?L=N((m985T}W-`H}| zor>>fJs~Y=!N8T(DLlNH=d9D%`StBkFw;;m(^YZ<(QY1X9aM`os6{bI1Sw!8tXH*o zRegbhJQiYOw!Wa7bYa=VVQ^NPrMLT)D&f?MyPv#9GZ}a2c5X8Sj!$vJKIiBPGGz7(Y+QUTWTxoM2X4j_1Z> zwZKs<%!T;MEQO;vF$mE(5o}IRd1h>Gi$jo>`qWrcG-NdK7|=&^GOb~h3TLm?fHUqI zwzkn)n*rzh1ZOX)c}FsX2s#0yLs3W9mHfaQG9Gy*Bul2?-pQ1HNKYvOoTp-Vprt-H z=I1LpyP%v0zi*e#fwo|A!H}J7?+)QX;wI?LI+BY1LMcopC=?lM%9_rNi?KFw#6-Hs z$Tb(*@bAeC;QfS<0wD2f?3WNa023+DRppW=B#;(#EP?)}SQ1oA01LcTuMZ3ne5`fA zjFE)LM84N{y>;>P>6YEN{=XCurGeqMDx`W|+ zar9=k@H3qPaVdsKz4`A*-YYqJmsFmp09RNGXyRm?#qE~-9Iih=1J2n}xPilHTN0;8 zKROMAE>10IAF7;X277^DKA-*bssnKr0DG7%auC0u0CIZ(IXwMZ3jH~ZpGtBLIt`;P zPA+({3Z;O}0*gm!<0Phvn?CY#xM6_AB1{*S!aW?u4<(6CT7$+#n}ViO%2~i0PIKJT7>$SYoEf4)Ee@kO2gcbw!7)f9+4^-Nh zrpbxdZ>C$PktMgWDl8tMr?EOiBwQ1sx}!DFFIpB<4qXS9fb$$lM#tmvB}Sl!o-tkL1@E5T## zF3q(eDLLFr9MC82BZ=^*dxq?n!1JofJ@f|WzuIzZVs;&czxes4OAbGTrBwKZ6D@V; z`s2(4=-%~gkp8>qVh0*0js>06m-w6T?Ip@ybrf?))Pcsdlt$xGy|0rEs^5~aoovk^ zzuu)^tC^>KcpGaf6ek5dAuphpb}ZhA(h;^{HfhJwH$a$V!kssR0m1kH195Ws$PlgI z^4bz-3*s;WfS3aB0{lpbrSJo) z7i`9b#jUN0k9}C}_7&YqPxOQyp=!ay(MhD);*-YAbKk%;1*03NFj$=)HAVb!I1uJ@ zxnGT{b-jFnb+JA~pQ|MMNCLez^cgx0J97hkM+B^k?=J3ZN*a#laCLP(_@ zB0U>~X!j26TQbDGTi=O@A=)5ym*FvHk;YfA$39{j2WbhYn?^p>LiC$xoESjO2d9R1 z9QKo59Yw%8h@isZqv*i~EFDv_ep3~5&@JsZEqu$M1j4zEVLb-h085@f1?>zAJ@-E? zK=up9$_Tf3_Xz7iZ@b6FW860Ay<~xA4O*xI&jqASaMHu28~L`R-H(CPi3++K0bN&Y z^mff}3xPseQuEH_z@z%N2|RBEss0&Op}4JuG&}~!IPt)x1=uAsSnsy>v3QjblR^8` zTj(RU0(yQ$(724!z+BsHHAMH&kC~}*$qYVrTYF~LF?fJy2rU7-FeQlY93G zDMV`{xW7Q<{`?mHtl$J~dCZGCk8I)x#@sdX2c{fNa1sK;;|=vEL#DZE0+jF2+hcm` z@i%k4(Z{!!0^Q8SbW_T|YB`%St;i2G8ip57h=+2;T-xniN_+AnAMrL$!jC165OqG` zO=1ATt9WD>E7a!u#Yl~I0zvTS3okWa7?7Ij2iEeAdJ11U;ZHw+z3*zTd7#WnC;4Su zhHlBs2Pj9Zf^a*X(jN&phN5OCBzkZ&_VsT>HgNNV7Sk@0nxPoE45jG!J=pm8 zu@&Dvo15v{AgQC>c+lT)l^6%;ok~(9g9#GbzkNgvfaQI+Q+~w`aE{H0-C!AX zLZ1cpj4;LKWh*V!(1PJtJSYoT3J(DDxGn}z2mJub3wzcCc%dY;jj zsoTaFuixw&!33P*MnR^og{GfOK41jq7$dlp^zqH~$3DEAt3NGIyd`9QfXa-AfK^a0 zV>C(sc@~g)12(|G!tn={4Ir_e7oKTJY>f=1DnsIjN|*3SF_u$XfdtDiku7QZk-C?2 zxWAXzF8NMGsR+Kk$`FbmbNGA5f{RA`f#$~$n*U^95%ti6*j7^+qrxojc-yrB%JT?i zlmO{8aE%U;?&3cnJ=s!kU(si#OYF7>c5^qP*m}I4!e?SN0l-!`;4=#214}C71Bceu z9?jEUE881O1Vpz*fvx1i_2ODi;GF@3nBSe_h)P{AAE=qh^*u^!&u};#TFL$${yk$h6bnK~3?9$hMDtd2yXTUOLBNDNj^T zm**K3Qg9TM1UA|PYQ#XZ3{11S5xOP6*O=H15wZ$GTJ&pJB*G|M;0_iT^oDnFb{vfA z{eA}4+cjBJakQgP!_BI;B*4ves!-gNs5l#IDKrA%ZVoOtdhp;$lXq)sWbGXCaHiiIo70>0($ckw z_+|#bxTQ^NaKywuC{;fl~9uMxT}F&_$4!V@ojDIatgsc zdKE;b9gKIRFC)G0GNLuuVf4avE}@bx$^a~^2+btfXXTD2@ZHCg9Cmk%dd!N^ppg%P z)nY1Z83T@3-1fFBHXfBVrZgy!M(F+pxG+v}p)XQ%cfNd>xsZp=v=r_~#l$j-ECJcT z7`Rb zcs?UXc5u@reSOR*qJ!Y<1c3Y^fF*sR#N7fm+`*a{+9{I59&t13NbY2Q3XdT*#PlD+ z;Jc#w_t)!KfA)-11yLTI-41MokLlF48DvqP(ofQ2Tw3A*Q8B>+#>YjX+9)?}%ynED zj9{BD5E{w=5-GUGhOtL^yq=!}Ovg8A-yN*1tR04Ex}kh`=($cZP_a9x066$wFI>Qk zW9)mq9vETwRtsS@M)Ka^+46}X)k=2}kz^BC^ggU7BU%al4#qcWTE#FzM@TAlu_$i| z&PV{Xd z2;BnXn=}Bkuu+mqe8(|_B|(|#04Hw3Yz~;+1I)~D1oD|j8DUkXfZ44&3n6~2@E!x4 zfdDGmt#@|vYraV%(I;CBaxG^#Hd9Y?0t&6q#&_1=Fmm2T6rwNCA^2m_CJEh>=8BjA zh_oG|aqwE(iB*J(G^0G_`-a7DSVX^y^UOXpZ<)vg+KDaLLD$CAqUYfjAlZ9Q&_IjH zm-HN;pBzuMb)Z_l$U(B!{li0U=u3?K8SD!z$cyTG%-)UG;Jq%rjRnm)NEM2|_(1EB zsyCB`9rsU`bE-(-AVl=s`gA|3eHSB%X1AGo3_ltkFqEzB(Rbz;K-FOVInYf^fFqjQ z(SZM#56_H0b|gotUrD$@2FP#znCW~ipZ-kD)-lHR^Q9MWh?A%^PLaK% z&ceutXES(g!e-}y&G2IR58B{J;9{@rLx(4A6V7nnrho(5XTYDg^6l%4BWMe!O3#_x z!Azab*wpiEz4!{J)mm6gOT`~AqvI6Cuoh^nB_3x)efksGv{5OL9yoUTbjCe0Fi6+$ zY8=+l8(wDqsSwj_$R~_N;NYa5IQy+sTql;o830N6na+6R%Q{{NeCV-qd1iyh^vXq3 ztkDzNn8~LQgwix|UGWb~=^c}4SbUJhnZNb!pnvhKi1T&WrVv=bO^e|ha1C?xHJLK2WCe0aq@&hOQ(fITLb^9Ovm`Y7yM zj3cDSl+@((J)lmveHZTX#$l#zG5i!g1axKn-q~j{rC$W+6nB{LSj#J>>7=3VPaWIU zrLq7=0RSZ4fv9^76J1yGZ0=JRUlO|5Z*>bdR_7!sl`)-lfodDB^)pSpwcn6asecxO zXtb>`i2o_(2>`Stz7K@D$|ucxiC0rxC1>~QrSaQqlLHkdsTouM$tGOuWSaOe(mX=d zRKR+fNOSaIB?bZvgLOv4zz3+G?t*nFy0k6 z;FnP>+&+?lsah@X2{QLBu4_!e9%%IibE8nN8|TAY3s;A$cutFMs;}*VAUoZ#txfL8;MwTg zct~Aa(*>FSO8<-&q||vf51=x7!8=_yDE%u0bWScVEiwT-jjp}xp~KafN6V5@TF{uc zzua#QwD$2?1rqKF%JeR-ESW9`EjWjbg;od6WHYpY$7-nzg*#fBO>K0SQxm8WLpO5=Yqh)h`M4W{KFsyWImOkZNP6gf~&D8 zEfW-AE){DooT?Io(WDSM1_bT~tYGdl&?v>wM41DD9Hu~|uWn&XiOUaTd9XGR1b?Rr z6sR0kHw(py+Bc zp4nDb?kQA)jH;2EE{C(8Bn-%k$460bQK!r07TWo$sd9gzqvAeu-*y^*uolfs(i0Eu zV}kWRzJ3XDJ(?I>Vn>{omDfTcdPCvJ-=tTFEYcE%TD!$~noh&!A|e)spb06LW3B^a z?*Y%>SJsY3o3Q5sux#KyMA{_MuAHhhNdt86o`de)JNpuWmlzxa zMla-cM`19Z4OjPZQe5!a#w`O$2g)Y|>e0V|-`0cFwHZzfeFzTwfX=7ipvmu3 z@sUlE4;jz@Wpc&=m#!02<>((N_#BOLls}HxoIlg=KI`fPkzWce zlSW1$EGSvq_l3(%NzYhGrG2lU%r)dk*fG7@=icME@e@dLut~io4jX5e8u$RZ)=D|s&xR^8V*G=Y|awo4O$wA#DnIiK8uLh7ob0w()JPOp8lZuo~A>xY9qgjKc)?e&+S@RT)bLrFIP{ePT@9O$ZE^UQS%<` zWe4h^(PmY(_aBlU=z9@Br5-I0!2&4g_17+vALxrS=+(M{g}yGEweHD7TJ>1lw+mr8 z3iw5_f8>WfqwfN?+;lG67t-Gd4qJhB)&JSaMc5#bf~!j*U$a|1xGp@(vpBvkuoed+ zHNm!&AeFYeJU>iAmtvE=Ayb0XnSDQF+9Q}k4SAuFfMnya@OXl(^>y*lYQRWMv@Lvs z8_4NEbZ1FI8 zrZAut5(dpX!H#TS$J~K2k3;hNVmfyblWcV0ofJZnO9eT=DpZ#w3xVOMtaeA{oGr7Oo2365;; zLEn)9Sh(m(mt-5rFPp>d=<9jFE&2KuZ}Y>>(wl);G`A@pkPrHX9~cb^mE-B>uX3q! zE`to&#qqdzU-7K^S$1+&D@~5T-I8zUYc433-{^!ywvS@Yl!I{7QN$^KC^!uTjQezn zJ9sS*^Nq>Xe!rHr+$}5xWsmUdx0fVE*oSCMk((#j z*99Ex#4R_^3Hn*~nprOgn%+=p_Y-J7v538C^{HoUw#f@y|0~Fk3xrxnrS|xLps&G@ zW-SaNXgRhu7E=wAG~_-8!J9=)OsjEj8Dj4Yb_q>>!w()yz`X1CiTP*maM^M^&DFK( zyoq35*>-4g{@DyJy01H@uFzTLbo{UYd`n>k`dt7tnv8+R649h;wR431S}kXJ&^S9*I0{z{ z&DlRbeO#*FWVr=O`H4UJi52Nr{&dZH?j?=_4BvYm7$AuV6fyP|E%AM^N=%mD`9ilL zlAOo!Hw~$WtQ}EB_dNx9a)iz7)ffUsFL~3Hy5HInZ5Z`E-2n@t+rW`^pa{^_n%o;{ zzfg-RhxeJu;I&FDpgBf7H1u7(LJZ!50s`z~u!XptN4dO@OB;8+)=mzmaGLy8Nfc)K zrh(7BSFQ>iCHE^IKC}BEZieIi1HAmR7r7)ktqwzW?JV4TEk(U0PrO^YdEN|6?DY~l z;YJiuHyAk>RC@5Xe*bPfw)==CKJ%t{GtfG{?`gh-9y%GM zMG!2Jj}C&b{#Eo1awWZ43mvS{#p3HUS<)ZwzItm|)8r-`xnl_E^%>w|u8H=%lBRvr z9978U>v@9UMhiT>yiGTV%w2OpXpU~_A72M&658K~H^gr#tjD$tdZMneYrH>tCCC%g zDjt${w5+2vd#V#w|Mx8%5@f$dYqi`xgJ}&tdB|tq+EXuC56o?KSbc&C*~Y2dnP7=V z*TVRjofGitp{?*lko^j+GuSkphDxY1A9F=U)XRlu(+^xXA1;??Ivly2UAPjr(LvFe z<=&T9C1A<(GO};xW(*=(vKrsF)@<)tt4gqSu;Ix4Pgf*k0r>s9=hd;Ur(kzDe2dvu~_tO_ocU4bIIjm*$yF!qolUH|V8T6TJr*@u_3kWMSqt;mtYt zy^f{cI}$IYN|-_NK7v0u)HR_YHUlf%ss=KmvaQ#$w#unW8A&(r(C#e*pBC7jePcB% zT7HXdDBb!GZl)qxdePlAbhaNEEj~7Nn$>o0GsSf#c@n)Q(d%~FVJ|<5{O$}m*=@_s z`Itr}Z)J72%2r(07%%q)U3$aMq>S|^oVJbRkG0tG&kf$qBx`1t95ky}Lc^bBN0gx1 zSIT>{$7}rBi6A0FdsW)1J|NOaSr+l}v35I=Kw)8){+y4g- zk=Es>I{Bv02#}(o@x5o#FlilUt5>Mh1M;o={mPE=?L~iPqIGxI?`4Aa?u!{=HN%!p zwtcfAU$*>A8&2^PNfMSka(nel_K(Fsu1NgLPQ7Fo3LQ8$@+D9Wr47P)4Y7Au>^jpe z$ShqvXI=aBz3+rK&YTDa%Z^$!e} zu3UGu_dow`iP+qvucuD-sU@-pj_P|WYjfK~I$FY-j&%Ug&z{T*YW0rp`nn^kt=Mg# zTh{G)Vfq)(=sg3yvL6o7U7n)w-B)_nhA+l874mPPh-oH$_iA$YJX`wi!tGTJ5kGt4 z2RdXkWuC-d6I}q8?9{byrS+xYchPT(lio%jK=L&}0LQ+UvP{Ig*Li=bTlYt|@P4;} z&dCFc{@8m z)NVH2@X1mY0a@MpyB4?og^0eJnf2d3BKvl&CT(7G-@Vbc{Hyr4U!H}uHnkU4WuI%N zHMCoHUdS8hEI;8ay9rLnPryC^!~J0rk?~{Oogc+_1?@fC%i;$)PL_nnkeJ_hhMn7xOq;xWhG=5&rTQl^=}N}2V*S}^eZwc5!4$0 zn(fF0VZ1^5yN8+nuD{$3aGD{zd%#(=V=?5r-c01%o$)ALgr3ILQs^;YNlj6=!9aiY z)Vuul4!uimy+1BU^E1eBGS;I*KZEmkjreU&)!V*Lo%gP0jup0uqND>a9zOv~*OYHm z(GT2+NhT5YQiGo#YkXzjr;L<@_2!AfJO3~jhG1<*^n*DE>T5;o`?3z0^%u#q`p1r( z?j(zPc{9G+P^x(MD3AM_Q&)R&bc@GoS>qS)9khlI&UdE|6d0@q?h!? z*5wV7o}S-(|By9ws4K@$s2}y+(`@p=^7MUR%)qOiHNvQ^6p0ho%0)lBW4Def8YnI0 zCAIx=LDU`O>>#44vAM+y@Lo^%7PS9S?zVP+@6N$W&Dm|D+FUrFPUn0+Xpvp$QTXh>m^xCnc0xSJSnB`aQS3TNXn#HLgo< zMyeB7)#BHGt#F%UO?O^RK;-&(gptI>K1lTUJMpuXugWj%4xVl!sf<{-t~b|IDb%t& zp2LH6ZW|(_dpF$Ma4n!bzrnxZXBc0A48^`e1c3c6Kk-}0q=A=bA5I_m?Boz|GC1Y5mR;hN_`@Od_Itw(vWn+kal@Gk z@Q$ww@9gVJZ3&2SP*bxzl~Xftf8a*QB;idnyRhC{&T6+ksBWU}k<&-I?Rmcr`cwAf zZ~$-wH2{vd#PgMX72J*r|9tTHdfkSmj2mUq2Jc_|0zoU2J|IneP1J%1@v;H4^ntg_ z3^WG4RKCFYuRqeX%m;jE%FgJ2<@;0rl`mVJuILuYdP*z%UdS4?H*OihfAmmavSBcI zIq(+vq|ig~Eultp+i|-Y!%n(Hf43Hjeu}C_JRbyZed<2q)+P3iZV+Ytc6tK%X4d_m z<HuSbdecj%4#sN7M&OXE;)mVV}Kew(238%#82o%Cou8cvFMhm7yN(w z4Gez@Zh&u!joSlQq4!4dA6)^H{)av$_FpmPi2v7bnhm(|k9=`iaH#MQ_!Jvy{+uPV J(>(mR{|9ZY%V7Wj literal 0 HcmV?d00001 diff --git a/images/tail_two.png b/images/tail_two.png new file mode 100644 index 0000000000000000000000000000000000000000..3073c5072a8c56fe7f3e8c9ef3a1b170de7b956a GIT binary patch literal 20297 zcmd6PcUTnJ)9#Q5hA?DAG7=<+xQl>DR76EZRE9f5Y1PSUQ$VgDhVdkEuyJukU?|%P$_kPda$NhtuQ+4XpdF!pJ)2HXy z`gI<1GMX|p8clB1%Hz2#`$rgGkm`Q^~xkOnX{p%hb))ayO%mZ$_^!jN)4rKE#f>)R-dxS)MsvA0xm@m0WaQ|fy^{`$r;<&l3PYyKy{F2Pr^?Hw zS~912$y2<-DPGwWuNnA(mzbcaX?_?uWAnic>o)TLAN@z;hYkFC3d|xMzS1v(Mq6Nr z|1T1K#rY78rbk<~+;vm*+1_(|Q|GN^Wxw%p_4QWq_I~}?Ry^%-qmQqviu;ZUKecL` z2|iyjukY;n>$jdhEj9dhw%BWVV3*iZhgR*829tGL&iQTq`CA0T-TSrPP{cmk@k^$K zOf`4!hbq`5)7`(iK`QQY8|f!5U4vy{Zxx$0`WDA89hr}S;S1AH)8m?d{9hPs<__gm z-aHwZ%X~YwPc)X%UG1j8N^%iLvajX~>ERcWv^y)Vu-xk6$v=%SQ44O5z_i-s8K6@P0LA6BbRP19l1=$l28>$n?|!ax zkFX*W{ir2|G{{e{)(JZkAHq%;{ZF_$sS+Ds z?yb^L#8hi2IUn#;&Q)$R{X`GsmD73TqND}lK6K-1`hoAfQyccfg^lY13J!?Hy;a-u zX1Ar-n&h>nNkLK_MF;`0-PQ4d_9uOUlx6gqC~!n?M!U>YZ_Dg)6A>qOV4tW5V>mKo zJ&O>h0J^if*SvRMuxb+`NaKz2t}gwY{K;U(XRD!Hr#tq_KPC~yIkK!Fw z;%L*5$G|fNc$C*)lu&pSQ6<&-uU+`3sN<(Yhhmb@7z4r198}?KO`4#e``6GxWlnsO zHsVxchDu8?KT|RPxBtL;dpdX7U&%C*LN4T@hiJphQjPov#wso-5kvjPPxe&@w=eA$ z!Ftkyq{zLkUj>!XCg|G#nrdE=3z}}mUOsEjTgBs%LWKdE2t4E}RJu3$y`~>@_+LhC z@Ynn8<9-DuOI?7i6h$O!A6qncJ*}FE{>ogvyAo%1Fgc$iE>INJt;aq}%Tzp_J{zm^ z?z`Mua{@g*%gitX4X#MSrQqLnWKAq|IvNSBymD-V_N#epEg>KhV_<2Tj3~DHmMGyg zFLR4G3%4mON*99dP1+TJfecYhN%8I2T^Y}j6V0j1XQvoFUv!PsoyX6j9yvuU#&dkUIExvlx+KH15y1!xHm5h*_Y+*zn7$&mkKC_spbI_xjs=7)~@t)SS)#Q21X8IOF-P( z0diR$-et&+z+|k26tzQ;uG;ggAGWVl`s(v|ZubX}7eykCVy;6jn( z2TN!OX^PGr(9mN)F(Y__r-d!~knsvz5+=0Yko_Sz2^FOA-! zmKMqESm^f4Z1;;Ig`>4W+4gqQBn|0ZlISW|)MMZM7dISHW4$(-y~#oz zauUDS@w?5sA-$T}&=kQoPX;fn)jBIlVqseFFKel*l;GL0YQG(4xvoF{C*zLW+bK}S zt$|Ev>-6>5rb4j1vb2jorfkUG_%DN*ocFq^b3W=3DJRa>^%wLx?d&oa$W@4*9sc1w zQInO>j(<^<=_t(^DcrjBK>-n7lhtXe+fHcgIPYdBf%?$%$)H12jo2I24_~F-mjOl3 zpeo12tRi4ta_+nM_(Sdzl2(r*8(MDIGhm-v2d-W?V!qmCi%-eTGxstW`4xx0#$?UC za9g5tpLB4WxKGE;pf1|tqZrRWzy5`zSyNF zPx4XqE?9!L91z~Q6@s*5_crAkgAKvj59iNHhSRb?b?GrFSwGmFhTyX9LfPgNl)(;y zwMAzq(rMY`EGsC0*0eV{a7V?dWFa;bc`S z_Mw?vo1pBPB{izgKKfW}vYChoT|da12A3tF8NOt;@K9lOOR!SVGu49XD-)eTQbBN< z$fI6SY{{1YKsnAA&~5$n?~sP$N2oe24oL&_MMC3)jJdpCxH^;bl0ru`CR6!fwIa(< zOHgAARu@Q$A{{zI$Y4j6S%cbe2HHIEpKaX)yNe=yz*ZJ%Yn1Z6 z`+Ae2=BuE!N&msA9a=vSm0rKGohf^LQWJ1$s?e$FmOoZKc&fx=Y@1a8Pm|0^TdDa} zI?RwZSJNw&qH{F_Nt4*LHm%<&{X0WlF>Uw^s;S4ARbfxFWU>7d5t6~eS3=damyRyb zQDI4UX7j22$yp{A+IMFaaMJ)0Ds)m z>&#f_4K3RFzpqJlv6LUNCR@c{bvtt2=l^0oz&If_D(JhE(ym-GpbG0mJ-G9&q5(UN zs$VkE4S-1sStPP*m03$&&ZEmAL9q;~^WPa3NMX1jC9$4^6jVcjBOE*a+yi1z2~ron zBIEhcT~I?W#6W+)eCGE?=_1(fe3H2`joIC!d*D?M1pUFx?C5+P{kxC;3K(cZ6-tV% zJE+PwfprQ%eoz9wN$Xp6kL(Fr#lOkqi=&XSk^a$Q884y35TAtL_(*0B+`dH)_GdPU-T6yk^s{a8M0mDAvo z{4I441ui*kwb;tfBG})Gf>r}j`zIhMQjsGzJfnM*4`^cWKkwX0^iqTsZ9|j@e4Pr;I)?d#C1ND z*PWy)sG)Im*s*kz#jMmR4qp+|V>d_CGpPIrTG)!PE3;72w97RQcce;Q>OP7MosOV7 zTP)OOoDQ^#XQpL=N^A8CS6d2BBmVWDMDz2}zPRsZV0+Ry<<^UXpo~7gqqK-6&W z-#~_nrFbV_I)6f2e`fJpXUL9f*AoIq#(YVL`b^+}bIVrhfFy7YG}S*FIL7eSgcAbd zDVWdhJ{2!GDAI)^b;Xdvbh1&_g-ejgFKY!ExGEc!wSx798MxngGzlxMI5|6%7pFA< zZ207gDNu<)!Gc}TzI_%i4BV2)z(e_$Trp*8Sf(jEm+|K;E(-F5Dnyv9+x82AkEV~2 zN1tHhU(;vDdyXZFR|Z#_wTcBCvl8AKxO(=mxmXW4e%SpiS;#SJoR*@^v$EQjdk-RT zgl~%oqFVj|>$E~Wwm%ik`%?VjA*lgr?kBm64i6^GY^1;u0dXLXck!+_?NNcT&7!Zg zFJ1?=nk0n?W!E0DNha$DVZN%9HjjxHd0@)E`hxzBYe+RdGwakG#cXayy^SQDt4Zo{ z!rUM#8%^%Ujt2yYgv)Suxzhu6gy+`6y1ME(x+e;`4^Fs!DQqcb`$1j|Y%`T$)j_q} zqa^6nGSNMt8E-Qr&jqavEZYBtL`${_QYgrAM(pm#HZzbk1{kb@YCi&(K{c~7AUN>g zw)B_IV)tkh3jl>1i=+Z5cY^kTft6A;+;1GcH~Cuz6SfTb_&}B<3>qBoKRb4>pj&A4 z{3lw!3aDo%Y)R*e3Q||c6$uV*%%9#24IMr;NaDEk|PPtPQ7FhKA*H>;jW-n;Yptn&7J#_y_$9Gi0!pA{U6ZJySN?94Q zyCWlU2Sa3z_y~40jM~j!>_EF>DG2@weR66K$OciJniAkCpKc!GSHaA#kTRzxDMCN1 zL&HE#9t8qJixI#-FDR`i=;qN4*#|ORGwvt~9+cEM0vrkqy^BspAv~Z%pcM(hNkjk) zeRh+3%Tp)G`G2pVx@<#>2{4N)wIjZeL?4}T60c8)!}mC(6IU@xp5hxNTzvktetuts>dejVx=y0e%5?J0%|t~Q5l(> zgbGdoae+IefLeBigbxVJH-y0+kb8~Z=y@i^82w5dWe{&J)QPbNgbywuSI4MpPgw*w z;Vt13L$+BkGuG=zl>kp2*U2}q_>PE5dOqmZEUbt>Sny4{zPV1p5@0|%VL&XM$x+3)d zrbC=)YTX79^cFLKuZw-9p8Cmv#_bMS*QjuIh>JZ4QPmVfLWq-5T^Rh);s{^V(V+a2 z2G;FI{1L@ms?QEZUhtFAv((C02X~Y{y75{}moRPxh`K?kXx}U#WlyQN0{)mox(-({ z7b)VqK`RJuQ)FGYUf8Of-IEMT8~jmg9$Kk)P%1ibhLi_X2vm#_8Li(7tZJWP<)jJr zmB=oc=YR$XBALL9UYMf^hNSQ<@P+LN%^?({`^garq6sE*6 z!v0i!!72pQuz*^03HSq?yyMBzfx#XATHTrw1Jtge<~R_{JRn5W2%W2qm8g38&Ja^% zRRA42gpLWB&=2o{jufC{DWxMOn7Lo5qu&$VuheR3YA0#k|7f?^HIA4Rg{}^OE(Y<( zR_Xf-wBK4@vne#nqV59NNz&^?r?ZR`W@abZ+Aqx*en39tS_aanw#fY(GgLTAFMe^c zOu`6Ius!7xRpB4DAa!5VeX!j}E46I|QH`w^1j&97Bx2Jbn9LAwxmw?vat16%mRinf z;U6RF962}Jq+T<7$#ebEp2HW&lrlx{JL?+7*qs5Qi|FkDHozY}#Bp;%6x?bsC|bPH z2ADHMaaV&@YUK!G6I(x*nA-^Xl*K-rC#ogkJbov`MTiv2|w`ZUg#nk*M29rhjI$|VH-wEI9U^rNhk`K919 zvg64_dvK=_2O$aSaBu6|V*mBgvd`Zt8&E}A8B>q#LC;N$>pKVSrTN6xgQg9i@;p|W zS}zh*Ad?9+5D(816jEBvC88K+nXW~iY|OEnPJwBuBt4%zvD8kBRM6KADl)_6h({Mr z*bRJu34u&)`f%8ux0a@kk`;Z@<|7wK#-Znb1sU`_0g@4A&Q|1L(v%rU%=v~Cya&O6 z3}Qf+^3vj)z#+pL2TM&XTB+vQko`CA5rP-n*FqzTcSLkH^@8}Cq7Yn&`<l>%f~T+z-Ynh6)3*2RlG4IY~;*LeXP1vZnNeUuVM$L+)Mmp<_zeOgfjG6akx&k?-TI3MO}MlqgdR^N_w6JF}L z;RL(@x=;M+19)V7qW=E2=qyl9G)PaI7>D>I0F5Su#)vedx6i>YC(6pV3U^tNH3sG( zk2d-Z*zw38svq)sz&Ix=EXQ%&5W$vbX3@F5rZq*RrsIi_M1f!MNu>zCY!dCfP~yK3 z)6km0lT~MIy$ETI%>$rz0ikw>(#oPmeQGBcO4jlYty6Xx(>X|$0dfn$sz|odMuzD6 z3NAMk0sRh91JdyUB)1(CZ%#j1Cb8_K>#*ZHy5kcn=4Xx>!(x6sC3&HNi9>)~h=*Q) zYO(*q8jX2@+vHxR9wfcanK@z(9y3xLW>W*!5J!xDMSq>E5yg<4llnFm zvyM4MboNe|W-#!&6R|CCz~-E$z1I8ze6)o4Xsx)VSK2bjlAh^&^^2155IE1sVk{1L z?kSi-V2>%V`3{jS?FEFN4zJDMbe9izN4sAcAK>^WaZc>snJ_;I0s=`Zxlf z24xXVM8Yj}9wM1^QggfPnFY6JTnPFVfZ$Iug6R40_5d^Lff-vUx7YzQ4v=Q3W*@=L z_;Av-PKW_#cgWHN%$y8n?xboFNl0!BINpHLa?N^WsfpGNsa@n!r9D^BrFQ0D1V$TCM%Um*OHC74!cx}{ z?nz}5sp+oIjX03w6N(4YL4Rsa^1%1-C;CfTx=j<9`+Le?L10yX6U?Guva@2x{-U6J z)+CQ`s97U#estXNYZu%g zpPpj0In<=Uw?xFvKfF7mzAeSNwqt$%2u<>{s~xRin!2N58$(1yD__61qe6?AG6u5u#HfzU|^RJ1NQt7SjP9%o;Lw^Ruk^5l>yM9Klq}F z4_HVHSSuctR~Gwz_)%-h{@S3TPfHC-sHf#NpTS(DG0V~-W#2vVmEaVEwNTS3a()Yh zz+wk9J{M|J%~d8^18Njivb^{ml{e5Dzf-Ik4W=|Drc}h145_V%Vyw_fJy#>>+Z8zv zfND2#B`O?mBsfr=We5s}<3z)w3#TuY9I+BImk72b(qm^>bv=+XAmlutWk5iN5O7`x z9aWT1fH%oGN=79@0^WJS;J%dr9b&L>D9{ax3UlIN_~b%Z+rw@=%hhIBp*WCY7SPLd%gqv}}4`1Np+N)X1! zt&3af!V6<_VD~LSZ~PZN)_B_|PIbe&@H3Fk%|(fj!tW2*jSO84Jq{KuLN1sIu0?>o zia1&QEI_b>iX0W-OVR*mEA}h8iMpMC1h8WX(F^eQ!;hz@`%_~}zvPVRKsx6xB^-A( zEmG&*XPK)aGJ0nN#o%*9R^_8;$^!JW<*y;&(ZVjuSM!3y3v~tTbr+Lyv8#CGmn2H> zYIK3fYcbAd>}w2*SjHdt1q?N+?5WczZ&#$~lD7(W2a|o62X5>pxidL_gnk7jWGn8Q z7aC`qPVb5dm!X88fe(Hbd@va-z90AOdEg!s3h&?WMH3l|Hy?hix14=I<^s*_$)eiC zlYhNR{f=;>t^vIq=hjO=v`esWfa;e>OmjAG4lJRMSVTwy(Z7})O+2;cb*eHcst=xF z0?|K!=v7MeJ6u$Z5S51A^&hb#M1g3%8=Wglcvp(n6t-M8}(LVHbc2 z_Q_2e<5)v0s1I728C3GMVZjD5e*H6H8IUsPE5_p3P5C<*%Ur{$jQFRANAaKA2 zi6rmIfSY(gAe9pMgbNT%#Xp5^Q#9~(5C;MW?U6`X%A|H65KIZ+N6p$q1;qamO;L2q zaS#Opha8be`n15LT1vN+P239l);>BwSkurM+ufLs7F9a01<966vWA@ad>l$ot#`KG zm=jws*d5TNa}v@l88^SSBjj?W zE9e%dZ^_#-%ysl*9&ZOB^3D^qmD8uqS2!&a*}18wd+wr5xBdb7n%isq@R{qXG;~}A zyRkVht+VFBqwzyUqhqH7>G?Y=#%192jd^L0k92Ybm#@1mqm@~rZlkC1%X04<vd(@fG zcD$n|-wRkV@W!|5)!-&ORe|jZWgDx&O;u~oS;w8!G1@bG$$a#+C)+-@o)DaU#a^je z8C$)A9{BYxx;*&Vn^YFz&k#616;)Eia%QyZ_O%^rp)0@Y+Mq)Vt`m3qmq$29js>w7*>FtPPf^iKrRzF;5%&fGJ2pAm5&RgxpR@M z6U@qgVqwQc!e#KSs~f?sk*p)&8#9X`rO^N4?Exo-=l3%t^{dkgm@G{&IYo(}{O;1& zBE!8sV<~H~n02lzp?h+G7;0`5IQ+47+uD{?@>on)vHY7V_SEeOG*p2eO1IgoaE9WR zR~glJ6OIW#Npu+)D(KW>uR%`wfE!K(y=10EzB5O%(oWs(`Q{t!SZZ?iz7**zL-wxP z4!^2LX9S=0E0-rqFyJftKd@sg+1kNEGZZ=Zf(PPY3&e=Xc>MKHyB=GfJ}2LRO&(!J zN#C+UL17No@S^ngAHA;Rb3A%zvvsrydn%{(s^GI&aj!=3gu|SnAKc&%x7u*-IqoFd zhCoHIFHcv1<<7Q@`8FU(pKUR7X%krKSJE|O6}N}`q=ouNq!%wBZSlpL%VsRmS&j3! z=^L%e0=x;*uG4X~;&yv{Rmu=n{^tMEAv~p?@>6oN_C+<&4lM zlD?1o7&oJ6dR=#=ZW6%nXK?3$oA5L6T(v5^3tTd|qK{aW=(Eq+W4l6|3n$^^I#0+a_gq)(OYVDE~pC;BqpeY9^> z1`Yw^kE5CdHC5>skNn|{WE}%wK9AlyDTIENIs4{*56BPTabI7@u#pf?{4+uQs(ADQ znOkVv+|Xv7?+He$0+&-N-3Xa5eXNuy#CfXKylD&o1l~gT%?P+ELv}Ar%+dDd;Z5He z5TA>cCW6bQcbJP<@p^2}8FAANPTC$2leD!wO81EKr8~66^`i)?e{3;>Z!)7ABtA{{8XkRIv#eYM5bGDBLS=PXzKsv~B8A zxPY_yzqynG7wrPswg-#ZyuFu7D1ayO_5-2>Mg_xL1GWkCk#CBJLfOG~`KT?J4XjGjJ< zbbe1xY%=oo2oqMt$8Uu`N|6qLw&gK7M$<1jW=hxXBu)4HoKpmL*{`+(JSpvuvYPfv z`0okvb*9*vNZAZ}-EMN^vhK$lLzoOvcI{LFm!axF`BDf6woBIqlN#EN_2+%a zK#g@$4Y99tfZxFB*TsmAhAM|-{KI9~omLgKX{;QSFOS)+i=By<&0y5Qq6MYs3m9tv#4tcGzMO{<*wN-NB8}G=S=D`aW9s(L>)`+nHHpk_d?Tqm@^tJpG{& zyAOZG0$`U&&|O$ob>Uc*9DO#2dv5k*`^LCSpfy=475E1?~>s0QgQnJK5!)qZ?b|L zHex-zMZ_MvUA?du1X2jF+KPRiGVte!T3>qTZ{Q)6bpA*ksbcH4^C<*XU^z=iX;o{3 z(;n{inTDua<}Y}Xt78X)V((os#mogq8JHjP-~8)-V%nwqWu z4|ICB_3eY&@uft9N7D_IGfKG51FG2O?b@m9;h}}3BYM7O#t{arfhzD9S^z1WDj8pf zdxvBFqcZENdK+Uptd-RHJ?2Ou1NbuT&mg#SF1d)X-mA6vrBg7OXj%jQf*J1lU7qHo zYZkEgkh}N0<g_p*IAwYR^g*$`W` zv#IfDM7TbC9;xmhwmIm{ER{1|A67b@PaO;;!SG9n4<+CW%ikfH?iAYnxL-;!8*f&F z8;->LeAFAeMS3gYnItaJY)w~Z-61gySO<^^?k%GLs3eN?_Dgf8Rbd)?=e{mbU0e3o z;%gp?i&%S`eD}*QBBuepYHk6Ov#3j>ob|BsM#QOTUm{SLWdX0If*xL|^s(p-Rc%To z7Mj0QYWjUj5Fhldw;J$0+b`?n`>?Vn;?#C>Jx>}m`=xRvBX6#3e&G|OAfxvKyBRHz zi#QcR4tVgm83)l=O^2t==g>N>d1TD%@4NYNqPoU4{<>YWl~8hR#3_m?iVNjI9ccL~ zy}EICQ{#R6mDVIInl^aguy|9`aY=Ky5G=1PlfVY^Uj0uK)x)lx1i>G1deHxe61j`a zyU){ZZN}xU1GxifS=1Ju3Xu;04pyCJ+CQxgjsKFijsmcP}qy&BkhkZNtNh!#hO@s1ICMs%m zhe%}45f*9?FBfA1CmVAGW$c*Q)n2nt4f$9W9gJWyY zt>im1j&(Nfhv)Q8=Od~Hf%|JAW6xSMqbI4AOqK33)b88UTY7hM6&O`;W%XEIX-@p4<<Fw(ueJ3vG&&5mL8atZkG$5robgpzh z0iO}e`OKqLc?_*2w;_yQI6waf(s84wJCVr4zZDwYBr;|rzw36xchg&oSoy7oUW}X_ z`sH=%eK$x6OJm2h^vs!F1(w5}&yIQ;lXwxIkdsE(kusuVr1yClD;(y1KnyPw$N(;70g0lfUB{cCD*vz=5~mvOmQAU9Pew5YY^ zj{|Q6wrVYhtO^h7>72V99retLUF+zxsq;WXsJ;af86^Ln+xBkf(%>CS7AK>cWeuh` z)O~-e6~}L%KG6E%brEeuVfA0D;s(X5$Fbu*4_EZ=?0J9ZsiQG5?a3Ii=bXzilUAD_S*kLNr_x9GqjNPyu#J3f=Y>`{00Q}qBg&Mdo^_h0{*2ai$x zBB8&3s<1!K-i}xmKK~EWfpf@;iII1$@ zYUPA~PUz&IdezkBz{5rC@hj$T%~4ky=)pm4mvsn4f*)cS)J^!ZJ0S7hH?Q!>ONj$t zJrciE1@aWJ-R@2N(M0Qh?@S_G!n^nbeGiT+PmR5*ta{6vgPm49zW;z9c+(Iad70Nda?OM4WcVY_yyu;s26bOe z_=6!oBzE?^3dsCxBax~J>FNB+S03OIHkO8#M8 zT}gZ5*yxZ*%;c5O694rHvI(zuWHQyT4b1Yfs){ecBT_|)hxiN2%ay*iw#Q8Ul*qs8 z0IqkS->TE6o-`SPm!DL`!+6=~qrC3WsUPB}Mm*X}csIvBSWRu2w$lp z@{7Wx67&0Xjuh#(SmmKprx#$SnTMQ4Q=MWFl$o8<@r-|Q*#C3c(RaORKQ%79efS15 z8vzsP4!xn~;f6_DC5BXPjZ%1+`!Q} zcsMZr@nL`BSi#NqGlmw@aQ|iJ?mHd;`tw11*%*~k$+4Pjo)X*Nzi{#&F1OgZ_}jEu z!%pKdRymc#z`n_Xn(_MyyvF;wTMu+CEIxTgLB46Up(ip8JMX0;#;M2G`G?IzQV)CoQSH)f|i_virL78I98ty;DsyT zUYiv?fp6QkZ|SYDxnPu6TV8HX&cU$6&UTU0+PAx&5gTBOxb!3*s%lg7M3USxA)^Ag!8o!cz~dVdwl ze0CK<%5*p9$=w~gT1~EWO=5iD^Y-$w4=r84?a@Ax_m;=(ucAje9~`TBapHJ8 zvHhWwb%VSs&z$4qG!~za`Fg-fQwJ$wB|DlXh4X`3ymF2S#?^Rr6uj^%y_Wtkd_;cv zVaw4w(=$)#atnza<%~K{_|J8&v_0>3$9l}Uxw!CDAfu8k8oQqMj#nEX_X?(Bpuj6< ztTQU{UZhLko_D6@jRk%|^)Hz@O8&<(W8fdYB&zU9PBIfOPA=@lJ?zpV)2wu5Vn zO4xI$#=xN~{X`(x^Am4Xb@L`)$ndMH#(ln2NJr`19Q--AUEFG3U3@ zdC!OUKI(*vM+Tk}dyh`MyIGWYgw*B0f0bB1)-o3}RPWZsyhzVgF^*MA3oQR_4} zGjYm4a4L=ePtAotOcD1^P9ATGEwTyHw=gT@M^5lQykEKmG?{4Ps<*I!5eypB%%^rSK@+;aKT@I;0hp^wE--`6bK#wGk(DZ zHvqx%=<0J%%@B9@#_<$~M8l)2f!Xejx?h0_`C#E&fC-(d*rjbJfF^v&J8?~Z^b^M| zfTj(=gr6e2+T%a^Sek*~3R4ANthNLSfS;zn1Acn_Kk_4E|J^+o{MOlPzLZ_oj}Mhg TTERQ`G}Gz1z>JVWH=-yrJ);DNA?YZFWj8NyZ<|XE)7Nfb2E2KPM7v%iZ6sR(uAdn+a#khTdX2OIRP)y}4$}iW$ zW-_~qM|`zGEzGZAt|Nk5pj(!hQ<}DPGT|4jWCCEr6iUl>ZKI{oey;VKLBqf BM=t;X literal 0 HcmV?d00001 From 6ff546222b70fe9bd1f3dbb5d5988e3a23676bd5 Mon Sep 17 00:00:00 2001 From: akuyper Date: Sat, 10 Sep 2022 10:21:27 -0500 Subject: [PATCH 2/2] update rproj name --- moderndive_book.Rproj => intro-stat-ds.Rproj | 0 1 file changed, 0 insertions(+), 0 deletions(-) rename moderndive_book.Rproj => intro-stat-ds.Rproj (100%) diff --git a/moderndive_book.Rproj b/intro-stat-ds.Rproj similarity index 100% rename from moderndive_book.Rproj rename to intro-stat-ds.Rproj