From 2fb5856f26339eeb7946a02624804340a0532b14 Mon Sep 17 00:00:00 2001 From: klau506 Date: Tue, 19 Mar 2024 15:48:56 +0100 Subject: [PATCH] Fix agriculture name --- inst/rfasstui/map_data.RData | Bin 935 -> 3413 bytes inst/rfasstui/parameters.R | 2 +- .../rsconnect/shinyapps.io/bc3lc/rfasstui.dcf | 2 +- 3 files changed, 2 insertions(+), 2 deletions(-) diff --git a/inst/rfasstui/map_data.RData b/inst/rfasstui/map_data.RData index 4a94bdd3c4fad76092aeeffa722f63a0a649af6f..a324692d9bde2e010fce6bd58fbc05bd56c12aa3 100644 GIT binary patch literal 3413 zcmV-b4XW}ViwFP!000002JM}DR1;So$45bn;sdO*v_1$b7HiSSL#5XK1|$TOgh+UI zH9-Lt0V4>dMP)?ZQXWzPv1sHOi$K622%-amf`A1P8bvBnb$yhosGzvQPS-M{ay)1M z*gf0r-kfuj&+mKh{oUWa^P4*p;4pR;&PL;%$72|#f~k(8-p5dgja?~NY-nPLVXC7k zYZRu6jiWx*eB2}=cem|sRI~SgYejudq^ik(wm}6IR8T<$mH)f)#&vS6w@09dw?9Q1 zR8jw3RW)R@O&DIxX4vpGHhPVXUt^Qkc*$$L^fg}g8k;h_n9Y7G!Z91X-Ta3Gq{H@f z+pvABA4P+&YN!kQtC~@I2oNAZfB*pk1PBlyK!5-Nfy?NR|4~^*XzPLy;eQ&(I9YMb?2&AK~5vF=BMzitxXQe}Fp- zWFX_;XuSDz*KypHW;~HlC@@3<5|DrdBp?9^NI(J-kbndvAmL9S7$X4*NI(J-kbndv zAOQ(TKmrnw@V_X$`FmUyGdnJg4nhX)htZsCN2851jdo_kxYCSIqZNli8wQyMwzM;j znI(-}`Y$LrLcuUvTGQPunbElB!yZ(*wl=g2uHDLEv~r;PSz9n@PrFzppw-o8uEXAV z93CA!k3&zCXG=HcxzOvwx1ihdZOs^@XUBJ?r!O$0LlZEIBCs7sRXgg~FwAinZeq96 zl}1Z?5Ibu+3OidKjY2cph43|ZLNg)59L9+Qhe6t(kU1nmC%S>X72VC=fu5kf6TL1D zt7+AN4nxI}PY373_(kc4(ha2>N;i~lDBV!Hp>#v(hSCkC8%j5nZYbSQx}kLY^QRkz zO~PLNgZVdJ5dHna4|Aj##Ng|UlL`pfdzWQylZt`)3|`{ZMhucWm0AU}rLa$!sxo&6 z24eHhrdgk2u-!TMYjGO};kzH))^#Gl%W2=ZpKf80{sH%5pPLlY*poi|E{l0B_%zQWp-E0F@F^D}~e(t3{Gv2l~o&KF+1h}4`*WXu+ zflE}yp(ZN~b_Q*>cwS6^opD^&DN79YDB9y?V{stv-XNw_;Se2ESoQn_0kJwSY#r-K z2n**eiG4{zaNAE@xhdm+eNJ9=cG%m?ivgk8Z_HK0VPC7adJrxiQJ>yszvli+DWoqP z(mnP)L5(Xgsn;VR>19i3uz~>YL^Gcw)O=h948jdAkMK|X*(xaJmu?uTAJT8j2^}IJ z?prOgqMH~|zy8pNQsorJ-kTKCzHK%RVIL^JoMA`O`cCuSMP6Rad_!FfR`0B)@}@w? z!ZQ^I*9EIxZU!-a;x0sbmQ(ZaYfFq>+lztTqYjf)DN`@ftFznk)4S*6vn6n6>z;Sk zzq{Y;3IV^B$^%U;^>g}+9x$b4Z-y}e?nl#l#vK3G{RK)mr(3qZyME8{F3Cg@24U8s zwH12QI5npSKKTlRh&l4UxS8ZT`)xaj`}4&Z6be&WO)3we@SfuFvOI#W-zR^vOxAz_ zIsZ}WeQPx+UlmbbdtL^Ic_BQ384C`}H>AWoCLu5EyT41_#UOtk;+Hh48LGdmFWGD% zhstUXEteh%?XT#{uDRlxI@&%xUTC;NnF^>mh-kkj=wLh*5`js{@r%6y44H?a?O@Pv8Yuaw7l)?93 z`@Ns)$b!uLl9!2>S#d9E=kBw%qp|a7c zzepwnS$WZ>gWKd#TKYKr#%D@M@W8JR2*hvqqx(nY8%(+N3l4j1w8h_YF!;9iA^+@h zYCoy4>WKtko?Si1ulY-!(RbL|@p5`!JD@wK|(z+T6-3B4qQ;xQ(wIrO?ggk-{iwFhFMhi^29c7Qq_b7bxRNO2Nsy}n%$d%)A|8} z6Lr?NNjQAT_xyqwDQpsoPkJ7s^f~WcoHiMUO`ev#GtJcXDy6kwr@L+UMt|an7tDA@b#9_uYdy6yno<r{r$FtKCk!g-I136dTwlRq z=2Is0o_1qB)jrTmR@@T>8OOZpLh4x%YaRPh&06aG+4ypKt>b(0=f)1{_fp zchBfZfbT;FH|k#|Av0X>xve%E4hL*Y_fZi;V$E)+FHBjGbMUy0%{c-h?-^d{S%$+m z%M*pdg#<`#?-!~kCxBe3)n>d{n~rCH?24FcD+nl^8dADmrUB$q-5IsZCxG;>T3}*| z1QhUI-Hvt7AY)$TBG*6`B!%CLv0O%i*L!TaZOh2~NLuPY(`kswi_rQYuZ2{;$P>C1 z_LJ2>mRn!8NQQ&Q$rqhzzDM16bO^c0ZY;=MlwMgpPeRvAXYF~$zRuX0 z*tm3UNjHd07icaR2KrY$0=91FJ~P=(|S7CZ4+AcI+TvfAo=#$R}d( z&)9OmA$epx(()R$-pXBtVL6uZJxAEmMI6La%wu&ju&~ig} z`kiZ&;9N$v;?$KeI9Il>KU&VLN7d*0XNN5tdEn^zmQOED zt&u^EwxRV7YCKYUsmdqj6FA@ZXqAzU050s+h@N!*4piM7?5lp31>|H|PoYu<`S*NA zDec&B_ExmRlX*%|ERcjeZ4834g8ZdBf573K>D5a2zsLv9I$W6Nr z{f)XmD-t9JtlrDSlk*wr68M6I;wAFK{+R+OtG|=B2Pa|wq$o9Ybr$4xK8#Q=5kLL7x6GBk7v_0T`v9L4^;lm6jt2Ffu`rw^qp@+j*Mm(MlW&{39|lt~WzTX0!5nL>-WG-G1)AtArz-;<*oVHQ;!bB-q1+ zTBjwy1|9uH1Ed>Uv%I=Bu(uvx;_K$)G5q+FvBTd~zw&VN8*UKbyLr3+u<`0)C$9`O z{|z3#Zho7${%();^Vqm~tM72rKsWCIkGDn}=ePCCg~KCGq{?W5dK(%V#9uX38TvgE rm0_RT*L#cHJ%_)?Qr7P{{=b literal 935 zcmV;Y16ceYiwFP!000002JKqgOB7KY9^KVkv5LG1BzcasS{R1T7 zEX;o2@0;&@=XcJ|vb)2Iw&Lx{#mOAU88~B{`kbIrF45}Ew(PWUoH1Ul;y5E`QZcDP z4whBP5m~jZQ|m?R8ubYBm)aIbaSRzUTz*s^sp=7=?^Bc0D!9rd$!lQ(6PU2#gdI#^ z0u%m!A@+0EAc#(+eo3c3jpjH-qy@!DMM0xh!HqQ6uG0dY>IM&n*#!quX9-ftt5HWD z4s+5l+#n(Of@{%d_d!hY@?csOAf$TAIu5!scCeT&T-~W>*RBkK2Y` zw@1(^uFhSG%l8V{npfWxuScUsQGIQ6Zue^z(OQbsfs=@N*oEkEA(aG-kp7921WD(1 zJ;ZOZxX^A8v)ZpZagoyn(e%F@0^UA&v4A<3#8ACF{NTJhnc*4RGWs;Hh%j zPb%QmM8H=w(8tkss1=x&A5JH_5SLL)>c^{M^H0$IE9?O*Hv{%|L4Sjr0qQjhw;|GNqB zd!QZW-%A?i!$I25L8!;l0KY|Oo(ZsP67a_tvOxZQRyo1hm!S6~LjF(-)Ke{F-}uQ6 z(7TU8U+JaYq<%}U1D@_f>yt`oBizndwI!DKyh5Gs^o&Ox@W5wX_n*#mABfvjd)36V4T?z3HSU~Kz zjScQ-LxmDD2dd4%kkTMWq9MgxrO1)mFmo^mb1(;UFb8um2Xin7b1(;UFvkjT#Qy6f zp;2y7!t}>)f_6vjh$4q5PYPEmjdG|iK!XTRL>ucOOD8ae0*5oT zNmi>ze3SaLu&~g!w3EtuIjnVJ&}NHN)R$FNYxm34iqho8f68Q5hty!TTD+w-{}+vZ J8Y*og004dy+8Y1> diff --git a/inst/rfasstui/parameters.R b/inst/rfasstui/parameters.R index 92cc643..84847cb 100644 --- a/inst/rfasstui/parameters.R +++ b/inst/rfasstui/parameters.R @@ -100,7 +100,7 @@ computeMap <- function(map_data, variable, map_title) { dplyr::filter(subRegion != "RUE") %>% dplyr::mutate(year = as.numeric(as.character(year))) - map_figure <- rmap::map(data = ag.ryl.map, + map_figure <- rmap::map(data = ag.map, shape = fasstSubset, ncol = 2, legendType = "pretty", diff --git a/inst/rfasstui/rsconnect/shinyapps.io/bc3lc/rfasstui.dcf b/inst/rfasstui/rsconnect/shinyapps.io/bc3lc/rfasstui.dcf index bca5397..d5c2f62 100644 --- a/inst/rfasstui/rsconnect/shinyapps.io/bc3lc/rfasstui.dcf +++ b/inst/rfasstui/rsconnect/shinyapps.io/bc3lc/rfasstui.dcf @@ -5,6 +5,6 @@ account: bc3lc server: shinyapps.io hostUrl: https://api.shinyapps.io/v1 appId: 11517388 -bundleId: 8390577 +bundleId: 8390632 url: https://bc3lc.shinyapps.io/rfasstui/ version: 1