From 1535c43d3bc267364b7d996e9af31ba32cf5dcf4 Mon Sep 17 00:00:00 2001 From: Scott Chamberlain Date: Tue, 6 Jan 2015 15:08:33 -0800 Subject: [PATCH] updated readme, fixed missing alt tag in rofooter image, fixes #41 --- README.Rmd | 4 +- README.md | 117 +++++++++++-------------- inst/assets/img/unnamed-chunk-11-1.png | Bin 11064 -> 11020 bytes inst/assets/img/unnamed-chunk-15-1.png | Bin 17477 -> 17425 bytes inst/assets/img/unnamed-chunk-16-1.png | Bin 39244 -> 39192 bytes 5 files changed, 52 insertions(+), 69 deletions(-) diff --git a/README.Rmd b/README.Rmd index d1468d2..b22565e 100644 --- a/README.Rmd +++ b/README.Rmd @@ -174,7 +174,7 @@ plot_density(input = alm, source = c("counter_total", "crossref_total", Crossref -```{r} +```{r eval=FALSE} crurl <- "http://alm.labs.crossref.org/api/v5/articles" crkey <- getOption("crossrefalmkey") alm_ids(doi='10.1371/journal.pone.0086859', url = crurl, key = crkey) @@ -202,4 +202,4 @@ alm_ids(doi='10.3897/zookeys.88.807', url = psurl, key = pskey) * License: MIT * Get citation information for `alm` in R doing `citation(package = 'alm')` -[![](http://ropensci.org/public_images/github_footer.png)](http://ropensci.org) +[![rofooter](http://ropensci.org/public_images/github_footer.png)](http://ropensci.org) diff --git a/README.md b/README.md index fc2da8b..a69bd05 100644 --- a/README.md +++ b/README.md @@ -91,22 +91,22 @@ alm_ids(doi = "10.1371/journal.pone.0029797") ## $data ## .id pdf html readers comments likes total ## 1 citeulike NA NA 1 NA NA 1 -## 2 crossref NA NA NA NA NA 8 +## 2 crossref NA NA NA NA NA 7 ## 3 nature NA NA NA NA NA 4 ## 4 pubmed NA NA NA NA NA 2 -## 5 scopus NA NA NA NA NA 8 -## 6 counter 2524 30801 NA NA NA 33443 +## 5 scopus NA NA NA NA NA 9 +## 6 counter 2550 31308 NA NA NA 33980 ## 7 researchblogging NA NA NA NA NA 1 ## 8 wos NA NA NA NA NA 7 ## 9 pmc 78 534 NA NA NA 612 -## 10 facebook NA NA 149 22 60 231 +## 10 facebook NA NA 150 22 60 232 ## 11 mendeley NA NA 80 NA NA 80 ## 12 twitter NA NA NA 12 NA 12 -## 13 wikipedia NA NA NA NA NA 50 +## 13 wikipedia NA NA NA NA NA 49 ## 14 scienceseeker NA NA NA NA NA 0 ## 15 relativemetric NA NA NA NA NA 157436 ## 16 f1000 NA NA NA NA NA 0 -## 17 figshare 0 21 NA NA 0 21 +## 17 figshare 0 25 NA NA 0 25 ## 18 pmceurope NA NA NA NA NA 4 ## 19 pmceuropedata NA NA NA NA NA 49 ## 20 openedition NA NA NA NA NA 0 @@ -117,6 +117,7 @@ alm_ids(doi = "10.1371/journal.pone.0029797") ## 25 articlecoverage NA NA NA 0 NA 0 ## 26 articlecoveragecurated NA NA NA 0 NA 0 ## 27 plos_comments NA NA NA 11 NA 16 +## 28 orcid NA NA 0 NA NA 0 ``` ### Details for a single DOI @@ -134,40 +135,42 @@ alm_ids(doi = "10.1371/journal.pone.0029797", info = "detail") ## ## $data ## $data$info -## doi -## 1 10.1371/journal.pone.0029797 +## id +## 1 doi/10.1371/journal.pone.0029797 ## title ## 1 Ecological Guild Evolution and the Discovery of the World's Smallest Vertebrate -## canonical_url -## 1 http://www.plosone.org/article/info%3Adoi%2F10.1371%2Fjournal.pone.0029797 -## pmid pmcid mendeley_uuid -## 1 22253785 3256195 897fbbd6-5a23-3552-8077-97251b82c1e1 -## update_date issued -## 1 2014-11-12T21:41:48Z 2012-01-11 +## publisher_id doi +## 1 340 10.1371/journal.pone.0029797 +## canonical_url +## 1 http://www.plosone.org/article/info:doi/10.1371/journal.pone.0029797 +## pmid pmcid scp wos update_date +## 1 22253785 3256195 84855712734 000301355700052 2015-01-06T19:10:32Z +## issued +## 1 2012-01-11 ## ## $data$signposts ## doi viewed saved discussed cited -## 1 10.1371/journal.pone.0029797 34055 81 243 8 +## 1 10.1371/journal.pone.0029797 34592 81 244 9 ## ## $data$totals ## .id pdf html readers comments likes total ## 1 citeulike NA NA 1 NA NA 1 -## 2 crossref NA NA NA NA NA 8 +## 2 crossref NA NA NA NA NA 7 ## 3 nature NA NA NA NA NA 4 ## 4 pubmed NA NA NA NA NA 2 -## 5 scopus NA NA NA NA NA 8 -## 6 counter 2524 30801 NA NA NA 33443 +## 5 scopus NA NA NA NA NA 9 +## 6 counter 2550 31308 NA NA NA 33980 ## 7 researchblogging NA NA NA NA NA 1 ## 8 wos NA NA NA NA NA 7 ## 9 pmc 78 534 NA NA NA 612 -## 10 facebook NA NA 149 22 60 231 +## 10 facebook NA NA 150 22 60 232 ## 11 mendeley NA NA 80 NA NA 80 ## 12 twitter NA NA NA 12 NA 12 -## 13 wikipedia NA NA NA NA NA 50 +## 13 wikipedia NA NA NA NA NA 49 ## 14 scienceseeker NA NA NA NA NA 0 ## 15 relativemetric NA NA NA NA NA 157436 ## 16 f1000 NA NA NA NA NA 0 -## 17 figshare 0 21 NA NA 0 21 +## 17 figshare 0 25 NA NA 0 25 ## 18 pmceurope NA NA NA NA NA 4 ## 19 pmceuropedata NA NA NA NA NA 49 ## 20 openedition NA NA NA NA NA 0 @@ -178,6 +181,7 @@ alm_ids(doi = "10.1371/journal.pone.0029797", info = "detail") ## 25 articlecoverage NA NA NA 0 NA 0 ## 26 articlecoveragecurated NA NA NA 0 NA 0 ## 27 plos_comments NA NA NA 11 NA 16 +## 28 orcid NA NA 0 NA NA 0 ## ## $data$sum_metrics ## .id year month day total X[[1L]] @@ -268,7 +272,7 @@ names(out) # names of sources ## [7] "researchblogging" "pmc" "facebook" ## [10] "mendeley" "twitter" "wikipedia" ## [13] "relativemetric" "figshare" "pmceuropedata" -## [16] "plos_comments" +## [16] "plos_comments" "orcid" ``` @@ -435,27 +439,6 @@ crkey <- getOption("crossrefalmkey") alm_ids(doi='10.1371/journal.pone.0086859', url = crurl, key = crkey) ``` -``` -## $meta -## total total_pages page error -## 1 1 1 1 NA -## -## $data -## .id pdf html readers comments likes total -## 1 crossref NA NA NA NA NA 0 -## 2 mendeley NA NA NA NA NA 0 -## 3 facebook NA NA NA NA NA 0 -## 4 pmc NA NA NA NA NA 0 -## 5 citeulike NA NA NA NA NA 0 -## 6 pubmed NA NA NA NA NA 0 -## 7 wordpress NA NA NA NA NA 0 -## 8 reddit NA NA NA NA NA 0 -## 9 wikipedia NA NA NA NA NA 2 -## 10 datacite NA NA NA NA NA 0 -## 11 pmceurope NA NA NA NA NA 0 -## 12 pmceuropedata NA NA NA NA NA 0 -``` - eLife @@ -472,19 +455,19 @@ alm_ids(doi='10.7554/eLife.00471', url = elifeurl, key = elifekey) ## ## $data ## .id pdf html shares groups comments likes citations total -## 1 pmc 337 884 NA NA NA NA NA 1221 -## 2 crossref NA NA NA NA NA NA 139 139 -## 3 scopus NA NA NA NA NA NA 138 138 +## 1 pmc 485 1109 NA NA NA NA NA 1594 +## 2 crossref NA NA NA NA NA NA 154 154 +## 3 scopus NA NA NA NA NA NA 149 149 ## 4 facebook NA NA 3 NA 0 0 NA 3 ## 5 mendeley NA NA 454 0 NA NA NA 454 ## 6 twitter_search NA NA NA NA 0 NA NA 0 ## 7 citeulike NA NA 1 NA NA NA NA 1 -## 8 pubmed NA NA NA NA NA NA 80 80 +## 8 pubmed NA NA NA NA NA NA 96 96 ## 9 wordpress NA NA NA NA NA NA 0 0 ## 10 reddit NA NA NA NA 0 0 NA 0 -## 11 wikipedia NA NA NA NA NA NA 0 0 +## 11 wikipedia NA NA NA NA NA NA 1 1 ## 12 datacite NA NA NA NA NA NA 0 0 -## 13 pmceurope NA NA NA NA NA NA 135 135 +## 13 pmceurope NA NA NA NA NA NA 144 144 ## 14 pmceuropedata NA NA NA NA NA NA 1 1 ## 15 scienceseeker NA NA NA NA NA NA 0 0 ## 16 nature NA NA NA NA NA NA 0 0 @@ -515,23 +498,23 @@ alm_ids(doi='10.3897/zookeys.88.807', url = psurl, key = pskey) ## $data ## .id pdf html readers comments likes total ## 1 facebook NA NA NA NA NA 0 -## 2 copernicus 0 0 NA NA NA 0 -## 3 wikipedia NA NA NA NA NA 136 -## 4 nature NA NA NA NA NA 0 -## 5 citeulike NA NA 1 NA NA 1 -## 6 crossref NA NA NA NA NA 81 -## 7 datacite NA NA NA NA NA 0 -## 8 pmceuropedata NA NA NA NA NA 0 -## 9 pubmed NA NA NA NA NA 51 -## 10 f1000 NA NA NA NA NA 0 -## 11 scopus NA NA NA NA NA 176 -## 12 figshare NA NA NA NA NA 0 -## 13 counter NA NA NA NA NA 0 -## 14 mendeley NA NA 123 NA NA 123 -## 15 reddit NA NA NA 0 0 0 -## 16 twitter_search NA NA NA 0 NA 0 -## 17 wordpress NA NA NA NA NA 0 -## 18 pmceurope NA NA NA NA NA 52 +## 2 citeulike NA NA 1 NA NA 1 +## 3 mendeley NA NA 123 NA NA 123 +## 4 wikipedia NA NA NA NA NA 136 +## 5 datacite NA NA NA NA NA 0 +## 6 copernicus 0 0 NA NA NA 0 +## 7 nature NA NA NA NA NA 0 +## 8 f1000 NA NA NA NA NA 0 +## 9 pmceuropedata NA NA NA NA NA 0 +## 10 figshare NA NA NA NA NA 0 +## 11 counter NA NA NA NA NA 0 +## 12 crossref NA NA NA NA NA 81 +## 13 reddit NA NA NA 0 0 0 +## 14 twitter_search NA NA NA 0 NA 0 +## 15 wordpress NA NA NA NA NA 0 +## 16 scopus NA NA NA NA NA 176 +## 17 pmceurope NA NA NA NA NA 52 +## 18 pubmed NA NA NA NA NA 51 ``` ## Meta @@ -540,4 +523,4 @@ alm_ids(doi='10.3897/zookeys.88.807', url = psurl, key = pskey) * License: MIT * Get citation information for `alm` in R doing `citation(package = 'alm')` -[![](http://ropensci.org/public_images/github_footer.png)](http://ropensci.org) +[![rofooter](http://ropensci.org/public_images/github_footer.png)](http://ropensci.org) diff --git a/inst/assets/img/unnamed-chunk-11-1.png b/inst/assets/img/unnamed-chunk-11-1.png index a7918d61c985b6d19b6c82df31111fe0e686e3b9..5b9dfc4c65f30742ca22c37675981b24ed0a1fc2 100644 GIT binary patch literal 11020 zcmeHtcQl;;zo!}z5&04%dZPD4BI+nX^d3ehYVr9W zgMDOj&+qP@yL)!e*?)HL{exp>%=3QcU0&t=nNKQ8(u8*??qFbG5X#C(s$pPYo&rB~ zw{HQ@Xi2>VVPIhIT1rT$$Vy1isW{o2TiTdmVDN{9Y0TNrym=t{$zCsqOf;h+{2pm& znTEPKWh_5G7UZUn=`l$8RJ${*^{W%pa5x+W;#W+4R2T{Ye#Mp89{Mnh! z-2*EB8hT|;Bt=6XRMmAm>FtPCgR;u?Ag}#PojvH@#{Mc(#8P9#xPe>O*nMA^b-io{ zH+{?M=_4jz(!J(RJ;pG1Zn6EuB+s00XWe{co9a7s^PlRhP6G>7THf`?GS%5Sc?^gY z1*KRw@P&W^$p2X=8hsVDMlTj;?p$K{(Q`AbVyN{gic?`#$A@e)n-L}LurS)$`_c2h z@A@VUrbwAY3Yc1k=)hRS>oPspq< zqEal`)7|mDw%@D%g1vWM#&ucFzF+Z*tI4x!6G^NfT-aJTQ+PCX2UT2H^D*iiR1?&y zA!A}^9yu&5@;Wk@yqC_P-OS5t$l)5>!}T+q(YRj_L1L-JypER}%*a1OD;u{ED;h_- zLa@^0q2FFMkD4 z$zNrAC1E`xA0+d3X6#;-w%xOilrN;CbfKQ#|8bO|vZ#woufv1T*R9nmq+Wfw^X@Zg znKRuN!I#B-(8og_V&2ec3-axP?G(qbsRr&H^;pEp3!kC_z4F60AMNLg0xBMr@*pJF z5R$HZhpsh?wxI2Vv*G~CaIkQT|B!rMoA1e#3-+QlQN~4$%tWx;QdK&p9)AYkY~b#I zGJ_B1uGPiKp0EC+rer(bWTM>`fJct+=kfpweC&ku}6YA_zu^KTDH=-R62(GM0g zG4SWxGt?My?u%hy;>hf7VFPaf-sR3B=6~|E;0-?JpI3;5FaBH#1B>QPZ|3@L-v)$%;!0&as8%P35RnynE-QM2r6eayE z?N?k>q{ksBD7d7W!NV;jB^9Wlso7wX)5mJ8?(J<}Q&aOjPdK504)|kYXz2cit<0{+ zWKweSfx?mVNcr1#g(J>Q z%Q!Mda+8dV5+H$Qq;_nfH@Q;b!eTge`t;&R@+MO(?3gq$z4&ex7Wo_X?M{!>3S-B| z#=g*qzFqgg1mTr^i5(T0JV4GRhz;s(PSVlLQN}rihZ7QZ(5DFEi*(82Im^q-54`b} zKEmZIEiDzsqm8-0S#J%(GgP`TQdmDAlSs!C#AKrJ@Q@RE_U>b>x^R{VcG=>P4f`2a z59O0THFDU%eb+`l<-XdNC^i2ixtF=zYP`rRCNb#dc6YC_su!n7(bd~k@x$49t5QgO z^C2;S!XBgB07v)%U7P2_H$@-N-GHCw{ih8uFo|$wc4=A zByI{8&y_>BRpjCn-v2WpRQ7Qerl+l#l~R7NFU-%|Nk`E13n`Nj(TdnmQ&W4aNv9^b znJD}zuNd7=ER9@_>&ue``)j>hGz#rn+!PC<<)}@t|Bj?B4 z)&yi64!*q32$+7YX*V%^c4IW(_UiZ9OP}BFd^C_W-9$rlzTDYVD#?DUD}&4ig%3V^ zudo|du@kSb&m!>sJuYgI4eeLi`-Jwrbzk4Pi`*WGfR_i{D% z{X@g=@b#t5q>*l|O@*@85{cb(6uq>~)?|gHF(b5QV4S+lgJO{C*4>9jT@keK+S*!~ z10Hy;!H2bUUlEYyw-5LmsOv*XgAOI5-Nm*FcJ*g>-stOZE7=?+WUk@5bgP6B8=k<^ z$ip@LokD`0-i~FO;)}2>5^y&yM%TjHX@y+-U`_jSLLU1$;}a9NLbVhX!#urL`yTO? z!C+hX(?ICyyQj#%~8hXdMSK)IEw15w}#bsLQhb(oSd8+f;eU4Vd+B3 z1RF-9!WzO_FSP{vnvAqBsrl^mRtr3vEe6vF@}505!0PYs-(ypWlFR;(#VqAjY8drJ zuJ#cliT+Cl8b}4@1AXJg+jvH$aTVm6WxdTY+O$vtQT$D(PAp zTYF?07v0V6>%-Y|+0L62rOpT@$fdyyg@99z zR4UkLSexn(61?xg&oO9HZ!Uh2tEuL*o*6vb4{5Lz<2;P;{k;s-{prauk?8O8Qthfv zeRWz9uev#>Ud|2cJs~$#wNxlsedEr!*-Ou38_MVApLMyBO`+pwaW2DyDFO$^$>s)8 zIR4Tcq1E-1Hm~O*1Tj&l-V9^)As*I`BK9s318o6#y*ZtGu)KzK>CX?}dY+)d+{8n* z1Xp^*18zx88+Q|XsR(+zZ=l@06BSVz9c8rCZ|VaEBo4LoTaK~@dc7lzQgCQxI!?Ip zMOrHM3QZYK-KAo147G&iTnR;3G3o{xlaREvo_-d^BUoZaeCP5`G)<3=|B{elwQ&(5F2)^w7 z_ z1js-0i`H%Qe3;@#F2;~@%l(l8eqt<`#9sdiLcWh?J`E4Q2f(iB{I?o7d}cUX`e0zR zqdk}?d18=HGBv?oS3%;BFreE22(w5G;1$sBSL|BbnU}>dSnUm|5c16$f%PGA?B9Cg z*lo9`Yc#dBExj*}Yj6q3>ROZPtr1+hm8PF`QHL9&FMY4PC`EmmC?f>_J>0Qq6ZrJT zbJki6(ljoI3vCSu?NsBFFio}-iEjOS+SE~3k0GQM9E;~RM6DKTw7P7lCG%RxC-Yeh zQ0X?gS6D*FJkmO&t8V0) z15CcLVuH-lV6~RUYgb&I=+#q&RKf8)#bmP2`+Rv=$dx_E zAx5^;NkGQVbRijGO2EA2(E>Etf&1&4Ku>9p9{}86Pvbb+EaDy7g9wjLmm_8@L@%`Y zwE5-$mdqo^*EzEoNO9!*H9kI`yS5S7$*atH!E(UE_tN{^C7H)e4yty2bvY+11;yev zX3ZcGrNx``&7zcrIQ0%4V4dp~m6f%w_qT!!d-hr1E7bIwyCY zcIal*)bP&Ze%2CXbh|v&Y5m9ns!f8v0T}v|bc7V$Mc7edS!PN&k$!EsVC;)FZr$3x zG@o?XwTR=T*@D%rgs-*G|!1SY_-YDVHoU^d7FuTjXqdSRfnycjK`AxeMyTv4= z@9ewZ&AdIKYY&-20tB5$n@U|A>IKxg*7w@S&Ab+RWR?8FGMb(i1g-XTv72jvpr&&g zPHF~zMA361g_TWYYyM&f0l<)%`RpK9e8X7?Lf>_LD3f4bd~{q6LGNrmQR3L`d%FA6 zwU-l~vs1TF@0`!6Q~d*wVvRKaMvOC>V;jgZ_|tp8e^H~jrJOp>kvS2?3zm^&p!UJ6`nxub z_ljo4*B<99rONr9DX#u50K`|+SrSfq;Xi{2fDSvq!_}e|mq}HLz25GzZ1A2YuqW9u zt)qglYUUxqjxCRoO+>YI%Xd==Y!$d=04nTl0#H>A^{`9yQCV;P4&5?h5;Sl*bjd3$|=W5V00FDhNUPzk;JFlKTsd0CT^_T8VbwL(2pu!C+@tLo1R00c z;+55V{YKZRXh!+jNgV&;8Nl6^zBGxO+11SqAt+&bjk@!hH7gHYChS z)$g(Kbjl2xZ8|?csigx zapk6^uD^5p3>Os_+X5b1J54&As-nWAD=(jQxEKOMx%ZE{uRb;UiXr6lyAIg)NF^oI zmwKY=yK3#`lG0o*j}VRX{)adQ9co6ueneGpfGh5dxB6Zi+lFjE5dV5|S$bQNaZXa; zdv<-jK&7oLNmI0E%gxs?OOykJDUMH3Ito@A^!=v zi|Z8@rDOo1FFf`PN+T~QD}&EBd(Hr#uUl9*CDr0>B zQ+U@cH76D)Zu{!9fARNR^I-JN5qFc>&@7_6d^SPzP5C87$d<}PBg$DLH zvmX$kbE=Fh2aVBp3sTQhs0gFvo4&fdP>dKZHE5n@QcU_q_Ad&9nN_`QzlCTR=KWG| z(7=v2`p=*3&8`$38RzMZ(_CBHX}Pd-Q}hNXE3fP4ivmg?)NFn2yWuCg6~=)Z(2gdL zgV}y)5-lWc!tC$n2mF346mik8q*lK;<;u7>EB<{9zOW(h;1pbN-~=c6yfanB?5@4L zkoeq!tmz*61FoBO)Hkr)R|=@HB;QmjzvC0k+@scyZG=jAL^Ox3mG}jj6khbNKbJRq zo-k!pe`n3&0{`K)PUB&JA~~4F;!%vfOs<+oOk;eQAos$>Q$lneXmN}k3Fq--kmyyV zSPCH39Yb!JiT_ce88QH%JrS>bga)D|1^}hhU$79M!A}a%{N(u2{pe-peP#gBQnJLg z(TK(pje*}H6KQh`jg0(&=wE(7*n=Jru_z#nl)vfozj!AL;9dSZ6*6>~5FiXUF+(!? z9_W;Sd*GJ}s6>ZRVF1EJ(M{b&--9D?4_&MjvAF0kPk=C?INj!dQ8fmDT&3X*4s@6Y zKo~;?nU?`*c>cfmQN=W(YM1-X0oherbSJ(JZw&EJ5&8MS_eJT z-q2oV8)CV2vd^@VN|n0r+|TSI+;8xi+ME~6u<4{^YXsNv_LcddS;-jI4YB3=T<0{? z;)^gF%k2WpB%uB%EZMK@nHo{FNE0vsv&Y#9>_mI+0+}NNM8rZ}()@0)wqR#tR&*YT zZ(P`$I+j2CSPZP6K+b=rXx%|)N)pHv2`Sf|zb=d)$SOZ`{9ogz3Zz^zF!bABu2KTZ zGw><*uXu|ElB)VMs~nxw55UU&|I3hK+6wV$6U?O*k&iGUN#`Op)0b^{udwqBI{u&rL`hz*Gw<)tPP>tNG8o(aB1_pzbc=O~6k_l!i z2Ns|zl>E-C3I!`ml`6og0WTjPuwBsA3wh8$b#!!;nb5EIG)~Seoa}IVM!|Lemuzuy zaqqVwchtRRn<<`|3KMB)y>(gh1gsI&aOj@N4X}*PIvc2=>E0IrrD-_ZbG;6@y?zoT zI2}kWxH>##@4nz?*gjPeK3qO{7F~U*kglCA9igOCL7xCViIAdhQrxxr1h1|(txo}Y zPMjZYCh%_OCEN8-AbzBQJh{HCZhm;%9yA4z2(icOEfa;Y%^YSCr4;_3CP&0z=9&f< z%bmrxfKTj=5xAO8w9kw`fKFzeMKrnXQzS1vQ4ki zD|mTKdy=LG2R3$g+Z(%*v>HT6smC`17?$R{3~_&_LH+9t7ZkG6mnwuHh|ud(-9rgTM)v2M=5%Mvhi)XT#l>=uwMg74sh)TjWK9TN+>&K==&fXx5-p|GJsH#lx=i z!y04&=4uD{f7ax~%9}O*F3pAN0((Vzn!S(FSLuN*q%rOt^fYXNSC?)A-zAhkNKvbC z`!MFEFMN8Wk<&MEF^y<3r@ff$y0O(}ng{NhCvAANF4q!2Q+K>9gbB3FbI;dAuPq}) zuj;(dN7K2glDeuIpihwDLa6c`?;X!Q4x>If(#tVAbJ9$H^oOH!F!00io%aW$AG*^6 zXJkyVZ*b6HbAY86AZo7~Uv^03ekdi@3_W7&J?|+L8tD+ z4B~ks-aRUopF(NA>>&0Mlvz+3$vbQ7D&Pp$0ZzPl{X?Tk=d*p~0ZR&Cs9o1m-Joyi zi~PmjV%dAn%#>tjXP3um3A$p{r!z*l<_zSZOg?rpaSDNJ{uh(?>QewfEI3s)1= z9Kar<>iF2zbMZai7WIyMFd?nTY}n?^nE7Cut%in19`@$K^%cCa*9SRPcnq|}gsm=Z z7T~@s0I6JmG?v?Gl-CF&4FD8HLq5s;ems1#*znRyI-BfAc7zDBVVIJFVyoZYr|L#Z zKe_@MrsAaKq}lS-QP5o);YnEiDuue&^?pL@mnDy*aq!INN6$wL$Ir@qFMF@9PFj;& z2AmGphc}MAeTVg%f%BT}hV^{KWY=M>b*Jdh>AqJUp5w&^X4CMCqs=v)>l>X0%)j6_ z<}~+j+ZVt=OYP;w$qapj@KQ^|@qRBi9MDP)km|)4Wf4nCK0B99mif_qWw&R;)^|S^MX5y zLTO2}MC&K(mYX)hKwaK<)ymt2L2y9%(#LA>NW-kNr=fJjpCjsION6f=yKwq zAe8ZAL;ap1$DA@8O|NQu>mkQT4?@E$L41|0tKkSAQ?P+Yu2B8NOP{?^!#c>JPj3RZ zTh}*WOS2aKh&qOXKZr^K-umm}ApLrFd-I&bW2>TT)_{dIiKG3t+}t@XcYj%b7$lv1 zN|an~3D7{WK-fg4&ZgDWrqH$F^*KU_2?Q>sxz9+>NSJze{g*{5nhrnOG&(ix83v#gQHBIs25xSdnJ^uv5>Uv5~B60#+nt` zjw~vMIa$=658b)dJb^cu&~lh-6ur4RLOxSKur=?w134J4xsHnP>hReOpsmA!#o#hR z7zt|n0yINjW@&yV20P@tu8I~s5^}XU_wG6SUZP#4SA4!{c-?4=__${8vlLM-J%_5WIOQXCF`l5Z*hl=lz=lu%1NG4ce zp(7_$zgNTB0P!TQ01{skA0=`)CU=*{<7Rz1S65p`))d_&QtfXas|K#Rm3kis!8!MV z=aTV6*S>lD$ZwrE2z6CjTGN^*ek5F7>fR)~e8T%^V6%EZABOYu@mz)Smzx7@5x?5pY z5dWfE*~eHgYE-ri*0nhjx|F|p2uy7HoYz6W9Vq;9SL6xUj$;h!dpu<^nl5mrx%A~n zezY$IV)3A{!>4Ef3NZwA|hay?|v}vylFOgtN|0_F2_McA)$8F>ehMzP}$gW-U7ZYK={cq)9RC{!Yh>A zNwMd4viPlM1hq%4!yik#4I5Ufm1Tw#C2pvSr!KDE3kjoOq2On7f;7Iv~Ik3@U}{SG;hi zD8>ZOrUrdhX?jQTsPzxI3kyl%z_G*yz%g6VNl7CJD^iJ6s*S7LggQ!Y zQ=8GUPZfOkI_dR^Rh@=O?#um#%DrmlxA(o6nLD?VLgI*jQkLyLd2G|%7#euI0<2=D zxqZ*%N3CnV9*upxdzAC3VH#4I6Z0bVw)GGX?fFpf);u}4t))t@!AbM_2eA|Eb)FF8 zViVOai6QLvXTRziE_0cEUAiU1h*IwtGOO|xAV07<54DtDV~PT2C(B=c#MYl$w}f6T ziF`^gCJSnqIU+L4x+gdptFoUe^DZqqT#4@C0KvK}Zeqbolt2OLlP<6L#NL&b2|`_@ ztZG&_wF`E7(CkT%{s4UMPnTLfv%1zW?xuR7kKfd2^13T#DY9|U4GywRHepde{f3x^ zk0+BJ>gm^Y$VX%#on@F+fO71!nkmz_S$IDE^A#6AKXR-WjZL@d-NqBGHj(Zy&Xx`e31 zn9(BI=$%pam9cyFch2sfvwv(kd)7J5@tD{9JkP!N`F`%bk1zwhdo<@+&Jz(4(SS77 z?h_Fa?*ZSOl;pr~9;iQ7BqAc^wpUd(0I8~S8oYFQX7BWrh)Cvgu*rnWm@$J=n9Kbv zCS}eC_d>&45hg|!HLNT}ZRDW1>}4&c?1d3Q?io4huzXgEv4yGveeXBYwODQ+bjwc2&dJYNjj1VG+gB!C zHF^87usF4s`$JqVQ+%3kcz^kz_PN2r1wE12?w@p`O^mxexGA=9%I@XZm1Dgfu12p2 zOkday{cp~UY_O|)7Yu(4I#y{jG*aOA?5oK!o7dI`q)15$NfKZwbe?_fe2RM4m8qhC z3E~)wDC@`->PDW4RX?^qccmk4%EXx!dE;4ZdC~jFFMFrNVqB|lozRLVL${W|fe-L0 z*)_IbX~V{ac8nXslu?yi*VeR4tPwS!$9`mcF$euVB%U0GTlw!{ZsT+JtgVX}#>vOY zy!&3{QtRR!ptroQT`BF`=D~gH;F3W>?dZz0nEh8x_bNtg=VS9ajO-^LPc~`63KFf8 zTuo<#u-)Yk6Mv9!#XM=u{W;@L;jdg#RF_BgvtLeH9L}_%ZRY4)oPP&hoMdiDeRMlf z-YTX;08;y*Ii92YBGNtcYB!TsTi*h&U(qu!yUXYivf4Ce^t*Iy|B@T|mDeN6b#h{} zY9Wsr6|zNKD6N`dEgM^Nzh?#H)o==ak(VPDI} z{B945EMu-0fg5Jaw9r1>xOeRS#P?8W^zzqojtlslAu^w&)NDmaE8=R4aVz+FL%(b^cGnsy&^%&L!L^GYBO#PDs*Eq zA4`wRxi8hxHnPQ)>u#Cy=VQ31Tv|AvX4q(kv&%(k$}UH%^%Po^C3e6S;ai zu?o=>5%Knd)b1F25-($^BN@%u+SgC8;GI^I;OweDSdt-|B4WYHhXW4_9xxW(G9;~N zb)c7!GNteTWQuZ#1i@OWOT$}La9olZ>RFm1f)&QGOr@N()F%8L`1&Oy-`vFRdXLrq zn(xclMDYpGNWJ*0XDhPlC#n0rvf>_{Zt01URK%p0REUU4>*(?}3M3`S&xR>PRB5y% zB$S-~L?rCz-%ToB5Y)X3Ja$RNpS0KR?+--8v}BrV?BpMKuLBQJa;gN(iU0k<-#?Uu z+mkj>EAH=`FL5?)UOk=SlFBz#V!FD}JK3PW@1=YFvk^LKP`uoRY)m;Y^; z8IOV&6m%677GiI`e;Ga^VLkVys;X*aaPC8~CJa_DDJiM$#Y*RMx$1X&472&-9DM3~ zXfirE=NxZO?6uoZ-U`&@E{I>5^OTU1dZ?-z$R_8;-!r76i*;)n!eE@_JyvvdlZSrg zQKel!Fox+o7d~B?%0p7kHTy7$Wwq0NYJMP6-6ESBu76H*F5CXT_rUP%*EZ?6&QHge zV?5RP->R<3vsY@lhy=)xHVz0~F8;&4N5aSBsc0OR1ESDIqpzX%$f?piTe$AZNion* zUrzVT<89%xRM1=_)04~CHh!Iy6CE8rSSee)zPz}2`$&7t?q>1&JPMJHH$Auh_Fhmx zns?H)p_v);Rb{YkUu@#YrN3@{^MvZ%WE`WIL&T}g{Z;sh>3sNk&lBADP8b-KO{+sL z|Me9m&o@=~%umhCNm7u9d(H8Y!X-ZY8y#b1*MUEMM^5auX8-m!gs|OIA}S^5_1vbv zUbP4OoqN5j;_~T~oKO<(y}{rVa;{T1XWj89O%LH8&^Yz-n?YbPM$9i+B2O0syphg_ z1+K&TclP^yDgpZ74*Q#bm&tN!+y8}=G3u}7>Zez6-HT=jc6M>84y2%E0_O(fcUP-> zdV1iv&&5JWai$x81N_~KH%VHaz}-u;Kk zlkXukQm)f#tiVCp#-Vz1^imygC`9$jit|{dV*=F8ZDgi14s8B`_2wgg$atOX2GR-l z`pw^X^Uoz=WQ8}*!y~Rur73zlEu$-|Tz_leN7|KUKeEZZ_|_J~kr_Sn(UF``1$!uL%%H&f_U7^(VQv~M9$F(mpye|g#i*IvR@*zsq zV&myw4$)+;l)iI_r^N`;xA$cB!}&aEN^ukAy-GOtl-i9hp(4MN<6$&9smOKh;rG2@ zobmi%zLE1=Yi6oDqmO>y#08Wczy)*2RWK96B6sC zKV6-TY;8Y#^N*lvhIHFQ*_-u@6apyvB3{>F%EEa(u|{TP!NV?}Ut{&Nhv>w^$h5vn-j zj$f{}TWxj0B8O&s(^u0PQ13<~uZlZizPdWs=Hbdn)U8r_FCA6b4}>qps{di4Y_Kt3 zIojDi-ck`z-GZ?Nm#-o=qZ%sX@SH27m30Lb{vq@CqOaKl+Wck9Vs{iTV0MvBPNE-g zCfr0(Inb%C-;Pt#nqu&&22+?!W#KNtii$_v4N;5@_ipM3&~i`XlSw%yM)r)w>3r(o zpa3xucE(x?4r8G`ZD^Cvii_gUG`yPkiX2Q4{@|rqVjk}0Zm%POR6cZhBZ{8szn)VQ z4C~6w+0?FhcaWA~7D_<=D4#n85cC!U@X|Hr(zfbf7;**xvPr^{Od#MT4?qAhTxv&z zL--cJX^ejx?_Y0Gwt)RfId&-xl?jvH0LaOeQA+iHZpsYa6~-@aM@S^{6xsbQ-S`ju zla7%9%Tt38%R;w)z^v+Wa@uYuUYH9~ifPei%q#H9*Y8@tEXsL`P_`dzY;0uOiBZY^ zh+F++Imi3xhOe+_t74^abq^2ebx+y6^F_3DK1tCrn>C-VH!=I%{4fbM5C@Jm>WV<( zd^%z|VmG(IZuu0<-X9-nI<{&ua4?xCyZz>crkfUpAVc~d={6dL^b4{yg{nmZ6;HTXmM+-~}zaWul@{8A= zznbfTHdekItAbR$n7V7W(h^25W!G~p`R3z*eD_g<|mEJk**!?q0DkubcwMftO+pUKj_4<9~s8Yy{P^`w)oTCe^OL?vua-r1s=wK9J z0_5mmI|t&vjD8Bluhi>}C)KH4`MZs;H)lI=Wkqvj|DxGWZ>eZb#(H^r5AaBM>ZEbJ5Hz>g>VM)`j2U`mrKNz*wY9uXd z-HR0WXX17i^!?Bx!>S(J+uNfz?ueZLxLuhtD<9nD&Se9EP$sAyD*6hT45GH9E6K2;9dRiS5w`WK9*CSwBs)F>W2 zy4v`gCqo7=Baq17ghw}Iwdzo*gHAK)mvVECT1E<6ldlK!;Z(ls)2%y8<-KUI2lh{K zbAXm(2ly{Db#--Dz6o09-hMcN!7PQ(Ih%F;W3oj%x{!t+&{u|dU|d64H{^T|zb;st znI-5Z-fkT(vaqZ5Se3%MJSepZ)=iS=jE!NFAI6@usQ0R@mCm1nLBzebo<|^i1|IYa z6T+{IBvD+yz{76Ns)>0Q>yf@ZR*h(ve_rFYaL|PTcnRL%xMdTB^~Eob@~u=mV;wf< zdZlR+B&DR#|4dA4L)3PjW>3K8Rd_m(tM{aN?rTvATQ?kjKtt14%xL2s-llmsz*s_- zl5swt=Wgt*V3WaZ5e@XeE**8mazW;LQekFc=Nrp4%0n-*u`GarJn8$O=$>=!#e!xK z>Uw)LTlevLGG^Nl^=E}^SCUG}j4KTRT3e5daH+h})Gh?)-s_(>?DJj|Gm}&l85yGw zT&%~5VHlI)#X?nL9|?jp8K}~_(uDU{XFb!ya6k_QV&Q27A&UoiCq^6rKa(|eK-S_l z4fP2|(gI3~1b=ly!sz`CK!UZh^7shHf(L-1_BS{`VFbDiC@IhVL3)A&(gBLh^T?2a zFvwYu5=kV zVTOcsT`BOgGV`Bt0HVVM1qE;K)jZ}}(QgmowT?M?D_rla5g?Y)*Mvc%AC|Rd5x){go6V5~C0Se@a_ zm1pKTWg7#1@R?^n0weQvc-0x{0JeqNz%LQ}(|JldA*;bN(is4DHPB%=Bb_-gdeRz! zJ|i8#HjePHyJsPx4TQuOPeThr5ZndWrh3belHl0?R9y>@u2t>&SuCC6+_WxFgs{3y zU|avQo6OLsI}D@e1M+QK#VqvL*z#mkpyEdg>YddI7XX$`PUEY2xDEH_3xoxyQ4Sg- z*-ooa7eD-%`*I};O(TtY2gCncG&Fhi&one;rg$~`qm+uC_v?Nh4%2pc)}AqX6TUNP z?Kwq;ZjlY|-dj z5B2aED+bqo`TY4iuYTH6cp=80_?#0^w8o;yR=ZsYj`Cs5o4<5~^_YNER#sNo59BEH zo};)pvbX-bygPn=NFMc~ZrEPQgGIr!giXn31dT@DDC)+d&e1ANiZTT}l^*x}jP=?4 z*(BU(D|pjkFz?gw(qX}e&L^1Q<%~OlJudg0z*5AmEkKnu`cAO!vqbA};MK8Ep`^(V zmJM%j>R1W|M|2kPi$>FI5hOf zYptOQv8r^dZ#>ac?Ui?SRX@Z+_Zr7kkZtVbkYk^L&&`F(;-sNu(SM(6aN5!BXEIN_ z7%ZxtQ90sdR3@{Q5K31qW`La zzZgmBd{fL-@iv&)@iBhYV|Vag0;3Lwen{_%l0?t#`?3hi%LuTp7o|Jvkwm( z|Vs-ej6|@zPJd4ud$JlZK6&{@1(4ab*Bk%uuV-& z)D;B7e4}^!OEWuBzfZ2|##DrpT7Sz4tN}iLBv9^3zb2^>6%{o+I@)P>lb1s#m3DD) z@$J3H>CA#XuR~^AX9owtDw)CCA@lzi@$f&+Kovo{!{Z}-QF*yI1LYa;*Y0Grg=%aK zhn%%5v5WtzU0Kg)Crdahq)VvW)i+BVn;{;zIhP4&>#LQ z8raC3HX8}O#L?YP{Yr$u{V{g^;8gzslx*Bp@LYQ&@3Z$}{PxduC74|87ohKEYV=z~ zyDAmrcUek)alcz{*QcLVeNJxlgWTFmlzdO2POa~}b4TVUD4m;!cHcObqteh;WoH|8oj}LIm zImymlJqZWXHFIe~&^RR##5oPBR@A~u?W&&fKtNzkZLPfF_C<@)EH;kt(Bpld$e<{& zW!FLqbo6OLYqlK1Q_<}XJ#<5=sgQ3RXc*4H3y1CmlK&B@U9KA2n3XKIZI5Q}_5t4n zHaS-9Vm<8@+0dr?S?{2&J(la955xwJ9vT^$cV1q`)=C?0?^Kp)tpJ)>adJ4P+#pqY zuNG)AdkIt5ejD>%1B%3(u$8R++1Xi)dY#5!@%g5GYIPvxC<2OSQ-l?SW#zQoV|~U7 zD1E}4EJK2L%$)a>S3_i`n3q2rJ>1`fEc9pRWLAxq+gU&$5NG`BC;|-?v{YW z6_XJ9PKt$RlYw(POQhiYvgL-YY_ZW$<-^CU;?H!t z9gO_G`;z>@&G?^;;gT?61)*WEjo|yGB~$ORKQ;5Jyd8FtU(DFg_1j* zK!JA>#3A!>Ot%)#+B<(g%*tZu^Kjo?8Xe#p8uAF1tot$OK>~QE%4MRVp-_dR{*`lW z42QBa&@El~oRl&#_VPmNwh*dDc(>fueRbirdcZFKFa<4p1;Tf`5Y`W$I9l=8X;(fj z)gMomhJhyc=hCZJ{Z8=tzdInii$jGFppXuen7ks#TGjk2(FO^?x18*5L)Vd05T>Qj z=8#7|rg;>&HQOEcM%)vD3sA=Mu6?YoYXxrVw8!4|m(ueqBpmJc`c*j=*YLV;M|uaJ zc1R8G97)Vlayp1n}qp)#y&qy*Bl|sJ%=HWr}Xjn5ZUJ3G_Nk$4scW91oRrJ+S$E-94(-Mj?PGqZt`rEVN-6pFB<4X z%vBlIxqO`>XQn^OG>E?5-jAbgJ-u;ppKhV@#^S8(Hc+@p%bW?h#=}|ZM%VVYJx15) z>tD_mJ$kDY!*whU;P&+DWgz|6g&dPY(;9kTN5{gWWf#9!5l|JM&EyFQk=p&)WGraW z(HftG?}};IDfd0{GSj07r)vQ&n=psKl@`X}Q-f6QIftJ~k~wkNdJkz8x86Z8U;93I z19t>EeCDYg@k`JE+uL~Hy*Ro(k!p;MnWbwm>uuBo9yRf)@#GkfMR|{JrtOZXGlQQf zAN0jwUQr)(^>Q4qg)Y_Gf?Gtu$U&YxAU_hI_|t84Ip9^L1?T~ls*y|SJB0Jod71unQd6I;(c!G$oV)A|htSIzYDe{}uwIQQ zmOrA!l`-juGkngh^%L)Tv@xYG26UxsY&F`mcmZSn!qM&@@3kwtr$bY<(>$lCJVZMc z69g7;g`WZRxv?=shgr#bf61Vj2;@Gd9^4$DnmNEBJg6){W{O_hZGj*@K{jrVgI}ST zrd!S!nSnQ%R&6F`;6GkFtG>In;P(ay%dn%=Ri9j3kz@T%HhT}B(mEB&anKiff8aI` z0~S}e*&`1|7}gu`u=BoBjM3q>J;LvLD7tN59I`O$wes6MjmLW1{@nse68H=}D>H%^ zoRaTRJOT#p^;T}EfM$SxpnIn(Yr)(|f4|MD_XOUu_XTj(vjYUf=(5qS2()w-pT+L_ z$-R*IfiRO+2XOpOmdewQzOZJq093%;nPpcF4mqIpcT=!8*5(r8*!xCN#!TYH5tZ>g zRl`teJ72#Bbxk!mTybvO;~1*+dTeZb)^zboU$EIq7JKcq%*z=~4@>)?Slb(BdAlg? zy>W<5tp;d1q46*qC$RVgx{#fK6tYOI2mm3V)BBh?C1&B5-z^WmORfCmZl>caD_epeJZQZ*OO3LGK8i-l9N79w?Mw!~jFIvX^P~M1*`D#cUW!3qRORx#Tz!tg~ z=Fkse1S{Y^o^StEWBe1lL#c!l%pVImNbnXF!klYY%hX)mJlpm6ExFRd_FV5tq~8OX z1+h%~d1>h;$4_62i+i@`p<-tBudxxv@L`iOFAcec{Ddn$f0m1DS6*(S8@<-FHstID zWCc2(=b6WeQU>5ZI^WUq>o|&*UwOgBi44xn^U6Q`$`Y@?OJG z0#od{Sk(z!Dr4l9^}jbDf70n_T|++l#jmo0x*^H(E=0ho);mHS27~R~kX-98&5GsU zZh4i?7h5@<3vwMedBXb&9CWl6sw@HSSb&@D{)Xbz*9Tw+=|@X;JAE;}gOK)HGgrco z`6Gk9R>c5C+(|KV;))Kl5o}FxrEU1Cy_B$6U`CrWfBfj?QnH0T&Hkd+ZlYb9YXo%T zWSY5gK4hU%Ww+9;*EGy3E~Ha}V@X?4hX%YjUP4z(cL3xcU|J1|Pon2fefsqYBDB5A z8N0X>x5GirEb6A{dNqHyI6`=Ip`n;A?)_WQG6{)%>g)^(1Up>A)J^O`wPrvTd^}_N z3pKwkdIe{Ff{X~;$=+MU53sOls;+{`ACF-zgtyES5;YJK3)N|_4J@}ZQoVjBxe*rz z6@flK2AZ|jQv35&Z$qM>O@&wHUo*FweHcP%{WNrJe4() z7YGltg&XAVzV=$HA8YZ7qWj|Y#_OwABQ+llTS0Z6Rc2a}S+AO6(rhoHtlChrtDDETZCicZ_6Bm}w@MWJgXZ+r_2vyW{-FA@+bgYm$ zpPH0MiHBz*w`6%mgy}%IH%YSF_h2AB$*Pc|*d?mNU_zqLpjPywTWk*XV_m_`Bxe)*0OYMHZ_;x9wjbn)i|q zR<-T-tv5w>K!*3_)1ITGMs+{u^cI8(t?KvX1KOu>J-Ly1gK)6s^VIjzqMV<4&d(>G zzirsd<#At3ExJ|sRX1b9@Hq<>kRe8X^V5^{5jk5$xOeLUq_tC|_nH#YfP)Gm&XQvtdyZ_KGYkr2ELdcU(cfr7a#1etj L_0)>*J_`6JUQWX- diff --git a/inst/assets/img/unnamed-chunk-15-1.png b/inst/assets/img/unnamed-chunk-15-1.png index 3b7ddd379c288c26d1e66a7b74b0050af6824afc..afd306d406843be43795bab76e0865f8abe6b40a 100644 GIT binary patch delta 1040 zcmV+r1n>LBhyjs^0gxkq1Mq1>Lr_UWLm*IcZ)Rz1WdHy;jg3{^Z`)K9KZ$Q#q!vG* zv5pQEi?3BvTe%w=t;PmPlcniG8oABbDx}GEZW>e9Hn!7kRiE|(Zw&YYfU*Z3ka$8G z48-=b?E$n&Q$ZEgB&0ob+CXTN_JXQ#uCG(OUBL_BCi=@}JD&i%? z{WCH7Yz*@pg0&-mPc7;iy3Be}cI}#B(pb7rQ2)<0Z#G)-dhzM<<|dEgyN}ggcgNHa zf39n}NyINBzUKHDCVv(2y~bQ6jd(9W@|l`@q{8{hHx}zt?;zfZxN7)?sZhRX&6Fm% zZE|_eKB|VCYq~dzJ%bk!->TC>k>?{om1c9SUx<6_jj_;wzcB7COy*jC7VD!W?niLn z)5gn)dk}x<+Uf+)Sy-lKUgiFUD~?|da}d@ovsC0hiA24i#z5}Zr^dJ~IpE_Va$7Q8 zGmaEO{*q$`vxvEo^KL_}gq$0io6B=QjwLjpV8aaVI#{p) zGN_P;489$Ia8XkO15A`q)KZifiKk%>W$k(8fWvXbm<_DgnKedf&*2g7gdCf66NT)@ z=O8JPLu8nYfK1*bZ;`_!i_#HtaMQLNi_c=++4S>1G|(&K9fQodo$(64{= z_ZDmWk(_BOpLhqr!w$5V1M&K=F8#18^07iLynC~M>*^9rJgL8_+o|=`3ht|^wTO}W zJ++3vRY+rQW{}Z5K1Ps-7t0`C!)1JY&~X0)d3KDqC1TAw*Ar=2C+G*Ihb1`MA4!$p zls}af&#WAp5TdRx^p zO}k!yQ!u5Bv|D;f%1SRtuSmtnpVTc4Nn_F;)a>3ow|KmGEe4#xz17wBu{f`SS_4i6 z6?j31EjY7n{zGfhONK~c+td!TS#B}JoR}5UAd7p&5phTyXSkK0xCeD3xaYP^o&J~# zXp9xFb0C;HHml5fA<%h1eR|qw7wxF+oNi7g;<5Nl1I>#1A1R?FCigyLMtHQ^Z{L`pY@rIp;fn=U&@HJzr_Hni*Ay zmaDFv&m@(Trxui+O^VX9)Jp@@tLaWHk;}~zF2NP|&gzP zB2U0>6&-yU_zY3Z)N8g&6u$@i_-VHW-18jp(>4SGs{)sOoDz7^$0t2bAwLO@&?@T{ ztq8mZJiORuFSlWTUjrD(li^iv8@eK9k+ZFmVRFymFOPAzG5-%Pn|1W;U4vNroTa&A zxDScmEA~{ri9gr1^c?U@uwSpaNnw8l_>cP1d;)kMQS_;jeRSUEM_*s96y65j1$)tO zrwdK{YIQMt92l|D^(E_=$Rjw{b!QT@q!)niR`|5oW9X58sK`@k;9=mwN`0!CUz%}N z=7inLvs#(V0wa%Pzo*UQfCqp-w5`0T1eQ49StnLA#O z$SG~RmBN%C%MQABp&82-O2*OYCV#DFdS?;Z*af?u7ut}Y-O}uI1{itRKfF3G<^~+w zUDQ%ywxhs*N9aUEBTg1AV%4ciJETyaGL*!eYB2Us1Y~6V|kK@OL zjItNKEuvASJIAkZzsa#!KU3KO{2yYo>@XW=6Qr;=*qiJKOTjw94h0HwZ8{Yy(|suQ z^Sn=WR2Di;Q1bjheJF@g&e`u8`pu92hMKTTEA%6OPtY+mTkR7d2NP&@H_|?*YimF3 z4m`>RyZFxSzH4iA{BiS*-HUCudyxsZBha|V0wy{p~~=f!U=dI9X(tD z(rx1PNCUic=krUUis*bequ4U491N4x&k`cGfn^6<67>s;?;te9E{oUDZd270omi&*dmK zceuU6i=!mIgCdUTLEihmMRwf`ZSGq{hyTJm>sDx6s1tqd5cR(r+J^8>eC9KviwE^K zy1nA(qe$cikyARb-}@cuOXA&hx6ycj_f^j)L^~fh8vm|08arPi{}$0@^FLVtad>PS KD-*LF1oS^?CLA9C diff --git a/inst/assets/img/unnamed-chunk-16-1.png b/inst/assets/img/unnamed-chunk-16-1.png index ae8142bf0bed1758d4438c49b5aff9d83c9ee7a8..53b52d08014062005becc9fefc3649281142a4cf 100644 GIT binary patch delta 1040 zcmV+r1n>LIvI3a00+1tr1Mq1>Lr_UWLm*IcZ)Rz1WdHy;jg3{^Z`)K9KZ$Q#q!vG* zv5pQEi?3BvTe%w=t;PmPlcniG8oABbDx}GEZW>e9Hn!7kRiE|(Zw&YYfU*Z3ka$8G z48-=b?E$n&Q$ZEgB&0ob+CXTN_JXQ#uCG(OUBL_BCi=@}JD&i%? z{WCH7Yz*@pg0&-mPc7;iy3Be}cI}#B(pb7rQ2)<0Z#G)-dhzM<<|dEgyN}ggcgNHa zf39n}NyINBzUKHDCVv(2y~bQ6jd(9W@|l`@q{8{hHx}zt?;zfZxN7)?sZhRX&6Fm% zZE|_eKB|VCYq~dzJ%bk!->TC>k>?{om1c9SUx<6_jj_;wzcB7COy*jC7VD!W?niLn z)5gn)dk}x<+Uf+)Sy-lKUgiFUD~?|da}d@ovsC0hiA24i#z5}Zr^dJ~IpE_Va$7Q8 zGmaEO{*q$`vxvEo^KL_}gq$0io6B=QjwLjpV8aaVI#{p) zGN_P;489$Ia8XkO15A`q)KZifiKk%>W$k(8fWvXbm<_DgnKedf&*2g7gdCf66NT)@ z=O8JPLu8nYfK1*bZ;`_!i_#HtaMQLNi_c=++4S>1G|(&K9fQodo$(64{= z_ZDmWk(_BOpLhqr!w$5V1M&K=F8#18^07iLynC~M>*^9rJgL8_+o|=`3ht|^wTO}W zJ++3vRY+rQW{}Z5K1Ps-7t0`C!)1JY&~X0)d3KDqC1TAw*Ar=2C+G*Ihb1`MA4!$p zls}af&#WAp5TdRx^p zO}k!yQ!u5Bv|D;f%1SRtuSmtnpVTc4Nn_F;)a>3ow|KmGEe4#xz17wBu{f`SS_4i6 z6?j31EjY7n{zGfhONK~c+td!TS#B}JoR}5UAd7p&5phTyXSkK0xCeD3xaYP^o&J~# zXp9xFb0C;HHml5fA<%h1eR|qw7wxF+oNi7g;<5Nl1I>#1A1R?FCigyLMtHQ^Z{L`pY@rIp;fn=U&@HJzr_Hni*Ay zmaDFv&m@(Trxui+O^VX9)Jp@@tLaWHk;}~zF2NP|&gzP zB2U0>6&-yU_zY3Z)N8g&6u$@i_-VHW-18jp(>4SGs{)sOoDz7^$0t2bAwLO@&?@T{ ztq8mZJiORuFSlWTUjrD(li^iv8@eK9k+ZFmVRFymFOPAzG5-%Pn|1W;U4vNroTa&A zxDScmEA~{ri9gr1^c?U@uwSpaNnw8l_>cP1d;)kMQS_;jeRSUEM_*s96y65j1$)tO zrwdK{YIQMt92l|D^(E_=$Rjw{b!QT@q!)niR`|5oW9X58sK`@k;9=mwN`0!CUz%}N z=7inLvs#(V0wa%Pzo*UQfCqp-w5`0T1eQ49StnLA#O z$SG~RmBN%C%MQABp&82-O2*OYCV#DFdS?;Z*af?u7ut}Y-O}uI1{itRKfF3G<^~+w zUDQ%ywxhs*N9aUEBTg1AV%4ciJETyaGL*!eYB2Us1Y~6V|kK@OL zjItNKEuvASJIAkZzsa#!KU3KO{2yYo>@XW=6Qr;=*qiJKOTjw94h0HwZ8{Yy(|suQ z^Sn=WR2Di;Q1bjheJF@g&e`u8`pu92hMKTTEA%6OPtY+mTkR7d2NP&@H_|?*YimF3 z4m`>RyZFxSzH4iA{BiS*-HUCudyxsZBha|V0wy{p~~=f!U=dI9X(tD z(rx1PNCUic=krUUis*bequ4U491N4x&k`cGfn^6<67>s;?;te9E{oUDZd270omi&*dmK zceuU6i=!mIgCdUTLEihmMRwf`ZSGq{hyTJm>sDx6s1tqd5cR(r+J^8>eC9KviwE^K zy1nA(qe$cikyARb-}@cuOXA&hx6ycj_f^j)L^~fh8vm|08arPi{}$0@^FLVtad>PS KD-*LF1pAZ|NgUq*