From 7e1884631ce70691b39cd1f7200a0f659d763942 Mon Sep 17 00:00:00 2001 From: Scott Chamberlain Date: Thu, 22 Jan 2015 11:48:30 -0800 Subject: [PATCH] updated vignette --- inst/vign/figure/plosword1plot-1.png | Bin 14467 -> 14485 bytes inst/vign/rplos_vignette.Rmd | 2 +- inst/vign/rplos_vignette.md | 154 +++++++++++++-------------- vignettes/figure/plosword1plot-1.png | Bin 14467 -> 14485 bytes vignettes/rplos_vignette.Rmd | 154 +++++++++++++-------------- 5 files changed, 155 insertions(+), 155 deletions(-) diff --git a/inst/vign/figure/plosword1plot-1.png b/inst/vign/figure/plosword1plot-1.png index c513a54c6dcd69355f2826b69170c46e6d2ec3b0..46139bb2e6cb8412030b9ddfd1a013ba496a4c87 100644 GIT binary patch delta 13220 zcmch-Wmr{R+b%369fE+;D4i0L(zih)sfz~b5+oFaNeBo?NT&!Wu;^MK-5?+#-AGA; zbi+5+!uxxl_dWLB$Nshb<1v|IjWNeHt~k&08h(y3jztWZkdgd9GMcZ^Hd63MwKOi; zA%{ctpiO4xFHWJ8@=TS~rhVV_Kj^jJ8mTwFcdIhcv13E#-3vBmH`7U8Ii|>9O}3}b zQL8gYd%j%r5o-f*xn)p zW3Hj&+Gy z+diq##aJwle&SdMvt+LQRMln}r**t_0&=;!vvlC7H@e*Ohx- zQ=@f}43(I5DczxXG?M-hKQ||*1Ph^fOj0H(yU6%4}*R(hag732vdG>@o(7Si;2}1pT@5ilSw8q%gI0?5j9JB}GhIOUuj{QK-qZI-I{|ueCy> z&?-LW+0^psOf5wgk${07n|Cu)q}*w-^QPpYRE_lz2Y#vNR|cl*PBA@cH}f>6?kcT! z5D&pMlSCPe;0h*@^T3c#oXXAu_xjZEx$+KTf=Or;9*XUIHbrB1K*U2UVC22)u~l4i z7^tsiWbyX)7je8th_Zq@nRJ7CX(Kl3L00J+8ouM45f$qAzkq>X&Hac`5AWiyp;OGY zGzy}u{6zU0nqv2Ldej3BAFy~!ke?OG4iSmh&|?z`C9jMEnE$3 ztA`eF03@tLnJ6cgwgv;Og^rLO>@EEsm%)fpg+|E_W%WTYaM1RT59)yge6Vb?Nc?rw zX5e5TeC*f%c4yH4)z+kI)yK+ZqkakHVBUz%B?UL+}RJWzAb*WS21)O$>R{qxoCEc^@8e61@}PHa7bdf ze9WBsbZ>T6xAM#cZHh1sefK-p3v4j7?~&lS%lern+*^$YPhE1HhVY& zZK>Eyl;=xLg@)$C5S@dF>}`Qcz4IhND^h$N{RG80p3n_po8cdOl#iBLr7WRa8(ihe zFWH1<_htjxi6iNA1~}Jg21z=GVw4-EJrDIySF%!VE2dmS#tP)=Na0oknPb58)*J*5 zb;p@&CJ&(b4+6=lEbf?h*YQ6z!OAQ@CgDWpLO&vgs7rW7W?xL$RUn9H#V}QIyUSBs zNI$q)e&9@Fe96YRezO8kgE<@oAyZ0v(P;~ z*w7DAY_E1+F=-AYu7GP~C7R#OL6AFh>J&Iv=a@kYYxD$%-|vPKY>I849ZWdPhxwaj zJq)4X*_3G{46*xKhC%f8OUjvnF~{A7z*Rv!@j#INSbCLi({$Hv#LE1Ft0YKxlzSd8 z#tmnwrhd~vW(~})UY=-+-cJ(xAvT+nmE{NHHr4hLys({-(YR!D#@}mO=yUX_1NsN@ zm41%7J|8YsuAL7Xb6?A+#FjTT0Pa)E{j7+=RWC}6=^1IZklpyV*nsKn9hC`E$szuo z{X^p&e3Tc?vZ_&_X$Z@eY%|s7Ems-c^&26{kzO?d{%%pLz(~XKY zeL;jl`WL=Jv#!`mx4ON^QrI&m>y(wL!UO?}s>25Ny=7yn!W{v-oqfaR&zE$43#7_7 zaWn8e=-uG){vZ9!`?Mo9#t1|3O}*H#lZsyT-HLZ#aB?)eQKUqmwFW7uloCaW1_iZs z3U1#`=o*pYQ^Mr>_~huI`I*{{qMgO4d%pvn`f$Vp-(u$3mXZuGzu=hN8Tp!2kn|sM zqk?XB8v~yeFV7d1g4k|IH>5|yM)6Q4;sc3`0E_x6!kEEBv^u^nBdYj5x(1PJXPSf^+!#A3na+^U&5<$MhYGj;Qskn(}Tj^ zs#bJWeV*O{)r=icM2?!>1QUFz-pW0{&q5 z!MxC**0wX6z1UL-RVc2Z`!hvEc@O35jts+WxRF_~bP>e8YrR2V+3vVa;qxRRyGh53 zzhDSYnPG{i#q0cJtXp^nvenYkvggXv$Wkfa?Gc|Svl>`W58){R8ES0WV@u!C1DE*! z-}NB+K#cI@OFx9=&!!&HB^upIr>_z_-|uQ?snAjjn16sjbX|hvPsHCr1h zG~=%`5+RFv!?RL69#m16*GUouwwKh&T~pig_PjV=8m{$lvze+w+_#?`^%%*S`KlNf zz%S`;nawE-Dm@<6e^q)==x@3bDJKajr=;~CElm1nzr6p{6iTuyFOKEbt)h&VI$6F; z&1dqC*11o{o`9>nb~^y+ZfH0QN(>fg9+&5bc861L6_u}+#yeP3X#_r-wufz=7Xl+r z#&SI;74HG=gz}~c;7vuPy^<5Us1L?giLnwL6DGgpTx+Wt% zm<||Mnh|$_$tYJlzvOV*qc?!ywuzVbJDzkek6`GBP~$&&Sb@1t9GZ#YED-@2&&lpkcZB=fpJn%be3bJkV z#p)n>MR4VZ5yIfd>k)E9eCM-&-QSoYVwdZm+m~Iu^`qPslcbd4AOc50`J4J?x{k^q z*D!(CTcDjD&4=fM!rEa~^>4FSaT zo3T+)e-8CpLACvlOyTL*&9#&V01k{}5I-RKA1BV5`nJF4!LAaRZ)0v9ZdhNJ^0Eon z9uAK)^b+j}r~R7{(s00G!$L2XQlWB};pePhX;Z}AGV%GCX&<1r!(fOmiW^U{yD?Ew znAA}G_88i^ZyV2V7A$ePURn;4SK(|sDz73P2j|6uP|0ocRms7`KneG~d$mQAUll12 zv3|=(v5eIoPTPQ4DjNN;Sq<7G|9TDs(mMf^8ZvmZNX}{yXW(w7=Qi7jO>c{=dijW9 z7#3fo^k2&cfx*x{tS>yW%2^{Ev}CL*&W0AlBk?v=)EaT~HE(w3*45%(prD`CP&hfK z_OmRNlt{1r%FzqQwxTQ4nRYiKⅈY`zvBTO#Ebu3X(eC)2If?X1?bq$H9n!N4~fa zbn*7^IR$P?SXYYcxK%Oyr1ii}c;Tu>L+?IGx1kHUu0N}u3+7zUEA1(1CKCUFOdkW8 z%DH^LR2T!%C!bFN_)yL-W0VWPByKN%97eOET~06Z^0UpGsaL%cLZD2JzJ?W_n+E(X z4{0nB+g$&+ELp9vop)M^Po+u;KaobyWIrIJ5`2F;Ac{}PQ`Qm1s(T4toTsEp4yBKU zt$xz0dF}Y~+|RY-iZIQxL^$HFfA%BdKYw#LY8rmro#$oIow(Tc9f|G!3)+q7ADti0 zR2Pkx+fn0dn3}q8Dd`7#b$S(_A%R^r@89BRkA55fnTcSJ)a6^&2i0439_eutBZJV1 zL9Kfw&ts@5l37vd&ewv+-6qjSmh3qz16kGg$rneyIhr1RRDwb&V^Y0NI+Q8cGwbWK zybuJjl$sk3_2&mXlH){4xjKbnx6k8^N7p%HBwn(SuM8f_Cx3`J`7w7IL7#IwFr^t# zNv9ry+xYP?nMAwgl-S7C(c%oKw-}*fM&`UL8Ui_?2x#w+O6fRS$iwoO1~9A zx+(;@i)UZHUSUjcI3a`b_@*GAj-2 zFa2E)M@5&%KIL{jYuNK14CyMYJF#9jfCU*q@JXKPbMlZQld z!e3_k1VD31;GR6B}xLG^7`trRcNZpWjAS4C!Y_2-n^`NTkRy6X z^+b%0!OER46j7N2Hf=_kD(CZwl_KUpZXLQ<+~3$gzelSR@;IL-G%1u`YFatza(~3o zuIU}_aG{~p(g=vB^b-pz;+`v7w?mcrpY}( z?{&l&b4>2|-~)|db9rPkN3yY_@ekrfBQjSastlW<94!?~P*|)CO3k}%Q#}ug^|A(_ z(>kYa4yE6M(_adnD4#v~9lVkHTJ?Vi61nCn6a0Q@O^jIY@z(tDtvx@OkSY97!K?>w zQS^Djpb@0QekKrx!-_(^($8^T+`mpyrj~zKxuwtfRqeBy#_QDIC^Y`ixDftZE+7&% zL7!x-b&$?pr7Dg&4=AT7ul6e@n{Q?{P>x$R{jGHX7q~yY{cnY#^hs`O=)axoSPYU* z4=8|%o0?}RWOWT)^afkJw^agr?PN{2(8M>#;?vD)UVHY;f&r=vS{o5j4JJYS&!-K5tD+WNq#^#fZsg!H=08~;}z?WKw9}Nzk zNE}WMJo<2JHufDyb`0hf87Fzd5TQkxF6rUah($RH$cDvZ8pn5@XWQ+ro$OiP+#1~v zH#fA0`rHFV{(eU>?u$tX9Z6Pc-Ivog7w3REd#@AGSYp$>Y@pimBA+m7LMbn3IPay~ zxQpnav!D4?h4xLLKJ}gKt&|45hEw18*C<%X%IQ{rnlc5}7VF6X>dvf_YVNC`$nw0I$=O8u@`~lxvtx-loNpe`^Np1oUW|* zL-#Y5=l;_!i%)Ob%=0dKM$F>$f7kHTpE*suh=P>Y+o&D(vi>qI|dxvg315sQR+&!Aem#h#KBAGf+}CVu(#kx zl5j7q+;)X{_wPA=Pmpee8HwsP_@nlJ&4&iC4pHfOh!k}gY*J{Ld1qGMSg5xV7=U+R zTk4^sO7SAA+8=qE#c=g)u58^3`)%~zy9;72Icto@2;T5)GZ%K6k|wR_sAeEI5f91h zA(g4;H%(J-lzjX0BFp-~B7TDt3#XpK;_E9mtToL;95N4(vN(p!iEy6fL_+ZkM?h(b zqT#+wi{aEswpue{!_&(^(w(p`KS0%w0s}pyB^CaT5y#>N`U^>8JwDg zLRHcQm^+)YgF9*f>bodDaakYz>3*=jBI$lxFdN7M2kWK1iP~lD|B?h5hC+(bqwV>8 zU8ur-IO8$#pm(9ts0+8AdZ^r;uU%BN^NH00LxA+_2j*h{Trhk`1qBHTWnq8$CEDxam#Ceo4kcM>E^olPssIj4ox-hQhc5T&P)}=VM-FBQ?3>^pg zTrX}GK*4q5{~n4lSUWCkGB>1(}1BYdjJ?)RXxZ!-wvCq z+_ns)$#C&dh!k%n)CTJCO<_Hk~2ICr%Q=p2B%OeaWHx} z*GA;_U#yIajQD0^sWQ&O8vdwzrb~jBeSl^E{7bp<Fw)2~e{1~rwJ=CRQrl>2{=0U)d#@XLe?bHT4wdel0)qw?ERwIzvjlP()=mEIPJ$@i5}K?=3iKz70Y>S}e?J4)U>%@L zCDX6F2%0S>M(t(xPSNiuDSuB=p7RdnR7r`9!|JkMTg-8Kq?B`j7?@-{3JuOTDa7)| z2C%i(ecx%x>Uj=uc!ABt07B|<#E8LKSa+(_Oxd%dcPj0RD&iZ0x^7c0_;Xw6(Cifs zM#13B!>TaR-|=~OzNi*3Rb_p0?=15@mpomcuMzY*_~l0o1FBaFgVkH*(%Xn8Pk!P5 zCVUF6J>`6N6tlIvuj;BAb|otxA&)9iKYoiq4)G~b*kQA2dnyD;iIQ4H+&1+<7*p&k zp$}KSvKZi?3sTV!i(*wR$LFoN7j=V<5n|6uCZ!zwA|Iuvs4znuH846Vww7mVE#I9W z(BADtbI-`zCdCsl=gs7DyNN2p^MTR$wqHzPtJ=|BLsD!;GhU~5Tn{LhSE2p2k;A04 zlYF4P!evRcPZhAbAjX=0(db~elGArV631y`{!KlN!sd~SS#`#R3t~0($kbX?R+Zq!v-nOrw$s`_ zum)SwFs2gI$31Kqw9D3dum_I;WI;;% z*5F`_5mpL|TlV!dz7iloj`n|5R8C*CAvdT!=W2O-?so{8Q=?*_N%0rt>BwBN4RnGKj0U_;5EGb(v~lo&3EsAscAz0C2Bqc z`iYaQhB{hTn=GPWLA^UKD&CSg?8R2dO4ZwQ@<)A)Mlw{hlSHO64;wn;beiJnJ7w;! z)9l`H|t5)Ac#(0j$KQkoXt<3G^Qy3!+f^{WI!N)_F5=%`4Gz*r8_EB1-2 zLB}MenWZr*Drh$@=n|kXFGpz-MT>0>HH7@Ix;C3a?SqDKeZkfEpTfj@#FR)LGi z+Qb2xZ`waQR2PuLz-;IgQ)SIg$O1b!KYR@{T@h4C`*CAY(+aQp8GNR&x)JG zTvlJ~uWE4x1oxc%10=uqLO#JBPQ4)CgXC}C6~|iv{;wJo2cn$q6y!1z>Z)KOft(ZX zu9~C%`@4_B$_n(W$3ZzUq11Q&=(60`2ui-bafgaCY9p!A4-pL%JbIRYlXD-Hpye<1 zLWh~Uf`{d=w@qyNzsT=tMBkETc!zn^VC9nDkXDpXnvS`Cx>fJChg2mpMho=CbrIGv za2tq^%?N}l0`!twde(ks1lrYXw-ujjQrCJMsw`@8hS!7CiQqRFdz1rO5@QDHoV|f^ zE+tKjuZR*uB64#@&}=5Z6%WC8>pyAm!jNJQP4jTRZaZ#b!N9lYVut|Ce-Z!s>!L*2 z9wconVsU+Mczi=zA`P;~Ew>N|F@&yeOb`;iM{t=4Gbu!MaE^EFhv86@WqGYsRyFoCeUW%&XGz3quX2+^+ODJ3s-q16le$ zFD%%$&Dw%O7DR8scmC&SQ9A0&nIRshLP<>B$S=R zqe;~N2H=^_+eg>Hpld$aH?l?021G`mTcnsJx@5E1{%lpPQi3d(%jS;0kiEs3A^Tr;mg^n(cUpnHfJXCYRAD z&UKB*tK<&_w#aN9*@4C%LhRGZ9qd4B*_YYB|9}qbH!K=!)5`2oz9MI0AGYIOP^i5? ziC|06yQ$mCnCdbV44G)&Mo*FOIH2O}iEjK*GDAu&mzsqO^3Gh=LRyfJbw0OreH zL+kRV8oBDwjN$hAKRaOhKI2U&G|FJ_*?uPX!5rshwu-Q45u)7nwpo_*Nu!x-Q_coEA9gYImW-zOAIx+_I;#r#cxf#;UbfQ2Cq6 z11Ruz07Fu6Jq~ir&p&lHV7sWS%H}sEeO$n9u&@>;GKX`RQX)I~2%i!Hl)xV+_}(39 zhKaptr!H>0j8LIq=^v3v(9vR?Vb#M*05$XuYwJM^oLTB)1|ke(t~n;H5aoO>M1Yv< zx~2Gfk(_#(dQ=_IddoXll0@(+xnT^a+HV@Y-~3^{&QY(1n=WrY+1<+Av|- zwzPW^QGd1*0(#Lln>En+n&EJ@+t#xWL#@XkvXXknAi&-A<9CupUuCYyr2iUrL_!Ia z2R*eC<@<{I)jeWs-%iVH$NGkcf6Nm=peuNzp++gR;gG|DoZFQ6S2g8Zzoo&JDsf@>NqMH~o*0>=OvhtQO(% zD<`yWlYCZ^-GZB)hYF^P9?;hcZT~;`)||boekC$Dkn)1^8=0kxC8hZyu3r zov%y;20#9zxXUrXQ7UzDlp)Ro8OD+-=dsr_ebVhYPfQhAEaNgcGyuY={0m>mJsvZq z4N*|F${~Egbi*A)$OcHcN>%Rf=!80LojPA4TbEt&?niF{=RF9A&YFW_&a^N*SK(Qc zd@0p0p;_7L#aP|RX4pknEcZY-8ArXkKVEKA#1!enl&vjRajkp4D#SN}!jju=Z&t1G zROB~FnE#0XP{m}n6s0O@D4Q7VtM@jJ=Eb;d&Dh$BKq{Kesrj^T!+SkCFP@f|OY z?@lXo8!9JTQWEdA1auA)DS2J0vrl!bSm;*GJt06Xr^v^3gmag^`ni8rO5p!$H23u$ zc_8bj*G=}d``WDOIo}9q#RhT9&-RTp$Ac4khAoT={pC9^_NqNo{&DZ^U99mpGhZ&0d!6^yh#v`@^U)}r8km5VJu*A zn+syCdbQ8kU4OR7TQFSF#Z%2xYk#n-cYKC+CK z=bH`7gArK!BO8PTnYplJ{uMxImSC!4hQ!La!7!7RWV|XEbRv?S43!I{+`Qu>v6TF3 z(i4$?l#6fyu2EIQbT8*=?$<1IPQJRGPEP%_L0nQA2~A|P!p%#0+m$u%g0)d+b_(<( z?SOLZ7&w%uJ_~xP8Frw>>exQWAElNZPzU-~)qA95e1m>ZiQmf+iMC+t78xSYLDO>% z=8dOGuQ%ie?E{}QU8l3ArF;F$$KH@UAn_YhW(7>Zzl4nWr8p+Q(fLy=EK)mo*u6yOiw57QMoK|dCGO)-z%srR0`} z#O_0XqK^?<^sXxfI9c~=*Fy)d-K4xK zrhWC2`a_sa{vwQ4VIncPY(Z^i8E%QFF`gSxqHR}; zYBJs1KQhAAYG%)^*!W@^6dGO_US6D=$^?Dn&*R?D?1@u(<7COt~k$p)TN0{$@e~M$n2{4%M&Y^-6H4Mie4E<*etn4T__aU*Ppu{ z_Qm#P7cosM`rdTrSii5Fp)ErMRkbK3yteyeoP%8r!zQ&D8XmmUR}8KRNghPt2GCAw zr{RfB>6m(UB;)08T^?T4^-l8|B=bzWe}`vsi!*E1HE`Oxgfj=1w|Uh_P+8n?L*S9? zAO_DcnkF>f8%o6c&MLGp-;xZgdK{t4qUYaYM9?76*WF>U+3o8*&|6Hbr<%nCq-4Y1TkK11Ygbezb14kl>80ukI9M--5I+7rcVaD)%PZ^ z7KLw&U%W*mVM;aVI8NiAc(ng^Ub8k`j~v=n&z7qm{jwMdC5t9tX2olqkOkdE4{+3Id^lRz`Y` zYwFUDDrLI!j_yz3r;jk!ON3(-+nM=lW44$gsqi&UY}OsYZKMKDjv)!WH+oiCcwrp$ zo%JUJe28}o(a_8wZ6GO)munKBu9qYW&aJ6y@goP%EEShSGc#ctG2bCxDRyV%vOfmE= z|1yz@6&t38c0N>J@FQak0#@NrCmcLX&8mvIzNn?!4>1wyXZ^0XHeDU=Z)Qk|y2i0P z1L{@5{W+Txc)>trXA6k5)-3D_7U`qJ+V!VC{U4;K43{ju4Yt|8Xh4@~fppfFXG>C3 z@e$VTi5DBJ;V(RR5x4H&RUXK{f8p3K&sy0*5U1~&U=x&Gy_2007QEIofT1=wm&Ie@ z(W}%$JtC)0Jalz0z5abU^owS>I=wD0cx7D28_N9CTfU?0-DH!)HJF zE#6x`Pty?}@7;P1dp(;<>q~3G6;*DtnTKqrOx6bP27v42Qp!0Fa*~pA#~8=F(jp<_ zR1`DlIg8|xlz}LA3H#Z8mh(rnFic?Ar6OW%D#BszRl{y_nIQ$%wjA+w6p63vVEoo_ zIEAiK*69(nQlBvXDO7?gbq_JvvLU-3cR3XgGZOGG$$*)QCGQH;aqvWNA{&3F=M?=Qx^SPEQ;uW}Gj zzPz^(=e*9($-W}nD8-4+QB!&I%dfoVJo}@WC^GCOXuv;h6K^IZc3n>bGlbiqs&G?d zd9%al?b|rrKk;jO6*ioDlHJ<8aId6_I?00-Yz(vb=#u@1i`@XuW6{o{DeZHf{%Az2Kgy!<_m_GB|9FlbeJYEF14;|m4%18?bCt9IKP{Qy~;V^DZ;TEHG5H1ND9$H&N zuy2esV}vMLe&lEP#IzMvt+v?D4^O&%_jq21Nwx7}awLFhW0Fr=B%(3*`r-d@ssY{)HduP3^Ezr?<8MW2qlKW}IRQT2ZMv_I$8 zYVaV(rMp!%5MS&`gD6CYgYPEVd;LzZs8Zdv3=(j0IH5H1GcG0cxkvIDpN|0UO-Sb4daG*p&Xk8 z?pnbDdj%Kc)vpe<8JWEkmbY0vWv*fS6oK29O|f@IF?<9uFZQyeDq|zHpB!>(FWcb2 zem<1Vpv@t!UhUs2?wf!t>4Jk>^-N({6V%T ztc1BNOQ2zGgpb)z(npz$NUVmbKn69=K?Z6=>SnNmPTu3M^X`t%=9rgS6(`)S#zW!` z5N~6WVFq3?1hp*%W?h5o%`yxhFfD!j`Lv2~(b;j19C^5fa<^KrQYe^X2daF%QXb%{ z@n_jLf8NdYX7U<;oU39P#7cwN^aR|uH_b63!&E2fa}RQ&TI%<$=}0!*gS5Qhu@(w0 z4@MOfDTLY?NLYaU7q5~M+xtY$hL^!Xrcq%kW@WEWS9ya_EdjHaNt`si_@}cDi!en zesAJMLBhMI2Hds7OgEt$?6^R>Q1nemlK%V>Gfe8@^@wsde4~23Bt%#4>6Z5jMg|5p z5!YlW4lX()YlFHvqbkD>KWSx5!F&TUUQ!FeX7`KLhE$oKyPE_{L5 literal 14467 zcmdtJWmJ|=^fn4eBOypisf2=rbV!4e4cXy|Vk`G-{(jZ9ZndiaZ zyWaI*=fio|I_rEmA6Sc5D?434>dX} z_{;b+I&%bsdw?q6`QjuO4jgmiXpq-*@jGMlB;&iS|#HI$@c!)J-WKb86NuDc5Ek8le2sU@!@N|EX>9O`gpe2UIU zjOSNoaej`PpW=3M}4SF-trT4gFfg5dR`_|D}wIJ^vO}eO+nt(Uufw|x3 z0{&85>V??_^ zdD{B>jFiro@Svqvn>NyoMffl&*)zNIyq}wBTWOzqA++A&ET}-C)$HeIx_WB|_d&tJ z;8e>-?l6J(#19q=$3#D^KNXI9=UA-w!E-yZVz`ZUk4g5orVr8fSK7Tdc8g=Z10Ou` zd^cvckcTwXbKmK%-2^d4>ESryO)ym{uL_2Ww`BGT?@i|Q)-&<`T6yfC#iqj^^-%OC z#t60QL&K-PHew}#sgIIV1{{S}1#1|xhM=W|@g^-4;$9?Cv>ciGUHA9+)XNds@;`>$ zZ>6wPRJwOh_Ok-??PrqEJOdn)UH3J=F8l68?BdBJ&e!HcOAqz}$y1yNf_D1Wsh`J) z87D^g$u7{?e(ItLAAR6pH&#m?K4dsQee_q5W0-M;;{A_?^w)Y1_lrG8hs%7APKhip zKc$*8X1JlXci~hg-aEJ`W4-=$e3%OrcgWk8v*rHn=?p*st&>fD;$m{3#OTgJyvDtO8QH19!B2;D?N zn0TtJZ^SG|Wr8IQW}!G$8a6MxQxgftsKY&b9@tBgo7Tr=)T22+tzWN|O}k0NG>afC zbEHn><0|^$@p#x>*xO^qlz2CPH`P9Jx{+mH>GR|ohfiU?cKK0qri#BFG=CRSd5(w|G`OEkJKg(biJN&@BRLV`x?GiksLhkfJs0$6 zP@cvI@sGvj>4C2fX>*DVXA170)~z#S{gst>e>2wJIj+bYwV~SeUlD5{*t_A^ECnMV za6qKQMU>qTchfNHRmX1neEZB@p2WR={-vKJDNZuxz@=#;EU=zUcarl)hnbm~Ey(iQ z5jEQye$2G<&n{YgDT()4pGDK8&rfyMOHcPscfE)B(@%H27lu629T!?oXFPWoFN$j> zUFAG?EA=LMxSK}L zNDzsvc`bZu)NIIj<=a8mGK9D^x#_jXAHM66N$M|UO{^NZtwjUtmkx`%rI!LM&z-UDfaN=rnAK6>>o5n)H%C~) zhCeI;rwn4(DaV9cZ4~UvC_?9*wL7JN2~8XI3E?Kpe(dL$gBZvSe+Y~P8$0OK!2ma! zq!) zx2-OoFERS<-5wnwhcW1DS=Yqrcps13D^R+xK1ktp%(ZSgp4dA}<#n{G`pH%G>FJx^ zv~}0s$Va9rHjM??q-@mTVv+Z# z6>Z=+PV?_K8+8R^S6v)$^S{L}kD}o39XwbcaO{tv<#OIq-d=2L`>W>WeR)#TA4@+w znj`b~1lRSg0R?=$$QTc6P>7lj!U!3ycBU$7hXgO{?O*J3yY6X^xg~18)$_fsao(Go zM!ip>zr}oYbGbinUZPcZlGjvG0oul)HTehZ4cgZ!9On2~uFKt_5WH*uQk|y8_>4u| zv9f*XI}*hNNJ_mAK#yf#=b_c-2KO?v+RYYme}PWK{qIk19paUOy!5Rrju9~?mi^|9XT=%5H`8*+{o{)v1&hZM zT0`Fl28=?W_|WW6tb8U2a!wdU-aUq>A%>qI-WjZGB8Orsd<6k4#JSZ4l`n2@!6(bw zZW@ob#s@+_M+b{9N3ai;*ILgu5+y{rZbAEdBS?+L^5k8Es^#zdMylC5ixlDw^})V1 z?=s6&zuoP4u-s$c*ID`1ZJVX|gfN_dJWPV`*t_#HT0gGJ=0g`8LPEj_W3(s*4Ocqu$6pBbQs4HJ2~Lw@+6 zTr(vok@>L_MnYSu`B<(G`=)K{jnut0>N}$Z3ztOr2hp97Ai?qO6DJ~f(S}*sSz9Dtk!9n!{s(&hqtfBLShUs+1?UgC< zSP&L*vLJKA-$8z@*;?z}04(MYsEEaZaO{`F|EAH-+;a4`X{)ekjyQ(!uMBfTx3|Q3 z^%#WRTSViMrS;5^CQF~=KerjAswU^QNrhn$I1wv`=Nn(6XKH6{EGKnb(`J2-$JKVv z*E8x`PG%Ud9+u<5J>O7*ULX{$I%K=|z@9&?Vb9tUv&HCP68zFd{?0}t+3*W6m zgc}|28I6A`a&dF>+=Py+4h$Kq*1$P;Xwx08{ySq?rctC?GG~ADk62;KQLi(1`&?g4 zV{^~x12DIFQ7jgM1Lo5-4bWoe>hDlpgX8)Pu#lFSCk8HjI@G_=S6}E)>Ux$?*tH|N z{7y2}{QLXoZU-7wHLzMAoou4M#U~w?X%m-U{%8}=e?*dTVw!kujTfym;KKs*aJNV) zl=oq{YvpBNsK9v^L(mpmNGgieN+fqJK+~p*GMC+%q(;IuRBSS1Fq@iqCN0&GBC%UW zMn*BxM}%Y+7$M`Wh9d99DkSq-dEy)_y%JmHcWyWCobTE$czflz zJyDWkUB47OQEzXw|MTwn3TM7XU*!nx()togHf!6~Qe!sK+0uSB@`h@9s={dZ*Lz$S zBmJ9KK5!y{fD}acvC6OI_U5v7J>7HW>iq9+AOYmV^mwbc=jqL)s+P6MKs-}8h3UOJ z^C(Cn@nTJpnx-1??^egAIJ=#%CG=U5@z`a0pDl&dI&Hr7TnZvK?3=!0v*-_Fgds>L z+huJtp8GAPPv1mw2zAk#LEoiV|5p9=XFmkx`i{sUqCX4(J#!yfPRy$5dB=^So?CY4 zk;6SpIFk;2l|~<*UT&ct#MRyP3}4-WQtm~sv2@Qp-Z6)_JaFgs6PCmKCe?2IEly2$ zQ&T^=Ix8V*jne1LV0$btdbe@Aw01K$W#(lc`AXE^f19mf23Dh9rrWZUWSagGBT>`P z;p>}dt`gCRno(QTQb`c3?= zzXGg(;!C4Bhqs!}VtU3Wdy(7=cKbmBN5f(+`z@yzT~}~cj)06QO>K(kd3DgY3qYWX z!gcQDU?$)ZvlV@m+wsXBz#CSsru<>>0d_PDwxi=4z89PHvw&T_of)YxdeexfG}>|J zO^37}WBtruF1C7KHe!%7s+DRF1cL)VT{R?VIcr@vujxbnpBn`T_l|84*yiqumAFr} zc)E^Z4W#ioJLu`Bvzdg=J5TCN)LLsjdTA)WY_bFAv0$pAV5-~mO?53G@IacG8#lhx z?{xweG|f4wZM0q5WFrzmgZIyMp1^<+u^?PwY_mqXZ?!*melqEp^Y>P7FLbS5zaxN$ zA4)q7Cxe>DM&pGl6Io&**?Qik=C?dXckA^ZegO8~%L+O=W0IhAWmD6Z;d4;{;=i^1 zx*6f+fAr5O!{pQOX8l}0eFk|-q2AcdUhvg>INS~s05?hZI+SWU8kN}vn^h-d)4Dg(4`tT&p9>XCer z`EBB3tGhfeAHx{9%e=cLpLCnU4CHiu2pj*SpLv+~dsOV@8>hh-S{bV?Xu(9AukU)E ze2rP{*GBpTW*yCy8xj8Lf3%HnY86z!N^`yS$ua)rpIKBrP`#!(WSwKiiz;b z2mGtIE_V6XP+P#kcOM<-VST1r?KB?qm1EqJpW>yl+%U#`W`rnn|4*vppnYc*z$iM8 z25-5N{pqT_ZHFWJ7h1JHXx?slKwrGZ2#)`f3}S+olA=%KBkm~14=wpufF#;fO3Gb$ z@*mF@Yp{1aQm_^E1)Hz_8A)Oej|` z?R2+pG5LzX^l2fTT`#F=y=(UsGIonlt}|hte8!&UgGRxPtAKWV0*Pw6>-VQH$9&%e zaeL2H$up$6pg167)oGzu@uxjYJzHs!{*K#14AvDC6+iKbg z{W7V?PzU07pL<+Ff>s`90HKrSh_2uIP=+nwZI&RH+uYV!fpF2DEVopzm_;4=2D0Dcyb{a~_!e;cByf&UC6 zv2>DOS9hbDX-O#|J-L%}lZyC(%Uyl~MXtmzx0!F81|I(VNj6bz?wDn-elCQ7jlwgKQF>ta-D>P{|8~MVTtj3Yj`Avk~ zN~XV{laz?K_e$ZBRp+3Hkv`zYKQQDVNOV6fXQ~UZ$$5qy(jaA|p$^F^i9e)XKnXYV z{OHn^#%@AS#oF;h18s#Oa2b$PJba~#R_*VIWLHH-8vS0E_YK$ z#XIAqn;&K(v&Fd)b_wN4+CR7h!$@IOBYlw~DBq}fM4HP?|B>MVU5eGRrfi2JlrvxG zzfd=f>_Ak0y5KqF&1?e5vK?1}42yllH+g@S>XAUSI~oLN+0hp^oPXf0h3r6fPsX&k zwAY)``5~`HkHo*|#DVOvCwjC5 zNn-1qw6AhUV8A}cV@ZeBnz0-q1gnGeaDZD6vq zfLYAPD4^8Dw8J+P0SN=Sa!V9yDnBT2sy%D=HFD=q7j9j&(9IO&)q(gaGc4xL6_RNV z;r&}uzBv+UT|0m;+YoYx51tKfx7Vk2kHvzg{Lv`uCz|v)ty!1;;kr2W3egm<(A6*1 zNHy*y5i|;8kR)lyG(#glz=0G5p7+ANNGDB;*Ml~Vn{+AMw&@hkP{oN-9e(~_e)o1h zy`eOyHF)_p%<~Q+$^9cxWHZ=C+!9oOodJHdlN}4GOHRDhM-k}t>--8tuQ!j`W1j>HB)WgA@jfJ&1Vn{ ze=`jSv|i+|u@Aj6s+#ax-(C)9anViCb_jLeof$7}+T-(OxXarS`~zTAA|T#rW4Pny zFrjUVSkG%ou!_xTL*ew;B(2I~oPm2>S5Lk7Kej7Ey<&cpv>?m=;B>~4<#fGlgyHyN z=X(GOR1g`$oA&zbyzv~rJw86LF#XXyR>#(l{25#j!`Dh%{4 zM6!fCJM9uYJEMu3iGKT21E_spld)b!f7~7~GEII(pn7@uK~ps$?7en@<2OuAe|a1N zPmn_|Pnh7Ks}tec0rpK~O1!U3NQPey6T9&3o)K+APcf7zX@rz>l%{xNbcToYpf?m`DMX$*Ac(4c6<+(>j1peNh$vl8tX6!h=lZupA2K)gR&Q zsfw>U_C17q>J2m(DmG{ zsXw&|#(wk;9GdFg$^m9B^HG{duiWhB=_GgV&`%Y86&jRZ#@q&2xXV^SUTw+i-a>|&0~@Ikh(dCaN0}BHPa05 zcS8cFsRgvb|BeL|**~?f{pMn_t#LZI#pAdVC`pY{w5A#r%QhNvBIwf;0Tw`)mib2 z&B?Ni-I_^V4V|w3e;_4`Zu~-@%I7Q#mU<-xlJe&P9*3?Tf%*vE0c0hlSW^Ze6u*0$ z3Y*SB?z{Pp#^-3{P3`&bl%|~ALVhZte>N;dW+N&GVR`Z>;k)^D7yBSjS2g9bd0yH( zFsgymW{ziklN^?M0|L7$0f@PbbHa3$Y13)TQN!n-T(du5N*iF6u7zW~uoNGbv7`H^ zsxJR=ZC#1tw;Euob1Jei(-Du1eXN^~b9d?#Vv!vz{C_5~_eJsV@pyu)at@Q6fKHaR zr8(k1%nBEtU@C9gYaFO)JSzCC1mW$WlTVLuBV??p$A!GF4q?aq`@bPW&} zXSk+~2|RZy`igBATbZf7b!n5vzO)t0%{4e$11+!ip!ZRq9F9hVLk^RAIrSb}5Xhzf zshL_2+CcJ|%OXhM=ygrdWppQYcS`8*#s~#@<1=6P|4ij&|9aX~{cAsnSeJx&nLfkI zF#6S@q!pnj6T&NiLa;N$FF)`W&TuC=tfq!vN0O~YF=^KiSF4u?Li*Mqg6GDT3(f8# zS31=HJ25%Zom6~75vLM()E_5)+D#yzs9H`1GRVK9XVc!N^QN$)9FTp$`STqV^R#~s za9pb~Iqn(|4eH|)-U(O);k6xlx8C&c^}mGMADs#Y;8j?E(+u(_#yqx5);ka8!})j0 z->3BO_}+NI;*TuS1js$c7$`#_I#Eh_kQ$(Pu>3Bwk*)a#jTx)!KRlQ;?7mB}fJhR7 zQj9mE$h{a!pH4yy{rp@>TSj^jH+F1l3iXkd{vGSJiC^(Uyr;drbGhHFvLx-r2{aQkEW_;J+cp-Urx&mIw)l`| zb%=ElPqW(WlPw-f(}G$+m$6dElLQH2AbDDh7rrng@U>7xd2uuG4hRwKEeI_jHRbi! zthGv#%6|7FaY@r0|1&HXj%?TzU_Uo^j@B31l~@PjpHq?F>Izl0e3CBXu4mo>7t6;R zb#ns^uhL;fcKpDolw8yITjOE41Y0_K1bZC+V{%+H0WFgJ58f2P*@QA*}WffD@~ zn+iur;<*hffK%yNdUa2@jt(^`gdtX^8u^# zBMU-YZ;Lg*dpI8iu-Des=sGa@-8 zcdgzfx}EZw`AE5YK@~=Q$?qs@Z5J0nJK?3$fD{3nYO%UOvS!%#08Nl~twqdhLn7sM+(1hcP6y+*z>ecybtdtm( z2D`ws5HG<=8I@M;1BtIFGMPwD_T>! z`qo=X*6>S`zfYK%;nevBeQ<~$Ek4Gg4+)hra`DNb6vtS^M5HI9nRXTg)m=6Vk z1A4R7=1OfzN8Eb1+5Qf9Dx9cTX1F z|K}}G#-C>EMB6YZb1}fyQvvlkpv+YPXYLw_Mq$Bm$QgW$noY!YSE57QVnaiI5gyVE z3UuLB;jV?4*cj^SyNpB_JP*U2wk`voYnsm?==3=E|GVN>^S4w` zGi!K2!m2N9L;U)vP%4&A0_yN1Sl9_;7%ALl#()<@7XKJJKfgGqLjrdgnvTGPZSLK2 zxUek+6Sn!zLtnwVZ2)2WONxs+T-eSAK0%vyB@P$1oxsD09RCZrussU2>==m86S%P5 z2p%?aDdOS6wmHzUrRaq|!G&!d@ZdCtGXNL1Ie@U89h>nDE^IRcVY|^hWDR!WrIUsG zOJCoPtLaSxi5Mo|s+Q^Y8$R3oA;0<{xQ$A7Bepz~p+H?m5OdmhT%{701k_UdnmPLm6aaNx_he8B>KPJMwaU5HX^ z+>f8a=UfQj%zYwLV4MwbO#po|swy$C|-3o@~7 zt0;2mSwA4%Qdv3LZ1$Xp>@voP=u1~SoKt;ztne0TqELl#^6dz}{(^ZEkmrFu z`WyEEW>f^E2h^awcEMv?V<=s~8Wj9&Udb4}2Bxe8(tJ;3xCHe)>jN0F^bdaS$3nTH_v?aQkmbaSv7IbYzQvO4GI^lR<^|p7`)t6ZS^bRhCM!am^7Z)XT1wA`04*##d{X!Wul$u`dG{}nrm%beVH<&||1hPPjuO&v zyBaH>yfFQ7EbKh!!lOw11aQ{co^ax(av_jRH-Ri?-bLp|jp0C6wyXOHawI<&%}1|t zRNA=3;0cPi)_Zde;B)vZnrf#iy3cMJ8uQtV@ZXd^*X^35@Ht!B<2MPak0fHg0iVHq z@X$cqPq=oo1yJ)TplcENC(?2s46w90g*#+`ip`#*`ogc3 ztz|7kQ3D9?Ud@Z1+5PT!ff>%!hGsatTE&x2h8 zV3ZyB{#{$4QjSwbr>O(=QT=5#sO6lW|B310PomgLS8*+C#h9!#k#P-M&a%;Ut~=fs zdD^R0V#-Unw*V-AyOS4~qXSBgQ2J2Wa;B;nsPIw5f_no^p0$9kqBMb<4xT`E?jO~f+(5Bi6dfTZbpd(Rl-jrPARg}vCs--P^YKkif^Mab>-_li z(|3(N2|6xP$@1)xO@}R`>gT$fB`S}v0%pEfU1VA*i0gSBNGRzJH{6~N`D%MeCB~^5 zX0N~2Qv~=sWPP~Wzvt;QBy`)n^4To*upzwxNapxMnZ>}?IEBR2qlQyRAf)mdD>7t_>Wo1b#15&I(a6_+}IOW$^SgHqC=I021^;{0(H~ zJ`m)ZW+%D?3_1fN8fi?{SE7Y%T<7dVs-$pdKqmgHbtw1Gu`ufH$9Xkv`=HB>{JpQ8 z;#Wu113BS!{F`mJ%6LWZO7}Qfbhlg-Ps>JSUqOFf0LW})tS+-r9g;y)$&^juD$!rg zVI>R!_auJ6v@rTFh4tF*YjKeBwXy(3bH;akYA9}e%%Phltfj3N7R224FvXnWjf(QB za=F0ioTH7_!T7at^q`VR*)^cee7D*+q5DAmNmVEkK0ZBlX}!7Fwv1FMlo^OdlTmiM zJy_}Ef1pAut`pp-%Q(Ct@BYSJqfLa~f2``M&4p7;XB?9Um&%CeMplU7!Dh_tRhEzHo8mwM0&Z=x4LEQfWna+OAKgxV=8x-g433Yaho@Ablm+38HoB(m) zQI!s%%9^hVwQ}%=`{m{0?cQN)DR!gNIjx(Gwe1)ZqXMQj2w75Mhc&Y9f)^WKOX+}d z`x+dNAOCE-T4O1lfGO+rExKs5&k939$@!4)cuYpWMhni=q&u}@%3*|Q8g8aiI@R19*(>l`oANyuM}lSdjh7Z$ z2WpnvKuB~jkkVKFswyLoTiksHA(X7h0@; zwfpatYbtr1g#f__R=nlUjZX>`#JsR#w2homNi62bBA<9G= zM^jTNzd4BZjhGiJ>3WaD_ieYRQ-LC(`$*OD_5GWZy0(UiK%|kW;=sSap(E#?)@ON@ z0~l@+gIxnzeyrNSgOS}WF)1T{ak9J3AP`p9+Mf^_Tb>R$5c91JUfhiZ=XXd=Ikc1i zPy4+|%q<|w+A-~YjpF-$j!nYa9`seUM3c<}NBQM&(_4>p=o3X+6Cgb~2|U2(^*-X# z@%d!-4P~sK;@e8bVH&audwnd_D4Z1^6ne%$^1kHJ zc(C$zDWo0hT@5byH2ug&v>cb^G^cqM^}Ts(>j0v|f?uHwVG?$}cF#jo4-%$>EPn~m z<$Pu0vwPXeJb&y_f8{-HosGnFh7cNp`HGkD1^$~`zpX@`e6Bsq{mtc)0Hx)e%ltow z5ZvlU?4FUl5KO7-%^QYSQ1ARwdh4QXN%Q<&QT`rV5W=ESig=1D39RIhnZ_8?+TRs)kgax^q6ox8C6$}~t}%<0`Q;S7Uw4be%Gno5z7xMygHV$ zC48Z=w%+t7_?vT1=RL0b+jBE6=<5D&g@Y<6k21&J|4yT%BTW3x>XF~9lxsPb8@VWV z!PwCVVxe{xQ`SgVj2jEa+u==vG8?iQ%GFGnAD=@fQL&T=cPuC*Q&qH-!iD>ycz-9V zKPI@(Utbc!u;HW^c}(l*Vdj0?c6#c4;&ZUAla<{O zp78o2mHhg`oZndJw(^gCR9I2E;y%c*dXYOvQ`gDXBkzu$FO&apwK&hmgL=m_P^+)MMj6S{MWC6qC#%X6MJF@bG-^&Sbs!ZtK2ui-T<48`)p zgfm$*($JRWoC<+B-V3GX*aoL_i2zEX5I@4_v>f?`qS6H10VRYckaLxF8axm5@t?o3 z2n4i4aowE_j91ijb@u|f+#)eOgvv`aQz_#YZ*NWqQJv4tWo2<&EGmN>3MC3H4}sVb zh4Ngt@C7m>+RGuDM|`J1HL*jIa_Z zrN*q{oKw9O$z~SGz*X*2?I;a+^33oCvRQu?!0*to%QwkXrwMocadw~kvmWi-cd^#-GMSovtLm}?h#O=N!}%-PZ;dk=D^x*th6RcuP|KZ3so!+ekgRfm6GP?>geiyXO(9wl7Y%y@{@#LIyHle8ta_W zD4CB#@(Km$Uw4=~M0%rOg?0bEYSnaQ5LY(aPET&mLNwZU+V|XRpq~&}!g|DFchl_U zJ08uFqB8uvbUC*k%@p;W2kvcKN`9GBX@VTVo|HUdV2iRrI|y>a8!$S3Z5VYM+zFz*Fe; z>~>4O4~ie7;#hkZ&ar8jzFCxv@ z+Wo^+D0?W=dP3Kv>%t&!mRopOc9^>}x{6an#%}+;uh8zoRF9ly#^GifJ6LJ~-RKCIe{0@2RhVRY2qcHi$X&0BcysLPZ>q57i zy@AU76Gyf}?liNW1wHws=E*iC2ho6@EXcj9KU)shkrAJddqe4NtnHePDI6M}(U`g` zz|N}|l#Mxld)apD_+s4o`Q_UNCvE&OEq9ZR;Vekz^$Sky8#GU(xAR4KeVklHs^xUK z`JU3tIZn#1C8>18=CabUm{6H4jEAi%sr%P)YS6V@dj$dh@0VR6xY3UsKTE#4J{o(8 z7^_~eO!N?aT1Cf4G1a28fHPaD=Ce0()=q4``vZup-gK$%{T{_KNy+M?``f%~C@(82 zvsZwdjrP!Q3>mhHkV(v_qQ;OIYyG;^&}wkG%+JZQ^yW5h+$ikLMH`zGB^XkZdCkN* zZfH5WDd=-yn_FvY6x~bj&BS@YhdpC?=>N_shv25$l6`vep}pKt{09ba70H6kpWQht zF^LO>R{6&{UTOs7>=hcD&-~?x-mKB~=%LtTr7=WV%$r>Ppso7aconmA#Y&-cYMr}D z6?_#FrSnc+x>4cJP?#U(f;MILui~y^o3q7O0<_MtpsYR2#kBYxZNdOfCf&xeJ*ADk zetj>m1g$@bn9pn2#&>g>2a@s1eqC3mSzqMBrhvbhyqZXoVSG8hcA0Ek9Hv!D*w*bv zGr$tM9_TETa)c}9Bh~lmWw}$}9~LPji^oMpYC5`{2YU%244)2+L~ckx#X|TU@`mV- z2m;eMYDDL(e4;Q=qv(_Z*WzKf$wh@T)t7TN&l}Ym+qBg>(GjI({e&a&^zRqHF2{d{ z%toK7g3sYR%P;qJQkp*bL4n4{1(czKzOx|V=LDHp6`z$d>O*4ubot`)=YiP&d-4xf zP8JD@zb2h9u^|&ZLS2Y3GjcUq*urBdzp96+^sI*l_r?)(G?Dql*0!dO_`bKf%6(@E zi#Xqw>iIfbJ?>EPaB|C@2Xfp(;7Zb5o_lq7QX}^@R(VJHbg(c9`fw0QuyQ*py0OSF zaPKs_Mcupm!5f|m#e}a!VG{u@KIc!{kmL3Eq!^RTjvp{3))p_5Gu?%e)DaPzeLdGLbi3+BA6OrLVb7mt^#eEl^B_{@19--h{Vnpu==stp8h>PXZy)979lV34kgmTj0-xCn?tM+aS!8V_Dijw`b){Q8+u~irDL3dC#9u((h$CUt+#^!5+Rs zLT0xN0eisWr?GXRqy9(dmX8g|k)=VcSrxNDmVEm@Vo83fZL+zxGy(5Xg?wblW{|0z z@1$(!v$A+yQ~a $meta -#> numFound start maxScore -#> 1 296 0 0.4991457 +#> numFound start maxScore +#> 1 300 0 NA #> #> $data #> id @@ -63,15 +63,15 @@ searchplos(q="*:*", fl='id', fq='doc_type:full', start=0, limit=5) ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 142126 0 NA #> #> $data #> id -#> 1 10.1371/journal.pone.0057487 -#> 2 10.1371/journal.ppat.0030138 -#> 3 10.1371/journal.pone.0071347 -#> 4 10.1371/journal.pone.0043700 -#> 5 10.1371/journal.pone.0015651 +#> 1 10.1371/journal.pbio.1000156 +#> 2 10.1371/journal.pbio.1000106 +#> 3 10.1371/journal.pmed.1001197 +#> 4 10.1371/journal.pbio.0040294 +#> 5 10.1371/journal.pone.0093878 ``` Get DOIs for only PLoS One articles @@ -84,15 +84,15 @@ searchplos(q="*:*", fl='id', fq='cross_published_journal_key:PLoSONE', start=0, ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 1013893 0 NA #> #> $data -#> id -#> 1 10.1371/journal.pone.0098523/introduction -#> 2 10.1371/journal.pone.0015652/introduction -#> 3 10.1371/journal.pone.0015652/results_and_discussion -#> 4 10.1371/journal.pone.0015652/materials_and_methods -#> 5 10.1371/journal.pone.0098523/results_and_discussion +#> id +#> 1 10.1371/journal.pone.0094673/body +#> 2 10.1371/journal.pone.0093878 +#> 3 10.1371/journal.pone.0093878/title +#> 4 10.1371/journal.pone.0093878/abstract +#> 5 10.1371/journal.pone.0093878/references ``` Get DOIs for full article in PLoS One @@ -107,15 +107,15 @@ searchplos(q="*:*", fl='id', ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 118989 0 NA #> #> $data #> id -#> 1 10.1371/journal.pone.0057487 -#> 2 10.1371/journal.pone.0071347 -#> 3 10.1371/journal.pone.0043700 -#> 4 10.1371/journal.pone.0015651 -#> 5 10.1371/journal.pone.0029650 +#> 1 10.1371/journal.pone.0093878 +#> 2 10.1371/journal.pone.0094012 +#> 3 10.1371/journal.pone.0094113 +#> 4 10.1371/journal.pone.0094154 +#> 5 10.1371/journal.pone.0094152 ``` Search for many terms @@ -129,8 +129,8 @@ lapply(q, function(x) searchplos(x, limit=2)) ``` #> [[1]] #> [[1]]$meta -#> numFound start maxScore -#> 1 24708 0 0.9781508 +#> numFound start maxScore +#> 1 24936 0 NA #> #> [[1]]$data #> id @@ -140,8 +140,8 @@ lapply(q, function(x) searchplos(x, limit=2)) #> #> [[2]] #> [[2]]$meta -#> numFound start maxScore -#> 1 41781 0 0.8152939 +#> numFound start maxScore +#> 1 42116 0 NA #> #> [[2]]$data #> id @@ -151,8 +151,8 @@ lapply(q, function(x) searchplos(x, limit=2)) #> #> [[3]] #> [[3]]$meta -#> numFound start maxScore -#> 1 120601 0 0.6816086 +#> numFound start maxScore +#> 1 121700 0 NA #> #> [[3]]$data #> id @@ -180,7 +180,7 @@ plosauthor(q = "Eisen", fl = "author", limit = 5) ``` #> $meta #> numFound start maxScore -#> 1 741 0 4.189553 +#> 1 741 0 NA #> #> $data #> author @@ -201,21 +201,21 @@ plosabstract(q = 'drosophila', fl='id,title', limit = 5) ``` #> $meta #> numFound start maxScore -#> 1 2491 0 2.239879 +#> 1 2498 0 NA #> #> $data #> id #> 1 10.1371/journal.pbio.0040198 #> 2 10.1371/journal.pbio.0030246 #> 3 10.1371/journal.pone.0012421 -#> 4 10.1371/journal.pone.0002817 -#> 5 10.1371/journal.pbio.0030389 -#> title -#> 1 All for All -#> 2 School Students as Drosophila Experimenters -#> 3 Host Range and Specificity of the Drosophila C Virus -#> 4 High-Resolution, In Vivo Magnetic Resonance Imaging of Drosophila at 18.8 Tesla -#> 5 New Environments Set the Stage for Changing Tastes in Mates +#> 4 10.1371/journal.pbio.0030389 +#> 5 10.1371/journal.pbio.1000342 +#> title +#> 1 All for All +#> 2 School Students as Drosophila Experimenters +#> 3 Host Range and Specificity of the Drosophila C Virus +#> 4 New Environments Set the Stage for Changing Tastes in Mates +#> 5 Variable Transcription Factor Binding: A Mechanism of Evolutionary Change ``` `plostitle` searches across titles, and in this case returns the title and journal of the matching papers @@ -228,20 +228,20 @@ plostitle(q='drosophila', fl='title,journal', limit=5) ``` #> $meta #> numFound start maxScore -#> 1 1599 0 3.805348 +#> 1 1603 0 NA #> #> $data #> journal -#> 1 PLoS ONE -#> 2 PLoS ONE -#> 3 PLoS Genetics +#> 1 PLoS Biology +#> 2 PLoS Genetics +#> 3 PLoS Biology #> 4 PLoS ONE #> 5 PLoS Computational Biology #> title -#> 1 A Tripartite Synapse Model in Drosophila -#> 2 Quantification of Food Intake in Drosophila -#> 3 Phenotypic Plasticity of the Drosophila Transcriptome -#> 4 A DNA Virus of Drosophila +#> 1 School Students as Drosophila Experimenters +#> 2 Phenotypic Plasticity of the Drosophila Transcriptome +#> 3 Identification of Drosophila MicroRNA Targets +#> 4 Quantification of Food Intake in Drosophila #> 5 Parametric Alignment of Drosophila Genomes ``` @@ -261,15 +261,15 @@ facetplos(q='*:*', facet.field='journal') #> $facet_fields #> $facet_fields$journal #> X1 X2 -#> 1 plos one 946507 -#> 2 plos genetics 41277 -#> 3 plos pathogens 35950 -#> 4 plos computational biology 30312 -#> 5 plos biology 26292 -#> 6 plos neglected tropical diseases 25694 -#> 7 plos medicine 18601 +#> 1 plos one 955046 +#> 2 plos genetics 41615 +#> 3 plos pathogens 36230 +#> 4 plos computational biology 30535 +#> 5 plos biology 26456 +#> 6 plos neglected tropical diseases 26120 +#> 7 plos medicine 18672 #> 8 plos clinical trials 521 -#> 9 plos collections 10 +#> 9 plos collections 15 #> 10 plos medicin 9 #> #> @@ -295,15 +295,15 @@ facetplos(q='*:*', facet.field='journal', facet.query='cell,bird') #> $facet_fields #> $facet_fields$journal #> X1 X2 -#> 1 plos one 946507 -#> 2 plos genetics 41277 -#> 3 plos pathogens 35950 -#> 4 plos computational biology 30312 -#> 5 plos biology 26292 -#> 6 plos neglected tropical diseases 25694 -#> 7 plos medicine 18601 +#> 1 plos one 955046 +#> 2 plos genetics 41615 +#> 3 plos pathogens 36230 +#> 4 plos computational biology 30535 +#> 5 plos biology 26456 +#> 6 plos neglected tropical diseases 26120 +#> 7 plos medicine 18672 #> 8 plos clinical trials 521 -#> 9 plos collections 10 +#> 9 plos collections 15 #> 10 plos medicin 9 #> #> @@ -332,12 +332,12 @@ facetplos(q='*:*', url=url, facet.date='publication_date', #> $facet_dates #> $facet_dates$publication_date #> date value -#> 1 2014-12-17T00:00:00Z 1712 -#> 2 2014-12-18T00:00:00Z 1569 -#> 3 2014-12-19T00:00:00Z 536 -#> 4 2014-12-20T00:00:00Z 0 -#> 5 2014-12-21T00:00:00Z 0 -#> 6 2014-12-22T00:00:00Z 0 +#> 1 2015-01-17T00:00:00Z 0 +#> 2 2015-01-18T00:00:00Z 0 +#> 3 2015-01-19T00:00:00Z 406 +#> 4 2015-01-20T00:00:00Z 930 +#> 5 2015-01-21T00:00:00Z 745 +#> 6 2015-01-22T00:00:00Z 221 #> #> #> $facet_ranges @@ -396,9 +396,9 @@ highplos(q='everything:"experiment"', fl='id,title', fq='doc_type:full', #> [1] " Selection of Transcriptomics Experiments Improves Guilt-by-Association Analyses Transcriptomics Experiment" #> #> -#> $`10.1371/journal.pone.0108803` -#> $`10.1371/journal.pone.0108803`$everything -#> [1] " PONE-D-14-40021 10.1371/journal.pone.0108803 Correction Correction: Partner Experiences" +#> $`10.1371/annotation/9b8741e2-0f5f-49f9-9eaa-1b0cb9b8d25f` +#> $`10.1371/annotation/9b8741e2-0f5f-49f9-9eaa-1b0cb9b8d25f`$everything +#> [1] " in the labels under the bars. The labels should read Experiment 3 / Experiment 4 instead of Experiment" ``` ### Search for terms and visualize results as a histogram OR as a plot through time @@ -415,11 +415,11 @@ out$table ``` #> No_Articles Term -#> 1 8274 monkey -#> 2 296 Helianthus -#> 3 809 sunflower -#> 4 91291 protein -#> 5 1014 whale +#> 1 8335 monkey +#> 2 300 Helianthus +#> 3 818 sunflower +#> 4 91971 protein +#> 5 1023 whale ``` @@ -438,7 +438,7 @@ plosword('Helianthus', callopts=list(verbose=TRUE)) ``` #> Number of articles with search term -#> 296 +#> 300 ``` ### Visualize terms diff --git a/vignettes/figure/plosword1plot-1.png b/vignettes/figure/plosword1plot-1.png index c513a54c6dcd69355f2826b69170c46e6d2ec3b0..46139bb2e6cb8412030b9ddfd1a013ba496a4c87 100644 GIT binary patch delta 13220 zcmch-Wmr{R+b%369fE+;D4i0L(zih)sfz~b5+oFaNeBo?NT&!Wu;^MK-5?+#-AGA; zbi+5+!uxxl_dWLB$Nshb<1v|IjWNeHt~k&08h(y3jztWZkdgd9GMcZ^Hd63MwKOi; zA%{ctpiO4xFHWJ8@=TS~rhVV_Kj^jJ8mTwFcdIhcv13E#-3vBmH`7U8Ii|>9O}3}b zQL8gYd%j%r5o-f*xn)p zW3Hj&+Gy z+diq##aJwle&SdMvt+LQRMln}r**t_0&=;!vvlC7H@e*Ohx- zQ=@f}43(I5DczxXG?M-hKQ||*1Ph^fOj0H(yU6%4}*R(hag732vdG>@o(7Si;2}1pT@5ilSw8q%gI0?5j9JB}GhIOUuj{QK-qZI-I{|ueCy> z&?-LW+0^psOf5wgk${07n|Cu)q}*w-^QPpYRE_lz2Y#vNR|cl*PBA@cH}f>6?kcT! z5D&pMlSCPe;0h*@^T3c#oXXAu_xjZEx$+KTf=Or;9*XUIHbrB1K*U2UVC22)u~l4i z7^tsiWbyX)7je8th_Zq@nRJ7CX(Kl3L00J+8ouM45f$qAzkq>X&Hac`5AWiyp;OGY zGzy}u{6zU0nqv2Ldej3BAFy~!ke?OG4iSmh&|?z`C9jMEnE$3 ztA`eF03@tLnJ6cgwgv;Og^rLO>@EEsm%)fpg+|E_W%WTYaM1RT59)yge6Vb?Nc?rw zX5e5TeC*f%c4yH4)z+kI)yK+ZqkakHVBUz%B?UL+}RJWzAb*WS21)O$>R{qxoCEc^@8e61@}PHa7bdf ze9WBsbZ>T6xAM#cZHh1sefK-p3v4j7?~&lS%lern+*^$YPhE1HhVY& zZK>Eyl;=xLg@)$C5S@dF>}`Qcz4IhND^h$N{RG80p3n_po8cdOl#iBLr7WRa8(ihe zFWH1<_htjxi6iNA1~}Jg21z=GVw4-EJrDIySF%!VE2dmS#tP)=Na0oknPb58)*J*5 zb;p@&CJ&(b4+6=lEbf?h*YQ6z!OAQ@CgDWpLO&vgs7rW7W?xL$RUn9H#V}QIyUSBs zNI$q)e&9@Fe96YRezO8kgE<@oAyZ0v(P;~ z*w7DAY_E1+F=-AYu7GP~C7R#OL6AFh>J&Iv=a@kYYxD$%-|vPKY>I849ZWdPhxwaj zJq)4X*_3G{46*xKhC%f8OUjvnF~{A7z*Rv!@j#INSbCLi({$Hv#LE1Ft0YKxlzSd8 z#tmnwrhd~vW(~})UY=-+-cJ(xAvT+nmE{NHHr4hLys({-(YR!D#@}mO=yUX_1NsN@ zm41%7J|8YsuAL7Xb6?A+#FjTT0Pa)E{j7+=RWC}6=^1IZklpyV*nsKn9hC`E$szuo z{X^p&e3Tc?vZ_&_X$Z@eY%|s7Ems-c^&26{kzO?d{%%pLz(~XKY zeL;jl`WL=Jv#!`mx4ON^QrI&m>y(wL!UO?}s>25Ny=7yn!W{v-oqfaR&zE$43#7_7 zaWn8e=-uG){vZ9!`?Mo9#t1|3O}*H#lZsyT-HLZ#aB?)eQKUqmwFW7uloCaW1_iZs z3U1#`=o*pYQ^Mr>_~huI`I*{{qMgO4d%pvn`f$Vp-(u$3mXZuGzu=hN8Tp!2kn|sM zqk?XB8v~yeFV7d1g4k|IH>5|yM)6Q4;sc3`0E_x6!kEEBv^u^nBdYj5x(1PJXPSf^+!#A3na+^U&5<$MhYGj;Qskn(}Tj^ zs#bJWeV*O{)r=icM2?!>1QUFz-pW0{&q5 z!MxC**0wX6z1UL-RVc2Z`!hvEc@O35jts+WxRF_~bP>e8YrR2V+3vVa;qxRRyGh53 zzhDSYnPG{i#q0cJtXp^nvenYkvggXv$Wkfa?Gc|Svl>`W58){R8ES0WV@u!C1DE*! z-}NB+K#cI@OFx9=&!!&HB^upIr>_z_-|uQ?snAjjn16sjbX|hvPsHCr1h zG~=%`5+RFv!?RL69#m16*GUouwwKh&T~pig_PjV=8m{$lvze+w+_#?`^%%*S`KlNf zz%S`;nawE-Dm@<6e^q)==x@3bDJKajr=;~CElm1nzr6p{6iTuyFOKEbt)h&VI$6F; z&1dqC*11o{o`9>nb~^y+ZfH0QN(>fg9+&5bc861L6_u}+#yeP3X#_r-wufz=7Xl+r z#&SI;74HG=gz}~c;7vuPy^<5Us1L?giLnwL6DGgpTx+Wt% zm<||Mnh|$_$tYJlzvOV*qc?!ywuzVbJDzkek6`GBP~$&&Sb@1t9GZ#YED-@2&&lpkcZB=fpJn%be3bJkV z#p)n>MR4VZ5yIfd>k)E9eCM-&-QSoYVwdZm+m~Iu^`qPslcbd4AOc50`J4J?x{k^q z*D!(CTcDjD&4=fM!rEa~^>4FSaT zo3T+)e-8CpLACvlOyTL*&9#&V01k{}5I-RKA1BV5`nJF4!LAaRZ)0v9ZdhNJ^0Eon z9uAK)^b+j}r~R7{(s00G!$L2XQlWB};pePhX;Z}AGV%GCX&<1r!(fOmiW^U{yD?Ew znAA}G_88i^ZyV2V7A$ePURn;4SK(|sDz73P2j|6uP|0ocRms7`KneG~d$mQAUll12 zv3|=(v5eIoPTPQ4DjNN;Sq<7G|9TDs(mMf^8ZvmZNX}{yXW(w7=Qi7jO>c{=dijW9 z7#3fo^k2&cfx*x{tS>yW%2^{Ev}CL*&W0AlBk?v=)EaT~HE(w3*45%(prD`CP&hfK z_OmRNlt{1r%FzqQwxTQ4nRYiKⅈY`zvBTO#Ebu3X(eC)2If?X1?bq$H9n!N4~fa zbn*7^IR$P?SXYYcxK%Oyr1ii}c;Tu>L+?IGx1kHUu0N}u3+7zUEA1(1CKCUFOdkW8 z%DH^LR2T!%C!bFN_)yL-W0VWPByKN%97eOET~06Z^0UpGsaL%cLZD2JzJ?W_n+E(X z4{0nB+g$&+ELp9vop)M^Po+u;KaobyWIrIJ5`2F;Ac{}PQ`Qm1s(T4toTsEp4yBKU zt$xz0dF}Y~+|RY-iZIQxL^$HFfA%BdKYw#LY8rmro#$oIow(Tc9f|G!3)+q7ADti0 zR2Pkx+fn0dn3}q8Dd`7#b$S(_A%R^r@89BRkA55fnTcSJ)a6^&2i0439_eutBZJV1 zL9Kfw&ts@5l37vd&ewv+-6qjSmh3qz16kGg$rneyIhr1RRDwb&V^Y0NI+Q8cGwbWK zybuJjl$sk3_2&mXlH){4xjKbnx6k8^N7p%HBwn(SuM8f_Cx3`J`7w7IL7#IwFr^t# zNv9ry+xYP?nMAwgl-S7C(c%oKw-}*fM&`UL8Ui_?2x#w+O6fRS$iwoO1~9A zx+(;@i)UZHUSUjcI3a`b_@*GAj-2 zFa2E)M@5&%KIL{jYuNK14CyMYJF#9jfCU*q@JXKPbMlZQld z!e3_k1VD31;GR6B}xLG^7`trRcNZpWjAS4C!Y_2-n^`NTkRy6X z^+b%0!OER46j7N2Hf=_kD(CZwl_KUpZXLQ<+~3$gzelSR@;IL-G%1u`YFatza(~3o zuIU}_aG{~p(g=vB^b-pz;+`v7w?mcrpY}( z?{&l&b4>2|-~)|db9rPkN3yY_@ekrfBQjSastlW<94!?~P*|)CO3k}%Q#}ug^|A(_ z(>kYa4yE6M(_adnD4#v~9lVkHTJ?Vi61nCn6a0Q@O^jIY@z(tDtvx@OkSY97!K?>w zQS^Djpb@0QekKrx!-_(^($8^T+`mpyrj~zKxuwtfRqeBy#_QDIC^Y`ixDftZE+7&% zL7!x-b&$?pr7Dg&4=AT7ul6e@n{Q?{P>x$R{jGHX7q~yY{cnY#^hs`O=)axoSPYU* z4=8|%o0?}RWOWT)^afkJw^agr?PN{2(8M>#;?vD)UVHY;f&r=vS{o5j4JJYS&!-K5tD+WNq#^#fZsg!H=08~;}z?WKw9}Nzk zNE}WMJo<2JHufDyb`0hf87Fzd5TQkxF6rUah($RH$cDvZ8pn5@XWQ+ro$OiP+#1~v zH#fA0`rHFV{(eU>?u$tX9Z6Pc-Ivog7w3REd#@AGSYp$>Y@pimBA+m7LMbn3IPay~ zxQpnav!D4?h4xLLKJ}gKt&|45hEw18*C<%X%IQ{rnlc5}7VF6X>dvf_YVNC`$nw0I$=O8u@`~lxvtx-loNpe`^Np1oUW|* zL-#Y5=l;_!i%)Ob%=0dKM$F>$f7kHTpE*suh=P>Y+o&D(vi>qI|dxvg315sQR+&!Aem#h#KBAGf+}CVu(#kx zl5j7q+;)X{_wPA=Pmpee8HwsP_@nlJ&4&iC4pHfOh!k}gY*J{Ld1qGMSg5xV7=U+R zTk4^sO7SAA+8=qE#c=g)u58^3`)%~zy9;72Icto@2;T5)GZ%K6k|wR_sAeEI5f91h zA(g4;H%(J-lzjX0BFp-~B7TDt3#XpK;_E9mtToL;95N4(vN(p!iEy6fL_+ZkM?h(b zqT#+wi{aEswpue{!_&(^(w(p`KS0%w0s}pyB^CaT5y#>N`U^>8JwDg zLRHcQm^+)YgF9*f>bodDaakYz>3*=jBI$lxFdN7M2kWK1iP~lD|B?h5hC+(bqwV>8 zU8ur-IO8$#pm(9ts0+8AdZ^r;uU%BN^NH00LxA+_2j*h{Trhk`1qBHTWnq8$CEDxam#Ceo4kcM>E^olPssIj4ox-hQhc5T&P)}=VM-FBQ?3>^pg zTrX}GK*4q5{~n4lSUWCkGB>1(}1BYdjJ?)RXxZ!-wvCq z+_ns)$#C&dh!k%n)CTJCO<_Hk~2ICr%Q=p2B%OeaWHx} z*GA;_U#yIajQD0^sWQ&O8vdwzrb~jBeSl^E{7bp<Fw)2~e{1~rwJ=CRQrl>2{=0U)d#@XLe?bHT4wdel0)qw?ERwIzvjlP()=mEIPJ$@i5}K?=3iKz70Y>S}e?J4)U>%@L zCDX6F2%0S>M(t(xPSNiuDSuB=p7RdnR7r`9!|JkMTg-8Kq?B`j7?@-{3JuOTDa7)| z2C%i(ecx%x>Uj=uc!ABt07B|<#E8LKSa+(_Oxd%dcPj0RD&iZ0x^7c0_;Xw6(Cifs zM#13B!>TaR-|=~OzNi*3Rb_p0?=15@mpomcuMzY*_~l0o1FBaFgVkH*(%Xn8Pk!P5 zCVUF6J>`6N6tlIvuj;BAb|otxA&)9iKYoiq4)G~b*kQA2dnyD;iIQ4H+&1+<7*p&k zp$}KSvKZi?3sTV!i(*wR$LFoN7j=V<5n|6uCZ!zwA|Iuvs4znuH846Vww7mVE#I9W z(BADtbI-`zCdCsl=gs7DyNN2p^MTR$wqHzPtJ=|BLsD!;GhU~5Tn{LhSE2p2k;A04 zlYF4P!evRcPZhAbAjX=0(db~elGArV631y`{!KlN!sd~SS#`#R3t~0($kbX?R+Zq!v-nOrw$s`_ zum)SwFs2gI$31Kqw9D3dum_I;WI;;% z*5F`_5mpL|TlV!dz7iloj`n|5R8C*CAvdT!=W2O-?so{8Q=?*_N%0rt>BwBN4RnGKj0U_;5EGb(v~lo&3EsAscAz0C2Bqc z`iYaQhB{hTn=GPWLA^UKD&CSg?8R2dO4ZwQ@<)A)Mlw{hlSHO64;wn;beiJnJ7w;! z)9l`H|t5)Ac#(0j$KQkoXt<3G^Qy3!+f^{WI!N)_F5=%`4Gz*r8_EB1-2 zLB}MenWZr*Drh$@=n|kXFGpz-MT>0>HH7@Ix;C3a?SqDKeZkfEpTfj@#FR)LGi z+Qb2xZ`waQR2PuLz-;IgQ)SIg$O1b!KYR@{T@h4C`*CAY(+aQp8GNR&x)JG zTvlJ~uWE4x1oxc%10=uqLO#JBPQ4)CgXC}C6~|iv{;wJo2cn$q6y!1z>Z)KOft(ZX zu9~C%`@4_B$_n(W$3ZzUq11Q&=(60`2ui-bafgaCY9p!A4-pL%JbIRYlXD-Hpye<1 zLWh~Uf`{d=w@qyNzsT=tMBkETc!zn^VC9nDkXDpXnvS`Cx>fJChg2mpMho=CbrIGv za2tq^%?N}l0`!twde(ks1lrYXw-ujjQrCJMsw`@8hS!7CiQqRFdz1rO5@QDHoV|f^ zE+tKjuZR*uB64#@&}=5Z6%WC8>pyAm!jNJQP4jTRZaZ#b!N9lYVut|Ce-Z!s>!L*2 z9wconVsU+Mczi=zA`P;~Ew>N|F@&yeOb`;iM{t=4Gbu!MaE^EFhv86@WqGYsRyFoCeUW%&XGz3quX2+^+ODJ3s-q16le$ zFD%%$&Dw%O7DR8scmC&SQ9A0&nIRshLP<>B$S=R zqe;~N2H=^_+eg>Hpld$aH?l?021G`mTcnsJx@5E1{%lpPQi3d(%jS;0kiEs3A^Tr;mg^n(cUpnHfJXCYRAD z&UKB*tK<&_w#aN9*@4C%LhRGZ9qd4B*_YYB|9}qbH!K=!)5`2oz9MI0AGYIOP^i5? ziC|06yQ$mCnCdbV44G)&Mo*FOIH2O}iEjK*GDAu&mzsqO^3Gh=LRyfJbw0OreH zL+kRV8oBDwjN$hAKRaOhKI2U&G|FJ_*?uPX!5rshwu-Q45u)7nwpo_*Nu!x-Q_coEA9gYImW-zOAIx+_I;#r#cxf#;UbfQ2Cq6 z11Ruz07Fu6Jq~ir&p&lHV7sWS%H}sEeO$n9u&@>;GKX`RQX)I~2%i!Hl)xV+_}(39 zhKaptr!H>0j8LIq=^v3v(9vR?Vb#M*05$XuYwJM^oLTB)1|ke(t~n;H5aoO>M1Yv< zx~2Gfk(_#(dQ=_IddoXll0@(+xnT^a+HV@Y-~3^{&QY(1n=WrY+1<+Av|- zwzPW^QGd1*0(#Lln>En+n&EJ@+t#xWL#@XkvXXknAi&-A<9CupUuCYyr2iUrL_!Ia z2R*eC<@<{I)jeWs-%iVH$NGkcf6Nm=peuNzp++gR;gG|DoZFQ6S2g8Zzoo&JDsf@>NqMH~o*0>=OvhtQO(% zD<`yWlYCZ^-GZB)hYF^P9?;hcZT~;`)||boekC$Dkn)1^8=0kxC8hZyu3r zov%y;20#9zxXUrXQ7UzDlp)Ro8OD+-=dsr_ebVhYPfQhAEaNgcGyuY={0m>mJsvZq z4N*|F${~Egbi*A)$OcHcN>%Rf=!80LojPA4TbEt&?niF{=RF9A&YFW_&a^N*SK(Qc zd@0p0p;_7L#aP|RX4pknEcZY-8ArXkKVEKA#1!enl&vjRajkp4D#SN}!jju=Z&t1G zROB~FnE#0XP{m}n6s0O@D4Q7VtM@jJ=Eb;d&Dh$BKq{Kesrj^T!+SkCFP@f|OY z?@lXo8!9JTQWEdA1auA)DS2J0vrl!bSm;*GJt06Xr^v^3gmag^`ni8rO5p!$H23u$ zc_8bj*G=}d``WDOIo}9q#RhT9&-RTp$Ac4khAoT={pC9^_NqNo{&DZ^U99mpGhZ&0d!6^yh#v`@^U)}r8km5VJu*A zn+syCdbQ8kU4OR7TQFSF#Z%2xYk#n-cYKC+CK z=bH`7gArK!BO8PTnYplJ{uMxImSC!4hQ!La!7!7RWV|XEbRv?S43!I{+`Qu>v6TF3 z(i4$?l#6fyu2EIQbT8*=?$<1IPQJRGPEP%_L0nQA2~A|P!p%#0+m$u%g0)d+b_(<( z?SOLZ7&w%uJ_~xP8Frw>>exQWAElNZPzU-~)qA95e1m>ZiQmf+iMC+t78xSYLDO>% z=8dOGuQ%ie?E{}QU8l3ArF;F$$KH@UAn_YhW(7>Zzl4nWr8p+Q(fLy=EK)mo*u6yOiw57QMoK|dCGO)-z%srR0`} z#O_0XqK^?<^sXxfI9c~=*Fy)d-K4xK zrhWC2`a_sa{vwQ4VIncPY(Z^i8E%QFF`gSxqHR}; zYBJs1KQhAAYG%)^*!W@^6dGO_US6D=$^?Dn&*R?D?1@u(<7COt~k$p)TN0{$@e~M$n2{4%M&Y^-6H4Mie4E<*etn4T__aU*Ppu{ z_Qm#P7cosM`rdTrSii5Fp)ErMRkbK3yteyeoP%8r!zQ&D8XmmUR}8KRNghPt2GCAw zr{RfB>6m(UB;)08T^?T4^-l8|B=bzWe}`vsi!*E1HE`Oxgfj=1w|Uh_P+8n?L*S9? zAO_DcnkF>f8%o6c&MLGp-;xZgdK{t4qUYaYM9?76*WF>U+3o8*&|6Hbr<%nCq-4Y1TkK11Ygbezb14kl>80ukI9M--5I+7rcVaD)%PZ^ z7KLw&U%W*mVM;aVI8NiAc(ng^Ub8k`j~v=n&z7qm{jwMdC5t9tX2olqkOkdE4{+3Id^lRz`Y` zYwFUDDrLI!j_yz3r;jk!ON3(-+nM=lW44$gsqi&UY}OsYZKMKDjv)!WH+oiCcwrp$ zo%JUJe28}o(a_8wZ6GO)munKBu9qYW&aJ6y@goP%EEShSGc#ctG2bCxDRyV%vOfmE= z|1yz@6&t38c0N>J@FQak0#@NrCmcLX&8mvIzNn?!4>1wyXZ^0XHeDU=Z)Qk|y2i0P z1L{@5{W+Txc)>trXA6k5)-3D_7U`qJ+V!VC{U4;K43{ju4Yt|8Xh4@~fppfFXG>C3 z@e$VTi5DBJ;V(RR5x4H&RUXK{f8p3K&sy0*5U1~&U=x&Gy_2007QEIofT1=wm&Ie@ z(W}%$JtC)0Jalz0z5abU^owS>I=wD0cx7D28_N9CTfU?0-DH!)HJF zE#6x`Pty?}@7;P1dp(;<>q~3G6;*DtnTKqrOx6bP27v42Qp!0Fa*~pA#~8=F(jp<_ zR1`DlIg8|xlz}LA3H#Z8mh(rnFic?Ar6OW%D#BszRl{y_nIQ$%wjA+w6p63vVEoo_ zIEAiK*69(nQlBvXDO7?gbq_JvvLU-3cR3XgGZOGG$$*)QCGQH;aqvWNA{&3F=M?=Qx^SPEQ;uW}Gj zzPz^(=e*9($-W}nD8-4+QB!&I%dfoVJo}@WC^GCOXuv;h6K^IZc3n>bGlbiqs&G?d zd9%al?b|rrKk;jO6*ioDlHJ<8aId6_I?00-Yz(vb=#u@1i`@XuW6{o{DeZHf{%Az2Kgy!<_m_GB|9FlbeJYEF14;|m4%18?bCt9IKP{Qy~;V^DZ;TEHG5H1ND9$H&N zuy2esV}vMLe&lEP#IzMvt+v?D4^O&%_jq21Nwx7}awLFhW0Fr=B%(3*`r-d@ssY{)HduP3^Ezr?<8MW2qlKW}IRQT2ZMv_I$8 zYVaV(rMp!%5MS&`gD6CYgYPEVd;LzZs8Zdv3=(j0IH5H1GcG0cxkvIDpN|0UO-Sb4daG*p&Xk8 z?pnbDdj%Kc)vpe<8JWEkmbY0vWv*fS6oK29O|f@IF?<9uFZQyeDq|zHpB!>(FWcb2 zem<1Vpv@t!UhUs2?wf!t>4Jk>^-N({6V%T ztc1BNOQ2zGgpb)z(npz$NUVmbKn69=K?Z6=>SnNmPTu3M^X`t%=9rgS6(`)S#zW!` z5N~6WVFq3?1hp*%W?h5o%`yxhFfD!j`Lv2~(b;j19C^5fa<^KrQYe^X2daF%QXb%{ z@n_jLf8NdYX7U<;oU39P#7cwN^aR|uH_b63!&E2fa}RQ&TI%<$=}0!*gS5Qhu@(w0 z4@MOfDTLY?NLYaU7q5~M+xtY$hL^!Xrcq%kW@WEWS9ya_EdjHaNt`si_@}cDi!en zesAJMLBhMI2Hds7OgEt$?6^R>Q1nemlK%V>Gfe8@^@wsde4~23Bt%#4>6Z5jMg|5p z5!YlW4lX()YlFHvqbkD>KWSx5!F&TUUQ!FeX7`KLhE$oKyPE_{L5 literal 14467 zcmdtJWmJ|=^fn4eBOypisf2=rbV!4e4cXy|Vk`G-{(jZ9ZndiaZ zyWaI*=fio|I_rEmA6Sc5D?434>dX} z_{;b+I&%bsdw?q6`QjuO4jgmiXpq-*@jGMlB;&iS|#HI$@c!)J-WKb86NuDc5Ek8le2sU@!@N|EX>9O`gpe2UIU zjOSNoaej`PpW=3M}4SF-trT4gFfg5dR`_|D}wIJ^vO}eO+nt(Uufw|x3 z0{&85>V??_^ zdD{B>jFiro@Svqvn>NyoMffl&*)zNIyq}wBTWOzqA++A&ET}-C)$HeIx_WB|_d&tJ z;8e>-?l6J(#19q=$3#D^KNXI9=UA-w!E-yZVz`ZUk4g5orVr8fSK7Tdc8g=Z10Ou` zd^cvckcTwXbKmK%-2^d4>ESryO)ym{uL_2Ww`BGT?@i|Q)-&<`T6yfC#iqj^^-%OC z#t60QL&K-PHew}#sgIIV1{{S}1#1|xhM=W|@g^-4;$9?Cv>ciGUHA9+)XNds@;`>$ zZ>6wPRJwOh_Ok-??PrqEJOdn)UH3J=F8l68?BdBJ&e!HcOAqz}$y1yNf_D1Wsh`J) z87D^g$u7{?e(ItLAAR6pH&#m?K4dsQee_q5W0-M;;{A_?^w)Y1_lrG8hs%7APKhip zKc$*8X1JlXci~hg-aEJ`W4-=$e3%OrcgWk8v*rHn=?p*st&>fD;$m{3#OTgJyvDtO8QH19!B2;D?N zn0TtJZ^SG|Wr8IQW}!G$8a6MxQxgftsKY&b9@tBgo7Tr=)T22+tzWN|O}k0NG>afC zbEHn><0|^$@p#x>*xO^qlz2CPH`P9Jx{+mH>GR|ohfiU?cKK0qri#BFG=CRSd5(w|G`OEkJKg(biJN&@BRLV`x?GiksLhkfJs0$6 zP@cvI@sGvj>4C2fX>*DVXA170)~z#S{gst>e>2wJIj+bYwV~SeUlD5{*t_A^ECnMV za6qKQMU>qTchfNHRmX1neEZB@p2WR={-vKJDNZuxz@=#;EU=zUcarl)hnbm~Ey(iQ z5jEQye$2G<&n{YgDT()4pGDK8&rfyMOHcPscfE)B(@%H27lu629T!?oXFPWoFN$j> zUFAG?EA=LMxSK}L zNDzsvc`bZu)NIIj<=a8mGK9D^x#_jXAHM66N$M|UO{^NZtwjUtmkx`%rI!LM&z-UDfaN=rnAK6>>o5n)H%C~) zhCeI;rwn4(DaV9cZ4~UvC_?9*wL7JN2~8XI3E?Kpe(dL$gBZvSe+Y~P8$0OK!2ma! zq!) zx2-OoFERS<-5wnwhcW1DS=Yqrcps13D^R+xK1ktp%(ZSgp4dA}<#n{G`pH%G>FJx^ zv~}0s$Va9rHjM??q-@mTVv+Z# z6>Z=+PV?_K8+8R^S6v)$^S{L}kD}o39XwbcaO{tv<#OIq-d=2L`>W>WeR)#TA4@+w znj`b~1lRSg0R?=$$QTc6P>7lj!U!3ycBU$7hXgO{?O*J3yY6X^xg~18)$_fsao(Go zM!ip>zr}oYbGbinUZPcZlGjvG0oul)HTehZ4cgZ!9On2~uFKt_5WH*uQk|y8_>4u| zv9f*XI}*hNNJ_mAK#yf#=b_c-2KO?v+RYYme}PWK{qIk19paUOy!5Rrju9~?mi^|9XT=%5H`8*+{o{)v1&hZM zT0`Fl28=?W_|WW6tb8U2a!wdU-aUq>A%>qI-WjZGB8Orsd<6k4#JSZ4l`n2@!6(bw zZW@ob#s@+_M+b{9N3ai;*ILgu5+y{rZbAEdBS?+L^5k8Es^#zdMylC5ixlDw^})V1 z?=s6&zuoP4u-s$c*ID`1ZJVX|gfN_dJWPV`*t_#HT0gGJ=0g`8LPEj_W3(s*4Ocqu$6pBbQs4HJ2~Lw@+6 zTr(vok@>L_MnYSu`B<(G`=)K{jnut0>N}$Z3ztOr2hp97Ai?qO6DJ~f(S}*sSz9Dtk!9n!{s(&hqtfBLShUs+1?UgC< zSP&L*vLJKA-$8z@*;?z}04(MYsEEaZaO{`F|EAH-+;a4`X{)ekjyQ(!uMBfTx3|Q3 z^%#WRTSViMrS;5^CQF~=KerjAswU^QNrhn$I1wv`=Nn(6XKH6{EGKnb(`J2-$JKVv z*E8x`PG%Ud9+u<5J>O7*ULX{$I%K=|z@9&?Vb9tUv&HCP68zFd{?0}t+3*W6m zgc}|28I6A`a&dF>+=Py+4h$Kq*1$P;Xwx08{ySq?rctC?GG~ADk62;KQLi(1`&?g4 zV{^~x12DIFQ7jgM1Lo5-4bWoe>hDlpgX8)Pu#lFSCk8HjI@G_=S6}E)>Ux$?*tH|N z{7y2}{QLXoZU-7wHLzMAoou4M#U~w?X%m-U{%8}=e?*dTVw!kujTfym;KKs*aJNV) zl=oq{YvpBNsK9v^L(mpmNGgieN+fqJK+~p*GMC+%q(;IuRBSS1Fq@iqCN0&GBC%UW zMn*BxM}%Y+7$M`Wh9d99DkSq-dEy)_y%JmHcWyWCobTE$czflz zJyDWkUB47OQEzXw|MTwn3TM7XU*!nx()togHf!6~Qe!sK+0uSB@`h@9s={dZ*Lz$S zBmJ9KK5!y{fD}acvC6OI_U5v7J>7HW>iq9+AOYmV^mwbc=jqL)s+P6MKs-}8h3UOJ z^C(Cn@nTJpnx-1??^egAIJ=#%CG=U5@z`a0pDl&dI&Hr7TnZvK?3=!0v*-_Fgds>L z+huJtp8GAPPv1mw2zAk#LEoiV|5p9=XFmkx`i{sUqCX4(J#!yfPRy$5dB=^So?CY4 zk;6SpIFk;2l|~<*UT&ct#MRyP3}4-WQtm~sv2@Qp-Z6)_JaFgs6PCmKCe?2IEly2$ zQ&T^=Ix8V*jne1LV0$btdbe@Aw01K$W#(lc`AXE^f19mf23Dh9rrWZUWSagGBT>`P z;p>}dt`gCRno(QTQb`c3?= zzXGg(;!C4Bhqs!}VtU3Wdy(7=cKbmBN5f(+`z@yzT~}~cj)06QO>K(kd3DgY3qYWX z!gcQDU?$)ZvlV@m+wsXBz#CSsru<>>0d_PDwxi=4z89PHvw&T_of)YxdeexfG}>|J zO^37}WBtruF1C7KHe!%7s+DRF1cL)VT{R?VIcr@vujxbnpBn`T_l|84*yiqumAFr} zc)E^Z4W#ioJLu`Bvzdg=J5TCN)LLsjdTA)WY_bFAv0$pAV5-~mO?53G@IacG8#lhx z?{xweG|f4wZM0q5WFrzmgZIyMp1^<+u^?PwY_mqXZ?!*melqEp^Y>P7FLbS5zaxN$ zA4)q7Cxe>DM&pGl6Io&**?Qik=C?dXckA^ZegO8~%L+O=W0IhAWmD6Z;d4;{;=i^1 zx*6f+fAr5O!{pQOX8l}0eFk|-q2AcdUhvg>INS~s05?hZI+SWU8kN}vn^h-d)4Dg(4`tT&p9>XCer z`EBB3tGhfeAHx{9%e=cLpLCnU4CHiu2pj*SpLv+~dsOV@8>hh-S{bV?Xu(9AukU)E ze2rP{*GBpTW*yCy8xj8Lf3%HnY86z!N^`yS$ua)rpIKBrP`#!(WSwKiiz;b z2mGtIE_V6XP+P#kcOM<-VST1r?KB?qm1EqJpW>yl+%U#`W`rnn|4*vppnYc*z$iM8 z25-5N{pqT_ZHFWJ7h1JHXx?slKwrGZ2#)`f3}S+olA=%KBkm~14=wpufF#;fO3Gb$ z@*mF@Yp{1aQm_^E1)Hz_8A)Oej|` z?R2+pG5LzX^l2fTT`#F=y=(UsGIonlt}|hte8!&UgGRxPtAKWV0*Pw6>-VQH$9&%e zaeL2H$up$6pg167)oGzu@uxjYJzHs!{*K#14AvDC6+iKbg z{W7V?PzU07pL<+Ff>s`90HKrSh_2uIP=+nwZI&RH+uYV!fpF2DEVopzm_;4=2D0Dcyb{a~_!e;cByf&UC6 zv2>DOS9hbDX-O#|J-L%}lZyC(%Uyl~MXtmzx0!F81|I(VNj6bz?wDn-elCQ7jlwgKQF>ta-D>P{|8~MVTtj3Yj`Avk~ zN~XV{laz?K_e$ZBRp+3Hkv`zYKQQDVNOV6fXQ~UZ$$5qy(jaA|p$^F^i9e)XKnXYV z{OHn^#%@AS#oF;h18s#Oa2b$PJba~#R_*VIWLHH-8vS0E_YK$ z#XIAqn;&K(v&Fd)b_wN4+CR7h!$@IOBYlw~DBq}fM4HP?|B>MVU5eGRrfi2JlrvxG zzfd=f>_Ak0y5KqF&1?e5vK?1}42yllH+g@S>XAUSI~oLN+0hp^oPXf0h3r6fPsX&k zwAY)``5~`HkHo*|#DVOvCwjC5 zNn-1qw6AhUV8A}cV@ZeBnz0-q1gnGeaDZD6vq zfLYAPD4^8Dw8J+P0SN=Sa!V9yDnBT2sy%D=HFD=q7j9j&(9IO&)q(gaGc4xL6_RNV z;r&}uzBv+UT|0m;+YoYx51tKfx7Vk2kHvzg{Lv`uCz|v)ty!1;;kr2W3egm<(A6*1 zNHy*y5i|;8kR)lyG(#glz=0G5p7+ANNGDB;*Ml~Vn{+AMw&@hkP{oN-9e(~_e)o1h zy`eOyHF)_p%<~Q+$^9cxWHZ=C+!9oOodJHdlN}4GOHRDhM-k}t>--8tuQ!j`W1j>HB)WgA@jfJ&1Vn{ ze=`jSv|i+|u@Aj6s+#ax-(C)9anViCb_jLeof$7}+T-(OxXarS`~zTAA|T#rW4Pny zFrjUVSkG%ou!_xTL*ew;B(2I~oPm2>S5Lk7Kej7Ey<&cpv>?m=;B>~4<#fGlgyHyN z=X(GOR1g`$oA&zbyzv~rJw86LF#XXyR>#(l{25#j!`Dh%{4 zM6!fCJM9uYJEMu3iGKT21E_spld)b!f7~7~GEII(pn7@uK~ps$?7en@<2OuAe|a1N zPmn_|Pnh7Ks}tec0rpK~O1!U3NQPey6T9&3o)K+APcf7zX@rz>l%{xNbcToYpf?m`DMX$*Ac(4c6<+(>j1peNh$vl8tX6!h=lZupA2K)gR&Q zsfw>U_C17q>J2m(DmG{ zsXw&|#(wk;9GdFg$^m9B^HG{duiWhB=_GgV&`%Y86&jRZ#@q&2xXV^SUTw+i-a>|&0~@Ikh(dCaN0}BHPa05 zcS8cFsRgvb|BeL|**~?f{pMn_t#LZI#pAdVC`pY{w5A#r%QhNvBIwf;0Tw`)mib2 z&B?Ni-I_^V4V|w3e;_4`Zu~-@%I7Q#mU<-xlJe&P9*3?Tf%*vE0c0hlSW^Ze6u*0$ z3Y*SB?z{Pp#^-3{P3`&bl%|~ALVhZte>N;dW+N&GVR`Z>;k)^D7yBSjS2g9bd0yH( zFsgymW{ziklN^?M0|L7$0f@PbbHa3$Y13)TQN!n-T(du5N*iF6u7zW~uoNGbv7`H^ zsxJR=ZC#1tw;Euob1Jei(-Du1eXN^~b9d?#Vv!vz{C_5~_eJsV@pyu)at@Q6fKHaR zr8(k1%nBEtU@C9gYaFO)JSzCC1mW$WlTVLuBV??p$A!GF4q?aq`@bPW&} zXSk+~2|RZy`igBATbZf7b!n5vzO)t0%{4e$11+!ip!ZRq9F9hVLk^RAIrSb}5Xhzf zshL_2+CcJ|%OXhM=ygrdWppQYcS`8*#s~#@<1=6P|4ij&|9aX~{cAsnSeJx&nLfkI zF#6S@q!pnj6T&NiLa;N$FF)`W&TuC=tfq!vN0O~YF=^KiSF4u?Li*Mqg6GDT3(f8# zS31=HJ25%Zom6~75vLM()E_5)+D#yzs9H`1GRVK9XVc!N^QN$)9FTp$`STqV^R#~s za9pb~Iqn(|4eH|)-U(O);k6xlx8C&c^}mGMADs#Y;8j?E(+u(_#yqx5);ka8!})j0 z->3BO_}+NI;*TuS1js$c7$`#_I#Eh_kQ$(Pu>3Bwk*)a#jTx)!KRlQ;?7mB}fJhR7 zQj9mE$h{a!pH4yy{rp@>TSj^jH+F1l3iXkd{vGSJiC^(Uyr;drbGhHFvLx-r2{aQkEW_;J+cp-Urx&mIw)l`| zb%=ElPqW(WlPw-f(}G$+m$6dElLQH2AbDDh7rrng@U>7xd2uuG4hRwKEeI_jHRbi! zthGv#%6|7FaY@r0|1&HXj%?TzU_Uo^j@B31l~@PjpHq?F>Izl0e3CBXu4mo>7t6;R zb#ns^uhL;fcKpDolw8yITjOE41Y0_K1bZC+V{%+H0WFgJ58f2P*@QA*}WffD@~ zn+iur;<*hffK%yNdUa2@jt(^`gdtX^8u^# zBMU-YZ;Lg*dpI8iu-Des=sGa@-8 zcdgzfx}EZw`AE5YK@~=Q$?qs@Z5J0nJK?3$fD{3nYO%UOvS!%#08Nl~twqdhLn7sM+(1hcP6y+*z>ecybtdtm( z2D`ws5HG<=8I@M;1BtIFGMPwD_T>! z`qo=X*6>S`zfYK%;nevBeQ<~$Ek4Gg4+)hra`DNb6vtS^M5HI9nRXTg)m=6Vk z1A4R7=1OfzN8Eb1+5Qf9Dx9cTX1F z|K}}G#-C>EMB6YZb1}fyQvvlkpv+YPXYLw_Mq$Bm$QgW$noY!YSE57QVnaiI5gyVE z3UuLB;jV?4*cj^SyNpB_JP*U2wk`voYnsm?==3=E|GVN>^S4w` zGi!K2!m2N9L;U)vP%4&A0_yN1Sl9_;7%ALl#()<@7XKJJKfgGqLjrdgnvTGPZSLK2 zxUek+6Sn!zLtnwVZ2)2WONxs+T-eSAK0%vyB@P$1oxsD09RCZrussU2>==m86S%P5 z2p%?aDdOS6wmHzUrRaq|!G&!d@ZdCtGXNL1Ie@U89h>nDE^IRcVY|^hWDR!WrIUsG zOJCoPtLaSxi5Mo|s+Q^Y8$R3oA;0<{xQ$A7Bepz~p+H?m5OdmhT%{701k_UdnmPLm6aaNx_he8B>KPJMwaU5HX^ z+>f8a=UfQj%zYwLV4MwbO#po|swy$C|-3o@~7 zt0;2mSwA4%Qdv3LZ1$Xp>@voP=u1~SoKt;ztne0TqELl#^6dz}{(^ZEkmrFu z`WyEEW>f^E2h^awcEMv?V<=s~8Wj9&Udb4}2Bxe8(tJ;3xCHe)>jN0F^bdaS$3nTH_v?aQkmbaSv7IbYzQvO4GI^lR<^|p7`)t6ZS^bRhCM!am^7Z)XT1wA`04*##d{X!Wul$u`dG{}nrm%beVH<&||1hPPjuO&v zyBaH>yfFQ7EbKh!!lOw11aQ{co^ax(av_jRH-Ri?-bLp|jp0C6wyXOHawI<&%}1|t zRNA=3;0cPi)_Zde;B)vZnrf#iy3cMJ8uQtV@ZXd^*X^35@Ht!B<2MPak0fHg0iVHq z@X$cqPq=oo1yJ)TplcENC(?2s46w90g*#+`ip`#*`ogc3 ztz|7kQ3D9?Ud@Z1+5PT!ff>%!hGsatTE&x2h8 zV3ZyB{#{$4QjSwbr>O(=QT=5#sO6lW|B310PomgLS8*+C#h9!#k#P-M&a%;Ut~=fs zdD^R0V#-Unw*V-AyOS4~qXSBgQ2J2Wa;B;nsPIw5f_no^p0$9kqBMb<4xT`E?jO~f+(5Bi6dfTZbpd(Rl-jrPARg}vCs--P^YKkif^Mab>-_li z(|3(N2|6xP$@1)xO@}R`>gT$fB`S}v0%pEfU1VA*i0gSBNGRzJH{6~N`D%MeCB~^5 zX0N~2Qv~=sWPP~Wzvt;QBy`)n^4To*upzwxNapxMnZ>}?IEBR2qlQyRAf)mdD>7t_>Wo1b#15&I(a6_+}IOW$^SgHqC=I021^;{0(H~ zJ`m)ZW+%D?3_1fN8fi?{SE7Y%T<7dVs-$pdKqmgHbtw1Gu`ufH$9Xkv`=HB>{JpQ8 z;#Wu113BS!{F`mJ%6LWZO7}Qfbhlg-Ps>JSUqOFf0LW})tS+-r9g;y)$&^juD$!rg zVI>R!_auJ6v@rTFh4tF*YjKeBwXy(3bH;akYA9}e%%Phltfj3N7R224FvXnWjf(QB za=F0ioTH7_!T7at^q`VR*)^cee7D*+q5DAmNmVEkK0ZBlX}!7Fwv1FMlo^OdlTmiM zJy_}Ef1pAut`pp-%Q(Ct@BYSJqfLa~f2``M&4p7;XB?9Um&%CeMplU7!Dh_tRhEzHo8mwM0&Z=x4LEQfWna+OAKgxV=8x-g433Yaho@Ablm+38HoB(m) zQI!s%%9^hVwQ}%=`{m{0?cQN)DR!gNIjx(Gwe1)ZqXMQj2w75Mhc&Y9f)^WKOX+}d z`x+dNAOCE-T4O1lfGO+rExKs5&k939$@!4)cuYpWMhni=q&u}@%3*|Q8g8aiI@R19*(>l`oANyuM}lSdjh7Z$ z2WpnvKuB~jkkVKFswyLoTiksHA(X7h0@; zwfpatYbtr1g#f__R=nlUjZX>`#JsR#w2homNi62bBA<9G= zM^jTNzd4BZjhGiJ>3WaD_ieYRQ-LC(`$*OD_5GWZy0(UiK%|kW;=sSap(E#?)@ON@ z0~l@+gIxnzeyrNSgOS}WF)1T{ak9J3AP`p9+Mf^_Tb>R$5c91JUfhiZ=XXd=Ikc1i zPy4+|%q<|w+A-~YjpF-$j!nYa9`seUM3c<}NBQM&(_4>p=o3X+6Cgb~2|U2(^*-X# z@%d!-4P~sK;@e8bVH&audwnd_D4Z1^6ne%$^1kHJ zc(C$zDWo0hT@5byH2ug&v>cb^G^cqM^}Ts(>j0v|f?uHwVG?$}cF#jo4-%$>EPn~m z<$Pu0vwPXeJb&y_f8{-HosGnFh7cNp`HGkD1^$~`zpX@`e6Bsq{mtc)0Hx)e%ltow z5ZvlU?4FUl5KO7-%^QYSQ1ARwdh4QXN%Q<&QT`rV5W=ESig=1D39RIhnZ_8?+TRs)kgax^q6ox8C6$}~t}%<0`Q;S7Uw4be%Gno5z7xMygHV$ zC48Z=w%+t7_?vT1=RL0b+jBE6=<5D&g@Y<6k21&J|4yT%BTW3x>XF~9lxsPb8@VWV z!PwCVVxe{xQ`SgVj2jEa+u==vG8?iQ%GFGnAD=@fQL&T=cPuC*Q&qH-!iD>ycz-9V zKPI@(Utbc!u;HW^c}(l*Vdj0?c6#c4;&ZUAla<{O zp78o2mHhg`oZndJw(^gCR9I2E;y%c*dXYOvQ`gDXBkzu$FO&apwK&hmgL=m_P^+)MMj6S{MWC6qC#%X6MJF@bG-^&Sbs!ZtK2ui-T<48`)p zgfm$*($JRWoC<+B-V3GX*aoL_i2zEX5I@4_v>f?`qS6H10VRYckaLxF8axm5@t?o3 z2n4i4aowE_j91ijb@u|f+#)eOgvv`aQz_#YZ*NWqQJv4tWo2<&EGmN>3MC3H4}sVb zh4Ngt@C7m>+RGuDM|`J1HL*jIa_Z zrN*q{oKw9O$z~SGz*X*2?I;a+^33oCvRQu?!0*to%QwkXrwMocadw~kvmWi-cd^#-GMSovtLm}?h#O=N!}%-PZ;dk=D^x*th6RcuP|KZ3so!+ekgRfm6GP?>geiyXO(9wl7Y%y@{@#LIyHle8ta_W zD4CB#@(Km$Uw4=~M0%rOg?0bEYSnaQ5LY(aPET&mLNwZU+V|XRpq~&}!g|DFchl_U zJ08uFqB8uvbUC*k%@p;W2kvcKN`9GBX@VTVo|HUdV2iRrI|y>a8!$S3Z5VYM+zFz*Fe; z>~>4O4~ie7;#hkZ&ar8jzFCxv@ z+Wo^+D0?W=dP3Kv>%t&!mRopOc9^>}x{6an#%}+;uh8zoRF9ly#^GifJ6LJ~-RKCIe{0@2RhVRY2qcHi$X&0BcysLPZ>q57i zy@AU76Gyf}?liNW1wHws=E*iC2ho6@EXcj9KU)shkrAJddqe4NtnHePDI6M}(U`g` zz|N}|l#Mxld)apD_+s4o`Q_UNCvE&OEq9ZR;Vekz^$Sky8#GU(xAR4KeVklHs^xUK z`JU3tIZn#1C8>18=CabUm{6H4jEAi%sr%P)YS6V@dj$dh@0VR6xY3UsKTE#4J{o(8 z7^_~eO!N?aT1Cf4G1a28fHPaD=Ce0()=q4``vZup-gK$%{T{_KNy+M?``f%~C@(82 zvsZwdjrP!Q3>mhHkV(v_qQ;OIYyG;^&}wkG%+JZQ^yW5h+$ikLMH`zGB^XkZdCkN* zZfH5WDd=-yn_FvY6x~bj&BS@YhdpC?=>N_shv25$l6`vep}pKt{09ba70H6kpWQht zF^LO>R{6&{UTOs7>=hcD&-~?x-mKB~=%LtTr7=WV%$r>Ppso7aconmA#Y&-cYMr}D z6?_#FrSnc+x>4cJP?#U(f;MILui~y^o3q7O0<_MtpsYR2#kBYxZNdOfCf&xeJ*ADk zetj>m1g$@bn9pn2#&>g>2a@s1eqC3mSzqMBrhvbhyqZXoVSG8hcA0Ek9Hv!D*w*bv zGr$tM9_TETa)c}9Bh~lmWw}$}9~LPji^oMpYC5`{2YU%244)2+L~ckx#X|TU@`mV- z2m;eMYDDL(e4;Q=qv(_Z*WzKf$wh@T)t7TN&l}Ym+qBg>(GjI({e&a&^zRqHF2{d{ z%toK7g3sYR%P;qJQkp*bL4n4{1(czKzOx|V=LDHp6`z$d>O*4ubot`)=YiP&d-4xf zP8JD@zb2h9u^|&ZLS2Y3GjcUq*urBdzp96+^sI*l_r?)(G?Dql*0!dO_`bKf%6(@E zi#Xqw>iIfbJ?>EPaB|C@2Xfp(;7Zb5o_lq7QX}^@R(VJHbg(c9`fw0QuyQ*py0OSF zaPKs_Mcupm!5f|m#e}a!VG{u@KIc!{kmL3Eq!^RTjvp{3))p_5Gu?%e)DaPzeLdGLbi3+BA6OrLVb7mt^#eEl^B_{@19--h{Vnpu==stp8h>PXZy)979lV34kgmTj0-xCn?tM+aS!8V_Dijw`b){Q8+u~irDL3dC#9u((h$CUt+#^!5+Rs zLT0xN0eisWr?GXRqy9(dmX8g|k)=VcSrxNDmVEm@Vo83fZL+zxGy(5Xg?wblW{|0z z@1$(!v$A+yQ~a $meta -#> numFound start maxScore -#> 1 296 0 0.4991457 +#> numFound start maxScore +#> 1 300 0 NA #> #> $data #> id @@ -63,15 +63,15 @@ searchplos(q="*:*", fl='id', fq='doc_type:full', start=0, limit=5) ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 142126 0 NA #> #> $data #> id -#> 1 10.1371/journal.pone.0057487 -#> 2 10.1371/journal.ppat.0030138 -#> 3 10.1371/journal.pone.0071347 -#> 4 10.1371/journal.pone.0043700 -#> 5 10.1371/journal.pone.0015651 +#> 1 10.1371/journal.pbio.1000156 +#> 2 10.1371/journal.pbio.1000106 +#> 3 10.1371/journal.pmed.1001197 +#> 4 10.1371/journal.pbio.0040294 +#> 5 10.1371/journal.pone.0093878 ``` Get DOIs for only PLoS One articles @@ -84,15 +84,15 @@ searchplos(q="*:*", fl='id', fq='cross_published_journal_key:PLoSONE', start=0, ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 1013893 0 NA #> #> $data -#> id -#> 1 10.1371/journal.pone.0098523/introduction -#> 2 10.1371/journal.pone.0015652/introduction -#> 3 10.1371/journal.pone.0015652/results_and_discussion -#> 4 10.1371/journal.pone.0015652/materials_and_methods -#> 5 10.1371/journal.pone.0098523/results_and_discussion +#> id +#> 1 10.1371/journal.pone.0094673/body +#> 2 10.1371/journal.pone.0093878 +#> 3 10.1371/journal.pone.0093878/title +#> 4 10.1371/journal.pone.0093878/abstract +#> 5 10.1371/journal.pone.0093878/references ``` Get DOIs for full article in PLoS One @@ -107,15 +107,15 @@ searchplos(q="*:*", fl='id', ``` #> $meta #> numFound start maxScore -#> 1 1188800 0 1 +#> 1 118989 0 NA #> #> $data #> id -#> 1 10.1371/journal.pone.0057487 -#> 2 10.1371/journal.pone.0071347 -#> 3 10.1371/journal.pone.0043700 -#> 4 10.1371/journal.pone.0015651 -#> 5 10.1371/journal.pone.0029650 +#> 1 10.1371/journal.pone.0093878 +#> 2 10.1371/journal.pone.0094012 +#> 3 10.1371/journal.pone.0094113 +#> 4 10.1371/journal.pone.0094154 +#> 5 10.1371/journal.pone.0094152 ``` Search for many terms @@ -129,8 +129,8 @@ lapply(q, function(x) searchplos(x, limit=2)) ``` #> [[1]] #> [[1]]$meta -#> numFound start maxScore -#> 1 24708 0 0.9781508 +#> numFound start maxScore +#> 1 24936 0 NA #> #> [[1]]$data #> id @@ -140,8 +140,8 @@ lapply(q, function(x) searchplos(x, limit=2)) #> #> [[2]] #> [[2]]$meta -#> numFound start maxScore -#> 1 41781 0 0.8152939 +#> numFound start maxScore +#> 1 42116 0 NA #> #> [[2]]$data #> id @@ -151,8 +151,8 @@ lapply(q, function(x) searchplos(x, limit=2)) #> #> [[3]] #> [[3]]$meta -#> numFound start maxScore -#> 1 120601 0 0.6816086 +#> numFound start maxScore +#> 1 121700 0 NA #> #> [[3]]$data #> id @@ -180,7 +180,7 @@ plosauthor(q = "Eisen", fl = "author", limit = 5) ``` #> $meta #> numFound start maxScore -#> 1 741 0 4.189553 +#> 1 741 0 NA #> #> $data #> author @@ -201,21 +201,21 @@ plosabstract(q = 'drosophila', fl='id,title', limit = 5) ``` #> $meta #> numFound start maxScore -#> 1 2491 0 2.239879 +#> 1 2498 0 NA #> #> $data #> id #> 1 10.1371/journal.pbio.0040198 #> 2 10.1371/journal.pbio.0030246 #> 3 10.1371/journal.pone.0012421 -#> 4 10.1371/journal.pone.0002817 -#> 5 10.1371/journal.pbio.0030389 -#> title -#> 1 All for All -#> 2 School Students as Drosophila Experimenters -#> 3 Host Range and Specificity of the Drosophila C Virus -#> 4 High-Resolution, In Vivo Magnetic Resonance Imaging of Drosophila at 18.8 Tesla -#> 5 New Environments Set the Stage for Changing Tastes in Mates +#> 4 10.1371/journal.pbio.0030389 +#> 5 10.1371/journal.pbio.1000342 +#> title +#> 1 All for All +#> 2 School Students as Drosophila Experimenters +#> 3 Host Range and Specificity of the Drosophila C Virus +#> 4 New Environments Set the Stage for Changing Tastes in Mates +#> 5 Variable Transcription Factor Binding: A Mechanism of Evolutionary Change ``` `plostitle` searches across titles, and in this case returns the title and journal of the matching papers @@ -228,20 +228,20 @@ plostitle(q='drosophila', fl='title,journal', limit=5) ``` #> $meta #> numFound start maxScore -#> 1 1599 0 3.805348 +#> 1 1603 0 NA #> #> $data #> journal -#> 1 PLoS ONE -#> 2 PLoS ONE -#> 3 PLoS Genetics +#> 1 PLoS Biology +#> 2 PLoS Genetics +#> 3 PLoS Biology #> 4 PLoS ONE #> 5 PLoS Computational Biology #> title -#> 1 A Tripartite Synapse Model in Drosophila -#> 2 Quantification of Food Intake in Drosophila -#> 3 Phenotypic Plasticity of the Drosophila Transcriptome -#> 4 A DNA Virus of Drosophila +#> 1 School Students as Drosophila Experimenters +#> 2 Phenotypic Plasticity of the Drosophila Transcriptome +#> 3 Identification of Drosophila MicroRNA Targets +#> 4 Quantification of Food Intake in Drosophila #> 5 Parametric Alignment of Drosophila Genomes ``` @@ -261,15 +261,15 @@ facetplos(q='*:*', facet.field='journal') #> $facet_fields #> $facet_fields$journal #> X1 X2 -#> 1 plos one 946507 -#> 2 plos genetics 41277 -#> 3 plos pathogens 35950 -#> 4 plos computational biology 30312 -#> 5 plos biology 26292 -#> 6 plos neglected tropical diseases 25694 -#> 7 plos medicine 18601 +#> 1 plos one 955046 +#> 2 plos genetics 41615 +#> 3 plos pathogens 36230 +#> 4 plos computational biology 30535 +#> 5 plos biology 26456 +#> 6 plos neglected tropical diseases 26120 +#> 7 plos medicine 18672 #> 8 plos clinical trials 521 -#> 9 plos collections 10 +#> 9 plos collections 15 #> 10 plos medicin 9 #> #> @@ -295,15 +295,15 @@ facetplos(q='*:*', facet.field='journal', facet.query='cell,bird') #> $facet_fields #> $facet_fields$journal #> X1 X2 -#> 1 plos one 946507 -#> 2 plos genetics 41277 -#> 3 plos pathogens 35950 -#> 4 plos computational biology 30312 -#> 5 plos biology 26292 -#> 6 plos neglected tropical diseases 25694 -#> 7 plos medicine 18601 +#> 1 plos one 955046 +#> 2 plos genetics 41615 +#> 3 plos pathogens 36230 +#> 4 plos computational biology 30535 +#> 5 plos biology 26456 +#> 6 plos neglected tropical diseases 26120 +#> 7 plos medicine 18672 #> 8 plos clinical trials 521 -#> 9 plos collections 10 +#> 9 plos collections 15 #> 10 plos medicin 9 #> #> @@ -332,12 +332,12 @@ facetplos(q='*:*', url=url, facet.date='publication_date', #> $facet_dates #> $facet_dates$publication_date #> date value -#> 1 2014-12-17T00:00:00Z 1712 -#> 2 2014-12-18T00:00:00Z 1569 -#> 3 2014-12-19T00:00:00Z 536 -#> 4 2014-12-20T00:00:00Z 0 -#> 5 2014-12-21T00:00:00Z 0 -#> 6 2014-12-22T00:00:00Z 0 +#> 1 2015-01-17T00:00:00Z 0 +#> 2 2015-01-18T00:00:00Z 0 +#> 3 2015-01-19T00:00:00Z 406 +#> 4 2015-01-20T00:00:00Z 930 +#> 5 2015-01-21T00:00:00Z 745 +#> 6 2015-01-22T00:00:00Z 221 #> #> #> $facet_ranges @@ -396,9 +396,9 @@ highplos(q='everything:"experiment"', fl='id,title', fq='doc_type:full', #> [1] " Selection of Transcriptomics Experiments Improves Guilt-by-Association Analyses Transcriptomics Experiment" #> #> -#> $`10.1371/journal.pone.0108803` -#> $`10.1371/journal.pone.0108803`$everything -#> [1] " PONE-D-14-40021 10.1371/journal.pone.0108803 Correction Correction: Partner Experiences" +#> $`10.1371/annotation/9b8741e2-0f5f-49f9-9eaa-1b0cb9b8d25f` +#> $`10.1371/annotation/9b8741e2-0f5f-49f9-9eaa-1b0cb9b8d25f`$everything +#> [1] " in the labels under the bars. The labels should read Experiment 3 / Experiment 4 instead of Experiment" ``` ### Search for terms and visualize results as a histogram OR as a plot through time @@ -415,11 +415,11 @@ out$table ``` #> No_Articles Term -#> 1 8274 monkey -#> 2 296 Helianthus -#> 3 809 sunflower -#> 4 91291 protein -#> 5 1014 whale +#> 1 8335 monkey +#> 2 300 Helianthus +#> 3 818 sunflower +#> 4 91971 protein +#> 5 1023 whale ``` @@ -438,7 +438,7 @@ plosword('Helianthus', callopts=list(verbose=TRUE)) ``` #> Number of articles with search term -#> 296 +#> 300 ``` ### Visualize terms