From bd5c82847dc0d4c942f691a02f1896e0c269fcef Mon Sep 17 00:00:00 2001 From: Dan Snow Date: Thu, 15 Feb 2024 21:59:47 +0000 Subject: [PATCH] Finalize desk review workbook tweaks --- misc/desk_review_template.xlsx | Bin 26130 -> 25925 bytes params.yaml | 2 +- pipeline/07-export.R | 45 +++++++++++++++++++++++++++------ 3 files changed, 38 insertions(+), 9 deletions(-) diff --git a/misc/desk_review_template.xlsx b/misc/desk_review_template.xlsx index d02efedf0a2f7454991f5bb37295c2c8778b6ef7..de3656298e38e3e340208146b970e26b5eef77b9 100644 GIT binary patch delta 12084 zcma)iV|Zpwmu_s^w(WFm+qP{y>DYSGv2CL}?AW&LbkMO+zIV>dH#0xZb@q?FSJk@L zs;YhMeb=g0l{^7DI0jlT3=OC{FTdLY2LaiF1pz?@0Ri#0XZCV(wKH{cvSadgu&>r| zaN6TR`3RhQkI+}Q5h{riLn8sx{Eot?s;9xQz9su3Q3jzw`XYNDqjK@%5uds3iJt6N#fc-RJ>nP(vR$PYn{QP8TjL2v&ebxmB(R{d9AM4|uWK)!hAJ;QPf#R2Aa%C`~)3nrq2?nxJiXUaz=%rd6 zrL%R3Tn}>M`2Q+qh4s-t3>}3MPehQ*H!5wWd9?QNN7RoWY^RG&KZX=$u$Da3L#(v( zxlq!Kh3_08xnOi{sR0DlK?|Ap8eb^|*TfXL;=vpKE$M``ZXyjp6>5|ZovJnV^MPI_ zQ5W*|z4%*@sx%4SB;pU`B5)R)BME(OE@cN8f^O zz6Bx8HCtIGxqB;|b~~{NQU$X=+OpoRE$Pqc(GJP6Q~{-VR24veN_fQ2yBuNqe66+- z!UQ6NBG^PmGFxV5m#NlhQ9n*lmX}69E4hb`4h9431l}|Zb@-cMN`iK&E@fl)x4%Z+ zKTtm88X0i6J45~Z*^n?FT*(ytb)Y{*vUxO7vrt^cs-8c;`5RNeb%79<%q>B>>!zCU7DFo)|q(?v?>urq=&DEW=^i?9U%^P)BJ@`77bZ-UV~tlW=F zejBQ~De_(SeL=hCWq33M3oVMayvI-r85PC?CNcVap@<3OSQhr28IQN$~|nek|qCNNQ>KIDk1Fjn#gZY?y<-7 z#N54c$J-EqZKpNC+X38WZzO_!hVZ`{3A&aBi7HyCv?ugw)S8hsjdlAoX6 zA`6JWw|m?)QfRSUshm5*2^2?NBjw7Q`NpZP1t|Fe?)+j^kQg~I65%23sjLLP@w?$F z;|@j69G*qwIvxSz$gRimI)3O3^wtKIc8hLCakGy1^*`;gJn?w!WIs66byj>nvv##2 zzmaRjxJ!-9O#aZ1RpXl!I1mZv~uS3tb>5J=zvA~_&S7$u-?0U-QJbPeW-Mqg};CsDHyQMr7~ zS#5@4OxqFvNAvx0iUA>w53ECFF9#=&J&m3HJd68Pz%AFJL`_3HwuAj>giKRLS3vS& zeK{hA{>Yj#5ov!O%nEoU_^474gK z?#a<+g$oRLg7*cDF;gmwVAxAN{h3TXdp%Qi;1*r8 zsPg=&CGpMa*IPWplTxFET=-#S>N-c%%9YNo8z}W~n$Dx>^hf=A7Dd=re|5HOE%`$# z^VQa^jyGpdHv84X5ZBYA`lb7{XRLNWQbueXgjO~$j}U!H?sW+9P7N+fS|K2D>O&4z zcYT@w&#jlBXe`0iVQZ8jW@VGoP27IY>KPUVRgcz8{ew4P1Bbr`YD-V+ERDflV2Lq2 z<_#6R@~DVYsvnm1G>@x*{{yYsGgu_?7Vjxli~|wPq58KF5%djWwx{w4Y@(rFXSYI_ zfBpD@+98E2V{3*_StGHHDHlMQA+p=&wrQ;^O&iYJ>oS-kJ}1$_^=BGicnN5WXF!#D zHCukT7PXSgYp-=wK#igpzZbZ9WE&owd^gJs7R08ti1Q_$G7nr(d=m%{?C(t%Vqt4i zXRgE+>7&9 zT?F!XcAXyHCuVDU??7RrhgRJPnyY?MPwUJ=Q{dt;KjlT{ zR$|{(F54v-&&ZRu2;psR<+Njo>UvnCT)4UpN2ssXFQ43wz5*!h>uL>U%C2e?&mtw; zrl=e{6W0h4MZ@lY$8so0TSyg!#Xaaq8$?SUk8XV<&prC`z8T+AuaHU6_<_bYBz!iR z;I%~)V%2m01_=W4`S~@oe|~1`t~=sOA-rRX5u^CkHG;4IuD(pIeqD45x8n$~Ruy+# z`v|bIs-TQW0Ssw(LqJ1Q3{v`pH=S<~_jL6D+>L|`iLU@3PseA+V)V8KgrC0efz2m& zf%EMz4>vQ>jL%Lf-Q5B2e|j!oZ~nY@P&#!}=$zkt)VQ;iEQ`_G8Gx&(izhG3OR*UA z-a*V`PYAP!^~OTn4xkgbnf66lDa!M*?hj<6!z(iIA~);}WTN9M+VeK-59Fdl1D((m z0bwa6CpM(Mx{o{>+>bwOieupvUzn)1$1T4|7uqzU@5xu%pQs-pa&=- z@UR{X(A2Vfi}FbFh&;tQM>~f*$2)&_j&crjj&lxij&Y7~PPh)5!3l;Bb~sej;B2+# zY`w2+VAP0n_+e`guWqJ_ulA$&+zT*Qye(n#XDM-$RjR`{P;kiWak+=+s&3o(mpdJ> z*uZKAQ(lSXU2R8g4O|g{msPg@7-krT8YT}_5p@b>3Y7_k3AGlb7S$2O5%m(~5|s!A zPprPiW|Lk|;DWce)p*4%*x^V0F$8cey%NE2dR`Kbxu#+$!sfk*JXGn+6X5^t%2~uY zVuz_$F!&V$8HTEawV11vE@U~RI_XmOJVMh{PX(U2!=$guL6Lm+U;PZ|MSx(3fLeZs zN!LpuVe#T*$C?mlnGVj-l=oE|&HxROvqVB5a)s|@fNVmW&}G5z1=xQlJ%buLmpFJd zMds3O5E~TtY7VKmx(8dV$M(B$y;#Qqm()g5ldc5E*d$Hnivy4H$b=TnfeKbGi^{iy z>I15sR1})(R;1LxgPWONVcg3=xrx%^q~I9oAjr#ZlrG9@w-|ey5~zdEi_zi`%l5u0 z!$C!=vWTPvqZVRJ08mOimGM$yzGp;9SC$pHqjp-qMEC>Tw#%o!BY2M^>?9{8u{02C%+S(;SpP!69imTb}k znF4k4C#M5!I{qI6<4Sqn9#rU_ziXz`Su~ucFv2FsG_fcjV;ZX%PIj8)AAW>!(*(wf zS%^RjnF$6a386QP;gR=?GsJ>o&gIGKWFel+sL}b^x=BXzPD2+<%c0+FgR#!}lX0a( zEu0)qI0(lZ0tmXvgyZjixf&9q6njD4WQ!y%P?_+tR%`}Nap`$xjZX+(WB9MxdGXR=_dlhwyVVsj3dZ>b|$2li;lrE~S&O*wr&C zRZY2tGyl?HZK-6)s!Y)*R(ySH-ctX7#xqhsZ%UpK2mfOf5nk%G{|P7BQu+0ta361} z!~gVoxJ&q>>Yt&0jr7Yv?>{=w`Y-I)djXVtdP}uvM7tV(m)D54{l9=iE8n=!wrjvY z1pm*?K5IKV3C2$vQ!@_hgPn^B6=QTJlN*IzRFO_Z^Bmc^ymoIfPA^W;bt7p zKM1?J3-ubPF2x5;y9-*mmq0hv8hT&FbzT#G(X%Siq?A!dbC%)_SU92_)haclRJ3=! z&8GIQnPh4?R>(@g*tWany}elbMF(~6Y`6N%Qc1MF^7(K?gyFZ$*fhhUhIl4S=B}$6 z(JGRwid0FNOgSK=;J2+Z6+-raGZ0;-+$YRn-!%X~#7*hEIg#V%{_u1=@UR!s(cV$v zPu6T8LSB>udUw?GiDB=pIobi9As4^54{Ms@p!BOa5VNx4Qz{+ZT<448}?A2z!6 z_h$gO8Y56?iJz$|+*&vd`SWLL=p3GJdvNmT zBKxpV`bMetMN5Hy*q~S*pEf7fB71gqjc$si@;%){DcZ5j-dB~6x`$C!S0K~#N7`rE z#a_ty&rNLH$>mkn*EKcr^Umv^kqsKMRp4_`8M@nP8pPJWib>?0T1MCz2shN`dzS40 zPMe18k;0QwrIsj&%j)QbrC)`i9Kh{Xzr64_eC&%qoa26;JA}{c#~)r4Wc80jIj$Yk zg(eZcquTsO6*1#Vk_MyVBzQ-#Gh|B83&g$>VtE5TwY! zzTw8ZKP#~OF8zf2)gvSU;m=0!oSZVk|hrs>h+hC8v(X2BfJM2 zoG+Cv8v(9B0>YQSAf<5fkmDqi|3H~v3&8bwURtV&|EBIw>b)IdA&9bGDYN*}es#qB zMxgPZhJkN{lvu;g6on>v@n1d5r|M7Yza3#Eh=O?nauX2|aa^#Q{f9})u20H8_2xWd zdp;bspB*2_z(Ar|xaxsk8O5(0%O*5XhnN@uT#wIUK?%R2|HH4{4UH};9W1K3sxWtH zpwY5vH;m8=H?-iXSov~E2<)%Lu)(Z>@cx~9mDk%todB%?B*dZj0L~lYsDQ=IgxN3g zzTdmy#?myzb3@j7fb$9lmn6(bFax`|@by4>fw>yp)$$g2p1V!qw0m26ZRB#JLtFDXlpvKeU+i53QzgH%zt$6wx z?!Y}r3o;7rauIJcl=yz6+=5!Smz4aXPj`6))REeO$D6S33xv1LL@?RznoR(5*C&*# z0j~gKh%?XcsZP$uJsxQK8DKf#kU@#)vUD%C${aD%9fpwmz9Cj^9}UuLZavs}>Kr;P zs@{3CuORdFy#eS?NZ%W+e{*pP&;TifIE>6f2X7> zy2rpE`}GU78>~`XRSb=q(+Y_(5s+oVZOQKBiz4V!4rr94)x9g4$b01!>Q@A6Zg%37 zh53YWNU*bvG1n-RHVy!2!&EmqSsG0z6Ot`xH|T6ib#uE(bN1_bXAL1wrmX z^?#V?SwG&4;kI-k2 z>DoDw11T{^rX*Z|-+l-Q)M^S`zAM89I$FPM&U`G%fh#sUGHs3NJ-r@t`)`=9*x*U7 zXuAE8#p@%KN&>W+Kpzn1|LR&igPM-(YbBLclh~{rUh(Y13T1Dyr}|dHBL>G#5H;9O z`(rkp;_*6$sh7PtiP2XQAxv(Njf$&T!v`er*vpH9^&*MuF#}z3cY1EZNpBahKmu#$Wm?V!ON(ex2MG#DKNXy8&RcN<>dmc}mG37Ua3$(bsw0 zT`Kc9`FrZI$1~-FAC9DkudmJHFbN=R$|*%i3o`5+e#1sT`kK%kQLPY>2he z{rxrqEhN?*SKs5^)w7db-|IS|%yu$iCf1go2Y)>?MFL-Q#h6G6fj+_mBtWq)q*fd` zd>>!xJA;I6Rof`dIL72PLD@qx3*H{(05gG9br)b|wUSK3f2jr)Gh>wA@^>O|BIhrb zkrc=^1bs42WjYsw3svyo@33-a%Fc6w!iD2c(FNIEHOel=t);8NpiVce8Z^`pN^3dR zWkVa08nJC;uOL{6ozaT6r6#*1br1gJa0sSIUCr`^+aT>xKRV&mp+X9p@vp_EzAUvj zRi1{ixanBVnwOd4K$jZ41g4{X2U&cYNP+_~%dsjR2+h?_XQaA#cZf zC}e$Bh$0Hx?TceJ_rA{J0rI)5VnAf4Us#{Y9pN(>~YN90K`540E3tLnwzqDHrWvoMr0d@V!+SdC;^#+I=F90uSvE z&FeY8m}&#C1&G!7oiiUKo-r_%=b&i0zre~t2gO@Mp)rR)t6etJesH`QH;t^yf;`PO zdz5W8HSBgDxwXWk${||U@h4WI^v`FK77l@O7BwVY`3y-r5qtYBmuvsD;Y5ZEdBxax6?2`OB5}; zRTxV1AH`mA3|!IM`Dzxr+cCEK*Cn#$QmgkI+Ew^^l?Qwo;mg{8XRaT z7wV4X&0p+xr)JSne~MpH3m#h1ITXoi5>$37@u;x0>HlDhu#x4K{igH{FANg0>aJdA z61o;l-k*tBVf|N=(_8H*7bmpr#f4DaYSn%3w+;=Bpwk@ts2s;TUhJQtEXVuJ0A<+t zTewpS^VArJWt3NuuAg;i`e9Xr_FygToA!+g)jDpQRBe!=xA4Ce1AAV7~- zCQhs!X#F|_z_+v?O3dO!G(0H@zX{(&(CLk?A;iuYi@#ZmuS9wi`MXPnzL2vKCK+?t z0N-1UZ@_=vp<4RiurlJ+;=5B00j9a0#lA7QYrV~2Zh-|^wB)N@m@?NZ8h!J#&NY|& zU_AqGqrUIH3a?9iL|6*rB(CH6SWm;Qus=T!yal`9$-q%CRk5wo6T zR;?YJAQ)5lL*Cnu`uF-(j2Fs_WKzN{Au-x@Kz9hK>~PL%$q)m=cjyUz4d@d=WYar# z6D6e}!Sk4ak*&21PqGi$c|b=#B|&g1{8}j6PKGIqBUb^!7U&au@1H!7%Y5byHD-UQ zc?bDh$q6<>j`u=NLYr+1L!2F=Y^AwX*mC4oRpMV%Io<+^F5B?tg`h7n;Y6*a7&KQY zMEMB?C-SOww~2y4=J~A|_ADg<$pG^nxUIw&@0DCb>2EoplUyB<&j5Gzdv>r|H9kSm zgcmTPhdVsE1pV ztIs<535dYjwkPZ+7QR+6SXMj8BJwX5(*j-zPy_Uw*10eOiR(XwQC5lyV<@+cI}-oE zAtqvpWLcb$GpcZ@L}Sp~%xSQ~QojhxV|VpU3_Mqtu{r*3jJpBDFy^DHSlfG^?pJO=aGu%+KY zKmi%$N8V)~ydIl$o3p{{*p0}P1K9$$7>SDp16nO&Z6+|Lw_1qB>$MWheY|sHmxI@_jDXl zTj(`m4qLv^Y`IDRAc_ky7RY4CF%}@=*#*#P^X;1-@>b3I3Z~0Tj`LgthNTn1vc08N zJ=>COsV%}&Q9h`3>|#~HblM?WK_!bBo<9r>?8{}>%qLmxBg4{EEv$CL;oi+JIcGEJ zZXgnP*Q0}Tb#Cy-?=ItRu1Ai{Qcx8%i#h!GhucDz>tD;6KucF0j5w4@A1UwZ$IR!Z5O>^eujPDR z1$Ndm^>F+V$*RI)r@SKOwwlj!b0ber#a;REPB$wv`gU3uqhq#C)2s_o;{m7=egu(2 zZm-{B(w$Hp?J=ITnIxoIeNLE=D9sV#7@l~B0NM0dj)U(<0JZ1q3DcV+BD%ZIcX;2t zsE_C;^6ZV9Iv3+g;Kq>`%Fj{u8Hb2=+C@6Zm+gbykiD0bQ`j*K@gpiitXQjBda~?6 z=<1S^FrWzIvK=DUg;xA!mI%l+m&@Cy{&U^7>MfUP^-ewc_?NgwCsz&9G{dtZTDX!> z?cPB2bpBo?P#p074E<8Vjv3VW;;WX#7-z=nPSzX!jO;soS~6mxg|IAnq<1|QDF#@H z#!#lO3ASy?IyK8rQ6x>j7ope03$sd|pW+Lvl`b)HF-V7wbcy47sRYbDU@yYO|2`gN z@y-#q+m6z7*$F*0--$J%E@(2OnjMSj>oq3~nrWR*u-T6=qW;?z#cz{G>b&>n?E4Va zWQObT!?_NVzsea*aZAw32&-A!Xch6m-k-&$&yhNutJ_00u?zo5;Kcb_Ldd*GH_ zDAM1FFl^X*90BP_j)6R{``4Svx(Gky=;)S!G>N;h06ss%Ne(B|x}Yts;@0<=9#9|) zA4Zdqh&=?7L!P@!*cWxs5P^VDg8&1~XaN&CdQN+i7=d*QpUwwdT>?1k#>v9pfBcdu zw?_-3P|eju_X|=HVBfk)N6~oIz4v-ZyNe}6qgkh8zF$B#9_r`Kn|7Egc{CYUTT%YO zPWz%bb4{2}mI{kr)$QiT?lDa`!ifqiQ<5KWoN+W2(c89t$JUzUE564`I8TW#PYwVT zHYK~_x2tKYJwAL&1a^|L(_N3M(kXI$sM9k~V^GR;m#W_`*u8vI48x);N)%LWiHR|# zF_fC&VrRn{psH|CLdkSn>U0+k?LQ{&iwk09;LGKbMnR{tz3ZcS1PyPl%1TQRsbchM z{(*5yaB;<=&loRpBq6N}_P%QsIRVhNn@AoZl{3k`#Ai~1Zq1hzKEJ3=Q1%YCVP+!a zy-uaWNUEiC8IvB&pL=G;MoAi*bS(1OWrr(#cJ9CK+Ms)27iDuQTzcXSm0(jv#AHXE zNB{B}UH-$^B$!HvJ1TmDHmm6YAM(`JWQ^g-*SmuFW^xiY;2N&{pe5lr>HqB$dH0Wc6?)h_DT0xb+`k2h-Hz$BdC1|tMNb1Y3m<57VJs!aZy>eg+}Vi-LEU3lOScLC@s=cZnoe zqE`VA3OEf(Ha|C)^w=QH>GrwBTe+MB&^|SKnX$9ZgbA^<>Ryf$3N9*0N6r~tH z1>XMhnIrTS-5hq5#s&_btE(-FIN^tG)+yLeqCnqhIU0Jx-sHSD~5 zXp+GU!5Ps8@%cyHkjt!ASeb#BrNyg*AAX8J_C^9;n7Ft@0UVT2(yVI7Ts{qt%Bh}i zJABvv60`uXhI*wM$X$cQI*GO}?YF1O;@M!D$#zb=mv|$F2YtrwZvT&q&a?GYFI`le zlZC;;C10;r{mRNCMzykcK)jds>RqD+UYcu%I{)aZ?qc?Ns}5f(CW9VT`=I%5bu=Jorh22+yJTM9Oyjn__#ko4 z^h0X$HcZIG-rsD*_RA8!kDqVYR)nK3m8sSH$Ky87ft*%3JBYMOfYI^Vo`5EQZzM~k zrvUnt?jDk4CnhWzJcbeTE8BpEASv}p&$sJW#au+Nw$H5Muso|0sjd;%3M~lSxW?vU z9aL=@+;&4;@z4HV&YpfGGywCp(tE^4{gEjubE@TfX_~mZUEr_@TjQjH&O=Tvk?-JH zx5d#>cuV1`k{6*Hz>HUSKCRBS0OkV0!3rTN+NO5IVbWuga@JC#Asm=V+ql=sP7IZW zhs?$D(`LnUd>NuD);&Nf!(K?Md3RHDc|NO3@D!T&L-Pp4G_K7L$F{W#quo&{Pss1% z!Zu{`>FR+`TPS17h3Bxw8ZZ0j{La=Bl6HkLvN|F2q?}O_U@QAmljb8nO)LA_v+S|# zSdOFvqH-Me;IOx%$IJR7RqT(DbGZRuYo0lzf*O6eSWGZgH}R~%h#EJt7(YWW@})9* ztd;FBT`0<)hKo->cACz1jb9_4xEWdqStP+vRd)^c>Rrcu6E|S9SkWNT}IGAFE$s1Zk5x*a<96e+`xSeH1i07E(efO5PJyc5~0gT8OPN`#zf4JRVT z>l;TuNIyN7;`+Fi?psar=cG?=nqXoVYP3eB#=2)1E|JL?USMv@Zx*F?4&GCvs8ULL zV;K&NK6soZ{PdzQnnu(4$|0wkJukpTr}+LNo~L23KO2g-@)5!C_W8Rjv9#D#j|aJ! z-a%3gSXt-1gQzTZh+_*bXBRS=-bH7OzT42Zw|5;km3;UTF#De;CKRbUZ$EvViqM((k-~twa?62X3 z=;ZWRCrvOK%ODM6MvRds+Wd?w8$V;rN>m>;fEr_g<-lP4A@Rg`5gadxSyNtwFGwR1 zPI(0ChYXoNZV)C z*7BW&WT`0qeH)?giS7jzQJf$u%R7O>vVBqBH=ABsh)M{^vku@zE}m&}RHSHj}!SAg!mTPEJ-Uo9Cj|`(8;fQ3H*re*@em0LL zD$U3X&TycD;FW&c$V3fW04pM6^=v*-^%{w#-@0of5B}7yG~&*b&Ub1QW?miwzzeq1 zvmcRJCnZY|soc#e$(6+zcfp5(?SGA3FATem*VhGF)pi|m5xWryP@{l5Z{F%=V$V_ZePPTjR4Xt16E<1K3o&L zat%I%azYI5Eq%2lYHtz_Ifn8E`nIb$kPmlhY;`!A&KC6+uX}4H1e~Hfk6-}*CcHzz zCGJjcjC8vw^`QfYk-1#TkO{$y%7v5)R)o0#>3&B7)yS$p`mYX}1eXu$`1cu9rzRe< z8^S1Jr~z~m2e&)`@DBf<89q}t1_JiKj#LAgj1)lyfdNL0`2Tgfk_Q9?=WBc9-&YoJ z(1@PkzxK6>|F^yX2e^rY2c$Aa!T3L$>Bd5!^yk8$1C?!Wm085REuo_GoV zXFT=a0YI7m8(ndMEy)5+)G2^6=9mQkL{wjA0#vaYjEd;>2^noK5;!slt|APDH%|otcx99kZ8%eYK{8 zQxOm9yZ`(f46^3BGNwWRK&}yaXSaYBV_XL`R*Km_|?SinA2F!A@gTa(xoJkqMZ3&-`f=M)o2eS>c%b0xMy6 zU$aIVwy%FIQfetDHCc34P_mg_2#63N!1!x(<>PYH6TU0dA&X+kaCLd#P|~4BSBsQp zNyOWDr3E32>$mU0_CU+QUq^i;c&zEKAd^3P};CVD$TJy#@nd}3e8Rt-jW z`Q%e)#u-w01@iZ1U{rZw^k?R9+5Ok?!EIX%uF1SenypCcGfwi;=CcJHE2?%YefmPD zG-~O2YlnFXf++o35Y$_#zk+XTh>E-FeCZr>)A0M2f1AvJrwANN?qNq$O``E^##X_t zOiIAyZcm5keJl&wbQV}hg$`gDG(a^n6P2pQ6q(KG6qX-eexNlM@wJrd`I3xL&Ye#b z0+1qn_0m;t7)uU2@^e2B2G)?#&&ukh*}oAsx@U0Eb{%1i>`mT0p=1v?-08riwbi%o zTyDX*ZSLH<&;x&f?|`n5U2dUz#YzKE#%mL365tngli42U_B!p_XI3Kxrkf3lb&2t9 zbNRWNS?d|w_{GA`WBmg-Hm}XY2old_NEIJ75!n43+~T=ku`HgD6ysQX2s))fm!5V$VSf%p;UfDmqY6_dMZ}NxdIZ9i(J9~f zmaI>~GleB~7Wm zMhingh!a*ap@}%q`tgDs*r<2>mEMBl!j|p0pMXAIY&*dcu`}$e&BzaPyVTQ+Ognc4 z2aC|d)r+`6XA}9o34(-ttYl`WfH(s9==>S$$*Lh{+=z!8B*S2uf4yC&PnBZ5b-w#}?b3`NuN40u(R4>B ze&p;gR6y(r#^1ppol@F8eg~*mbHVhtNk>UYfPokWb8BLt$-EE$`o4U z`1S#g$dG+ajOy^pnWf!XGrpITdevoP^R-SJF7wSOV)=SJ7aU9wY$J(D<>5SOZcZd16>nTn zF}Vp1^dLQ!LI`r*2^x?ExMf52$pS8vUIAhVflZ+yJ)I$hrQpG3*pM{Ox-&uf3yiQc z%vo#b0TG{X0uN82AESU!{j&Le-Th{Eu0!2nNlJ@vsY5{oRdxFjfZXa5F6DDh#e{-7 zDWB{qEh*FpF|blP&U*lfbq6jD$Dj!OtsTznyT$pW3|qEXHWJd3`iwCIf;a$ef}XCGB$nV8MA1k{;fE zZM?opAKmZYU%wy418e<-nhTege$}m9!bJBRK7>1wpwz6se>f%g^!UA<_s+cjI)Ce= za_XVfJ-vRfabZtc5ofS7giu|UNa9w|XC>-)gId5)FlL45M})c^!XR`un~MCZq`<@W zdng9ORSAuer{Q2I3d2sxo~PmWP#ng0kUqK+uq3(U*oMwWFDf^+uW zbRs?)P@i(icY-AAuM5{O!d% zmX_z(pe;U_P8WYcYVOCCUgFET9h0qQJ5aGT`!Q@OL;5z`72CNG4Rkgx^{Q(KMTmLG zEG!Ld8SGcsBUl{RG+1re6ai&EhlS!H%5bpKu%obfXiBIcQw(e%zW6uUZ&|y@{f0r`As^wWOW2CJ zN_#x(VAdo%s;Wu!A{`_tx){v{?Cj$x=Fk+hSq1y=pf~`~B!IBK%|gh)cDwXMlaU~A z?5Sd_`7G)gOk4wY4wI{dECegE^b!-TAYBA22t-wGRwEX(UL5}V{-|?1>W(6!Dc?Gr z@)0Cpi>xn!c^~Ygshn&}U?IPR+Nd*WL)@)M`MwD12@jgvw1}4ryx@|?nPyZC0))9) z9$h8~@i0V5LzMT6lzJU z3VssgltK(V`)C1~7Ar+!Q5OW2@O5iCwy`~MymtFt$oKD)>(%?{}gSMDQC-y`lqieT30i^$1(1)q6J)5?>)h=BvXaz%2!a@mVA z{%VJ_-f5zSai1h?HU#!0YQ~N0NYbeT-Au}A7tngh$?kG*P6Z-*1M!S4hL2eTe=ZQ{ zKN_uk>E%t1;c;A}lwPl~OtU^{Wl0e|u-;U|bbN3d+}(NwJ4%;lg>TBj61woU@BU!ez4cgs5ypq2n9uI`aLiVNje5i>Cc6rNHc zYEXZ}gYID8oezLKk9w#Ha z%|HaIRIIzk>^tlnQ+H2SmhnHCWnmhhGhER`dxRKyFm=+<;BmIb2dBZf8vz6Jm!wBu zHg2FYv`F%*wEJB%_S%Z%g9b*kT}7)N-zPaj>!6N;_6V-1G6u4)+Vhteh%yRy- zKm}D|ri6NGl>V;~*xRZZAVC~d;6Daf{vt}L!2I1c^EI>Ta{(9CjH-N3r>TE*{oieF zuHq*CcbkbpetPYHFxfxtLb)tA_+PsOx{BaG6;_@V5dPIGms6GWlE$K!{C}T`^@~We z{1g7KLfv&d<_FBbE*<#KY@aYEHzQ*OAByz03ly=WoPe8xOr++sXUQMm{pSOCeCVN#jB7c@ioP|BX z{IOz{b(dCZM6G1+a+^-`S1-$=IQ^KZ<-;&*Cx5NQRTFVp@7GM@t*M4!Ys1H$6;xFB z>7lOmk01Dpxe~`bRmcv(0u_WB@{~;xz|4o9!fa^CGqwmU<${nvomHPmoERs$-Hvv* zi@CMIM~ICkl#2<+vhB5uC%ZG$k{7UlLR4h5FDFiN&;YntX#QBpnV zC4mKIg6H0Bzb8A>sI@0MHUc0?RraO(%#Wz*q%poo`=l|h$g`U>y_8=eP- z>a+^J$ur&D%Ctu&i}0HE9;>oUZm#&(!)r<6BJP*&7%uD{XS~Lv3_3jm+uND2RNnPP zBQ05r90@L23w=rZrY`m*oN4;Whf@H*fDWNrcLz)k~3gSyJH=mME)U#I!8p9T_v2Vx3pyExhXAaUJb#+L*|ks z|2L`km-des3CQK`4h_dgU9K|~mglPQD?Ew5GU?}wcMVZUTXw<R#zZBHlu`y9(V zk0?zJE`%4ynJXRksWd2rG?*A6q8LUIe3WSViFY;r&EiUc{ePqobESVB&1~66!9H2= zuzL~Xg;Ag(y*B^D{Q^29qQaj1MoGR4`Zc!aeSjM$!FjguX&LMyh>Vz+4$_yMkXIm{ z@Do4G5Bpygyf}D)c=%5YuslR*Nxt}z>E4wOFpwef9P&%6)!lkaIkmC-s0jQs_OA2IA3d|ka59@emXC(;>n)`!D==Ul4SHh-p=M(eJ|lI zHJc(QU8EjOX;H)u3)50S$0!e50@kb3Gew3+LF`Sz%I-n#lFjm;w~+c^+8ZV?_T4AsI-8Hz{1%i7R02GZAx>m;nan@@{3Rx zn-d+R3B0WD9H}$jqU2qgD4&NGLDrvMc_{nEN!d(e_}UAHQC48Ze}V2L1*9SYVaEGt zxr8AJ!xB8Q;xOkpcqi`n{_$#506FueGmp-Z<_I9cM9(dlUE!9X%%w?kW(ZMzT={B! z8>@E>%8lcCFyUOXIO5RN_XQ0V5hJE!Km;<3=(~v+fHpMh zeSv+!K7-F{&~w87(%3120eGL%s5Q>rQ_GlLzW9z;nI@WQcAOY&`4gjub5}JUajNQOYkRXFGrdJJR_WVxg_R z{%Gdx%hH2P9GNE0228VSSwB|DhugagvMIuMxUH^7WCXtemLtRZG++17!e zm9K|lkn2+YTd?Tod{hi^@lz_+sz1>wg`73u^7~klHs4mV2cY+Jaaw~?C~^4)qVPHo zwwVg`A!MKYeEQo@z)UtqiAInUdJq6`r|2tS)S`%HPMUy}12EQHte73JfGPpN2nMNa z&?8`krf*BPe~T&LCy-`e_}`1bzf&?u9yy2=Q?gC0129=9sc1uvX#gXNE@e$Cy477n zdi9dcN^!J3(2g47m}RB1q#`@FlV_Bd6yWuu>b`D}gR$2lE+;l4alnIoH9CMd1Pc)jMuznxqF^FMl zwNHH}FuxGrpK?p(&E|C#88a;xN$;x%{6Y((f?d&u4IB9$wtjO5x55<2;dTN^_UxBQ zh!*;Z#4CLIoy2770e7R(j*xFe{i|I}gjlgiadut{Tj?pwHCPiFIRpw^!j3nM(C0DC z12KL2?ij5NB?2~7zq&;ru7f-RN_#+Z>O7^UOum>RsT?3u`tqXQ?pI6jIn)h=W^a@6 z{55kjr$^z%h7WUYhO6({MO&FzAB62-%9-Trv zRpzn&$9YyQ8#b+0rcttfCy#B5LXvsEf;y85FzL6}pCH|rCEZCz&c?-qh*s2^V2@Yz zDiZ^#gmSfYBe&Ja{N%qqL#EwV&!i`wNSB@tKp&57hc*AU-~Oj11tufaEZgM-Pj9C* zT{{-5y4*1pHTNy@mKj%smg^xzDs3W%haK*YDTl{P97aett}`{IHhrXuUtXpatnuND zfvo-KE`Gh{#dG9S)@sPqbr5lE@)x@>%w(*cmDPAnusE4t4IGbKZvZb!j!tY1f5Ez2 zGemIPC0<1r^1rD#vc_r5Z(6v}p|qAD5>zGU+Ni-#5|9;d;Tv$Mk|VB}1rlQs7KHJF z@CL%C{Le+p&Q-0Kq!D{f>nel@D=2#hxaempUr#{fgnt_%kW?G0zauaPQASRK#qyZ4Be*t(;3-mnKS# z?DhPXlr%)&95Mtie`vqw5VGV|2utRWI$!RoCN=){MVsN#Ozq;q0J3UG z7EmI}lq?&18a4HGF_!xw&^%H>>Hg;Uaq@z9x{IhyG_YTxhd{w8zVBvju76}X7lLC? z8($`yGDsglR@NI_+l;D2vyuzW8@0G>0t#kaNT1_X+S)Qj8j_F5<5kjuX>ip2==%zSiCSXqMtG`V?5mD;k9D3du{#sz4WW12ZO78W+OQfAFk%4V{XlFvBhx?uBEHB^}Sw@p>X1Y_e>ZvRc*jD{z)< zB~1utp>YvLkk^cNT%ogfhparK6PM9d%?5qhI0U-9c{y(B<>CJRw)~-wyFrdJ={4O{ zo^3_WY(b}Oi$BS@X<2c-kD@5Mrm0q|MSf`dcCS|U62;dQ(0og?cy~5g*)x0z-ov67X`|^Z(X(0?FkufGd1x}a*iz7qS zj4rwuGmm$%tky>9u1qvP7Rdl_QlxE+TJ1D6QE{HHw|uhnUVAuerawi4jD+WzQqrih z3{!79WKVL71KhAbY|IZ0NELJ>hoULOh!~0!W0`xaV=9az1t$G^-3)ytkoh1ZXSE(E zdJ-i}gjjbmv?P@(2A2^&XGphDv&YR-&PabDDWv!;7aGI=}KWlKND6 zG$aI}1n@PD`_r~USIm7wG&c>*oviDzJ1N(#yCSk2ud|P5OK<&rES{QRrJjxC({B6e z7=dl5hrakF^h5qeK(d^WDU5~>)%2 zKKw9*)lRGn&iSy3-aai9d#68PdoYG&N7`oGJQ%rDVXq3ZB8`6rB#{!z|u&5XX2`+IZ}a#HvQ{?0M4 z&`VJ<3e_Jj;7kpSow!T)Tg8mm!sG8TwBbwHn*=sLVOFnt9rBR3GIjpgtK;dFUU!)fTB4UBtnShnqfsa+Z-3LQz z%fL%d7|R~$zZ3{1`(f#mYpCX6cT88#ZGek-yom3oSwV>$t6gn>QU0xj*zy*FBY!kq ztPp*=HBDpyfEWNGFeL?^X>Y`BaH0CK`~;H1-l-^V@ET3Vwyz5 zmwknEL>wt^_U>&=v6CmU&9U4ciC>3!<%`QDN^1kguyse!eX#RRHTG)f1?vBnwAGJX&o`tNE!nbW#9${L`45$o@R^3|Xl^EN2EQ{o`j$kLooO)y4^GUO(Zy>_zMY{wP$fksyd-Z-MMmnER{M zD7M8mOt%=R1i9D`$HbrpyL=$B7{y`eVY2pSEc)$Gu&&*Vs*J5jAQmsY9ik-oh=Uou z9EMg}wh2`_*oM#~nN7DsTg6SI2P-~oOC)m^uxp0G2(=<~=BUOzw1}s_8P~3P2D+~itEt*k|%rp)C|-46PIJ_ z$^Gk{0>S16?(Jz47hm3&QhhOL$)BR!=n_cvclk*B!0G&FMzp^i+ttfk+heQ3&N#=l zerIui9AE)H$4XcPLL89wj#to*vfsUa4hFXldM^8;yb9Wj;~Fl$+7lzwv+fk-zWJ-5d?Z(e<7rLK>y93n zPf74136w5wdFA?ACwu!FFY&N*nzlolA=OeNNU7BCoqF{7m3e`0;@9_UV!xMLlsoyO zX^2pFotnCP?DTbB4S5>um}Fp?N46182G4Rebk`jD98s$ol!km&u^v*{D;{mBI&Aee z-MC!Moye?*R@qOa3QWXWSHHKP1#?nc8WRGlOhD6k-*m+8H0OGk8WTM4)I0^~KKUg=|Ly=wyXUn*m zJ&9LaSCwR48X*E}UJ+Q0viT8@gO|v%zSz7A7n(RdEA>oxoknnv!T?dE= z^h<&jsJt(Q>0h__@$Dehh?sCAvYXN-Da933I1Nr7FtlJ>PcshteT1J_T&1P1>V4)t zDYt=*a=LY|B=-<(z>DYTw%r)|($fYUMdMK6s^E8v0RnBj#MG0OwW0C!c`Z~sxd3(K zuA8;s+@_E4%X_Ej2ysYeg0*~^+cb~53?Km)I2*pKRZ)G(!z-j9yN!FG1>UI1EAd0v)qoX*tAmlt&#~HZi)zmW-?{$m^~(_fqBs z*w;M8l;DSr!qgri_*ZEq>2Slf2NM#-SlL>@A74*>08i0mI|vIWo@K>GfC@hFS+vY` z{iZXJpn1!&YypljLS-gugu5k7HD^`<8AW}Bh2ijp%DC3^?p|ihiyXdIPJ(}pg>!F5 zxjS;_)LVVSb+qSP`Ouotl%~GhXjL!=*jl##%=p(V7CMnDDTUTTLR8T5(|eD-sy#m4 z{eHbgQc~+mWP7J8jjBHYQTmEAedYZ204u1TQ^d1JSO{;hySzE!S}tSAIK#Lr$)~&o zZhFf9oGOFQf~k1_;bJj(%hAt3R|vECm4QlLc$FWYCS=Esw+le;eZKE~$S*4cjH9*= zxLw=ga(u(dwiEqMJE(zRqMXp;|1L{NEAQq3yN}DX8Dk)Xoh`{ovEDSD9x)!&aVouOEU)f|r))o;5vj{@_+xr-sn(5VcnoJ#CnxR?l#@Dm9 ztUZH`5WEX*vBV+7Q>u9VZ;^EHz^f)(Q%8>AeSC&={BTj+5*{Uy>R&Q6vEKdZW+hU; z&_R{R>M$=?S#HCvy2hMCJsMqP+jZMs%xhuSACejYYd(q;!^Gv!KTX&rh=#&~S=V%| ze_*v;9g!IS8ue53y2Ou$|MG!B@w*>MHmb5SgrlGyZJXhOK)pYT64R{=9Joq^Z_Og{nv6#4z8+HH>{*xJ$l`*1$-qF_) z#1Iz8fo2nhagTb`Cbju^;EoMZMZScEG9`o)p#UeYdtshPYxUtLvrtX((X85wRDhEW z*k3IY-UIB2pp{wzItWWx$#kVqO0{C)iow547u68YW%cLt2g#0;0O^+?FGO8`rn5c- zQm#v#^&uv>_yc~$q75QCnM~9hru~qxr|i&{FR(@7#Q&M2cUbusDb&J8b_sbvmp^+= zu=i-q|1oZTztu>4dZb$&DD>xt;m72p(ClqISE!TTal2rdHWRCKaL&1@UP6yWu!awx@5GETcawE#E78n=+;0g`^Py#>=X80gdb41XR>qp(T8Q|(zJS6rP9)~cAKJNtz@0WiVbZsv8?{GO_%Pk) z@nKG{Fku9`4>>1XFPLGeTUHeE*So%{ooB->oMVj4v(Ncewc4X3X*;mnNzDvZxovyC zyi7YaR$VED)WBgn?>P@{r&N^L{wc6tr;>S3oMN1;Xvyp+1opK~J!8gQG|lTAp1(ck zv(S+ny(6+0mNviCxGj*~U4=_bGch@*{jhNY_p$w-2#{-snLLiK9|=DeSq?H+aH6dn zI5(CJl`T54+rX*CCpXWcYnK+pS-h9NY;JB|NiDzrsRcSXGD_RM+*nd!1?Cjk#FFW{ zFk!Y=gw#qXH|uJ4VHfX3RfkwlhxeC`1b;zvwC&l7`qEEN;h`P%*@BWCTZ^nX{dj%My5oUd~LDkOousK3A}&kKFP;RG?+5Z|bvROclJG&T{21_URoMM8^m|nyegE(oUeq20mekzJY zF4)X3bk9mCtKZ$E`8gR_;YLunq@|r3Q&xC_*6`kYU56468C33^N?$q?yWR{DD6KFK^HbmvW5;@~~AU zPs;+LibWs|?7r;=AMBu@JxUB|qIkB|qAaV>EH)am zCLWIInDVeTut2+yT4d2Nd2P)DMp@j`C0!n^DkuIG>evUy9RO$1btTbXrmTo9{c}~g zZ^`kY+a+_xJTgwhd$NW}j4TYd;Hp$rV%vcT15v$(;>!89nIp6mw3!&?9x}gbcnshS zXOvuKzlwr>_mFsdh~-eiR@jxWAw`cB$>!EKM{NEW%ZX1u$lbCDlg%Iu*;ef(T*^}= zp~x@wA-B8hK*@kNP5*4ipUdo~-!Du&R3ssM!At7K3Pq%}R?4Ki9()6Py;bp+rEN(R)7cjJEd2v2S^xe5~3c}1O z1k|IE*jh(iM7WFLyCoETcJvVLhL-~`UWjdDVrnvM-0TW=(A$BcLpV*l4>{$ugrlWB zU&)$ur%DT=32|NnbJ~pp4{tueEZ@M18Qhl~3=G46CsF1%ed^t(hb@!ZShKW4J?X z=E=XS^K0{-V4rD+2nXZmDP`3Ued4nahasmIArvvd@=Z?$WARk)^vpCUN8_*!PmnX5 zsZK7eB(9oDe7fg~VP2>a+}?oeUIpTwmLmp`OpP}6yO{BBgFO9DQiBe-7=DinXBICD zj1~^u58yP;6%JGpjw_-tW@TWCW~211=Jg;}Z+nZtLb8QbqfF<7@i3|@)?1R$=CAeA z*I%#>Au%W;tu!^a0s;Y*^FNnwQp%5J4g7OMG0ZmP(xc~eRlFA6RlKc}Ha%%yxHlqi z6R^CmS9#z{sHiPOehVQDkBKEXZ{2d=a$uy4>hy|VM%>sdy?w>jQq9(_O?ye`SCUdC zN7q11RV_CeN#Ex)dT8iaZ$r3y1w`z=x&FOCN+n+0+^=@R-zBbF{Cx=k{gjgep;$mQ z^{9J8K*b$GQJFLeXtRO=$3Q`b>$O?v9mrd&AP7^e;kJZLhkhE9+$WMeFX|E|9OpTsB84-ztFApGz0=6~`A^NZ2qvTi|5uIqEQ(_OrxIWmBxOQF_=f3|jawI>4Ctkw;j;H>E4=|GZpXiDUyg(jwYEB9AHOC_SH?I2Z zTu{RS08sx^98j(ZsxcP;m(=)_RR>ql0*P3V6a0G&{wG{R`!Df(ke`JRc#IyX+d=?5 Q$`JHwApxCb^pD8@2aK})-T(jq diff --git a/params.yaml b/params.yaml index 54f89d3..3ab2cbd 100644 --- a/params.yaml +++ b/params.yaml @@ -395,4 +395,4 @@ ratio_study: # upload export: triad_code: "1" - run_id: "2024-02-15-reverent-caroline" + run_id: "2024-02-15-happy-tristan" diff --git a/pipeline/07-export.R b/pipeline/07-export.R index 7cba358..0f5cc87 100644 --- a/pipeline/07-export.R +++ b/pipeline/07-export.R @@ -141,7 +141,18 @@ assessment_pin_prepped <- assessment_pin %>% property_full_address, "[^[:alnum:]|' ',.-]" ) - ) + ) %>% + # Replace values for buildings with ONLY parking with NA, as they do not + # receive correct values from this pipeline and are very rare + group_by(meta_pin10) %>% + mutate( + across( + starts_with("pred_pin_"), + ~ ifelse(is.nan(pred_pin_final_fmv), NA, .x) + ) + ) %>% + ungroup() + # Prep building-level (PIN10) data assessment_pin10_prepped <- assessment_pin_prepped %>% @@ -224,7 +235,7 @@ for (town in unique(assessment_pin_prepped$township_code)) { num_head <- 6 pin_row_range <- (num_head + 1):(nrow(assessment_pin_filtered) + num_head) pin_row_range_w_header <- c(num_head, pin_row_range) - pin_col_range <- 1:52 + pin_col_range <- 1:51 # Calculate AVs so we can store them as separate, hidden columns for use # in the neighborhood breakouts pivot table @@ -279,7 +290,7 @@ for (town in unique(assessment_pin_prepped$township_code)) { wb, pin_sheet_name, style = style_price, rows = pin_row_range, - cols = c(9:11, 15:18, 23, 27, 32, 51, 52), gridExpand = TRUE + cols = c(9:11, 15:18, 23, 27, 32, 50, 51), gridExpand = TRUE ) addStyle( wb, pin_sheet_name, @@ -294,7 +305,7 @@ for (town in unique(assessment_pin_prepped$township_code)) { addStyle( wb, pin_sheet_name, style = style_comma, - rows = pin_row_range, cols = c(37, 39, 40), gridExpand = TRUE + rows = pin_row_range, cols = c(37, 38, 39), gridExpand = TRUE ) addStyle( wb, pin_sheet_name, @@ -312,6 +323,24 @@ for (town in unique(assessment_pin_prepped$township_code)) { rule = c(-1, 0, 1), type = "colourScale" ) + # Format sale such that they are orange for adjusted multi-PIN sales + conditionalFormatting( + wb, pin_sheet_name, + cols = 26:30, + rows = pin_row_range, + style = createStyle(bgFill = "#FFCC99"), + rule = "$AD7=2", + type = "expression" + ) + conditionalFormatting( + wb, pin_sheet_name, + cols = 31:35, + rows = pin_row_range, + style = createStyle(bgFill = "#FFCC99"), + rule = "$AI7=2", + type = "expression" + ) + # Format sale columns such that they are red if the sale has an outlier flag conditionalFormatting( wb, pin_sheet_name, @@ -329,7 +358,7 @@ for (town in unique(assessment_pin_prepped$township_code)) { cols = 31:34, rows = pin_row_range, style = createStyle(bgFill = "#FF9999"), - rule = '$AF7!=""', + rule = '$AG7!=""', type = "expression" ) @@ -373,18 +402,18 @@ for (town in unique(assessment_pin_prepped$township_code)) { writeFormula( wb, pin_sheet_name, assessment_pin_avs$total_av, - startCol = 51, + startCol = 50, startRow = 7 ) writeFormula( wb, pin_sheet_name, assessment_pin_avs$av_difference, - startCol = 52, + startCol = 51, startRow = 7 ) setColWidths( wb, pin_sheet_name, - c(51, 52), + c(50, 51), widths = 1, hidden = c(TRUE, TRUE), ignoreMergedCells = FALSE )