From ae3aa0c8754be5fc2243339c90db87a4c2cb37fb Mon Sep 17 00:00:00 2001 From: SpatLyu Date: Thu, 23 Jan 2025 18:54:20 +0800 Subject: [PATCH 1/3] update `spc` plot s3 method --- R/spc.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/spc.R b/R/spc.R index cdaac3c..e4bba46 100644 --- a/R/spc.R +++ b/R/spc.R @@ -99,8 +99,8 @@ plot.spc_result = \(x, style = c("network","matrix"), ...) { fig_g = ggplot2::ggplot(data = g, ggplot2::aes(x = yv, y = xv, fill = correlation)) + ggplot2::geom_tile(color = "white") + - ggplot2::scale_fill_gradientn(colors = RColorBrewer::brewer.pal(11, "RdBu"), - limits = range(g$correlation)) + + ggplot2::scale_fill_gradient2(low = "blue", mid = "gray", + high = "red", midpoint = 0) + ggplot2::geom_text(ggplot2::aes(label = round(correlation, 3)), color = "black") + ggplot2::labs(x = "Dependent Variable", y = "Independent Variable") + ggplot2::coord_equal() + From a251032f0e3e47e3129f4ec389a77d9c296e70a2 Mon Sep 17 00:00:00 2001 From: SpatLyu Date: Thu, 23 Jan 2025 18:55:04 +0800 Subject: [PATCH 2/3] clean RCMD check --- DESCRIPTION | 1 - 1 file changed, 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 57c4759..9f70f96 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -34,7 +34,6 @@ Imports: magrittr, parallel, purrr, - RColorBrewer, sdsfun (>= 0.7.0), sf, tibble, From cfbd3d689b8e58f00a3eb165e0ba8fab9ec1baaa Mon Sep 17 00:00:00 2001 From: SpatLyu Date: Thu, 23 Jan 2025 18:59:19 +0800 Subject: [PATCH 3/3] rebuild vignette --- man/figures/cisp/plot_g2-1.png | Bin 20275 -> 19858 bytes vignettes/cisp.rmd | 2 +- 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/man/figures/cisp/plot_g2-1.png b/man/figures/cisp/plot_g2-1.png index d9094361214fa73d1161a1368704792fece202b8..67309328c84756bc3ef24c22961e7fd07e721d97 100644 GIT binary patch literal 19858 zcmce;Wl$V%^e#9^@Sq7U!4ouCa7b|11b27$!JS~i-9vD989cbVyUXBi+xh+Pt=iiA zb$6@i0=l95we$9Q@*3!j1}ryf)BaN#KVUM4NdDCxBH|SVddbz zD@ds5eS7;?V{U3ur1sbM<*gzcjGac0;*#Xh?6CRfJ71BYH_K=rF;Hl_{QIMIBV0_k z&5^?~`ZB#w8tR@iUA%o{Xj1rOGW(&!CKb2zK2}gIwx+lhh{Ikg7^-iijzAvx>(C*1 zg5*OWrjmR7GBWvZ6h#Nxz+ZGC0~we?#pCK?uD9te*ZHmWWvR-sPZKydGBc-T?1U%rniIoI9{8PH3JTmZ=wlO(ki`4kZ8;?JAEB}T zUtVC{;P_6Rm2fHIz`uz$;H}wyOTCZTZBwtCRWH%v-Lij^0RlmTIepw`La_}D+FP%S zoI$?QK8;Q*5tlP(V@qUeH`&Q6I;H$=!PKyz?A0cl`}Alp9|*c$fE_KAcn|GHc93Ohj)} zgPfWFEQUK7bjMQnr61Kh1viwsP<~!(XrE5zZxbO^y+%0IX)Y4L612WODSr#0b}ll# zWX2=2Je+TYLL%F!&1|)tE3cB3ncX>xh`-uCjpI{$uYif>AgU@R(d{=iy2Oy9`x9PQ zE1wOf(x-_F$lt#Gx>IfMp~0B;)he&OsFQZmy2C`#ioepQctxZ%GSJ`nRWr<_DT3kz zVOeYJeLpioT;3Bnnk@xv7CvSa-Q4Of*Q0jO+LkSIA9{oNLD?@iWKkaN^d6;wOea1Q zuM@{_1|?d1tMq6BU2o$tYhE`}4nqaZ*Gk&v@o!_ldrrSv%nDp`HJUizw%$u!K+bmW zr>dNF8+(#7N9f6fSGcUDpSZ-(7%6iskF^^P1CDGJ#g^+hmmTTl9xOa3=c>B< z#NfH7FpzK9-{c)<}{nyIM9jrUS^0>NUq>1Z2Yd)}i+P^Vy*fqX^ zOU$q1*?Y+UDaYn}^)JVToy*FTGPwMntKb)}>oZzDRkH@J)hT|P`5;kOiX^u&tO$}A zPi>s?R?>=)mY?AhmK6~Dzc;i+*ut?0TK~Eo=?F_s`sy?SiH+w|jhX*FUn6&JD@*rbX}9 z=po4l^|C}Oao;Smsa@6mXYpCtl)$e=R)EiW~?l4F8;QrD>>idGR3&wdPmuB?QZo4 zkk`Gmu~71Qt-f^RHfv^S^sU%EHWGtB4s75ANpIg9Ftr>P1hTlKDJomgeOiAhEZtwLgOZYt>6Uc?xx z9)G7XX>z+An$(4M@brp zAA#OE5a&||^n#?JpxP$xKqa@Z4P*@D~FW>v>8iFaZA)qAXEcWl$n|N#pv56I2T||!x z&i>-XS_W6|3&hGSBi@wtU6nA=)0xbdBCblyxp+346CWn>L7*=~zHnnkGYcGjhR)Ng zXWLOHya`J`i7XU(t=Hjl=qeAkW|9n=q4|vloez zyix6qPckS(cVY znNe#vFEjj_YvX<0_(`-Et!kdTZuezC^EH*vj>qQVIo+htdtV{U`1V}cdcM|W3;Ba0 zS%Wr9Q96F)BJ$MXOe)xO3$DmKUbK0;m_V&vt|%KrIb z?E(M7)Ox?6%f|(5XbIq*%uJqhXvS;P(;=CxCNk)4`>K6I?9x^RW7|$yQCOU`v%%G( zrLEg$&>XI=*9bFcoA)RI4LgEiNbEL;EX9Z$rt@#@Y|=F9`91AprC|P+_f<{*?5_!k zME6)F+59{9X1q^HBQD3w=ZU~M$7>E%f|WOuJ_s7>CcaW74H9j$zR+c2A*3RBDd=<8 zE*|8}?yyHvy1l|z42i%9L2KmssuEgxOlmYHgG3Nv_WyRmX7)?FGyqcwA>>>A_Nnjn z>L1kzs8H(ZSQ~PfC3b2sgRRD8=0t`>ir3L?Bvc5UtnDdcLR-S|9K+kf39lG8!5HcP zk(vIg8qoG1LJ5Z1l3GqcJ3$9hPE_HzmT=)|zh9~lX8#%`Z`we7;R|(w5@sKiSom*r zJo5?&G_Ei(v|Tpyhts%3Lb$caz0P5nLRXRk^mB`4Ps7dK4)Y^~OF5o0Dvk{t6yy3% zv`FMe9c-VQme$cahSw~R$Z06D;@rT6wJ$-VU}~trD!C%Ngi_k_m*D(2$#Goc?zS?>Dj-0-RL7pmbFRIx?Ngm9uYFbEe%yhrl_FSI9ix8w9iJ=fbClsn z{HX%3fSwJSPtr5`hwI~m*|DfR+`D-++Fs|Ge z&9mY z3PHAqMj!7AW0ceEJ9G zaWF1*Sd2D~S+Ml1Bjx5#WI709(@<|l^bmAPh5ZxY(#_1_eWO(1Db_QbWH@Lw#vq@8 z1F1Iiab17CUt6RHSzUJL3(*s{7O_?&J5emAkX)P}hby`#yO%#2s!wPl*@wViQ>N2= zuJl?Nc536>(nF_8oOci2r`SM1q`fc?&10hEls;yIjAa|5(Xt;2|v7M(J=e zRfcL2|AsnSlrf9lLIrZUHpS|{N4WFt(P#MjIOGE3r*)$8^^rEaVd)8- zkJEcW4g_l0KES=+!HwX)8c*+=H4Pk5t9~7|2X&RCV%su)wl#nBN=jIzznq6G9xS4R z3e(z+7iu>|dx<^UUN%+;^rOIV?f!C))bF8R2D(F2TSgGlG=3yeg;MbFj9bV*AvQed zIa+qJIW%q8IHZ?AuP`J4NOjCa_aUa#`aV;UNZD>IVZ5g4uh((?TcVS0JBt%Y_+B|- z^XuraPlgan!K_CXZ(y?}jw^-$`(Dm98&uh#tArQ|W}bW;?w5o;wz#;4A^zo6sRQD( zXhE$kc3(z>XJ69bxaU{05t2Xj+UgsUV{mWw`u5i2OT#E+t7(JCcIat-kc17|7I|_@ zZTR0fgi$-jr94|?RcFDCMe5G-NS(5EKSiOoyIc>iRl6+Oc|JT%CZ?2x^w>1Kd+#_9 zZD8pWAF%)o$zjUtmNaO;F7CxJ*d6-i?zzYv%J}w8eZN|Z{x6=pr$eawWx_Cc!yiCE zb@W;WGGn{600L^X625Rl?@4#lo z0l!USoLzlQlP`m0Q$!lg9*tvp++`1}doPh?1#EW_u#0dsavvVo-PA@N7Y^A4FMS;( z;jy?@*xCiTz0tOU-zuI)rSZTW-4fGr{4u@!bKUqrTN9sbe`{^^I#Nnrh)^Ja#q!XC zSM18%H0`&tgpo*id2mVOVz_uM*!1aeTNWx{%NgO4aU)e}jC~7aUhj(2vVX-OK2fiCD z*ONP#)Fb%}PqI47OWHMm7Q}`Z)7yPrtt|E732WwrYNVNiH3S^ExR%gR9BDJ*-53@A7nG3~__Eo? zCk_ICX=rSiWjv2pup9eSJOzcr{{W&IyKpQPS5FXUyZKPkFpI*-?0WoNUXle7-7NUz zz+>&szF13{v1e6Y`sV^f@b*lr0%D{qn8(`C*@IS*7%NI4fJ6T?$gei-uULKs2P4u1V@+xZr+4j;RrWL>=3 zcdZdusjx7cHT1r_VSQRbHo9T)Ltd9fnWx`Y{FHEQmTk2T5YN)ll zx%OP%e6JI78OfQ?F~ak^nOpdReJn3gd+0fjRlLL)MRj*)bbZS+Y8OtG5h-4t9_IP@ zi_NXNBX^63k2e8w_1 z+4gnb7?;KpOnueVeMt^DMPzZ;xH0=y0dcxmFjd)B@he9o1`-$C6PD^_dYWOTSq(;|VXSltv6E0CyB6y?@VUrE>HV+1Yb)u+*Ew zlrs3=q{;!=sM<^}?%;cv58xnqNORK<<;WOcr15MV-7~6&)FbbjDzA12@LjV$KC34@ z`ZX1f>!?fy=bzhnc$@FNnv;*c(Mc!i4YerfB|2Pz-5b$yVZ5edqePCaoKej=l+`Y! zb2?G4&L;l`cq3`S5&`6jx(?IbLF(JkG;YFkmH0pF&qG4_g2SDHpou?E!SH9@SLPHT zLg#`!K0$0z@d@c=CoH3uwA9Zk8>;W6HkY?e?QLkllE$1Tl> z-|X=ntg^9VrCc+iCTH2nn`uerl&pYzLl1e*R6td*Hu* zq1zl@;%IZiJx0bH0Yf;U)TYt_wq(z*3XB;oGkHZQifj%1f9iStwiTT@*9YJ0#tzvm zwO=)zyR!2mfDTi{zmDzBHl51MpPe~(Um1d~dgS$n18a$A9$(w;vCzG)Dz;QD31`?; z5ie9gmW*pdajyv>IaCCiu>+w#cZ)~E9L8=aI~B6TVt45n|(TeYyn z81CsMDyw`!V*JV(u3d`J%?R(fI@@ip<}6?e0urAXBY>j|qv~(gW-y`2+`O>f1o>)m#`y=0| z0?{-~Q}rirK!$n_s&kHWxWZ~T>`7Rk#M?_RMUg(OsmCu%o9t`OZhnm`VKpVj7Al@6 zF#W#!B^lo%g}((6)Ch8;C5|*(-#?rW{6$>Ipv(ie#;R!$x%LYW_k$UtIO2C?a_)Z9 zOvRYAiHba30?0hM}KqY#9h7ZIH>UI_Lon{PoR0XIqCA z*e$CwTkx(~++abNilYq9LZe#ONtmpK6a5gUU{ZxhE-V)~Y=6bt5EvL)ms$lA+Q8p2 zhzlY~KR+I%fFBPdxnLmGWn2#=n+7I7tavL z7~9+z;*HhrHv2nV45o53BkD{2msqRZP2YyhlMp|NBIvO z@c3(q!OHW03|}qu^8I}adCJD* zS&xj8TL}SrJjY0Zq`^#l(@BR_YMZLWa-ib+>PXf{Hqgh5yc$4W6o3SO{dZLwZ zcIAo`6DK^@lhvDG0I;#SKR9o2*5d;gW{*s8aT2#q+Z$2+jIG>mn)#cydenZe=g&ES+eCWk>e6nItjc@3bnv zkQbJI7N%vv5}Lfew<0Ld#Hf9s0x6j)@Yfe(Yo*@D2#NbvkRcrr-S~`X`;Ui3;pf7L z#76SDp%SClvis%@@&b?2(h7QJuY}rt?6r$P{FmP&n4xDbJ{dG57{({Ob*~t$QmHw3 z-Dc{7!i;rqib|7kH9ugJ|Ng~xJ+$-Q@N(z?b+Q^-S$c1ut!>uy8rSkxOtuXO3I#6# zhYBGv-7o-yqU2Ef41EPO7XuG=2WAp#SE0~@os?WTCj~%_N!DH)ODqyXP^pGj)9&Tx zB{y2%zjTNG=nsu)8T$EA4~7C);_IS}1Tw5y41rLnN?V+C7&@iE;M0j67a&L3q2VK_ z&}#`GVgHt!Uqai*Chr+G+t%R`wtzA$+hn6ppa-UrhwUGK{T%9x2y&~y(xwPZPU7ol z^3lLTAXTXQ#@&}>yiu>8o$)M+bRZaDHLi^nJenBeX@&yp``53R$L@ZP&iu<`c{U*qUn}+dIEyU07j>N1z4yE*P_`_{P=PLo^}~;;Ke}~pUadXJ%O~g8 zuCmHYmrxhb!chjx&LV+wc?Qd0$hTYVLAk?Xz@8#onOlP!TVr}y+4mF=j0D!E7xp<`Ixspvvz=}n0 zQ8$*{pKZHiy{N)ZyKEQlA;x*x#J~L*HFNqZtkUnZ_Wo(*aANH-+;CHu7>6_J#cDK4 zULY9l$^CECTA6@g)k!3O$n?_-&>8dL710qSwd8Gd#JYg_L6$#z)h zl$mpHu|@~{jrI#e(_Z1xPFWYPW|lVED~9KzROG_edA+46yX)?JnH-qq26E+ObpuO%kM7J+Nq%KBYyA7N=NN1he3GfKi$J^C_qqC} z7P~okI9)MDGpL#EGrmS*jA$si8wB7ZY6G@9KI;t%WEU4LQHftlx%cc1{`iZfRJOwN zC<&EVi2k)jz&a=zc4Nf17xrOu1HVLmu<%(z!16vno4Nhx<}%CL_tV*QS6+doBcFY%X4&9wP$%)%H+D~oX7eR zza-xqo$YPJx+mLcfGgC}{4?sn!_~1Hu4VDG(&$*F0)l^jr$24E`b2Lc+<&Z;nOyG5 zx$wG`vDV0%`OtHoZ0xq{D3XuT=5xWtqxb zgK+SBh?MOtHSu~p!VWp3IUdJi;F9)tzho#GT9j6 zHaa_PlsJpS-ME7xO{1$jP5ih{#NGKvv3LF5?glgr-hE!~Do1VFe2r4R-R|z8^qI{tt_42n2b)F`=*w#tD}aRf(=9N#gsayOzM5T% zq?5PD(zBIt9Kw~htfV!fl#gTi0-_SNh-OWaeBhrG#Q(^#+9F;ln~pDBZXzu>?Rq0Y zlj^{m>DhxoGi^nlxnb|!^OmXyh8IKcF0qO<6UW|46!YnQhEm?^LNl$7q zS9a<~e;CDTK7|3@zFq5?{(>h9umV8JiBu@ic7m5>b5aH4GaxUZVl}ZmjSc zg~V@KupQv_!omv94IaXCl*zS;b9DlVEBinoibk5y4ZZ@_ot7_UH$S(v_@nh2;5B>U z{zr8J1gX^+3mdz$OneaVv&gZ`2kX8S?8XRM37Z2Od)6?w>j1H=vV|c>68|-mIDla^ zl@@j6Wmw~*HGS+eD1CWmw$0-E#yH_=nZE@_dVyMoz@$I!Z)3%|_^|AzjT8GmCpy^G z3EUM#Mk%t%Q?^IbeU2T&W3y0WwAd?K7GR$F4xT8)fNCyroMt*87VWYZhZ>^%?fE{w zzxbrfgz|U#ivXlf(XqkB>3B`|(Bf&%!N-2hd!3Vjv0c{#tVqP9sXdJ&v7*=}pvbOw z#2|GeVM3UuEB9Oh42n@<5kd0u8~F5JE54wQ11rG_h>P&=Bx1Z6_7Fo~8a`haH~Z7a zY+vrU)pvG+dEf=-yi%K<)7Fv$nR}R7Y7`cXhF&0!=vj}2)|>cfdMvn-Kcv~$a(+WUrbpIqBk2%fP>J27KF3cww=)bm6m}ew?9gYO z)>^XeWg04??EL(%mFgTRie%wc+#$^K`;Ah8tgj zw(aX|>4e&I4v+0~_t@u$*5QYNqyq0J0n$3-nIG|R1yUo=L&}13az&-wr!Jmf#50(6 zFJOMiBrp5U=_*)k{!{)%0-O!102crbu^>@Nio?`%zp*e36&OA&kE1`;#3L}0PJ-`x>0qlqk4sU5Bh0;hyO9^U3^;h(r0FBi zbeN9^;fh=UVT)W*VgsT>%V++$fiG{Mx#Ot8+`jbW(Es=Mi&^#7|4_*n zP9~kf?Y-Ii3_c3z1Lx8aI$PFHWvE)E3K>rp_2q#j2$#%6dv&h}HIMJM#Og)`CroCN1# zA*2~!p6RH~jx(6ipW>2fJnHM+O&J<*%t2;uUo&>Fef~agWhnd9Sm=~_%jl+TP@Mc-mI_FGWwa zw)xU`{@EElqw39;5=*t##i!i_DrB>2%G}kR45Y`)ze%k=#>KfQ0yY4e2(OF3bG?|m zzwecNK0S5@udY_D0N$h&j}dmjwq$-=&-qVm8knj;ZLj(ZT&U9FtVymMBYRL6&4fNZ zW={Jk*s-`6S0+i|AGXsKq*vrBx?Kb!U%mEggQiecVa53m2|E@r6Je0CK`x&G*zAn3 zVa@qWhCpu8mA-I0mNObDVX&faynlo~1b60-^PjpwypPm{Ag z|MD}eWZYN#mx?Eh6Uy=$OJa{t|4j6=^8k_m7W{`(0d@!rOIjl)qb>(RB%4t=ah8Y~ zD@1wAihq}Azh1N3RO1}lgLa5P-t*gRU=28HpqOpT}l5B zxh6ok^2TT=4AVxqBh|V!%9mmvFv@@OP|m~fW~{3Rov=~YYd zNN^noz9JiL##XMcX38^p2MBmf=!(oj=<^AGyF~0{&BH-BGvbzTK>-gF$!|uxzCDkA zSA9wI7^!WSC$w>5o=mUWyX%ZfiiC=$N)!4h$f&Jl<d;4tF>yo(TdSSNq28{mVd zi7qa@?pf)F_UnvU=Lz*sJ38(rg^>J%io)%ZXE!EyU_`J>MsH-!Mf!XWgHd=P2sKpGg~3xM0%{_~2a#ZP8-EeZNPn(blb ztjEUQBn?{%AXPNP^03_jOd*HE#|73>UgByuu3&xOt?_-=3E(ES2piQ0I;tZAX?WLz z=0TtgYotYe=gD;de&*I3c#!Xf5o1INAh=0_2Mnl8qDP!OlKj z$BRS`dXWP-MX?IT?rOc2N|-Y^iJgaR#7uncx&Tbr@r2|-{bNm zni8W0LahDI%{YOWjyZA3gL>;Fb)5vh%<}KW>{w)WC(-?-tz$h^Xq4&HF4Sx4Wy{}_ z0}?jJ8XF$k=a7}LW~R0U=kt;B@FW{S9gX1v%f#J+%bWVhigwG?#~+Z4!zG8ty{pZbquFUWH_PVg?8p; zPf({xbw#D6Nyk&YOP;aO3F1=G~X8uBl%` znEB68;Z6C77WicT6tA+jrY;_cNGn)^28RZnE@e zFp^x~lPQ}m-IZWeJY-)nd3hej1y{7K@axa7(MURe9R%O;d7VongTNAl3$kiv z8DnTROM=c#Nt$mq_8<0`lJhD1vrOuBbKf1+G!+cj;cAn?OR$6iWn$fpd$kScdcbp~ zJ4yD0Y$@5lYKGZ+I30{I6@-e!wCH-~M~n-; z9KLR**R&12BhqaSIB7p<>&&6rLA7;}=_Y#Y7VW$00e{Z@qlBy-ZUHsk2k0^1s;)!- zF~o1MC}n#(dp1>WsXrNGfCTWc&RX3yoDIlktqbFpICe53PLVR0ARh8cn_z#XUMvTw zq#d>4n-i4WMUsRzwME*jQ2gf=!fPmX5?3X7sdLhhm6#7dy?(#Dk0dE^k<9UD7MFh& zrR7Y^|A6b=J55@e*ZT8oj55OeGl;S@bW-&d=kLO`uJY;26sPyk*QxW6tK{w&< zMB&j|Y=s`2Qaqd;QXMZ5JL+y@^{b1R?|l>i&^GO3yD`gknZ~XGQ*dXh;zAU`Meko$ zS8o-0EhN-ggkQ2!mN#Ct5?eSU0Pq7>(hM?Yx7l7dt3PH4_CQ~^Tn99ryqT$9eA(#v&-%M#22PLNjaR}NZn%7@pz7Q zdqiLFKGp5E@mTij3Z(Ao1Oue=pt+QOKdX?OZ^#sK_?w9j$1Zm19zt<0sIK7iIs#CP znt?l^waZw>67PSOliJ0n>e4b~Zq4PvL&PGK=pGJB16Ddg?#-a6uf+?q$3K{-KGwQZ zjQ(n-oL$+Bc=vpsFMs@8+n9X1+&oN%PnvFDbF`VJJ-QWDHiS)`+PN+vzX6x+!6F41 zsKqmh@5lLZ=w|cxRhy)?2U#Y|$1=HZmquRUzY<)-?L9l@t_whqXE6YOUCkD~NJJJL z-Jb?kcs=dpkBt?@Z@)u*E!u|@72A#WNX>VArX$cwo21Pmh0wZBL)N10@C}goq7@un zK58mi2UqN23+7jYp{Wu0;T=jzV3@RN9rkBEbu$!3EeEPhUY)}zi!@+A%CZvg$Sj7= z!}W6sD4>_`^8WoRlC*m4U@#Ff09VG@{_96Yg+?Aq#P;Ri2tt*#kNwNqP1ERVqXTs) zNRG3c5Bff7T*tP;uNrgLe{t16wWEReggEZfYZ!E2+Dm=-QAlzCVn8yn zM7(aB<55ObR|{dbg?Pl@30O*J2;kzo%WM$*x(6A2>ep2D^2Nw(b$-a>-d*3nTU=0G ze|6bQ{*cFPs@>*)uE9~aHSSn?TWd&Hc4|5l%EBRB31}3Kx!Nz{vV$Glqkdzld!w`D z*h2&vg(L6OPPO-uJ}`#SFKCYsoM-|1ZmNIF9>jnZBfLst)eZnw#aQN>3p{{uew}F3 zkBJ^4DEAUT!iV3peUKDSs=Q*sOc;a_MT6s{dgsh8lc}HuSnf~Wwl&n-N-xhYbK@HN z)SGA`Q>QwPRRor{6I5lp zdg;!>HohW0c^$Wl^7iCrYI@*l#r~jK+qf!0X zbh>=5(kq)d_Hj3{DglbKO;-4xus0#I z51CHi@04x^mra;sz^5~ETLOt4L)Rd6R4%Wu!wdb>!hiNoKHAgw!nmWPIDW^6o(^!_ z+XnG(-74mg|;BWPOz$hq#^$iYLm6{&hs$jBNB1fzS-M%)G1I8(xC}jXt~F{vA9{s=?Lu z>?G0V4@34cKjGdQ(${Xh87ROV&TK&dmABkJ2MxMHl$oEG#u_xpRHY7iSnyV#j=-9G zOcKL+&#Pr=bZ*#FYxK30{90aZ*p@HiBR^w|*|bJ9{o#E@opsZN?O4jL^9$@jcV^Z( zw#d(x!>|Pt+Wi|RBs4s)7Kea^Twp+pEYfQK-lGXsE}Rf)BJI{#vAob5X`S*eOznVqvxX>Z9<{){G-uH{!(8+3A!tS8t1 z@W%S#y~rDmx#RGs=+t;%P8|R&mnsPzM3z;*Tt;L{)4l5IF2bQ@3>p*&{H0}-Qq(W| zN}%S-Wpr+b)@}DKr0^+AYCw6=k>A3jSI1-wx!nZA>?}77qaN@UwZG0H@55zy7^q zb{5})%Wf_K0Fa*tSNtz~u?b)hj{V@0OBrkig1KHE5-GP0j>P687YP7-hHQnqqyIa> zAG^*@1rqpwNzdmSDw-c+<+OpAZ|MO1O#H8;>LR;Z=HOpd)bQv#%QGPo;($#2 zpZMoeqU*$`?74eQtnJDP6psbjc&k^eZZ zGasc&`m)gi@{O6I2=9xYe9O1&=^EH_io17j(Y^O*%3tf{b8)`C>v2N8*x*q8fX?7u z&UoAM8>gm^w}du@M59q8RFn?mC5&hrd%DJ%X4!jrNmNv|hkkB$=lPJXSn&<22}i zKgro>xV=vN9kXsT|F}t%>SMPwsBgQ>QPh~szp6fxlVUCP)Rqu;YD;>rwInOtzV_6+ zySrWgs3O<)x^E!<7(PGWPka6?qw5@4?(<+Vk5-&;c&(Li}M&)wK4Plh` zSLBrs0e=`MffUSK*dCxdlcM2y^OuPLnY*9hycW5+#b||54xZ-<4j~`X`L$NxFV@|1 zk1;uj5fG#z7TQa25`#EtV*dsb;m!EeI?7jggY`pHoqKGXR0g`%Ty((5tM6U6Q7qdu zNmeY0?~mE0(~~kfuNS4OXzygEUjlk~Ki?wOR2kp4Q5dc+k@y>LwD!<;?p)%|`P3TP z_O_hsEIn&7pq?@vUdq>T?ni%NP^h*$X?;`k;dt~sd@6F`@lM8BqykIO9-cB-(S)<- zgCsPzf};bR#uhveyj}L_O8{uWM}0bZMJfn8bhhntc?VFs#0$Dw!*{!!ys9H51B(TK z3Yz6}j%Cq=I^BZj*sz{`rmr#|vWcp?JPlr}JwF%`7YK_cyEr)pKuS_}!`?>*%GjdY z$GDUEcit61s><13bzjtUzZ!WLoW!YbqP&`X966Z^4&`MdfsY7K!N*L#WFU+6j5%F$@<`(Z{^^f`r|L;THu71_r+6 zs;WJ`TKu2rWh(eX#$GH1ne@h(-?^MeXw{{5ceQkMj;6Mdl{Ytt9-o*>VLVrXBASkwLqA0j{>>>R7D=9ebNS3>QtA z%4G;#P5=_xZ;ZE5+f2^lopX)@Er1YjbbUZ=3slh1_*~gV1oQvW*(2wP>ek zGqoQtDL+(dpB~7)o5<&5InT@k(X2IC4=pX#w?a-9VwhK-EjIXLQ3!zjvaH4|jvZiC zfwUHIzoXie+$*d@a?^uZ!HQxtxJ=C!hH^HoHJ>o8)e_ZzPFOMzB%}T;DNGmizPtc) z$}0wp3EB=%oRkPm+X`A!hPx%z{%b<(NlM|fDgkvW{{~~FJe~b~`K{9%v5O!B3)?Ge z_a#o%w}m8MSnDa0ovr+?Vmf1%J7+H459yl&qrP&_q<3xu!CzsWoV&bCv{gu=9!*Jm zL3T1sG*xFHr3^wDJ)K!sChBUxJ_>9VrKiZj|If-03zE3Xi3;`2B#M7_f=!ov}kG5jSHWJE;V+BZeh zC{1XIN&>?r%+51rx}W~Tc68zk8d=c(Iaf9s?d|DdPbnhXq|1$-A*`m!P%LvzMdjj|LR>`KC2^)cY`UVKG>r5{utO z$qNw(%C2KXHdcp!cauduUCWiTm3L(YiWbX1nYc)uEGI1O?jFWgp95<=`C6eDXBrnP zukLi>puI;}6FTuU%id=wNk&9P>1u3X*fH9uTxnn!-yuXUk*!fi7D3zp`B zZKCNWAr6G8+wQ_&J<)i2_X(TB6e8 z(_fGnnNG#{izgPy8L_e=e^f@SjVn(deNji`kD(lPy3sCOcN&tSF3$ zL}qdQd>H7KIz-yY|*vflLe#$uN*)Pgyc#7!*BE5V$ zuO{UIk8-Gb!s`RvWc|1eAd;9gdtDUuy^j1V>At(vZNGou{a4dnH>ca=b;Jau8YYVo zpTt~qEZ!zoqmc)q(f$9CRX9=8{L53=|8E89|3~T)F9VeL1ncAXQh)td>m$$FEKLPR z?P@?Zhy@q(pWGNP3=|&#R_CtnCis9B(Mh1bJvfJ$^zDW;_A3GjlH9w#X7 z0o3ckHzWp)<&l8U_h{`OUL_7OP~%M{JBC-?9ARmuB!I^=#GpDoztUtQlY;gr#8aaD z@>F4(HE7$GlZgh(;w9heO+bJT5n%ZDxd4OWkplt-!#pmuG~yhtLa|of>i;;vD4>(X zm#lA+_(AZ;G(6dKjSj@?9N*d{cz|1eq#42b((ceRNhPUs5;cHc2)h{2N>1AW7F7qh zBiVMkDO(X{3`%cns)Cw`dkJ!Qy%qhY(Z8Q%s{azic7HK0MX4|wcIvs3 z!Wt2o*1sI87R-wT5JUqxgq$0gyx?47Mc;qE1Q%7q!zs}sztAgv;fp+A7B95PV;c=k zVF@sJg%M1YW=U}Mci7i#BLoNNPM)P4CU1$9bJ)Iz*~=tR7Q!o|U1KssWOu~|GVp^O zdO)INesFNIK~!Q`hFDxgBfrRjS&dhN#F;$4rc2|vdpGW~2{n^abVUmZyB?`2rpGVNQHl2N|Ej|ud; zm&G;;kcr|-eT*-OG6re@1s!8LA%)}UDYY~$fE0*@cR0I9<(WWDm;X2x=+sOvhhUhf z*NM!}fB{yTq{Oo%%td-oW5iEIBWzylW0R`jh>STK+Rr$dWJ)#H7Ch3ZD#Udw`x;EG z2>!$Ok;Jj7XOy3VO7@gXJ`h!rvJM2qf)k{F)2b)RdcI}H*+HtCE{hie*6bHI0z4dV z_(j4Q`XVX}iE&majmQ9`S#m|u7!Bp)meT6@5m7!6ZiJVf@QY7?$Ee|fYA2v~^m97m zs*9oE8%Y`|=!|TH@yMTWm$ZC#i(X>=X4nR9L0ENHuJZ)3j4PWnJmT2M#3yP5sj}rv zOYPei+WS;KtTx3nV9xKAle6DBcU4LvrI8hu}!vWKINoB z1R{s)&kz=k*6DblFkKp~*L%IJEbgui3(!Ozt^-C%3saiC zD`<$)66ov>6%PNi#Y8nZK18D#gv}6kIa{Y3{aR4#0a4V zHFOL`sX+vd5Snz1C|FQRq)0J@L<|Tb;D8qtX(~vOq7*{{hzh8P2mz@|Q^0s*aAJp{7EgXcm~x=#e%b>N zN5bXNh@}8AfayD)Zu`WM!2oD+paNm(Yo1MsjKU|plX$7<)5R;>ya5A;@b=#<@bSiv7-=oByN1#gKR zQoD9!w^LGZXk=%AFZ;Cnfhxk==g71c0 zh*Ey_Ydyiy)M+I(YcM7yj_x!2eg-p%WIn~Ef)qlz(EKWUccaKe2<-Hn>N&Y()~QQ* zE#*^-%~x04iTn9+EXWHs${3Dw;9Bn%T#jlgHb^ zC*lM#M;|6jSlD?cUiR+z_O!>mTLP|=e>k~!{`y}$vYe`wUj%MQV!3H^N*|RHho;fr z)P{A~%v~~TTul#f!r2wDw#FlLi_}g>8Yg*AYBd{AgNN8^#S=3|iRq0s@KwX)KRA7Rs8dMxp8mTClN{1z-AWgyNn8Rwq@PeL|V98}v2F5U`*D%#+j zB>!q}QJG-5ZeYpt;dPDcxqKs`H7Z#4DL{@;0$ZdLU5X^M!EljRwW~w-$Dc_{KD~7) zJ}ceGqN6B>cU~Vl;2Kh9-Cw)`98~yQGb7@i(Z9^c$;ZoCgwKQDub-SxTHwX)hS{cH z;;W|#MW>-{-;IY2Fls<&_ZtG`ldoP=!kXlRmn*+ubY)m`dni(QgbkR%kP|kw zGG(TfSu)%|8o7a5bXqTA&LYbXS_$tngbpVno5kzgAJ71?>w`&i1jb=sd^_7Fb?kTj zl39yFg$C%6QvnP><56+C9&3qEd8)|Uk79;K<*3_uD^gdLGw%6qQ9~JU6<26ojE7*5I?o=N71yykpzg#pb_^Pm5Fj3;!CmI{Dj)?jN;gp#g&)LW)Yq#dfz& z1Po4Il;amNL+}#kh#82*HcIfOj(~OSeMGwxRaR)BnPj?Y0x$eDkSszZavB6m6PuL4ff%Q6&kr5QC4wZ&=vU(2pi&T5m)rF(mJyzV*N8Z_z zUO8h8ym102y#bH?NcD%eqD5em!V{05TAc$Ldsim<(F4}z$+#Dj@2Ru>X8GjDz%O2#+Gx}2yI-wA7zsfqlac@gUuBz)9*Y; zN1ql7nq(yC&A3FCDc+sO>m83N-X=)H>s>&M@kc!waYDo&-SRSjyXTgRU)b`_j|p0# z`0EVC;PzH-(55ceKAakcv#bkQ+Rt6L+U^_9a$Uqxc4q&0fJz1GuEu)zkzD>C08~PV5$GMK($s#o8&)dG8 zm-Bp4?kQ}c0ts*Z8da(yb5S%YzGCv$sI`0XuSUZCj+|R9R}Q4hf<(2E=_A;x)!@Dc ze_6RqyF{TKayjf)30H26KVMxIhOszn)W^ zf19vu$h7mx-0eSSZ1Th64w|w}Y!boP7KSReg|VsYrB$ZbW%F3Q&FG3t)$1hDykJK7 zO2rykn(uK0>u8hdy}DE9p5#gqMcohb3_Fb)OCm`ujVUr@O36SK2}eBIDOdOmYW~_4 z&x6_@(A%f(7=up(y{_$!Wo;D0AoD|A6xGWDHOE6eV=(wjqB z9LLS+=jE|!QyHK$KvUPf_I(c~7g|+q_=cz*J$5H0DK7JXd0+bnVqv-$`9os+8fdb{ O=V*V-?vagu%6|Yj(=B)a literal 20275 zcmcHhbx>Sg^eu`uAqfzi1h){}-7O(#un>Yf1b24{?(QDkHMj?NcWIe;^M)Od$z_U~F zyn|pR{t_k3e)B2Chju2ZW+uRnlIDBJkLfk=xTg;SSm&fSUlR30UQPbzjnq+wL=h7t z(-^G8yx%ltr!rW^oFTPKA#ut6caN+Drhmg3XlslaIYQ8m}?SEIn5ir25iThoCgT$M1N$VRWJfyy`I80s>8!Z%{MR z!iq3!p~lFho^L@_>udcgYu`)!PqgiBJa2+xm)WnPW=EZoKt8dH?P7-0wULV#r(v5Z zN)P3|2Z`g_@Su^l^_rwH{1nS1A&+JI;a!lAsYfT5u@M?8Y+mQ$wxIV$>9K!*vaoAB zx6&+&t8G^2jo0E^5T4-0tZQ81H?^KTE8|Gc3bl(MG!TpJMP??O08B3CpI#?qjPF(K z*QeZS`_lHFdD2#+;qr|H9GsS<6;GYs6Dr4NJ1Zkr;N9aMdyHm>`{3#gqbNlbGi=rK zX51qiHrUkJoW&SkXKb?E;pCSVwq(H;z;}u*G_4YY-XrIg!$Y`qis*Wanvx2c&X=AAE!5-(%ISFRwt2*LvJeo zmpjkTxivDvb%`MtSL9i+_=41zf@@9dX|SZ>ZBN) z9SVWd9mY871-F+yhYjs;NFGU(l-4iGNsaJp4QGSUb1q*w4zGFA5ZlwG5Rd%sK+Kqr zm(8Sun>szHVV|h?=8RJdSB6zvVOj}m?g%SAcW zTY{X&es1sgUO+p+Yj+eE$@?oG@;whAZx*PIUKgk;S9sj6(GDmWC;8YKix1PrQ9og5 z2(KjAj#LO%+TsS57*Tt{I`?W!JkCt*CnuLuY?H1@mx6y-wVubP*&_cN_P5Z#u5`Zb z>u~5+J0Pz=TJ-Gdsm6Eyl#naIo!iK8kNWFje}4V2<7Aitn4?=rA+umZs`!EEWRP1Y&0RriXFUEq2;!AhgaRz4k@@;b_Ybbmfr-P$5cGYF1g5~1{p>KW1 z`reV933$1e;hryZ-YPnhoTJML%6d%Eb~6}e>LsY0I$lVu{6qM(DHXTh;89bNc;@8V6B<`j$- z^OZET@_5FTl`lf%zcPNC`x$9WEUneru*UdG-`*hFd3LC<&LyugWckA`W|O*-%;sI( z)}!p2YHj{pukrcTFZ1r}Rs3E}ffF>un~oYZP?h^&)-w)i4d8Ixs9Lvs>;)R$wziRi zAy{aR89zoKA;LYspBJkTKoeJ+NgDEXUpxESi1GU@)UG!C@)ISRZs&oyLew4GZXu~Y zaqDS6Y_DcIxo0d~W7NHvG~n&;SxNz%2tKI{v4h=hM|MlGFZOp%7Nv7F=zluSZ2R^vWtTOjqeSsHSJFQVe= z7N^}ZAJPTOKP1EY6VO-Apt)ah*Ek$DNYA!3aEnU0Y1(cEI~*z>q;H~}l^8s@iX*d# ztz^dIvP=!Agj@~-gg*$ew=Gz>*%FUs2&!n!4i1(f<+6vyAhSu;R`Pg`@kcFy)w0te zm#nq*2w7NIxpp=?!I{!@>a5jHrY=`^J5kJ>-kMIAeb{MOhqu2z?i&vhgKi}q$-hPQ za(MA~_q<~iaiGa;Tk%Ra`6JMu+~lo!mjq4l-q*f6ZBtZyYcg{-J&^Y?({hps1PsXB zaBpsCqWs`0CIw&k`qk0$U*V)=Mjgw0q74nm((qQ-cr~o6Ul1LV+T(oma2^}=>U?V~ zqo2jjA4#H~Sk^sUS%#`#BsWt2ZLC+~%A(zS--uCOG)u!So6D@C1uWn4p;tE89?IlK z-f>CJNRt8#{)!dDQK4R6gTHUuKid|_q?R+qd)MsXdz_?(v4<`0>olHrQGT1kRVmjt zOtnsV<#B#Ap@?6C8wHtpbEf64-5owmZA_Xwx9Bz;)`gpJYsv3aPM^}sa`D0YK3Q#n zQS^O!)fMGWhE2B6l%{ODA1VIklYXkxLEF#OY_N{&6O~CUqxZhd~LBpVX|63{BlX4mbVA2n^>Yt>snEW04GF z6&>bz{OakDAtF+Lml&Hz@yj$qs0=49>)qTBoDxv&97%n^BoX6}{VDFF`T`fm9f+a_ zJ7K$wLo7x^cihSGsW7=``P}z~xH^x?Qk*}Zf5|2q-h?FCyBrVCS$@tF8k2pHV`8Q2 zeP2nZU>Pgs7hf z4%8~$-a{MqFxH}3#fFmI4&k&@Z))0=)?*~eil`Rn>uPzO6;d1c=A&Z*sZTHY-BGv) z=)`VuT?V%GOLvm_`F!leszmkn6NtgO>E1F`(w>OuLJ>W{*BOGX9tcD-=!9) zaci>Ufi<>E`o#16jM5p*aR~?7uW*|^&$vsFFSn|1Z-fIiA}7o;YcVrvoIQpAcLH_s zwdTElqs(4LSfKSFaH$8&D2s5yaAjS`Wqtoc+DDM4u0n;}!EM}4g7fZ!BvXcYj|u)G zDc3N3$C)T!?BT4;#W>e9w6rsVz8=(>7dn6~Gg95hX)eSNq3IFNCtj*Wpe<;vy_MQY zsWY@X(|VAAf)P%En)m$twh1z8ZG1pqbI{A}?VXPci)$kTKTZac>XbV(Z;m`&xLaO1 zAFPHYOF7CTFtvyRz>T%?R`rA_x_ufv#P;}8vrWul-ko!P2S9>C-|bG`<3z3d#wp^+ zrQUlWaEJ_mrccbEh2nLzi$1Q#A_JdA$^Qe0@heDVd7%FX0A?JT<{==I2p9Z#ct$$ z|AFHEQNORNd5X0Owoym6?vt-+THR?Z;-}NWgeeltHEFqXpaBuCjr93oQ+4k|L+m%Z z!l-o0wZDoag1CRpHkwU)z=Isb7VLUD!4^?O)=$87)2Xt6 z-5FBrTK+BPX9IFYv{J&CwlSNGmk+Bcgp^1rkt(7&t6iWC{n|;daY-GxZq+0{+nlXy ziHPu0$&&hxxiKioVI4YVO>j2Vq9F?TxBB3sz(;-^czfsln#^A`WHjQ-ni4%VLYRcq z!YMb8AD0dU>9DA_Yx#q0c6~|XFD!Qg=MSn98H{`3X-Dsymi9D27KWTr-@}v>$UI38 zK4rlRrsv^adfMIi>FL&Y9|!8ZHvjV3m*O+VM@dAN`&MCpjPCdUz9bJRj%lA`YhI3P z2GIR3(Ft~^tM><0aw^0l3!`l31_53|=YQ zq#yWFi6AQUpayNdAxz6XHhp_bXVF9pE&BCDRoVQP$=@BX$rv0YlzsC=J;x@N5uWxxdP`9MG1I}LMQUW=zPwy#TDHu4L2Dc&W{Yn zWuZ$U&xQwVy~^L*h#-Ne=KQKEUDVSU2}D+$IZO=Q9lW<7-3zHnq>-6p{EP^LbP#Bb z@-4ruO&q2KI~i=|L;eSiDDOn;hVFpIqps-qHU;wQQ_ zMr*{*PsNa^Q4=!a(ns3j75(25{uzF4p~_#eLusD(Uc>ui*d1J|?^*@6;m=adG;W=@EWB#Z83&daSwO+bFdNRThl!a;5i4855O3G= zca?xdDvrSKxZmGMIN1jmj(DZNEJT9R>GW^JAMYQlRHr&jISTsOcLzgnGMgMxLAnRN zQQmwl3_;0{gcVvfu4ipwCp=nS?T;$x9nW@LC>A$|0#=yd zo(y7XXZQ)|^Stl`N#tK_4V(MRBX>ih;jDYHSvyeYqSE0rti{+6ulBkwCaUZkV#_0U zhxaRj3!PalC42fNGzf`PB|joQ>2*B(-w8_0LY%gzvlTlq;EkZ{|67fK`%s zJ#V|J46@R%x$n#w_nUee@)jnRubywp3lTE1l zs(y3N-KZxiRqZb)b-NBJ3JYx;9b%==k5SSWc4s%LqwhMxeL7GW&}Q z4adv=$p(aSP2dYfr@}?wDWj-aY!$bW6&5{ol^>B~HiQ)} z9!G(9**9b_myjL2`^Dq!wh{_g!qcj4Q=(-@o=_ui`rBMqQ-E+9ON=gl$iB$$v`6uc z<)58=riA3sj5iOf&=ND;te}Jp4{Q z&YRzF{P06G0-Fk#?w^et+(#On@7e04DWPDitA9JS11dx=8G2b1gI8FFTcbXd=RHR_ zuh6(ER;`W8u1g@PaufR;cNBxMnpYbTNS&mDO66KjvP zfV_yHgnA(mzJ(QfUdC^PV%ef%FjYBC4JI*|t8iH_t&t!O=_MMyX4pQ=2?cieq@;^W zWWLCiH?J*EdDe^Gj2jfc?m{3rr8K(Ej#EU9$1mlEzN^Y?IGb5w;K;P2I8;5@Y`aS3 z#$-L!&L+HZ{Dn8&?6&T!2SnSOmQ z>hhLDwyaVGEyhNMdu^!NlhnaRld^mLTU3(Rr2gXTT%F059W)Sw%(*wC>VZfb|HgLS z@$$?dub-s=`%=F|9lP<+F}Z#QCsaGTw(llg+bDvRn0A0-v|YTe!s{mX#u@A}O&f3W z!7m7#nwyP=q-T}u7t~TLKS-_&*^7Q2ysORX0!9Frxj*$ZC(yJZ(sX@q3b)sA*hUGA z!uNnE7Vkz?Wk!sz^Ow>UnA3lcFRlHx6i%6bJ95t^x zn+wWHxj$uBOe$0NTSaGd-BB3|T720EAf5saC&Z?GSH;Eewo`u0ZsW@kbNqKJ3E6JU zc4nSXow7&$%FlC=sC{yN5DCw8f7v&P3{VgtFLorXZ+~?flMwSbmp651Vs6SGkX-j? zw`x5VQj)0be*G33b##~dgO;0j*MC9#@gCMn1)KJ@aFw344UI(G@giz~Vw9ynWTu^;xX6etBn z;fFgp(984JXY?!vKQoazzV1-Nec;;vzP}J?J=b<)dFl7Z9$9?!S72ed%IKmQUWAm> zNHnPu&8yJ9T$t|BReTDcmJC89yqLij`rhX>(%!^Zc(w9$#h(xROg80GVy62nmKFnR zrQ>kBP3m@aPow|1xp@Oo*hJ`w%(l7fOM?fE;w~ zquAljRw4D%6@j4fDa|ZaYNTaM4eWH^PlA^71_;YE(sYWwuQ_{w^h`Xbi zKr;Q>br`o0re6=j2cN>ngb6VsN@DaXE}y6v5RQj)K_FU8s@uUI;7UA&1jT`AsVO~i zIcqa!a&^H5(WsEX5swQj-$IWL8g`?A2w7fdctLQaT?vHJ^Fc-y;f745&q58|;!q=|TLpZHDQGTBC`F$-R% zySMb*8EWwYU(PV^XwJU|sXPVQy_sI4_Ii9?<9Npr*3gcFNm^nU!rz_5;B5b^hv>!(U~E0&<UH=9C!$@D)`aQ^hvt`k+`gPU7TOeMV&tSAVfE$ zPF70zV|*nr**G(&dqY{X4-jwaTq0cs(%`8;U{Z6aT-Rf1xv(AZJ~i(!{^wKp%|%?AH;L9&pqg5 zi?BpCQJDzJoN@0-wT9WE!;a8YKff>W$6yo_6JK~!nl;JU6y`NE0}qmkafE7e!GO&E z+rTbA`C~6e_#e;9;~5xi6W`US5SrzR-dZB^fG{J-7*Ii8GpY&_DH#}8#x|J1g$tZV zi6vLY+o;aoF8W8qMT$dtY04e};{!}4bg7up+q@%%lz3jw{Z2_?GP_ma@`?BUC*1L_ z93t&^ztFea+cDR&@oC1XimP9E-Hb=$8~j-E+U22MEJlq9VD!?ZaV?CGQY`0vE&dpS zC`<(LNkP~A!B(}{LQ=65f0|>YCD*HQDZ8+1uH!D(ZU$Fh>2MO1+tO-_yQ5=>{Lp*3 zz@JAn5!EI*LVyyur)}E3KSZRtS(G{}QP{VwMN0vrmEx{%Xq1c#@*$Ev&fR3)^2Akj ztl3M67rtNJAz+ADsp@~BtwRq1B^xAYMQ%`w#ZaFtXfxEh82=R&5vP^3<6A z0a9eenzfO-#WiAIQDsjcOrfW+jrwj)KXKO}{N~^g46MTWIR3_WYZ@mwaKWPyLn|f! ztX0aRF1cOrLZ7NS^uY5gVz+6)`WgsRH;ERDF%=XRM(_F&C*GLS>ozC`tIu4{iz@#TJ;RUnDYDMS=|ucOWtcO zISl9~2T_lf!==FFE;Ry;tDoA5DUipXz>nDG7CA7x6(tO#S%EmYz)P_Dk9b zhR94H3V|xO!Vt1xY>P4N$|xfDD{UKX(7J1KiGmVR1^yfh1;N;R5&a^DIC!lgHU=WJ zY@$C@ug%EbnOKP!khjW#*0tOmLNN3-U%WDs(-|3J?xBW*hJ3#~3%IZl`>z+LEI2g7 zpNvQq2eBySmJp@C`DsDzPl5l9{N`xCSv}DHpAo#zck*H9I+vcqPUU$(wK4##d6Si@6rNNegd zYqHJ(qf1*eoLG1-KBRb%53&;@o0m%DBdWDMRlph~o;*ea27-*qH177jJ8VJ5eTFCF6+Q<`k~6bAo(@ z8MhE2XO)lyyo|K{e0zT`ZMQ$DOxt_@ahcgw#>yHnRjqp@pw8~$ahbfyUBbM(qtZ7W z?EIJO!5#0Mck-#m)eydB=!9Q=o)6vLTD4HFcTz>Ayxr?DSbirxQ!jj{S}SOtn(Fc? zW3d4_>#=p~sG%}T2vy7bj>hJADaL#}D_Uu!-~9RRZQm2y{)qaq;L=>pJ=Cvut*!b+ zoO?P1<9Z7ngdu;c3B9|$;H)$_f-2_Kzx@%#gT4h&1{qlPeuCf(0#a`@~a2>ktr|Ir!b{i35vy`0P^KYzWrw+`f8@9OB6FvKU>Wp(Pf`hC7N0eLhIi`0qB&szZKRjw>rZXOm5Z2e|?`q1eEk7_NU<)1`CO=N2 zK_c5eu2eL{^_#xQ4S!?)yBkg(1cwy+`ioB`*TvSOQz`EGF`8IIihZg_Y!n0G+W)Er z0D|%QJ2j*qR`kv$wGOkn!On2LqTSzBM z!YHJQ*HY|Xzs5yhqm+b0Ffab$Jt}Ei*vIhKnm1c+B8BMeH>@)SOdmp&GqiK8f%b7` z5lsd{oq_+3*-{|(lMpTEFQ3!v^f{tdJM8!;aM~AcCVShXn65n&E|s!7cs(G} z>0E-IvI4Rr_`4MIHd8ORWq|L)IL#QR(fJXC0BxdOssmXn7iYmYo*nTRF^^K zhw$GP3M9)S@-@X0V zO)kXDPC{l0w%^QE&tNwpS9A;_1EQXXb+O}F%tYgbkK@du@7UXI(MkA)Av2Oci388N zvk_B3(sL>k?z{1g;_xvo@mky0!+dhmC1IE zQ)TP$QOoedVudEv&-cL+kvl}>B)p-(f&sAe47VOY!P97uwr)WxJKbY^8ZAwp}FrSm(G*duhzl4f!A7aCb8R$dE{N+TL;8 z*HK^vW8}a9#aq4m(2Bv;F|wbiIu0FhaOwD_!dR{<4$%yXls~SB2bvbjL1W+Y?C; zV~@gb_F7!lwa;yz-LRWnHdnj~!9Pi^TE4H_@VoO61y$6-w3}Cp18c9Lw6*5nznVxi zB)!npMu#LLmnb87f{ard0)H72Bni{@-wRlwPcWll+3F)WP?gKils+&-HsM{k#5|Hx zB`O>O!}hnZH$v|TE}2XyJ$>?Y%uUY*6oe=T3y05!ve)D7-TMO0uaidUb-wm?|K_co z9lh8Uz^)Pk{v<}bL70ezw9jZcr0g{cv_E7 zY5O4xXGKkWD@(3JtZh;&(@jHZw8$C*M1jM#!sqtlEFpKcuW~Z5xav8ybsaJ- zABVhMgG%49mC9~JElzwl@wC`KubIqJ-dt!qt97kRX-hM>*qqw1= zBR~pSnk{V7%=($Gc&sAT`8Z0BaByQi(PZy+~3U-)Y0d0>ERUmD>9V4qA)`7oT+AzfV-hB`uE(gSr`J zVuLVJ9{l$zY{g?s@`rFN6L$?~cZ(I8w;RkyGU%~XI(w4bee$9(>uXYP_%aGL<5Il) zC>Nk{)WXhx@7KC0Lqa~d6Lff>VxvFPRcmGPB$z{i_u)*%>Hh`YBf}<~tVe%3IUOEU z>kvEHhlNso!h!?_NzH#n*twJ1Y+LQNC6wI9$JP<_Z4}nhEDo%C8#1lcw#!bSz5C%l z;$$^DDJH;DJN&TuZadl5!|hY2s`qhgOmTP#gY2Zq+3I#L!S?;w?N~9z&00lM?RLSQ zuwpf3UZ!Li2OzFsx0AH@6Na|qvNmI=N}!St#w^OmS`7 zSILWP&gx83h()=N9${fUoFBcPhrD0Bf^F7CBTV9aF=as~72+bDfT~RYKI7hyzSPxt z!eQv@IyMa+x7|Y9HHi=uPoDrmj#=7yJnzK5v_6En3 z7`+_HK~)#=F9PKA)yZ(7x61#>iLMtnyMpHjH5U-$LJ!XAb?uJekka+GE2w&yA9fm{ zUww0vZ)7|$P-jbJ|!hkkZ`~v*n4AFO~VMK#4KY^S+THMidasR8EIrU~mWR1>g zU-0VOjM=n)1?au!6Do@`dEWal$XJ(3M1eR@+xKr|LzdS=aA+1AR4%TE?0|&w?#7rR z4;O{$uQ}np$p6Sc3}`N(4&pfs3#!j;`7MlDH{T5-E>p~l#xSP5FTFIv@=yHT! zlVQ;J1_K;6mnrNR0g((IE@H(#+rSPNgQFLFQ4KkfP?f z+}^!l{UxUW46LA+6JHq-*Etqd7j{&Vkom7eLLLO(VtJZFl|k#R>y||oB8Fd12*eQw z@n4bw=4#?t9|5ZJr4chi+c0XN)rv?QasN3Pj%#lW*^~OGS``Bk&gUi@sSjj%g1#7R zpveJ2_xrUFDgU;&YuRk-xMWj~GXBw`;HSeASKje#`}WdD{i%%P*lh1y9Rs2 zruEW5r8Nc_kjnc8Bo+lC_Yttp}r7uk8^!UEo~jSxN>mL^dV&hqmtk4B#v4+ln9hLcdF%nGYvgcH~~tA#PK! zQp5k)c10bJYIPHvYjKe%_piV$!)O`i=Z?&1MkM@t|0Xt1sM5|3Z z3p*p_ApXIZ)$?zSwvHi&OqhIid_zaSzXsF>fT%kFkC=1N*&XwB?0nS;|1t59FvBKr zzXCW2B%7%3sc!NfSGxY?3|;wSyh_ijk-0Vzb`}Yq^n{^OzGTJxEGk>aR?!DuQa$ep zOfmp#$E4_nf61Suy1!Zil2)<)%EOS(0az34IDFRpqIdOV2*BW{QY3dqs$;qjnAN)f z$?-b>+G;*Ie=f6RwU3xhy^)IFntF@Z4U=C}tV02@90q>x&Nnv1ti1_Y3Nqt1BPMJ& zuJ%s6d2*+^`q2-YDY+u$ZGZ>$*;+Fs^I_9gkj{thZ!D1WpQtv$V92|xJajGQQ&DfN zO_M73XqpVaZRd1J!J#-gbAY|Gi9vzdmkapV`7zgHhL+Z?A6iruc{S;UxJlcaAQAw) zWpA&&hc>aZM=dr~oO?f=xpGLtPAvc*MF<3subS7Xn65=}J;~L-s6a+dA?0N|8Dmr( z{W*Lb&8r$@nsjyh8T}>d)`)HH`+$5Xdi=G3nwq4I|I7-W08pxmJd1Gb_}9G8Nfa4p z?j9ehpKlqAxGvAer}>@!RydOEtX0WngyvROsCz!%V`h!;3U()FMhadZB>i&>fAUJy z;=}i9eC%XY^r|UBY~fEm0pq80WC$~p70|mp|F*50rXM#r?R~<9J`;Rvhc3)!99(>6 z7joBlI$Mfb0xX+sVz(WDL9%u`c%5$0hu9)ag->0du$l>8V)tQ1bQ!!aIvMl&n{J;i zj2g(Qce(tVzWFn`;dwsqnVzZ6DQC@T({|j-Q9!KlD zT`5p!$k%07tEu(yt=jo}NQ(~mUXYhRs@ikhe^x_igvUr4rY%E|b~A#uE_wrOG;V*) z`(}Y0C3+u9EwL5%!zbPURbN3{@6X^olakJfU*N22rZv=NsRk5kEG!W5erVJ=G{sm3zU|}}GR1BY5|4K5e3%6h0 zhf&_zeIwD5d8Ot!U^lWLVq6UNdz|$*ah8TmsWs>6_W2Y-V!TjQ-sNv>sjp8f84o+Z zv`Ov`6@(`Mvjcj8j6v+{EYx+q+OA(BMVQL;JZRy9`-uHhBj)TN-;IH5j)S92z6NgY zx2`JXD`sbsw!NMJKTantJq^|@r=$9F9`|Vt42j^>0M>&g!6WKe_Gn>x@C$3k_x3Pd zuCli_Vto%ab;&6{a-80D7iVZMEK#y&tN$1x5v!{y+AQg6aoqQD>y`>{%@zZ)w>pt{c(iTB#G5)^3eYQBNS3aRuC-Y{Cyoxn*Vl8TB!cdIp6%*B5OJ9 zbW=-!1uGSrQ?~4yGXceV$*O5b5!K%gdChpllwq*_UlORH;NjGAd^-KKNls1L6Cm8|k8t9^AKO-A&(q^^6> zE>4sDM?d{>#ApurjpJn;)mUF*L<^`%nQ8aX6$lPlii{LM5@FBe_!VTz)g7jh451rj zp>l-H#9j!~Dn^d#Ww@W^>0!t@fb14McT?pwwXt->^qhnmuHfSzAlLqt=*3G-Ig_bp zO?blBL>{YCXaiswE-P2e0u>`eoLXD4eS4Sf$zi6bfRY_8`O$zAN}N*_ojR5{_}z{U zw*MQk<(U8|3TsN_UM1pNe+++EJ`)e`!s?Jf38K58OF5DtP%&;dq|sSO)jXC~9)M7V6XJ(+Vu@<`SWY^ut55G&Ow;4${sedAm?jsj&FxvK`v2<3e^m572t3|tD z#=Vpz8_E82?H-4edPs{(=sctDDQ zGm4DqP+G>SG?AT!>mzWLU!%O0N#|q$4bI-}!Nrb`4IrE{C83Tr-YB_|db27URW!pw z3aC$58NG->IFB-F+chuPXYF?ED}6;uHnHMaPm6H(rf}rm{=wX5*X zE>527wYa;JaaugDt5r8=vH*E{=IIt>R$R`?WZUIopzCRDZr6Hk`qch~spub*vLR{M zPWHOGwhRkBif&1p>CBs zOGF~U^>O|3J1>bt%{QdQ*#+vJF;7Z=`uhw6QG)v@`HR9H0UotDwq*8NCm;`44GTfyaG+;U}`Z@pPW+@-?kJ@5|Nm z1~g75hN};^0(4}M86sg*e@D{C@ODmTdXSCwi_rZi7GByk6C<{086)ie9v_g5V?hd^ z?UDaQm|W7CcUtZl=QD~(o*WbajP_orDa;0W=wrs4;eUExE|uMLf<-j3q!4+r`#bU> znRS4M_bPpE;A6(F9^0Ricj-T(^^hO=s6-^M0pjcTqVP##iDHVdr~X59-B7xI9}Kx) z@~WZ)NE^E2G{8mqW>?g3%HVN8B%reZxL=zHy+Jjnro803fmx(XgSK%;`W zzCn4jfj%`>KK0#9`2TNp&}y(j;}RhLL0_OfK(Qo6RuRKjJ4l*q1yG)B zuzJ3I)*W;S6&tCV?rU}IvjCRCZgVBKhYeKV*2=Ozr0(qa}f(@>=R;M5RKSrGnDt{N2I}#7|w&Q}pZO`Flpw z9tWW|4O8%Hy|NYm+O?mm0p#rR?5O#2v7%0;LdSjkzD~tzsg^z|8EyW)a_vBw)8WLn zLS=J0GZC`dDFy7EBQ`+)(T`gTZF5bx9WCDvVSr~SY( zZUq){_KS;Le^;w3*|(C%D9g)-Lx)p`cQ}$pT^n7%ele|;vum}o-mT|Ls2!^luBWQI zOW+M*V&~NeQH~@6*9|RW-@us>^%ZmXQ1(oQa+lipHewy{ zYRW-FJYT`Z{_1j4RQk1%X>VFSwj(+E%&@EX0!5RUDMIL2qmwF*)>7R~>9f1T0kZv= zj*#)S*1}nw7V%=AN4@kVC6Ud8s!JY`_tQD=F0-)tCWOIFRBq5m3i|Zccw#3`AkieO zmmI*Q2DN?bX^yWw>a%OV@VnMV@)5Sm#;)yYs?b7o#VI?^;@1j_Ss#>#eZ< zC67{3Ta{m1IJB=WI&Pa54tM-6l_w0U=r(5$=k;>o6<-r#J74DUhTt1#?Wx+cJxy#` zUTKkAlhTu>{fX?WC!Y(kJ12Hp?Lk^_KCNZY=hHl#e*$}kARO^|eIO516q)Y@0TbD> zHr!&ycvfCU{_zb_*^UB`h?XDZ=LZv6_YUlf4NYVAhE-Y5PLAk{%UCh-A1;we?ar8; zOd8q3Gx1TU238h5&}zF-yBJ+;&Ve&igIILFxljf69P-D_YULwT2P2|s*9q=S zEwAgD&|7jRC(>fP)X{l_SYddICghEeGTTe0n(!J{B1K}Q70?Eawkjnx4sDWTIS1>W zVA}onwp6U0yTq1+K~YUKv@)fF0kS&f;%}Ude2pS9!Ro;Si>J|4tQ~$-;xd$xJFSKRvR03F^X3xjMJ4LjlpRhapf4gC#z0 z!3EwaE-w)gy)UJL_JsbUf(TzouHff|iD}EcZLh7jLln!e73;5ljd$exCj(0yaz4BS zJqkJ|P>;G1AWLH^fT;pGBf}V9*kZR%0n)4x2TLr!hSd*h(>cuV1)_H(QA(aP6f#BM z;uqN!mE*lWC*w`eHSI@wYK47!FU_ictd_ERAxQ$V+0i0(Bzf2~{&t#jbR_?LaYJg- zkX3{4=l;Z4Y_Qa#@FB9SZ|RAO z*+PgQqmaG$wrrV>!{0$bl)d03NM&r1GNpNZdB6meexA6D z2>Itar0D)dQV!v;tkw)oE%|-;-BZ%_W4U>y>VmK_Ug;LWaw+oRHKJlGJT`bOemT&2 zHtcp|8&4%EItIbK@2_LsoO47eeTIYA6k%P4KxEEj%1jxRJW!ME4h9tvq%03&2}(wTyWcTLk%gaU*)pyU!h^&NmaMW7+D&M+P6g z_j-=s|M=wuvZQWdagdaIkCi*RwXsY--xJkQXUyCe)y9&9cP0PbZC-LVHf_wWJ!Xpu z+H@;=Zr~HX0tcu8d35~UER%`;cN0KMYI=2Ht90~KSsVoc6Q1zyhUejli6y+xX3fso z`9uZmxU%COR#Zz$Pf~(C?Q}FD?qIpnv{uTuoHNDCoi4eWDdo9SB244~+chx8eWnJj zT&LF18C|>w^FLo5&i8%WrA>Do2W!8?PMf<$v5wVKZo@W@gX^Po9ZiLK{C4-7c@T@; zQd(~ec*-5t(}{T9Kpte)`9#tGAuJXt%FPEw-DRfH+#JEP1}paWmE!Nc|8lnekC>_>lDtut6PUQ`+AAu4G)zx>O~&0$VA=Rdlr z@ii!9{wOs6r|98-r=QD#8tAW~{mk+I|KkDwpR50pbx6Yx)Whq8{?}{OP~@B>`RW@~ zR6d^kp1dRDB`G~<3=gV`d?9BoI=faeF7YcNRx}cq@-Lp}h{iSd4^X^Mxh9`^zy5*9 zU5fC2VxP3;w%ucozVrbKxWuWN&C|c6$$x`X@6Az4mxtZVl_HyXwafw=($yiB)bEP# zl+Bo{MitfSi1FMk%C{6zz5mr#V0@3-LE!5UJRhEHAxC;}>N|)K+S-3kJ^OA)-JC-- z2@j-u|2g(aLwinvk})hw?-{%!^1dPiXMGz0SW*ma#!zH2?g5E)z3^(LY3l|zxXM|e zPSVRg6iFNYGOQ;T7_9yTk>1$=d*WNE^KZ^5Tz}pbQM-C_`8Xp1c_|U)p%d|#duueZ zHhIZ7axCr1i1p3fXJwR0GWgTQSa00P`k%~LS`z~qd%fUwlqHV?%%a|{+BX@fUhoVq zDmY2@a*7m+cNW^Eat62l3D7_qT+D9ZqQUAEF?N%^+e3v>`9p!asuQ_itL5>4s>iIs z!F>(d62~*`(&k$%jots*YwjH*d-hH(e`83+P9+#pboEL+%@jf+Fi@0~BsJhC6@HBe zBQ|mSh6Ry4FH3$CyZ6Y$cm+rbKdp@MsFw6Eq~O8?lmnzEjCu7v@`IH>nN_(^48~3L zz5JX((pvNf;MQp=MDG0t8m#S=-Ib1}#VURyUg~|FdKu}178#zazF{j8^Rfq@(U1SS zrGA2~FFOY4pf}itxhLF#A}U2#k9bTH-;t=^4}D;MObw5S<)1{}4)zKadIdvJeejQWlG0dC^bs?Xo!uNzXcn_#76=nVl*6R>6xOwtY(BX=Md!laQ5@GApXYtgd!F;CbP}4X*an233silsBwvoUZ&_I@u58?!iJGrg)WJv7!lDw3 zRPZ#h@LhV)X_3e8HL}bPDc}chB4weGLawD5MkN+17(ZkPl+JY@W@V-xg9&r5s#VT! zBu&~UcO_pn7SvDxvZEXhecjCa0^+Uc2Zsm~VZ0KU%by}Dc&qha?;_6BBOZdk%%gaJXA#J%1P8(r$BguPZB3#5`f_uwtMo0dy%1Wr6K z6Uuv_ty2QICbV!NQ`9@M1)bm*xR)*qT|~~;>khHPzCm7m<9dxZUGS@%+1&oOAYe`+ zmX-S-<|&D)GIojKPdJ=7Bw8ppP~aC)o}j}TQqhxowlHRI{?L&{T=pTfT7OqlD-hm(AZQd3jEXmU1Y}0a(e|HH z8!CRLUmxc`&r3u^#k33sZ{~nN|MAt9XFDCWN-tHdX}hZ|*LrKF=KJ!NNyqe71TKij zlV2VYFb?+JO}AbzM@-dAZ((h>Hd8UR(zLmQn>`5kf_?F6ntj^AWATL`$T0^lx)>2H zY}eGm5!>Ri&2+}+)A->J)MjIZM0w_35wG93I*D)W;OR-PDW7(+5P_rvc*|l}lP~I^ zh2I+*owNw(r|>0aKCkdn=rx$pG}en7<=m7aw!&Ut*Y`CM@zg1n_Rv^y2+n79}K zD_F$VDPv?aM&WKNvF6%_0Vd=1$VNHotuNjbhi3yvE>?wxAE|UC#tm#4y3?q%->qIe z1d3>R|>Qb^VjE z!-t8m(W18gSba&$?xw2hd+f$n#+Xf5@z9ml2owz^B&#_a8vV5HAqiC!bpE)o?HaP+ zj|6pNpw~N5e#Jhsf38uhBYxhL+CZ_|{GHxqdaEGbqU-`pFwu$@^A%_3cxfD@#}g4@ zPR(CF#2RqmXjpn9#cC<(pk+vsZnjc7a&AcqLM*hQnvIxQ7WZD5G@{$(C-jLDYd(2w z=MDV*rrJ2JVf0&k#!%Gx+hx{{8ED)I#+^vI(4+mHdCbrA zD9|2eRT9_{c}&1_N*%%SYuVeRRg~g#EZFIpP4gz&>Q3?R0Y=tfH;U12mrZE0y?(wGdk^w)? z(7mDKdu`J`%cG!465{^NGMrdK<(Zy;tp#3Mxbd5x9_08I+5vuCnd68KDuZZcdCEh& z3qw@A1|wu7X)yMvsJ2eim27tO-0f3LlSLmT)=_{kL00)2z4vDdfei`ulSG?9p57$M z5hDr`Ks2`u>FCCoL+Jz@1nKun<~8Ur|2Zb2`|o>7P`GA9kaclh&KlzrG#Nz) zJLQdCAawZBBTp=5iTF7(*@5B*N){y`tzyG-Q?C4D`mZk(8Sq}*HJDm;v3ILY+6>$G zOrws%$CWI8UDrbX#pvP4xW&61z;$3UfLTO}_6iLOq^2HwDC#)a>Gy+{+HCrtUBGrT z4p>b6U+)0Ec#FK4)M^#8aO$n|4VXbiwX|o5ivC)gmUVOB-(%vh@;ewDpX~I%^36yYi!zDunX9qc7JI{sD6x0mfT(v8>-zk1CV@2DvI{CD~36R1-4bXS*bioNaG+!lx# za)kk$VSH(dpU;|8~r+;1=GIac1+xcBGcTq=gM9rt=14pG%CnMbQlSz-~o z7AD_(z^hq^C0t%`>N_nl>s;dch;L$3#?RBH zlL2X2;m^C!uDmq&Uk=}gG8a417Bqln_lIwt{L{D0rzr0> zYxYKd(I#svwe$nh+&)sBAv_eVTk=P!1MUx?*VSR)YF(R9*LT!}JQ=q=Z;^5OCc_nbZ zO(R)cS2A<@=HQzrxJdC_A8dcJPk(Wc%1;@Q120SS+Q9fTcc4-gEr#J;`^8c|v>CwxC# zie=vo6m6S1K|+W@D-_s0fyzT}N!!b+oz~QrFoIf08KSuv>$gswa+ftUvyK8TcmjA! LJBteQbGQEoS9n~z diff --git a/vignettes/cisp.rmd b/vignettes/cisp.rmd index 14512fb..4bbb0c5 100644 --- a/vignettes/cisp.rmd +++ b/vignettes/cisp.rmd @@ -65,7 +65,7 @@ system.time({ g = cisp::spc(ndvi,cores = 6) }) ## user system elapsed -## 1.14 0.30 23.16 +## 0.84 0.20 21.50 g ## *** Spatial Pattern Correlation ##