From 8c0ebe3e506a751ee6c91cdc30361b686ad9d620 Mon Sep 17 00:00:00 2001 From: Grobe Corinna Date: Thu, 16 May 2024 12:01:48 +0200 Subject: [PATCH] Hotfix for issue #31 - LF1: change in time series --- 2773 Monitoring.xlsx | Bin 49846 -> 50808 bytes R/download_helpers.R | 8 +++++++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/2773 Monitoring.xlsx b/2773 Monitoring.xlsx index c45bf5b34c8c07951beda4526c328d6e480aa8c0..e7c534cf9720118debe00260c4c2f2ee3cad9080 100644 GIT binary patch delta 20109 zcma&Nb97}}^fee(Y^P#7Rk3Y56<2JVr()Z#Bo*7XZQHgg?!5QD-`C&h(PMP~d+)h( z&$ZT^>#VcyJ`I83e&Ega;Z=dfM`_qz$jj zm0H0O2E^7MAe4kxmH8`lH9ZCzevk3Uq0N{OxSHrEZ@ z;`<(y3pQR|g$VDhp;_q;{8sNYhze)b18v2R=KrQI3xXy_Y_L~5%uDwq7I=0W)nG{u zXMSU)`+-$l!09R{*$ob3tfl-e%2YF&kFKCuJq@Ar`?gEE48%_@@HP(n4J|+*N`FGm z!9!sw(&;SIhwspIZC?Cg>kASRqZ7CE_v@YLrAs5W(zVt5@0I~--Z zjk)`E%k&t_bg+^ITL$>{e@|(rQGCPtJ3Bcv*G` zy*d@kIbZ`L_Ztn7j`yWh;v0Pcwl2oj6l7Nvt9d|+dz70#zip)m2tRP_F_)FhTPfN};=lv~{% zw>rIUg;3+sp8Ew+q+V3Zs2TM(EbX>yo*Z{g`qjX{`$SLkJB|Rq$LW`$D^QjlUnEpS z_M77H!+@Z7gwD>O$M)N4MQ~X;S>~TeUZ5wX8Y`zGRA9 z#luRfDa@KR)7H|6YTVOe%m_qqL7j1%{R}N&bmy@nbTM^YoQg4feZ=&xx{#=#Z*ek$ z&At-uQ>O*k#M%^p(1)rCCzUE|?r~AnbVgVbGK;kEki)RUWD2oHfL$VyOutagy8e^D zT0z8NFqrdXb8ojVARq+s*-&2rHe~NhnGaw6H`sWh?sN)=(bK+oj{7FL8EGzp5I?fH zwjv@U+T%O<8+`APbf64QDz|*7ylBZ#`3p4N!_Ubq$h+4UV+}KQ8J4z+ATB;O=SWp| z-h+9kqR!^Am`cmYKl3S=&iz5pPzy(!*x2u}k(I?NE;NYsvbEZnb1XR%U9<$oa zK~q*O?1qemq7sbkchiW- zN!fL#Uc1*;s~vccC8}sM9#B<|a;9Kk`;8)%E9%hRb|2T3K;mP7c!uIzQ*SK>@>})v zu9QJkx+KxKGn^D;4H@PkS$VzeN@IW-N* z2?lOhM3g-IR0@oH(JXtUZ^4D9)c0`(^2M5buK30lCUcIqF@B{HNV-<7UVrKy7Z%S4bDy# zo(+#TS;+rGK3*LeD9k=W5J6ybYm+-shK6gXEYXI)n%Aoq=0P2R;0*W^LRJt6w&|c4 z7HZosc$6>q!2S#6f~fLXXksBip&*#c_vo^XD{plCs}&-qm)GTh-oZ0e@gyTbx+_52 zCH1`F;Ig`=EY4cL&#fDIx|$P3$6p1q5L^LXdSLzXj88ZU;8ZbwlU#iCyFP~Z8ptZ; zBFEREdI0t36dXn(u@ zT|eM{pWEaz)&&D5l%TX%XXdH_%6cEq*tor{=(fkhPO#)YW+w7=<5kd9i2vz=WIXFU zyX(*Is?l%@kEym&W5vY5!XMQ8Kv@Ap zjhCB?zvfYH@&{I0CExN}aNN7Fpw|o679ZaoaqzFyu2wvY=w~y? zZ(Ri#RBDIeVhj7N_vV)LoUNIbT(k!mE767pQ94S(E1Y|m>-?&qoMUxWnuj+|`IvIZ zS~l1yz+P*0I5aWAO)bbAn5lh2zRS@wTZrXwUqYskEE+pH4SdKfUfBW$eFAqmSfbOg z^t&R4wnDHR1pT0|<4ik5PpE+w2!7@1$zAl1sYcW$1`I8oC;2&j)-N}fD3ukdOW`Z9 z>qF9K$ec;3L_3gtH}tC_9HG@%KNlVC*N~ipfp`cIM>q|Et*y3`WsqB)rDlISa$_C# z7r&IBlaoq##N0g;Bq<`u6GP&l)z#LT454(7l7cGgzh01Csuoz`p&o3YbAs@p?<39X zYFj5oyZiXMD&&>$wje~apvs)T3+f}c48b$)6jFcBg8&e=%KvtQaaVyMbrGU>si;KG z0lEq;>|y4}8XYhiDb3%59HY{6rCkQeLcnUg zVNK{5WObu&Y_!8@3ux`<8!<7lGHuu;1y(1$M1*LCh>3BSLN5!FQiI4M5fkvv1lC&W z$flMM>w{Y>BJzZBnr3P!^9OOl6Bn5zv9~MUX)k1sK*O zP@#*VR1Li$6*v9ilS=&LJ8nEqzn)u(?SnD6pZF{`K%JzPd$vvtml%%sm498`B2lc< znSAf`^CT(<>X~-XTFiK0d%f;>F_;;iMqPh>$TsKyctd<8>&pf$t1%)>av+I<_m{ z(7m(kK9HZ<$qq{CNmR5-Z4!T|Cc1dKWPCMXjbdI!KdSraIOWJmkb@2*a`Ez>Xx3xf z4Ns)=Go2DEVxp)+iv^LYP*R*Qy!mVA?H~qbsF7MDl!zS9itX_I>D9bV<#~7ygiRo5 zrjM+#0XHybn^VGs3n=kJrB9uS)9{+Vol?R5q3Lgg;*w{EEkz-Q3|Rc1!Ix zhIi`HDpz(Y$N5~N0;Qc#b5)NCXVKfC5Zp?v$r#o0stc70_P1FbU9(Ey zjBmeoAdT*+Y|^)#%ud*QU)^4`GI{vc{7p?toF%fi;#lv43zxP0xW z97#lx0XameMj$>mn#_Ak>VxD@Ro1{UU4yId&3~GDnlL8qf@4z1Ml{JU`*|Ag73-Ul z%C2ofv|Nk#;)MeMzByDSt%}^_ai#%vj%zAzalb7HnlI>ub<1^ zQR(RUZo4J^#IVEQ-6|2_^!lRIM2lhz)=)B-um06T*Kn}{a%uwW3+>eNjGY_H$($M9 zSC;dKO<-%f1}Yk=aKI3co^Qq1Gr4`OYB|cV^{u?|WnS(pM-=@lw&`_ct_$X%Y?XMQ z$3~a^YefbpUj<|Z{4!IGmUST_s@5ql5dy$C)pbpFVpW=3CEFEvOm%iOT#NaZnf$= znt$lk^K-XlPa?T6Do3@+xcpcH{!*$F5b9vxQy#RGhdyA~9t?^TMj=Hb^5GHUYb*2* z`-mO@Y8fsV=YVTvY%9jRkLb4A+zUp&)^%N}+cyRGEj6!Nz3Y6f=`(e&eKooVT7njg z(Td#6+;ua;W{k;}u*xqO8k=+eE*q}33sD29uhWtZ%En=YlZ4ik)UCkLc#q`cqPu5l z-N3>*{@unJ`=Ge(Shjll_(|iFm2>sVhDm}`2D4N#8{$PEO8uCX}@6|*f=lDbP(%gYfL{!(ANW= z&AolzUtcde0q@6ylXw2fEPmkOExZ+Yeed;%H-0Krch%MHXiv@5`?z`DD79ToPH$8v zTwrgswcXU!E3ee;>}br?dD*-~%<{6gwP~;Wxq`Bn4#C5s?Ed5Zx^r~AwGk`%G}U|< zsI;|NRA+W)#w^Cxh(qa_8{EWUTmaJ3PfO>y-I212CAhb&uj!#GsR@29dOC6+zvF^_ zKF4nQrGQ>0^SHT^^SE(mgSdI78~*)D!@MP$NGrezudCAhC82lgJi)m;{a3IF4bt?M zZ2wSPgxN23(G^fzZVOH~*=vxtjZPf7mQJy*Rb67ROZEQ~3^3fn|No2DibD1uyVWqx zf7sc2212(XxnEsKxm~&NfnGhZ4R&#>m~@5HsQ+@nZYy#?pbG9@r9Smz2SplJA;|4c z4~r$onFgs0s{`K#2DJq`n=_tX+H_#RHXmS7ya=za))TL;&b`2{&aI=mU5m!L zuv9BR_P=>4?&B&T_BJXn1locTq!sgs^s-}+N;Bnx>S35ebu1GLZCcj{>j90)7Rc{u z(jp)ei0)vItUP|hv|U@i^WUMlci;o{uVGP<{IM}BiLbwfOKM{cP^SQ96wD}*yG9vw z?C8M*p4hFZcSvjkG{oJmti8}gk$7PWTs$bmlhBb1)#&x<{5}> zQB3Yd6W?*vDv6xGj8u6b6f>*1%-K3c2`y>WdrB{SpI*`{d6*?~3_9NBMv*s8LvyB- zUPZ&8QO4pcZ;;-{%dG*59~Oq+3G5f<1y1)KP;n9*K@(hA!KhqyW1SsrofC$I?W2Z^ z+>AB9a^NR%?!d<>UgM&ghOC9sR>q@!o1S8n_M+SgP2JVc3SD*DSASy|SdnuQFVlQWSdgOPlOD{|3BB63k4h3ZZTu+)c1c8h}Qu>)mHo-W3Hzt`q2A3V=QL z(unn`Rp0n4!;pxu#TX9ZJ@gtEmd6nhISOlb4ep)Af5-y=v7L^`k6m4VyTWaTE8!4% z=-AjHJGCGpc|2wa8uHuI`66;TL@TtnadK1v8Pnn4PwOZeG8FZRXp^)@T1jjlG^A|Y zVbI~?w^AvySImXdDJIuHJOd^YI0V5s&RT=kZy0J->*jB(e$$yt-3#u1fV#|ALll<` znhNmTgduZgC^+^tvod9je!VllJMS8XU=j(+bN`p}jQf9-v;Q~ce;8XDp{c}v_U#{| zc99t`#O?p(0W(5_6wbi|2YHUP5<0fGn)Nde4vSRHZpLRp3qx`WG5?d`La7kZ^4Nbg z1R$jJPxmFR_U6zbI{I*0e zFCdaM@Zcb5Rrx7`=C1(KKWU|k^_?SNh5bRAP77vfWV(0WT+)RFy;$}40k)b$*hosO zp3rL07{p*sJwS^Qj-`Eu~ChlZXqGCtd6#vuAVm^62$g zR+>9%r>6LxQ24O7*t!albv`k2fw2{dF*Xk3=oRP96%O8#>$XUDB2gn(F;mkai}MD2E~NrVn4damj1Yu#FyKx5o%R zjrkAkcso<9vg8Oog{3%8Z1E>gwP}~oGoyzeB>&M&-c99o42>A_lONMXGcX){dxlaS>XsGiSJ7nYm>u*s?3{u1Im{m|f(vJ!CBVi~Sc|z20Za{-1mlOc*yO z&oF#UqAdU-66yZ|3yGjulp8-168Vx9m_fog^ewSOSAk;x9jq|G%@1^ zKTBboPe*gR&t}=?yP40D2ZE2Xsi0yy@F0@?G&u13_o&x?8|t}eNW^d@*SYk1qwVH; z`s?lCyh-h|HJ_IAP`dSkEy1Mx71F>_bJ za6)u@&>W6IyvIv-qwdIx+^>RA6DG9lzAOv5Tvt{r`6I9HL4NuN(yZRXB5$!30O=5F z@N>5pSLz7^-OrxmeDJjhddG=S4-U}LCJuSJXZ15?MS$LR;;=X@ay+&8(atoEP=4b3 zJ3CV*U^axS*BrN%q42XqExCtWi0~8^T8Q%$4u`@P-q%eY>0)oQB)rj5;qKb4AblvJ z^qHIgtwav^c*X@SG#7v_>^LX=r!j@l@LWP%#ZC7LWViBgvclWCC)%J1;cla znyvCMPW!sUf(%<1A8LoIXv!gLxVZ21c?0A|g0b@`ap`kR%P6wblz)i;y@*dDA_AZS z>{=eVTKLZc?!%@Q?bMo{AL5V;eT#@Hbkn8#PT&iV)n@+R0WJbjHavlc0E}mVEC?qPa~-LYMGAL7tk6WNx!W>Lky?q?n!YkO5uC z#VaV2<_@_%=Dg?3Em&e42*$8*VQcW5I?p*mG=3cP2pE`t3i^7aTP*)pW9hRR8A0>3 zvumF;#X(nwMK~ghm@^8hPaU{G(IPX0Avkzdxpz2a3rK9#ObVHieN{>40B@;Bkxa+fJ9xPMhFExH~6_&18M%TcEy8{|rnS1zM8- zL-qg3^np`H=&9G**%NzZyN*!c4@to60qXSAu@bVtndRU6I(+1=W8cN^a@;3l9=Ph2 zME6%u=GvbU?agR7DanxQ7GX{eJpvrv|LxJZ8ESKUq~|DdjRA3$h0@CBjw{jRN+^BD z56;FJn0=_D+q18lKLR?yRuDfWdFh-m+f@r;e?Ov)`a_=E(3F58q;xUnQ>TvJ#$-8SakER)^?C=I z7^7GI1(u(0+0QERCs1e?%EUNb{3^ znmREbr&}oo<dr-qB8r$*f(CVk4NZ$Og!D+J zWUHE1QzRRP#nV*_=T@$F{@NDu6j0db6cm?A91xJD+<0wDBEZ@< z{TuQ-pZN#qlP4IPySjvGefWwwVTlW4HohIIO4k^NY>oMcx9b<-78z<5spit^Y|o44 zTVo$*3A97eB9bHx0kcigs39So{$&cH%?<`nv>o&`Qxth43NQzB$YxEi*KeEB_u5v0 zQ;0-Hq5=(?hs=xgJ>?Sa)5*<4Tfn$xNrL5Hb?Y?}bwBX~g|w!zTQQrF-G~He=J_we z6^r&%HpWfTq6N~( zdfbY8lCtYF%_NIeyxGY7EyE?K9pZ5L4%vcuJcIp=olEENpPf<&8i(KD1OOKlq}~_c z9Y)`WpqST~U_s(gs=+S@Ts<@yTdUO9;8Hmj(UNZA*V84$*ZH4R$!X_1R79QaC$r$v z*W33zVbSrEgf%JYh&~G8%?G7lQziC`#%YK~_m^(lEu)*lo3$=O4a`&$x)crYV=TE^ z-}mJ0qnB@ZF<*B2TtRLn$pDf$Fe=5JEnY3jr--kY`orL0oRa~LZX-FAU|=|Sv{((6 zsQ`+lH)$Lhkt_JlmBJw74yYW25qW*mv0>Y?g<~meS$X0sIaBXofM`JoA@VPpMv_Hf zBT)kT7@*Yar-n%g;G0E(csEZF=v0HPtu4uvs$tpP738GVg`RpA2k?&RkH8FRP%S&8 z?}kZO#OnW2J-UL;29#IfUce5u>iWj*W~Pb`YAFVM6BC%{6K2Yh`Hg+$G=n`rj3@il zz2uGIHkTa{+@}#L#Hi>U(({t6`1)2 zv`jR`1?(3t4oDRS2=LVv3|k%KCp|czM4~-}=VLDOqiVibkbPqo7Q_nNPQ%)Y3=JKB z)Om_p1D0MvXv?~My}tv0(!X|NoIlLR-}#0l~A9DrCMolMs2 zfeYqfb=gWA&GPNAn*iZvM!bUGGktB7Lqe=(%e$0sAjz{Lj zZfNV8)&fY94FC#5+l3Rkc(_Q8ukzWqi7xg;4p47abACBKz`F%bn zOZk1gGTVLb@Aa~MUU1)^bD%$7Z|GlD+nU|pPCA!|3n%$s-+=k#%IwZp%rH;eo7u(7 zO>di$`*aWf4n)Yxp7_d~zmty|x^12>hcB+S{D7?hA+l4PpAVF1iKwIng(3E-k0>ER`)yIkFgt}~es~2CRsZGn>)SE>{E!kF zHC!IXi3Bs7Sb~mEJmyE6*yk0#pI7wa&Rx;g?2FKKh)5b-izkp_0z#i(N2Bwh#6OzG z_7)o4^2PmCiP#Xw%nqA>L5R#tl*?=1{E|HXT>hHsQ(D}3qeUA{{$ApZjlqFdoA_&3 zF29o&LJ~kiCVP8B5uDjnw^UFh3qtF!RE%?aMDU&X(-;iWg4_;Bon<^S#oDj(0j=>m zbnJk?dPJW0s_Yv_!)mSxnfO3fe@@Idwg@>r^9&ZtF!k(@xBJ!0PF>*XkY8;yTG%pL zY(@^T5h+jVuw@TKCW$&2#))F=E69l~J^R|KF=blKl0_hxUyiSqc?H@!CWT3wYYq;9e@&kPE9rijShlhdkVM z)Pat#qF2O}ZVV&;OeO;hSO8HZ2ue|*7EQt*t#~X3a*4ONjk=XtW}`w`@e0}$_VQxu;w{g65f`1bps<|}Fn-oZ6Yu?k zFyHcrSgx=^;Ob(HNqBTp4IXRtcOda^>(m!tB zM98hr#uEQYAajG7m_&RhK~V!U`neRD_M_k%l5X`~E=Pp0ItAQ7nfMtT_XKzNf19}^as89PK-i>WW?_S7UnZlaCC(6UC3pzDP%?Tf4Ia!t7$J;kT2x4F$&^K`oM`%yx?O@GO82PwEQ8804( z`-7GLCL!9l3}==q)Cbf|{AO=q(*Rvp$(DVecm}S{cQ1k0=i=eFCpc;W>mIPoeAAeT zDNbB%aUbY}`-mYTnn~j)_MaNKuYz-dVgOqa_%@+W-glfjR|?7ocuTEVhfxp9F3Q|A zhU*X{sp=S{9EV7ONE~tkvmUDB?KH)m6086kCoZ3*2c49V6(YARtr~s0Bn}J`_N!8>$@f5u3kd<`7vJ&1{1_xRjc;#A4#Akw;Ve0a3>ln;Kn@p2GeUr zCl67!m56roe#w8%p@yOWezu}17X^2OQe{R04SG;eEkiQ8SaEhWoZ0*sthG2s^;Y=s zT>8R?7hF7{T!Y&I{CkncH%Kw*fPmTweqcPNcDaJn7*KpC<3yV|LBhd1u?$Xz7=c@7 zvr#1OL4Q*xCUE@4I2TFk%ana4@Ypt0i>Ri%c7l+{LK8M}iplJ^5U%CSLYhDVI}bs_ z0$u;JzTck_hg=L0$)g4B`7K^5o>ZV!ejxBFD(>jn6IBbE(OJ4m&kVAk7O90&0yI@k z!`FDRb(Mi=wUjFcn}Dn67P+A%*dm=55%V#VnIMdEOkX5LQXDj$wz-P1GU?Umdj|CG zMyBKahA8EuPD&CQaOe z(3KY(g;z%Gt5yjZk+;%^tjUl90Y+FKUo38WgjGm1(un!U_A~iHso&;21A=CHdpubZ zF7zluW-{(S%SeS8K*Ml9NAtVk!f4px9v)})G@SYjRJz1qmoq&#$yYWLNCPz+Ej!?N zGGpVVU1hhFFN@W)WAh=-DvTi6i7T1kvOZqY2ehPR2KLtLQnZgE7 zn_b2-7VumPhyT_4bDbvvCllN9s>C3nJWC*n`PW1zeYLM{iaGW{nt~`LRa00z63jll zgbWTg(e6Q(EYZ8OA62`tQr<=?WNMM+gtejFv_8nfl%rx@dCNc{@N0#Mw#t`F76HG4 z+vS9Xv=n0sp2$$xQTsX9%4||E7QwEpl%9&2>xH+GG|^B2JZ|6Wx3C4$OoiexzNoZp zA(n|p2`5=XE%A5qYTt?TemS&;fxOt`? zMM~~%JC&!tfF2h-AYd=W*sc!?Rt>{d?>^8_-PyqyeY#nGdUj1kXy0Yf-}v~NESJt; zw1&lC)MGe;oh)JV;C#>Ob&U)c9e|_u6@1E8uhxikU}Z8qd)Ahx&Ntl{`uSD=mToU_ zd^Y8U@GP zb*Rz`Iw2#j`!p{twF-e}Kkj{!2V4@v#9?Kb&<`+dwY{%JS&d}i)|DAmDUF==`D&x6qxd}81|@@8 zNF_geZkW+q@iCXQm3&1g$C_+fNN+=|FPb(;WRFfLz|l;BiYL3<4g*eGEo6vLmjp3# z@A0FbsvS?XXv|!OkkSr!cM;j@4TehfouXtut1hlU?yRpR=3DT&>Y)pkV#c>%rHmz~ zBwH9qEe+yt>)Va=GLj4VCZjFOCb}$-xoNn2uV3(gZCWN=X=xv#iWlB~9n8E=znk$C z@ZF>u0}xx*xZV(V4Ynw|^9gfi>LLZOMlJjcrqN@aTXEWAkF2|;06$DcyqjDenQNk^FE%Ym0gN$VG>-*$^tlA6aC>2Txz zS$3`?O<6Zn$WTm%2|p|*sO&XZbJhwKvbAn505O#vWmug$`s2Xn7j(Sp17$n96R3-4 z9+S1gx*5%n>1~U_LMQuT`RUh$yv47cw+d;KR>x4>^8M<`5HwDa3g4wBhhZRf1DW*J zO3M_XX0DGTJ;Yxr{Bo5+@z;taEW&Kbs>mB+CHj6T6H{NPP;K{Sj(nNdu|f@sh{%4tXUuOHnc?p*D|fX$hAOLlf$OePOXKA<4s|LnL4&` zcTewJ{0Vek3r%*WGFOC_o#I@{Jdcoa9PJw#4W`}hFyax+J~9^su8>f zGvwep`s3q(4>B5*+uJ6w%s&{LSn2fd0ZkD+d{Xc=-x$ytwlsM&uE^>Td4u#dZ z7v}L8dQJ}EWuVdXgxvo-wlI4MiSXQ7Ka<=qS@oCJcOt|guf^{~`(A-Hrh0f2j|X1; zg|T#|Y4;Mpg&5t{B2eGqfrg^DLH`&&l|7FqBT^a-4Rnvk>$JHU=uKG&QQKc!L)ahG z^)?b-u^Jbc<++cDmrCC~dSi|L4s!pMb=jI`vs|4CW%oG|WoAtCRFsuELUa`Tt(}aE z#NZw3ZC;3#Fjp|_AkVG24szZNi~HF+K)1F55fXh2i4O1`6jNel%trS20^7iS%ti2`rNOaELMKXmQ(WS$sI)47e z1upcI{47Xo$`*RlXCtzVBQ8=uR}h97B~vb~cV(MigW+{}iJKGmkOL-Sj`^6P@Gu`U ztXNcB%JuJPXyt4#14qD=ma(^!OsCrj8d9@Ih6ND%;QspZ``t_Q16<`ihCGW2q(T_N z5p+`a(b8wpY!b;qpeOPDNFGPjskkDwA!LU35M0Q;2wBnPrmKc!7W7^TcU?qf@A>=Y z7pZY+?Lnkbv$B}Pglg`dFIs&u#={iWZLZofQ72=?U#qtKN{AvD@0s6%qA74Gkq4FQU#mzKwwSL?;Hs?kllFR?$#K>cL3Q^#DiPOZi zSPkJqwvg^9(#aSiIiWZ~D~7gxG*_R2p`Qynm?8{px?PMe$_-v=+i|mumeU?rRAx+b zpI!^MVAOP*_Q#^1M)fGV8X8{+NexF*2J-WngWRV_rKnEfHPgYruQFbpSH6qPZ|rrN zT%G8**&s-RVNf~sGji-4i>f>e@SWiluAS-dq-|u^E60K1N@=~$8@Cdo0^pW% z>2&B28;aUNwa|@0R}oGGx{~JOo<1mYcmDX5FN9c^HF0)LhtQ}0aA9>V#*SQygO6Ui zNoO%QrO$Mm{vTT=RE5y{@)(@XB&$?6k1V|H?}#VZplBr%9FR->y$zvPq0cGvt8saK zIsB2vY~C94s-u`erYG46cr;#w)bq{=t5@x(;@aDc4;1kIh3l0b zp-<96Pe?AcbU^Cm7dq*+4RJB^lCCd_KFGT&ExT#P$DqWPjA+*}3Vcy$@yb=x4$>F7 zTMxgG?;pP94&%0#g<{FJoBgY2MaB=&pAzlEcX8+b;d&0W^a>I?Z(d#TZqIaj6lcg# zz8OSRrExV*n9~{AhOyMHoIP)W_Fh<8H5MI69qzmjbXICw9bCkOU}0%KX8yq3=eHzqCeW;#HCz6&hn0n_ z?AC8gLYal3@?o&ewDx<D!u$5N}q_gKURlA!!6ZJ zK{4S=jGn_`Dr;-@;G0zr`Td@NZs)sMxekww#38UyuH`U*z(M%S?atgCVWU%1o8iv| zk%+xC-$;;;VGBoI25oW`3IIBW6e2IGHnaj6R`Rka+B;S4qFG1Vi^B9qR z{ukII+L6DtMqDvndyK-b%AET44ssQ$v);=KzUJ8k4)=Zw8hkZYmdg zKnxzLRc8@FL+-+8&#;!h0WQnlnss)S zc=loDlx~ke2Ia`zd=6XS0$ueon>>rp7YO@!?RZ7d3yk+8{ri&7n)L+^KvLB&>-_1E z&d+!7kUuwq-K-c5ZLO`1ZJZqcJzag4IR1Io6nXIS%PS&y*0}s|0+j@lgrwE}--S9( zbkS;(;Jtx8r6rx^FnkGdVCWj@j*7rU8KGXm!xC72>X61dY=(xdf`52SbssI;nnqpf+MYh zr=Ugc&SNi)DWiC2YRzFbR`Ql)%0bVk#N8m%8dd8Ye22XT(QbhGm4+WUl4{#MFe-aW zICq+ta!wm_X7l9M4I0(2(Ova!&#G(r9__WqxJz}TdqVM#zL-m`j)_VP~lFJ*U<&{F*SQVNBdLV zR9gI9w>{DBsqf;~Pw^CorUJXR$^m5 zbh%6VY**d@{__eXLYn1WvmuhQKQq5WFs|~bSP&XGyy)0vbYptR6x)5<5^;T|R0zn3 z6j!Rv&#Lm2r<6q(@}y@0*-CN?gPhCZGl{X5-sG=mv%SGB1+BhyrCFA0C<`h?xHp+( zj|Bv}#E{GZsf|ShKUBfBbcGZCaJNd*)EoR$R#ESJ_FAb8pYti{|+U09d?WJUZ;1{Zs(zr!^BH;}^mh0hRHnRW{@f z#;Qw!Bdd{DG;-Ke1d+G8^anL8Ud%etRSV-0|%xVc5@Zg;|#RJ@DU80W4Vb;JQg@kpN~U6tdZlMo1mz& z2%S5ieDC3)Kvk|LGncE?o=O4T1dlMZb3G?{<|fskkC!s+1|-7*88{Y4HtD!@KNQuIKI^ljU&x=@ z929~#wP&2EOT6|8luXj0nwd-1WE5u1kihTOBpLROWM8(87-UaA=50I%>dea5f|{{CCf&lhm)+{l4C z&AMg4KG+a;Nt5YFA43KPjUXss3LGR=vW7CkIZzny=|_Sb)C@ORU@&Dx?YaZ{av1`W zcw!@J!#g6?craiQX;THQNUCTw0%_HlhJU0DbNMg%133DGau-hp8XMi{T#MHFVdJwe z9l~N$Rcr2NkA7(DROg5H{F2?KdyaN)0N4u>6 zWjf&XI0^4tOuUv!{2Tk%T6gI#JTE-$YNpiN^Btj+u zh~)_;z*=y*d+dEax$c6AaWOYqOmC#7)rvFDHWqVCd|Ky3=}3nx-Kn@j_;ffAX--{W zB&m^Aq+OL#iZxS$J4a&_IcudkC`10^d&y7vx(PQ)iJqD8I#F2xa~*?abTBwonle$L zDpZx^`lLXToA_fSaj$@tfL_SXO=|u4OKZ0_YNj!1kUZrvv18?x9X?LB^sr}ekLSmZXzoDA`>yM=i#)pxcUj! zw9yW@*4uDT_+$youmvEnrWk0K(!p6Ug~J~+(O&v}H7r>J;+pL<5{G+EBIop(C>RRM z1e%9-?(U54*y^#rf;U~2yr_#b;yb_CLlcHDFkbLY-=fEoX(| zmtStL?WN{bR0F@&{mJvwhJ}YAgh(*1AQlcP0sX2&gb1g z^5(r@qDF9#S^Mj++BaktoIc=F@RIM@j@CA+{?H+3E3YL)#v$8>KAkb+!z5+AmVh)2 zp!RJ@`#KEE1zo^NC|#0jAcUxCMkdbSsH}F zs?Aq+I^AD9b6 zt;M{YZSBP(F2$nG`oQ@>;==q{3mIIRrljIQ6%|~IH6AW)KxaET^@Kg(wSnXpsoU(d zo4s2@Fym!n=o%*77J?Gom~I4G>6dMVZ6vhFxd;R;SA?zl@HH}2!a14+IYbKm99=zU z&Kr4VyFCB8i62VeMT)rpngJ{ANUzD(a94Efwu_(Ufo34>DLM@gp1Bb~nflHj6SLNdxw$Xl@yRf}=B39MeQx zOrm}{B|e0QvP@QuH8PJMhaShK$RM49sn|@1@dRC+Eb$YYbAl=`ud1O>qYD9VDXFS_T*+dc2yd(J)oo%!a!W#<0p&Nnk3%XLKWq^s{d z{K|%YK~tM|7Z0iAnUv=*C-wxq!Tx^ngZJH4DuGZ}>V)x-!(^dLYbsRaj{6HZHR2P>vFyWvuR~tB48qqO zP2S6_lCd_Jz9{_E*tLa_30OGVmZ>wu)?Q=CxU{$;<3dGu$(9Ut)yVe1#w#nXtu@Cn za+=&4i`UeI?oz9}@p@X9owg0eaVW@r`D7%ooU)#McCKFd_UwVLw@ z0}EcxeVEthJ9Q67OP_h*=2G4^owuJ5l8-_=cSRox;o;7b*4Hu-^C0*xpGfJ>sk)La zJJf!#yOz>t5pz@F&uY8Lss#F$56E+*t4Fu0tQ@^+$jv{TC8_&SnI&2Y9d^EF28Dg?b#IXRK%?QoasKq)ducZT?K^US2?~2 zU(Vh<=hnI6YY8IGm*+`-EM5GEb%>?R>P~~r zZ3Q`T`@*1s*!`MG`VLD0V=rOmYL}jVo<`8y52{|*^9*AK(C0-fsOq)=6%#9-Tz`3V zOmKY57JCK8;A~cL_r$TyG!?T0y>iAj%sLrM{i0Jh5k2<|^HyklnuJ3R9i2peA6yE0 z1r-s~tCiSbWIwYKl3nv%2x}({I98kTF@^FL2C~fe#MhjX9t3gT-@nOP5?A3^cPgVS z>sonA2A?PU-GN(fluLIsfw>fuM2!0Ucbt${8qeE9HON&Gay99lX?I}RY*@0ZugE$b zcQF0fxIpjXr7Z+D#M|QI+-DW}7upkXMkqje^gTO9H zJDrDW`xE6}gVG~Ih5d_7K>3|L}6yp^6=1Z-ddHt>;YHkk$4 zp5^E={_&*GvT1K2RClgVTL6A=u@| zwT2{H13{kU;}7mwh(BrchTLlX88AFS`_c0Fvg?9n~0ujfuidC-~ z;4JvHT-?a&%hC>hHv{=VO6%7Gg%`5EW;-WJKg80Xioy?Lg}ldCglqns?jt?wY>ew9 zskzI>mftW)+-B}bs8cJSNby{R#XBWlR3BiQ&wrgRH>pwMcPrG_D+x-qUbH;lRwlDj z_B&m@y6grz?3!2qctGux*J+ZfC+A?#x9!qzrH?Oum%-8uC_246#g(G7NoR1o+dnA~ zu-eQ89v2FL=y-X`W??s!f=$$f5j!%NfXK<+mv|D5j(sTO^k&nlxvx01%|DgTqN#$-x6&}zmqadtjx5oujlAb zQw^eqcG709$?7~xBiWD-fS&P3U(&+j7nv|@x?~=|*0eBJ*HpBMZX{9pW~c8~L^_)h zdL~l!x4XD}o{loX-0GnW`P8??Y8ugRGu2OUZ5}=M>B-uK;BzqceQyx$Y`o=@i~q|)5X!E?5-iEV&k27<5bB9R%g-bkTGMF!gG=J z!9bCTFvbXLejD`paONFjK~)W2sgTcB9yYs^O0Rb>RNBjd?eDvr>_2*?tX3B0uNxUJ z#+*`_Bn~BBGQ&?RaWryI5|s!~&{|@X_u6O2%O45I()i(lmn1uf+)VyxAKhqTtmws& zIkgf$yh#Wxuu<6_f?s`Z% zikC++<3)l;c@UN=x$(Gxz^ICO?QRhyLZV%1AC6d#-)FfZ`~LP!3|sKSB9l1?o213M zlTsi+Xc@_97*WG3nW2&zqqLhX%@m2n%FFv++$QP>#rjzSDkFMJ!n^FNk-jQOLFGej{cf^M0w|RZ3uoK+T7QiBXZgK zXcbX-_!8>or=zr;O?OTMI&^!9bp5l#`*kKmlL%ocKXq-bOS>I!b1~(%xAs*cEUkD7 zCb+K7y4RKNtHSWEKm6P@mZKB!s(gzssLb*gbSqiAVdWd4)3`DrF??zfl7k>u3J&NT zd*S&cTRo_(e+0|xc|CJbeX8NXtB%kOir9+AY8Za`f!BrdzigGWyQJ?bsK42Dt7@>( zW>0F{&wjgi2ZwdOFyuRP;0;yu;{3uD35{<-tDEdeP0$~eNy$x3+7D>4qQJ9Ko&t|E zg#x2WQSd%io|05aWd+g992DxKIA-7(e++aK%2S@ilc0y8FnP%TQ0)Tfx>N8y;Ux%! zo$=}HZGqrvohaa=3c)6sfg)8-`j@;A9|Xd^hhtc|Y(II(AiN*O4UflwgnEAA|B`-y z2>t_oo)@?r7XbID0>XRq#UcL!-8;?z34sZ!4D=d+)uTAX&i}lIKjAtS4dUwsK)nqQ z$DUsnTR^Org8v#nVB8UWFPCA>gXVfes1$H$5C)PBNEiwaerqs?S^0soh6^xO0{GgX z1)B)~IRVnZtx*QL0PZ*HLLY+Xjhe#$=3Mt2^G5;6X9(dv<_7{fv6suRp2Prpv<$fa zj7Rua*OwugCh!jscN{o<|1h92K)VMO_d$_;iL3gt@Q)C(hR2A|A%O*uwb_NJ< zI>Qu|`FGM(lYr{KL*ZWesjUAK7=KpRuPDLbuXy(gF)XHRz}9>k_9Yh>HEY8p3qfSF zB$$6D#251j0&x%UC*XbTe6WgF31}bXAFcqtRS1S4fv?Xbfl`YQOqBvmTkK&K)!8-F`6wGP;BC0YNh^oq9cbaO!hPMtRRqMj6H)D K0_ke_arPf$@+BJp delta 19227 zcma&ORa6~a&@GBKbe9#X~e?V+bUUk}My*yBM(OwKsbLS9G!;(3T}B=qI;)FEW*IN6ucpT7+gugFLHWQ^}TMOSz! z*-W)Que~lPCCho#Bx6d6JT7Yh@w;{cn&`CDnxVN-hmhg4^I#S(TR~*~mmk7+znHwx zn}ZRy#-F#-4zj{WHC$g2{_+bjk~etr5Wo8-+?IfX1BZ7!0_ANaNV6dfsK@a~_-};d zZC=Oh*D%tXk26G_kmwobI4OP1J0)e-e3+StFWIv*B#i;!n+sx}-wPoR*`etEXqu+R z=X4+urmLQ&Y?5R-Y#uEchzDAdMmNu)hE)$iE%)n2fz7c^ul@X}+x5vU3K^1yHelNz zbHv{Jw6QV@momV(?t`8W0AC+sz%#RY>}YWgX=gpfIR;gJqz^OqPK@6)$jTBH1Eoh` zW50Vhn~@dc)3mMxDVd)ou459CGV`7BAfQ5)$f4$HL|x3>4|fbJ&=X-CC2ot{A_x{7 zi-7m~SHH7_=sRL(XXt(V&6F~vyuv4N_DtwQ1;4alypz=p%tvzakMeHq?Y7!!MdZuL z-Z(`8fxe-cCET9Z_=!KGFcC2HJ4_+K!N4{k>SCerAb!u$nI6 zbHLojic<2$j%g_Wp5-UM@wny$C;Iq$?Gwm4?}>A;Xh7vf<*XkJ7#Il#7#IrZs)r4e zySx?C{-=3C<%Oe;sn7qn%$YgoD6;uDx5v_qyrHr?2N_#8=i7&1&m!>9439 z7w5n|28e4^c8|1YYH7{I^{(>XLO7pLO5UH&$9x&=C0%_h0{qKyk7pXQkUkU)6}Op; zop|-rd9YQR4rzNNVHBiGk6)V&d+K0^M*K8Rl2dz9=@z<+SN=9Yw&R#JCad2dOPYXF z34NPUmd0UiX*w^dJG6V|6I$Dn84w;%BlcW`0hC*te&)(hYcMH*7}ZDB(UE#^-pny< zPCLokoLko@8Z=p(-MQlk|C}Oov84DzcrX?b`&rqAD|n{y_QT zZ>AIpFl|B&n9Vl(Br|&#w%Zv_W93Ul*+VOv&)yR1ijtk@gVj0KG(_3W=QhB)@uOX7F5}{KdlY2O{y$6Y;ZoNGGvr_}n zCORfVDwegUnkGZ8v+0>^{Nhk-F~_EU>+X9N;t=T?nCm8ZbFEF6#2B=7$+9lCC_kPq zVAJ(!0p~`UwDu&zf-+}r%ypcNN|Mu54~S??iQ8DvfirtPa)JugD%LghM@jKw>=e9( zEv19C&eX403A!-9;tijJb%TwEq&}$V6$qL{Jt-dE^*veyx;YsNrK~MN0t|RR{(yOKQ5;EU8KfT%}E%cg>5(*n&+o2gb@*x_gY_i(cAG zo;Qun4L|Ll1&Si+ST$VqHA26>{wc%P&w`@9!#9>4cNP(y58vnfocwfj52Q*z9bZDM z%fRSoYbF-VuhB=A`}l%CuC7BV8F*_8!BB5S#GsTXC*>=fLW}r3AwJ$phCf0L25HtP zFe+3Aji~B_k$AOiZk?d12E0FW-)&XQ0kmg=ScgqD5aTzhO)OA@P^+d&zOz*Yf;omW znx*6W@;a$Gny>Sb4tKDcfJ4WwZB<{JEn*(&8AQVU);ktv;HQN^tK`8%N_7fL%n-*k z5*!_te80^+<``SdUt9|0c-&O3{+hCk)Gr@ozPA}G8TzN2ku+3)$#Xe6EHOb;j(jik zLY)1vCAck|S}zVHJy}=l+~k~z1U&}7(G&NlyfhB=#%jFHA9`C10oA$v#I;;~@yXha zVf0M5s7Rxz&`HH`suR+3nNaNT&sr}Q1-7r0n-Q{~Me+Rx)_=nESE9E~j-Rw} zn-mbQXly=F$)F#TFPL;C6eAQ--h@T&_LJcc z=SDW3Ln6#-2&+;l^GZ^8T!O4&acpNNC53SLDh7`fe-KP`4U~z~+wicn8}y4D!#zuh zv`-=sF2)zbs3Xs5B8t0?>v)(>aMRYM2`6Z4Jkp3EDJ z%}Z-Wt?yNs0~dQmXZ=!&An?`?S#9o8!EJruFse%3cJ7&5ePrdr#-)#3>EU?L_PIG4 zE23KCeWn-10iB+w|BQwEbyn5t&)ds!+rg^)(A?NTJ^97%CSP>W+fC5O$fls?km3nL zv^k-b(CF4=OKjWEH^-AdOm$PR>k#lq2Of0j*kE9aiF#-xK(dbF3Nxnv2KAYsm|sc6 z45AW;IDR-%8Ht#Yw_9f7JXtK;N)f}%+jDGIVHFL8%v^u$w+Z)ZH%W6kEhxp@7$s8? z3u-d(Bwf?|Ov>G@x9h`TsQy}3;}BX>Qfua2o0r=Wi?Tlj>5z+H@I}&ttIJj&LqjKo zS!a~7l4ypKft1nhitLc$=`Pk9iYVsTd|{e&8fp2D$KROMvJsJSBAFUE%N4tbD&Z@lGk+ z)W%I-K~CsdK6t%U?3szXLb4QmLou>on!TjZ1#c>S0Gt`8-a@hLjn)*qVer#rQ;8VG zQsO$5Z@9bTTO{j!>uUiMzH48n3P>A?W+QZKhY1xLgj||>dVbB2>3}{vQ8dae54E4T za=!)CN|O=2YwR5J;zN+^_=cg}Vn;M`Nfig1&K;(|WwvZw$#zYjjzY3&ju2~`U?@Yl zac6%s2a0x+*cPy;U$YkQ7moX)`pS68Fd8)wPbM2?v$E96B%7Q}c@)W+qv4dc&Y z77@ZL?gL7qA*Ldb`bUwIoapLs->JQ$N~5V_r(o=sscvk?lO<>ErM{)blW(G9y!P?* z`tIswD8I`(pi?SMNe@EBhLihbOvSu~1&#zCk>Fbhu{ei{7PQ1=lWyOP)Qv9tv zzlGw*D z=a_j#)Z86lwOqNumz_c0B1p{n?xmcQ!_eXF<}Q%)>U#TD(mA&8e)`VuX$bt$@*ZsO zbD!I86Y%wPfBRMSAZu{_tL$+*svwASU%SOwU+{IbRhuX0%$2F$b9sdz-Yu!_E0I#Q zlBqKoN4Pqp=rBjQ4RRc9)7jgNo#0s#+f&1@H5(=X?s;1AvbOZ0z*qDRtpq-?z16wXOZ>N5?N;@8`QGE8p9v+xD}i zhWFR=%^{ro{drm0VnX2#=`K;W8(2*<((W zf%k7};tuW1V};aL`vsBIvnifzEyVp{T|o<{4c^0|_!<>yT`ih^C>+K^y^!#-u_7gC z0TZR`X6_OME33bWGc zi*A32=XKoU<_5<=dadnsC(9mGZ6Kc?nuaKR9dKT4ot0e8EiO1iU+QGz^RRaqN#iH; zZj#JVLK54(Gc^@sgc4hyg9~4+f+clIq`+kd!fd+5&Q(apB|Y^C_Ihos>z&y_ccS9P z%Yw(db3l-}>!Xo@LWux{68;1yU%qTegg*XaW(A5U*aZ zN0vb{#LSON<%GlQ7=GIKt}r?mg8pm5D#X|&okVhB0WLhccvxZVSOid7#kJ|#+V6JzB@yLV{JXy6iIDtqpS&a)4-Yb$5Ai%_|18B8+~c$^rzVR#Oa=&8Pfop_de=UH2vV| zo{-r$5O>G}`vi`55}|C~K>{%ygkb6X9{-3-R3o4T#s;h4apR%W+X)6w|MJm3r%VHp z&i{|+el?Oh*rV~yyVn|`FS&OT>?(53Mumu2=PbxlN7ayOUCBAucP|s z=69n_9|GXfoWr9B14s3dP3{KiM0Oo)#?cPUOt|Ve4`&Wnz~h#JH2+yyb?{UffK37k zCc!D{AH}MQ|0q7!=1S*J8GKG}U!6EjHz&v!OEJ515;m);K|3YyN$0O?nM^}4xhqv3 z6ksJA|98n^4HOD`(xZc0i<$ovX!ciuxVVF-zv=#SBIpT_!(s|lb)5e%Gz^va3v%~(>;pd&5T@#> z_*+8{^*(Ci2q7L|wtG%L^j~%*!(rlU*6|>vRR>_+#g|w~^2HB;REj0WOuau}DaByOqTj&5Rb$mEX78iZ9w zO)I7`>jU;(mP_PSI=R&U=J|3M3HJomtnsSS!wmle#XunV$T`2l=%Z~LHVB=xw4%}K-ihUB_RR{FEJIYR6+48a zZeih4jH;%qy07bau|I(PZ{0zSi-?Mq9>k^*Sz`0~8esn^?Qi4CLY3|xn&$Z*7tqvc zo|@kw2-Zn*pvD)aw~NFromfNt&CAR+0Cx%PUvvE{GPSnQ-v1IkQFE8b9u?z@PaHa3 z$}UAsZ^`8*2hlfjXMo`8_@4J`>iGW-gke<+o1CuLm<^V|#Ub1KVj3~AFBjvB5HVJ| zg`7^k9mjfxrojJm{zCSw8+#htd5qu|`z(YA;R}s=ScjMZhg2+{^}tqm-68{lZdef9H=F{~_xCe1{aJR@+ms}7x`n^~Py zLxFld9TMY;DP_wnZa8t`0mq2pN14hBKlr0|7Jk6at-MvAeTS=uNS+y53qXq-gK)S0 z;xZt;V+CFs7?5wWGr(=RaJ?P?rOuiEKv7Eq9&-58;Y!e4LucyU^b|n8{dqtNuAn#< z>!FZ{fu(R_nKRYE+-*sN_C?9Cf2*DtzK|?@W?IUSG#u)V143aY5LF?}*fW-A!17Bw z>ll*bvNQ$jGtmz(q%yWlD%bxIJJsMFyvp5roxf+6I%q3CLqu06Zjz7yIKd7r_dG3v zXTi6TlM4;{(rNa4uTG`24#6A{5Q)O z6zsqULj&@(5=&vYlAcFl$*hbLquXJ2PBEFyJmAiR?3pN>r^iyem9Yead1~<{4gf3p zYqt`R-AZojCl0kgZm}nQqNj0U+jTh#LnwpWu4h;K0w)pzvdK(6N$|{;VNSugBc4W$ zoU>>q3=y=2B2~AgSk@MMm0s!$e453nr@X-Ues$h$Zg~YYuBsAWiG^-~5?LCcxysHy)Q#&57PSm+tDalT<=y2I9LXKW z3!g0xl!Mo%YxGPk51Zo7F;*eb8v&YT4e2d&NmUDNi7NA7eF9G%Z6=xYRTxMLbXGa> zcW@>0A0+t{Q;U}m>WO9l@_cqO%*7B+nbK48*zg06Pw8To5u~6C*QA-QIw;56VFL8D zlB@Wajq@3 zh^bgs9&6hjo;I)O9%gOm9n_%;cXIH?*IGBR3w}U{npRC?2(P8CHezbfotegE=al_< zsJoUfuymDrzB>mlCD7y_CIj5k@5A=kb3?ABj?1jc*-x7{gP`QS6u}Zgn*T~&t$6(8 z+>qj*djbff|IT@)PWd9Hpvh@iDfS1!5L${~Y+NJ>t*mo!5sBpD0$geI0RT64EussR z&0w(-F*+R1!$!BmEn;!@Az5`0Z5bn%m#!pXT}N&{)`OOAAI=ts-JMxZOhSN8HMc)K z`E}NC2}@Yb4kg}qnOX`dMaU|yjm&)lq#rdHm7r!XPzlwF6X93)K7hVZxvpt}X3&^+ z1oX7zzmiWLiWsh}1VB^Lu#yBQI=B=+iGR_t1s0KzgQ7Dtvlh?qera($=q3C~JnJL3+|M&e_R+)xYuQ!>QoF`_;odD;vNe%IjUbHU==m8+- z4117G(ld#fZgK}TX2B(cI?eFqvi09I0aYm|P@b}TYEB-1U+jveePX$1fmF%zi>6IM zQ`@9I<^9yH$>cf&tDnl zv4UjC`|&?N8p0Zb8josvX6dP6sRb_xE3=+ha?jS)yYm{z^Sm3n+UOMYe0wvlc!#{dAwnL)@PZizJKS?7ffbKyvmNIs@P%B7RNwbTqOmyDPudjh7|@7QbQP1g$2(zr`hy2nBWX@x zd8H!t>gBr4c3AdW3Kc(Tw7>y-6;kK&O@m*K6)LRX(_}sO(I*gBGp`}$;1HK!MGHTD zTgnP|=cZFbBGZz`m1@tUMc(odm-sH;twbY&}o$Wl$w6m{sQ10Hb#p&8N?Qgu%~(DOI+Z*YG{-uB>o zei4in04A+0F@2acWyK40;^B`5Xmsuz)5k<|-`x0rWG}~+!o6qJ0@LCyLj!aqM8Xs6+gQ%?lM6CeQ15PjleJGEgyyYrQuKq=3xqsBAXFj^M@MfxrPC$uBUH|_^cxe%wHf*w zUm6kgSSjxZ2?xSJ0rN1yx=1hq`S?^nw5i@IMY$84z} zLlM9D)v6#M{W-`wPg0qmxHW;OC)3jU>qsdQuV(Q@avp;|r=*XQF!q@e>6+T_R}QgL zuBp(ybENTXd+O-VEwRVkyLvaOw>Y5P;P<~1Pn|fZ|jTu}3>m846;O&x=(g?I@F5d%bp|Xl{ z!2`!tCt;!V3Ule8^onz>A+XvpU4nAyp^?y%N^-x!p+{|yNzwa-k^Fps6aIST4HeNh z0J^A%N`ak&ekevSAR70@Czj-=M-1o=2+$p29Hm>DCL}ja~q&;vOGQk}gZayAz(V;#TL8?Nvk7ey>S`NcKhjnVHss z%8U*?F-r!}giClMB9VG}h72t1teMZvm-;{*X;46MbdC>^C2fxa?n3GX$em{1v&K8F z2mp2I^yif(!NY^OElpO&bm?D)W@XGY5}WABfOgI30^b$+SFXmDd@~Bk{_MWIIOfmM z<9c*46Yr0p1>cS8&X<#%ioJn=B1v)!>X4N%GPYzB0%fxQ5FrW&wBJp^J{3aK3;iowsW)|24n0flWP89Y!C3dE|2`c^yk zD+gx@$=XJv-R@B}#2KeUEOW&gwq}&hbY;r*M0zAr=3%Ihuy}`}No>H|IVH|KlCs)dju&?+?Ic_UNqr-+y zQzyOy<7!B2+)x-HDzb#l68ODf^oL~9mNPy$15&$1a1|R_?fN!OzYhK%ecKJLt;lWI zlIn%gsC|94IuHH?UWD7t?NkebjFT^I9vjp+#Ic(?JiSX)?&TtL=)*ig>x;{UP%bw< zpNDu)5}N=N;N@|pgzD;m_ZnEXf##8#AW6-0W^9gqMx{ByjTctS9yzw}s%8HZREik$ zYNG@jDEJ~_%xZBVr(lDd(nz+Kay##!D8`|;eMOY?6`WXP4-dd&li`~TR-W$RDCkvZ zf>S@VdHHeH%8b%Lddb%$hfko&s!gl}MyoP~3!LK0OWXrb-&MA2z;{y87w`5lf>}>$VH?RjJMpAvy(a$t(-_ zP70XU={fhm<-bU?QWef!uyIW!%SWvG=r+bX*#x$pb^I`hgY-sVD;N73f6#CCi*R0LK7lb_?yNzdU<#4 zF~^6f*!?>nLUTwiU(F^RGq7O}tR^xwM57VGgJ?-v z)W=L}6feawe~kfOe$;Wn^CH~Jq{F1=4lZnf@E68>?_rQrNI7DPsk3zbeu8y)1JSQD zx6?UGjkJ&3IwFl%$2mzdV*w9QDrNjelC-}cTeG85aH$BwjmzMYa~8W1Ot_Q5lB|L4 z`?>v)uu`#Fc77kJVP0Q!)u;4(IHV%Ukb4W7wN5$IBKQ*!jmq?J>bl42>O!__LkWAw z@T`psII4?~DJp&a&Y#5@ATxO0*&!!Ww8o6C-D{7YRebC2n(>aHVRvx0J%(w>s!I`K z#MPpw9r*Jy^>fwzXghAL$d6Imm4KA0(m~|Ld>J|1@pO)vAiUI^NO&s=tuCZQhF%yH zVU0qlMzuSJZ-4GSq-aunxWl}9HTvQHW*HiUbhkfvFJ2OR_W^g{b0)Jv_`xSOo=^<~ zO*GmCSwcvW$Hh>b?nV6qnQVR;KX|L((OTs^QgLz6Mq>KgKDI`}ZaVfV0}2FF|b^P=`;`QE?n+X+=l0 z?62NI;}F6aBJpF1uasN+Ad~_ObrATaGqaOh<;EonY_;0pV_>YG*~5yMhC}cEU@d`# zwJZm+79?&s^D1-0aFA$?!|>$aeLTZUURSJdbMZ1N4*M=D!i|rvijIFctAEOFWG&O| z9_faz?2Jw6Ea4kn3LUUXU}Ai|OCWZ!Pp`#5PT*RLfh?JGdaWErYE z-g6jmxvEoZN}y$pVDih$QL5SD@O??iRv;UOXrz~gY^+Qj^$-<#lwW5z-MLoz(_vfK zYk2#MNLI$6EoF&__!LfoJYY<)zVb{dw;|}*(!X)iD^5`PEJ~TU8I{YZJO2j;o``N!sr|EY6$;1 zyjChL3I%85sBq(6Sg9enb{uYY&#+qZPO{GYV(LYvGPC6*u$ls-zoRL#JSU_aWTlj~ zJdq?tb(cW#MiZSlgD}^eBE~%!kZP2n)>f;kF?T z=S>T|i!szM5mwR`hN?jLbP`QaH~cY&mRqe`Eiyy$x$`&x0I!4LyNOW5Zh;r4ELb0f3Obi~^8&HW?KaoLYVoXvm!KF398Vct_! zU1L+~4)zX}Pmpn6(Y08=32s#ly-f-WefWl3(5vDs5iw8>zsDHzw3^_`nU9{Ta`@d= znrU>cXcGwMNDVYr?lfCCVA)|TN}g}|hOEiUSQI6z7r9?R(7w8u;Xdt?qS`s`Nn71Q zp_C^Z9I5QZtUz-~n{>3TZyLiB=ci~ti@(K*hM9$MxTzqnqU=K)!0^*oj0`3dLE5oI z1fJ+z?Q`k5Q^BPDjC?bv_{FDuc09JIQuRT3>V1G)dWgx?uHq;0Z9XmS?zst@!!%)d zl~Pw`2$d+`wtr(9XU5DLd@Qy*HACf&LR+P%G@^)w$oSN`iG8*_@)72DK_&FkA1iy| z(@K5*N}CEo42llxgFL$mLMg3@*qCcWEM=T4`8N##GBq9egqDZBw_@AjS#<&f2_!9xyKmU zH?~`Z8=l`p1hYIaZX>FLSv%OHnC5jhqLhF$yCs5J{nnd>Z>9Mq-|IZmX9sjJT+hLu z@k{jC|H-K`ct3|k#@?F0`GHb%wnD*%X=?*x1bsN{BTNk6Yo_0WkUio_C2CtG#A+nC zqtJdUGWe$fx+MPRY=;ic0Xl&g6Yd#$NeC>jlDe-+m*zjj&jbmAUGm5lTB-1rfuZjF z$%@#8!j%4dJ2DzC$XVh3hk@A^(kXGOUpn=X`fP2oeTN|u30pbGo19CIk}H+AvefGj zWjJGP7U$v|pYrfWp#z-sEcu%MP~H_~=_#RSPz~_^`m+gDN|mYp9lj^}+>}tHemtM> zZH+-?>Q``@!b{TDooEM%^hkoy9Uu@kn#+beK^cJ1POOC{irj4b$#b<~cb3)8HtDx*L^Wajw$m#uH8-joja z)Q_ZV3W=PU#v)6SB2smFq@XG0R8foBJeiDr8ff^67ZF?f z4LLH+2Rkck>4Kpge=^{MK*Pc0NZ3hUkSC&{(ti$zZv!rxLYYy2weHBmUCvfwSD%hE z)?R9MHN6U5zz&|O{M~<~xDHA;(6#d-`ArD97&WvAcv@#V<{~Ine36$9W-3R-k*Y`Pa}RC;XHA#=a3=j2uP2nr^`=e~QUz3v&ufm6M7aFb2uQW&QFPFo*X2TnP=9;310GLd^~UJQ&Fk>|Uy*$>y3&U5Y@07)D$8Hj_ZB9S(x;`d9_R$Ti@4(&PX+`rd!!SR|6sUREFAG;@|Th-6_;$zDVP2Rup4q7lfLZS zEK)JixGZGn^pQ0nyc#WJgh!6TQu3EJW_P1RSy>X6dT2* z$p*_T1aBkRn7(@}$1JZXmgnEKlzTc{$=WsgSw<`UY6Vm5J2sYg0PVN#E#L9ZhD&~i zXUuxdU`KvFyZgcTHV$nAWFU!b5Ymv0iPb!$AknDEGHAv}j|yyM!d+3)6}58BaW3(| zmS!WHwPR(`Y|GizHQTI1W8JzP`;xUy7OwL6HdRS(A^jktRLe6c?^Ou6rGa1hMbxL3 zM}B^S<6RfBJ#$Xo*84)4_mcWcD@D#7GKEtA0SaTe!{o@kXkm~6n zMMFFgG4yHLB7)Lg*}EV?Ite(LF4@6CRwm(}7QqsCN9Q8Aj0giJ9_g4Rl3 z?`>NiC~2-O6U(#{SW7jDUJU()j(JMX z4V@qCf>m(331;%hifTYJY{0>^+BA0}z&LLEbSmJ6&Z=)$```-hoztdX(>v##!GybD_4Ma#rnM8iZeHLcJ^W~$1rsVH=yXHky%hzp z@plz@0QB2Y;740nTO7;>X>A-b*Q}>T`DLmzqjFjZ1qW-JU_zOvg^OrXc|cz8ey0oz z>XaAob$@fPT1|oY&A?%c-d09Ar}cYS?VD`&oJ>VBu6cQ({HMzm&i0b0!77#`ryy^+UcRcTV7)f_-cRLdHD)X9#guHmLlu7Vdksf0@YlD#)k!PrUC z1dUT+#)dA`BYQJyKCBZ_)F)86SS`!iuLoT&F#W=NjY%R``S<)h?6!!yRU}kuw!_`> zBf`Cf7BS(eiIr>LWYM-tMitmx0=`D;AZqZ}kjWMW=kdZLCv{Eu&u%?((nA2N@s6AW zlD(*aH~eYsk}0d+?c<^2X7~DtvLZPv3X9YCi#xU^tzW2;$W|l`f!_G1~(F>Ab+l361pf3txLG@XFQba1{1tENvvSft|~)d0&>X zd1*TEfIE@Aep|#urj+NmZuKni%-*WKU`6iyXJ=CIV)%S`iC3BuH!aXPgK9Q4U1d+H z+{JkI9ITRtfVMPYz?4_wR9fiD+4al^qm8L!cB$A*NCtptb#8T+a2q=t!ZUO&Th1#j z(%8vdF%BM%RW&M&aW;V$ry2KT<63q#Jg}CwZI_JlfS4a=%4V-mb=?6{vJnu+VM&O5 z_4Navnvhc!hyS4FHy07B_jEX`X0npj%PuMa(4)lZ0`XdTRyZFKAW)#8&P7pvn;Mj` zp`h`KZ%fPGw+r7uCGZ4&XBt<@(>h=tZI;t{64zr2B)6`$?>YSxr!g$PsUs@*qtUKe zcG`FH74{OQp6 z{StpfVI^92qSlGot>Xeas%oUOpwo0MuwY=Q{~ZT1wzsu4wR3T1`FkGdG-=Ff24tR# z^dVjgpZ*-jOs>R2;{(X)JBa|u9_GmQMsZti@=sN=CH6gR4%_oM##q!Le$1+y+Jq)U z^VRdu?`N^!zL!(rkWf@S_Bt>OkaQ*TnDXU(yckc}pCkcPl(VO6_nBF$h43V2?94M~ z)uDBz1Cg6EKZdAe#M_P(`bWxCtb+|OX)(~2JJ31l*g;LIVS|;^+DwFQEtHX{$Xp1lmiSw8yrBaFV>B_jI(YnI64TgLOw|Ju5 z&RLlEZLA$hxN?4$nn>&4>VoIrm@aF6E>dn1b;!)yNhtg{W-ZL-hU{ZwOm_A;=T5%^ zb~?+0W`XHUX|QtvneIxw^?m02;ZBECn}9ig6f18F%ge*vk!-<#c=A@^U3L3`X#LOmTaRu3tM(%PLMs^*YAm5e%!$scZN{8>_(2?T5Z4XGW{|=QVuEWA1 z1XHAN68`l7Wa2~=6OcG!m&uG7dY}A+oU*|2(BEf~HV9MPWO~#>7KEz=%h#RlwoGfE zIB>|wq>*TXUZjkz9`6r*@FKABPOO1b;)v35w1jLnObX8o<+c3XEzOPlMb};lA;5KP z_OmzJ5y9Iewtl5Sr}o@yWrjvm2(BbQH)7kQiSr__`(XE^9pKIX`SZuHGn>jI-5(sr z7AbrkZc#(M_XJ38AgF8 zb6R(PGR!B8VUz*6RnAf@rf>t{mw42;(rgM4$DSzb$ZYNQ&JT2bmROQSBAHuIj+D46 z;^^d~k@@r=YXGwG8j_E8)+5ck<@9Jh>LJZ)@aSTW6hBu7>*Eqi$L3fQ1%A2mbG5@( zW&d9Jbrf3Tr5(~l{BlxO$0X!aC{QjLIrvR&hrNKzc<5cpW}20h^^+2oE#FTyOi!x_ zi_tH5MM{Q|aQcEh7YNcza5p{UDC)##yPi8Hw~Cx>!k z(mP*oLkw|S(hAlTVV8GKe@$TdAzsi8j^u7_bgn$1Bu>F%0c@7BOLm|$r9>dXVExxH z9Za2^?d_bI{`>sfHC^I=+pUsdii0$S5?+n_5g)Q~JEEVcq!5TzyVZ?OR8fdy}S=P+aXF8OGlyL;^NAsNF5ZE-z@ZFoE`sQvb^Vqx+T||OJgv~0 zCUg!0?F5$UDhkh;n{+kaFJd1m?)pqcTv$uw!|!uEf{m!F!djdBgqG?Vua6{JRNh*X ziS$OeV1F2}LTTJyy7SIuo-YMAr%{Ok;w!n0%Z=f)JtW8RamCvJ2^TdXkn|$ikJl5V zUgOTW7e(^+O{dsr_AN8V)rSp{jB1_$M$Eb!jqr{GPhvdMlK{n7z9e+oecwROJ+?#E z`mhk?4L?tE$w8$;gU*h&XJwf^kY(6RczCqIMBN!v&e3jJ;%7R%r6D z@AK=A+`zt7ElfFu$rSps~B3tgkA3-p2Tc`h0$Dd@cRJn$qzlHRecFxXz|e_;6( z$>}cwkJ$#>Z%0;(p)v%2gxo;{CgW6^2Obn)F5REg0M`Nk?!zp`m=x1LuB=$%#Iz(6 z`&-)ggBNj~8h45#TpJE@m7Nl(xb8yh93K_fEvp1QhvgHfWEc`qzD z4^uQ{;W&NXLf3Cc)dYpr;$0kPK!tGo#qfl7ng>H${giDCEWn244lJ z34}S1^1rk(VAn8(n+tIh)C!eWUi4q@nILi6#l@ZyK@%z56#jlcYk7g+v;WI{9dv#Y zH1Nsm50xP3p93Iq{@)qK$i`UI!pPF@pBpnq>~thQgx*6xA&1_@RLV}*hhw-f9<6h)?zowei69nagnn+ZYR7D2wXfv}#Pqy5_MBcCQO z5AWx;)$MoJuv3-+ z3qh$r63gBAp7;1=vKxzU2*dyi-4>!nIYS!l+2)F;<6oE!Lvz7Kp}fM$(pZMX2UT#5 zf~SRcjk~{Ls7<}0d#V@qqQT#yqa{miVSeI4=N~Mz6WRR@l!BK=ddmo75=7)huEr2> zl6hck$lwPO?II)%kY7tI!$6yn;Zv#5Vh~2O2~H!x)BHq}BN)7m>i)V zErk>>ySP)i=51~pMP`azi^8T3rZuLRTjZ>T-fCHR#%q&ui!cPVQ&&CHqT8y4KtdEtzPMitw{-R znz-$48=_;i%oFk76+oL8Xx3NS^SEWP#;hB1g*$^f>jnt-E60b1?&YJF{ISTwD&qFp zff*9PQ*Qy+&G_lcUe*46dhmfRhQ`oh?L+fr9+~<#g|#8}ArzeY&{ZLc8K>@avVV9` z-HS^%$6)^cKv9xw^Gpeo>;Hsr;m`G4##x_KwLJ`bE}Qvqd76Eb=91k~5jw%1i(-7x z;1=MY6n}L0yd!l?Xo_M~MXxrTYpd%PPA7|@8GQ-^|MXLk$se@wA!D@8?6IYyO2vZe zUrW=?NSY0^MC1i_IPodJJl!m88yvDxn!~G!UQK>A`w}~KTM_#_Sr@<7a#e4w@%Ek! zGdLqnDYYzMPqQ8EDkDMzOx)OW)0!KniRCr4yxyk6&dLsn$o*99p7?tE1o`e|mAZ?; zw=yE~1`|{@CBFD-$uh@V*>Uvf3`~|mI`;O+t7(pYMY=`yIwZ3LB=gtJBNlHE-{Snfl+q4g*;r3kU0Bs zzc9<|3*)rVYK&t>Y&<41$A(c>a4>sSqOGdsD%LW!UQKapQnAH8XbT!CW_slnO>T>% ztM--Hha8Sp*;N?x&i^Csz+z-%Hbo}7zOA=|v8+Ec_QLy-Ap@Z0{ zetVBYlk4-x{N&nt7o324Xh%|S$$1%(;7iZEIX>z_j%?mD16+v18GC3!ICZ1cvgCHd zE&5ViQjw7BOgT!d+&?DdO!hv5Hi=~kClpa+MUDxu(PrJRF zm$85y#V+kcAZ!bdcU|&Vw7+OQnQ)y(pwDp!#hEXwVLE%tgwBl#5yR)m(7a(gdV!pG$pF>O06wRv4}?3&R*%h z*e)Q$=kI*{oU$?b>a+Kn2PNKXds}d3iSx=!Er{LV(R29ttP7VsveXxgwyfMcJ!u!b z<4fCPzZFz#PRQCxTA zm33GV;Jv-)ZrhA|fgV04{@HfAV#bJk%g@J8KP*~~-I?{T(h6;OO;qb(R*UbWvk7Y( z!d+qR7Ky2ue;gt3k4Dq zFM=I1l0un4Swa?#wG&1{WiE>FBg%>1wRk;U1dMpeaA{QEGqcW7XRDDN0uRC$z->QJlwgVq{7LD`l9+^g$ z#+wRYUzHAcRB6$eTE$ZWy{#%r-|dOObgRA5rUMNGqAXPln&Q2`6|b~!=8uRu}g2o-PuPH2qy@pZX*Vs{Zp>U5N4-GzWD zo;H{innJmiz^Bm)RJW^v!%tz*-BsZJQ%x}aaO<}aOB%AMk%l~=sM>EkZ(6njM7J8? v3SkzQdI%&uff|2~a*`5lbvB+z`Bs7R^^}v^^*|s7(s^770y+BlzpMWME#ZH* diff --git a/R/download_helpers.R b/R/download_helpers.R index 8b5b893..0002883 100644 --- a/R/download_helpers.R +++ b/R/download_helpers.R @@ -48,7 +48,13 @@ get_bfs_asset_info <- function(ds) { get_px_query_list <- function(ds) { query_list <- list() - query_list[[ds$year_col]] <- as.character(ds$year_start:ds$year_end) + # In some cases, the year is not referred to by the value of the year, e.g. "2023", but by an index where the most recent year is "0". + # For those cases, the column year_start contains the number of years to pull, e.g. 2023 - 1996 = 27 --> so it calls index 0:27 + if (ds$year_start > 1000) { + query_list[[ds$year_col]] <- as.character(ds$year_start:ds$year_end) + } else { + query_list[[ds$year_col]] <- as.character(0:ds$year_start) + } # excel coerces comma to decimal point in gebiet_id if(stringr::str_detect(ds$gebiet_id, pattern = "\\.")){