From b4e1d79aa6b14ce042b40687ca68120815607dd2 Mon Sep 17 00:00:00 2001 From: Joseph Larmarange Date: Mon, 20 Nov 2023 19:30:28 +0100 Subject: [PATCH 1/3] test if less or equal is handle fix #49 --- NEWS.md | 5 +++++ R/ggcoef_model.R | 8 +++++++- 2 files changed, 12 insertions(+), 1 deletion(-) diff --git a/NEWS.md b/NEWS.md index 38ffc0e..77d2f36 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,10 @@ # ggstats (development version) +**Bug fixes** + +* fix in `ggcoef_model()` and other similar functions when Unicode character + 'less or equal' is not handle by the system + # ggstats 0.5.0 **Improvements** diff --git a/R/ggcoef_model.R b/R/ggcoef_model.R index 314a0d5..ae08c83 100644 --- a/R/ggcoef_model.R +++ b/R/ggcoef_model.R @@ -1152,7 +1152,13 @@ ggcoef_data <- function( if (!is.null(significance)) { if (is.null(significance_labels)) { - significance_labels <- paste(c("p \u2264", "p >"), significance) + # test if \u2264 could be safely used + test_unicode <- purrr::quietly(function() {plot(0, main = "\u2264")}) + if (length(test_unicode()$warnings) == 0) { + significance_labels <- paste(c("p \u2264", "p >"), significance) + } else { + significance_labels <- paste(c("p <=", "p >"), significance) + } } data$significance <- factor( !is.na(data$p.value) & data$p.value <= significance, From 69f8cb8ece74f278e63cadc790ef90ec6551ab4f Mon Sep 17 00:00:00 2001 From: Joseph Larmarange Date: Mon, 20 Nov 2023 20:04:09 +0100 Subject: [PATCH 2/3] typo --- NEWS.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/NEWS.md b/NEWS.md index 77d2f36..25631cf 100644 --- a/NEWS.md +++ b/NEWS.md @@ -3,7 +3,7 @@ **Bug fixes** * fix in `ggcoef_model()` and other similar functions when Unicode character - 'less or equal' is not handle by the system + 'less or equal' is not handled by the system # ggstats 0.5.0 From b413b895fd5d39e67c51a62c67b0703b810081d3 Mon Sep 17 00:00:00 2001 From: Joseph Larmarange Date: Mon, 20 Nov 2023 20:05:23 +0100 Subject: [PATCH 3/3] build readme --- README.md | 6 +++--- man/figures/README-unnamed-chunk-4-1.png | Bin 6655 -> 2985 bytes man/figures/README-unnamed-chunk-4-2.png | Bin 7054 -> 6655 bytes man/figures/README-unnamed-chunk-4-3.png | Bin 0 -> 2985 bytes man/figures/README-unnamed-chunk-4-4.png | Bin 0 -> 7054 bytes man/figures/README-unnamed-chunk-5-1.png | Bin 6920 -> 2985 bytes man/figures/README-unnamed-chunk-5-2.png | Bin 0 -> 6920 bytes 7 files changed, 3 insertions(+), 3 deletions(-) create mode 100644 man/figures/README-unnamed-chunk-4-3.png create mode 100644 man/figures/README-unnamed-chunk-4-4.png create mode 100644 man/figures/README-unnamed-chunk-5-2.png diff --git a/README.md b/README.md index 607fe45..2375495 100644 --- a/README.md +++ b/README.md @@ -47,13 +47,13 @@ mod1 <- lm(Fertility ~ ., data = swiss) ggcoef_model(mod1) ``` - + ``` r ggcoef_table(mod1) ``` - + ## Comparing several models @@ -69,7 +69,7 @@ models <- list( ggcoef_compare(models, type = "faceted") ``` - + ## Compute custom proportions diff --git a/man/figures/README-unnamed-chunk-4-1.png b/man/figures/README-unnamed-chunk-4-1.png index 20ecaa504398c336e1d78cf1437841e2e92ab2e1..d9fd18d058f93e1494bb15bde9dab999fc7a8e88 100644 GIT binary patch literal 2985 zcmcImX;f257LI@*Afa7iNDFN%q9{sQai9rH!q$qii3AmeDCh$mNg5MYflNek!G_oa zqC}I2-Hytt5<(jWnGt(XAtWxW0n!q~CP~B)h}m90m^m|j=EuxAj`Pl|S5@~`y{fwR zyWg$z5n7 z9^Aqqa5w}27aR`20Zbe$WQu|L5df@!A0`vv@c0XQD4 z7mImt7vk|CNX*2Ed4QM)>&0RSf(OAONX(n>&FNuTj&)fuyb;T9ckHJk5XjcKvY?G} z`v?MI^&~jZFDmnzeDHkw@RJ1vyBo@?nSvvj#P5@xlCS+i0)063*`cxI{@%!7e0THc zkG2ZW-N}{dnYe>) zj1>*W)RX6+h5-FZOD>lV4XwFj%D6nbb&rLK!zpXEa&Gh7+W?B>X(1#tJ7< zt=Z0PjHRJq;4{Q?K^f5EbQQz$o$WkIAl|E zqD-7(#tFZ#%H-Q+n&;}g_Jyzly#Kj(m+3ftd;F7)Y}aQU;M<@3R{BZmJ^xhIYtx>Q zOD=l45&m=a7Y}tpc%e<-pZk9}^kdNxbBVB5)i)wMN+f!4PWIX_i*^-hXLhM3Ds&@P z?#43|F9v}ARBFh+djyW6k?|XAEgu7NqXvDHWxE_a+D@19JGjZyFKt<8^wk`}7GiDw zoO@jyl2TCNXj38B<%eZSTdC*P!zhk+hF#>tY}$XC{LCyySx09#f3`8gHFB*;9nYhW z*M#9VOh=EtUgzaeC_0ZRNxIqTm$BzIHG;o^dx4@%tgLiX-6A|-zWv1T`FJc^E#${V z9f0lEXa7gyIuXCT0ee}8zV6;eLs``U7t&6YY%NlE1X( zmFF1QDh;{Q<4p8aRaVmlyc^xB#Jbs2v={rO+FNn@_`|9Mr9ZpTT&rF9BfIT-(L`UP zY;?$OY+*ZRPXkeZrt$~8XJ!J3K1k3Sqme^K$ncAqHuPqqs8bqNKxi44kAiivgo&(y z@o$mZ&6K#GTe24;F&wf>0 z1)-=vBg7gIZXR_J;!&=83qD8EkV`@cJ`D6W#+yMu8=`fA^i-5JF4?jLV(T zCo0%UPNqIMlsthNa_KjeP5c*Ke2hUpo-AFKk7e&p8O%`}rG`YqCp*^taG!!i>$iVN zTr2uP__~(TLK}huf32uXe;7KEHS#4k!ZqI9DdrAUG`M`izJzR5GrU)oj-vnlfDUuX z=pSVG)qI$*{8}^tmIZ?TQ zcaltR-4sQ#$5kX7vA90~MO(PbWZfrYOH4nw~dpjYhz*L%6? zH8pKZ+9Wv^k2?Ltq@F=+%3#P$oiF~+0~*K8kw`pPmkzv}64#lNoSH96u1Nzew8`%< zZ@A}y_nCZ-jYm$CZ7{?2Y@DM*F^Mv~*n0ZS?QV8%Lt?zCCx%`UagC$!Py%#n+xq?WhueHHEki!kDTigRzAC#Ktpa+?ult4ljbe(Sn6H#= zefe~Cx+Y@-yTw>=RsfP>oh6e4ERIXRRO86WFQQf$GtD_R-qYin1IY|`Rkq488Le!8 zEji|efl@CvYI%4tU7yXZS|rdk1xz~M`uc34M=HZV<5OLSL=O#u1LP2bF z6Sn-;6L;IG8j1Q^#~pY!kI~61cA#*)jX&uM<*I|Q-wd5gARDv(#uU(2Jo>(|_%B2H zpp&2TaT9CUWs^P`z4I7XHA_s8ZCj2)gt<^OR~d-A-Ho&3t$Hm_m9foqmrf zF(&rfdOb*=pVK6~J6JO;?t0PsZdDJh3tmA=2(Qa0Kgt=%iz_+$LiWF3u#C27gP>q{ TAu|5-y9!(njnI~fxR4~8-4a4|L}7`wnD$C&UAw+aWN;8u5X z@HjijxJU+$3=ari?PBcWVoY#x$#Kbf=aSPO7#K+S20?q7a&r115{X2{A;>rkIT9W?a%3c#44)R> z0g)jF8G_ysjNd`;-a!zJMq@-`7?C&z86J@g4kWya!GNHyuCD$ZmwpHua++eXSo5CO zATkajN5Y#SMkEIYUe%ui!H^J)1n+>?Lf}zH8TfJXUpF}CjzFw`!+CMlxDu}*5Sz~) z*VQreP9E=EJhMeVv6?NS6Q1jgQ?1>uewK9Q(%rWbzaE#F#XN8m5gYpD94g}zX~!RD zLkhMxK~RKcd~w;#=p~PS<$AMgwcI&1Us4Ppo2aXM7520@GrxtSRH*( z0E4un38O>u002tbv`3;3(yp(^ydjs*-FWb4ZcVhYN0F;?NC{h=+ zfk*%`yLw}4PYM8V%;u9}Yl{f09^OMS5427P(Z*>S90qwLp4rDE9 zbWBDpRBByVkpI+v3_N%1hDJ3nJ@46h4<kQ zal&=%&08EuE!X28&RV`I?rj{tA%Q^-he5wrI<+o*!{MQK?vYk^TW@uchyGH8=$1>J zi>J9onLV!Nq30cTFyd=|53VBs;VmV=ve{M2t~PKlJAL^RGrAmEICsF)ugQSF(BM9Q zVOgITX1p%UvI;uDGit#e>_qzx&V30tQ*Y2RlHOP(pH)aR!Xg#TVpe2pQ!C1#E{LFM zVYSN+zQ~93rYVi@)4SV}m5~iHv3-@4DkJooBk%)_!}8t&ZgQ^`TZ@fFi7Fslh0$j@ z7I^;k`KKdz&~@zXKN&{V2dzA3D})^FKk2gX<#@-U%-*xkN3Rr7h$ zSMT||SAM(dZ#RxU3*VUx$1_#;(LAd*pLV?Wl47UwW%gx>_LU(S8Jf%?Em~{sL#q~x ztfn{}I411ohAFJO=qa=O^pc^_XMu&;QlBA4Sa*lRnJ$}R%bp4*;lRL;KUA(i<dVb7SwG0^ z#!Q(AjjgP3EAOYFWoY~%JdW)*$&~D__HZu`a>VO*&%Q#6I1O{8YdzISEak52F~0qhm$r;pg<^Pb`> zog->qAK@8Qb7_rPXi9BtI|U9&-%e=d(uBN~G~~5vE>l6uZon4WPX#e%Ab*Xw&An*> zNpke*3O`W|n$t}|Loi=y&|&D9TGf~n4WW7zJoDDv-y{tw*aprmoscZ;=#1UlIDLf` zRB9P-yRE@j5ChF?4J)T1XL9ECAI&}M9SFce+fElH+JsaWASAuUKE_SLTgo7y570 z#pizsA@98byIiv_So&L@&iE|}3w9G}qG8{shO#JYO1##@oMJ#XDNK%b73Mn>{bvgK zpTepBU$V&GjuM@sU<`yWcI{4`)-O05%ALIi>08iVoIx_TRv+&)^i0;)2urV5@}ndN z-jLURz)xeO)#5_|k`SMR{E4q@_a#S5*|(PIH`V&t`dgS%9#=eBLoY^`uz?o_qpauK zzOsI*n5v!a1ry&)qSoSN-vqVIWp1IyuiUnyyh0(Ut3vZW7TKV+8Kj=Ehc(1|6GD6$ z(~OzbLftuJPWJUY%Mk&^5g(LnN?Z@qY7K)-W-m)@RK@<=^+WmsBD6l zVWk9U*9CnW8y~0DcQ#zvM1hUMCZqwjeu5aE7ZbZ^D;I*km@j2C_L;xj`*M6lT=z{E z-}o5Jf2WPXqt}CArkA`*E@-0&`PzL8&};aJn^e}(_O3*G*sUhXen?*W!T3@#LNROfOc_shwI?j7~ycrvM;qGW`{xSE3N6 zbs&ORF5#h)uZWF>RgLn^RfVN1DLIGSfBOVTW#DJ~6PJG+~2 zSqRc1a@hR5`AW0GvMfUCY*muikitY5s?dO~bo}3MFxZD+k?|W)c?xjtERAa$1Na4p zYjNEKs>RLmLNB9=6tf%-O9$fhqo5lrwNIDc&hRXFvGB+I}%-G^N~I-=1MY5Q_MqxZt^nVkCoI@W7dNpeFZAb& zAAZ1<@#_7?3K@O=mC&%hnj}9-I>^_>SDvv?$KI+c<1J;^$SV$|{e#u6^7u-}W(IQ= zz0cytjM+wi7v_>Q0T~*{8GlN~|8F^6isWio3=n>B^_OftSlO?8_|$X?&jlA2(?-?# zm;Sb(f6yMPN;!~ur(&vVd13=eQqMR>t6<2)XZ@V=2w_1N)N{N6iWg1(UcpKyi)_2} zS#vP}7@$t8`Fg&WLn@xyh`0u8dL_+a=4O(|#ObQoZMq}d?8$ccVvp-57gOv$*{IeF z8nN#iKJ8@+2+bWFzB}7gKQ_=8P9IGU%&h&ckT!BDLNEJJ4h1Y(LC+o5@0*6b$MVW&H~}+wHp}d*+XMe z>sC7Qbop0n1rHzvfN|H1icRKLN|%Uq>}*_SRmX?3rNEG*f@Fbi!OkhGZU`tZ~d4b>xX}#Jp8kz z!^1Z{P#^EJGSn25>O4C>>}=j<;#d5-I3_!1n>F4?bU|t8QF5JWhbXvCq98s^Z|TV$ z=*R`&H15NIizenp8!3(%O8sbJ+O^nADutpy?4}9q#CBfP9CZ#fFDHq!hMgI;?4FaQ zt)#xFfR=?Cwz$__R+d8ap!$^_@0b2BfV4IQ@#x3)^Xi&qejZ}f9v8zIk)7>^UL`(- zq~*TZD5%$M(M5p96N|8Z8~9n0BN;x&aheB3Pu$pO%UZ(o;wST411|?r+2+@IrEJob zQUx=b4i2}U?;em3#wBcp+XdN|0z7%+PA?5R(cY}gtT+QFk8sHg6XE);Yb-%Z$xAiH zdaNs?Ind$U2BO&kSSc|qB`k2-r%~RfYu3X(%U9ZCLd2umT*L4>;J#jfs97WQ zZVPG4oYrsyN`PpmBFm``JeI|dPYDiqgIo>USKB;47xZ5nHvd#M|1&xK*ipvf|FOMFUoHh6F z*J`4B^#!Mzvj(+xX+G*tc1P*&^lyoTz&}C(A(np%lpKYBW<%B4D!3T9aW2qe!JnM8 zUbOe|1N{E0Os=i>vHlt;(F+D2B0Q;@K^Z;nkNii!RW;J}CLro)G``Rs#tDe( zhn0@A%3Q4Rp+x)3U?;eV2XZvkAy)e_7bS;EVYIh+(Wy81#oE~BJ%weLQLz_y!6dAD zy+pobD2;hk?Yq2aS*@Tti4T~9Nfd6%uID>hC{3N=8t#^7R)5gxQo2rsL23^TtJjRz zO$s%+7G;L?i*~PXc8c1Go#+>Z(oZ=S{@QYCCt|!}-qf#J4*S3f*^(d%;@+$&ni}bY za@nGdlg2^haRGXs!tw@BrX}doKAqeKDhx$C(c-+L%(OhW47m3DKbl*Y?9RQ`MqoPS zvR`VT1^<@7{D+f`jVDHQNE5E1BIpoKv*$lQfYm1Ozip~b`*gpK!X)cXLhYxRrA2ar zmK^r>autvi)U2ntGO@4SasA>aiObc2b?j8(y+~{4KBrNpvu;CNSMKsfDDj3j`S;Wt z@9p1)0pj$~1!k}9O3sjN5*+fEDnf|M5qu*SbGCPv{H7<;vJ-vikw{Ie4^90$+%CT8-(5OwU7secp!!)ct36d1jnqR| qY}3V8C(B@Op**hqZw%69F8GfJ#Bn_n-Mk|ge*F)>W&QjB diff --git a/man/figures/README-unnamed-chunk-4-2.png b/man/figures/README-unnamed-chunk-4-2.png index bdadcb174690af0bc764444c5e0faefeac5d0728..20ecaa504398c336e1d78cf1437841e2e92ab2e1 100644 GIT binary patch literal 6655 zcmdT}3pkW(yB?FnC=!V%DJ7FgtwhG@Q$&QR(7~ybAw(i)gQbH-jdODBLo^Xuh9P27 zA!Lk@%s4FPQ)Y~_9KQXHYW=JB-q&9LzyE7r*Z!_|=9-!Jeedt^Jooe5&ojSaP4orV zO0Gp95Q4`IbWb4=NDzVG`UABF{>Au|5-y9!(njnI~fxR4~8-4a4|L}7`wnD$C&UAw+aWN;8u5X z@HjijxJU+$3=ari?PBcWVoY#x$#Kbf=aSPO7#K+S20?q7a&r115{X2{A;>rkIT9W?a%3c#44)R> z0g)jF8G_ysjNd`;-a!zJMq@-`7?C&z86J@g4kWya!GNHyuCD$ZmwpHua++eXSo5CO zATkajN5Y#SMkEIYUe%ui!H^J)1n+>?Lf}zH8TfJXUpF}CjzFw`!+CMlxDu}*5Sz~) z*VQreP9E=EJhMeVv6?NS6Q1jgQ?1>uewK9Q(%rWbzaE#F#XN8m5gYpD94g}zX~!RD zLkhMxK~RKcd~w;#=p~PS<$AMgwcI&1Us4Ppo2aXM7520@GrxtSRH*( z0E4un38O>u002tbv`3;3(yp(^ydjs*-FWb4ZcVhYN0F;?NC{h=+ zfk*%`yLw}4PYM8V%;u9}Yl{f09^OMS5427P(Z*>S90qwLp4rDE9 zbWBDpRBByVkpI+v3_N%1hDJ3nJ@46h4<kQ zal&=%&08EuE!X28&RV`I?rj{tA%Q^-he5wrI<+o*!{MQK?vYk^TW@uchyGH8=$1>J zi>J9onLV!Nq30cTFyd=|53VBs;VmV=ve{M2t~PKlJAL^RGrAmEICsF)ugQSF(BM9Q zVOgITX1p%UvI;uDGit#e>_qzx&V30tQ*Y2RlHOP(pH)aR!Xg#TVpe2pQ!C1#E{LFM zVYSN+zQ~93rYVi@)4SV}m5~iHv3-@4DkJooBk%)_!}8t&ZgQ^`TZ@fFi7Fslh0$j@ z7I^;k`KKdz&~@zXKN&{V2dzA3D})^FKk2gX<#@-U%-*xkN3Rr7h$ zSMT||SAM(dZ#RxU3*VUx$1_#;(LAd*pLV?Wl47UwW%gx>_LU(S8Jf%?Em~{sL#q~x ztfn{}I411ohAFJO=qa=O^pc^_XMu&;QlBA4Sa*lRnJ$}R%bp4*;lRL;KUA(i<dVb7SwG0^ z#!Q(AjjgP3EAOYFWoY~%JdW)*$&~D__HZu`a>VO*&%Q#6I1O{8YdzISEak52F~0qhm$r;pg<^Pb`> zog->qAK@8Qb7_rPXi9BtI|U9&-%e=d(uBN~G~~5vE>l6uZon4WPX#e%Ab*Xw&An*> zNpke*3O`W|n$t}|Loi=y&|&D9TGf~n4WW7zJoDDv-y{tw*aprmoscZ;=#1UlIDLf` zRB9P-yRE@j5ChF?4J)T1XL9ECAI&}M9SFce+fElH+JsaWASAuUKE_SLTgo7y570 z#pizsA@98byIiv_So&L@&iE|}3w9G}qG8{shO#JYO1##@oMJ#XDNK%b73Mn>{bvgK zpTepBU$V&GjuM@sU<`yWcI{4`)-O05%ALIi>08iVoIx_TRv+&)^i0;)2urV5@}ndN z-jLURz)xeO)#5_|k`SMR{E4q@_a#S5*|(PIH`V&t`dgS%9#=eBLoY^`uz?o_qpauK zzOsI*n5v!a1ry&)qSoSN-vqVIWp1IyuiUnyyh0(Ut3vZW7TKV+8Kj=Ehc(1|6GD6$ z(~OzbLftuJPWJUY%Mk&^5g(LnN?Z@qY7K)-W-m)@RK@<=^+WmsBD6l zVWk9U*9CnW8y~0DcQ#zvM1hUMCZqwjeu5aE7ZbZ^D;I*km@j2C_L;xj`*M6lT=z{E z-}o5Jf2WPXqt}CArkA`*E@-0&`PzL8&};aJn^e}(_O3*G*sUhXen?*W!T3@#LNROfOc_shwI?j7~ycrvM;qGW`{xSE3N6 zbs&ORF5#h)uZWF>RgLn^RfVN1DLIGSfBOVTW#DJ~6PJG+~2 zSqRc1a@hR5`AW0GvMfUCY*muikitY5s?dO~bo}3MFxZD+k?|W)c?xjtERAa$1Na4p zYjNEKs>RLmLNB9=6tf%-O9$fhqo5lrwNIDc&hRXFvGB+I}%-G^N~I-=1MY5Q_MqxZt^nVkCoI@W7dNpeFZAb& zAAZ1<@#_7?3K@O=mC&%hnj}9-I>^_>SDvv?$KI+c<1J;^$SV$|{e#u6^7u-}W(IQ= zz0cytjM+wi7v_>Q0T~*{8GlN~|8F^6isWio3=n>B^_OftSlO?8_|$X?&jlA2(?-?# zm;Sb(f6yMPN;!~ur(&vVd13=eQqMR>t6<2)XZ@V=2w_1N)N{N6iWg1(UcpKyi)_2} zS#vP}7@$t8`Fg&WLn@xyh`0u8dL_+a=4O(|#ObQoZMq}d?8$ccVvp-57gOv$*{IeF z8nN#iKJ8@+2+bWFzB}7gKQ_=8P9IGU%&h&ckT!BDLNEJJ4h1Y(LC+o5@0*6b$MVW&H~}+wHp}d*+XMe z>sC7Qbop0n1rHzvfN|H1icRKLN|%Uq>}*_SRmX?3rNEG*f@Fbi!OkhGZU`tZ~d4b>xX}#Jp8kz z!^1Z{P#^EJGSn25>O4C>>}=j<;#d5-I3_!1n>F4?bU|t8QF5JWhbXvCq98s^Z|TV$ z=*R`&H15NIizenp8!3(%O8sbJ+O^nADutpy?4}9q#CBfP9CZ#fFDHq!hMgI;?4FaQ zt)#xFfR=?Cwz$__R+d8ap!$^_@0b2BfV4IQ@#x3)^Xi&qejZ}f9v8zIk)7>^UL`(- zq~*TZD5%$M(M5p96N|8Z8~9n0BN;x&aheB3Pu$pO%UZ(o;wST411|?r+2+@IrEJob zQUx=b4i2}U?;em3#wBcp+XdN|0z7%+PA?5R(cY}gtT+QFk8sHg6XE);Yb-%Z$xAiH zdaNs?Ind$U2BO&kSSc|qB`k2-r%~RfYu3X(%U9ZCLd2umT*L4>;J#jfs97WQ zZVPG4oYrsyN`PpmBFm``JeI|dPYDiqgIo>USKB;47xZ5nHvd#M|1&xK*ipvf|FOMFUoHh6F z*J`4B^#!Mzvj(+xX+G*tc1P*&^lyoTz&}C(A(np%lpKYBW<%B4D!3T9aW2qe!JnM8 zUbOe|1N{E0Os=i>vHlt;(F+D2B0Q;@K^Z;nkNii!RW;J}CLro)G``Rs#tDe( zhn0@A%3Q4Rp+x)3U?;eV2XZvkAy)e_7bS;EVYIh+(Wy81#oE~BJ%weLQLz_y!6dAD zy+pobD2;hk?Yq2aS*@Tti4T~9Nfd6%uID>hC{3N=8t#^7R)5gxQo2rsL23^TtJjRz zO$s%+7G;L?i*~PXc8c1Go#+>Z(oZ=S{@QYCCt|!}-qf#J4*S3f*^(d%;@+$&ni}bY za@nGdlg2^haRGXs!tw@BrX}doKAqeKDhx$C(c-+L%(OhW47m3DKbl*Y?9RQ`MqoPS zvR`VT1^<@7{D+f`jVDHQNE5E1BIpoKv*$lQfYm1Ozip~b`*gpK!X)cXLhYxRrA2ar zmK^r>autvi)U2ntGO@4SasA>aiObc2b?j8(y+~{4KBrNpvu;CNSMKsfDDj3j`S;Wt z@9p1)0pj$~1!k}9O3sjN5*+fEDnf|M5qu*SbGCPv{H7<;vJ-vikw{Ie4^90$+%CT8-(5OwU7secp!!)ct36d1jnqR| qY}3V8C(B@Op**hqZw%69F8GfJ#Bn_n-Mk|ge*F)>W&QjB literal 7054 zcmb_h2|Sct+aEP!8Dy^>5)W+%$!KZ{-4&WNcv2)4qA|!2vW!r-l8BU~Mi|LD(So6D zX|ivVtuh%|vLwbbmN4eKM^Eqj)cgLv-}ij)d;gAepL1N-xsG$6|MkDF+!1X-sPon0@KGbE3xi=`Fgy%{fnlIJ28PGO@HE)d z8CZFc0RKS?2-pjt(E{jj0edRcfm&z*do(&69o__KLTVTop0CY+phgS^kH_Glnudvi z3KPeFh&Ws{j!482p_+<|uCZU9)Ly{ep325An}@98mnY)e=TAVx$1w3UsPG_VNRx<* zCK9PcsEUpzMnjDnA{8qAAt52*Xn}D4g6zY?so_oR=w)NkI7p7K6HTNpYt%$j`=e{1 z!i&McVwM*ggNMc7F)?_2ObjL_2C8W>G-eEwmzoBn+6z#j)e&)!B`P#U4V7BcPwnSX z*;Fc!;HZ*X;6t_@-0K!OeT-VVzK(E#C~dYe+^V1v;F-%-k{qQ zn`+N)3THP#+R!SXnmy<1&ZFUZv>3=3j~T-^3r)~ZUADtt0*?pH2Wj($t<66}Ut7fU zpp7>Swu;XG5vcaabb`TtJBU319QA)Nni!d&&>nEjq&|BETI7zh^5>Q~wU{di8OM%c zO`R8e6If3v@t2f|3PMiA%egKIUQ)gho~`mS=VT*`_9cbn4>sH|ZXs+4QgxZxEnmu> zdK!p|Pd1*c_iI9*4$xP6<*;W|6m|~*g00G1c8dS~*Xl&KYPW*Up7JOqUUT=s<`Png zFHgGx9k?{?R^2%FrPi}~y3nn_a53wHx7X+R1UL}cRM5BiB5#zQk$TN;&opK6&4{y7 z(NJ`%8=R1c2Ur)lp6LGoROkdvcNQP^Hkk-=d#9J~3 z5!lpD9}rW`lH$DiAoL_@?bvTztxv9_<~QG&ZT0*ne8Oi1fRhtL_6D)vBT1vojMSGq zBlj{oYqgWM>n^qeh@jo-^feDj53md&t<%RJeNrL373rW9uutY&A+o%PLf(NdyQ%K+27)3=v&6rgLB`EDPP_X&QR z#NSYRaaZTBbmL6Xf`z52qodd&&ho zWr4wWS}g}R5>CHckOI{&Q6^8qkHLV?FNCvUV4b(rQ33LXUCV8NA@Z`_EAXOeH8bI( z=h8ETwiu9ii6WCTLecVh;NxN$+xNI7#I9M|%MXZGoIJ+sW)t-LUB|Ai4f%WcIb zB`rFR1JT_dJK6p>-|0WOsC7|x-BkK6`@p34!|`_oaYyb%Qm`-E6;%_t9n6Bs`{$2u zV-A*-9%oQMUqLXedUiBG^yCS7VfoK0gxgkG4)ON}Y`55Ly!STs?2s&=QQ;EncI-o1 z+GWZgTHvOkclGXW59D(7Wb^f`Et;R_)%@c(RyhRQg~+1}g!ZU%3f3zOfe=5G_D%W; zpb?s0>b}FsRuwS0spI(Uk+8ZDP(A$4J+(E*>f9P$P6~wUuUJ*yV}B9@>rG@cf`di(R0K%xMEKFWw*vqW$z9}DPhjuJPU zOkj;?H1$O(da!Oj+$=Gw|J*Q1ua+eGQf$JM`!(%cd;9M*wazDBL4s?~IU)4)7#_w~b$#8}t8Omnb=k$*DZguQvEr3MUJm5~ zJn?{|I9Z`y*mc0RC+~*Z&b3=LGHpWdMz21`Xh$iE0NjUYY`R94*kIq-sET2=`Q)|M z$zIFFr@qbO@_=T7pAu@!dVr%hyg5o!a<#|p*J@?kr{pD3QN5z_tRWo`^*MQ^Qj*ii za1&*zQsHXhedAS{i|(7?QC=5_ZRIN3Wukd3aKLCH;n6Whh!$^fFXO0W+i#L6argy6 zI1buQhf+iuHo^-!BK0e*WG|Fd~X@>;u7{UR4``0*_ZYa+N`|Rd#nR!P9^AiIirXz99<~XuB9a zE~KyrIl2AIxHb6YWc`X;cvtpdK-zHmy=S@;_4FpgyU)*W;vYE~A8Jc?(weu-9H-p^ zd@PHo0LASQ-KeXa&}?fAUcJA|q$Kb(RghjvoE}rf%Z`okaocp1F(&0v+#@lgsj+1l zwZowN?vSs?!0w@sd~|>It*7RPrby*4Is~~Hb~ zs7|y>=5H!P5#CZh5tQ`X@}D33R+J>E5c0K?k>oWfY}3;R6z+USGu5}}#q77SJ4pG_ zNVwjqV?}~Sj5u)Fbf#Lkm5E0+XDBU|bvm2!*1-FHhl1*G+-!!mkixL+SXwd0+Ad=l4#4oiO%8D5c3_51>D68q#w$D=b}9-7E|1+=e%sgC^T&wL;h_4a<5jb*3g~lN-kCB9t>@7|pLNhSefZF@P8w z3+nqidgNN3Uz6lxXR$r?#OS=RflDL6L{CI2;>FWAEZjDfDflq`|5~o(P ze4+nM)eEf5wG%1YLErB7csbmTTFrU&j`HH!4T@^$t~Z-c&DVKGG{>OM6D-b$a9MGF z8ObyjsMYS{G}aqm9kr>}XCwM%6U~}c>b_)oBhkscNH(ri44QG(UAV3p(;h(28w?T3 zRdOlx*s@7h+!~Mi2he2ODid_%e2@x@Xl#X|l18{%6u1HtaO7hiwDR?sqDE9-e&cE% zc?IPm^||X$7wp2OSEID&9Hd0zL++f|!+H`ejNJL~Jb^jQ+`De?=_e zcK^>#7p#Mz4vqd-#7_(E`i@ysaK+(ElusyOq*>@sufE%qPV}dah~BcmKJ9unU^;33 zPiV{Ksz`L$GH!a2zLdZlM@WYIez+s$%zx6z-q;O)@&%bBVJX?Dh#Q)4#a>qu=IvZ`0=$j}r# z07-(zFNDd;$3ySt1awp$WK=}t@#a(ULGmK55<2T`Q!{d{jQ$~&P3b7J+Dg!n&A06e zF59&U!g3}8(9J8M$jG5O{Uzm4+JxH=95%W!h7wK@$th}&lG#;q`Ly92f(ta(+TmU)l*xbOrY|1`Sw5{ejf<}E3t<_D;=sW0OMCmHrY)cMJvQE^G~$8S%7c*q9sv zbVWOLynR}&09#;01u)s%`%Eq1-i7_`2}?Fp#Dcc9yLPMbahbX6;(^l%kNjH;N2 z2g=jkcljAVkZ&Xxo(R9G`QAOtY?6ASU zYY>2o+uz!4@0ggu^mg0dT?IKN2AoU!*0@AXtMHH<9ktqoICbEV3F{1WL=lK6?gHgY zT=euvlJ(Nr=~-%;V_CO;uRB^$u5Hg#=A`tUO=@*U40ukaf2UmoM9mT!gl}}xwsQ%k zDU_Lt7e;Ps{7?aP`PTMz9J`P<4Lw22k`L$F_2?Fiv`r-bG6`T2XjKR?udwU-FkhOa zj~KkM;kKIv)p1Xy(nUn0C`5V3vm+%A^$!+1LO8`e2C9n#;f)A*;x-ODbb*o{qOGWR z_W5Ub?jBj6hfw%@s==HeE&mx*kvIHHT>MM)@>2}8cDT_DR_q(s_tdWvm%Hn ze@Bu++`;g&;BR+r+*ZPIs!t$97Aa@mf0noLfW&tueIgEd|BD{Fm0+%zHTlu4>o!_L z57d@oyAuYT=Vd+o8jdSK@GvTuz_bk1AQHPaG};_W-+0B&T`>*BKN=5-mHqfh2bQs)Qd%WN%HS7pmnc> z^Iit(M|ccv&hpv$-`R(sA^wPwAx`>d?ELS^>i;A@zP(0mtQfuY{G_z3{fa*m*q>kV z@b)r+LaYBmLJL>)@Yr^-T|=+RFDYc}o;S=1?p^dAFDK_a4vt|8c)Lyjgd&N2h(n>g z*UqC*dVTMG{l+Vlw@nUJHDMp(ePbYhwN;ByNSeLX@+`P(iZ)}INlJ5E@{GJd>kD#+ zvfl;0REOE{!me%VEDOzJqfO)E6wrVe%`!Mbob~k^fbv-smY=T*!!<*W7b5R6yO;{W z-fo60>0^vyYG7i^%~JimlrD8WQnBpVRGNuo1#y~tl)%AAuZyK+qeF={n?Bh_0=Qyj{Uq)-(_l&&u`Q;k@_ zkIXbtPqeVe(^-weT--t^KkZ_cdq9ex0*O>13Iqi$FYdEo*7$AGAo$EdVxOC?Z-jz= zK}i&_&%%Q})%6T1UsKqcBY5FCpQKj;bh-(A^zg@Qa!GzD97?e^g5;`F9~9)V@-@s= z3FYg34MVk9R#tgac655`0tHWB>MzZ%HQjv>I(#4J5+1cBr0`w2ciLxnbIv#lYxDQ> zv&*lM^ApudPcTsC?PoZVwQyDHE#WBbEt zWlErRv0d`q`=&crJS7dq%F{zBE)CK?*fT)9xO{Q;4R9toNCUNXz3@|{feiOOaVufn zwwHdyeLKUIb~uMeQCwupK&|bS39olqWW{Z-WG0)%Z@Lm%v0wEI#~Vs>*C86uijx>% z^y<<`DK&4t7|6(HN{_zt2wfA*^2=2f@JEzH9+pKdV^dwV6auKdAP?X8&ZXn9#e3AxnREw^;TFPas?#m^&z^Zz8JBTlvgkxC zsl;mc{r$PIkMC2g-DYzZZ!XSf#V%bHvQBiZ?Q?D9nTG^-md}i~QYCzEPfK&Y_Jr63 z;pTg_S+yB$pS=o<0~ZWiKj73-Mm7?(Vh0Kg%hn!ETUX;8G0QE^q#r`)xn}IX`+Rz~f!so%L>Rb|S|iC~n9c9KCUFarC}^foP{EG~iL# zwyoP>ypAs2`6N&{8xC#?hr0*JsSdaud%`K2Zq+SY8Zc{S5(#$QP_`r@Xt_93#zxa$ z7|3$sk1g1{*)6O7bpUftXR$E>~Z++tFsZ0O~5r%e}dYF`~G~+D< z-lE~X-;@A})sTXSYvK*~^bB-Qs~@yf?t8yiVl98PQx6Ibx=6Yo-=n}z+VDCzMyMbl z^Tv%)N5QHWj#3s~QQdBKpThWS0a>j(rWWtJ?wrH5YlQe$X(+m#-_N=9mkZ6G`QX3a zV>I}eI13$|=sxFBu+NBBGODiXAZQelp*z>cR9u|QCA1y-R-l`-*<2R!`kbWC-tw}+ zLiN;Cd|i3^y0GigXD@F{07WrrpQhJ;tG*TDUS``RN*i71+C6hEbxAjtw?0T#@77MS zuWw#F+qBk5YPUjdgzkLuYn_wLK=rpchN*#Gt zC7Zt95i&4J9UB!7c{o%Fnu+FL*=Vy`I8UvJV%b5tjP8kG+$pe6+-Wlo=G30;yQ4RB z@Dm3~mKVy z^=z|-#1&!q1zky%9hMfy6@Hx5U+=YkzUBJcy#by;VCQrZf!v+Q|Gyg6$m~GwK6~(g E0Qj`l%>V!Z diff --git a/man/figures/README-unnamed-chunk-4-3.png b/man/figures/README-unnamed-chunk-4-3.png new file mode 100644 index 0000000000000000000000000000000000000000..d9fd18d058f93e1494bb15bde9dab999fc7a8e88 GIT binary patch literal 2985 zcmcImX;f257LI@*Afa7iNDFN%q9{sQai9rH!q$qii3AmeDCh$mNg5MYflNek!G_oa zqC}I2-Hytt5<(jWnGt(XAtWxW0n!q~CP~B)h}m90m^m|j=EuxAj`Pl|S5@~`y{fwR zyWg$z5n7 z9^Aqqa5w}27aR`20Zbe$WQu|L5df@!A0`vv@c0XQD4 z7mImt7vk|CNX*2Ed4QM)>&0RSf(OAONX(n>&FNuTj&)fuyb;T9ckHJk5XjcKvY?G} z`v?MI^&~jZFDmnzeDHkw@RJ1vyBo@?nSvvj#P5@xlCS+i0)063*`cxI{@%!7e0THc zkG2ZW-N}{dnYe>) zj1>*W)RX6+h5-FZOD>lV4XwFj%D6nbb&rLK!zpXEa&Gh7+W?B>X(1#tJ7< zt=Z0PjHRJq;4{Q?K^f5EbQQz$o$WkIAl|E zqD-7(#tFZ#%H-Q+n&;}g_Jyzly#Kj(m+3ftd;F7)Y}aQU;M<@3R{BZmJ^xhIYtx>Q zOD=l45&m=a7Y}tpc%e<-pZk9}^kdNxbBVB5)i)wMN+f!4PWIX_i*^-hXLhM3Ds&@P z?#43|F9v}ARBFh+djyW6k?|XAEgu7NqXvDHWxE_a+D@19JGjZyFKt<8^wk`}7GiDw zoO@jyl2TCNXj38B<%eZSTdC*P!zhk+hF#>tY}$XC{LCyySx09#f3`8gHFB*;9nYhW z*M#9VOh=EtUgzaeC_0ZRNxIqTm$BzIHG;o^dx4@%tgLiX-6A|-zWv1T`FJc^E#${V z9f0lEXa7gyIuXCT0ee}8zV6;eLs``U7t&6YY%NlE1X( zmFF1QDh;{Q<4p8aRaVmlyc^xB#Jbs2v={rO+FNn@_`|9Mr9ZpTT&rF9BfIT-(L`UP zY;?$OY+*ZRPXkeZrt$~8XJ!J3K1k3Sqme^K$ncAqHuPqqs8bqNKxi44kAiivgo&(y z@o$mZ&6K#GTe24;F&wf>0 z1)-=vBg7gIZXR_J;!&=83qD8EkV`@cJ`D6W#+yMu8=`fA^i-5JF4?jLV(T zCo0%UPNqIMlsthNa_KjeP5c*Ke2hUpo-AFKk7e&p8O%`}rG`YqCp*^taG!!i>$iVN zTr2uP__~(TLK}huf32uXe;7KEHS#4k!ZqI9DdrAUG`M`izJzR5GrU)oj-vnlfDUuX z=pSVG)qI$*{8}^tmIZ?TQ zcaltR-4sQ#$5kX7vA90~MO(PbWZfrYOH4nw~dpjYhz*L%6? zH8pKZ+9Wv^k2?Ltq@F=+%3#P$oiF~+0~*K8kw`pPmkzv}64#lNoSH96u1Nzew8`%< zZ@A}y_nCZ-jYm$CZ7{?2Y@DM*F^Mv~*n0ZS?QV8%Lt?zCCx%`UagC$!Py%#n+xq?WhueHHEki!kDTigRzAC#Ktpa+?ult4ljbe(Sn6H#= zefe~Cx+Y@-yTw>=RsfP>oh6e4ERIXRRO86WFQQf$GtD_R-qYin1IY|`Rkq488Le!8 zEji|efl@CvYI%4tU7yXZS|rdk1xz~M`uc34M=HZV<5OLSL=O#u1LP2bF z6Sn-;6L;IG8j1Q^#~pY!kI~61cA#*)jX&uM<*I|Q-wd5gARDv(#uU(2Jo>(|_%B2H zpp&2TaT9CUWs^P`z4I7XHA_s8ZCj2)gt<^OR~d-A-Ho&3t$Hm_m9foqmrf zF(&rfdOb*=pVK6~J6JO;?t0PsZdDJh3tmA=2(Qa0Kgt=%iz_+$LiWF3u#C27gP>q{ T5)W+%$!KZ{-4&WNcv2)4qA|!2vW!r-l8BU~Mi|LD(So6D zX|ivVtuh%|vLwbbmN4eKM^Eqj)cgLv-}ij)d;gAepL1N-xsG$6|MkDF+!1X-sPon0@KGbE3xi=`Fgy%{fnlIJ28PGO@HE)d z8CZFc0RKS?2-pjt(E{jj0edRcfm&z*do(&69o__KLTVTop0CY+phgS^kH_Glnudvi z3KPeFh&Ws{j!482p_+<|uCZU9)Ly{ep325An}@98mnY)e=TAVx$1w3UsPG_VNRx<* zCK9PcsEUpzMnjDnA{8qAAt52*Xn}D4g6zY?so_oR=w)NkI7p7K6HTNpYt%$j`=e{1 z!i&McVwM*ggNMc7F)?_2ObjL_2C8W>G-eEwmzoBn+6z#j)e&)!B`P#U4V7BcPwnSX z*;Fc!;HZ*X;6t_@-0K!OeT-VVzK(E#C~dYe+^V1v;F-%-k{qQ zn`+N)3THP#+R!SXnmy<1&ZFUZv>3=3j~T-^3r)~ZUADtt0*?pH2Wj($t<66}Ut7fU zpp7>Swu;XG5vcaabb`TtJBU319QA)Nni!d&&>nEjq&|BETI7zh^5>Q~wU{di8OM%c zO`R8e6If3v@t2f|3PMiA%egKIUQ)gho~`mS=VT*`_9cbn4>sH|ZXs+4QgxZxEnmu> zdK!p|Pd1*c_iI9*4$xP6<*;W|6m|~*g00G1c8dS~*Xl&KYPW*Up7JOqUUT=s<`Png zFHgGx9k?{?R^2%FrPi}~y3nn_a53wHx7X+R1UL}cRM5BiB5#zQk$TN;&opK6&4{y7 z(NJ`%8=R1c2Ur)lp6LGoROkdvcNQP^Hkk-=d#9J~3 z5!lpD9}rW`lH$DiAoL_@?bvTztxv9_<~QG&ZT0*ne8Oi1fRhtL_6D)vBT1vojMSGq zBlj{oYqgWM>n^qeh@jo-^feDj53md&t<%RJeNrL373rW9uutY&A+o%PLf(NdyQ%K+27)3=v&6rgLB`EDPP_X&QR z#NSYRaaZTBbmL6Xf`z52qodd&&ho zWr4wWS}g}R5>CHckOI{&Q6^8qkHLV?FNCvUV4b(rQ33LXUCV8NA@Z`_EAXOeH8bI( z=h8ETwiu9ii6WCTLecVh;NxN$+xNI7#I9M|%MXZGoIJ+sW)t-LUB|Ai4f%WcIb zB`rFR1JT_dJK6p>-|0WOsC7|x-BkK6`@p34!|`_oaYyb%Qm`-E6;%_t9n6Bs`{$2u zV-A*-9%oQMUqLXedUiBG^yCS7VfoK0gxgkG4)ON}Y`55Ly!STs?2s&=QQ;EncI-o1 z+GWZgTHvOkclGXW59D(7Wb^f`Et;R_)%@c(RyhRQg~+1}g!ZU%3f3zOfe=5G_D%W; zpb?s0>b}FsRuwS0spI(Uk+8ZDP(A$4J+(E*>f9P$P6~wUuUJ*yV}B9@>rG@cf`di(R0K%xMEKFWw*vqW$z9}DPhjuJPU zOkj;?H1$O(da!Oj+$=Gw|J*Q1ua+eGQf$JM`!(%cd;9M*wazDBL4s?~IU)4)7#_w~b$#8}t8Omnb=k$*DZguQvEr3MUJm5~ zJn?{|I9Z`y*mc0RC+~*Z&b3=LGHpWdMz21`Xh$iE0NjUYY`R94*kIq-sET2=`Q)|M z$zIFFr@qbO@_=T7pAu@!dVr%hyg5o!a<#|p*J@?kr{pD3QN5z_tRWo`^*MQ^Qj*ii za1&*zQsHXhedAS{i|(7?QC=5_ZRIN3Wukd3aKLCH;n6Whh!$^fFXO0W+i#L6argy6 zI1buQhf+iuHo^-!BK0e*WG|Fd~X@>;u7{UR4``0*_ZYa+N`|Rd#nR!P9^AiIirXz99<~XuB9a zE~KyrIl2AIxHb6YWc`X;cvtpdK-zHmy=S@;_4FpgyU)*W;vYE~A8Jc?(weu-9H-p^ zd@PHo0LASQ-KeXa&}?fAUcJA|q$Kb(RghjvoE}rf%Z`okaocp1F(&0v+#@lgsj+1l zwZowN?vSs?!0w@sd~|>It*7RPrby*4Is~~Hb~ zs7|y>=5H!P5#CZh5tQ`X@}D33R+J>E5c0K?k>oWfY}3;R6z+USGu5}}#q77SJ4pG_ zNVwjqV?}~Sj5u)Fbf#Lkm5E0+XDBU|bvm2!*1-FHhl1*G+-!!mkixL+SXwd0+Ad=l4#4oiO%8D5c3_51>D68q#w$D=b}9-7E|1+=e%sgC^T&wL;h_4a<5jb*3g~lN-kCB9t>@7|pLNhSefZF@P8w z3+nqidgNN3Uz6lxXR$r?#OS=RflDL6L{CI2;>FWAEZjDfDflq`|5~o(P ze4+nM)eEf5wG%1YLErB7csbmTTFrU&j`HH!4T@^$t~Z-c&DVKGG{>OM6D-b$a9MGF z8ObyjsMYS{G}aqm9kr>}XCwM%6U~}c>b_)oBhkscNH(ri44QG(UAV3p(;h(28w?T3 zRdOlx*s@7h+!~Mi2he2ODid_%e2@x@Xl#X|l18{%6u1HtaO7hiwDR?sqDE9-e&cE% zc?IPm^||X$7wp2OSEID&9Hd0zL++f|!+H`ejNJL~Jb^jQ+`De?=_e zcK^>#7p#Mz4vqd-#7_(E`i@ysaK+(ElusyOq*>@sufE%qPV}dah~BcmKJ9unU^;33 zPiV{Ksz`L$GH!a2zLdZlM@WYIez+s$%zx6z-q;O)@&%bBVJX?Dh#Q)4#a>qu=IvZ`0=$j}r# z07-(zFNDd;$3ySt1awp$WK=}t@#a(ULGmK55<2T`Q!{d{jQ$~&P3b7J+Dg!n&A06e zF59&U!g3}8(9J8M$jG5O{Uzm4+JxH=95%W!h7wK@$th}&lG#;q`Ly92f(ta(+TmU)l*xbOrY|1`Sw5{ejf<}E3t<_D;=sW0OMCmHrY)cMJvQE^G~$8S%7c*q9sv zbVWOLynR}&09#;01u)s%`%Eq1-i7_`2}?Fp#Dcc9yLPMbahbX6;(^l%kNjH;N2 z2g=jkcljAVkZ&Xxo(R9G`QAOtY?6ASU zYY>2o+uz!4@0ggu^mg0dT?IKN2AoU!*0@AXtMHH<9ktqoICbEV3F{1WL=lK6?gHgY zT=euvlJ(Nr=~-%;V_CO;uRB^$u5Hg#=A`tUO=@*U40ukaf2UmoM9mT!gl}}xwsQ%k zDU_Lt7e;Ps{7?aP`PTMz9J`P<4Lw22k`L$F_2?Fiv`r-bG6`T2XjKR?udwU-FkhOa zj~KkM;kKIv)p1Xy(nUn0C`5V3vm+%A^$!+1LO8`e2C9n#;f)A*;x-ODbb*o{qOGWR z_W5Ub?jBj6hfw%@s==HeE&mx*kvIHHT>MM)@>2}8cDT_DR_q(s_tdWvm%Hn ze@Bu++`;g&;BR+r+*ZPIs!t$97Aa@mf0noLfW&tueIgEd|BD{Fm0+%zHTlu4>o!_L z57d@oyAuYT=Vd+o8jdSK@GvTuz_bk1AQHPaG};_W-+0B&T`>*BKN=5-mHqfh2bQs)Qd%WN%HS7pmnc> z^Iit(M|ccv&hpv$-`R(sA^wPwAx`>d?ELS^>i;A@zP(0mtQfuY{G_z3{fa*m*q>kV z@b)r+LaYBmLJL>)@Yr^-T|=+RFDYc}o;S=1?p^dAFDK_a4vt|8c)Lyjgd&N2h(n>g z*UqC*dVTMG{l+Vlw@nUJHDMp(ePbYhwN;ByNSeLX@+`P(iZ)}INlJ5E@{GJd>kD#+ zvfl;0REOE{!me%VEDOzJqfO)E6wrVe%`!Mbob~k^fbv-smY=T*!!<*W7b5R6yO;{W z-fo60>0^vyYG7i^%~JimlrD8WQnBpVRGNuo1#y~tl)%AAuZyK+qeF={n?Bh_0=Qyj{Uq)-(_l&&u`Q;k@_ zkIXbtPqeVe(^-weT--t^KkZ_cdq9ex0*O>13Iqi$FYdEo*7$AGAo$EdVxOC?Z-jz= zK}i&_&%%Q})%6T1UsKqcBY5FCpQKj;bh-(A^zg@Qa!GzD97?e^g5;`F9~9)V@-@s= z3FYg34MVk9R#tgac655`0tHWB>MzZ%HQjv>I(#4J5+1cBr0`w2ciLxnbIv#lYxDQ> zv&*lM^ApudPcTsC?PoZVwQyDHE#WBbEt zWlErRv0d`q`=&crJS7dq%F{zBE)CK?*fT)9xO{Q;4R9toNCUNXz3@|{feiOOaVufn zwwHdyeLKUIb~uMeQCwupK&|bS39olqWW{Z-WG0)%Z@Lm%v0wEI#~Vs>*C86uijx>% z^y<<`DK&4t7|6(HN{_zt2wfA*^2=2f@JEzH9+pKdV^dwV6auKdAP?X8&ZXn9#e3AxnREw^;TFPas?#m^&z^Zz8JBTlvgkxC zsl;mc{r$PIkMC2g-DYzZZ!XSf#V%bHvQBiZ?Q?D9nTG^-md}i~QYCzEPfK&Y_Jr63 z;pTg_S+yB$pS=o<0~ZWiKj73-Mm7?(Vh0Kg%hn!ETUX;8G0QE^q#r`)xn}IX`+Rz~f!so%L>Rb|S|iC~n9c9KCUFarC}^foP{EG~iL# zwyoP>ypAs2`6N&{8xC#?hr0*JsSdaud%`K2Zq+SY8Zc{S5(#$QP_`r@Xt_93#zxa$ z7|3$sk1g1{*)6O7bpUftXR$E>~Z++tFsZ0O~5r%e}dYF`~G~+D< z-lE~X-;@A})sTXSYvK*~^bB-Qs~@yf?t8yiVl98PQx6Ibx=6Yo-=n}z+VDCzMyMbl z^Tv%)N5QHWj#3s~QQdBKpThWS0a>j(rWWtJ?wrH5YlQe$X(+m#-_N=9mkZ6G`QX3a zV>I}eI13$|=sxFBu+NBBGODiXAZQelp*z>cR9u|QCA1y-R-l`-*<2R!`kbWC-tw}+ zLiN;Cd|i3^y0GigXD@F{07WrrpQhJ;tG*TDUS``RN*i71+C6hEbxAjtw?0T#@77MS zuWw#F+qBk5YPUjdgzkLuYn_wLK=rpchN*#Gt zC7Zt95i&4J9UB!7c{o%Fnu+FL*=Vy`I8UvJV%b5tjP8kG+$pe6+-Wlo=G30;yQ4RB z@Dm3~mKVy z^=z|-#1&!q1zky%9hMfy6@Hx5U+=YkzUBJcy#by;VCQrZf!v+Q|Gyg6$m~GwK6~(g E0Qj`l%>V!Z literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-5-1.png b/man/figures/README-unnamed-chunk-5-1.png index da1e41582c75451dc3b6b0f3829e7e687f6af83f..d9fd18d058f93e1494bb15bde9dab999fc7a8e88 100644 GIT binary patch literal 2985 zcmcImX;f257LI@*Afa7iNDFN%q9{sQai9rH!q$qii3AmeDCh$mNg5MYflNek!G_oa zqC}I2-Hytt5<(jWnGt(XAtWxW0n!q~CP~B)h}m90m^m|j=EuxAj`Pl|S5@~`y{fwR zyWg$z5n7 z9^Aqqa5w}27aR`20Zbe$WQu|L5df@!A0`vv@c0XQD4 z7mImt7vk|CNX*2Ed4QM)>&0RSf(OAONX(n>&FNuTj&)fuyb;T9ckHJk5XjcKvY?G} z`v?MI^&~jZFDmnzeDHkw@RJ1vyBo@?nSvvj#P5@xlCS+i0)063*`cxI{@%!7e0THc zkG2ZW-N}{dnYe>) zj1>*W)RX6+h5-FZOD>lV4XwFj%D6nbb&rLK!zpXEa&Gh7+W?B>X(1#tJ7< zt=Z0PjHRJq;4{Q?K^f5EbQQz$o$WkIAl|E zqD-7(#tFZ#%H-Q+n&;}g_Jyzly#Kj(m+3ftd;F7)Y}aQU;M<@3R{BZmJ^xhIYtx>Q zOD=l45&m=a7Y}tpc%e<-pZk9}^kdNxbBVB5)i)wMN+f!4PWIX_i*^-hXLhM3Ds&@P z?#43|F9v}ARBFh+djyW6k?|XAEgu7NqXvDHWxE_a+D@19JGjZyFKt<8^wk`}7GiDw zoO@jyl2TCNXj38B<%eZSTdC*P!zhk+hF#>tY}$XC{LCyySx09#f3`8gHFB*;9nYhW z*M#9VOh=EtUgzaeC_0ZRNxIqTm$BzIHG;o^dx4@%tgLiX-6A|-zWv1T`FJc^E#${V z9f0lEXa7gyIuXCT0ee}8zV6;eLs``U7t&6YY%NlE1X( zmFF1QDh;{Q<4p8aRaVmlyc^xB#Jbs2v={rO+FNn@_`|9Mr9ZpTT&rF9BfIT-(L`UP zY;?$OY+*ZRPXkeZrt$~8XJ!J3K1k3Sqme^K$ncAqHuPqqs8bqNKxi44kAiivgo&(y z@o$mZ&6K#GTe24;F&wf>0 z1)-=vBg7gIZXR_J;!&=83qD8EkV`@cJ`D6W#+yMu8=`fA^i-5JF4?jLV(T zCo0%UPNqIMlsthNa_KjeP5c*Ke2hUpo-AFKk7e&p8O%`}rG`YqCp*^taG!!i>$iVN zTr2uP__~(TLK}huf32uXe;7KEHS#4k!ZqI9DdrAUG`M`izJzR5GrU)oj-vnlfDUuX z=pSVG)qI$*{8}^tmIZ?TQ zcaltR-4sQ#$5kX7vA90~MO(PbWZfrYOH4nw~dpjYhz*L%6? zH8pKZ+9Wv^k2?Ltq@F=+%3#P$oiF~+0~*K8kw`pPmkzv}64#lNoSH96u1Nzew8`%< zZ@A}y_nCZ-jYm$CZ7{?2Y@DM*F^Mv~*n0ZS?QV8%Lt?zCCx%`UagC$!Py%#n+xq?WhueHHEki!kDTigRzAC#Ktpa+?ult4ljbe(Sn6H#= zefe~Cx+Y@-yTw>=RsfP>oh6e4ERIXRRO86WFQQf$GtD_R-qYin1IY|`Rkq488Le!8 zEji|efl@CvYI%4tU7yXZS|rdk1xz~M`uc34M=HZV<5OLSL=O#u1LP2bF z6Sn-;6L;IG8j1Q^#~pY!kI~61cA#*)jX&uM<*I|Q-wd5gARDv(#uU(2Jo>(|_%B2H zpp&2TaT9CUWs^P`z4I7XHA_s8ZCj2)gt<^OR~d-A-Ho&3t$Hm_m9foqmrf zF(&rfdOb*=pVK6~J6JO;?t0PsZdDJh3tmA=2(Qa0Kgt=%iz_+$LiWF3u#C27gP>q{ TVM%J#Fd=O@?NWmZIShpyR!I^Gu_LS;#|VW@ z&h-hA!#JNp<(Ok-j|crCN@@MV8^|9GySwDv+E1Zr7-91ZT&O9;f? z>jWdf^2XD-Wd78_dXKOKoV5vQQ>G$YL%q}Dx!4b)OKpiuo@%6mO^Kh+X@c8v`I0XN z>MbAFgF@yna!cPtF2887z8Jrvug^S<`DMO^KXu>i$Jen<2+V^ka9C^&NYdhHUL!6b z#93Ma!;eIzg+K;4jL5wmAZPnOp3FWpW$0o&9^0N4Q24&s|E1&}y+R|3akoSG=M5u@ z-Y~vW;Ce#vn}T}3d0cy^a@c0V+NbVYn~ZDA@4svcFxqb$>YN2m*qFUVm+wy*cMlN# z@&4+*iNW=K!nh;~w*PdFT8F3h{%h#+`q`0(>(2b9*7Q)*{6OwgfY|hpGCyW##-jB5 z4zKQ{DNSHWPc>8~$Oj2@%Jr%U=Ik_f$KtyJCTm}s54Cwq4{~S-Ri=2T&sPqmCWI{2 zm=3pay%Wr8oLg+Y{kUJh^yrZ=_k%-|Dh$GZ>>!+Qh#!f%6@E@+PPkYJoHpZ_gPbU6PKF4N-1_PYPF-fsk-m3ZDqAawjy=)<*+DD#bV;aWm5-y?ga4g zC&6<^kgw>I&6VUR4bZx;b1EJZ5k~c${Oa?iY-(dt>mgOE&a4+qc@)04?$@@-TqobN z`NheXNC8r1U!7V-Poc6EohhgxzlW6h@0a5P9}>+nTcZv*|Cs(z?Qa7n8ee*$MCA|X zyoOzIS(de6xXB+E`k+FMJRpW6!Zt0*b7-380fjTC=yNi05}AaK=P4ci8%?~4{l=Nb zDE?g=%}?((D|&ioLK=5%NxXcbU7;-kN*y$0cSP>oW!p22oN5+=Uk45g3Oy|o2QgeY*D?r!Scjmy*B?TRMv?fWN?F#; z3!S8QztUIH+pTWHhp#Xvt!wMoK(-;0$V9o%jKmDw(X{?Hfi){qkAWa3D4Z?tY_I6F zDxWbc?oGnYd95EcU;7|;tE6E6vDC#;K8Cckf`=zKP~-g=%e98SaKQQ7ldA7tv8zt& zDftZ|sV0~HToOOkxja3h?C?^5hfv;RyIdLiR?$0)IxoA<1lIo870fHV z=iAZ=7m?t14uFf!3)C>T{3{MP&}A&Yf$`d*Q2fkzM}W2Djp_0v0*@7AbMEk!i_$IurCz*%5*1P= z0sAJ`_?^n^V@B!VY$1Q--ei`*@Q1INzG9sKeR$ zq4(Qa?-8n~*dfz(FNPNoOqBq8I6!zX>;{7|HNw6?qa6jhbqW13!F|~yP!97dTI|cj}LjUvIp8M)AKq! z+CSZIS0!UdEec51R!fo{eW4K>^$1#vepI2g1Gvfw@GPiLS>F0JWl7R(8Ew*_f$UCt z#txrHIWZY&eLYaML<6e zfTuv6s(jD*1SQL#(WWC&k5rUE&N0)$*h7w-1zPP_MrBS? z*^}pIZuW}DN#O__TDO2@%C`+TPoI`RuLR1u(M>0}>}#xDB*EJk#M$%DNuB(}cd0L!h7M(+op; zZ3x5>%r4|EQ5-SOJUP7osgDY+p|U(xsq3Cfi4uz$E@xCjPIVJ{Kte5t1?j9&amtC< zF&Prf4tR^Ihvi~?lz9Kdl-$b%OuPO#t6-G>gO?^1 zUu#aXQ=2^B$mqF~^2DODUwh_sM+Vcc(*5Xlel`aQohDW7nA^AbAVSXh8lm)_J}yIav;wyL~T^m{h1rALH8 z+z252T~MstAGqYUn@v8Pf58nL0VWqVbzUA5K~{N;8n+O{MT!HXwN;UMqBvxW_2hSR zs^$@!^&hu18$`Wj?s+D{=^AxV9ZXNkV_E|*1UR+|vesmL@@!Y+D_8SV!^=p~ja1ERs1MgQB zaA-!nay}O;rwRi+3Q0i#JZP8?Sn(P-NR@YvLE{K)3~xds$GN~A2sUqF${?BEMdujX z;#`6-irGf%n}`=I zJfeH9if{&4+Ew&0m7TUoVQ=F)wJP<-tRX%dV7;JWb;4HacQ8?2<#t!cA1f?RxoBFo z&C^;lwCZMtjP0siQ2f4W583=X#hb{GH1kDvo8=`J$?{F}Y)hLooVdh$i-1MZu3c!8 zrzucLMBAycq)%2TV(h7_^tpLS(4G%%(p4j{HnV}J&X4FUdp~)aGe2oXPgb_Sg?Zif z8%xNAZ)g(!2_9vZ&F#Dv zb}+=6E_btP?~)Np${g;s1wX<=+e8-p`EdCgf>q{dz0Y z)e>o~h1arrWHkjk_LCErqGphO7)+ejWf;b{0@nLHwO$;H(^IXIQ;@K2d--w{AL1sv z4S5ij@cuEjv`t6Q$}zKCOhvf+W^~^29w)KscOZ{|)cbXiXOa7>ipqk7(3&q}t+5!N&Dwe!dA ze{y-HTbCqJw9)uG=a4Z=IYdN*DSKPKTWql8jj+;kG!%4Hvbj7p=TW@Hx!$6Hpe=o! z043+d2gT{Vyx#lRX&NQt%&rTRZqkodZob3RVQXHK+Fmff{&vo!369P4#`*Hpqd)1_ zIS6;*zDEqP=cjeu*OdTA7Qc-pg0yy4$+V2?oQkb9&Em-e_<*^u{D7EF0&RK+d*3Jk zWpudg+DxW32-o=pazNZ(ufLeMW0)D@(Jj_$RlJ$l{Km3|PC&Lndg(xh$-RZqU ziI$}_w8;Dun1+=Ej6Ix0VI4Lua`BKySmo5-4{FObg%>yFuwI=&UapX&T4dPv0L8CQ@mPsY6~I5Y6Crms02mJ#GK(1 zLlL3)_qxQkvy(u4)k#L}mFJesOrO&WvqT1;TWXSH)^#6Ax7AX~Ey{Pdi#z%gNT^K0 z0V>>LA-e_NUpPcn2EFnw`CT<^d*Dc(e6B`_-J0>RzZ!I7At>;Iq?6^(ns+;;{lZ1# zu%VEi0X=|!KvR5g*-3gDHa}&kd&WYzYiGOUzVuQtuJNL!>*7W#FTr{3_7kk$P39U( zU9rUkaO%m#ebG&E$!}=zz8^uo%&ho}t+cUkT58!VM6Ui?Q#E7m4}97py7{jl?onuJ*clIeAQ1szx# zeI!4sXSdD&+f>%Y%%xY)#dv->Ysf zQ|r(|ZGKl_=Kc^IGh=S(6i7LwmQg;pR4~T3%H`xc?img}z?lNKTKDL0)k=MrYQ%Wi zd?-3~AD2do=r?nq>u(*ouFPa41&uvXx{)Cidfr$(8FCmdb2LSG2KEK5ji+eZ*}~_` zqi}d2d~Kv)!LzaAleb1aC=;pB6?xLkf#g;A^@>)N=gsjXWi0!83Bugh}~j7R*FSHapx!kXx1`tEpPz<{J34Vfgn&TiCXr`L1FAdru1J^P+ag^AH> zl%M6k1R;YRa#N@Ii+@YS(iZ6}ImHF~m3fx#9o_+v2wkI*9cY(Znk1()d6E~B z1YYn+Q}^=%BdIfs8=Y_6HlnFpGugDoUwc~l(*CNn|GV$R|0kA_yxrx?xs;KwN6$3t zwU3luPPV|$t+_qCA7=Xg!ncRM?LE(@QU zpp#~IdH1EN%$Ak>%%8o`QZ(KsKa;mn(Cwgnv(8cn%y+VltRg?)K#Sk60;5!ITFK)v z*V|RR)AATSa)Ws{Gof`dt}oHns~#N;y`kFQo*3vuJvx|8I#EQ*c3>QaDu|fnxnfi*Vf3DBti`@IL|fms+0y diff --git a/man/figures/README-unnamed-chunk-5-2.png b/man/figures/README-unnamed-chunk-5-2.png new file mode 100644 index 0000000000000000000000000000000000000000..da1e41582c75451dc3b6b0f3829e7e687f6af83f GIT binary patch literal 6920 zcmds6dpJ~U+aJti5Qa!8htQD1j&T~>VM%J#Fd=O@?NWmZIShpyR!I^Gu_LS;#|VW@ z&h-hA!#JNp<(Ok-j|crCN@@MV8^|9GySwDv+E1Zr7-91ZT&O9;f? z>jWdf^2XD-Wd78_dXKOKoV5vQQ>G$YL%q}Dx!4b)OKpiuo@%6mO^Kh+X@c8v`I0XN z>MbAFgF@yna!cPtF2887z8Jrvug^S<`DMO^KXu>i$Jen<2+V^ka9C^&NYdhHUL!6b z#93Ma!;eIzg+K;4jL5wmAZPnOp3FWpW$0o&9^0N4Q24&s|E1&}y+R|3akoSG=M5u@ z-Y~vW;Ce#vn}T}3d0cy^a@c0V+NbVYn~ZDA@4svcFxqb$>YN2m*qFUVm+wy*cMlN# z@&4+*iNW=K!nh;~w*PdFT8F3h{%h#+`q`0(>(2b9*7Q)*{6OwgfY|hpGCyW##-jB5 z4zKQ{DNSHWPc>8~$Oj2@%Jr%U=Ik_f$KtyJCTm}s54Cwq4{~S-Ri=2T&sPqmCWI{2 zm=3pay%Wr8oLg+Y{kUJh^yrZ=_k%-|Dh$GZ>>!+Qh#!f%6@E@+PPkYJoHpZ_gPbU6PKF4N-1_PYPF-fsk-m3ZDqAawjy=)<*+DD#bV;aWm5-y?ga4g zC&6<^kgw>I&6VUR4bZx;b1EJZ5k~c${Oa?iY-(dt>mgOE&a4+qc@)04?$@@-TqobN z`NheXNC8r1U!7V-Poc6EohhgxzlW6h@0a5P9}>+nTcZv*|Cs(z?Qa7n8ee*$MCA|X zyoOzIS(de6xXB+E`k+FMJRpW6!Zt0*b7-380fjTC=yNi05}AaK=P4ci8%?~4{l=Nb zDE?g=%}?((D|&ioLK=5%NxXcbU7;-kN*y$0cSP>oW!p22oN5+=Uk45g3Oy|o2QgeY*D?r!Scjmy*B?TRMv?fWN?F#; z3!S8QztUIH+pTWHhp#Xvt!wMoK(-;0$V9o%jKmDw(X{?Hfi){qkAWa3D4Z?tY_I6F zDxWbc?oGnYd95EcU;7|;tE6E6vDC#;K8Cckf`=zKP~-g=%e98SaKQQ7ldA7tv8zt& zDftZ|sV0~HToOOkxja3h?C?^5hfv;RyIdLiR?$0)IxoA<1lIo870fHV z=iAZ=7m?t14uFf!3)C>T{3{MP&}A&Yf$`d*Q2fkzM}W2Djp_0v0*@7AbMEk!i_$IurCz*%5*1P= z0sAJ`_?^n^V@B!VY$1Q--ei`*@Q1INzG9sKeR$ zq4(Qa?-8n~*dfz(FNPNoOqBq8I6!zX>;{7|HNw6?qa6jhbqW13!F|~yP!97dTI|cj}LjUvIp8M)AKq! z+CSZIS0!UdEec51R!fo{eW4K>^$1#vepI2g1Gvfw@GPiLS>F0JWl7R(8Ew*_f$UCt z#txrHIWZY&eLYaML<6e zfTuv6s(jD*1SQL#(WWC&k5rUE&N0)$*h7w-1zPP_MrBS? z*^}pIZuW}DN#O__TDO2@%C`+TPoI`RuLR1u(M>0}>}#xDB*EJk#M$%DNuB(}cd0L!h7M(+op; zZ3x5>%r4|EQ5-SOJUP7osgDY+p|U(xsq3Cfi4uz$E@xCjPIVJ{Kte5t1?j9&amtC< zF&Prf4tR^Ihvi~?lz9Kdl-$b%OuPO#t6-G>gO?^1 zUu#aXQ=2^B$mqF~^2DODUwh_sM+Vcc(*5Xlel`aQohDW7nA^AbAVSXh8lm)_J}yIav;wyL~T^m{h1rALH8 z+z252T~MstAGqYUn@v8Pf58nL0VWqVbzUA5K~{N;8n+O{MT!HXwN;UMqBvxW_2hSR zs^$@!^&hu18$`Wj?s+D{=^AxV9ZXNkV_E|*1UR+|vesmL@@!Y+D_8SV!^=p~ja1ERs1MgQB zaA-!nay}O;rwRi+3Q0i#JZP8?Sn(P-NR@YvLE{K)3~xds$GN~A2sUqF${?BEMdujX z;#`6-irGf%n}`=I zJfeH9if{&4+Ew&0m7TUoVQ=F)wJP<-tRX%dV7;JWb;4HacQ8?2<#t!cA1f?RxoBFo z&C^;lwCZMtjP0siQ2f4W583=X#hb{GH1kDvo8=`J$?{F}Y)hLooVdh$i-1MZu3c!8 zrzucLMBAycq)%2TV(h7_^tpLS(4G%%(p4j{HnV}J&X4FUdp~)aGe2oXPgb_Sg?Zif z8%xNAZ)g(!2_9vZ&F#Dv zb}+=6E_btP?~)Np${g;s1wX<=+e8-p`EdCgf>q{dz0Y z)e>o~h1arrWHkjk_LCErqGphO7)+ejWf;b{0@nLHwO$;H(^IXIQ;@K2d--w{AL1sv z4S5ij@cuEjv`t6Q$}zKCOhvf+W^~^29w)KscOZ{|)cbXiXOa7>ipqk7(3&q}t+5!N&Dwe!dA ze{y-HTbCqJw9)uG=a4Z=IYdN*DSKPKTWql8jj+;kG!%4Hvbj7p=TW@Hx!$6Hpe=o! z043+d2gT{Vyx#lRX&NQt%&rTRZqkodZob3RVQXHK+Fmff{&vo!369P4#`*Hpqd)1_ zIS6;*zDEqP=cjeu*OdTA7Qc-pg0yy4$+V2?oQkb9&Em-e_<*^u{D7EF0&RK+d*3Jk zWpudg+DxW32-o=pazNZ(ufLeMW0)D@(Jj_$RlJ$l{Km3|PC&Lndg(xh$-RZqU ziI$}_w8;Dun1+=Ej6Ix0VI4Lua`BKySmo5-4{FObg%>yFuwI=&UapX&T4dPv0L8CQ@mPsY6~I5Y6Crms02mJ#GK(1 zLlL3)_qxQkvy(u4)k#L}mFJesOrO&WvqT1;TWXSH)^#6Ax7AX~Ey{Pdi#z%gNT^K0 z0V>>LA-e_NUpPcn2EFnw`CT<^d*Dc(e6B`_-J0>RzZ!I7At>;Iq?6^(ns+;;{lZ1# zu%VEi0X=|!KvR5g*-3gDHa}&kd&WYzYiGOUzVuQtuJNL!>*7W#FTr{3_7kk$P39U( zU9rUkaO%m#ebG&E$!}=zz8^uo%&ho}t+cUkT58!VM6Ui?Q#E7m4}97py7{jl?onuJ*clIeAQ1szx# zeI!4sXSdD&+f>%Y%%xY)#dv->Ysf zQ|r(|ZGKl_=Kc^IGh=S(6i7LwmQg;pR4~T3%H`xc?img}z?lNKTKDL0)k=MrYQ%Wi zd?-3~AD2do=r?nq>u(*ouFPa41&uvXx{)Cidfr$(8FCmdb2LSG2KEK5ji+eZ*}~_` zqi}d2d~Kv)!LzaAleb1aC=;pB6?xLkf#g;A^@>)N=gsjXWi0!83Bugh}~j7R*FSHapx!kXx1`tEpPz<{J34Vfgn&TiCXr`L1FAdru1J^P+ag^AH> zl%M6k1R;YRa#N@Ii+@YS(iZ6}ImHF~m3fx#9o_+v2wkI*9cY(Znk1()d6E~B z1YYn+Q}^=%BdIfs8=Y_6HlnFpGugDoUwc~l(*CNn|GV$R|0kA_yxrx?xs;KwN6$3t zwU3luPPV|$t+_qCA7=Xg!ncRM?LE(@QU zpp#~IdH1EN%$Ak>%%8o`QZ(KsKa;mn(Cwgnv(8cn%y+VltRg?)K#Sk60;5!ITFK)v z*V|RR)AATSa)Ws{Gof`dt}oHns~#N;y`kFQo*3vuJvx|8I#EQ*c3>QaDu|fnxnfi*Vf3DBti`@IL|fms+0y literal 0 HcmV?d00001