From 3121a9b9bb71dad8252e9b05b38a5a66dbe03d6c Mon Sep 17 00:00:00 2001 From: Your Name Date: Mon, 9 Nov 2020 19:20:49 +0800 Subject: [PATCH] Submit Assignment 4! --- Assignment 4.Rmd | 100 +++++++++++++++--- .../figure-html/unnamed-chunk-10-1.png | Bin 0 -> 26861 bytes .../figure-html/unnamed-chunk-12-1.png | Bin 0 -> 8837 bytes .../figure-html/unnamed-chunk-12-2.png | Bin 0 -> 10219 bytes .../figure-html/unnamed-chunk-12-3.png | Bin 0 -> 30206 bytes .../figure-html/unnamed-chunk-2-1.png | Bin 0 -> 10293 bytes 6 files changed, 88 insertions(+), 12 deletions(-) create mode 100644 Assignment-4_files/figure-html/unnamed-chunk-10-1.png create mode 100644 Assignment-4_files/figure-html/unnamed-chunk-12-1.png create mode 100644 Assignment-4_files/figure-html/unnamed-chunk-12-2.png create mode 100644 Assignment-4_files/figure-html/unnamed-chunk-12-3.png create mode 100644 Assignment-4_files/figure-html/unnamed-chunk-2-1.png diff --git a/Assignment 4.Rmd b/Assignment 4.Rmd index 54b0e66..12e902a 100644 --- a/Assignment 4.Rmd +++ b/Assignment 4.Rmd @@ -1,5 +1,8 @@ --- -title: "Assignment 4: K Means Clustering" +title: 'Assignment 4: K Means Clustering' +output: + html_document: + df_print: paged --- In this assignment we will be applying the K-means clustering algorithm we looked at in class. At the following link you can find a description of K-means: @@ -8,14 +11,19 @@ https://www.cs.uic.edu/~wilkinson/Applets/cluster.html ```{r} -library() +library(dplyr) +library(tidyr) +library(ggplot2) ``` Now, upload the file "Class_Motivation.csv" from the Assignment 4 Repository as a data frame called "K1"" ```{r} -K1 <- read.csv(...) +K1 <- read.csv("Class_Motivation.csv", header = TRUE) +K1b <- gather(K1, week, measure, 2:6) + +plot(as.factor(K1b$week), K1b$measure) ``` This file contains the self-reported motivation scores for a class over five weeks. We are going to look for patterns in motivation over this time and sort people into clusters based on those patterns. @@ -26,7 +34,7 @@ The algorithm will treat each row as a value belonging to a person, so we need t ```{r} -K2 <- +K2 <- select(K1, 2:6) ``` @@ -41,13 +49,16 @@ We will remove people with missing values for this assignment, but keep in mind K3 <- na.omit(K2) #This command create a data frame with only those people with no missing values. It "omits" all rows with missing values, also known as a "listwise deletion". EG - It runs down the list deleting rows as it goes. +K3 <- K2 + +K3[is.na(K3)] <- 0 ``` Another pre-processing step used in K-means is to standardize the values so that they have the same range. We do this because we want to treat each week as equally important - if we do not standardise then the week with the largest range will have the greatest impact on which clusters are formed. We standardise the values by using the "scale()" command. ```{r} -K3 <- +K3 <- scale(K3) ``` @@ -66,21 +77,37 @@ Also, we need to choose the number of clusters we think are in the data. We will ```{r} -fit <- +fit1a <- kmeans(K3, 2) +fit1b <- kmeans(K3, 2) +fit1c <- kmeans(K3, 2) #We have created an object called "fit" that contains all the details of our clustering including which observations belong to each cluster. #We can access the list of clusters by typing "fit$cluster", the top row corresponds to the original order the rows were in. Notice we have deleted some rows. - +fit1a$cluster #We can also attach these clusters to the original dataframe by using the "data.frame" command to create a new data frame called K4. -K4 +K4 <- data.frame(K3, fit1a$cluster, fit1b$cluster, fit1c$cluster) -#Have a look at the K4 dataframe. Lets change the names of the variables to make it more convenient with the names() command. +fit1a$withinss +fit1b$withinss +fit1c$withinss +fit1a$tot.withinss +fit1b$tot.withinss +fit1c$tot.withinss +fit1a$betweenss +fit1b$betweenss +fit1c$betweenss + +K4 <- data.frame(K3, fit1c$cluster) + +#Have a look at the K4 dataframe. Lets change the names of the variables to make it more convenient with the names() command. + +names(K4) <- c("1","2","3","4","5","cluster") ``` Now we need to visualize the clusters we have created. To do so we want to play with the structure of our data. What would be most useful would be if we could visualize average motivation by cluster, by week. To do this we will need to convert our data from wide to long format. Remember your old friends tidyr and dplyr! @@ -95,7 +122,7 @@ Now lets use dplyr to average our motivation values by week and by cluster. ```{r} -K6 <- K5 %>% group_by(week, cluster) %>% summarise(K6, avg = mean(motivation)) +K6 <- K5 %>% group_by(week, cluster) %>% summarise(avg = mean(motivation)) ``` @@ -113,9 +140,9 @@ Likewise, since "cluster" is not numeric but rather a categorical label we want ```{r} -K6$week <- +K6$week <- as.numeric(K6$week) -K6$cluster <- +K6$cluster <- as.factor(K6$cluster) ``` @@ -148,12 +175,61 @@ Look at the number of people in each cluster, now repeat this process for 3 rath Using the data collected in the HUDK4050 entrance survey (HUDK4050-cluster.csv) use K-means to cluster the students first according location (lat/long) and then according to their answers to the questions, each student should belong to two clusters. +```{r} +library(tidyverse) + +M1 <- read.csv("HUDK405020-cluster.csv", header = TRUE) + +M2 <- select(M1,4:9) + +fit2a <- kmeans(M2,1) +fit2b <- kmeans(M2,2) +fit2c <- kmeans(M2,3) +fit2d <- kmeans(M2,4) +fit2e <- kmeans(M2,5) +fit2f <- kmeans(M2,6) +fit2g <- kmeans(M2,7) + +mss <- c(fit2a$tot.withinss,fit2b$tot.withinss,fit2c$tot.withinss,fit2d$tot.withinss,fit2e$tot.withinss,fit2f$tot.withinss,fit2g$tot.withinss,fit2a$betweenss,fit2b$betweenss,fit2c$betweenss,fit2d$betweenss,fit2e$betweenss,fit2f$betweenss,fit2g$betweenss) + +clusters <- c(seq(1,7,1),seq(1,7,1)) +col <- c(rep("blue",7), rep("red",7)) + +plot(clusters, mss, col = col) + +L1 <- select(M1, 2:3) + +plot(L1$long, L1$lat) + +fit3a <- kmeans(L1, 2) +fit3b <- kmeans(L1, 2) +fit3c <- kmeans(L1, 2) + +fit3a$tot.withinss +fit3b$tot.withinss +fit3c$tot.withinss + +ML <- data.frame(M1$compare.features,M1$math.accuracy,M1$planner.use,M1$enjoy.discuss,M1$enjoy.group,M1$meet.deadline,fit2c$cluster,M1$lat,M1$long,fit3a$cluster) + +pairs(ML) +``` + ##Part III Create a visualization that shows the overlap between the two clusters each student belongs to in Part II. IE - Are there geographical patterns that correspond to the answers? ```{r} +table(ML$fit2c.cluster,ML$fit3a.cluster) + +ML2 <- ML %>% group_by(fit2c.cluster,fit3a.cluster) %>% summarize(count = n()) + +ggplot(ML2, aes(x = fit2c.cluster, y = fit3a.cluster, size = count)) + +geom_point() +install.packages("vcd") +library(vcd) +P1 <- structable(fit2c$cluster ~ fit3a$cluster) +mosaic(P1, shade=TRUE, legend=TRUE) ``` diff --git a/Assignment-4_files/figure-html/unnamed-chunk-10-1.png b/Assignment-4_files/figure-html/unnamed-chunk-10-1.png new file mode 100644 index 0000000000000000000000000000000000000000..5013f08cd77184ed12630e0537dbfeaf2b6f2716 GIT binary patch literal 26861 zcmeFZc|4Tu7cgGKgb`Xs3zZ_-!t<1+2%}^TV;K8TDa%+Y8A5m_l~R_hMYt`4u@;7m zBrQZ?FbJWA467#eoCW{fv`J~xCi_iFN}H6x&+tw5_M7aBH&whl ze*8Fip|r`K^@jBUzl1B<+bh|FpT$by;M=Ls`nc)qhw8h5Z?=Bu2m6(^>{q7QD}}R$ zvp(VAKl^a-v)I14)4rGq=D4vwp>CnsZlNFCvU@|pDsJEl9%P4Re+UInK7cPXTxnA{ z*mz|v)&k+h;l-Wdoy=@E{cJb4>`=Gt553vF%wqdZ#r8_Y_V&f$O2y&!#jHSj&SY!8|6DnMS%e1Bl9XRomkFrcL{U zSpRPh>-&9q)24%)bTrgWZaf_>Ux?rTK03YZ@>g_T;Hj@~tImh0eEog4`Fvyl#j3>T zdpj;Z>{M-)GkyE8la|hV`XI$5i^b)KU#A9<2_1S{F8+U zU(d6ghcw=O^5x(>lx8Z9KFzuPG;zo2d)p9E+fLs`L$|jH--e0a-gXEne&{x5GK%Yv z1}9vX^U&%4>(F<)(C+(bVXwdK>gr27={(_Baf!%*2!iokDud6QaH{V()gk)?7M)T- zKOv6pyj0(D;{W~o|Iy?Bw>(6=yz1aUK64%or9YiA$0OuCHNK%CqD#qn1pRTG^{off zdg&oK;>n>6VdPHI20X=K2TWaU}L@%2I>`S|WwyNqv@z%01D!)6tfcjLlvL-sq`2opT4o_8pGk|k)d#A{STU#9Zxf~YaXu{hi{my8nXvPtk&EuZMP61Hse ziayPfoy`vFL{H;YGWK##PRuPP1gLCd^v5TuCNUQoSB}R}lkx`jpt9a|$vjGYwajN` zyPp&6x;vYxvN#;^kTjB!ElzV=gZsq#)8!Yz=Q77)2Fut))HRF?RJ4uL-1-|7NBci*!_6dtwT8&IFw9;lTS}&?4fm zD+tq6R{`9YgOXRhUz8S^H>eFQ)Tpe9sX0;AH(*(5zHm%WX+RQD6u&Bj9HKO>5;L)c zu-{&GmQ6ZlQ^K@DBcf$1b&cILyHIwYsoB6gYCWo|%ul-=cjH>ZP<#>jn#)E{Hk9s? z3_%DmC2=wJ*oOGjSP!ZKsZg2Iy1XGN5vBC>wlQR;jKfaYa55d~`0L&qvIdmiFAAP% zQGOMyK1xQhwR;+ARU#P!YT1|#JMx88{1Qkw_N2_^HM$r`!ziZ!sjw&WF0GRaF7QD? zPl-1jbtVAPUY8L}L2Sp^n^0IwZ(8`e;9_D?4KbY9! z%YagvJZe6+Zg=P+=rW*_;F09|BbFshecF5;;lT)t%3QZTi1Xym(JWqeffq`AF&&wI zv}^NG!UC@44$3f+t+6h4)s*ma6)geVrL}zS&IV}@#!%<-@U~EL_PwiQS3GW=8pwAT z#U88*r(F2HV7Kx$QtCi;Ui@&S`5*+ncZYS6?J>9{ynvqje|e_KV#BUV*gEtkqUcl> zLJ!U_QU5YBXSM%%4BO8%KCwZJ%A=IJJNw~T8ZU0HQ;ony{|N|*6}B#ySvBzc5OU$J z;oAWdGM4w8+h77p&($4B>)=1=mumx`*0ST>ZBDZumHjn0SLoku=ZFT(lTjOVfMTcv zd3Y=6Ok3|;Qfoe8V^OqTmxmcehDPj7X2h)dmk#z04>Kdki0!{WbSS1vdtsYl`(JwQ zk)ZhGIFaazQB(C`?!jj4-*a_46M!O+1h@a8 z!yS@aezpM8@m-6T2|4;NrCxavhh%uTYj|8=a|iEXuK7Ul9@gF4KsvYzqu7QW=92p< zc_@#r^oNkEFQgH2!Y7YVDQm%wJyD?zc#hV)>>JW|_A=RODC;M?03l?X1wPucZQWd~ zzSsg6h}_5DWxmD<3d(9o5+QfpxMqC;%Uuo*-M*-*O|3zsBchmvy_r?sTn#AochMOi zF%w%^ks)0goxl=O4Qs->kg~#-Hwr(1G=B*Z{X-2B$&?kj{Hw7GOkR!8+=*FFL43AH z*tz+y`0RK5L%@Xz#n=tsk12|wlJoF-(DSx0ze!bX>uw7zVX4<;Vn#Va`_TKD5wqsH zJK!BAz$}FG9Qh*x6p|Y`J8p;LBt`u+`P*NV?7)=Ju_0V?3MZAQ$!lQw5R2(pq_|^b z<2oTE&t4%54rax$3j|ya$KXBw*p-wLIu8MB1q(3<4Rgy_GtjmW4}l+!=yY^ZxZ%rH zgLM3I?+r`7z7D?!_8~K*%093pHvAm1Dn$J05q5-|6hbcPc8bTEagjTSo&`!CXLwrw zFOn*FUgxSrin|qFYyVtFI&2JG0|71%@nUB%tnLWu@Vb^ub0YnKrL~X5Jo-z^dAclh z|A7a8xq42)!&zq)ASVroR-A&mt|O_v?q_$x;7NcVrH5Nm{|Y2U6l0L*h!+)A5<`#a+Ijq<^qh}U)E=d&YvKLt z@zbB|2uCS|$=$2J*AGkrJH>l}i;F&Fz3`XtCsc4<_y?XPasPDdYVuL`+zT8b;St3zyX2rDe9Zh@2QLjA$+C+l{!R>z*v639g zqQWH&Vzk<<)+i)K3uZ0C-DU3(+MvC`?fQMPe0gTj-u@*EQhml0Tf6t$>k%93IC0m3-As!1v~c+)roZKnnVr}3)2HCDg{b2Z*HfIO zSC6NbNJk1d4#aJ-rT49cp=SfgGno`11kGO`P}frh4B4pzPe35*C~3jny=Lc|(@@8O z1E!f2w3hv)N&Q>v5$Pz`)a*oAcLz4xYOJEJOQq2Q)R**2nSJ9Y{oC)GYWm7TQ)$V{nXz>go<)uRnP zvlnNw^MCg6F>{wOLTCqIRa(ET$3G*#8PkKOCI%AP{L2=)%I6y12IN%GIq2=!XoTEM z^wkPJb?h3x)aw5D!n%fh5;!QTJUIZZ4r@Wk$+nN$&0^P%*dy1jEI(*rj^K*b$|tJS z%9WFtUDaZ&MT1P*vB*rq&Gjg^?N_~mP*=AK7uAo)DYX^e(;ZHUgw@yQ>@4g1l7ugpaFs0OE1(8cH={K=d$ zSohgJuYd6ED!A!OC@9^|X!%i*)L`q|Kf4$S3*pW)gyzh~9%Hy?QZ@pAAmXR}a99#* zB64$KUf!xFcQS{jfG3wEQCC4^C3E_4<*|^Rm|vu!5oi0&(iN zwS)rj3wJg2ZVl}a|A{zYhOg}Y8-YN23)a?uj$~GJ4tjiv=3|B(yqsH}rB8%8SwmPt zw4I?5RCTlT{h@dm{4_}A{o6=BN*$|qTU`_fKCG(ej%4 z(2szEtKx9PZNS{r6uWkXI?pEgmnCpdIG;3OP_=ZwRFJ*vH#7pN%?Fb%&-UagWY*^V zR^?h1Tj<=k0qL`x5Q@k;nV5SZ+Y$;C z2b$o)Ww)whl&ZSp@0ogl&C|GvySlKxIQQ9ZRCBrZZgH8tFS;+s`ee4A3CQVX zZO#FcF3Wzk51E;(E`j#Di&s%VRj!dFcrBGr1nHK)bX&* z$LF7sM${@ZUo(tCeZSvmirJzcCpV5bfE!Fxxvp$_q(R_@gdtd613K&3qNDco9F=Z0 zd2oqq*%LaZx8G5UYFj+8GfF;Zo>v@wGVEmi6W?u~+BMP9Yux8hfdS{2^p zM)fygi(_dI%Jff8BM#UO-Yy4Nowk=YVX;GyxT^)r#<%b-{#VvWos#mh;qzsUSS6>K zFQL(y7J4g)X+W0=EwnTKj!nC^kWd8eT*~2tjqAXNs9t7#Q$69t7FcB{a1)-79-Lib zt?!V)U~y9oCY_PJMQG5@b^G3{5Ur#Od?20yst-~nfs-SSSNfmH~TLl$=BD)8WJ`IubRd^^}utaLzKL!<2= z=OR^dT!zo6MhTG4=%90m<_$hyyxocu#&vsn>0-WOAw9ZjA%2fR3t=HEtPl1Kn6H|-_)uPmqNDOLyDg=(-ZY4Rkd0YCw)JsGPIx> zhr<4V#RX~Rtc7RjGN$?~9s8WGl>zi666v2aiDX2_pDEkU=<_Yy{rn_wA%TWwXVox2 z#6kjoRcmBhS7t{m+1moCsE3u0U2{}~`MD2OU3s=LQqSzYnyxW>uzzng7jhrfpw;O9 z1C%_T$061wj~2>~xY04OX^9m2COLb@ffTODyJ}++=uJu#&B7#?A(|Vz&zw!X1H_Aq z9v?gRL~j0q(DvNx@O-nud*uXW(->iNr`{YGL_Lyta=b%&YxCi#R$+sh1_jLgF z2Tc8R@%+(OqOh15UGncqPPxAPonkzGuMM@NaFtRqK0W~eQ4-hWo8AEye6yiL*8jIDcVH5 zZLOCG`V=7O{R?KIYTMwjJ1TSu+R;hp5IbQDpyZi*0BPRkWj6`k9*C?`p^2qZ5@9Vz zr+N>R?U&--#kkW=It7>13?PgAJ0w{tg8s+p^N&-fp~q13CHd&bT=eu-@stSczK&>A z#TB4&Zm9Zx3(IEC&zJ9=zy7=aX~KZR%{h{PmCa-Ixc6C=&m}0A zb5+cx=)SUu%P7dpLDogh?{=wT=JIn%fxzY+-ws(RIlbe0qfyk&|I&>tHZ8DC+IrEl z9@X}r!I`p?Y$`7Vo8M0C?wAwrzjM}1N67iRj>v(|AIzM7Lu@pI+k`qv;6i#x^n{@J zMmP|qCs{zJc45C)Tiitz^5_zSpXC!&_l6am3&OChiqe6;ya=_b-pG1I#*L!y{4d?f z)ia#{{Zy1}!G4yY^u#Z@%)AY>u!%i%@!1!%zXGCaI9FN?(U*4Y=k66ZtL7%Zz z4bO!%9WIA0rKYPzV^b{f6_yU07Z&jaXOwp^TEzO}4c#xk>J;(&hS5rcTCsWhXNg1MNg%8 z)S_B#(k&0IUp`G#nOf%%yf&aaOk0Y-|hZKzBe1rbLqV zz$nO5g!a*PxZG`WtS+GK%L8pjo@5sJD=d0c*QB6Wm-S1nje8-ie2*uvk**7#o>CC* z&Tlc7rWDzef{VKmlbh%zQ1MaP17gOR1tjC`b%e*ha5W-~|7P6?P0i7^(kja5>J|{2 z{Dk{#cX#B2srYR6KWjI`hTHs0(!}uF5$RH+dN6RI86}D$#+W&)7g;p@Cf($NmHS+k zq$R<(9051sWDyLJz@L-xU!*~g7((vu4(Egeu6sSd(qsSwdU||@>LvtbM^%F+f2eJ8 zZ`v(G(2&f`dozV}Z>sT?N9Ov&uV4m~PrleM1w6w0Wzx;vFdWRgi}BwIp%GcxS5@E% z9^<(J9RB$uhTPGwb#eB&#;L<1ioC;`5XTj}Tj4AiA}T%jpJhCYH2CF-@Ys>2ro7X! zO63=KMw?=j?SIs)uj#iqO_+%8bUIt%Rb^98G1>!c{-paB>i2P5g`4w20yhPBYC`CM z6tM))!m+XZsU@eB9k)@*q!A-%zY2#BVQNY?{?(HYJ6=0+wIkxl>@xRFU8fnm8akZ$D|D_T6?F85i!@AaYK(V}{psZ}qr^%lue_Hhc zT}-ehruZV%2BPw_xt3dBCn-qQ@H@^?4DNw7&qA@I(rSK1vrIKBDsoIc?KC{D1v{3A zdF-*Mih=Ct=%HE1ie4M``QFx$9&72Y(na0bGFSf{1HvWQUsXu|4lwF7P+G4Sz|j#@ z0;FC^3;4(P+6?n}qb+{31@6wMM6`}pz=ey9*jU&^fc)bTy;1RfU5}y=~j`A+K(Mm>2GaJquJ{re=q@ zr&;T27H#hh{^gOu_J%3rWY=y!k2^22O%}=W1DSq2XXC9aMP!_?Y$ktsEhBLoDH0v?nq8$2Ei;q%=Y`ZBGE+!<#m<3wLjw7`i$3-T}ZH5b=8j@I7$6JNr^E&ly#l{fv zSL60*g%-M7lBOW8QZQ!TL)C5NSbJ%k813Z*Jz24-Vq9xZ;S58T^6(PTw9^De#1GdR z6=2VBvu9DHkdBl0ww{73#e?MAOer|9UrtMmahx~yZu;SCKum;I^Y2^yVdaZsH|NF| zy!@qm#|&`(FO zXLTBPL>}l`_zxvNb6KrDCpnVc(koXhbt$3+K0hVfkZ-s+;x^Lv+)rd-sm{weXW4PW zY^H7IVE|!fA$L4Rabj^2@Zx&KUY>mm25E*imTvQbg)>T;yvHw2V=G!>F--eH^6TBpHwbgzem*>Qlor(gQH@Gn>~ir-svj0zyf`-A zI}y*#BKilFOPad4XN_v{>)Mv@jN?l?gto+(o(N9fCIbWt_?mOj<*q)t? zzVVYLv`7eW=}1AgfKyho6B=sU6UDk}fAo4ur0))#`tnSZRKSVlY>NDhf8nyt3!S_0 zV86XK0p$1Z2-xHL{9@=bsT-Xbp*p-aG+%a_s2QsLb(TkmO;*_Ng%62QnzT5@$e%Xv z)*dL&%s(cujWPbDq3@%~GsRnjvXsY}c?Dw`jcIR>pWL4LJ})PdM^H%@+O;B=hqp=4 z>Po+vUJ-!dTzTe=4g&`4Y{VW}mfPv*D1&6g#NhXbPV32l#Mkn8c8jlEKrz!S=+!5F z#&RM1rpZ{#dJnVq$*7jJz`~Oc6<*#_l$rYWa!v5qN8I40k9wY?Mh~3QqTUp09`EsL zARg#Y)PrJ~_g;l1E@M7E8Ig=nJQnZqVS6=<(jJK|xO_${ikfQ~1PYi!Z0-cyIG|Kw zU6J=ntcrqG?9cV`lC96j#m(#!-?v1nKcAKT(5Kd|X|o<0lFC_Jk(Bcbs_SYAn_XFA6!tND`n9A3b_`qu>~P6yme{XhWm9PtJAdAO zRaw)<4o>Q%4fjXJBxP9#=r8=L8c%p)d!<{V0y)@cYZg#^6YJ!ASr*B-IP@U=ZERYH zzsS;i6EpdC6R}989hvQ+=GkfCE9tlhPQP9LQ%_P_yvml`TnmEwt)Az~Eu5dTl^x;f z4oN}T?H$U}j1Pw4E(eX8%eT30zDV6L&QPf)$0%v*#Z_TZ4Lf3d(~ z)0F5!_{lVW*BzowHiUB%=Ezec`&Ys%ghC$4Y)woF@7fMw!f@p!n=P#nEq< zo|)D>Lv`j(838*f3+zWr_mC!EkITHLr`{Gry>q^`H=2U3r=qO#rY@|E@N;(_b!rF{ zN&{KDU2M3^oyM(^s*k&DiiY`L`jKbs`#p2gRtm~)ql6N@j-s2(pSflEIqc)4d&uTE z?BA97Ty3SG?z%87b@$hN+t!9N0pvo?q?kQ3QGUk57OB^XmTUeh!vW$m0Gej^Qvx{3 zFtizgX3}Q-%L@9rni8xhqhy&2R#(cs{eSdz^@saEe35%^8PmU=ktGv{SF9Ow{E>m$ zuj{9xwpLar_WdN9b6zi@+R2R2WO9huF+!ZnIRlgLh9l&BG`?xP4B@)9jB#-Pg5_PF zbjqqb<-05M%<4VUTg9d;Ck7??0(`hU@i);+s9)N@qrAD*~cl}8|Agg`aQ0wpP^GQL| zwFkQp^y(GI@n-K1MpIHl`C@ClEOBdA1-DgGn%Nt$)ZI8k`$)4Lw4SDBm8Dyro3#Yj1H6UPva9zVTiB^HOP-Hr-p8W= z&D#msAbo;L-z)aPb$|XcWT3pfus*2&j8Nar>B`}`#o;h9f68grXisdcJ|&@WiT|Y` z*^8pk(2WA-M*Qj1vVT>|kK2xytA#D&L3Z4s&`DA)z(=9QRCIdTvW?aC`;M? zdoe&K&BgonK2TRz@%wknkD2}}H~*c^mIn-}n=iUFI)J)<6HblLF@q6Kt;9>;CA2{R zG~9*it$f|}_yDM%b6lyP)AFZ)1pkDEXUj5o)6W|Sk0tluxBM@S$qhHdR$SW+#12RL z1MQ@Sii)|Oq_9PNAdreeH_2*_$Jr>eYF>_j`A2vnPp2Gx7w=a|-` z#PW(#g8&cTg@+Db&3d{wb>MI@xW00}#G{MeKg;E^gb-Q~#9bC#NT2tFA8g^21=UNZe*F`N2S-*1N#GxcjZV)9czTj(^Yd!JOp z;L2TCDaej>CDbLBdB5|z1@oI;UYtthd&RNB!@^m2F?2(o`)V8qIRO>FAYD(?Qj;yaHbcYO#c|I=ZrhkT3O9r+Z?geq(M?Qz=ync(7r(>?< z8z?Bkx|l7S0j!mY|0wNZbcbl1;~6v?EL^=w8&QY2RhKHqcWUP^ZjXAd5kT(yHI(8^ zv|-Ypq4JsWFnL269AxN5@?WTW-T7EX&4+6U4PwfPz6-`DJ+UWY6uHdd=kB8%2>Pi~ z4`R3e@_fqk(K~7!N+tnh(mq_CrxdMFgc!G%K4e~c%Di=@XvMu9R{m0%4dGGQR$+Z| zvU*bx@V()7#vVs$fl0$#2R(CMLa5xx2fG-9PxLZTyBGUn14r5PfzI98=lf=&DD5z@ zV=tW*p~i{D9;Gc5wtJ}&xhIF1?%hQwL+M5`%CO?o+givI#4lmhyC1tGqeQgcMM}~7 z1N^2oNzta7p+do){ZtYTB!#4f58emDFfJt$I3L~7CwNW)4LuV1ZsGm=~j)qRhA95OOy^JL*D2TMSfH zBWn9bb~D#xv(Uw1Z)`e>!{C_`zvEcjt}XIPrg!~2`&+iavm|LPLnB`s4)IISlDSPP z@+6I*`7J=(r@f!0q2%E{wv~xyq6m-AJV=K87S;>a!l2f5#AW*C7oO-yVA@RX*3ptt zK@HR?o*E!D0+-zO`%#luY3S22ppBQ%}R)*%`gJjUTuwJl)R}YHP z)uY3rf3&;h@4>LBoQx`rQHrbKZsLV2wP53R|9(|n+l}{ACt@J)bJW+vMQPSVya0U$ zu-fv7F@yn5FUDynfWX)|;r-3X#6)#@Jr%#4U&H6US#wTm+=JAJHX0t$aV(I{a?MuC z*^wZr}q(_6uJ^HpBp;hNuh2H3(>^tNRNt8Z|l05ev3?=1}eEzLjn87H!%W51SS7($f`%d9SXxR%jUgBKfV%zv# z$tx=}>_Id(3wl|8kQ=hzZ>*%YYARg zMZMe#4p(+*l$(Yym7Sc(MNjk#lyN~Dv$>|FN})rxbT`nr6PDZ_hnhQVHFQs12IbzJ zzoLxLfhl3pI_>ey;gr@ga3FVEaZ+6krm&@Xj>0}}-BM7UzZ7dm@(dOQa_@YR9m8(8%RMFz$B3tSf~6@8^Y-dWcTh(EB@C6n zJa=;;cZ@T@2O(G5UbcfFqwIQ+28l*dgDh$2Uarzq@B;Cl~6mK zbk4%y0!6n$JgZQn!i9VQwmInNQIdD;O4jjG)U_?rY4qGSAKCTJo(qRvyCYHgg^?Vo zTP-!no%vHXD-2%xX*<2S7X*{rj3UbtV(6l1di;~CF#b!U%MV}_ZIA;obgSd_mYFH8 z1rmJPGorT@+p1595krToU#QmAnI5T#Q!^g{mG)jzG>egV^{H5;|Hg!Y86LUJU1cZp z{o@JKVw<6*l{|^hoLWE$`e&FwbD@Vhc+>NTSOrryJAdXw4G7sby;=5DmL}^%djeyw z0S_-7;k%tNj`UcVZZI?*T%0%UUI2^FBb~g;2v`E_&K{)k;1>`=;2&8Rp<;VrULsSj z@pg(P-OpYnyZ@9v3rdaHuU!X%RCtppyw&m?8N|@)0OuOm5_;0Q?=w%d;;B=%S;r?> znE5??N$H~2T0;x%Z$f$ni^4G_e$P&UB#?|b#AmPQPkqtkFZ;W+_W1(wz+$+!8E{Lg z!l}=@s9BoCpMpiJl_=k9b};676SKu+BVWPXv>^@$h#w)Bk*mC&u~!pn-y)qsA8wuh z2MC=tab(d`ark{=Wk1UH)chzlk*y9t2(BK&rF+85P{#{q0vuno1_6W8hww1;0><-k z-K(4gF z+-~J~y*5%JtM-wLJ^~w$HwMLn=98^O%tS-X*P<3q#U(Cv8+;UTTUxGl+ z@Y~37ZDzHD9WWdAnO~7&s3;sJI>QpSNIh zMBNf9V7%>pfbH^Ng()b;_+=(P9q{awG}#pLmhFwg;1MP&z-_CZFjO&e8T0g<8_hmB zOEw}N5Zbe7gODZDU0dftCtB%MVz*&HN`VRy*4^$mW}K=|I3-=7XcuEVXzJ{@Z#dSv z7^Q}MNjok~`#3y|Qd{D)nAvWTTtOGymLz>@wq~p-&7Np~^J&3jpc@@EqTG|?BfsW6 z8hKcEY$IK@GNYR3q`(y;Pw&XCATFN$R4G`J$OnTig$ zPa6)3Vb&4$FMfM;LZFBto-=klVJ!mKn4E69wAOiL@G!TWhbGTMgPgNYB)9C=WMEkQK?_R5NA8)AW!Zef(M(nJCF7}s zpkBsp;=UOu4>jd?bf)mKEEF)M*-XmV&pt85E6eO(4KEW<$JdS)rEMo3iAl`?;u2Sb z<3a`xV(j8;^RpkuN!~c|pQadp+6zpH$OkCXj@Oa+QI9(OHYnCaA7w*2d_6WXcgpceygg}a-Ut6j1(UeV-4R!Y!>bcbG zzG=&3FlGy)%mzJI5;`M&TRkRp4j;tpg#c_I6@J=s>lWQdg+%R=Gy zycA+^e-=}3i4o{A@y`&|=aQoyBSpu-T3C7To<%nW-;tHe&M$_-5^~YDW>4f=UMHi@ zK-VbuWhqZkR^%xZKt>j(vZxt$t74~4DmiYq;|akeq{Y+kx?Kjj9IJh5N_x3Xto1{< z5Iq@4NF_szRMQWBjv5G%)tp+c{o+v4g?S$=Difp|fDq(b=w9 z`1<^3`|glh@jxUBwlh%02G$ynYNZHL93NTCOJtuP;EOf%SDl*)_q{L9X_CuY8w8Cn z^@Vkza6hg~K>_+iNl|by_K~kG|9}dJZ4UfSK0J#Vnk#f7@+N9!pEYci_-W475!?K0 zEMKs+V-M>>Knq+q7WOlL%#|#A%q4M`3uW3E%gfM`U2@;mh~S9TwF-EZJ-`EppoBiz zt99KJUXGmDQL)>mF^NS{ghx|AGf6=WM8LW%QJf;V$6Ez|ksb5>CeMSP zQO+?vTtIFR$k76CHE%Br%0FgvpJwT|6r(r_`HibTVlR@dGFdrIKyO_3brIV5tKBvw zC|N??m+RPeT+d{iAQR+uBjv0Ie$ufWn%fwD|2retDf>9 z7Hn<|r{gW5x9y--;;d8weX7leWqtmHF)210m@ASM%@KFuO5?@%jfh#lKH5xwtw2Kp zYx-A~l*>Lp#bk%eHXLnQ>{Lr5gM#uE<-1Qy!=uS)t|jd>wT#EgT+8ZM8Ji0A>gz8v1?};H?;|K}%;9e!#Ox)N|Rl z{YNR+jOP+!JVa=L5iy`t7?}W6BDUeC%#8!nnzW}R1vj9#7?&)aVL`7J2<7T!S3s9< z^*OdeIT^M4x0l2*RTwKpY$`0F*7O1IbzI9WJ)A?X7*Gl29So^}|9*am?U>K1|6PFBusq5~(cn zN0!Il9#^5_aoun9a8|h@K)4rnFl_x_ESsKuXQh5tZ@Ae6XuOh@gijQf_&|o>M+s#) zHQ@Fl4e2VY1AtWkM89YV$;=@$UBS_4$>Ta@OFUt{7GRv~#SL2#3w#Dk3YXcbIoH-} z|Fxl>oKdZSAAQ%&h)TE?d2!m~rFS zJinJENOw^AJsP8ns%Y7`osK5OnjT0}EH&M-n&onZY1v)U0}ee)Qb)ki@!E@o7&P>= z{oeo$;v3d+wPgfz;JTg95~=E2D^@Zx)WlC82mcg0mm16)a}B5gj%#urvkV{2moFv( ze{)$%quS^ud5BE71jq&s&K=gZWdX7;rNLnsnd$9Gw>5$?dzaaLC@;b7KAVX!&Af31 z*vyKopXc}P1;CO}hd>k*TE#B#BqS^}Z4uLkVcod0I>DDQKdvfEC!^{Le=I+Q!9njZ z$N>lhS(!tqNU9D=2I(aCQ;IV!ry#`v~P0)i% z`29ePfo%u(z5CqS2rLMDdyGJZ?Am5Sl8b3SL~V`DHW!L8^MV5}|5-s!l*VxJ@Q{;_ zqTaQv2Is&vU^<;ZdwJsig&?H(;kCb6@P&#{9bkXIg6C(ooUiBi3T^Bv%_XNQxNpB9 zKS`#dl?xCQnF$gURo^@#MV(A_|Djhnv%K(QRFv3*`Iqvtp-xW48o8R!oNNnud7z$3_ z$&C^wn85<)1mp&gYs`DogMsF1kc`dijp5x_61$(|&vqw)j%}9g5coZtoZR!t+5fe3 z1z1g19+P0Xg)RrXkA4=aRDGg7dmub6D&(O-N(?5}dZ>uSRgWa!2}RXcK8wqXA+nwo z^Z4bZv7SMIE`lCqsf%;ZZBFTmXb`8Vu=3juEBS4&iZVr}_iR`*sFPslEg4c`X+mF^ z1nnGqop4*^_PwyBo7aoy<|uMWs=UmedvPVKK5a#<3DQi{RD>HE0(NLabOSMeNU zdPIjd?5r(Fk(r&oo0D+#Nz2<54c)H%;BOK3XqVJpB0s}yVourCda09RqAU951WcNe zE#UW(`bIvwd9XvBo$A}%H0{*b+!oPf*k!Es^=et(83QFk$qgV&A@hgqui-6>QhE-IxOn-QOq20r&avf35s4bS1u_ zA{3lzaDu4D0Ta`~CcN}Lg-=S>vIvuN^KVF@uN!ZnnhVvzJM7>%cvt*DNvRtYvaU(S zsx9?qhsV9XX7}fD-f4YHVGo2{=y%?jTaMXKBqe3Fn2K{B52s0Z$o*YtGqPSb<#301 z|D^dDV(=osk_0D8j7H}>_WBkH^uH_g4(cTA2bLj0^)@U-guZjFN{YoRROGIK zr?8N;XMv={9m0oSoLhgF>QB@yIMld9Qi@zU%(rrFaX1!8fMSQ!;mR%2%Q5ky~ z9P5YzEB#pK<0S)P6^34kLFOj@Q>3vzCDn%*T(G@S7%xT8p~ReZ=Gc1RqWA`MD|SnI zuLd#n_!sW=DFC{Ik-M@0bm>qa>8PdGgviGYMDe>bj|y&+PNiaEjh!zP4YpSE%5F?t z0}ou*2JIbY`wP5#I(laTc*dV9F?(`f4F4u2uM;(z+vIVAkaXHBOf1IPsi-?$j92>q zSTBYr74`Pq)F!y(kyQa1l6;-^UI4V4i1(hC2x;vY>n&JkU?^y>s;du;!CWAJ%%q&K zbSi5O;$H_uofxL}O7ZpzZ?oF-2b1f|of zFtKQ7@1iQrR9=boxq&cw(%N&-C2LUge{f!Uzc%r}wmI5bMIPrqH(a#Jz}7p)kPhAAaO#j{7`6oMhzL<7MZV=Z89v7LwpKyjmn$9Jd%DEZe*V?{L+%@mz@Q{Rx z6dG9v0m#z$kpzj+r;MY6(v%;S$2iR0#}OL~;^A?}<6!#fUc_`E^>wl2fa7&@Nh3Ju z*72(dlZUJTpe*lWoX1G^o0EZsnG|{`rJgPF=o6Kdidrn{TKmLfx=y-4(?Jw8_GJWKJ}_6) zbl;d&nJS<~f<=enF8A{^=;RgCLH+1qWs93%p|zQ-2IR_(Bv{?-pxJuxko8cfKj6Ja z_t?|kIK5%_XP?s2bp!`=SRI`8f+L5~ziIlOKW88I`sfWC4_V`VzPD)`x`RF<&+e-q zrJk1m^}Z_^6{4ncK27W-sB~Ap{xT3%nEzD*ycD^S6H@8iC8R3!(}HuJe6OzzE99uu-S)~l|$8dL#& zQy4j@9I&&gH%reI=e#N9(rq;fG^kP!VQI?<#!DD|Z|%X`VXDCir%yHN%SX~`u(2I4 zS~=Nk_5@%ccUF+s>2%*5O1Yrb{+}yn$s6W4G|_F%m3r*kYszBdc!DN@u72hujqF<^w{s$oLJjHivWv$s08wJ8Zp-1 zWNBxfL(+R0>l0Ul&h3IumXP*3Kvrh=K`D0-*F}+n-g!M&&u6#8BeqV7!6jK?H2ny= z5<)3ll1l0A&~r6&-pW;DzCLj^LgZ=JErh{AB}X*4F#s-9_n6aX-=~MHwu>sF@u`8L zcNv$8)(De&jF=wAWzT8>24I^~wrr2zI4N3Ku$IYnfC<>av}8r@Al4F(Fj7KCuRRpa24UL@ znI(5PcJzeV|4@jI`=UXnIP+XOY|)m4%mh_Y>mm0Kg_c{WXiz@4B3HmfpK$us*7B7# zLzj%@i$QIPq^!T4;*=X`5Gw$!?&sW6=~Rm5v8bGp|CJeHXBG~cUrs~yt(q9!c)3~b zohvia>A@U&hreB7TbDq2nEsd8-!8pXO%Z|;6wn^Q9x1&}Y9QdbQB*uJZk<)Yghd<) zS*~?k8-6kOIeUcb`f%VO?!)xEV;fx!nrO_DfBfUp@eLw7>BOPn3&&zYx~z5GkCR%#>(ooiYp+@MS(%iFf$nagI7Gdz z^HyjYDZVMeGWDc(@djrSVh(ee6v>K!Kb9bRxWpI_Ubh=6tZNK7k;$114zlBi)(Kda z2d+#DD?78#K~)>8=LILpEk80O3ZqY&r?iV&tt(L0w#=)xcMBT@9~!!4(gi4Y3-uNL z4;^9fm>x#^uH$88cGl4H+jB$WY4i#6Hx^>b>x9LFDtg;3h2N|m8n}_^vz9+BM19xa zeKF7je#2#Um(=#m2Y8QS*>rhM`o|67!|gul6kV+bN5HI{dA_W#0r=PmtLum*y4-QqJW_(iyX4AW zomgWUi)5yQ-{FJ(e@ONqzNnsm4?GxV;S67t`6@x%x@tUia!|)-M4#q9Z+y{Pr5lnX zpLj>jS(5T7v6t1rc*hk3y{!p}raBU38vf_GChmk0u=fIj(&kWh&;@;xLQ^EGZ9n(9 z(PLC};@d3NVNXC1e&A?j&P+}^X3f8~eilbV?F&0TnYQCi+?`2PEdrmae#u97ta`ZO zDowjpQbykNHSdN}1vljmUn!EOJsI&jS&t#G*v?W@KN|;L8Z-tV} zxMkfXk+GVsEtipz7-C{}Y^ANFO;N5R#PA&|w_Ju4<+3g@OkdBu4nX9Xf)ZegJL95 zxku0IyxA|Xh@ffSTa&_az$@$3Ko?(i;?gkU_c{BBo(Mf%prtyr#P$2hxkuGVgrhOV9C7j*HDTQa$u7Q-dAv|NM zNKE!$e7UOpOFyx*KXuFKz-fr&e64t#mrOdz{v<78$$fiyZ{1<{p)CGqAL3# zmVAMd+OgFQ01}pJ;c2eDn7qzrnC5&fU81YDrf0p+uNe@V@h%PY{N6LnmC1qvS@b2` z-P|cHy@ws=X?|Xk?cq%}s~Z4(t{Us;Vlj$TJQC&--X-y+NNuOIcn6x2&0Jvi7k*Nw zWQOkah7u2L9RI-zdtY&wNepXuluYpfGxjY`;!lKJW>Eg|O6dW(y`&HiV+toGSz>*CLBxFhtgtKE6lxzuk%%k}Yk%~1iE4CC` zQxa9Rv3N6zP5k^`)kyGlBgzIz^WK|}EcaR;QRhYf;b*56#uIdnsbe8Ws~tP%JT7OY zMYD9Y1A6yo;A>8Ta26;WWEOMN0yYg#CQRntR|A2&$oh{IKR4fpTcWg;Zs|prE&jvN zBJsv@P-fZ2>4GPNNmCD>dRTM1;F3AF8E@_qo&<{L3tgpkk5 zyWZ5aJB^(J88DYX{tN7g*cVf;-DZZ%b4gc8L7Za8FaV5Ihggl@(RO zc7o}^wbJ_pj%ktjYbg3lCn%MK38F9#oFpGHKw?ipTCqk<-14FgT0S-&fefz9CGm|{ zpP%#vhYTzuQcNhBygCgRy|X_S4cMo%u#fJKt)tPH&cQEsSW?NPz)&=VqBoRiJ6bB> zq!_e9!H6hfSr8od2c{+44!@UpH_@v4`{5yw)DZ^nXlm3p2+AAy{TDIN%NtOv8`5r*-d|Ht^25tMkfG_(3hCwNk0Bpgm1vp*`d_k%-ex)!^4$j zGQ>S2g93i4_i&1glyVY56sj&ng+MvXHBkjG!*aOAQjfgv{psLU(H5n&9rS$CcFrS- zLRgNKBVw>l)cY(suf4>liIe7X!%kU+wLWL|KfzqMrZnAS?ozrI=LEPbdC(po!4`;V zKE!f04^a^VS!3^k6A!|*v1NDm^uM)CupjB)Z>gvN8n|g1Q)9+Trpe&r8K?oP1`J|L zeeD$$Ymq=x3weeZQ2X_LLc1=+TQo04^w{Bn#C9=VSKMrmV4@{LlAD3!^Vh-_{4RnSTkyB|R!Q`UKGDZI~QB*&q z6=Srb2;Q4F@3D&tp=AL*I)2oSGN|YPTdBCMDF3LAP+Bsgz6=fMT=p&A=WG;u{F~jD zG@FA~d)n4(od%DnFaSpMz-4mx{!(yiBk+sHczC=A#+2-+V`xn)>P^f0D=N)F52gNK zqv{=q#6jvq4}0phpL6FLT)!7>M0G5&hbrsu??6;-vxCXZ+JW+a*kMfDi9ovEgPnn+ z;X6rRUC%fBW<>mqK77inLNyhxcQcPdXmX-Nm2waF+kNQCTk&#QmQOGTg7**$FupO$ z@CrCLpE$YAx_x4qo2C&g9pV)!xZag{4Z{mag;=fNc0ocW=tp>gcuyd(&jb~_;i{it zcE}MwY=wm3tm6&LbK60fx*N{Q2+a^w-cnx?it3w>yPaIIt_p4uDCQ*t5sNQ8a-a?? zd%}G_GKJ7dX_y|TT`*~9+YAG@S+xt6NO!p*$7=f(s9*zU^xlHG!m{IN$xFt*i}>xt3W;$~B~jq=fQUrzpEEJU zyH8+hJmrz?*0htzO#dyg+<>erv8F4Pp3|KLiH`TrFWbH+OD-8_C_7OQp|CN7XX5~Q z)V@*~O6GQBSO_>rP|W?s=P6v*-(e;e__7i%>v{5*MIc@-bBc+34NGzaKMY(W2p5UK z_O1Ku>XkiUHpZJ#<}SF1A4fS%q2Ot2HE@V^gl56A@av4_wWW~LRw>l>ts66@G(<%5 zE4NbiDy<4!M=*d$j_$vVsO>CZSigmx#O{J$p#Yv==}E~nAj8WXr=}>u>{&JliB~Q^ z+cvjG4~|awm76KCqlS=uFNloam{C!YyRtl5wy7A#3!d^jB;I#?)vBlw+T9L$MlN$i zDd_abm;o1F1CALOF;rZ%YQ}>%G2T)MFr6X0k=zHodq>snQY<53-PFI_sWW0;^7B#z z5&qW#R(#Pg39jGC$55qap(uc(?2n6$%NgRMbJM`$uW19!JA0Q1haxo)`tSX4A<$0)_AqG&DYgEB>4=`bu?F%BrEGDl5dM{Sb>UhCVk zS#qC5$VLf@m)wT_^ARjg_)FZG6-vHV62!Qh&p;}baCus+*5{d`(h{(3h)PVH?+B7zQuIW|QA@@A2x569>MwXPD( zJtdHdAR%**wF*Agk!a{Mi1)yf((Vq*#A-Q;CU=(0NCAV(_LUJ9^KdY{;oK5#n*bFs z=?)1|fMtL#7FPQ+04FY}z~x0>>+uz>;BB!2PNqbK&yKDB2Cq$uKkV+UxUww=wz&_w zdxHaa%R89=;O|XF>)5Xj0eDE4OOa87|E>pT3xd`{$Vp(QwV)MShoM@?>1_8 z?|0vcZ-d?l_@`<4|2ICqs<52L5SQ{l>e*1NBp-hmiQVXG6Px=be65-_Mb;z+tm@a~ z3V=?6d_RzSbR^W{QnQSQ;eXRS4SFl#R`}m~CgH)}ru4wFQO5eW^Ssd^KC5f-14;YN zET`nQvk-^7GJ0c8B%%C$YhKdQ{xf4*%z_3&>`^PK@YjX0U|wO@v2(RUBhKYrjwh?e zJ}(5}5F!5H{z@O45#)|oz%RB7{fJXD3vG(HKHXwQ>{Lm@7E(=b)B6}qIX<`A6y+b} z${M^Z{rrg1Y}Eu=j&-zrtV_-q+jEDKv*7i4EvF<{iL1$vQfJ_>_u_tTDQ)lzAfJx0C z%0M@T&2R-?5w6{p6(yQ2J^xNY)rpq!-VT16-- zBwa|(#p8$pO&=a!QEPUjV(Pm2iVH!wzFtEdmS0{iT;YIKL&f_`R|4}Nr@fpB?U@=f;3~w zCev)wBHf{RvXA%mnH__uM1)EeR4UtkwI{cgOh02=T(aT-Lpp5xqA3dwFpZ6d+G*i2DOz4cY-GQSgQ0VTYGgt_62_4 z&|pZ?v{PdUA*Va%qkFj)zI(_C)E)%20~L;svz#K@Y{T@~rSfF5FeLdv;$o=`dcoY{ z20|tC-${awM3?N=qM*$!g0Rq<36rUrp@9r1f+^#S?M-Q@|Fcz2IR-^V0sVv4R_o)w zjMELa3riQrn(z2r*fjtiRB_cBijLz~fAu;+ur*6Z&dndSH8d}>qngAFL{V8eQhK`O z<8i#W$9D}HgC=Ghs+7vc*bB~orRz)hQV=S|x<$l3ZPxS|tUkb5qz}*WCcW+g+(J}& z>Ftx1@AM_ce*=xwlf*hprkgw2w*w2)9|Q(Yh=|TG?>X?#e_<7r|HbZ_2f=HBRTxlMb>S8{m1$M zpTdvAAaKXz(=b77r>P-j(}m~***M(q2a=jgL!bIhv#0BGq{v+*kE?s4Qm)A$kQRAG zq)QT^)7=pXIN?Ovb&YcVNOxli>2AkBoT2&S|MqE_zai=W+k-XLLTQra<6QFbmZQ+K OMdqe9CfP>6g#8D7<${9% literal 0 HcmV?d00001 diff --git a/Assignment-4_files/figure-html/unnamed-chunk-12-1.png b/Assignment-4_files/figure-html/unnamed-chunk-12-1.png new file mode 100644 index 0000000000000000000000000000000000000000..d53b57cc2df30232de957243762d518069f4485b GIT binary patch literal 8837 zcmeHt2~<Pwn*EEfWbx# z!vR6m2q<6_5aQ560}2roWNsQm66PUHfsnsW@ZQ`1|JGgWziYj>-hFTV;p7yl+Euly zYM=dmdneZ%?X8yM*5gnp)N&i^1IJJ(EQCVIyi||@HE*744T7S{(eC&`P@+&o6pD;O zNl-*0ibzHglTc(9s6sv=FEWt~t|TI;OzHq~K!Qv}kwF8}0$xevByh3Fpq0fUv%p=F zL_{SKiAiKs5*ge04)Dk70Cx#XBI!sX zb|jHISl~*MRwp4X$V<{8kw}2XEHV(1bg(3#O4v4)I|~n*gI}HpP{MiJCpgWN+JvI%+MQ2LRW@f@Sh5aJ{LmUSM}RVpCI)z z89Cv?bC0nudRft6&j$0eL04oJenLmGjIhGS(TArOKR@pcTJ!NFn`Lr^hUuzZ%}G@& zdqfXszuzRgns1*&vu9`76=proa?mBQ!i+tjm=SH9&s1PQU!?e62kRS0*c5|XnSzHu z=`VbkI(68-H>Ot`$L9(T84RW#WSf{m zcR+M%v7C8f3;wZlAuV`&@*P9X4ACz`qr&c{LK7CKlPM(tbD zQ(8wtI)QDE0uz3=0iE`MPO1+u=Qf)=-gHOrPS(I%7t=g|R;#s0(8=4Kr}?|leVf1_ ziZY1IRX?fBp+ZFQ)!NR8;}4Zu zF7}i*A2q^$JP;1!|Jlqln_(zKcJ)TQFO<*D5>HsoS0JZphZfHUr@d>Pd{t-F6Rx7T z4j5u#VMLb2DYkOY`OIP(M!jwwr@1_xYHAYpy&jn2G+t3A+`}s%dc=cNcXqS+_LM7V z^Ha(zAH-d|ZLO@NO@fM)?in|%SZ7~F^GM6~gN?Rt02^PY%BgRzR^lkvU~o!0uF&A6 zOylmo6YKHY)7{Ypk>iOxiMu&=s%-2ftqB`=KDgULJp9?h@$}wn7`H@B)bv=WI;Z^p zu*E7HC}u?-j{ojaPCczVY`oTz8jCzms+^|+_Q`%HD8|rhg%1s}P)FKE{a?!n5|BlHw#5$uhO@`1Q#_yYAXc?6akyzXfAm%+1K&RVNjCc4F>D= z#PRF7I~(KW>n|fB2hjf4bBd@Yz7J@aH#Vy|O%XV78UY!fwsMo~%Oet)sT!kq6Ta z+2)c7Szt2wIJz=2XxQmG>8aRJ8+jhL!l})zRQ7~^b#p$lkJ_%#jLy=zT0`i|;CTNn zi-3yC?Ly)oCED3U*N)V*td%|g7HWhQ{HtqFe*FZKpnM9|($sXGJ6!QH3JW|hi&iyvrZ{*stfOKXcq-iiylgKUXmA)_u@M~a zF)Toq8~y)47Fo3VyW!aER%-Trb7&_VjEx&wDdqlZX!S!ScW`x~3V8FC zj@9}{A*R#p-NA}q(_iy8!q=U0Xdap8KNd&33YmN2R&vfL;QN3J|F5`1R6={D8(~Yk zYmTp({6g}6n#D5}oE-jP6(DtzfRUz&u6<+e1-p!2Zk zSY32p>;XhZLjnI)1cJ_PLI&WC$)>E8I@%SDdvx8bk>O3u)C6s(5cl2KTb4r4&{@XM zyC&R_9$m~_g369c(r0cX4*#-!e#QWIXFKBB-mOdl z@cG9dhfM8$16ZK_&#>TsD+&pW;iV=1X2j`Os0q3QGtW=DNVSIc{5+zx<>hX`o#_MS0|dY`D4F2nHUV0l=94ovVSco=#-HlxfH zbJu`6E?*0df7Uq2%XVlVHEZ8{2RUew0)KNFfj2rkq$Wl73=NrZB6Z#x>YZ%vf77BO zAi(wJj8AEi%*s(?#$xnzy=Kf?;70xs&tF_yn%@fPIs8h9X>mC46J>K$WQAS-;M{5M zT}tJ(-@J#XUvma$Q=IqKoZwV-$Fe6EvPyQ&3aCf+cyAdd2aQ-pl}Bq+>aO8JU`^}N)KkzGF!L{9ksP@YzEgY!)q1eyaibQ69MknVV-U7 z+-_@96$4v36*lwQ2SnsT%flPbo zH&3U$j$rCScQIXq_hC!lep6xbN7H85MXp)RyM}idic2NHF4M{D@4u6N@X@$W`;Jaq zLHJJm&gi8n%=x@iTs<2$tdR=48p#n<)p1 zMq5mC5Z2ie2Jb^yYO@(<1z>3z2PUBk#OtkkFEe}@;JD2$<>=UP{2cul%kl$QTkJMP4}VlP$0BVq{wIXg-)*j^X}M*cooNL&)l6i zCiprqZ{F;zU-?ALrEFjrT1GAUj4 z+rMXecl+|@)or0~6Ya8g?P{sbGrv(XcpzvMyYY!^%DA=AH8qXQd)Cyv>s|vUe6IJ) z7t6kxwT{(V4$#i1a3@pqO1br7d|#m=zAsrHHkJ_CRrhu*-y8G52KrVRt?of-zI`?Q zRjDp~J&v}bD1U46K>W{D&ntvSyo-Kj=`7VYhQafc+#UwaNF$83L(wN*>wI@$K^6vg z%DN=k13I|@7-Dnn7ygG1!@>jYsWc;9S3_=T!h^Tp7@vPobYT5Rz?Z_6j)!!tEd6sS z0ly`jEPt`;EMO}8FX;0ctU90PHE&Ix)`GYHd~v$uSz~MnPWie$0bP)JIokC%3&7Qh z9~&(=58)6w@!mciz(|_w8P>|9-5JA@K%G_Fb))=$EKb%~Cneg#vawSumx30AG6UNB zFBQxEEn-|Dbj$gk^G6-g*za9q1M&d_dwEQYfhpey#TeZA)R_%qaF4a&4h8(<*d>pM zDNmqbPAc&CU~qn$mKyx+koJTG;Ym>3I&31jL&J1@t2>bjZ0`o`_3lyCs~+-P702fT z;s~sl6$a<>==B3Q@+R#&CoolAz5;&NZV<0TUPd0MroY}_-& zE@*lUP%)X-q%8Kl@^46jK#(Y!o+&9QA$3jdO?#Bl55tY$|&I z`2k&zLis%ox~&eM8};afju&bK#F=1A!^_JqRz)}a19JeO;QL`QaP+jsV}SVNk6E>b z7(|WakB#y=J-n?aAu`2gJvKe(RGayj@X4Z>=v)w>Gy8l~FKL*c4?+En!h65JqG5i{ zG#TNt+RJ>rMEyf;wY9Z(OL#G1!N>|o&{DW2<-t;Na~L7K2)_~OBAgeYIO5%g+$)>% zkmyfMs3Hd_7=X+FGcn^CBr2^-GC*c{`#ZvVVlL-O!%my8VJAQq1m_Xnq=7%2Lt|;) zH!FLUeL_Am8VNd&N(TV!6Aa+>HLU#_w;q#{HfC?SMEZ{ft20>rVm{DYiUTo z=_E45FUebxA+R=59d7>T(D#~DhhIU6X6YD4Uy1DYjcF3o!&Ty3HRDw zc`^9qg$b;%PRUE=R!lFlVh}iI?jh5n0cM}Z0|J~n`C_~}xfR5gUvNI$c&eF%H=uvN zF;-qK#SjiCnVc3-YNlhP@o4yJeo0)-Ag$$~|4gzquqC`R11i@31(x6#?8T zTHz5%mk~gXK>YwnM(PLungRQNDJ!a@#1{^adV71bUqq=sFG3v2T8^=$UCW3$C1R#) zv3yjuouE9M{sqT>`%|s6G+~zkYQb~<_^0D&bIZcJVKbg1gCb)q2RHRIsqB$0={TI< zEq$08?Sh@Gsa{^hgu6vg-){<@9oz#VrI&kv6S}088gy**naOYV=*qcPRI4_QFPyLa zB2t{6^PKQvg!CaX-9I9#f+s0zkrR?bP>i}FKL~?El30Hasbr8eLVa_BTMHpR`qPpJ z`(Ip*-;Wq1xA$M&3_U>z#ewK>;?wxkXIE}$JTs+%bl3=3ELZ5dGutY$-QLs4PL^+9 zOgnLp(vX>vo^D2r(75gGov!|mOx{wSWYvGGfEx{ARF~kz(Nmg_5AUZwiMc5K|H8^^ z4O5fbb~oA@Os$-F6!?2y|J-K(z9$wmv#n1*?*F~y7`iL9MueJp^zoSTrbb(AAW36T z22>w5zhbs^4JRt>k@Ci`osUB^-2X2+uHLu_dS?z6@(>ucA{ z%#&X2#kfWJ>M8(+%#{%ja}Lj4`IIO+DzM})1J)l+C&$~Z;waZsKACz+zE||oyO&Rw zMVnL1nn=qlZx6Zb75BvfTv3EFKhfo+poLhv2;O@F|4PSj{6n5ZkS%1cUpV`lK}K8Vz~ zShmdq<}u};uZXU7*vFhQz>vh+w=zU!b7dFDFA@zTjKC4@K#jnxmJPot*cAm49(vo* zBb4hT-DamGKf8Ea>rhXgs6RPv{+51Ev}R1=wD=v<>(_<*MFkSH|6;MIREi^Vqqjg3en>4sa*h3UJSKDspQd3DVce1 z(=J}7Ri$qb&%CX8JM+sTFJSuVi`ne(F?Oh#&@Fi9A6u6TWQZWeXVQJgBx6{{K%&PF zoPKM!lG9ur&B$?p28#HXsE)n!kg8m`e3dR-$qXsb4aE@W!z4Mv!$*JRF}U)j-4Q!F zHUy8q*>1WvB)B~KVfyKidhX*!YuQqYNwAn?FKO+HtI4x;abu^uM?-3sTtfWfirb_^ zM@f{0@w4Ntk?)k|Zr-L%`%NFnT~L`V3s3yM%@V4wyamS2Uev&cJT0LaW^T&zo+YaX z7Tuyv59Z9)Cl%tw+;(SUCv2&Q|0~{De!}DprTNctT_+6S%7?sbUqVksXAfykP2G6w zjy8z6>lonR)wVT5O&D<;nm^8dHs{|)*y7FiI=2s6&ZFy|^xn%J;srhp`t_F{1@|J#V)}^l&qf?<(YxKLZJIyaG=P~W6%zVZ{iR`Ie77;o8d|O|z zDJK1u!Y#Y2T$Ztuei*AY!?e@;YdljlICDv#(zZp&t&$Z^yqREz3oWmD)a5U*u1B@~ z=x|O(xpfUEbC>1ON3%3T%Ue6&@ZuW06!_f0ao2pRQe~3E{Or)+07J;&?Jw$Umdo@Y z-k@PXmh`V##DB|7?>|#8CFck`t5XzIV;M2tx5)*=kWI-M*5C-5YsE4Ixx#N8e_=&H zjd~c{9?+nO*HLl&MHf!7gY@svjv1lzb~U?@9CWQ_Jl;`vD*H@XT3NoAOvd%qrjGVg zN2IRrgXR?FVPu1ut0a{Y9cj$2IU5w$`e_F{?BcNfV-PZJ*VK6D6uOJjOOh)U^~8#< zdGCaol1ttiy<6ZSvekm1J>#?k#@2Ol;e6V2*Bufgc+k?AN!Ee~tqmI%9rQ@=&Wi>_ zOEUJ%OBPixUW7WzQw~F<6As(6T-cSf(MHrm<&n!vZ+ywn9HdY6&21XkZ(o&e{%zND zm7#->zU?h`n7%4|ww{)0n6=-qhwLUNjQmv1ePZwO%&${%dNaJ58#(^y;3u690^||OMf7@xy-QK(`L8nEr>c5Dy%JUP#Kmb%rpow117>~(lRi0+*s|Nhe6;h$ z(sX@ueeX!@Wz_P>qO(tQ&Z=|n&9yBK+-@C}jR4zS90BDw7M{0plPw+BSXhp(jMn=c zPdk>02IPjhYK&er^~)*cdDgIk?(nt-uA z+A{jOu?OuoV(ex$#@!Z`5M>?jX^3$X#|=h&ahd7*s?DwU2Z#F^i7n_;SEl}~;4Wj- z2aGY%1u_x7Pn-qZOKQzVRcaxZ!MAi?uI|@%MG;*yD;mFZd3s@DxMGfbkm+yN(?ZE( zySkUOQT$C&DD)BJw*aM`5Q)8bRFhBV9uj#$#v{n`>Y6@ZE#0e?g$<0Flq`%4 z?77F)8J&FAqn7%%s2g8?My+{(81^}icIsZU~mHVNV7*MAxv zHD2UTL{^q1AeI5vd6qm0dA~6wFh=JiBg5SrXZ_sI3H#&9Q;1^M2k_D7FlB^va~TFqEJ~YOBiIGQOQ%X6eU^a7MVm;7-gHD zgb)THh9qGS!q|o}ziaAwp6|Q-exL9A&-?p)Kkw%|?zyk~I_J91eXetzbFOpFxQVqi z7ZQ{cn}>(K2Y4XsCnf18fji9uO#3;GgW-IVJd(gg_5dg{*@F!3>?D1z zBrxBDE6D@g0iK*h1{W;}plGxt8k_9FMfT7qCxOd@gZud&v%0c~(i%y69MZ~{+flk~ z#9Vob{A#+N=eu$N!SeX7FmY<7Uk!8qXt3j%r5f(wyDk{N(D&AWV^*o;7yDEx6kT+3%(8|yoDR{+{Igi9AV@x^gHv;@LKb?#e#h%>&8(7>5 z7xY$wCei0*#Gi}927c`0?clE5L_LoFW^H+v4_+}#Vu&y6!w~#n%eVZy8tU8Iqc^fd zba~;9_uDNFX6wKmQ#fl1+X8LB;8yZud(1V?lZNw9oM0>lb5t3k?t-b`Bp4U-lx~9y zR*O;Z@}n3>Fh^f1K{sNILjZKL_QA%&SYZLL6Lx$ZiDrU=1ESQIYD)p7a<*Hx!_+@? zERJ?)M9#(uSBq2c>g^KA1T+LtI6z|uL{){UrxA=vJf&`MK@LK1!%w^{AE)=|wU|If z$~lY*G761G;}?cpzq~e26=hu)9+9Fhp>@dlidDX=jA8owiLMN$z`*-mkbRR?G6?0@ckXHk+5O*L;(pwuuy+HM(@*N0Hz}=3w8k zul#rSiec$TEn(HCn%y%$B7cGcVKi^Zh1|8lpfha|k)2n*Je?TpGaI*iEbV@QE13|W z#w-6i)dn-^f9&KQE4*HDbw+%y-~LO}R(e3VyhUV03kGa{A6x^I@Ue?*pZ>IaQhZ}rm-lzCm2YY?}UR6m5aN}M37V`n_ zm{x_x`-g=wm)C;6LTagU!yW=1nH9#c(&KRn<;U$ zF_)=bu-zl3!|r~yHy*ag;hieeL} zXLr>QZUjkEk59hsfmbYk!%n{F*k#N?yy8S~umS=%{Q3Q2 zErMIoBsS;14TcorQV||#koUWla!~R!&D?;=gNm@2b8eE<$w|CzdM11C>dQ}rsPRe7 znOuI<#;qj;XBWeY*DCZo2psL_&~H-I$wqd@;JaxqcwgP_Jd2G8i5qvEFvZ2_lk(Xj zM#4y{FE6nUuK!8*yzWI=UPjp5r7}^b_c9@P@3LCye!YGUT#py04UHG8T;nT^``z=! zfIm0=9DgV;P9Mr2kzwXb8Psu)pk5gi5qA@gaqBBkKRRJz`=Js8VTB{B-L2YCk3G9@ zS~)j=K&m|SvDd0BEp@=3e(Yg_kzE9E$_!^UEKBs;VgnLGrL}MWrNiwz4umg zqIh`4c&wRx%^8*`BBp;EW%LlHoJ}27(QW6}6Qi{koxx*tN+&}uOQ~LmPXwt1VGWDfIE$(py=%wly2;~l%JUpt$=}8af zXpHomKTN+VQ_mCoY=zg^P?R_)CIe%=ZS!Gmm$wj!^}Znfq**7Qz)Kpow$!za3mIkL z5n5?(aRtQ7PvrcL!;T-Bg|2kb)-IWdir3gqa8&*XT(Ba7W1{mN@2l2 z<2WYzW&dsGiJ=2A1i1V7>=9`gqDdKY62+pN6H^5RQP>CT8j=!NNUPduCkn#&Gb?Pd z7?@n&J9`Ywx2%sPjU~hct3W&wU(A}7uyDc4IU`#lV2D>r5bd2*&p`5!1wUOoyKZ4c z;j$VJF8%#i#U_>a`MNkuOu2yC^qOlvZ({1y*|6Z0T^R&laY6dQcavE1H9a}L=iMT2 zcIWw=hZz#CEL^#!@kHT`BbuLky!^MRx0+e|-7q?Mp#j~`Y`4mk`R1#z0Y(soCnZW@ zR&LBg*<~B_T>MhMB@biL3RpnmeqR+hbAhBK94$=V>5w^|$^lf=2FiJk@T3f%ji=ot zOwZ-!eVZ?xJkTGd_d)HlEe{TiXimN%LT^uKa^13?Tn$dFafkV`3tz4(4h1P~tjE6$ zQGzNBeMF0g>~^qn?ZFUk*ud0<@=JHSZf?ycx~M=tM2|@LC{O8BCy&GfaVi;v3}-Dd zG$SB&J($m`77Q`UgDWS=+HNcqr793Tv3uNd%0*AXD<;K-Ze2UZSPGV;W)ky>m+AKh zNduH~2nkeON1i8A-ViP*ao)dd;X7H}#6$PS_+J-lQ2#H%|uP*dW#dn(J z_%00xZlJFc{n(XzLCiMQ36T5o;e+2PgAwYGPLX2#{ej5OzHp!$j>7c59)%jWCZH@| zo;4@yKU}i%obDRDO)PzQm0OyYuodN=L0ljO?lWfqiJ`OQE60TG+A{_+js7 z_ZQB!`_YaWV}__xf$TY<)VGx>fzzFbPf~T_`HG%K75Sw2Zig<@7g=1tb#2YQFnV$I z()Nt=69S(r9tdZmStC`80or$Kx==e{G1pR25E;``W$5raC2-BAQh*<|xk3vTwC|44 z4$X%G3TWSOb1=+ATCx6P#NG6p5x;+9t;BV9b~cO^b1#*M|6Cd)j^v`VI9zNHNgI=< zN}0)TG_-otQ;Me)#ji?GSpq0G)xI`bbx6-!eBJ82J-#&RF2Oj|ZgIuDD2Dy0S0(g= z)sBJ4#WJLe5`@htE3w=ao&nbnIf;kNBc+)o>4R-cQ#-Z*)PlcNb1WARZnV>TW9RaU z`vRL{VEBx(KS?p6KQB6GH6cc@3ipV!m&TE+-`ZK>UE1`VUdfDP7pEoxbHCyDtA-86 z2xt9va9Uo@uGz{;UkRpvZ*5v=In;kgF@ZLEG&M{%j1$U+y-M7}!NO}-fJ0>ogYr;Y_)`d=6aDyoe}nmj3IozC7g3y4@aQ(7`>aayzUd*nmWEE)sIAn0x)> zO_=6t#j2?#?3q<<;`;bv?kXd!)lOvy0rbOfm7#}VFz0hl%qMvoKCc8_aR_0Ia?s7O;}yQ|4ZkrjEyufifhpf1u#NP zW8|0>X6V$bGz&l^ck6$fg}XgXjN4Dq=KHxFssbp9oK#v&gpbr+PLyFIhDDj8bqZJe z4s0U=+sNAnVSmf=O?J?pg% zdQ+2dPNtKT+|E0g7uAv}fJ*r)!`nghp^pvxu8l!RH2L$S23WSXwYk_;{-9)NMp&?J zsq>>!Tz^CfUlzOImn=fDmyKFb+ADPg6OH4Q;j2gmF>wOoz?Ff;aZV!EbI-y)(N2T} z!eJOln`E~^+0`>mBaDo7*2=I>WSH10o3JFVR9DeD5K+J zBIzOTLTn66vOb7a{&;gatV(P=AXxfN^N*H8t=$(LdR}$CARDm%1)jXv&XP?~ixYue> z%$}(=oUuTM;@7`27>wDKNz4rd;E8lpk0gDrd+Y;AKB3KqGMeh)el5#cP8V)CaO~Sa z&iGK9`JLhW;U8`h;0hBf!ND_6BWKXol=B;YZj;cxVinD(Ds~UP(r|ekB!jx42nJGR zm**ftLdFtgFsC**R>|^jhu&PS5b`pNx^V3ahRL*Ut!y)jSYB|O?VW>zq?bg{n7(e0 zC-)bEEPNwrn6Q2YpFCp>^Xca=UJvNA26=LF`yQ%?n%}gm3Lv#th~CoBD1h3XafaKG zctQ>>jXjI0=4G%}RzjD}jujwztzBH$W|-(99Fkfmh8+E=4ei4BrFP(bSd-c#phdcsxq$Vgj`;WR1Y zMMtv>SQxee)BpsRh@|QR=`;8qrTECg*#!pbjkV@v4mgoF<_;6G1|lYCQ@vSn)kYn| z187adkh#g51UUD&Hk3@#DJK?d9~e_17-hag+xq%(RP_Rg*CBQ@W1{7vOZb7xg!#{m z7oWN^R@*WN@J5CtwN4s1ok#PPds>2r3N(F%BYHN&mykUan%#*cL=JPRcZU(Duc2$+M1?Y#9%T303?uwFGXI3kp zwvaI}Mtw@!`>w>GeH3D*_ET==mN3-_K@NWnQ{Ro$e7W|n^x#)rr--ZDz;xLGtRCW5 zRpXzt{)si;W9hH5_hR9oATV)7dVS&!0seSmEpUkV`Lh6niyzq3n97}rtHL4dwv(J! zupE|YB3edVoafrzdClB?H#zkWMY!YCJLHEQPk;|+>`7Yh93LOFp&S9eeEgM|z!nP( z>?)7M&xR>NA4AUI$E+X(n*I5TSJW71}R6l~A*qDQJp+hGIn=p)+N zFSrwW^G2@s!*_Mg!^4^8s?Xq@+jtBkZ?o1!*?@X}=!_2 zcvbD1#n(TukKWa4BTDzw)%U;!5l0NYJ9p>ROUS$U^~DrdF&{8ZL$Y31t?OU@tz)Sb z!=(L;?9*65Up56jZ2QCvTbluWC(Fh4I)xkg`pyt#Bf(HNJ-z{ru zwUfoM&|~jdpB=!`PrnwX9Roh3n-OUCU-I}vEPFT7znMg)w%a3>btEN$MEl{)^|AWQ zDI_RC;K2Sha*7XjMw`D)&j*Wd0s{)+e^(E*v*7?U;Ewo11IrG>(IF~6Xb8Lw7a&Og zn+TFqKl@vk>NyM?jLP2>8GuFN08c0Ys{AoLwkxqWhVKTLRNMxfBvOh+ZrKKu6}W@H zs|$8K`vvSCe(>~s)_Q<*xSsss!HW{f1h{}ZNM_4bcBKX+;4l6>DZo;CepLs{tG9v? z<8D&arhf?cwq&ls``&t8%N`Rz#e#@HQh^%um!kYx8BaNZnWVM(eF+YJgZagC5&p>w z0^FoY73!qn$(5@eJ2|4;3CW}FizI(Z@fn)?!o6QFWtt={_Wso0evbamlnCqu7V{d! zJskZVZj%BM{SL1{{=dxU-&slfHx}vsWztQ%ArJ)+i9`zX$DSW&IPz2fvqH_ub}T?C z)Y(u@y>hi`fQO?11qA1;kL^`>{lMaNkG0$`i9b{&>J(z0qmw7GGi%+PL?$=c2BX;> z;GnV)tDVeI+}m*dP<^>))6ZQJ%mz#K!SC;Fn_P zptoIXJ^$ANz1L`g(4!)WCPKXAX3}D%bjdcZ)Q3|N^m9xD=mL78s(d3gDov5NS zyMDd-G@kdDmr{ckVz*3{h;vl`HPG>!gP!8HzXZQP>g=R65Y+*u7lA|n$%P|-57UIr zQ@U~bKAijgeu#*#Vmp2Dj>wO6xNdVW+q{=oOZ!m`wMy%y16}OxK{2YBmUIEt^t#D5 zX!|Ct%yq(j4CdS>xFZ}EbCBOlfJcH?=}*L)-8*Cs6~Tmd?$_k)sNDqKp)qnD#_y%X z5NE3Vw;9o&4*G9?zB324EZkk4oggEUW2OqFY!A(`wtBASzWET!RaMa8_TKxCQtCdX zyVTmb7w&LZGgXQ^QE#2{QYL)<(x<1lyK-+oM!D^2I(5rh%GEDQ==8l84^v)9#Hg9c z9zD@?{(DRDxq`iR$$&^w9iVr_;db@Pe(#g@7p?29C0@z^da7|RbSO8THJv&Rh!{)d z0DA6w7Ds!YpOh^)42Zlx59mEstN*+vN8ahWU-dtQsekV;$rYpXwFZ=dsE~#EMlY?X zA0D)=d>7|%r9a%(PigO??4-$R4$ojeq$}@-Ih}kq9Un9@)#zP^WH+ZG^=ygAqH6#7 zv=zzT*5x2kd~CpHiF^V2t;XIbFN)3-J!4KLZZ51ZY#rO5ljd@N>UPf@+dzVmXK@_V z8bZpYCXZB4T`uoa4`tIwe_t>c?x~xY$msl_*%(|;ddW6O`8BdCefpM~-PMa->`_;i zX|*8h`O2NzAaaHFnAZH!mzlHq{cK^=YE^4->WzX43Y5c_2nd%M-6poxtl{=LnRg@g z&U962w4JrwN7+V`B{r?iV7t?mL4onf`ceJ$eE+JdzWuMEPaalWT)erQ{{?VR7~R## z+!|Z(u*c6H`QBqR)y-hoCXKDo6lSwc1rm}TopfeMZ|*c+kGY;L1G5HfD`8clUK7%o#@ z7k*r&+96Ioi748&U`9QoYb2%9(M-A0Oq-67>V%N623UQINKN(-o>L> z^?GHfVBD%IpX}=C37r*zH!1Z>P-mBr>GEmuPRp#(E+!e`sg-8-x|VTBJD5VV84{LH(oTIOC!QR_WOgu7S4${l%eFA97&q#WcdF_zFO z98|S)N_(y$Z#Xj>KN(I%R`yoKXSK&g*d^(!aE;_BFp>ZFYJe=>knD~At{aJ!HLKptBL5M zwc!>PM%v1810A%UV>9Q_@FVvZS!b@mwj*HMkG>#$7M3(z?ck%DYygP2FomAgCH%U+ z+*CPY!+zMvZ(3;U&%CHracn{(O`Nq&2{!U%%>i#QM%PSa%Y>PsKsEbcFJu4z8_B|B Y$JBjaW0XH~{%P;9spX*}bG?OYa>-dXZv8L?Tr|I)vVffb@=3=}2z^ z(u?$7&I-Esc0cd?5$_g@y`*0BV^I#l?82 zz<8+Hcq#A<9lyL|d^{9=3;J;Z{29Nv0Q$Np4FzsRw?Lmjw*yWS%$TSEUl;qiw5B5l z#$A8(-zy>WTc#Ko_b_B0KT>szTdyHV9B;GFA1@~3Z!+%t{Sp5i_FsAenm7 zv4-wz8$aFlP0k!r?~4#e?3Wl*T3@9=+M95i1e&gZ+MR(%%y&by;>c=g43tAy?c#aq)w_O>F| zT}8Ql*vQXM?M*uiydh%?Voti&DDoGzkLe8u;`-ir<7?Zmxm@z&b;Kx{ zL}F7c(QSIa)ZmW%ZeczBectJg(-rV>Ifq?Nbop`p^%{ZK=bqZ@@2aNTv6Bh9=YJucdk4l!zNJp6~m7Bb>}>U)tZIxd5Oa7ZM>4nItq;+h>L-B z1{#CnuSESL6)q0gUK1KThYJ@%-_mc6Yzlbx#|s0EY}SszXO{6ePuP0Ra1x&RN2V|f zG!QR{ZM#Em^r_Bg=?+)JaKums+ z;ll>lD64i;W$aW={D+1H}8RjKYIw--QKhddf{ymd}SpdX8W!)^;I&# zaRrv75biutHu5Qo`mUs6@l|84{Z9KA0|Ga18KACEc8^4_e8Bh7?Aic5{L8drhPcY{ zrd1Ok3)Ft**y_f|3-245K@a+MT(;iO5Uh(V>>BKeKdee%;QHyq)2?07L!Zhu%~;yW zkz(Le3*db;K;74e?;J(2vrd8ST-?RT1c%X|=j2>Tqpgg+E4kR*Tbg&@6Kw^rB+x!3 z6$1>odocqP;LNW5pFA|V54H-ts1U1f?)y1Fc+A(Ju+c-tZFB!5nssv)suDUtHe>?j z)Tb~&F<$wA0TzgS6*p8!n-X=jjR8`_j=ILyTLJx1@`jtVxib=rBvZDY<|U##?Oq0V zZackMtx!Eo?JDgRh!YDYf1aVdB>T?%6>v5o8@2(;k)h2J&zb`n%}T%qk9aAA0g8X} zNWuE)2c=F=_m_z5YjRgfmUM6&w3=c9jTXLwAgT`x2maY{)ge8f-Z1rc!qn>^Vx~qIKa#DtnT-DCK{?0p&pK7lN=^+%{K`8ZVQo8Y zlG{-d?3tTp>C$*i+U!N7XMm2k49Jd z;Feyi!h1Z@GV$~xSZPR_Fx~A6=<}Wa@mnpJW=asQNKFRirVjN$n-(|juY;;rK^##H zM06&zhBS3wQ`UP-fDekJ*OD>*)4NDC0IuG4Gt=!p=rfDyLr1Iy4T!KqbTk!vu4i+- z863Rw^ocn^PkTGN^mB)Yu|d&OlAYkKDxnc0i_|;KH?Z}{4N#WbA5%!2SFj}L7sBJ- z8#V3tx(^GFMn~#%a}hgSV`MR?{Rnr1KNSCj+P=55(K$HY!ks8u;9*9Vk`+cHXHT_5 z?Bfxu->2cWWnPqo>~@hRw#T7NwwUa_`qSeBzaTDwUBkUmZ)C>i$yq6mR>AOKll5K0 zh=-4m18nf|V53R*5rif*ppl42H@(dUtQ|(CUTS2**^;xYtIiZ!ur$&wzm$$(=IfEr zcUI%N>e6CIsXvHdt<|Xf;N1Wg&@-($?85I%UgEuNIWUh5G%F;|GBjn9 zd<~hhemW#G68+$j0dBWr*nE;TD&9i}t1+TD69T0(M6DN{3;Z&bejSqlBWT{&$H*Ur z4#d8(j~L&d*jN};&mNhD`yS(ci=oQI%rJ{{sAxJSz;VJhL@{hP!iX5PA{$@7iWnPsm}ec=^J6qNH%yd6$A=iF(~6$IL>HQ8?2mOlFl)~R(_2@ z5*woK04@Xat-FC=znY`2yvpMQvy6RfM{Af1*FVSR>me{YXMS|Hl{#U4kWwn{T$|=L zvt11$qAvMxn0-n7uqZZ&d0w7|%0^|fs)YNq^Q@$Yi=Na>kSoz@eiM3R7^>f-BO7_OqZ4k5OKil!lQ<>h{f3Bg-emD}!6&?OXTmtd5pj(a z%cB4;X#9F8BVkjA2E+zzY99RAX@4`$$oi9qfuP@)?lH{WviE)Camr9eH|MiQY;esf z2dMZu1PP}hid3Ocomwc~tXhbLQEEI9_M3hx>i0Rm-;+6M6ZQ0s(W7~L?-;Gn zt(wf-9fNen#QC^Hgh;;4&jjH~t4@uPWmF44j`kcG^n`R8z;# zo1aB+-sF5?iL?=m?bBzDlYV3%M`=rIq`)*8i$~VH5m1L+g0Rw}7o77s-|EsoIPuXZ z-LVcLI($cJv6n|*kdxBx!$&e*6`#fOL}*f7ab<3$Nz=pYL&Jg{MK*Wql9!!YS*E+* zG})?}3GcelL}{pZfayvRF;-4F(};ZHC#u+9GcKlNTICxg=BTc^_4}s7-abag;2@)e zF9|uU3f!tRVGPvT{B^UB92}oFw+^m0T}+=j71l@UCsOKp3*UKMn-jUgyT^@;o%7N@ zS!b_I61lp5>vIyB6v}qu-c;%4A#av6PBC%M@F#V*7`;F$a(zx|iP6U%S5aJvWQpRKPUE<^S#SKx_YiSHc2t;L>FG5m!QG=`XYZTT_&RGF}YOYY>`Ab+$e&v`p zsf9Dev;^+o1?jnZxgOg-`HflH8;^rZ)tTz33 zLp#u#;2wXTMnqm608NS0w||c3WPp<5%)KonS^^$>oG4UW1=e!6B}a}&MU6gDF(DcY zJhz&8jB|Ak^6hH;2-J!E!{=3*inj=gX}`MBMBuB~Sn3U1I&_iL*>&pSR2UdlWmkrUl&=-A*v+wjfq9+gUY3Fl-Py%9RJ_qlkN( zyyO=8;i-nw#r0j1yOpmJD}10GGM=@x&ofBh93<$@URUL&Q{=0gb;A4RvG!Bsew!ug zn>+Ri^2cK+$bT%aO){NikW$}m3CCrYbLoqr_$=Wa(W)=p@R~rI`BS6{5By2_3%fRJ zz#lTlGbt@;7ey`enNhH9w4m4>sdM zO}OCOC2i)L$wR4XyLirIjseQyd;T|j^lyF~b`s_^x2A8ePZ){YIh1BxQ48>B#8^HB zw$Iyc;IRXoq!XjXt5=M2o~P#&s>CH7n`R+ z`jouW6PgTje7_wgg%MarepKNmsvHi?DhM1yYsZgNVHBeOnDi9xUJo1iA@A&zh~7Hk za!FBQ4`)n~JU-I1s>8AAscy52lpDjVduOqfpI=98U!&J+gQ--1`k)=gahu+XiMChP z8kK*_zaAKqd5UBXakWjYC_NLXglRr_5<2VGO|ng9K_-#?4d|8~p)L#hoY8J=uA(Be z{T~Qs@OF2B^eqag3jNBH2P!sYl=JNt=0AkyHH3=Td57wZQ@P*2W&n0MX)*SszZ0C)cY}G*-Tybj&PUtXGiZpE+H(^b!cvKQ@+y z6s(93-kxTflpz3NVqn~7gJWRaxcWbJc$=;Fv<_Q0I9Zzz2@hwurAqOv*(B5Q{Iu!J zqo&qJ{9MZ-yTOq_Uk1q{LocS3{#4by96FFhbL2L>H*@SOA<_GlC!f+zdq`xf>$W0$ zI9qe?c`w3`;XP5i+U~Q5%HgI5*T8#WX@j@aciavycBN@Vp1I=?+jsUYa0G7m<~-SZ zeWjmKlR{(R_$(5s=(=FFhGOd-9R*g5Ko#8$@QUqwY0qwOC3?>C0KD=#wUA3NdA1@+Cc_3qSfk=E@oVmMnGaDd7BC|8c9u#w*$7ZKmpegaJ?!oBJa zwt8Zi%ND~Ec+0pCZ}sJyay`k?BFXoQSUdSIia1&8Jcvi%m)`$`PgLRmoVe+_8e}!Z zS<_&qOD-%*x;EL^5n-eQIMLiY``2`59mRi;(ThjhsId~IkuaDOYjm{}skaw#YS@tv zd!ARXL}#hlQ@QX+HJ7W1(u=XD{0K)6dPUxvPmP`iK>>C%X6G;=4gu1X9+)vsp58OG z85u9#o>p<~uPQLHzlGD?#8Tw{<)F1PkZ-gzXUWE2RcUTly+2SUz7Z<{NhTT?SNc?` zIc|9ts;6Yim9@Y3L(Jv-b1%8^$=(y13O2q_`s!R{r`hJBT=LS}Z==qc>;`nQD7RZb zUn^0}J@p2~$zwBz(C=~k!A<&|q(1Ak~xY24khCMW!y!d%|a*7U^<5 zHPv3ijY~kZ?D^xzy-s$HmJW++yQhI|3C@yc^ar;vB{WJCJRqbHKb|4P5UcIVmrYhWeFJSb8~_xBg2{68V%cC?55E3`NhKV}iO?8!36!>k z_Zra%Q%Rw&$lA~yiy0HZQ8KQzk;K(T$&;b`W!h6p1phPISx2H{gNV?zi zmiMqH(bAmkrlyjx{K*6L3NRK2 zZ;2d)*3ihUB2dq;X#V-kP?W3SfKKM*9q`Hg@Jh?Y&-3*eI|{j%pE}%L-4UOExz{`vJ9jhF-Ssd< z7-FljUWWBJERLlGgkfgM(h4+HBHvu@I^0M_-1NF59iQMv zAYKztMZ4D(xr(Cm5#cvqOi87ZLJZ@~1OD-dnAHSTkaKcvYMqJIQ%BA9l=9pHQX()l zafjg1i=1aMDyJJE2?+ICt-G~^Uat{vfZ&WDpf>mk!2p1*4n?T*YN?se?kSm`m1nS>)wvZa?UL6Qv##|Xs6iglDaXk9%FT)DGmbbPk#qEbMWLQ15bO8Z`)QmZQX{!lSM8N4y& z6Xxe%YLh$*=uy6QvMDGI@k-&tHSK_WR3H)D;_hgP- zzEyOkenU7@JXKMtO7zWAYSUj+wz4Mhjim5**X++u19TbM-atx4NS7GMbFdhf%uSdU zm6FU_Dkn;N?~)jxLULAgT~@h!pQ)WKyeNKjBDFWAbf&A~TzDa$ine3STT`9TfB;A) zL7FZd>S5E>lw-b;^W86eC_-{;90iTzaY#bp!`QqV6UaEZFEBN(3G1nNT~MAvoxXSe zGsWx;kS(6muxIi`xs?;8#o0!GS7{ZvGNoII5cSWBGA7H|wA}fa!k5d)B@)QNlvN3F7h^=dxV1KK5lUr*6b*7VQRI4O^9l}-1?QqEs=V!=!gY&A_<{^BhU4sz`rajTE8mCWMsvA|fXr`kt`>}iS=?vRa6 z`QshXtpdb;EOdBrs-+}Z`o0R2Z#c%AH_ zpA{I%(Oby-aF&KHnS?kqoutxP0rWuNW}d|xHo^@0<_XL!J4PGRh=(Cej%Vjjnlq~A zA}uP3yO#CuW(GzINRf_edK$lNtSUEBMa38`4Y}iS~mvp-)#@7 z_;hZo#&w2;+4lN&RhzM}Khg?M&F!}O?gN7|DlPVMQc}F|72kg1+noLF$`tW0Vs((d zuZy{RGscfIUNI|bMQnu$LsZoq$dI)FDXS+*lF7){3#`BoO1lqUBKA2NVQSG;2ocdJ z*U1mZ=EI)I_NT9st2R;BB?63;=4X`U{DXgV>(tol>>TZ6o2RQcucc_bpLO~LcGM_X znw{unp5+V`46m-td{&Ufz=-10N;q4e%Q=4Vz4_or{4NFt9DJK^2@~Tb2O47k&*j1@ zzOXWwU&t>xKqueBUnk1}yy9~vTIxEp|B9d$Pk#gKl)cr}NH+K)l>Mf5Tk@v_UQz{9ErxnPCu6x9$g0$3np>0kE=HcbsTJGEouobS zI%r##CK^$(;Wei(qIsIPL^kI-&|39ueGludC7P0CgY&b&-=N7ltDp6A9XfRv%3I6b zI$3=5knqU6;0{Y1;F5s4kkXzXI)VlTy<}6=~?*RPfEAOr!@6=_th=NV3m}&L@5y`%JsE?o~y(Z@-F z(Y9q-KP0(Kf^bs(F4%)&IHZi(c>R9gs4YT;7ak;Hrb^=rrAtfg{HlRt>0~T9(+xYou zX}egr)o$3&`(vXLNV3<&39^(smpKI0ac2m3-^Ann%}`>K#+h-t3{n1qecjcr&gsY7 zQrwq>Z*gvj!x*U5E`9Xl=xt@B(q$Jh@5KJ;0v*+m`TOS^tc>3yjD7XYcw36O6LxSJ z#<6?sa~q=V>-xj$LlHAInl}*znV(m$K|P|VGs!KcSDE)^?h?3!DeYHK29lVf#4weI z<##j>b$8?exY4gTGq|lMyR{XW5?S7=HW6Wc*62IiNPJr(O{z8*XfM$v>`tyD2bA4gV}6K&TxeN=o;w2^tpkonH2V zXXSpa>m8kes2o>q?&(kHNO>G=gxO-_H{>m?<**_ zX-xO|jAfvKf`rjiaR^uX-^ru*q;c9Ec)N#o2ma-E^PH8zD|TUzH3ZSPno6Z8Xtj0x z<7dT22p3lsbExtfd8WIDrj;!!c8t?5=E<01S&iuaxUZ$UVHch?cRWHpRs@S!PnFUu zfC#V&vcvwI!qr1CEhBsy#@x;S99|?Ow;1PuWjilt-s&xZc${zvZ*NT$V1LC=9AG#<>_7Bt z_2R&3IQhy-#A%-e0WoAi_zu%Ho>L(fU*s=~c1L=Fgk#K1Q4vo>L`NVc6<{sQI8qD8 zh;M@tTwc2m6jG%j)^8C2TwY{>rqg3r2O=n_ZO3KE8gvtmB2KF*gt{Yj#NOmjLKsr-bD& zHvQMa`fFe-SGeS?o=K`#0^JUl%%yE+m~?=%BMy|2K|q-BBK+J%%_l(J8Ly-=ac6!p zhu{_{?C{o0()PHgOvEL#V(vRtuS}0pD)Sb0pB(5eWu+OHS~9J8c%9r#Ax#Pw>Ma{6{HOo{<4((O7hmk!bY1>O?3q1-FLX-%ec9 zCtR+9H85oTYQwqx&WtYxg8 z^QdP+%{6IsDccyJCWVCn%>y7pKG5e>RDmX^^XRBM68k!L?^bs2&2MbI6G+Ccw;Dfq z#q&oLhtI5w6@GS)ooR@2Pu3+B;(eQ@3Mh2BY=6DoW&Ba_98rI_w4wffgIIpD$Roc+ zOMywLuw+)2M5E`N9AueAMs*q)b+-Nq=W`8St0^Zco^I3H{Krv|7Ru#?4!?+H^hVCW z26x3Lv3Tv|EkTlbha?k9k|~IFnNpyFsNzFZaUkE~Q|^H70z1SGNAFyVIYTZkXvp7u zk%9JJ?&gU6!7g3xw;iTzE^587X-I{UsO~{Q*P|N290nlYMnYfl$<$`)w$Q@MqGC>c zqdjbHxY>a4S>K;umT$MMyV3^E&|O5s4gVxodKp)2nHuOycWLPC!zF@aUe-4{^28I- zEB~Gy2eQmkBhk^3YvU<09})NoSUgSdpQPLq_fvD+e!as)`@Yl8e1I2DFBT@Jqj1R~ zGfUaa`e8M5KyevE(nu`6VSg4h?N&LQ!*Qhuj=@lz@r$P`E(!c8drLoT8fRsfXXRmD zr^=!I!g+uo-PRG=7JZpu=Mnc6De(t{-nI(ef9KP`5vq3(q1x7Sv>EPYI>krs_Rgvk!n>Odd1K4bELqP>{o)sKShTi>u zvD6+6pftg8@N-bR@Zh zrz|UPPYemq;c~!Z70R>f@;py}Lp8J+0J+wR2axdcSDQ}bXKmf1AFf-X@zx*sT62CT z!XE*~e~Lg3FkG_rXgZfXfijztR8aX0o+272;SEsFFP{|tfqt$5lytpVrq8GgntT+f zD*^$xJoH1Ss~3+i^VJmpCzT-oA7v#h1}NH_03rVbKx`ZUVr$Baf^c{JHOX!Ixboa? z8#7EYeGjlD=sTeA7zrYc1j1=3e^!d<_!MRyz8Gbp!m1~8^PG)krDCQ&F}Sax#FIoJ z;o4$yqEJHhLbYAV_#jO9m5xMBpW5o2MR8@JLP%aPzeFJosLB(^&Q$Q|@qE|=!8$sP$ ze-ol=LOJ{zQ<4E+OhL-4!FP}ZAwrU)B731YM#y!*uk_&ZT5@J*%vDc$C=jV zLq}<}lU{wWm@@|?Cl~xYPUe_|*F2S~jP3JPQl#$<@rF^&yW|}9tIFDi4@PWzzXID` z3RN`O_-fQ|%$@1zHIadGcjY5ge@$K{r62~|}HAh3{9vm3teuS-UfWKjuC-|H!@e|T;Q zNpo|W8c07mH{+^VfM`96^q&&RNdTy5roOTj`BXc~pFS7nvNyqu>VR~jxCtfcA7^GQ3>mAgB#zqT@D_-Yd4KoU@WI{ z*eb0S0@D2GZPNF(++e)ua_21O5yCZ|B~ue7YZ@72)Qj=Zr~UyG;cXw7c3SXHqVO!H!is05+*JAJ5 zr#azJN@vD*Dg9$w0Q+z@q*HTI;-RFu*dW)MIA2ozFq<>&C`NT={o(ZUNpr`j&p|s9 zc4BGx%}{`xY4yb0{TH|W7NWW=1j*R+o>*9x7m84ED@~OSt7&?Jxzc4E+sS8`&`6LV z?V54Ez~@IWBYJVTP;hcqR}gsg`QVy}!R=4KVz{#WfDT|xNXh7Zy1yL*p~B|+VWSQxc%V=&=LVh-X}xFZrkYmh=w6I@!DvOhjwsOIx~! z#|vrlKgWx*o2%xkHoGPj1_d_<8&_oZD9#kVb|2z$U&8Yd!=|f)kdgszg{AnA;ZFH5w%+4AHMKY%oI-v-H$dyJf(gitYfm!fZdwrc#|=yk=9b&u*Drk++U4|2`dqO6Y5lEI&k5Vo1yJEhXavY^S%$clglT;^In&3Q=q_& z@&kP(A#c0X32sesf-Yu|%{3{d-(sWWK^U{O&F`*~KDOQFi&qi#M+9qp^4CvolPp?& z&7)NrA_HyJP9R72&Clo3zTfBWuwSO9GU z%oNDz7@~{->`p>L-$z4|DJKxpf$?=^CdKhS02>&ufn~X{!HgfeQ)YR4iz{{>nqa-j z)v$V_MWz3}1W%RgsXfw$rb@vgCG8~Yv3>P}smF{%Ff4#r`}{P=_P!vSNsTh+`~B9P z6-S+)R!?Y>z+@u7n@Fb^@3RLaGi|jufdzKEt==e7{}Bl;JrwE|bG^r{UtQ|Q^?Tj` zM#!6T5DMA`{}i}_G(35V6u}SL)bT4Rp4n-Wd=5<`41cCaYlMP$Uze8pbQw;&A^Vlg3Rhzd3IZG@KxK3k1j~D5SX7;3Ml_55mgSQ@-4&x|C z*;H0iQ8F4okF7`vGojF4ED^Av5VVdTcs9!bJ;64&MgcU1ogBH4rCN*BJ{vqu9d4_n z?2-p?-ylQO3la-HHn@Cq{eL+-7{c$O=u$I1@rjYv7#q3K=t~8CfRu>vf5LuO;Ju*Z zUa5W8Voy#&v=(u3h@Q-!03MJAXrA4R)&wM|;vwU+K@Di*+n zm)AdH#lQ%^0)b*+ysn2`!GK-=|NpSf}fCNI^N{R7^ni<%57=hvm^hLJrA#o z1u16BG@&a13;u};^6fJOi~}+yS(?)=+duXV25{6pU@1Pm30~0x1L&zAoAPfpifr>E zKuLSzLKsD!h^eftJv_o=1Vqt5wtrl{CV=FJ2IPSp`?K!10UT=qCgO}p&fSN(!q-;2 z670;mYkU+hwhH;o59}-mez0*q>kQiaNn#pAV+br%Q$0{ASXo;T$FBOOpkQ9+B;~Zb zOmV`u%5WokV7YRdn^0B|wbOd5>XHT$3)qW(E4p9IZLI6JZP4`f@R#1@W(N-cRpNNl z`th-v)oTn|oE63Xj4goRL$0BFn+Z&qNisq?F4h67>B93mlzM4*jwUZHY^M z5$26(!kqd2kY@3v7Q%j%HG{;~{D@c_TScyN6>eOw5DwdVm_W;gS&SL18km!h6ucog z_XllG4Emh=>F>6g2B-?4EjRotW1em+{8B%>72a(ZYa;1b=`7O>8~3%(7IMNX`4F=5 z62||o17`nll!Yv}hoB?cp?gyalOfOQvU3bVH=6Mh;kGGyoUueo`(aFCBNSNH~ zAZKP@0N{{fyD}N)`*`T6;hhHkH?~Ib4-alS*w zDKhaG8>+b6GUU3DavqqD;thLSDDV8Uf9Ttg=C`2TA^v}c@~`3OeO-mm4PFD<^~_p| zsjz8(mzKD@gF~GBTMmt8$F*Jn(qVic@lwAw00&4+DU)Z-u&cx>8vwwQ+ zY`%Cr+`v_1(MKm`_Jq%IreAa~BdHaKseDYzuWC$;&iGoBIqp5P?yRhgmyvi%EfZz5 zv}bQc>W&$$MVX+R3W!5{^z7N2o7zL8(-AvezrPr zlrg@q0nL8vBmBkYd?BflYS7k$^VzujJH9{QWYay&uYejtyNdISG?HYg@Gco9DNTOt zC75IwZP}Z%{W?bX&9kqucCFOxHN%^IKm+yCs0YRrBJ|YCF|D?!qXWj<>Nj{%lan0V zWH#PmvP!;FNzV)dqS&@aq2QL?PX*4$u@3M$L@9$pH|YwB?n3DEnMVS$`66<}K?sH(Y| z`#;HU+dxXR%clqZ(^?67xaoEy;)gzZlrliV3ot?QAJ||5b?8OFX9$|4c-LZx8ti8& zKQhJzInxBad)dt7eaGF4cO`W!j+z`xftS zPg9JM|IC#_38t8#tg3Lb1%;8yq1irtWgmN`~rkX4oPNrzIf0TL8X^e(T1UooBy%|Bm4PX zk@<&=pyomjgNNfppcYC6R~NkILO?5WGc7^GUexV&tp`($$4-qMs`X%aH8zr`#;%UP z23MbTH931;5EC>w=6scr{UKX^$l0~^X?0x7jL=WT38v7)MtHc;!k{ySb*m$rDQK`m zJ2<&zIWODD7`4am;YGY_=7uvpi8Y3Kmy)NY`n0thR+YK(fr?jU)p!OSyS`GKAr4OD zT42g0JqmFb#|4Pcr+O>qiGI`ZJ{Fda#bxgYb)dmmF9M1fkG1Xd#V8P34v)FNQ%Rw+ z`Q00jhylmz`|Q%oEL{(@l&trtFoMr~ik-1FTta?auV+uBRG6MDw62A=ZUuek$5Z9V zeh>JNGc>e5fr?mVEZcboSfe~HBg;Inm8P+F8-6NO7}0NbEjN-0Oh#W!YJw}SerI&I zZhc{SXg7p6N5y5)m3y8W{-C*>G?M=K1Mdr*Vc5wPB|&)~W54Yi%L}H2U@PIJGQc6X zkXu*)l73~r{JBy&lYO|un5K(_Rl-$$k0Z{6^blX)wtZHPPm}x-c%(LW^eK`m(S8_+ z17jZJfIU23BfzqY8o#PfWKs=K8B!z`s7sa{*xvuV#p&bmrHbiZ+7fm+54Ay!4p8be z(sfUpq=@Qc9P-QcE#f&do#Z9O+Fsr;@KV|@*|ZiO*XA<{4{Nc$nKL~l8Lnk#XB8!$`|o(=f3{}R)i zn0Jlds-*}*B2p9y&s^5Ao2*y9*jV%fDOHfPMAmD%c_YP3Px{G8(AUTtaGw7uvwqkN z8@OX_E^J&Lnq08C%|r{QhCW#`?pHZPYptCkKW3!-7p*ldP;9dkvzG>CaBR=X%$H!i z)hm@u)Q9{J!L^H5I3FA>xTe~=rK>YlM4Y9ZSW!_3HJ<|R#sOO?ei-gfPj~xaZ<;^t zlXd8{c+T;L?GoCgU!W4oEF_A6&$FW9M42V>g|T!zWZR^K(;;D-iDGoOw%^S7j(!Hf zQ~@8hW48@Vp{j5P)6)7fJk1f4-mA`s_DEzq#OMU z6@QvJN;-HjRW)VjBmvayMgA!fq5cb~Fb%U(y$+iO(C&9CRZ%~Kp;hO-%@}-hjK3Ld z|Lp&p4EB)^QRSV>Qb3^SFH>j&*$y8#{S8{*oPO?A^eGk?Br6)nl%G1SVwzu+E zoA$8YA?qU7lN%Vv#q?2jwG&^{ zY-j#L8z-6REGV|sMUe4|rs$u@6-Ag^iWQ#t8m^h*d!GW3Lmp1seUVHQM+jGz9D z@IEjh&HO}jzpCGMlE*NV=5Ki`z+r#<8^l;jte?ZH_8tJWUEh16A1i?zRQYQ&iQ3?I zUXzHJh?oi4S=Rw7$JZrdtkl|?)a`#)_SGP}8|NN6VS&jk4EEv8Xl36`zetU~QT!|* z|9zVit`{6yPY;lklQkY}u0!55WlT-C60_ceJJhdRNj!6+ab5Tqhi#gP=vK1V$|!?B zd;}01Q3Z&NvWT-w?Gbkpz{R>o%iB8Yl*pX{w3XYy6;GxJ?Q$wztq=(3p<`?%lbdXTnxt6B2^$S!-6vrB~h1BB2t{jnYz7)q*dJ{2!)9=3#T>qtMU0`CVVrHu|dO9<&vD+L5 zR1E4h!lFBp5XW9Zq-mtn-uay!)B2SgwM zxnV(QfSS~2>xBaXB&#jg|G=?UzLLQUZlKNhU8l#0l7;|E;!u;qlZEHT4Ck z0wA;4S?-!M=gTm;eFBiHFWwIQQKO(hgQIePTZkI-9uJt$jO?t9MA|x6Bm9+zL;xl4AuE$Zn z%9OU+Jo$r(ywM2Bl9cJ|vg~u2v?hAsv1fv9_MU`x<^cSpAte^hqn8B4_dpSH6i1Lc zB{O*fzOZ7qy90cqn{06Y5w&!)XG#q4n-i>p5UvWUX&nlUi|5vzRq>V^Cz-W@rKOz< zAuFKf^>`<8W4&`@Q7QXxT5MZ%RQ0VO1 zt9d~;4qKP6J2}1`kMZtIuT}c7P=W)5??La;Ofw#^)$eP3Q!mfi5T5crP&qT%lrl#} z@Kf{*R7JU-i9W{>)dGR=!U3>JJ=#rB15YN263#FxGrpAz2)}z^IX$+j89%X@Chm&X zZsnh(aQ50dzPZ@8F0-1Ra5$J$oMZ$_?4HW6Ny3q&Qr!28IpJT|alQ#duB1_f3uh$X z7tnk~#U17XfLvaW;WK-V-ecvZh6hz@gAqMVw0k};J|d1?^PZPT4n`k3LHK&H*?Qjs zGc%*oDU^-fPHhQ(Z0?ZiYDbhP{Lt=dvstv*jQmreSY-O<(s?_Ycq?S8YSaJ0-oZd=4uuBqAhUdHp38*m z%wTjVP`(PtUu^Q6aSEK%8#N$bpXq+g-khju&u-(Z$(!<|B(v}eS(GR4Jy+s4IivOR zYTrp5JAv7)bOpH|RgCSHGoCPu_E&OP5Y;INNoGDefy+23 z{~?kZoo49hzz3ThW8WQBGChd7>eQ`l!pkXNn`W z&kzrvgL;3N({(*MJO(92Wfp|TN1&wZCY4H)E7iRvj7E})b&oQ3KjKe47FhfX`HijAT1YZdH`#)gGd#V1<*y^~{r`G&?S~=(Hd?EE>lZtF?aYOo2>7)P1Jc*0 zzmM)OUAT|~d~G50n@<(qrQCvL>q*Dxf5DG!1<_WU6HOZLlb`&m=)06m>omen2uvpK z^_B)ISm0jodWI{Py40lNb`zPL4y4zcIwl==UE)oMv(nsF2Kz+f@@LD6UA}G@Qm#q* zyXD7!qT_&7xnF-iFgk^W19|}Ust4d<>2nf`9SqRj<^~vZKm?G`cueJNfSRK9qmn&b zFJSCPixIn)r@zBiTT~_YCG8Omgrh_`OvhIN0cT1B<--OYW8wW(SH@I?UkFr02Q33qq|4?(M085Kmc!n%S60Vn8M3B{E%i-u+#J&eNPvIQnP`6dL z9A6>n5cm*;iId91dCYpzb9_)-6DBgKAQR6Xj^bPVAWyHL0$@MX&iN@8z``HF7Hvd3 zDqjDC{d_x5oV58D56Xsp&N-%8i8LGk`3ZnW3zJc?1w9udr%|mg`P0&Mf41uY+G#G% zWuH^^R!n2Xu>V;^+Y6L%FAOk4xE}s_7S4M`Nc0=s&*^gwQ&cOc&*GA##q82}*33Zs z7foB0S(=f!<>uY%PEG+9p!?%WHP*0DLYe4fjCByF8_81cKjjIi9TA^XHER@F`00=6 ze)5m<%EWhZptImltoxsVD7xPFPfvqMPJe>?;+lRI5nH}tS6jgnQ}y9ZCmI(nSa>%iA?6&QF-X7bV9=$=XAHHeI6!AD9;8hiv>+Uv8 zm1KG&+dKQ;(G(_1ySMdT-Gp!hKpCA!t4Zc=&KMt#@Tr~pIe~A*+3O)_Z5)@kYfSkg z$tx(Z)7t!GDqq6yh4vt$GLV(K_hlfS?GO-R20!q3T-02`4J<3}HT$7KgUf1lO}M}| zp>+J?yb3xYxI$cYyyFveQ)E(os>0bDDd3M7!x{zVMSzXkRh^S7skdR{w0KA9jZxIK z`}jcWK^e$Uup5CU?{t2jAMW~kQNyuNby2|6W^0<|?|76_tbQl)E@by8X?tWP+{blf zyDE_)XWctn@r;Rj^0cezJ|UPf^xhY#6ja0{YrKRhAU8t)$V>BEyb>VSMl!oB?Vv(B zYqdk^)j9 zwJ8S}P;%%7>2nW?Tc78--s`=tbIzypb!M$K_pE!x|Nhl~R=&i4K%{%lZe!>U=9$g=2m~+vgFG{DPo?nKexGlKvR{E~cfxRAf}&a3Ry=EQDPC{CL7~u7arJ zv{U%;Y;BxUOpHSGn0gb+^5p?>VNukAs1785Oq$wcVc{ilBs`HmJiE-XAYI2iad+>2 z+O8eFRj#|vO~68K)fhiHyIq!}Ek1ik?EK@O4nLAg9044g#>AINrB8+ljIF4-P7-(p=JGpSVF$fxAE`D7mGPiAyI zDClfc#nkIN@e`wtBVCxV@(WrXWlXt@H1!3R{N2;kEbZ{^&F!ojF&O{!J}GR-qj2xego8Y zo6{OK({H{2zTsnrIg0eTIvroPkWaftlIB-#*|)B!@C!OxuDK}@oWr)8+MUY*L(8Aq z3pa-vLx;RY9^AmS_N|1K)Nc3`=T8i` zPWYp;-1i7K!Q<&ZGPBJvVm$W56#Vlyzpqb&Vz&RW-3#Gt_rJ#9fV+RxQ{=2sAnJk7 zv76x%pQ#et4?BO-SlzYplehig5laxI3Xa73{h=cd!EDt2b$epRVDS8Z_&U29kfO^B zm&HT6wLq%R|LbX@?vo1}@KVd^61B7Am^`Cp^!~S}>4~YHs=Z5>PzYz@|NV~)jD?os zSf*82{$D~krRESb+VnHiH$~c(ibvLiKr7tPD-_(2_y*ts`#ya`o;>ELjqaIOyw&ws&MSw#&qS7S5om$z)ng^U3 zesuj_$xo=V)x6J}Q+^}gW8X^epp=+xf|X^G`9k!m+K*k7G>fbdp z-$iB^!gl`dul40|(M#arquSMJhN>lh`yQvSu{MV$gkEKl$HE)AW1zxMJyS7mR~-3Aj-4?l-NNZXcy3z>W)^e+?az>3|0wehsKG8LQLSeJci> zVB(6Eyc>Ff#V z^{pwOGnvmgg?B$B-IM9qhF=9Yy%#Aq`v=}RhAz1qDkN*|rl>~X2P*M~!Gut@sRL}pagnY&u~Ax{3x z7v(rA378Ce#z-88_lH+vV%{38QxXBii5LD=UJFXQ5~waeZNfHkV3|3db6mySkvG4w zZR>)C=tyXUZ_yNqP`8`kf^+$`5$Efv!7Z0>8qyDk$8bDSv4Z=1H;)Yon^KPzTszCv z0#B#GhggF}l_zg+9Pg2$KgFoKhfSe)JLAxH^Sr%6fY(b#OiF764Bxxs%(A5<&b(zy z>VTsiWxPx?+^;=@|1}1$VxbC9yWCdET}++r`)Ao3+2|qoaMkQFHp`F7 zSpB5pzPj#q?U1Y5I)W?LlDMT`TyCr9&%iA{NGUrBy>;lJrj#i~Ay!b`8j+a{KzN%C zx(8(bC&N?lIyD5dW;vr}R(4Ym$c$y9vkWaw_7}m@etbr7(;u~ehg#AX|Ma?b`(&33 zXEVHMG{`jSlHIKmE+q$aXsDAI4G)c^=p|Wpp1avNDr2Dd;`r+G0tBuP! z(}S#QkG=_uJ=vjL?m<34Midi#tH`2qXc9i0|r)`bziQ0h^)EXE60 zV8>HSDAe6u(xR|zdmqW7SprmDCCdG9XLL*S;lfvFjvdeB%SH7CiAjx-NQxqI1a$7R zXI=+Z0wk=R%;pNQP&Rp1s-%mzA_StXbt5IU$NZr)+M7KN{*Z#sZC50FBqAVqxUAC9!v@%a*R2~{gx_p`F@Zv8 zuZ8pyv`@<+g<<>@pWdEz3UZLG1%y~Zh7JZz?o4N=WEEq@W-zc_h3fRuGn7?h z*4A6_0S3F)n`cPKHUau>+po?iA>U+Izy7fD#yg;1Lr14JQD(Gqn-yl1PZcyPk+tEM z7HkmfFhV>_!+MEQkq$(j^26!)toA5_vk(Ech*!_n?|>MtW_iV&D;s+D9-`QSz(B#p z{5L|QmDd_?bDY>#eK|wrdf}$HE zbS`3oo->$jh`6uz+TiW|&_7yMo--S~T2cpjr`9|a?*K}9RR1pEL+|41Ov7;Du>ZdG zUdU{V_Oi&8vI2VYE_2(U7;j2DjwUt*Kk{$uEPU#Wu1Ux{{*i+eN)GMyHp}LpL#;y5 z#C;gy(~wg7Gs6wLu+B{;U_`&yhF-1m^);nNivT0sIU2j=XQ!Y!*#cLz@7%=`iMo0S zSj=I)4mkI!!Xj54BRv9Q&ACONG%qKPIUHZ+Y`M3)cVt3^?WCl%lVTv!VyN_Yy};_19(xOvisyD9iTbnSpIHf zPwYFNa{B@#39*O!^}4`-ig%wb*!9x)GL@#)0H2Cmb1c+Btn6vchi2us2}lD&K%4=k zV@9i74_xi2h`Gk6`7%+7?=W_@oZbmKl+;8|VGMAEpuS~lkZ)!2;M|qNYPYQNrH4Me zYa4VW|-yJN5EyqPQzB$XO410 zY!xJzL<%&$kzj<2cp$jgiTeU>1C#7O*;xurR@UbWv$amQ?Y_uc8KLbmm_rlCYAI_y zze<(uIMZf|iv?<_TDpckhVtU{XXgL>C!*`qAc!nHiCp@)j8ghV<~8kzYFYkFec-J9 zYw68z2wC*M@fCeBaU6fzk?_Qq1ysN*vY1~#K~rPbgKqd|%`biHM?=Ud?JT|rN2&XK z8i2zxeSXm~{<_KlBibIGYrTU*;|gFgrN1f9Y@ASgI5}h13~z1LQika-01Lk@gjhW+ zn(UqxiM2V!9-`mt*7|B(~UX==vXi`UIC)mVQ+vSZ<{Xc{Peu>Tl6{ z_0p8T1o%=3GX*^m0!_u&d?hl8gmCnS7j#ZJsuON}14NCjyK;!RPqWE_O*_sW?aE`G zlDCn`L38?vfLVhYmF7WntIAncY+c?)NZqt$f*jE(Du^(Z)#OLtThnE}b-6%ef&cXj zSFMX6!$PS6ZkvH^KLeqaKqBv40|e@U3uZ>QO%g;Da(@8DcPeKzh$Nc;s~Yhm^V<&< z02Kuy$2N@effV%g4=Jc(wBb1Ci`{<*GrOZl&eMMZh3I&>-a_5BISp>l_EH+(KZ@F_T(+d*xXMHu_j0`d#q~!1+Vz^4lYR z!zew1P!UsMggq!WEz`|_v_ODkiymr-PGm8XXKU_=x6-PK8o8bpc`pp6GpUfm_}tIMwZtE_k+q=X zp$_Y6vb_k9kk&WsnMZ?$gzOM%XT*4X^{-nfoyd~_6%km@>5ry4pftRuZ-^>o*qsC5 zQbA;TzVksD2T2@%;u8Iwd{a9Wn{k5?LN(%`6~4E4{ZN|q5mHuRM)&fz&<8nR*vvUX zgf`?E+YqTfxwDETT7Th;rb;o}OKwX}gQD$-oHVl2G4om_PLp;9%k}g?HHfJTfGlPO zAv3>{Lg$P=xD~9*N2S|xD=W=@1GNe^d-hN!E#e~PLYUbL>#8_6@K>%*lL|Z_Mc7zJ zr#I;`lO~zSi3SNxJV6~$a_}D$duhchodchtP32)F#T5&}YPUI|HdzU>IszgZ-t<9= z$$Lf23G$EAWLuJf6Cx77mdHRnT9y#`qDEV`d7NMM|i% z9f>&^+B@|^z^R;Vp^}dDVR|Ft+{f6lARy)reUy~g%u!@cX}4UTGP}X6^mpQ8MYHe) z>oO}OGSi$CxILnY@24RRCb-|(Bc{+oTCA4D9xF`JE!qoF_4MqqBe+ z6(CvK+M_xPU%ZEx0{5LsE6*xv;zzh#8?PlQMl4v(!|tLjYKet=5Pr%3lp>vUG`pv2 zHYAH-Ml$}h5!dTpy7fv!e(oljV5)vO-!O3kb^!%K@aA5uCIUH|I*{;XDI$+0kbU`0 zQk15e2tteEw$R1RN{Ir8hn{6^Lqe2iic`XKj8PE>X%=Z5XbllEyNh+WjfOgSs(W6@ zy-o29X+gN|$s%$zl;NJd}S__W+W+yBC z4gDG-+5jnFkt&uzi9c2k$0Y2KKY1%i$woF)2$I`P_x-0{s0AL4aY8Uu5Xh$8v@TaO zc=)O()ulDTU4@^iEx8DbJhQDG1!a<>vS-B6KJa8ESoY7YnkJ^}M5R&u3aud$kxMz! zT^&^_?!+E;sKi{@vs^l&zUo{H81nI^Aq3L#N-r$A9-ewV5NxXBN+WTw71ROeTo&i5 z++EpM*PouA8r*$T;=`iV_u$_!Itoi$K6SQE(;gdC7i@W}D$djyR1cT$4+H`h;PGqT zI+yvYi3*f#p7bYT_DmpVZ?aeb3iqZR&LJX?x*D{r$#Oi@pm4Oa{+D+?5Vo76+%*9v z3GhLXrY3o~7I?T7)B?Y2lOTtZdB576*E7bSfa7p}o;#57Gj@2JPiCAN+XJ6*CoZ`w zHxEq4#}q^pNM$4oT?e-f_UpHWFEKCges$eSMt05^dsAlrLt)s7bT{7EjYsMzJ=#W= zK@G+Tb|VFW@2E5PIp*^kA^|69Kl#0E=66)a05!e&Pm*T*eKl>LW65RuUY*b1SST8z`i8r*(0mXQT$-RoAJZR@4Q`an8QboI=M>*~4w|p~sPRiaGDK=X%iW z2%W$@2$U?i2Z4oAT4^8WGh2VwafwrEr>Q++> z>#!A@>LjGYxn9C^2VD2^kd)dH@1k2DlPCJ@*3oRgxJLkjZ3#Y zteMH;L#l@x;ft}m`rpn&7A1%v+C+Wvm_aAoEnvvtktx0Up;H!6JMyX^XKOd%!c#V3 zb%ma)ok`-79g!;JbFdp8#FM~*5{N-xRxhz2*fYzD+1X4!z$ zgI2>GsgL&l`eiAT!6`fFK|NuMlu<9GgV4Og6|y#Wg#$?k_Mu(wMEQVvwAd0lCCTS6 zyp%Mlbdks+U$5jg=H^os0p{xzP}r*Lif=ZvYxEI zNBWp;w<@L;?o9JU_F2O0y1bX*{`_kpt*zQHE8Bjv2hhswu7+abKKV`!C$uz?R+^nJ zY-!S%7?INOI1D9N^~how*&l|75H8cO9;SNjw3xwaId>`Kc<(QyP{l`JPQ2BUUhQ|~ z-fyL`;~7}6MPAbEdn2e+-Nh;Z@MLOxo+V&cCNi}mU=i*Xq#<9*qgIFJ@FwN3nsn@k zYCs*@QtfP)7G4txDTBDO9t8n5a2j#*^6?f~k4X2#gbcAzI3H0TsdvDKZa+#EWgA;d z1xtHs>7M7U6t0UEVsGW#sv|IRrsHtLd=epxK!K!_yR3@U`}iBhAtj7a_vKx-^4&?g zzOdS%F5L*$odLQCfF=7X(uS&&9b?H&9-x83tLw?fF?in#zDrL*>AL^DB3|ET257R; z{TV4D5?$L}4OM^}pD|1>G@JY5ShpG8NpM{aN69OF-MKmS;ouYwK&CvLKQz@^uLmFh z;%s^{z9V(`xcM&oAa467f6fkyJAm@{J_2_nJcbyd?vuoT*jg+ogroUx;@Tugn)`l- zkeSVVacx&lnj_o>NeEW)V2zhJYP%samof;PRSIbqs32*JjtNVE74sd(_kvHlU^ToU zL-BDAmnZ?w+<-NLU{0tD`@ji008U?gHT#-K6Q92>atQ6o%r6D+XY6;&0EopzQ1o`L&3zLZ#j6D|!z7pNQ%Gp0BKVJuJj zk8ppmAoj0x4j{0%B^hn2hG`|Ucl;K~n{MmU(O$^cZGB>&vT+0##Uig8UFVeB*}AYF z5s)oT#2enk9;QbXEudDpq;V1#2pkFppL(vPEQKMFJSPnW_)Q_0qkDsu)9Wc_s3#`` z9SBC)6F=e|kCESvKE&C%UjG=P#$SL@{?)uU3JibrPdyDR|yVv^K{Pfh3Nok4^ zu$t(PLR}IC_kxgggLFEJ%B4+~#TW+EA=wUSOh5vR%Rl&49M`Ethjhu|brqviaEUzU z`#7yXZLywZ4{AUgE-7`nJQtr%w{Vzu;kRol-djVKeNPZGXJecc9_w6vRpQW}d)tCkF@JSIneu}8X ztEKsZYmQ&s5HDGQ>fGH;n#JXa?V-AT1J}EHJtOx6y)}oqh=il1k2=kNv-w(91KaR$f&Kd5fLi@uuBMhe;*Fmiv%+s_dEcQZ zi7m(NLCtHwU6BB6I!UV(8@sgE|F2)txLY1n-KzITga;Z!A6z{A^7!GtA5Nwo(Lcz+ehtWRy+7Bu?S*LFaR%!|A6dZlFvzc1@!vNV+ zRT|zMF2hYZNo*RU$WMEV{~!K1IV&5T;-!yD?ob2|&GV3Od)dHi{2&dFkc`$47RjWh zBTt##B#ZdDa|~a%SC82<=Tu%kr`kV@e;8|#6o~nvcs3yaDu9)Oc!yK=X4Pr_mbrlg z@AjdU<<2a2^?a`160|~RyW_}4FI07g~Kl1GY1GU>Zw#VB9D0BI}yF4`Ufy<8yE)!Tu~eGO9M~yEnpKix_;UW z^)=gbr*7#enD;Ei*oNL5)fs#X4@%vMs3d||i~sUN1iy_IdD;t986N)`Wcwd#S@-lD zCDwE)?A@WQ33fT`o$vZJkK*bg0OI&o?~Rim52s>iVU|gi}S*!?PSv#=3jSlU~;yCh%Kb zz#Y6^M(x!+x=~T-YqF|#S{B*~2t$pyTc{-}U zrm--2rz1rN<7anq;-5Y5(AfD2HC)d}$JbRkkNKVXys(Cfl(s>)-Gnq69#n`T=*Bep zZ%NRJZRLz91mMPaUx6n3-R{i6A#ZM@<4)f6DgVm??W)aG*oiL^%?k(d-_zV0(D z&ZsOU_Tq$#8*Z&!VpP_sl=<@1t`~h*>!%0$nkUUs7nFBF<2pJUPyN%!N02pw_#ei+ z^R?9%zbf^XGJ8RQr2sj7^$TsKIi>>}E^&Mu9~*G$0|NL4r8KFsWM+`jB7ftCL^wv^ z`}xAWZmTaio+H)nb+hNmmxqk?TmuDH!nfc~BK>!xh6+Mmrox6Q@G|!mGLm0QzF&*$ zzbE6pokuEsi}c41x=j zvwxa6Ll$(TXr;~uR@>(eeVcU|GF~#_WTv-`#2x;?SvkctxpvS-$8_ZZn0ZrH&?^r! zmrO;4J$$ztkU8tM-9a#6%FntEv PjN&OERAmbOG<)!0-l=rW literal 0 HcmV?d00001 diff --git a/Assignment-4_files/figure-html/unnamed-chunk-2-1.png b/Assignment-4_files/figure-html/unnamed-chunk-2-1.png new file mode 100644 index 0000000000000000000000000000000000000000..ad6c8d18d2f431fa187cbf452cb4f70d57c07fa8 GIT binary patch literal 10293 zcmeHN2~<{SPVnIQnPJkdGB7@4HfJ{k9z?M9V6&yiP z6P(ZjqJUut5H(K`84?#V#v}ql!WbYx$avpH-|Mfw_Px4VyVmf0Bckg}A-shbC z?S1Y&_n6mKSAAU*T?hoCzsb#I8w3K!Kp-0TwKYHrt9;2IShah3?AQp_5C{?i34tJy z5F~icgoMz+>zS*WBLs=eM23VQL%=f~naK?SMUh~6O$z~!%#cj5&_h5L9V|d55|Rnt z69UN$0nZ>4nVCt?q=SW<339pIOfEnVfzU&c^h~gX%<$+T;Ezt{&WLcq8vFy$0ie0L znVX5^W`=O-V99*V0UH4M-~oUl;E4+WU~>RB6X4QcUxD|{(C!j&ZeY)J4!QZpKp=}K zGe2lX?^rMdvKX?-W&MtXi^IHwL1wjQv%5aqsB^Hk^0rygwLMWr5iT1|9q-QTj9$8| z%I!V?xH_)E^gRC7ejqk?AXX|N+*x6=XW;0qB!~O6MLam& zUqkS|7gT6eYTUe$eC4MipKrx%yF1n`raSQuE|_;2&JHZmoVVBw15N!6)j1Q6gbDPs z(Py#CX&7gBT@f2?P^VP)^kA1xzB-!qy}P#Ms@5Qte)O7EmNX`z6ffs>84IykU=P6) zW#hM`MQCn0nn2PDePN^_S9&!Gi1L05if6Fz`ZdIX6j)nV!wwF7)_z9MjsYE%NY&R;zc33I&RLe)~sBPcOiiQ^}g-m7rS z@@m(Px<(yTQld}}3>{JKO?!a>F>}Udx5rtj#`8H>gEmsgC;CiAcAe`N?b(Hco=DOx29?%xQ`W62A$di>c)fBbc0 zoj22IwStBQ61av6vN{+LpwF)Q3`C5cu1LK?xMHK{2Kc<2t{~_Z%;TgpFAc|eq82H8 zI!5ZmQ-DfwDyti0hi-yaCrBPeN{6`lq=ftFZh4pQp!huKVGCx>#jDTucw_HQrIx9V z0HqSDHE9Lyj(Lk>1ud^imQaS5PA`4V%?^wyzVz}se4<-P8Ui&i=6JQ!!YvXGL#xXZ zs!2w2wLA3t;kvj~IO>vND2HbXJ;YR?9R@6MQ66pa2Z_RMgz;h86Ksad9+%y4RQVBN2T6rbba7CxAi zN1!Nt-UnU$YLxn*R^HM4SCjA0(*O2Y`e{xm+4q1&T4*JhsODq;<&+>jD&j7vP9Gt!hlp z4Mm8TB>7AZ@_KE|lVj>oD$KEPi*jE6=!Ojf8LR%~Q=2$Oo*=;4P^FA+w9%!ehA1X9 z+*>CiJkZ#hi4y!&@U>jZZgWP3VL!uLuc}hk%Zl8JNjb2aX*lsyt|!cMgB1G!tr{6k zS8eA=M*x1mpF{36)--xR;N+R3use<`7VJH;MwmZwtkU=J5J{=dVC~5wipO6f&nd7= z4a4ZJ9kyxxYZ{ik*h`emDww=g88GGzWQoxZ{E-qH(z<=6CS2NFgH3iAr1P`jt{N9!U(%~|`F(SpXcCdMsJj;LSs zPTSjfIyy!0^s!Y~f0a|{v-Hu9rj5ni^R>3VI-=}g%?Wk=h(fT^T`+bfBfhKz?_W0L zc&qL$k!6|_e`g<3FZ9I&7bTGx>U{N~u;Q4LZ|sI4myNaC)wZl?&UebHA6;tnBP#w4hrmL?LCi~%@als}`?q^V|nQ;7-j^)~=wBD7i z0e6-|zfaRFB|PfXYh6m?WRlMn`G6}f&3Pt9obmYwZG5&Dlb16tCC)y5R+@6+6AtVx za~DFbGKc(^zTuKTA~PRpoO$WrEIUp9dIM~C&E8@7K_jm)x8K&?8~dPJ;v6Llm#-9S zELuW?pSqO3uWU^QuGomP8n%0JM}^xPF7zWZcO9`_?D)YG@yp$bPbre-PTEid_a%z^=bOxy=g#4r2ZDfrqq(5o_xJx*Tmo?E{K%#X+PX{jI&{U=2H z@UaHkMfJoim# zddsrk9su6*yECh3Z@|(^qy_z1Xn7Z*_kU`F@3Z)Ak@&xLcZDzJ^y?h(RPj0q{2^#* zxB*L2H(D@dJQ6Wc#eV&)yywB>TRxU;1)nGiWgN92Ej0RqmIy{x=%SKba!tEFzxs=t z;)+ywGlNf^r1&(i^3xFw``HyyB21&)^Ydm)4 znB9;PQBRH{&Y#w3s*t||^Pbs@W4&rb9Ky~ZY_RsL$F{zoF2AMKG`{lx_&@dzmhes& zbtdaD$x(kpD;>M5?T1+j`-+oZ+PY`=!div9KshnKQqowdd=6@?n(7``TrN|O^#cny40`89ei?OWWSiVr4d!3%u)0Up(&5s7+OP2^YKOk7{G3&g>QA%=Ob71{ z#(U;0r~QdzaX0+aLDzSt=A&BEpulMTN5}Z6+Cfacqdd6Y2mKD=eK-AMtpQhQ9|V#= zR{MJhUFG*!{>g_x_V-yML2-Up!1#UI=f0=BCsV9~wMAQ2Tq4yZ+qW zzSGds)nfetdGtM@(z)S<^@Sy`kL43qz8H#XoHpZ;p%%z+}CA zz?wjP*Q}f7n`(vnvPCB>n+&dZDE&n3Je{yzFeE5%!zU09_?^&JM$Kp^z84@|mFfBRZMa!9ZIQFGZIBKRtRA8jcT#w^ITk5tu` z*EmS5yv1z!h6%OV*ur!3IV|b=^crCzm3({q&*TLQIO*QO*uM)xO*JN0S-Xm)?p)b9JnOIPUmcG*FYju9#4Q}rkM>w|wM3cDYZjaL z_GmE)I}+Br9K|&;WsQ+#c%dq4gT2p{M@u9s3kps>`eig}(iH-tryUpoz&RCMd;PsLJaIQVdS^t!3-pZ003>Q^iqH1j-{FcbnaR+7)%Zk=~(Z z_t$RSn(k|`U0Y;S)p^z#yam0ERD)NN?H2a6G(P568`nJ3QscGbQHh&c;;;Jj4iJMI zBbk`(N$zJT$taSN^<_HQVE0g(y~1K0Ly8XAfT0R5HnoLjC<=zhC>@@*%1=hy*$JJ* zT*(BpU@=YMU@l#mTCr;pM@4-ou5kjm=pkmiQbE0+*3>K}2^7bwU&)UQu)Keu!m%!!?HhQGe)YEO`ux*} zvsn*MqV1p=_^E0a*yf^_Gytb zEz4#;(*d=Og6=c0={ECJNb1}6WVrTCn@agXhpQFVK%n!g$p@asSvE)nHHt^_e5`_J zFuLkOZ4AZ93`sRL0W;Si<`X<`S+6ZSLpW8EzD<^vm`rdLz(UgEcDi>#5;qBX%A z6u0>U1K^wOAi|LW3YLeDEn+UNP~K>7EGbX{hX@k_^)y4zJdU-~68j?Y2fHOSSy}}F zdvL7m);5C}rvfoy7r~=hKjz4mwX|a)4$7u6RdAGgx)t%lp#Vjr8Zs*rsZU#|=U8=# z$+9Oe@UfIEfG@w%K57~TjN#)Su!2aFe-jYTCw+sF=+9MFkdL!20upe$H{I!3on6DI zbAK3SZe#RdevYv|UuAq}iX1>}63AP4@m*%-wF)e@s$7vbbe#&Q!N>X2jIKg>6yMLs zisnE$R(1GGp)EK<2Q_PQa}H#86`p=TzHy=VF)nWz!Cm!@M$%xeiFv+)(KY>b-{|nQ z^d3j+G-GYgp|mpNaAVF1R+Wx=;kKu^G=}9O%MRN%UV$lxZ`gpl_#KuNWlwASgdzVy zsE#aGroNI}A&ZKDf#X=NzH~vj31=(IOpQ7jda@}0OM{r}%8Pv_eSJKa7L876$}zP^ zYfon+CQrStTA8|UnpYq1UnSuRfHEL{+!R?yO+hu;Qlz&CbCUM2?Xo>O9&_PfHaE(= zb3SwY)WLI(nxz#K;s)VB%fqrb)>zSYvl_F+)m0tRwwfjC)>LARR%di}nc!LJOWf_2 z*r0i7pn6X$Nd*Ve>81|C-#PqGKd4BLxwyjNw(#oSQtwI%y zm$9QkbDzOFWhpv@n9A=9XT^?hi7=+Piu-{o)Y_T_}nJDhI>zo9>ymH-ri+U%_~nSoHfzpxqkNgh3Z#Ta!!x^gQ8@Wa(wV) z4+Sf}?1&(d9;88sS2t8yXx61U0NvvjfqTVmTW4B<4$JR5sRc;W(hjmZS}Z(N6tJdB z;{C`hxp-*6v)a3i`2`YnN{UviQ>`>QaoG&)idMYPlj_>nSP1m|ty}2Ok@o3xgRl(W zNaiW(=(212S`%u4W{j*|jJW1U#NTCfq+$&ny9~XfM8v@!fjU3<0=!gZD=Y)}luGFE z_!EDU+sg=ee_BO(K-mEdqhUO0I@1E!fpnkC)fY_)Hm)N~$hzvw3?s#9IpX{NFXW^M zv*gFp!VD%Ou$gR!=xaSq8GsH;p7`H3k}(%SovdK`l^tg2(^2 zFN#)mFpitzz-?rLao#|gHx6nh_WneufI?CHbd9$8aIq!cGs1g2}A`QEYW#4Ei7`5dov zBa`QCUiQ0Sd@EVoy`pee^q|500cJJdNv*t+=6Ed_0rw+4n+W=z#$Y4P0}ixNzKK>CESUn>KEBx&3uu>OTN