From 774928301f4dcb827956b7d570acfb9a3e1f0e9f Mon Sep 17 00:00:00 2001 From: teunbrand <49372158+teunbrand@users.noreply.github.com> Date: Tue, 4 Mar 2025 19:05:38 +0000 Subject: [PATCH] =?UTF-8?q?Deploying=20to=20gh-pages=20from=20@=20teunbran?= =?UTF-8?q?d/legendry@ff7ebec9f113e445de1c3e07df1b678543703166=20?= =?UTF-8?q?=F0=9F=9A=80?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- articles/keys.html | 4 ++-- news/index.html | 4 ++++ pkgdown.yml | 2 +- reference/gizmo_density.html | 5 +++-- reference/gizmo_histogram-2.png | Bin 60740 -> 60746 bytes reference/gizmo_histogram.html | 17 ++++++++++++++--- search.json | 2 +- 7 files changed, 25 insertions(+), 9 deletions(-) diff --git a/articles/keys.html b/articles/keys.html index 28af058..cbeccf0 100644 --- a/articles/keys.html +++ b/articles/keys.html @@ -190,8 +190,8 @@

Regular keys#> class(df) <- c("key_standard", "key_guide", class(df)) #> df #> } -#> <bytecode: 0x5613ad7c91b0> -#> <environment: 0x5613ad7c8148> +#> <bytecode: 0x56450abcb3d0> +#> <environment: 0x56450abce198>

We can preview what values they’d label by letting the key absorb a scale with known limits.

diff --git a/news/index.html b/news/index.html
index 25d996c..8a319e3 100644
--- a/news/index.html
+++ b/news/index.html
@@ -54,6 +54,10 @@ 
#45)
 
  • Better alignment of compose_stack(side.titles) (#48)
    • 
 
  • Fixed aesthetic standardisation in override.aes arguments (#60)
    • 
+
  • Improvements to density and histogram gizmos (#62):
+
    • The default key now depends on the scale type: continuous scales invoke key_sequence() and binned scales invoke key_bins().
      • 
+
    • When using a binned key in gizmo_histogram(), the default hist(breaks) argument is populated with the key’s breaks.
      • 
+
    •

    legendry 0.2.0

    CRAN release: 2024-12-14

    diff --git a/pkgdown.yml b/pkgdown.yml index deb768e..b4b68f1 100644 --- a/pkgdown.yml +++ b/pkgdown.yml @@ -6,7 +6,7 @@ articles: articles/guide_composition: guide_composition.html articles/keys: keys.html articles/tour: tour.html -last_built: 2025-02-19T21:51Z +last_built: 2025-03-04T19:04Z urls: reference: https://teunbrand.github.io/legendry/reference article: https://teunbrand.github.io/legendry/articles diff --git a/reference/gizmo_density.html b/reference/gizmo_density.html index 991d3ea..705038d 100644 --- a/reference/gizmo_density.html +++ b/reference/gizmo_density.html @@ -56,7 +56,7 @@

    Usage

    gizmo_density(
-  key = "sequence",
+  key = waiver(),
   density = NULL,
   density.args = list(),
   density.fun = stats::density,
@@ -75,7 +75,8 @@ 
    Argumentskey
 
    A sequence key or binned key
-specification.
    
+specification. Internally defaults to a sequence key when the scale is
+continuous and a binned key when the scale is binned.
    
 
 
 
    density
    
diff --git a/reference/gizmo_histogram-2.png b/reference/gizmo_histogram-2.png
index 87b6307c118c002ef2a71e48200af099888fd9fa..27cd190acf745f709ed0a576af2e1ea2d59b3f2b 100644
GIT binary patch
literal 60746
zcmeFYby!q=zc-2^pdz9-B~mISlG2UbC`e04r*sZ5^bjfvO3KhJAYIZmv@p`rF{H%M
z12e!d9$-y|R)AX9w#T$6x+
z$eVzG@Xd8%;0_`_a~Jp`ext1L9QXzMFF
zVTv>Ak%$EFn?Bdij4Sj~vM-+gMRDh8MgG@Tf~ysSty_jDHSs=oHKYskbJ%qM$HlZYiBcg`e!ongV
zGJ0ocr>eTzYID3KBC`FOv9a;`#)cAfYo=bHqoadN?Z@+`rl$4H&E8+XUS((VwLw{x
zHJ`+3mgrPk^~TG?&EJ=nmb!a-T4PrG@%_`%($;r&)c$fXpfISgR3s)Q<`)&6TzjnY
zYh)zGtv=PD#9GyXpMilPNd#mf>@+=!e>69jj>90?FI)5R{aSdgG77X_TwL78VnxJn
zQgE5TMB|iL6<4>C#}Np`+V#QfrT^`H|F4g(T2Q=IK(;_zsX*J_JzPpG`5~!#vMAGP
zo>)@Csb)9uXlVdY7U<
zMT8ePby@}nCwEG=MBs>^-*k#{T3TA#>=N^V<|QR1t2y0OH8r_SO;U=*cB-~>Fdtf4
z+U}n}Ujo#T_44vk%7G%2*{UF_o12>sz$mtMc8UrL3Q)a~tPPq
z(fWqm?ep1)W6j-x_d`QNxsSJ>#3}WxxCI9X-)H!Eqh|%3{@%;oUGN{g08qJiZ7m;_
z!X~hn;0zuy0-72a8UiD7#3?~;nm8C>rp}aWee8GuMuM2|I5;P(Lm-VlcKqAh+mM@c
z<>gN?BbE&f4gAv5&L+t!Ha5ugz`?P4jopFUpbESs6Z}8I^#6(YW5a6%uPCdhgJZj-
zlg4MF-JBjT<$R>&PD`sgl~=NJa+k!fCH);GjE|_gT-{PbIz_3VVKZ10DjB`ZPJ6%U
z(b)<%M_a7&-3`3Rdb3r$Af)e`oVQVwj!`N+k($xC-ZgSqxmBHTqEFmM{UKLJ17)X(NW4{Q6#$Ma
z_bbQ`a_)hN!*#btX(>AmZkObYrg6K~1Dn50df1_PEQ7
zg=5>pu}U}@<#aJo%nFOgJ~$
zAHK(P>oY(+3NmiZq?2WD-WD&7)eNY^1n;9bE+2k9#|zI1F)DSq&cME4ywJyNH(i_^
zzl^u+9Ny-CA>>8WL8p`ZU4-~OjASl+RIG|a1KNO%cD{v`5&VU&I_#Ho&+PM3E^frH~_7kL)^4u4<
z0)EbV{Fo0E4em1#B+pKT@%+?t;+jXCmz*(zIBSuwn_AMDC3FVd`0>rs*C}BxcXDFU
zS)DZ2ud!fsN7{TpaQ@c$;$LvwVQwn$&tevBq$9>j^J|It4w8hxodUOvbctlkMk0bQ!-KA>8pqOFFg*N
zL=%tc>2Dg$SXqEj#?cRUxBVdn0A>`V(b2G@PTm1!
zV4*>gEgOYJfJI6N)*_N%Iit)Ur&GSzOA#)fgi^#kmrjO_n+$BB)XDu+?
zzu!Y5z56cJccVb;Y=0!rJp(`s?25h+h*p92p~ULW0Pv#PdR%p1IsgbGBO|M7
zYw;*=E1(oWG?G#udA(8f$aEvfb~P?Y<|v5EsLrJaOUJ;V3RR@3{ru6n+Ca(-&q-|l
z%ryWHH8tDOl_XVsubu6@-rorm6mc*B^YixiCXWNS3|yHj#Euz;72EZ9;~(8uSI8ut
z1CS03DTV6RP+*9|49Wx=V4duy4hm3nAzp!9a5(l9QUR*cED&6$qRG+Zs5Wpiz-^dg
z|DL<0?>+p3T@O6sm%MV4(1dHYGf8(yPN=stS$gZc)$9+EK58RZJ0Z2kjy0=G?)|s|zjgaI+th1frnQY(%L%J}kr|hcD^Vao
zoCecdB1UIt(`ssJ9A_J<@nEs2$YD^~>g4#C?JS$HvJ5!0v$HeW`}geujHd@cZQ#TU
z$Lwnyr-s)=0g_m)_V2>rF#wsdj#n&!(^rn?>TYdqP0x_ByDcRp#gWhp2=RCo+sM#R
zv=3%ADS>U|A2@vKpmD#o^;riFhdl;1KliR9s0cGN2Q`2zVca8#V7b#F430CJW2t#D!nFHQ$>!wJo?
zwN2Yj5C$fC`o1w;(=-+_WGdKNSoCu4TZt69yE}tBQajoYFo~>ja)ma
z08p(6b)2r^NH7iX>FVloJ6_MTnX0g=gwoyDYZDPG(U9D+#9Qmn-1(
zj}qU=hb=LnY+s4vTfXg<$|jv-5yLIVVAjM74~I7L7<;XCztOTAYUI0~Q@=l~yqSvkehJK0`=+G+c#5my|J#1w
z{|{aMZ*`;p%j3+CmnV7aTaXj4%A8W+;qG9d#H~Nx%w-%`Di6N|8MN68R%!;7VAXSv
zr55X@pIuV5amp*j$+b^-WtLa;XBz6>tzVMa`muKsxVd`Iu-+NtaWZ34^19L*nSAQL
zkcTUwYKdE6=%xE|DHGO_Qr<~gJ2O7WfZo~9!CfKfdbo5#=3b`0(xm}8$Xu`*$j^y)
z5H=FXDVKnIu68+zjEmjH&oY|uK0(Z)V>j55aaM9=&%v{_z~a(g=gScBg1c6u3lbXD
ztuDPGK|0`$yt0okigr>H%@~C5PMHF9U;2L7kt=k*8`-fLdkufrIs`vxK<_F2y#Hw|
zT*hk=yqS2(-5cs{y{YI>Ig{ubH-s#_WXmKeh9*^#^wQV)8bAr_;|Qr@f-1+GLI;$P
zSK#y${zh}|M=6?0cGNMKK&lVJqtzz{_hd+^WjLwv^Xl~iPYg6xSh*_$CoPt>^hpw!
z4czlyOOpqOxSX>y4><6RQg`J09GYd|S5W*?j7B4R@8L)MAB9^08%r?StM298ec`_!
zDLGury&b2NJ_7bO30&@8FRl_6zdX#o>%h?sEF9UMADx)?CYPifHk{>>ZK7pRXXbMi
z=uy~8-3VRmKZpsOoz*w-_zBaCkB+pAbEv&?d+rNwRLPW}WMb__dwpfxs`E5%
zo09A8sO_&P>;jpT6Kq0+iHV9SeH)%pb4$=v^d~dY8Gl;x{8Uc_=cF<
z#$qLVA)cQ9a6$WSEy}{Tn_aL_3-uDv1N_+e0>Hx_5_Nw&1J0O0{RwDl
zT|Rr6!8vIq#U(K|o&#%gdp^;A+M(Y9^>N}pkup(2r?Q5uGNogar^qe|>GA!7`qs^@
zA4JNS2-D+!ztuLT)dqNAGB>kaL2Qp$A;dfYGdbcWj|!Dn!1Li-T7dD@>^TxJ67aO>
zd9j^vc?CSh-!_!LxCCVXlZe|NInU2c=9Tf)a-MNh_YA-FO_K-tJ(AVu0F7K({-_`#
z&WPXpAL0|9ZDP`eO#5DWEO*nvV;HidR?fU+;%)k6Bm>Jg$T$*=Tk&LlR&H09s5MRw
z>TleEy+OHQku!~8
z&6lR*WKK!wqcUkvWrh)aw`XTlL0;5VRaM^rTq7ochyKa0JdydNl{-=Y~(Id9H1YwXBVejTR-Wu|GqmW$5n48$OabFR#GD0^wPU
zp{c2fP&K@W9s$%{7cvf?K^hc7lfS{4-R5yEplwa8(5XMQ%Hmk7m`KW1N`Qv}3e4NArZ^*0uaSqFP$
z&i9i!qGVu|c^r&k1|>BUEh!HvAOgJoc{)YgK4LNW=;I}pmYfij!3@vzse-4Zm;mai
zq>}#uzx^}2?%pv%tKpGuhH56>`?2tgt|8UrscYw}8FpxKS&-C?)I#0E{>{_bH7MBpd-dIYF4
zF)x%i7gIg9Xq}F38jP4c^4^)=v&H{5SMCj*?(LN+c_~8(weY68bp**TzZzQ|l!B?1
zsdp;_gmJe1EZT3YxhzMgsQ=BSN1o^dD8tx`gI~1*g3`XfT)mtFMMa!&-CQh}*8W&y
zm*2*bZhLSW!IX?XLOJSbweaCr!$*o&tmIfw;`kBC$;7``qFuHgemxe-ie2_vOyu~s
z{VxHMxY{DKIHF2e#i}eemhfuqD=mk2l0du{Pm+!u#CLGdL*-Jb9RTKT;Bii@2))lv
zY!{FH_5e|@S_$|OejtG50McW8)8oP-MIDBp8gp;^Aa1lkOO;Nza{jE>7C6#GyE0Q(
z&&VBV7E{0dMtzYwtHEsmS?BSZB$-Otd)&4&ooxMpACFG}*o30ZK7GarL}&GLTgen3
zOsZrhzIbh`|8#snUID+Nw|K-e@FXX;Lmc9!X9M_>_^!{4CxiZvlNorrhZccgyagA1y)+5_ezva@I?~99m`{4=5HJ>m#=p~u0l`u`Y>A4=8hlb#@)lDs>
z^|uznw?IFU69LlI{u^Ucu9#dnda<#&_993otjaZC26V9~M0=kprO6C`q_0ST#aI>#
z$Ag@YtfBN(Fn{;mp_y__8)40
z{H!a(`_0;Hh`d@8gPxH-z2viS{1kjKlrWX}<{h;u%|pW!;3{{x
zpbDj+;puNw_jeV4!c9VtDJD`zzZ)4)w@N;_iD%qrm0~WW#3!y@SpsgB$mn|K5f7Z=
zg*v|xgBp~6&eeOsz+Fep(0jUS{)&f&D8BqwmGS5$zratf(oN)}<<>l)SU{dM%pptr=1Luevlcrguwv0*P8u+mRE
zFORNDFdR1U?Bu~8BUl++?MA7@k>jo-PRC%OnZtrHn7+?&DfAodtP%J&|EC$jS1K~w
zh*b4iY)~=7bW*93Lx9gzxz9l~d*1Mx8K0bI`Mnada^*47_~$f89MxnM
zAJf)%4~X?$_+d@mI-6>3igjj@M^PeD(X}Snv6)H_3&KBxD7W>-o^@fH6NmPuW#Rri
zd9_xv3y1nIuL*22P58;kOz(R`zj?mpJ!mT*G71=JvGVqF{NrA1WxP+|@cAByxKcKA
z=2IPuwvjp3Nuy}%n|{ildI7me=7^XToy-79`hn6Y@C&9-1v=nH&qffQixAb+C`8v+U1(JdZ2LrCY!l^1ih6mhyI8$%_w4O77>x!vlS*I&#fGW
zz7F%n^jN6%Jtd_U5y#uIRz~2=wto%y;6^c~6KnTgiKKCt_{_SpuXw=IV&~@O_74uM
zY;E(0%7MlNhvs3IF2uiL08!AzihrvG_%EIL|2nPC9dVmr(30G7E}0J0#OY9r1~197ZxcC
zG&3@|ry(C|XL`FMCEQOBkrmUO^L1(X
z`FXHr!1jI&CS_29bw#t_%6h1UV0V%9#ndfp#|bhSh-&-GF7T`c`7$EIpN|Q$&gq7J
z7@~qp-6T0iPt3RQcsZK1Ol<42;+VWympT4)J(o_*k!<}
z$@qG^x{7d>WyX#3ZX$|ZMb&n$o{FoTk71HNK3Wb^>VEAtlaj(@
zA|a7^bIobOC}s%#u6K6Ue#IaFSy-mFp2~DSgsrgq9yt6ohb0h#2(-lfYKG*hTu1^Lt4R`YX(eJ}ZyEKpn;!oOXGzdRDtdB2lhwE+#`H#0Riy;4iK|g=MI{Iia(wzeYn>kf
z-3bn|7C!197TU;g@`_sfK)cJR{X6W~SE{H&`qlEU`VR7DBt#nY%EIFcbNm*oY1G$K
zFVF&VtwR(WMLm!9=6N+8MB+q0s1zOhn-nMM{X6~I89h&jz}R2pXHbZ2VN
z=~=@Y+;j?W_j~lauyM3EM~45HLq(m1z13EG&Ee@;m`R)fxpDLSlCnf2<{gdEm$4A0
zGwt7a^VwGyWO`2AS2wQ28o1vsfIdbR_ozlmrh7=7XmKP|zG;KO7S=i{^GC)qwT6?y)(Z
zlas>=XYevIIcle|1~P4S4h|{%^g!;QH%`|iDaE;g!?4!5zbB3p15JRj6zP_!S(=O~X%
zPbUNU8A%}Ak85l>X`F$enl4j)>H+A>dJ$kl|1p6_W9sJ$#3U*M&W>R~`mg^CJD)-B
zzb1!I^4;H`+S4YBh+5%{noC0!2R_~;_Waf~1GVAa>i?*a`b8jtM}2)EFTZhUZ_fxk
zuMY0$h*}=nmeAx#aO?Zs>9gkwU!KX1vJVY^@k$k~4x}wWr_0Tb4EK~uw3T%Y9nv8`
z%yA=?g9EVf?y?2EYIs}$Yzh>BNx{~a0Eex>brTzl`?`{+)S+nc+PcGq%z=pU>SmmVKO~1
z@H9^h^?k_=*IhKCVK*8In$*hFI6<7fcQaExfd%%O253;%`TA+5
zkPy4A>z4J5pJz5Xqv+_n53n++7v8(krw7UbfZN-gC3{(!vf-fC(ro~NoTO{kwgjRo
z%5;iWI8AX%(Bm)W2c9@%?;}HjT4D`2Ir^A
z4&aM;?#e{GuWxqPw|-eg8FhEp1-b>cLOK64`y3t>g{&^~cfzM8?^gm@FBU}*2=pYb
zCtwgfX&%C=$mqTBPElrVa#D}cZ?}z*(X`4|1E_Dx!*Gngs5epr(xJ+|si}vKbhLe5
z!jiGZR6Fm=250@39iq-yc*Rfa^j{u+E4LS#nDM#*JSTsYzfXTRJKmO@A~1o9dlT;5AKeIWB7H0jFb9{ku?;
z<;>kNtUKrK=f$_~10`ZdM@Lt}7Pb+!NL7&U$dy4%fx7>bmZPv1(UrlRIcjc$(Y5Oy
zuJ8u#g7Mtuz4lpz$iT6M>qVF9IumUg`shU1xd%o>I;@#KLW58@6jGeu9c6;E;1;{c
ze9m~&(XrAdy1En6fh<{KvAru|jk#25K)oDL4+sh9%JfN0SbhB@4v3ZYzy!;H0Gm5d
zQzlLuKPgMh|0UvnY+JsVX?zcDCOdOw2!oV$>g57ZHM
zhEn0e020E^wn2kU*trx`0Jc%T$@d`rDJcz)3KU2(Q;_|mM`dNPB5LjcCCn_4J_ZU6Zjq6xo-~gR?l66@ubxgd
z9tkZhD&hqA04Q9<$6;|f2%tV-dU~2)QWA!=QBRgrSC0ZJ7RUZ`9=f`J@n3mpd3pKa
zd70|@gd~PA8s51Pk^V6u)iw!<)lq6PnKJDsEA6DbD$vsf5}C=(NuWv<%0egNEV*Dx
z{m-29W+F66lPAt?eJ_uFs+y?7a<#Tz?-d)LNbvSPisZj-uslhWncyk^m`>HC%I7fHQQKMm6%8{cS^b2QI;H^7y@ZFG|>%U&x(
zFb;VPux~PpzvfQQX>A7n#^a5*QzCh!b3pvp#&pg`=41-Oz!|6H18DCg7JO>EYS5pA
zgamvrrpvB40OYmB*{yP8p|GVX+LbHW-NWO$X2&Js)bHK
zHa!j**qlR7x=Mv%7Ik5QNCqzzLMT-)D%I0quKak*y=J=+p;B+u)2qvn5!HfjCuYG1
z84?*j&INe^JFY+8D5~^5*r4}a%Y>Bv1d3Str>h+>-Rc4S`b2BV?lEiq+RxYZ
zF1Q=|mHu+$hp3m3oJ$KITDn^Q=4yD&c@Is32BZEUSn!WN=e@jhaGo
z-3rc>K^iF|Js-GLK2zcB6f6&S`#qdfzc6VrGOoGCiYMX1*PF8ecsmegditgrC;?)0
zQ31+g@ueBLmEidzF&ZADM6Z^U+4@s-FSwIRcR7@^baL|uUn=4Sr1b^TQ>KOhR}VN@
zx1Qgt+-rbyo!+$dD|Kot&T=Am1ALGsuvw70?9-co^y#I8SP27@wmNdUw*i&QDN%u^
zOZDryDd;m)pbWY6kr|LFsB~W+rVl*b6Fb?e1Oq&@?K81<_P;C_7;L1)V_~4C=x-XB
zqTA782vVrbN7V$AJR!LP=F+cVNigxX<7wI-rd7H0d|#P@k5$LQ~y}
z{5nqV$!8G9k=)buIMd#h`6GE@vRi`U0|61Qi|PY0<1>vu;I6`c+_Q10Bi;R;;O2AM
z-a0E6zWIie=9ya8k?>UV)dmCZsX3Wg_L{AqYm?sDOTcm^nXCHtZ-fK~qXE<@g7QZ}
zFv>0a%03f~b8+ASG4_>;*$1nk5+Y@TGP7XAfbXtOfRoD7jrJi$bHa;((3=EDi7MYj
z#_0e#W>BP5k=UUzxrL=#X}CULh{rvj$_v$p#@*{f>l>ZSVM2fr@gs1}V*I3v73$So~XU^d6MOzk?Y!?=_R;
zu+tQ%E;~0g46Te3=WlVH=Fl&9S*#kw$uwhwjBra3eqr&<$2{zC9^=?36L;Cw+S);F
zzeEavUD0uLs2-6(Z;-I#raH8$M%(RpPhnYCHv_tK+u<}Bcq@QUH_jd?NMcj>p0Y|<
zkz+dkWnw6_e|WfRjPlhDIGYHRBBka^>?YT}jz?Gkkjb|A*4QWkSe7Zk`e{kSFX~Z|
zr%@8lYTSw(kcJT{wGA;ARNy&Ie{ycmJxiJ!bk?VfnUq5ul3@j^Lz~yJk&pC2Vhe!wdiUQ5YxY!}X
z780Jz+ZX6EpEox10a3NDpWra2zUBi`$N3x?7$|3Rs)F#2?qZa&B5e
zQYBFG604M>T{H&N$m9&UrVk0D=zp5}9UA)BcGNUE&!5q2@Wf%@W#XL33{O8fbh$E+
zX#}iT42!?NKfWZ&&z~ZZe85u0J_wN0C
z7Sk-gmsFUS#}3rIucJ^Pe0>$n+ZD)|Li?tKN@~3hd2c!Vu<$|V9^fXOL{v`#B!WXQ
zExa(%?h#0_^{HkrzH)J@9&FQmSY5W#Corf|vH9+-L*}#tC}raV`ScpPO&ELi?}u1X
z8?_v^onj@N=SCEF$_@=Ht>n%(P9_-g4NDraCTD4iy|XMF5v&(y4kA_#fffOueK%j5
z_W%58%f{&yvs}K7zyN-XxCB6hAj4W@&;(N*fSnBNagz}u$VhhKzBd)@WPpaP0G%VQ
z07KEzG7ZifLHu_RlGRst({wKo-&UNV+HmOn$#9D$Ov7~f*YmETvC{*Z(pdn7r5gno
zRohE@jz!@12%`p_fvTyu`okjP&E>a
z4kL4carf|GRg}gg4K9C+QR`7;PmARZ#P!a_mOQ{uF}p1S*kJf?%Yg6ZPR-b(j><3g
zrXr_nZNQdid$PNk{LeRzNv5Mtgw@XMI|3UH4#nBTzI&N^`P*yxJaFhHX$H%k5pKg1
zCT7y$o?D`8bwl<-7cRZzK)r9EH;ahWcV{Igh8afL@8I<{F_
zGjMwTh1=3_I<4HxMyCjik(7*@l9D*F_q6srl&~4lZ@NE{t4c_)HQ&Mna0CMs3f-Nw
zh|0`*F9pe(YCe9VUE?{ch4y1gV2m(J9w?b~z4JbFlc-u~dOjIF&?birucr%TtiIF2
zvRD^tF4>cuGPHqt!KZ;7XOzmV+m5Vo8?7a7VZf;yHfvY6i_mkto=bcz?_Xnx3-HdW
zU}PPmIoxM`guk+sv!@*OW*vj?q7wb}i9@*YcvjG%@i*8tveWG6gMgqpzCH0DQ3v*r}DE^$qKdZN)ic@l&ux~Q9e?kiDHVPz0cAjH`CT3PvB7l8Ot0G^ft)(Rv7y8Tk
zX?}pZJGot4_2A`u!KT1BLC#RHLv)p|THV~T-Tfgi$CdYmSDW4f>HkkF>*0^D|5R7f
zK1e=YUO+5=?bCkUTbUSMI8D)+1#|a+9|IrrtbbNRnQToo7aUA{x)&ArTutqER|H+i
zgb9R<;7f9Hs7;1H^})e`UQ2+Kfq}v94+?bx0v5$~DeO!T04JUmC60c~j8yqH^_#Lb
zBW*(Dy`6ZirO{oMO7tPeZOC%F`(p4SA%SfFF3B|3Qy}!w@wdmk)0XT%I-EzFC&d~w
z&`yq)p49ZhhQEa8lSSoU!!h0dZgC=Pp&A0g2O2ZNGR(9@T)ThW#a|zdpOeC%Eam{q
z)a^8E;%Rb%YGKM#&mbn~OP8VpfTG;%*HnN@eT9X+_H3U52OShlscD~hZhb}fu38)C!Z3(8h(jY6vE
zj>bQZ?`IsM`KTWWw9DLXfzX7HSnM9NkE`e
zL=`1-F51)EySE2tvN+yfztcIuY!rZ7*}j;oaWZ6i164{`q5hrzu#MD;5IVBE{9&qr
zO#OIrOdvWs<4#qCBSCYu%hlm6oe0geO;i|7hppfTTUO={XSn}TmjiU&k5E%TWpk-KbeXQXe~G>@m%Q1qof1A8XBG_t}^)cef$dZnDq>!1d_(_+Szy
zzdO~{)dX)BJ3=g0dg5&D?b`w1{Ut4p!A*>9WPr|@Fx=kJzx`En9>QyOW0PY(s{lU`rQ
zmT;E42#+1eptS5`nxp~Ez@8&sA?xiI2w*M;RDc*r)=s1mEVHou#**^FHPd|WWsFI%
z(grqr-gUlb@PQ>P=gc+c@f+Wat1$2W*NLz5PpRDqytl_UUB*6L;k!3jvT*a!mjuSB
z6)%&hM<0nSveF+gi!lz)K!}`ErRgI-l!g3#_r+a{UY;JZ`z;s&3g`8;|8#6DSe05t;Xh}Uq
zq>asB@7IT+m&(`Y2=&RGTbM$M93Eb|_ht2M|F@1?9uHqugxlv)1Srb;rZQN|<(mv=
zrrA5T@5Sq|&_>*YM)#OBYOn|iQN4fg49YS(Hnz?XGVsNc)>(#Nh(H6~-qU?OJGkFk
z&d3O%cMQZP04*)fo)xL7rM2i*|7&`>(2H`TbW6$u9i2VW{~`+gC;s!DKM;^lfd
zkBDyU@0N+O`uvGfLtmP=%7(h;7b|fI2_bMs$gK&}K>ri+&tYR}VGUC6`fdL$3uC7`G)1*-t|Fjo;lc*;5^fBwrtNcqrbPCg&U`HV=LS#^{Ht$n1yHQ$H3~*2U7so%TjlGu@8pzZUY8^NpM!
zfs>p7B{g-{_wRRrm=*hJfJ|su*j_h##sYo>WJcg^0$XS2u3p}jaG;t!smZ56;l{PM
zfqvzrjq0!4Z0|g+2Ql(&X5@KsU0oo(=JLIQx`axI@8w^|;(tXuR&Fqa`F;-#rlv0`
z3^Ij&Nr8T952yU}{;O9pcvP^_rQ+L7=z~XUu}>dMkY(L7rtMILTG2}whoGme?~z@-
zS*aNv_g9%0*B^Bx`^aFSX`w${o|1|xGe7^j*Q^JPPMJx>$xb6VU^vG4i8Zvn{l>%{
zCrz)q*X8c5>niMl3BS9yznT$niVaxwZgDQ*Es4(wte0GpmHxc)YS|#Nqb-O8
zZx5CZCQRYL>rlM50-jrXCBN^iZydIi{wOHSRm+GWY~4&b{B7w^m~J4bykser!qV-1
z+Tn3@YTNx$y{EN-nZ3Lb_Sc}12oq5x%Qm5AR3&bWgUhh|cJo{JHZT<#xA*Tfk2?R2
z>wXqJE)2ufQ>Ho*3UdZwI#HZq1Rv$m^={nodbr0MYi2#9N~X-k0j=^lKq
zlg6}l#myY>8>2(zD1`z}hE{pP8X5du7bwT+MRR2ziEpA1Sa*||&IyK+O=IWN{WJAN
z(rZSc11FTePcO%o1Ko7c@j!L7*IupA*PY%BTHM^Ki-{AfFPb&KMcOgTLNl_
zheR%+vjUPWv(wijxKDm<9FRDHJ+=IO&UjR|iu~1w;v{Zo4orPsZ%+TWT7dgi5q@kd
zoOI3YD;+2859GI|E38e78?`hVb;_77=IY4jO+=;JKVRyle0D&Lv8ySd;K7OU7
z+rV2kZ9)@9L7yqu9|3Py&43g}OSU-5K77ksvT-OPe@9@(_ne2KdP>9KN-eMV(~|56
zxRU-t&ZlYjI&D`(_UnUuN4G};8i>725eAJpaNWREXb@HPyz#Akfx9>ZI^`BI_Pp=YnmUMT7mHJ%wb^5
z(eJQCDTpvMCT6H5Fp$fz=2nUbNZ!F=7a{if&1+a^@v#txu){UzFC3S=hlrq_YI47Z
zqSO~zN^`#alhB&Nnc$ALVzkuQj?K_dOKoiZJ+e0{x0Gcs7eBmwqOAd!ri@|&GZ=~*jRNZ}!&c1@IglYo{P|ED{Y
zHK>f3o3eHmm!gpsb|;#Ll`ZB*M=)6jkko8CWNZWyr=2nC(x2ZEl3XRI0nJB-F#29+
zmJfeB<=AzK!|WxroU;Dq`YB8PedqfR-YZ0i_Tt#@XrJui-7>f5??
z5#6m;FPc2oUpKov5A1Y;A9l+IcUfFhct2+OBi!8o@BYq7=kvrXcl+fokKmwHWO?qcUzQK
zgPmWR1G^8ZWNW{-rL!TBf$(4^Hh<=eMSXrbs2eM|?APNJW;N{RkB<-OmfPal|Y$*+%ieq+Hs72#;K
zo8wH~T~3|iRs^VptZV`zD-qQ87I>xXh4^g^?YcL%GAbJgQW>LWYIxE82Skty9NkKtdJh$QQP9y3!V1E>}w6yZJSNoEJ=$z}W2-plfpKtazHY)hv3)D%&jPRHke?(3R(&ktbS;BL!}Du#dJox2~Y53hoJe0)w?NXYJgFa$MG;Uf(|
zQrxWCpySN*Uw}qRXOa{aC5gTcylNVvkuCoaxMsrGFJ%?~ktG0lH2xa}dF@Rv|9SJ#
z#)o__f`9$nAo_1kDt-kXTL1AsbEY6{@v{eS2c=JL73q|;M>0sf($Kh~A1~Luv%A<4
z9r~};P-+3E&dtNq)t4jy1R(By?xg4p2M~td`50TQu%ImEwS8sqLf6xvFKMw~y{bHO
zR8_s5CYv%+!;=<+z>0cktq0>XU4VK7Kz@C!k}E_Q5EONU7R=(s%iJ};wbJ!3ah@*cXj
z>;+WSC(|m>iY#CkHMV<1h?G26#JKty_|fa$Vt5^rL$74_K!Eo+%jKVI4WCD%Y@!BlKQ5+x89|k$pK_@AY`9#M%$jQ=TYd
z{#I@MANKynNm&U1sGFPW4E6LrMbL>n;^gF<0m+Rz;aG3fHlc498XBib^Aa9yO)8Ey
zA26MouU~cQ@Nhwedbw8Bl=dQ93PmF%;>%i#l&Lp`6R~N52A^ZdRG-lt)DoA`C|~Td
z>G%cSa9sWMVvhNB_0d2IlY6mEh8*#Cd(cxO6DCGOzU|*ZF*}yD-iv44-hqgR?m8_8
zCxqS}+iKe5wF@oOsykH?)N^_*BxS|3L+fljvh5Nn*lbwoji_07+UFV>UoNJ=lr86G
zS_y+?QxHnl>WHJ+evH|8{T&7#D9chpSwQGEiJC`)Q&mHgcL0t}P)w@syuy5%gymBD
zJOM`*M2(7AgTxAp$h+e*KQy(TbkTvTE+9ZD4A;(IX~+pC{~;^a+H9$~*WNZ04~+!e
zz7iJ<9Bf1y%Z4@D#0d#4;rb1CTYucR|4n>ilMY)&xeD|z!NQPGx@%B;)j1FwxSSShfquRqN!Y27Qhm`|S-@Ra*
zJUq@9*ze|B)qjshvs`fqi{f;?=oz2At1?n8g5A-YIXnwGRtY~EB+Xl)n=a+^GMJGXG^9KHTaz!^
zuI>zixN^kGu^dYIz^pTYWbqJJeS=yS%C)quE(fBpk*THHe1y@Ugq^X+Wy|=(*0d1R3wP8fMzoMhS8v
zCrnpDPuMhpOT!Rt!`&A-0N5o_e+~3C(jm-4(6v2JLwFQt^)4z5=pvT?)>mC)++M6%
z`c~1cZS`~am=JKc7#dt-Ig9L{8*8mK@(mmpCQ=MsS}qMs08B#84kl_Z8td!D0A;>0
zu4I2-yCrwL!0BPRcH4InBxn7n38R~3B46uvJ;uB5Y&IXlx-
zM0(VrYMJzWiB-8F7>tk
zs966f&}-%wozXy81YbKs;DTzxW;HaN%ttCx@-UE(-^Jc`{G#LZm(^k
z#~=FWrk3WT#C))hY^QJZJBO~@H>a1U7dO}{mBS`#cGVUsY=pAabJ0#U5145`dpeQE
zyeGKD{Zo5Jy3JbF#8>kgg@^O==JxQb4?-V>x;0!_TKFU>7T!FUBNdzCx?I$Y@fW(0
zPo6w!I0c;^?Rf()vJd_G^%e*!NMdKeqAm*rK!`J_xistj(x`?b5ESlOK|Xd4Jot45
z&(65B6AovICUseS^c5X_MpfG%UdudiANByOe=)~bux5q*)%Q6Rp}Al0iN4e6RFC4SMC~DIzTnu-=UqQ!&Ru#svnRr@CQ@G86mN7=gDyQq|6@Fv*>Hd8a32
zMoJ_?j^`-F(6Npomvg_f{_8xT((c9gUccRWJHsy9>h
zW-}?4i=8{6Zu2q2-Z%x?yCuJkgu@C^gRq<-?xs+g+lRPAPO|sl93L-Nw(6~|X3tfI
z5Vwt}q1a4)wc6HDn6GX}7yIb`PBO$9Nuj%6)C>6;CGZr{&w7YV^*0**GSE^fp^*BK
zJLMBcr=453zvu~*^2m{)W`|SAdW(RvWR)3
za=0STV2pF;KP69!pix~^e@EFGm&Hj^Hk!(eFD$h1?;;1Y4*2a;A;oTtyIc$^SaTC?
zZZ0y1)YaB@9=jZ-hwy)pl?@!)es5(}vZ`1J72E@%h)prXZfRw86(vTZUZ&bRFp!g<
zFL_Eg?bl~0`u;s62!La{wjK6??>g`jpScOz1vP$*uT6-HgAB+n%MmXnotm7ieHn3h
zZnk!Cw;P(Ou*wuGy7BfFcm-(jbk^T&tFPzjAGrt|UDuQ5kBp3*x%s2hTvgT*XCoaJ?vU?er=7RfC7C2
zhx8eR+l>t?ZbXrBsoL;|sHypc&iayJf)rsVH@D7eT6W2KgfvdwK)y2qVdvd&OY2v6
z5bz*lbtcJ2<8!A7g5(1CuW`_C*D8suTu4QAJ~D#H-*iQN&AHzQqVFNUU@tTrC?PuA
zIHBTIS^-sv_}02H(p-)79f5^e38yQh8|I>uR##qQv#y1MKsv;qG9Nop93>4W#~QnC+A>-z>>V~|E<`@a=-(Hp~#70tdV$yig8FtNVtCUa24g(*vJc@jMH;-
zha_*n3-*f6b5y9qz#XDSL+
zr;fV4UOdU1BTwYArSwe`
z;i^rJQWoapi?1bvzOJN=1o`;07^v5JLGSteu3+qDOty#RR1ZE!v199Y;&YwbpA@tWi!0}Q
zPg6Nc@5^zOO05w>+6T?>p@6k#DYdn^|#t&`#4{cBKDH3Ig_;xU_h0SD<9sRizZbB7wIJGv;?YBz*qy-#XyHSh3!cR$^2fNHFD?rWF9{!Ex|
zD|j(^006}3zBl#6y_Y52Rz#%%MkP3DyO~C-YvyLo6I2PM4pWf?>p37B%dv-ZnBuO-$P`suZOUK`*2>9S$
zNvX8671`%@e#Nqm=H$Kp#oA@7Xm{?%ty@C>pgXq)?DMH!8j#aKcAkHBejOI$N6Ob}
zej#*(Rh=K%w)41_0`UAsl~vSEc_UT^g<88?g2RxTYSQzmMF5^t
zV0ew-2`KYkzYR8&x%N&0VfI*vv|2~Pi{lw!ODLA^JUf5s=w#hG|2~H~^Ra4Rv?Mxy
zzU-rzc57jFsK@ffNxKn^wnANsR{2q!t)aLSP*AKef!`c+yM#lu@#ouW{|c#ycbjJh
z_~s<^IzeSCgCuxdb@BMVTBU6&5)b=?qvP?gAO?F`%c->$mCR=U9#WqA=_0QV-c3x+
z_OK+w?Fz~(3g^^jK3a^nM66!G4vbjBgJ%^J5<=&~#aXwxy{$DGMLP4w=Uq41OBF&~
z91A~Ucm-DWMt<%l9!rIEQs*Q^3FcNLU
zQnV_JL|)AYOCqY|d@CX}nA5(+iKv_c92}$W<0qS6NSGzA#Hb5m$9HvU0huvbU;0pw
z8?vNtmn^qwtK&pF!%w|2x;Qf)uCxxADFv@@UcOn^aEZ$wN7a)tPnF@B)_QzVTkMfxcl2>qOziw{wTMPrV-s23n_>6H;gK@TyNM%=YTP7)vEem+(Wc$Wa
z*f?tX@(B_;l$9F#W!(pdj#NTQ<64}+I^{#Bu7V$Ciy9Ce5j`r4(Kt>&l<$shNVCYK
zW?S00SB|6d21VIR+wFznQs+Paq32NR)rT*e5rGk3&NQu
zY}e?w2NX46QNP29s9Mk4f0}tvo1;HmAd%C$PW&;|71XkBeQoaT_hVvTQbi|x^V(!4
z(%j{|UYQacuHvb^avCN!!22mc^?QXC!L#o-qr6`%o0u39Sg((%kc4(>d&2u@{y_2y
zYB8(WD(qcc`AltL7IJpEN*B|!0rg;YappK^9dTlnNTK1WSMsac)7r+B#ae>OvG$Mb
z#W_9}L!vJ`y;2$W#ez{mgt$3u;%IA^Fi!IrY3U3NFa&3og7u*#Do;0Qi$)9>7+xbq
z7mbGwm&qjwstJdS+p}ig7=Vtc50a%Xq87TP`8w1dd*{#K;yQThffTCmxmMsG%sC7C$oHP2
zLHEaXN(s0b~W2>~YFWW7eF7mSm_f8Vn6&0iY7TTW$hd`cQ6_he%QE
zSmH0?`T$%xpO^?fc^HrFH7ZwCQt{@t7+idjq^3lKd%bCYhV01)Z55ZjtzUG3WUGl!
z3`qq?UP94Vaj6*upw4la-z%ijMnXQ3gl!u=Tq!L-a8mK1Hd%BbN!^SRmmNG|y`@n(
z&QVc~YaX-RUygmfV1G{MzL_d0M}J|mFI-fjeN~jJmO)hQX1XAF6HkLP=atwMLrFzB
z_i=7VT4V+1!E9EwB_w?iYpEWpc+Ew(gQ@9z=qaaBQ?~5F=nJH&bR?IdN=8
zNt8jA>64?nh6%)_sl3lMpLzi%e%w-7ND8!G`r)F*#ZB
zCB3B4hV$W0=#qkt*tv@`G?@*|TJ6Vwe(1rXwyX*|+afXzvUZK{Hi7}Y%_wiRk#}54
z?y973owuL*Mw$Hns7AF0g9?tW<(3A%^C_Gbu!3@6_~G>Fn@=I*$EVGul-D^=WCP?P5N7vX7CCsG+HM)-~B)?xicf3CIJon!yJ|(82
z48whUru0dJ(|{Gop5T0$k=(&_>l=MjP6S{GP-e?EVlqm$$A>)H-VK480rQx>_i89a
zzV=YnV)aCm0w@hpQw6Ls@u?xFOsT}Rc8pNT9K~ciQ3n;~DJ(1YDnH+|f+CoHzJD23
zHWAIy)^rdoC+1@Pt>5|{bi4ATW(jx(mv{u85e1itjg7;6220nGUdo6AB6lLPRROH<
zf;~r!90BRjn#}?=*+9`F&jG%Nz25dFb$-zW_s4S{GYT2e=>0rLNlKQ_S=k&XE#8RL
z4)O0#cxv)*29mq(|4b4th`@c^je=h|nT5$=t7ZKd0A%J>L+0q`XDc=6W`~}1B{gfo
zUo{3BUH7Sv{V^s<&Tmh6@||@WaTeQ03!<2MTP*@OM*#CC7X);bWSSBXFLi8LiK)$e
z--2aYLjW59VcSrTWoRLT4*iMg03|@Qx9c+(e0sy`&KnL^x!?_gQA~;T{_~zn
z_cg^vK|HxuDiD5phF{WY`-cZRl3@bv5XmgKzJfz$IzxEMN_}NL!MZ(mukH-R!S7Ssj6YHxCY&ca^-_r_-`P(UsYM?uPx~4=m^0Ma
z)fBVBew|hNZF$f{#OhrqS%)jv1;6T)kei~!BTh0R18}&^dB4PQ)^z!%(V+C*?8w3|
zY(2jXpxe9{45&Q4wV3AA=4H!Upxe}%lkMi>_`}$W1Zj8oy^B{>BRUN5wt_6F;@TbN
z*eBYYy1`C*M6*0ZDN%03f*LSmU$J8Ispsw1Hf0(O!-QSK#+!gF&r_J}kx>4pRM&zv
zH@w*>g{BtYf+;5(VI*tXh+WgPd^#b$3?Oa3s3eFInKb%uyGB!}&FB2}`XSv^_
z`}t|?ySY6>Qy1ftaZYLri>xjA$lj#Em3_Z{c#UKRP3Fx%M98aCkwrR3$vs0u_-@g^v&gyP8iNr87*4?WhCZlEi2&u0*7!t91q
z29`fLIY(cV=v`4*_zCvcqM{lpl{mUN0)MN>0%=k)9U6o`0xX6Xx~i`Z}5(4d!RVQU*Su!V4rIH{zm
zNeF0I4V!m8T)(HLB8sAu%U~WH9Q*;$kbl%8t{6DtpT=!mTrgjP?7zSX#zmx7A(dKy
zeB}T4m)Hpavp8!0rzv>F5vOH=u=+2c_`i9JZR|9OT&8-JtuT$D#Kw2&bWR{BpBlm3
z{_9l~1`w>%wpgthfL5G3xx*%?}R`MCn6a>-ah@OUE_dQ?V$vs*f
z3PV4V6bDm|({dqIDj~J}Bb|3X5#MHH~2S*&BB*#+s|ve6XF6Zrl0U=N?`~R_>=6^VcxUm_+~x3N6k30IBnsbborRm;LswDC=cQP)IWZkb>5wg`E%L1>3jQqQ<@Li8UU$#eiva
zS!K=5>)j`b-HW?@!W6zgA{TyY#i#vnNIt|)OmCmenh%hvZBOP>;dU^&2Z0!J}WbeL;7_y55Js4H}IOq~ZOmP1-wbMV=o|X0N+X?w}DG
zFN@FBIcxTmzyq!Ms%WHM4;)8ADl_|+xH%9a?UoGrs6Xd;HH?piG(u_h9-x_Y{@kBr
z#75BCW(54n-Mj5F2MjCTTq026|4PsAicc$AS~6%e;{lb(SAckvml!n!46l)>sHIin
znjT^S9!kZhasmv#34ZI}dv`bYCCq#ejs2+Wp~;_?f?74euN}wdu>oO2A8Kq6H+e^5xoVCiZwB
z!DoejU33Q4?8PFD;PY6W4z4T2y0{7y>C3L>?IQ$AJO)M)7QFQBOxCQf!ZJ*|
zaI}ku=j+y{xJE|(Mo4$(Y0_DVnaIH_8erRi_i`CrN5|J^lOEDsG2b$l>|UFc^hNQH
z(fxWAL+O$`bPdh*9663NoNWV{z(+YoOGX&uw;pCBi8>rq-9?mNj`8~FtgKb1UHXE&
z)T{NOOL0Gc`{7(X
zUoEp;Mq)E_>r(8^{8#or-djo3kLU5nw>@P@oYFX7eV*LlG{>~1k$1#RgjUzQ;paXX
zv)ECF$sIP3^ki@8=;aCw?V_!Jd07oJdBGtXus`4vUUI{iiqdg|*z(k^AggGv!V&Qb
zS>jcEi}{F&*^d0=HJ4EZ2V_vG?zGn=s;WPre4VwT0co8xPlrZL(IxYm&h6%2(a*q%
zagW0rMq5VFez-$4Nmkii;RPS!xVXU*_L8R!2;H;t&7IQi)S!ShRwAw}ISDDkC^xr^9IMm3q^4J%J*rEE8D;~kdcNrZ
zL!KtSzKyDAq2j
zXq;OT%mzyvel!X#>f2|?x9dpxgkW~9C5mpiDbT?|J2W#gqNs8zDXMGwZIaH_MK5$_
zEU)Fj4Vfct1YP3kAwEMe??gMVxgMtpkInvzD>*#mCmO7qG`cB!kqtAkB!9CTLUai>
zhW6!A(~t!+X9gcZIBGtIS&0D~G3>r;GOS!Cz8?;sO!>I4-)P7-nAEOVR$Q%>xzt+A
zptgT`puTFee_Gw+)fG?k{Z%!bhd=+tI8VoQEXEiC2*Y7B#-RAU=K#phdrq7}5xeE-
z8N-VIgtqE_K^kHkuhh4mA{K0*)BAXuYFoS|jKws-N&n-dRXzwEr-@1w{afLkcA?{=
z^`4U5;e;;$Hm(8Q5O#BOQ=dC+V*JMmgQ;t*x!T;}8v!8-;K8ie2Cvw{jn|j`6@XuT
z;)`-q=ArL69w$dsta{Qerf$I*?H@M^&7Aod{6s^wnqS?!`mJ8CkO5Kq=_1Z(
z^Afco{WtG4C*#@|VpXFCz35O==fK6I@6en)Fj=jNNI)2BZ*LD;Y`0pr-R}9W@H;O*
zA6!?5Q&!f>#hdycyV>$oRl=yTkHD)5eq_$iZQSFH()!E3NJ-${r~Zd}IdRz?R?CV74k)=EH{%9;Y|zE7y~glYgSdsrJ^&zSDhj
zsELbBODJu8%2jNm!V7B7klK+~70jmr{rM;#s*R5#OP1$34DZ
znhgp8`wl)i1aODfq!@6}b+lXHM1(Y?;WV7em?9sPHQKm12;Q4Iy*%~D>WeAr25nw{
z4*Ca@h#cWJf(9!8;Ln
zZ^qARW%uP9aVc=pBtq~hGT8&=&93Lv@Q6})jl0A4fy}jb;v#=OAUuoh9ZlS>rWiSq
z1#@e+^SN@0i^4A;2-1&+^~DF9V}*t6QECetu}&)a`!r+;RkR;3R#{4kQ%$aP^GQe}
z*gw0w)U?|mjNOG4J{bBX8U9MnZfZPEt%}($XXF_S<$krSfO(DoQBy(j6;+sC6
zg9JkOc>T!O^H_0=+de3@&bQEHo4INZl-_PPCWLv-;{ixChUT_f6@%s8T5?Be;U1<@
zO0}&+{Wm?e8x-y=L!IBjp2I1e3KEl1(8SNSS=4kN-?1i
z73uI4(iIoHB?QrHP6U|8xPP6AQC;%c*6FZ>()+m{ioxoLFWLgAMnSM0VnK9-3)ZHO
zdvK1i$>_$Lju5vyBUo(yOS~A)M*n?YTx_}wu&WEm0bS^qTPG+7X`x+SfYfZ}+hS0~
zfERljaP4yI(^Cvgv_(ABY6w>dy6?hN{SP%-gA(VDojT`e0t=M&PH+*?S
z8lX~KsLVDCVL5QbdC>4IfvYEHTl`?Xz5ZP{pzsZh#jBR
zOqv47xuWJcJC7gSwJ-nl@-B0EVV|UN!Ab^P945v~{gL#a`PLRJM`fq$svG}yGb+%?
ze$E-I`2D#VRvs|Z5YdL@nKb5jXAAv1jbj|xrvZqNlLz?D@PoqMFQ0T%3R(;
zi5U~*hWF#Ew}X=!bU&4atrc=pKG7tP*oZ~CwXGH=6Zy8AHY{yi-rY8d6QqsIu6l4K
z4oJz#RT?ZdzOUtNqpJ|S;T8Vj%HQs>#5s(=rZ(^mkNt0ctH{>R=rv-_*==aiQn`P5
zw|+^VwM!AF6nB)&pUsk*LHa$*_S>`p5!pNo*3Fs_)MpwxvR~OP)eF|}(2$CkO$tQ7
z;e_pt0Zw&vlrJ~$axQOfYoNHH-V&fx`x;~+>?{sH!~{4y=T@5k%U)~ZOK0X7$&A}u
zO1@Z2sOWHfl7wH`&&G0Sk#ao04guXLeoR^-v=+AaoKw2-YsaD;mTMQD
ze~BTRj`&d&zg)GdR*5HN^~vzoRZeL&hOiHaAPPE{T4J|pY(ZxBzlwu^Z;xy{NSIXp
z+B(lE1w(jue2e%4O)a(0O^T3i%*5{uya92b`=@FbAm6jK?rTUCEC8aw=eqkB2!J2L
z@#=UN(oOef5VwvtANvWwuh3m{^R5aFLuL$ndt)cO7~AOJ>4xpzp+if@eFJ*&eAG3~
zT2{t&?&-AV)PLtfXw9t^O&H{gK4^o4=GHmOpc@*-nyaaV-D{N>0VvLOA861
zWcqb)@>k*V_bpcG|0(nQ-?Jsz28E6hC>FjH9(Mo>q$t%S2-5OlExFr+>vGfZAJdvIIQp%q1j8v;ze2dHcrtkSA-8i|D~&;Z!Q@SSb*YHT5qg}KAV*&shW
zfL2o@mF@tGjJ=ZX;FPyRyc(L}_po@FSk}@ZSo)mRWHdU&05M;vB>?C=0U_i-en4If
zb{ct
z(PS0=Z7Q2`f$=m6F;h|B+S)>pP%y(H85Xqu?GN2o4rMVRv#dJ
zUYzhWmscG#k$^`wWLatOg7As>d$d~#pS4f0=8fPLF6wtxv6Eb=Oue{D+g&yQE<`@a
z$Tt7lf|{_=k@bRZ+tJb1xTGi>k9AtU6kcM6I#K3(;N)?>mo=;ZG-`BqH?|_RtSjPz
zla$k#OZZvp+K;YZZmbuLo22v0OA{({15oq>NPGpthZHpzeCes&t;oue%%UxT?(6PS
z`{(WRUm@j%I$#T|Qd!)}tMdu6tc4>UkFbB6zB!DE;;&vhKD+aLEoGF-Mg>GE-#A=D
z&XRF;0IUxvYt&{|+w0FI$eDl-&nu()Hntlu=DKl*v_D{4LxB!|<~WhE#gWk1@&SDb^HnX_@%>kReZ)i(x-Bc^cOIE9PwQ8=RR?8dsk;i6=Qf`~+KbI$
zZRK*}(^Q;If^HXjRvUlP@07l?SW}60hLhR$jOJ{IB{n$>c|YzBZT_&4n`>C#pA!k7
zcD@KAbUR=n%PF29s9sr9wGngH`S{bN{T)cY_0KsB%*AEh{p0QGOQ~`?$8x5JBURYP
z;(+=E4eh9;wWWMT@K44vYk=aj4kR}Gywvyry}DGXm!>dn^Ids*E2X0h$-VUA;mzYo
z#UX&a6&k!2NP#mCuWuRwkFyuIo@}(T7vM
z^mcf)QvJRFaFpk}LA4BL{kG27FwN36*Y~1BXNb_g$8hrWmW)W9SU%5m#w}~@&7^VN
z9KqF#G~d&06{fk?+Tu9Cb!vh}5O
z5urm5(SAR_tl(!F+0i65*6a9}S6y50E}rq2*tdz_U8vi|M#avG@}vtR0BoINL#@5f
zp8uLg@Q{__40`Kc!^5owuh42tUrY^mk=u*iSJ#zHxnPsM4}f@67Z{vL^m;!)k55l5
z2@PoRBOV{I>*67RqSTRx?{(2G1HXVWBOB)jyV6o_e~Uta^E;?phf{jGyK`W%RhOhr
zvT+|e`qx{hUT@?|4+(*gvFg1TIP?}
zsY46)8emYVQ*&5cSL9nY(nz>&a7a=q@fZsuJQhi_bM$zMQN~@qCaVZjAUv==Ak;SN
zFIK(Y>H_>#cIa04tDsauNg}U#joxzU^H@J53x=}*Bs4y>GnPdPau=GbWI}v!N(8LR
zaZi`E(oN=v4+8$buFTPEUl!r77Ba>PtGzhc31?nVa6emr>VB6rYKQUQyH8oq_bP5y
zk~=>A9)2hLP6)37m-4^`8e%Ukqqvq!T=AW#pWYf8lih0O_1(#3TlO;B)!+m
zSqf(>ND?RbIQ9u3lA0_(#BOdQpxZrw*}|5BhiYTJ7Rz0N_pIN70F6m9E45y{c5HsW
zep)JV@HDjt^pt`tWf-KX++IQB(=ftQb~T5{>vH#T-92zF9b)5Y7y>#Bg&T8+_CXvQ
zX1mW8r}}Vq@HU`GLR;h12@s#oc$+CgTr`*+{!CDG-e`KFfbv&Ed}WOrj^Vn@$!1O@
z3W%B1o$gqT&E8mGMHoWBn#r^}6;6u2j3?d!Yd`2tXOzxt1!I>=apxaO0)*%iL0`31ML
zeU_L!Yc{yH1H9Mtc4s%c@p7|1=Z-w_51UH(>eR^FZC6}al44PG=w;Uxacmq*5hqxQ
zhHq|+q)#WFfWXFefre2CL!`}zbo2OEup{~FdhJ
zw1saARQKILM)ib0*W+#4s116xZU|1erY*#r(xKzSIbcf94*Y6HaD8&@zf*k5`Y
zyT0D8Mt)|qF(%XDkbM6EOrj>s_+CO5tN2iB9j(?Y2_Jf4T9h8*Jn+{JQJ=!c1XW>xH3Oim+Y_YT1m7LfrUSZW!C}P>@@3Uk2LksC!R-&Y-yPv>NPYv5TdH^B;@iF`%S{pmE>oD|fSoe$l#`K&@V!wn8o=!##yUUuIE>yt+WBF&a$ij@=D
zropdok}`_MQS;$x7KAJ4=#+({9RYeR+;A8b6%|dXY#MPz!3WCnvN8#B^l@Iri#Tea
zRRBKn@r`NnzC)MVt{C}`H7KeseQ2Ps3p?%6FC{Yg?(#E8YfC^@9r6Ja8kCTbpgEu@
z%ZVtSqo|{&sD>>8VC2fm%H|}2sg+B|m04da&Sz%M^(#h!0P5CLm>a{nA5f&~vjWG7
zvfwwWSy*@CSJc%lcgD8twydLMD%%+5%NiSiZ5?gYW`>4@0QweK0Q>qmJPb|VY0jB@
zl)Q7^tEXAjrgN)4n^``9w$onfj@q>PylDW!yHTfa5$C~(jY5E2e3CAh&>w&53x3N!
zYoYRCY-B}JGC&m1Osa5DAA}71#O*4xhU`u@{2B=JljroCg(z9B*Sv21d(p{Mb^SL2
z=zH$``hT^R0jA&wCF}p{VDf4L-_UdacS_bcY@&ZW#(9-1Ri$pGZq_PlE)cKbcKHUTO!QB1%nbHVIH
zh*QZZUhk|BtzB^`u4Im{ZWA-|$sCMnyyBs`8H~Sy^@1b%8yshJa`L6E&Q4)cb*B3}
ze0)@?s+>xEDLG|I%-C@*0g@g#r$F-ta}uT^AZ>br8&Yulf$i-BZ<~bG1LqpZIF;?p
z2}Tu*^X(a6sBEZ&c5Vl;^M~SdHxg9~J_<^Ri-+c9$zO|$^DB@cZ&m17cjBd8Q!&Ww
zuFUcb1ZL@SKz!9%Acwv1s|ZkEzc}xG``j?_zBYyHgH*1FqD;3B
z?w5gwtS?gJ_`;{$u0c?)BP8KfJsy_d%l)V!^vYL*8-y3(D_GoCZ7fh3ZChNBO+W1w
zC^kFJTJuG8Jb92Xlz8nvE!%Qz_4D=Ej|@}Ld)bw>5%VfXiF8yU21lu;-#7+{c1FSd3{1KQF~Ixu9=_-n=(19hXf>OPsFpH98h&EH
z0X=TF)$wX-=V_Mb*PjUcp|#JG3gm#^s@I|jT;r7Bm4@~VFrGKS9BM|>L7)?oo>t7^
z6(zrInx2C@?|xwxrNg#pS|5I=>r{yRqFpK4rY}w+%}d;c^wI+D?Q;obDVrhaOjyz0
zq?xA-Fs`v@f=rZ@paL%l&-$v$YywQPe0ApxGCk{sXsZDfr8ioXW$Helgc;{*%cKgX
zZdtXcZ)sM1N^mqXogE@;?mHrE2O#MQI^lZ2pF|3?cTGv9tnogY2rJt9Y0hMhF?qqdu|#e3*v3*pmLwYv}e1L`lm
z52ka^pW%ZjE0bqhSktK?v|O@c96zA|0@YgBZ53VJKUFYVu0Kfz-iYU5x}5NZBEWcI
zriK>gEHr;!Q15WwMR>JE%EqjO<9u^@&Jo`>F;T?DK@66u6)*T7^BROjWu{dq9IsEB
z+)bjf6pLd8w%R84HAT8H?%<*q#Z+Y5z+6^2iUV+CM-0B-cT~dWi^8ho$;&F3CUp!Ap}TsuxzPIhH*Y1b
z0^Au&=1Lw{GZJQQWFkA#3d@>zjXP~Q2AW+KzQX<)QT1AxcPc>9;V&2}A3KhNDCpkl
z?PG`ce>|505xX!pn_N2WBqHx6l@$t$L~rpbdK^}qIdds&93}!nQqtGk1adlEM(A;O
z4b`KAXT?Wu^mKaZ4OZ%kKzK4>CotwJxp*+nb}bj!ND28fY|Xw|9eQ`3gv)ygP8H%4
znTSnYs{;+Eu)lL@i(9;Q>Z|2AOdcTe%?*n9VD{*O%~7!3qtDvwLkxjTFpsn1z>Y~4
zRv3`NT}5WC`nATv<2QiK_`IG3ApVSJ$Cw}xX>u1NW)n_F0@iVEG}@8=ZJb|}$QUb_
zg1T()1wq|=f-(!{Q@B$5q0>n
z=K7#Ar{#KM5rX<7_X6#y+#xXyqnL!6O*iis#Ac8Zjhl`0wpw_i!aVBuCv5xM*3t^)
z=)kBnLL)&fwnStNqt@J;?Wgj7ooKHUb2I{|v`#B<4pH8{dBBJ)_V7zc1ls@LM@rs4
zd6(rVylS#c9mPJg;UiOGhMK1rZhgQj!=Dnt(+ZR8K1AbgSuy5ZFW1PifBM!%KeKl<
zSHdxw!EL?fiaB9^iRw47-MMw66STT=#o+-25b*vWnK%W#EJC0iJWiyMCc`OS&0xqm
zm50I02K)C02ZIca_>1#^G+J}+!)bF?{pFBMUi$-1IUqZ(G6go=_8zA6>yoEYT!Y9#
zFg+eWiu;2D1{kzT2_{A0qMznI%_PMrq|t@J2fl|7?yVk@!~@^PDui2%TuflI#iyl+z1s35g|LzE*!gvQ(~OpWmGL4qnK@inhB>CYtd0d92;84_bdtHM$*S3jH3vQ>UljAd)v6)$Kuhf2MeCXwjEW6#WUKqZGE9>L
z=$5vCd;lI2JVD36sAY>B%Pp=5T%DAJMBuCJ33s?ace;mW?CSn~*)%Ctn(H5hJipR#!AYd`?
z2gU|Cd_M5i1n4s!PvJEQ9*iM|R`q*lifb}Di8c}Fh9SR?L9PS2RbKj&3%r@gfF=PM
z7K&Qt0NqHFy=uW4s2QhYVVUFqz%f&BSY>TO;ewa>K7$2bEhxkwpv7>p*Spf(>76VS
zK+sxPpqMq?dA8@;ROT`y4Fv-A_|46UXmat~>>L~hoZPKahxVVW&`6`Dt{y(k4qOw7ha|MgOgGYt6GTH-aH{Qn(IewR4}iHqmHdV-s*
zUVsQxRMJ2KlA2a+wET#p$kI;*v*(!k!sy*$OmK=$t%wDOk3T=v7`;Q|p^4r@sTnME
zZUuVE?NYD47!rkjl%v9o?9SNl1QK{QvtRGZa-7{ft~0t*BZKXVb75)XF@#!LSWP_j
zemm{wI&&WQMr9Os3!HxG?&>iCe3G=|BHKv;cB*bY?&9Qz5^kRh`h(=ADP`_>JD42Dv`p%nUB+MBXla
zeEG*`M{E*iv5#M72`pS5Z^p{S<#st|YU(8aTL$tbyLA=xd^?9T-+HWGvjm_MT#iAT
zJ4BLQ=F?K2M{FB*zy<5xoSU)UN{S}D
z*y=6&CT+k;#83kQ_*&!tS>nPG`igz-PVr)JZ96mpx<&;xwE`foq2%Dek~HcOPf#YA
z0+d6u82r#)o`*mxuVLv0A$VON!NlzfK~5Zd7A=u>K8u&8BA2M1c9YTh<@s7Ad<0Ox
zR9tVKtKnv!nWy|3#H1yJ@qQj2m|yzrgH72Qm~e^~H`^nq4uN
zTT-H@;Q{7j{Z{Asbg~ULe9(FDjVcA}kWqJm>=rb6|or#^#L`GW+>%rjKpt?5%&qjMbf#$8f}(!W-E
zMUj6GthkG2I2iO)eTY}S8sEuzpwafkT5P$UQSaIMhqE3BmzFn{Us$7F%jI|#Di0pE
zP7kq=3O+bT{ZGQ9*X90Z2Er#X=+^U9_l3FwtAi@5u_EYviq~w5sS*e!zEdMcf2Y7q
z=&-&o4=6f+<2~1vn3Q8)*PgJ=7$?JtIL)B$BI^GwvPDyu*>`d7JbvbE2F_&el>XE6
zF4g|h`Bp;Mfm$j32L;U6T}~pt#?&(1B|nO$6W!Y`W*J+~e#|93;xQn9dmrXg01m?&
zRtRX2Teut|gQp;ti!>3F&U#N_G6op5BN|`_ANXGL#y6qEPAy<}wdUj>)Ca#leZF?3
z^Gg5o)0RsN{ri(#Luo|sx9m$}C#ADTOi)1&VtgoB1D$;-cRbj=L4a$O=+&I;5qocu
zQ+~j_6XNeNjeU{ucI!xo&R2|{>@X64u|@a*W_HaNb1Ca0*YEwY44t1X2?QYPE`!TF
zn5>@CmV#t59rrh*O3EURzdE7c{JmXe|8CbX4OKgrNoA>K{Dkip*+jJxSD1j79FO|e
zg`xm=GpY`$U1(aR0oMvrrWTjw5M9xh^1Be}f=
zA&x4)*Rz#&e&m-H|1Q2WN*vYYRlPO)wAYXD(}7P#`n#KC0D#-^qqwB;nd$^h1;KsE
zEOoPhYD?7|hf6|^5@F=w5bKpcO$WcHwB$7Fe}}C-c{%)|`L$c7v&<1`yrn>^PJ5co
z#8s|m`B1X2j3Z6f?IMe|}P^WUNVo9URjQE|}%>h^WF2J~00%Qr8sDji_;0pm-eARYU=a$Rn&De6t
zFg6j@Yq4vgAGu6iE)Ynm>F7k-@s>Ix1BwzLu25D{c||$UB{0DAc3ts{i<;1ozskqu
zLbuP|0Iq4{=J2$5D^Eq&dfAaUFF{v*Sn|(^^H$uWEo)kYrqoA#8OUo=`o6AB!s+R|
z*jQ7k7h8h8sgVqJ4p%KDovj`zy<_o>4R&!#%w`kk?wKT1Q5KR+OQtYN009H4`fH=W
zVa1kY+%^J1pWkq?62kmB*y#Uh&{U~mG{&oz_SY>|x>V{8)J6>hnwH(m?DqC&a6J}s
z(E0wR&V2nL^rIgu05fZI3z1O;*+rhz13Kcrwz8-v!eX%7w5Ds{3EbMMeMmR`4QL_>
zsCGe}yO&+Nmlo+EsSZur0DoRsQZmJl$Q7HCf{;_S@t{>4WdS(uLwFMZ>Y)=%j96P^
z6Mp-?ZxEUT3JK&OC=U~Z$wEH>^qnxr{)<6F$8M>elU`-@5Og%ZSd<{*cvx}q8wUb?urVcazet4#|2_0Y%coqBKn>}%H>d&fX1z`8+
zC4`*VS8H1>P{3F!|M5R&zr+4@e}lj6`6d91p+;n^GG%7JZsI3)b4yY-U|mteZ`!99;Z^2TsM~l^_X(~57z`Ei8^9q
ze$n6PmfC0CJLbblQvNB}y{k}+Jq7u;Pu`T0LkxQS-aa_g=wW@4F{lVH;`P=m8@*zR
z03cD_^jy5LH^GDjKrIloVI^ZNHhVwH8@G1s_hQqE6!{O#9h#lG9Xpv)C
zvjuQ2y-zoCJvUznqM?F^HY(7%j$MAp%cCK~a=W}*IwgXC!_=h{_j3Jz#ZCWL(=w$N)vgLyAg0P@iQ9Uy7Qy5C2#7v$_?-{FWs3zH
zULP&s^VUpCVFFUC7@)n%5OWLi=K{IF33KI*idSCc-%E+Ph^Uo|i>nc6
z8=3ahT3U+y+Fupu!m6mC;0tuBEuE1(UTp)I_nc@-!pO|0g>s#iN~<|$pf5lAYwy8Q
zRjcl2*#GQ}5?ue`0Jef0KAG2^GG9I`s@>}WXzBQZf@i=gCpkdFQNI;Kx_LC}_^Py?RvadH33+V80
z_B&pFQ}5*-&$f9#-?YX}WS+i|l?Mae3t4;wkpk|WCzy#b_WK9)tOrCyR=-KdXSH2#
zSmINxM_Ea2g$)InCq{<+$!Wah1e$BV;dRI*j&nNMl`BA5dpf}%PR8(AXhAw&{tAhN
zYu(-MRWNGHA+!?pk!56{ZZ7KE$|#g9a5=|s@>r_54SV51zSJ^>Wo1IA+%j=z8^L6d
zpqnYW#;r0$-1S26gfG(027{X5uN%vhL(rVrh
z4=iUl05lv)8FRK6Omw!K)vhFjhp|6&eLQeJE{0@xdv*r|?Pu;!ZdWr2Zg<-zVfA-e
zFV}0J6<4hR_~L!;y{nbB8Q4P$7=LA82ck;dMCX*-SPH^
zv#0z)Zy0ZifO6?SKMzqh7tBONPCY(P>1rE@kg(CE<*9WEhz&p>(&&O2q{{8zzd@k?i@moFtE&6fhBpd=
zAfU9ggdiy0jg&}tmvoDCBPk#tE!|zxNNoWD>F)0C?ssl{e&@XBz0OFxr7!U-mgoT60%Kv?#rkO)|Ag@Qqj+@+D0K5)62-
zbpQuBoAdN6pE5TygCv?SR%MpHB7E}bS)j1GCH$2eACOZ{9odmg;UfYS4GyQmjB%1r
z;nUR06DkbZQZzifKa~E`eYdehC*JX)bbZmA)bs94{T*^LG4_c4t1B1lX%fPr;~X2w
zC658=5mWl+Z~U}$gwdo(M%tNj`cnMp-}qSE_hd#GEys#6%glY6kdRTj7~Gt~l+90f
z--wF%shqNn6>)!6EBEgxw*GyF@6Hq_xptFqC8h%}IPWo#7P_x3wE3<><`8%!GW<6z
zz|4FEjg|C&dBOFVy-j=SwJO2RGE$L75F)B!xj#BKwgfu)=od^q=ln$Ba%^(r^KFt4
zEnxInF1B(3>#A);g>7*|Q#(d^tNc_7@$dYed~DXUUxDWAB2b33DlI-(|FFbW|0YnlS1ZQ1oF?#{
zxhPRL*-Nq;W&(9SQlj92KYg6SM3H5z9}!-hs_HRNUlpbYFlWLnzu^0x`DlvAFgvAO
zr0xfln0T)DTZ%kP)`#;jA@jp|3Pn~Wjg1R$MPEkdjZD-Dw8+I!B|D{$OwCxa*K1$o
z&`<`oe)!yB;0=Ol;1doUuUF0OiE$KKyhNak8QKsgeagYTr6Ykr?($(Q?Zd>$qsO&)
zt{A|_d|-liwzcVmZN*!v`WjR$PSfM#Gp8pk&OPU=kmwA>?Ere_q#IFzOnE|apbb;
zDLU#tMvRyUvk>~HAmXtuedKtG7H|O++2pYLq;bSY+?mZ3WePQa>L?e@Sc&e<7Jm;D
zv9jW-b?Euk5jj#;#p&Ue!p2_(=Ahx3L|K`7kugC%SU6%>B7ad#)7o9D{9OVzr;%`s
zwIx=|-B3bK4AA7jsrz{~SO;w)5p+VP{da(|a7{XvRU2}>mDLgD1DS8&8MD^|$
zGqi@L$@I&+5)Zd4gNaJ?Sx(B&;$PnN?KZkHy~c6ws-5<@@~vU@CY=xEekt(O%c+3=
z$@4)}z}ey(10I%~h4|e48T27o3ZzQ@GBu5W&*!G;elh~_0xjxT>KYmw
ziD9z05Z%E{@g0KrFS#MaHRkv(_8ni;$b~;6?j@q-3}wsHkPRk?Be;Lu_+DRQU*3-X
z>w9ReXWrK
zHTq-`?Htyi8IXE_NkQA{E>N=%0lvo~&`*yVnYJ9RbF_8??X@`E&KV%2{QM+fuvb=A
zoDMsvKytXwzhBv>XIKRB#Ap`DTluStK1k}xuS>9od=J%7T3)DhMM+>48!!CE-E1*5a`&$
z&)wY$kMG2=8MDPn{!o2gU-hN;p4OlYL6zvU(Xw#|Aov$yvT1rQ{pzVcI{Ns0{dnpi
zb+PrQ@Zu3sT3kwEp(OmFFe!I|mao&Q=DW8G=$-;VvN_?#4QS=VG{!ZqlahH|7cbUQ
z`0GMtHI!6TwiX}O{STmHADR$OX)(7&GF=xx7#?N8hCnU7Z!a27(Q
zcKk_^zKCYz78VY3p|Jv-@?X&~;9~SR5OPiKt8a|(VlMpP1A%Ynec+pAhspT-rzRaB
zguaUyPHU^kr=fRieER7VSL?M0r3wp8TGc3e!3eMx(`b(gia#&jlN)B~rZP_TD%C*;
zjYp|za?$xc`38RxLiyA5@D3Vg=A&)l)_+3>eWPmss29eC6`hm@pb-Uu$wWlrwhsr>
zZSL%Rzr3=d2M)h8>iefZZxR+ZE1!_W<1M^sq9seumVBxEyWhXGdF$jYVtZ2HyBsFw
zq(9vj(4FT`9&p*0wbKJ&B%MuS^O3cc6&>I0`BLy~=+sUdtoI9$gw7$72ad=;uRQV%
z`ZAD6{^vC;_g_MX=*+Z-faM~uqZExBtg_wSv1pc=qsG{nO8@AjZPx{SwDf{kdXHFWq0iUTE3$*pq|czA{ww@elKMn?emG
zBppkLR;}TO)##RQHqZKOQb6taoOXav01YT7V)$g>sA)ffgcq`d7jGvR;icbBW3w*H
z`8ExytZb0sqb^#v(XIu!v<7_`Y@hq^G5p)}p6kBSJ%Lvs5WZNGI3)$yv6MN-SC7#C
z4AAL%Z%^7H(>IpEvsT_7dED-Wv61uBqd+e&2vv*n#`fJ7;`)9ZB;24TB``Z!bNZg$
zU7)r}b+pTnBxmSxnaOZh5x0`0X!uS}UV=~Ga+`8iB5dv>aJF|-trt3pvS{LGv$tP
zHh01G;N*oG?2<{Y=cTsibS5W<5L4XBQ2Y3y=N~>qN?XjhJdxo!kSkxMgA9)#?6(oj
z&G&g~4=mckAcy16FosMz+K1UYw@21m3=ZM&^~aqNQKk-;H+rz6nvg&)9f%CySsquK
z;(pke%EEbCP>sFVS?qj6^%wvcFj}`xmSm3j!>$NRii+BYWUj?V*;1TWnTM-B31sGl
z5TNVN)cTZFiC-#eX@$jVt9yUsz%RF&C<6tR24U}E0LHt&6do?G#Rz;tj$t?8zsTL5?Cj(sIs@GTs|
zVC>&Q=Sr#C7pUkI6f#U%6f388yFDkSGVR(K3gDW@{F
zEgiHehPIOoK=S7tnFOhsC2x?{XL4+t4`n|Xu2H)dh0?5J9-YQ9BT`Q$4?bevkbruq
zG0`I6J$Z0>d_cj14wgYBDt|cmVGoIHUu*gh&fm2=HKr8-vJ7&Ej;cj3C5cmF!Cx5g
zQU7elzpCTQsSB2>rEqAGS~3`$+{XDD*UxSw<={XyzH?}7ibfDaTNiU|yxJ|uL`(UV
zXevjFxgIVtFBWSGTZ!1HpoPN67p(7mIpF;G41GeGc?@V9SIy`4BfL6}FZmhpWd
z!uR~N{bIOneL%)AI46wt(K*9LCwy#(qX
z9>*D`-3Rov5HqJ*%ihZYw+}y2URzBc=i*{2#fB^N%XGocC(OU|B|DGH~W?lIA
zd^K%lXrx^y&F22*oJ!ihz$<_@ONzoxBn=%TZHek_=O*J;TFPPRRZjtZ^#N(qslIsB
zfFJW2Z>V1t2y&1$8L_5$&b^+#Y7k#fOb-cuNA10qa)VV@O(evD=T8A=6#Ps`^rWqi
zIQd~lTn{HN=z|2R9db)bpt(D4NA@rHoUDo72NygGdH+Mbd!3yD@$A~^(R9)fmUZ76
z%6yzLUwe~};TPd_2)yd+my(I&h>ml-*m<*4_Wxku;<5Vbu2T(H6fyMlzte6LC@A8253cj4>iBA^8&6^YVRKtdNF)KWmjGc$|zD=S|LI$w$mEM?lY@|N_efR#OcXyW~N+{S%9y!%`)ZvfMD*>Vx77EBzgCsQ{NK)&#SnWF)0LgwdF(J%^f2Fcj
z#LV|!VuDO}AgZ>zzK=@E_+Tx$lp!@qCWqhpKgS;%J8
z8%=0qJR2X5U~2;@&1KZi){wab-|pTG@WHL|G$sqpN_0x90zD>z0a|(j{Tws_b*fUS
zDQ@>#;*wh{#?!qwq6}DmLM-~r-)C!%8aEj5Lv|8jEB^l=nX?a9_Mhdx|HtVq1ehL3
zfbJUkgKQC1j~Lu4#;r2x(PYAJCGL6So54_
z#(Q!;x*`Nt0^R3<+?mH(Aji7oI6Cjcu0n?OHPJBvV2>WHAE$34)qbc}Bt`z%E-yM?
zONmLH9lPeO)&0b`>wNy6Be9CjdhTDTor|N$3eeU|mjMqfUyvSe;I_#GrtnLm9!Ds%J+NtlE+Q0I4+Q|}8Z7@(d+L?ND-a9kIur(?76pIk4e5u~~Xw{U6Y~iXGx|YoUPCqE#meC*w+&%bY;v&Ee_Xwl<;?^_>FFPoRV}bUIhI0
z!pMqh*$0yT<}|m*7^gTfsTI?~-V!dRY(5t$C9j(T?lfl#;ZPw@;R$JY{2sbWe`x;N
z#DG`v_+kS(x)8$uT9jjW@T%MkQ>?4hy+u&6(SlksyQ-%bQ{-8i?3X>(`v8dT?3g8c
zLrd+z^m_5Cq*;f=qB7g0Pdo}YrEOjOX3CBPu!(SjvwBc}%QAT9c;2#A74v(=h{k}V
zj^!3QxNY6}ed4mJi?uoTz^q`$DwjHV-In-=e|C1?TFKlbCiN!+DFA>TLjYRw0t*?I
zZ3DGj{}zDhF|ZI?$c*@qgP4meDZB>m;7c
zt^AhM3+JlN*n@h0%R18_aS*j)8sv-k{c8Jt}oennaH>0fa-OjYCX}FBazArIa`v(O8hIw6i9z3
zo^zY`7_=>|S;3}SMg9|h7u1Xovxbts?=BIO3oN^tzZU0}c}E0qZb=xwg2+>Rqsy3>
z(fn^T2YeT90bld|tJ>OwmxrsMes}7$aejFrA@Pl=&mkm_nqLux$N720aIq}x|p`kae*d){qaw#SbVxVUu2
z-cbyCiA4Co+*Y#pYITmdUHRtQM7xvrOrK4M7fv31T>gIjNMaz3Y4~cyQu2L-?~Fz$
zY1{C4_DJsQ5~X1lGy1wJ;&3G@IIt5K8^dGRD|YeCWar+FrwzhWn$9ewE9{RTED}|7
znvcb_*qDbBDY5YtX;-Pp@d5{t=RPwd*O{LuS7ntw=)#+SLZf3or;)RZz~}Rs!MllJ
zQ98sjeYN89s;yw3&s?MC3yGYVyi(fsqSTub%OusxAf2&;vEPcd%WoSx_355H%i_CF
z!BHD#MdKI8?5~3#J`d@1NA}^5U7&0d0sWE>rl-sgVk#6i5yM0+d
zo1|AAhxt91Q}8K+iGj?YgeKZwE8;@2nirl5uFrYWa|*fO0F&q~RB#4^;LE$UY#mNb
zIrpVmaBd1Q?KPsPH8q
zMw+&dUn|=atO&bA4$Wk&>vmh7^}N%KkBRFR?QZn=x{dIG4yq?P9iPJE;J1Cnj*nWi
z>MvKe1$@F~-Fxnrys}FzD*yEY%kM4JT1~WR`!Ndpw|Tmq=RA_s>km^aXEPxJ%~6k?
z@%XdDf;xJi^OWJzK}+W~6H$^TOohbG+P1gEU@YrtZDO~xSqXhf7OOww%=84dP=2LK
zO<|YQaa;BlgCM9u)391gzxBsrZeN)M?qjXW1L5}PVQ|R)lQM#iwy2B3FV<_~(+_^uMkmquJ<>SxA
zlJf7b;oa`8X?s`44I1j9VYuh0R2NUX8FSC&66rjti&#JOW+ZsmAQ=dn%_}$-wiv
z84rimnq;tJ*=A12G8mGM(#`qkk`8Y>fGM_iIZ(5e)-~n!*Qg@!>0G0vR{jPy^twWj
znw~QxBcL;W#;RNcbbvOV@BDe#M~uf?Om9Zx&f%0=(K?0tXuc8ASg*NaSSuNnP&JuZ
z;-TD^>a1R+Q~)#!}Fc*NIU^sXbvvdp`ZGI8t$3kL8?G<^R0=hI@Ww
zbd>DrypsLNZy=Vmb#nOY3#?cM)M}fs1OdROXh{|`ox0hoIwL*(?G|+p`~y9U@sD_Z
zew4W-=*>G0|9DRrj{eq6v~SKn3{@>r)8!#R?0TeIau=e=vU&;?6yv;1
zhZW=8V_unEfD8Ltrvkf+f9^9lXCV&x;iHwswmqr0Mr+5xlf^woJ^-P2cD@iX=5fe<
zLZGrE)X`z~9S~MPwF-g)B56?w?hMa=bgii4Z94wCR((>>;LB3hkxZ7)NF+ZpK#?&jf7aq}-y($G<2zs?`Aa8Fk_8zg!;M~R
z)#B#Jj0r_ha3m>z#UH_RoaKbWLE$g%taO;Ls=qr`kBS;4#YX@f{>wGvrCmg$mZa!n
zCs%CBN~d+>y(W^c5N`*qYXe!IM3wAlza`sQp{MY`B~?^bHY1|a3kohc*uT4iz*Sr;zj^lyaM*kU6^;z8
zZ5MF4_g7uF1}5t~J+yI>UA8;fJf8!%5QJ>l*w}!N9=aWlINLgqu23}V(NWXrbRMhH
zH9Omz)Ox;SjZ21a>1<5!uT19PJ-d==B{IFYr6EMjVh}a*l
zH~+>@U3uDLPEX$y(dSsfwD}-18~s<92bB=JkW?;HXqe+(enQh#$6jP
zeczn|#mkW%sc^bl?zjQXaTIh*O+0^8lXrD@^SJ)fk^!Oip%V`*q3|DT7DT~V2Dd)Q
z82BR^-3#(%;6I1}1D-Gi#sHw}QU;NEH>J{{4fb<_F@|Z146pisnH6b%c0DFDC&(~*
zW(%iUw}M3Xd>Wgsnt7K^rI4;!XZHG~k(7ubk;4wJ-$vvWt>kp7jikiLO$0U6%?S<-
z7pJ}O6`yuU*(cBfcn8zbH98tLPFF>2hoAkQtIz_1tYIvwcaM=W{zbZ9i`=y5oojB9
z<;_owkoSOz!2eRJ(`U$3fibD}K1pMCVQTg;H-G=b*5$+RZWFTK
z73@Z##7c_83o6h{JZxI7+Ku3O7aJ97zBic6as|@+(F`XU%
zYCkns+<5lAq3@t-X@D9qR!|J59j~sobW}PnH2|gyveMDWfe}Og(O0rg47XoN#38rW
z0VM`fT!3t2-G4be^AZH8w*wkX@|!wRmFOt^;}iv_1tQ$C%JK>G!aXA7a@Qx-cY+ic
z`XukYAaE$Rd$duwDh0U3fnzCmST=~HaQiVyZP2?~&1lI$WkuDXkgXttk;aqD_wYV>
zj5fL(&2Pr5kDR7!BgJU<54g=0-wB7zx|kE0nJto7=#;NQsw_D3--5`3<=!o~GZ|}Q
zny6$=L!zP8CppmhnT^zxdd&=vb8TF{tzOGf(opu=gE>=K+1Npdlo`Li5Rq09#N{i^HiKz^)N|7br(bKtDOQLCnBwc$o-6&UY9
z%W*!b6h~6%Hffah`M>jR-Vw7|l)XNC^caIIoLc#{q9@_qY8TO$M+Q7py*$Gy^r{Kt
z0yJv-VIyVcHoRfc@>Y+*7(VBW~VLe-ZGScpTsrlQN<0!d&9H&G$o5qu(3Cj
zt#;37Q%+tPa|VP`W9TOh#hh<`;6H8TT3M1|KrlM+e|w0|0qjodE#5|n$|(mT%Q!t>
zN!glAzUCe`q5P@aJ}t+uEEPEDA@l|I?XE%U@mE|=f>X+88|e3FI~O^Z#ZxSgH6o55
z=G{|ub{(=6yaD4?vJn~`~Fn4*Sq(pS_Lsbk-hNd2Q(?~X0^=**CXWaH_x!O
zN$IKBPgTE-(QDW|l0g278&}NYcM=L>POY^>Ns*IeLc=8w*Y!!-TaoK{rtk7g=^CaR
zrR^&yhW6qzvKS{ENo=Z?Mn4N65Xf{=bVF~hB^Rw*V)Q6xIKUl2sdT0gTKRRg$qVGK
zDdY4;JuA$JuWIiWglcK?bE*iG`o-jK5(~tB*EiT2Q+*Y^=p%{j@RCl7Vx^iCa;Und
zj{@=x&d#0qVnnUq^nM;9Q$iwqyNZ8O7)|iT#}j76ZSDS?hxVd+=T_XFpkO=BHS(DQPb91s30VJwv+HsqKjF}Ond
z!w1kxA=Ow0ciQR#F-*F<#%*p!x&k>8NkFyArqUj(6Ua2pX{<*KEZc
zlu9NuPFJ6P~D4(PU)#EFLjMbk^rB
zCmkRHIXo)s|0$94-4G}Eu_>E#pBSWOvvYWyJu(|jAV<=z3BTfOauu)r@7n`e=n!$g07f=acPH
zO7BcY01EpIi~1;yK-}
zHncpF@w`YbjQbg9syuzkdx4k%qJh3%zgN9YI2j#YRLPCc9{I58WLRBn5FQguGE5b#
zEv1(v1?@nixj`k|pO$?%&na($O&l1_;tHWa>HEonLV$@uc
zoKzs6|9fkI3dNDv&Uu^Ckz&4$J6m@g&(OG_zcr4}9g;26Csvp?ZNdUN!Woe&tTw$N
z8)W~VAd1aC7To306ug|=i-|zV60{LB6pMc5UW&EVMxS=&Sx6s_d)g>M^jGqC8d^!1W
z#=DL2P4t-rnO%>)-mh=Os%KKq$lhqq_r@&%y38G2ZHLJuTRg8TuvA5Wr1M6n(rp^J
zg^Pg&lZiihzYJTc
z)2O`&l0W@*_bWZ!JB#bHyV*wx-6zQ*q7RENMv-2t*A%q|*F1(Cx)>~G#X_gD>s_K_
ztXh^ge12FSy%-*4xvNhc$-+!_xqZ2OI$Zq9l;t_2UhhX=Z#}|E+w_Soqv0qxr~M0!
zZ%GA~Z4-0P!|ZkTgtU~7&hUMDytzF*up8~Cmf7Y40J94~4Sl#*4>HU;HwPb+w;#6w
zZ$hJX(i6sJYQ_SO|zV9T}ZVuEI*RnYVKcc|o3
zFS!ht7jJs}Z>}Vs)y}{5a=&tD6GGSWZ}QRCY59!NX9WZzO>%P>i+BUc(8+QIzsau*
zW^vsI;;Y~OQ_2Vue3VW@JVyKfBoe34q##>}3}e#=s)wKmX?a&vQQ)-CN7r>cot(q*dBSM7MGtq_Y7
zxF0oK-QJz<^6=yz>fW8Z8@=o>(CcW6e+Lh55F9Q7XPAeSoBBnfby3}1DPL(eMQKak
zy=WBsSggzymv-rNt_*Lwp!Xr
z-Ois@>6mR_+V(N`<+-q(O#p6z$?o)<%iF6ACMgB2+KNH@G0Luu<2&6Gex9SSKUq)
z_ed6-V&733EhQ9T3+#91#l*&)f6Tfyd5}SMybwjnRZlOpAg8zK>FkKwNR!oeWnVWF
z6ci*cDk}OWv(TM?TXL*3YbwgMIpaJ=%6?)$IS5^M#)g~8JsWMeNAWTZ^YFqg$a+LE
zkZAFBf_P{OHtto0`_+q;l?wyB?8yq#^xwa~3&eDZ5(R~Z(%mGyRt+;{#l{_D7}Y>`
zz^Xs-^2Uu$n@6?6s&C3G#jbaF+eDDq+|q*m+&O=F={t^_S^2!kPGDeQc+0{!(|E!m
zZ^<9H^&v{Cs^8;TIF$_6*4Eg^C%!mfV`64BH@{8dQL{1PEfh*9_PYKT7oaJ4vbo(9
zY^$)Bt^!v5-=qJRhXM~jk#Xx>of_nWnWucZMtl0oQYV`!Y^8JUXrz-*j+-Z$jOctJ
z_pt1!DD;yuB_-bqVP9lU>Yq(&2!utIuHYf;GIF1X<-AjvQ!PX-@O-VZ%@!6qELE+Q
zE-2K8?vygc2K0I{ajALVXspVNaVDbK??afKDX(#HUS~~;Y
z_{Qkw(m0u+;hjo#E7-WP>(=Pdl6oE)QX4rTg*z^lDYormyY9g4NSDP>&tZl1Ao;QD
z)D8OXNVQL=D?ARCys7NB*J+YR+hL3l$UHx?Hu$Pv*{gSZqATZ|n4cCBLk^wtwGr(v
z%~MoHcVZ54qSrmORp-YnGgiT~GEXGx9S3+Rrwd@_txrM6-faz(%Lw!FQ37ve&xc%ozQ)nu+y!JO?a62Wr{j@22
z+d8dcI}HQ`q=k^|GHC1%d#8ArlD5r|lVmlh9
znr|L1fIF}B@x}!|e&l6Kkw3uqv}!+pU+pL@{lvuc#S1!4!uqUS^ffy(?Edrh^KAR5
zofG&>Dyqj>mw(>!4HlP4zXKlfLOwD;-ja?RpmYg
ze?l@^PAm@x>ED;ze*n9_m5-dq+qC-F7@LK5nmI>P>yBqSyJLLx1aavv$Q5XyS}pw#
zWkN~~o_n=zhtY>BeQ1w~4z&^U--vq-Ey)qa*0NJ`oN=04k*C}`sN!YUMsHwIMx(M8
zgM;Lv)~DZp#V8x2y0!FOQSIrwZwu7?=1e?1ieq70ImX(JjH&LoR?XO#ElXp$YIX)c
zw@}3&ueEKpZa5b7WhI&86TyKdp)LzPSFDFI5?HHf7p-hU9XGv0bGUrz=c5BSlsqf(
zQ-~XV)-!o@uf&-;yO%BTiSo>?NHXt|ZNfgNpF^X7(a25g+64CsftY2R9wG5wRBx@&
zo^Avr1w=@VjJ;Xt{p>Lz
zC8P`BvbWSIxUwK7$kM*K;g2KOl-c^tQ7QekoJ%x|EWw|)%(P|%tT>Z??=^DRnuEOr
z1pdx$aQG|x|KXvgG9v6uGhClY6*dq(qx9Y#SSA#xY5Iw?U(o`8T
zQ`%dR2b5pha!C#iH_dEtxsWOp%f?P7jj0bDNSQG*=65Z<8r-C>+WhnR32R_zzt=)X
zP^h(fhWo0)s_9&B3(c|92o0n1VR#k%{3rz?gug4P9KZZ
zo1{9yl*V#lwf0XECG3R$muMT=b39IdU?roNq&R#$6#i@kt$f$DYAG*nBffF+Ollh6
zxht#IY??9#x50Vh!o|6{?ov-9UUBu{s6+)fSHBvbm*+rPgw-2^7?i%O4T18Fijf!i
zTw(1X388ZGiwg%IpC)Grz`gqRSW(X~Fw(z$dnzt3Cl?ONvhvSShjYGsK>~M`S5q^-
zNlgtpG{5!N`@V
z+m4zRd`7#Zda{Hy;LLbEZccijclc%nnO~gdHT7VO61TmRr~l=X-PJRTZqB{eBgeRF
zujr|u%~i)0OX`if
z*^wUW?5n2!=}E;J9C&D+0$u*}6AK?d|N1&8Os2qqsB2`%@g}UQ_(tw9+LPF&p>?v#
zquRk*VyIQfb=XANUCMyCXTX;c(|%j_^m#Rj41Zb)pLT{sv80@^;(WQY7F}#}b2Ejw
zc8Lmj0;0}xb-=q)l9zA3!7u!N}c>-ETJFH{J2nM|H?
zOi?S$?(v6nDVx8-uqBAb#cXT>wO!928X79TKI~F&FezAtR!^6>Td9`{-EkY1W|qe`
zi4d1)dm6-iVmf*d7>s{8b^e?yTV@-l&7*Yktft<=vK2AdccG_M>f#j_RV
z7l)`6aK>b)hXa*#GHEPjYIXGa6G}Ccy@Qx(JU23`8!tEHSHjY+dBSiSp@St;qCHtV
zoY^E*#QWwJdV&KolX*tIT+@(LEEj>DivC1{TYLc87KEo96iELmT}FdE@z@c#bvmO`wMqbyRM<`!`-;$
zjgL*P<6H0YK6PJaOvQAD;zo4$ye*(SQQo0WnFR!PeEzpTyIYiuvMeC~ra4Elf(4dV2?MhyLiDL*=cd%pK9wCuhMFhD4|qqE=Q$f(^!f
z$R9bQ3%^c#F~_*;U=kD4Rdes#yUBqjqXE-ajvHJZNN71a=9%-H*-gpRPFsSY359H8
z>MIHgVd)$NKfmb0Qa=}53=Fc^tzm_Mt&>j?m89S-#4LS!*V}fFKg7RmuOJ1aEwD6e
zbP5d=4;t2)Z-RW*BBIR>)t8V_EigW}tmGayvORRWu6e6T^P1-PYT43Z(V*k(>jP3MRB9-1n@-ggaPyDg*dB;AX`mycp!h7dzF}gL
z_t#rr?hv>Q64D9=jMXRu3tjtz87X2@7-t?hG%kC
zyq9f6W>bx=^i|iIJQNNld16#^bdK;;8l`m_cUv^5gmIrncYrVCvfr98!uc~v=PKBI
zMl-C@CLnz&Ax8VGt25tx?-aaS`iaY#TP~&er|l1aZBMx@{a((J=;Z5mYp@kAFdY9n
zVpmc>WD5x$CXcjMC=k9whT7Iu40txU1UHlSd01?)7Y6LQxK-#}l?QL_UPc$!J9|kU
zb(2(sbmz@&-qx_WZmf&+Y5CRd)g$n96teUqu99*N`etSCt$!;+-zl=MdSp@(5sUf0
zzrQ~XEp697P6S}CM`TV*XK3`OQ}Ew0Ld>P
zfR>qgXp{Pz;`W_v+hDTMxM>o`&@n^m7{
zuWLI|=9wAYvq#^|WE&o_nStH=5C^+JWD4(u*sjrkZdfK<>VXbF+JG(KH)S*1%E)kVz0mK-XjVCA1n7qoRt&=}99}qLISekO@iqlA4uX(xY
zeBfNWxC#ectI18Lh|H6&#-RXfx4dH^wZjWZPC|e6ioj8+Gjx@dCar>oxgS3mSWQ1|
zsz#=y^x@YFzI^#o)X&ck)geix4h9Bk`LN@KnO44_qwC#73VDEF&6_$eVo2@eLx5oY
zF?}9Y8(>1Ocz86!!^0zfGrmC@Q3g;Bb~l2xJ}&GJ(I$dv@XMG8^kyh?d9dIN_DZgkg^7sE7v?J*U0eulR%
z((3JnZ~k<24@E(H2dd}Xbo4YpXj;3Lw-q&<6@t(KA$2Mhz6Xq0W&vcndq?I6`aKo_G4ZVemVdAG!Wm(*
z{6>~2TTuTj<%Itc3*WbP`hVdjkbWcpjG>sgIT*EqY~*A_(zEd;#$W(DMExB}FH!0;
zaVLSLjCj#uIShdyi%m2WH^re}#8628w}0Ky@QSy?Eh-Cz$`^&5x~ifn0h3`aoo`tE
z=X7wPh+h6*?}Jwee%b>2$&q#HE7YIa)y>U9TWnA9D??{6hto8?b@W@vXKI%_Q8qcA
zLBVv{eMIIe0&cNXnh8icl}u<+lsFxZ_%j&%|dE3b^t@$#w5^{6tz
zL!>kQ8SKsMgBH7+J^IKYo7HN6E!XO?Nb5Q5eU}CSdx{F{JgS`OteD4)#?!>lRz@Fs
z)`{by?r7hS(a%D(`x*Dce}Tbn$2wp=f|jnIUB_Zzb`L!-_lN46skYp)RJzU49G@o{
z5gQExZzMLS)#-aY1h!&4a*E6yUU8GlfS_zMaa#JJCC6kDK?KuYH07^=LCZN_ebEZ+tm9>ODcYO
zU37=C&o1fQFw4~eGpKj6_qf_O3T$lUjKZurV90)8{aqU3@||Cj;X>Fc{DggnrC{H1
zejjQ96_AZd#1bTvdfIL^F>&zk^Ys5*bFY;2q3ia!=d_xmAnf1&LY9!MmBhwY6{MjuH{0MH(u_+XxSu$YIDL>}3)3cdPinJ?vzV8mi!e
z@BdE3<0K0jutsEt5^>Y8v4Os&0{a@(R!NdWiY6wxpd)i(=tKAha*l$f$m_~wPdJwW+9&hN|6M}wI+zyg;j(af_An%xKIaPK4ILyrQk&%%p#NDq>
zqxJA`sJylQZi3*7y`=u}62S5QemcVjS3n=Q#zk*5s!W#JLM9vC>wu=vaG@IW$@+j$
zO91*9&;hWv7babgii$G1I^9tRHzKc~V87n~0+i{4AA%1N(S}n6eE?u(W-m#)ZfIz@
zQ4PH*0(YyZ7&Ys<$6G)SC#c^VgdNXe^C3%L+i3y8es}t3G6vjfL~?Sm=iSwuI@F_K
zaA*jdgro%S;iL7#E_#(rM5r4H*jsR=of(m(8ND
zRl~_B@)!{Ck(7veJrF@DF)sxC>k>1L!1-$317qsH!~
z4J;k?ku)U*X8lwtA~1{U345Y*>P!bDtlvVi%&
z@{t2PflO2aw)JQg?SWeRtz#gGw8;*=2pO^YocavhERX~c>*(kR3JX(t_wEZ=PHLgpNR#&unA>2=QZT-;^%=i2f|4%i~Bs9-6`cp&(So?a&MrPN@5
znvng)N~{JEB9a*zqIEdL)6l@cWVJgkBC~qdMFPwsMJK14CoQtzNlaFn=Nv4xGrQvM
zw}4(@6yoHfUv)1y;lDz)y+}VbA>h8_I$_NLfm`qp@nr-Ky1x59zI@Ui0OqLobUos-@BSuYXKiRgc(!lqr}u>h(^g6bCy`Q~ew7
zZe2mBN6W^hyfax@&V^?2WltO;XaKY{A~L~Mfw)m4@ez_0m`>{h8SzYpL9kJtu^$7C
znVL6M1!NDLcw7!zaib$5(t+w3csf7)=%Ls0DW11Kff!USkOeOQwgaEbF1OZkulI>l
z>es|XLI8z}N2phtWhHStZi2fT1ubc?oPI7Acj)RKIf*8Ar>}@%03OM@u{(Ka5jO`$|z7;adf}j$ayaR
zd~td3mv|P_4>tJY*a-Bxj9@YWZ5flHY$<#OU9a8REjrlM)4qBo4s1ZAUH&?+-TF79
z?(aZI%gA)4GdiBfxhzpSr}Y)w7H|@QFo><$SaFg+DuIzb;V+!tim&1Z2APl0i3`Dv
zZ#G`-4sDJU*f0NiCjAoOU6!Zqg&Uui-GE5#Q7^Yd_0JhAR1!W-Dw*VA{<{kqsT4jf
z>-qzKCArV3Y_6vk;yKdFNQ$^rY7bu<#Am;hPRxy_Rmr!WYjgoxIcnC3`;kK%ieRQE
zyB&)Ex8kln9LjAEOIMXVTL-CVpA(0ns8FbowrX5v>w--}kDc3OlxxN@Fq0wL5jM$aBy+Y)r5O#1L6pw>jeVY{|ITy%IM119{`fGntZ%K~`n~V_TWj7y
zE+a2pwf1ltTp3?WW7mj8#+nXp`xp
z3LY@%h~Fovox*3iF~nO2820N-qh6eyahqNTt=p7-1%%~I5G|+
z|6ty}4>mt=m-))OMc;ix!vv~EeLlVFt(k0w&TXk=2S9SaX{WyS$)&axyTc|AFw%GU
z(N4>MZ+Jd7wg{lhh&1W%(M9a0u9NHYR99DbDtC)kyOXczb5R*cq-S%uj5AYwP1m&)
z3vjoXdpMbGCVRcmk)@;SN|mOh>3ctStW+^PWrqGbV0JxzPq#}dlA1O4e;p70p+U}A
zsif)NdVMQ>FmcCyw@1=J!!MZild!ouz%UMeubG-Kvp|!I@14@p(XoH^z_*JPL@gPt
zdkew9&BF~PsqUVDcj4g?X}cyYqSiFMpuV~VND?V7qhfjmvBc4-o|>>qECODw6IHU*8jRrx&BV?@*>FrWC!(q9^$Y1C8uwy{YYuUjD?cgM0Qw4-5_l{WEmP8!mFJ
z>4Ah#JsYHQdNBW`q{D??Vqq7-cL4nxlN$2?A4Q1iwcCDtkm?D~MsY*uTHTq0EK#Hk~>xrD_=SrX|&ip;P@@zWEq;xrand&GWP+#JLyZ@t=9x
z|3H_Vs~_ucP{1Z5Y;bsW_H
zp}mT)Zv%ZurzjY*UoXPn8tPX5dy~JMB)P>pML@Vlr#|x%acE?b!Z-K*4ONv~=Cq|1
z7GaR6$nFFYy65qGAZ-1p7<4TX=>v7c?9`|Oc(eK5y(#JG^e0=fjT!K^wWIrvdlx4n
z3^7}T%xXy{cko00V161O8V2c8i1b7DEtsWPSzT2V0XA0u-P-ohAqK2LgMhZwkFTG4
zevUxb>a@UnaG%D6zW9~KBBN6KO+8R*K9G$^ZWE?(y
zD$$Rq6Wk(6G&MI3X~GN6XbiQuhTO_OB9A&cq7oZkphpE;FR@5a{A7?YbrL3WH%2+L
z6b3hMznpJ(`JU?PYP;&H^&-#qtdx;qSXN%{6mai*cP3|MZq9DMiBomN
zTXxeYE(iLM;&+Zz<@JPOV$b%}%gYj7(Ifon1aAzeFK+#qZBk$wcmBMlk&$DGJ@a`1
z?11vlRla9c1q`*>p-U~kA#6SYc?8KjJ@~|~x)zi)^;$K9*z$I%p?gDz2>I+vs0=Y&
zLxpwG3oWg!ZwJ%xpK=N%MUu0|SF*FqB>Azlc5cT14b2goc%u);DTy@gty>S`2gZFG
zpS4yrd}-&1ro+fJ1)M4H?kr51d+611V=Z41ZQ0JB1H82w1X-)bxyygaP<9jtdxaH#
z+M706kJe0Osd*zPg`GE(T%x`NF^{qB)6&uwh=yMr^@&@KQu
zv>O@92xuz`gw>iY=%YHBaDPqQM$~)_Earpsc)Ew#plrjf558GZbDz@TP=;fg_dVNH
zH#=9^!rQYJ9u8S&24oOwmRQ!cJ{fu2?-Esmj31{LXJaV;EsOg0dXnZGX
zr6|xiB{?}C{&q&YuQm>=Paj0_!d3*@REy9ZQFq+
zb2#(Mmx4GcocKrxB|-Nwb}-4*w6^UoT-R-`Z^@k)sty>+3VJ^~TI(v{U`DNUZ$fYE
zT8{>77fMQ!w^pOLFXWYFs|gz9Ou1mPZH8?_JGD*jz=#{~l
zF*oKbJULufU)MRq_OL9ZNinp9L&)G{!z+Z(rPvr2YGhO=OfarG*KdQ&Di
zn?9EA(XKLAQ{UdIgN(qJCsK=Ww+79`0)T~#`Dq!)tDK76Dg|
z?9?Cz>gb%ZX2Y-2f;7E-MhBM=yhV#iMz
zL;-M2ZvK2KF8{kTV=FuLZA$jyZIXv{<2L{`Uy8)<%jYvF@rwW7WzknT+Yn03mC(}P
Ph>nmgC_j{%yPf+Ns|mpW

literal 60740
zcmdqIcUV(R*Ds8>w_rnTh)7cbX;P$jR79jB2uMfiQbLE&LQzpcP+I6HRl4*R2t|q1
zNEZTx9_b}O2=$wd_xrrhAK!PK_q^wv?~juUvUAPeGqYx9&6?l(t+n53sw+~TzIK{|
zf`VG<(E}|CiW6QG6vv;Rqy#0n*w3rrLit=p@d3Dk4_Uqz0WPPU9_hPMP%wo+|HmR`
z)+{L~u2U#Ixc9^>X>k;uG;R5e<3K}abJUeZpuvfz>F-lPpE$4I;{I|k_{*2KH}0IO
zcUgJ;{^9*~!_tL1{i4oWh58Y{xzYV^-aTi#b^ZRd=G~Xa{+>>vk1Hkoo~zB>ig13-
zY@L~Be1*>_PB}A@t<*ye5~q|^ny2dj*wkcdab;@d4Bhb{
z*u1(eZMo+gmpWi!VvtyEt2UeIuHS1A1-EsW%_?6^pdt1c`1{LtXxItz7qpM8sz%Rm
zde;rzu&RAgo}irBvv?I+n}*v{r^o08goUGZe|JksNonUi5fl*k2`00*yZd8!csQFB
zTDPU8B_Zj}+H6OB)WpO@Sa>)zXC3iE97P~h3J%F0CKmEN(jl&-EW
zw&JYvPZF-P78Vw4tgNh^;Z5Rob#+`Z$|-gRKMO?)&}cL?y#)ol#>U1<&(-Yif!p*<
zOd|ZeSzy^_*1JZvtrrq17CgnSsWeI*f2gQvm{ykegqsW5PJiv%3!o6-SM8ax?(Xih
zG&Euo7p6LaNa^Y6^)Q2uZPS`gH9PQtEes|GT71I2#OGCDTVOrNKRTOPzOk{f=wF>*
zZ7Y+UoIIQP-Oa;ena>N;($b+33aMGS0VGCktq%!py)eS*W&K)A|7d6YuPFC_eSf^L
z^Pu2-=k4dGY@Vv@v#eY#8~wu8|DlTYEeCYG)^H*d4OqGW>l-KdRqy*PM(KaRW@_aw
zp*}~mY1|?!y?$8qBYb^VI~Voo?I~yndWn`O9B2IT3vcZ#o2dL^S9(O}T1U`MX3n5v
z>Vz41fI=F_<@M~Z&7FkXUl0=kQ`|Y3**kiz{>n!;ZT<%Re3ITGaUpN%4SOJWBIilh
zl1@VPQqsm>opQ72k8VNE4~lS}g31=v8qZwf><`Hj_qPjqOUr|k4c
zKCwY%U&TP9X5!eyVWzesd)4z$*)J+kma!Bes0&N%`^i*psWh`eNd;M(fNV~$XE!rn
z4H+Cv^(|bYVJN7yuG&XqRc}G{w&_psGv3WvZ`p_$i}~nHkd2_}Ls}T(tRs86g_6!f
z^{s1L>$VtEmWE9dmo{CahLPGiW05Yl*UNh%pQsSB`nJ}i6O#YTDmxHDE2l5!i9c(3
z8!V$@p(5)RB*XYn*A;50yZ+OkB3}Nml_tWb%5`g-B6GV4wBPx)^djI$E@o=8ZXj}#U15<6N8FbS|8Ytg*
zU}G(ZNMVZii%kROYp9~ex6rL|uG1!Q4YA#7+6;1{jJxP%n_FC6TEVW<27rd2U6zW+EPH$BYizi_dV8Niv71J{p0-
zC)@;`P<*sYjv#9_^uTqc;RGfMgVFdiUF}c(ZsYMg$$rc$oSw7gD*mjBZUu1@7SLmm
z6`7z==9MzB;Y
zp+6Kq^5;bQnke(%f(`F~4h|ymFRp-6D%v$d|zw38%eU-A1si=2)%bd0b6
z1XZKxwa~qcl9!h!k5kFTX{$@HXD53MXDpZ6_GYoQMzX7Dc=&a#;o7v`7dx^uKUNE3D3TCK3lK
z>)p`=GVE{(Z8_5x6V)}qd4zbNPr%l`~$3c4-SX>CcLNugTcJLy%U&%ojv^U
z(e0LY2BB+4y$LOHgHL-6zBG^0HE0No>3}
zAF{Wkw%erMRlTx?GQv9nMlys@dubgNpNCPwEky7
z|BGE-uZ7K>m#}ZT1-hi|EQbo+wx$#hTGp~F#GYZ$RV%8D&&~h>Wt|BF2^}g6C0XUS
zj&4a`dd26ZsHjLBBh`y3GQ%ypWJn`iqm=~?gzS1dmNCB^-MrdEnQk!yu%fH)LbYyQu#enKns>I~iTa-tOgj25ktR*GJ_oNkRi7$#3P
zrGs&r1G6IYas%GhuBJuzA|K<(X;v2Uqj1UjFQB~->XFn8qKlr0QTK%bcBOEM**IJ5
zIY>)aRXg8N%jWjan;bGAY9wB$&b+AfvC;(t>_2fIAElCsZnDvA~)GbqTo8I~iKSBa&;yuTVp`xO4
z-R#%nQ0kIg$e*J=>RN!>>N_oJx5Q3k?CsWU9k3``pz`R7znGqpv%_}m8TBz@ajrek(KMrDt$NwK5L
z6b^2MS}@yzBe|@S&Ar20GciU93}W~=p9*|bXL@3AvwvV6)y_a
z;FLYVU#bPm6eIA;@Pq%Np~q11r)NejNB-6S3hRsmVWgn
z{4p0<5kW|O%M8(2F_XjZ_RP#~hN@ECcF(3@;ExL_AOtlODpivuT(9*)^T>say8%6jWI{bxo}yV^
zcF?>CjWLcMDrGlzb=g3XsTeC4nnpt-Br=Nwp_`u?K{MPek~1;3MXGz2#u_e7K??At
zb(I(Kd(RRO$!mG>z1JoXtCv`dNf}$@
zJZeaw!UnqjFVkp0PnP$s_hVpPYKbfD6(0kiw9PQ~l#3S`9yBEhAAYgIKszbG_A}Tw
za2rew%CjFS_=EvI-}0iw!OdOPX=Ps8digUsF9xPuz4(_0B+@&z=I{9>j#d0C^}Fw6
z+DB7e54Xz6?X_ru;Q!pr+z8i|L9GHk8u8`sz|Crp{bZpJf7VtJtZlbgPinb*B8SYu
zLLSV)>>AXpjkM2dS3pHY#S`urE6k%zEhT`^tgWp}(}lkkEFgq4*Af+X3@3|i?Cfv^
zv@Mf^g9Gncd6PCEv6c~ui324IgWL7vEJSAwY2efhIihr7$mD!k>fKDTRXYZI9Q{eI8S
zD+8!qYW|gG#-)0uK4Rz};5NUwxDjd`${nLTP2fi#8C5&&r+M(ZD9QVF;aR!a%GPXLoS2c$AJHHFAbARNG5vKj`x2H2)oXN1JX
z;{cR~pwNjkS2B$FvQ3H%dks1O(?;tbOW*=L*Bn4?k$~~Ea&r0#(U^@vC+O+vTN@hg
zg7&)h$V5-m^WuhsWya{*?x%ni)GQj*&g)NLVgnVg;6izH!I_L4Vml;8)bOS!hCS
zAWo#FjY-1x;Bgf5VWMJPzVkCk70f7sG1B3aInWcTTx!_;b+CSqW9B71r1S30BTZoh
z=2BU)nwLdtCX#Wq);<-}p6S9Ty{JG=Ht$OQK*b8I%ROo
zSm>W5I+83Wv0OgquwegO8LHqlYt-^1zr@N(`(TzsZ~5`^0jjoAHa0?T^?l#MCcWwr
z5bV_e6S0n9COf{)O{Ze?Bn>FK5@%C8{%tZ_V!N5hYXge6WDa~5^hEd|vW%jG0!(vD
zy3~M%?OwCgz(2fR$62VdMT#h9G8GFtd-RyyJB>b6dQ*7i1NzU>U13}S?;e6lp%30UZltlhZRQ;VQ8pvqR{edDNAJdJU%yP0-^{|
z>Cf|9N<*%R<|^uM{8
zIy%rhkfO)zZRAg=B3M6D^wcIo_)TD6)N$n3;z^Bm;CiQQ`O%_OTSXWOTQ?I6@e5mx
z!)AqeH^1d2v>4iN8)j{SL*2^2&9z620j(qMkA7d~JKo=IME)gH{cJy-{A;eL>#^$<
zQFaz+N>q^pK58<&3tI)1gdMfP?C2hU3aw&~4kDzK&OIHImEHDQ9`+wp{WdHw(|TA%njJk%`H>Ll
zK%O@z2}@ssIu(u#LMp-C#=AH4cEORc?BFRT&{;1tfM%!Jgr#h3+ok$`3ABZt{Iqr%
zrP}uTBQ-UX924_sv8D193$D2Qo)UD^%nGPNw2SQvQ|?Pky*N&X87`~aoxTsDdvWTg
zO>SB06H2(=%VjKlpkyCHrxR``^=#9+Uiml0k19dg!LL;EgH8#ZJ|@R|7jZX6U0v6k
zTIsq8Oddx61|b1$mPAA*%jFc%LBN@|j>qbH|JXru8(pTuMV!)JQ&8~wi$5W<69C8d
zgs;fR(%r5#YufjU0Em)~$@{VP*0@^arCI(?A9XmqhTCD6iI@ZrB{phf)hyrbo`z2D
zyLm&1GnBhdJ3+m!4@eiP9jDyMt>LK_Ria635@icNlZwZ~k|YoNxX?FnZa%GziZh2v
z`z^j(jX2l+9mNtq3+op1S-v)M2-t7T@aK|kF=47XQ
zp4S|1U$W&XA3*ke9(5(saU@5zyQq7Fz0W8eiQOvU@qjch&e$L?CS6mRE3>v|bn)sX
zZua=zf$o3I>3Kd|sOkR}q=9zR^Bvp6EZ?0#7OT#mTN_V?iS6y-tqbAeTrpNu!M0#5
z;+3$ciGds}N`?g~gbw34)>*zsIYW(5pDnGEg)QU-c8E&f`?+0Fx@uWS0!;SG#`hxx~agX&#OLD1pSKCKdI$VYN-L`T{)_Gd}x=
z_|RliAtR>5Mhj>tyIJFwTFhg`mS{a-?!A@Cp)7vcjc?7o9T@1lUFTF~^~H^~Y8{C3|2?m0$C)pJV%1IWZZs*B_--4F{V{U+AlY@)Tx^
zwBup(c!6>!TiAd9@)1N74g$Bq!4ucBtrhHYH+`e5Qp3R)*Vh7R;n7X__mZhBVSj%`
z>)^<{=1En*$8+ABO8=p#-ve#Z@}F6Su=PRBNN9vid7!P?4wDS*SxW8iPfG83k;)Q>
zU#1w2;z{ETU>7U1w<3(llS)f~6pQNPj7IYDR0_
zkRvG)Z!mY-9aQ}!qUx4&ZE+@&Hk(i$QqW;3x8uP)Hiqo>mH~$f5ht~th)IbQV_pmG
z3_pqe;Y!C8&7ZQ{VzmEzzna{NDRuS|7>%jOH~Pv}B(d|75sa#o6%uI?EEU*9DN!2e
z-_)Jq$EbTp2U5fseV&gwExy(Nx1jY=D8i>$;mEE1&xrZnjjJF2BNyPG=()hue6P!u
zKX#+xY^@#6uh)h7e;8?pB8gt2J~rB>jy3x!`9s60%GF7%bRC`giY&2~#93h}gU`O3
z9Hbc*$68+b{*QeNNLYRt8YN>Y9FqIUqSVyWq@u$XlbK~coTB3T;pjT7dbXGBa6cbo`^e&EM7hA$1vPthJd=8A%`4#zLi
zm1vyXAo$p^NQ_s{E4|J$ub!XSy|upvP3bj-#xp`TOBG8)KjqeF)28-qHf#FkHz{v%
z7ka}_N2qX-e{@!=i%*ABNAZV6O)E0cIMG6ULc>|j)uyw^eVeXkqUzJ`CClTn*qchB}+UUr>KCf69@&51L&
zr0c(y+9?wZf8P1mUVcUIwmKrAFIwr@Go_(le|x6qNnVHb+xg4PNN+BLcMJWca}w@z
zpOpmXCb!8{Op@dXC?)}U&~f)Nwbo||a-bsKZJu9PK&`mWi+mx98E2fEk?l9h^BL(u
znw<$@No-wQ!~t|O$mrLUAtwu}-%ST$uGe*2)!5e12$K|x$vg$n#9N8YRe7shPma}*
zkfyPP-ne6!m=~G8Ynyax^GSyj({zNNW7U^Z`CBcslg&dRJp73rYA2>Wb8j;b+q#fi
zDVVuFMhmkxWJe@FTT@ZTGJxjA
zZW|e_ya5^Oiov|OM_e2orb%?XQa6)h+BOh3LBA9lQ9*PGHbW>0ayea65{T=twQeop
zgrucMrk{Lw9he9q2D6B2-%j^rsq35wx;
zT|v;Gu2%L~i-pH0q
zj__MFm-ziDcnc0(^;-TF@4;H&7kl6464!=$jgEHH-C0DtwIhGl8iqPx{i%IW1WyaU=#<*}P@*Bk=S$y2OWaodx
z{&@O#IoqKZhKW3&!Tbo{pgEuE?JYS>+-pA9nwku^nl01tJs}6?=8*AoKi+&qN6$D0EKn&{R*KHlcWoJm{3m2c-ZVYj
z9C7Pa(?|R7`xjAUZAyQ2&>n;DR+c(CVVEoBWWS0WZhg}rmdJ;9&H%Jms7$QiOZ_#L
zir(%*&wT9k^BJl4ZXXy~U1gQn{3^emiXdmk6Xw@WIb6H?gWVL(?I-nmtEvv+#5O3m
zZF8_cfmt^-S!;)PuQw+~LoD5=Vyn%>e0M14#@%!ASLtHj-~xGgus)Wp`gdCBRt*ef
zd6{hH>ai<1R!zL7L2_AV
zf{0xtTL>T_X?>w!@#?BmV-L!y$X!(*En(bF{?
zEM4d#gj8XG
z>b8UO6+Z2mDagfw6iUN?Jqkqi;QI@vsbK5MwAc@qaVeF65EkIV{89-23Y=c@M}a_(
z^xkUou1vjIV-QHS(wNbirtV1zY+-Mc4(YgH|ibkP=g4bgqA}S2Q@p8c~&0Jkn&ca
z*iZby8ZoVLxS^p9xTD>n_F*KyX$tya0o_GRA))G8V7Ln2R&Dm>dbh*;v)Ab9L88?t
z>;eiz-cU2Vu%Q*W?Eahvfex`o$FW~6JREf5OajyA8_Nc@66HJ7VkT9d3$N)Bx0y%2
z-jRCv5O{=v)C@w_W2mwi>&@?5+PW$|a?)hX9VJKHS6SHJ_o&nX%);E<&_cw6vez!v
z(sqMoX+r!3c~D*#R=n&Sv8M(k?uisA#3Kj#L9n;5u+R!KP5{YZS-rccvfF^m`
z)6L(X(l!G@$N2m4scg8{=TOPe^55<5NZ|2`0HH@C_kJBEk1KT`l-Ox4ON=*i{!UxH
z*1|wsi$M5BGwDXUW*VA(68+h@YU
z!i1%i*=?dkAuvW0ARC9c8sdqm24TxZ=qvUoRRw|8tsVwAc1=ciT1XhW~a7GR1&
zR-?JOxlcZoFuqW(tAAlrzc!0j$I#G_JLa8x-uEzkY-7TJH;5Z&0q%0t@Gp>A*j^~o
zi7LAS$kl@MbXG7jb927yFW9lK3D@-AW5e{dSHtykp15p-6Q}54zGyw%6U9oxBM^?L
zwHA$Ws-DoaIjL!j-@*Sg!hp&{;R=2uPxhS?eX<~xv4E>3x6Wa
zDi*dco4H5zhx-$$<)v%8E_-wlV?{zhDeXB_2z|e&N-d1BOv-)=AC}&71Bl`CF3L
z$oo&iR=CsBHQt&I)rqU*SiQQ$x{U0
zRypa_=8gA@WGze-9bY>_axFhUuJ((>F~sbowtClvGqZ$Cm3!A0c1XT&JBmZE%xakU
zKJ<4UYE)C!V?_JR=SbKukL*PxI<}7gNbykupboXZO$*1wN1=P5v}Chf=HX!^qULa!
z3%~M~X`lQc*EYmpDF8AZ!fWIx7yL3qUU6<9)A-f
zfgrExm%IB7EdGiGbRRYz%@#r`>!K~@m)ZG(n*PE{{IPYA&u~>W)2Qv4jEsbv`pU7&
zxN)u`$>pjf&k<*G<9vU$`%=Q$_u(@yGgVy2?qD*~3x29Ff{|%bEKu#ZZpxFymZs=x
z_P^-nk$aH!(fodMD!WX*I9wu>!vy74Ec^nLK4f+|kf#3d!m7!4kcshOlw1G7O6>Bi
zcO7;W5*lusNkTd4tDF3)IpJ6Rq|Ft{ltj0&!8TN#vt#c^=y=G@0iRf(f&M$gA>T$I
z{j~8aAHa~QAbZD!*eOP!lH0z=?7uw$MHc3IG9{L)rd(#@t!Kl8x_<2!cJI3MC~?dP
zrIJ+(QR{6G?tl_Obn~Bnbj8Yuf#iaA4|L)U&@!O3xZD~O*+Q7TZTL{DO-5c5uQYZU
zL+SXt*pWt&Dty%z*PW
zy|)fPl2wg{S}5Ro)~6e`>>21CJ)-yLad+bEmc0ckWl@smbZ1Z*7gA;dL4ztwg^U7zB>uZ!)+HfxHda4?>bOr~LyXt7B!J(8r<12vc
zUuYd*l83txE5gEc5}AO{HLm~Jp+-X-WLqC0N&M~@(sU=&w5=AuzntVgpwER|qP$}`
zQfF&?uvRa%-b`($RnQ;B)=ubXFJi6}q+|AZK5S@KD7RUMTaQW9We?s=?lg_`W}h?p
znL<-Xj?s7inKnzQy3T@zt1TNF4jK^&Y)4Jvbxmr*S%p04#F?_1oSLWr4HQ~PxS8SN=nzIb7#*^4;aGK$_+X}hDs#Xf2)*S
zi{7o>*xH(Xc}e{dq4eujV8)dTP851C{{9U@gss4$_sU`p{l*LTHVX!=Hp3liLwnhV
zL~14XSvA&l{b6}E@C#*DiCQd2Cir*v%CGTbL8C5(Dty+CRiyLVz#!e5`*
z)=HEmy~-c0VON?XgfH%`_zXJyK<{r%7<~(H`Z^@&&3yN1ZRH+x$nRZ19uRdke%Vg{0iIM
zyJMSkFv3nPOKbS&?0TAoa&KmQmB`@8mRW4aLThozZO7-z!#Et2v2Q`}FaQU;n)){{
z85x;>(&=k!r80ZEQaizM9t$voo12@(Ck4~}E&Kj~fr?$yKFFX4N&U>@%pDmZ{q0Gf
z4oJ8HVNehblmOwtlv{htBVia9_rr?4g>*ST1Ck%kRYPsPgE`L@-M7BKfja@BXv+V}nI-@k3&vp@(OroaqjGYi{QP
zaZs+xF%@Igv|D&!qAOQoiJ$P#5{})&!bXznnL5e$_LubhWLR0#hiXSgd*=%bi4mS7
zvO=HzyPEwBiJun^Wj1#XSbliVleg6>rwcg-v1TRNXMt5NfgReVjEtf2cUb#h94wR%
z5(3o{Io!KEjrWV-_RU+TFnukN_``L%?BRTV7n>XX2E2zep@Xv@Hx0KWD;5khbc<%D
z^hTqlSiGNGH3PdNts*>Kz5&h(iNigjYdde{G;nm=O%G;FmmNRL?G9mQzg^Pkc*~Iz
zSLDB$Hx^xRJ-6K8U<*?Tj45XFfq#|1TK(a-bfFI~U}Af}Cr-7G8n>mlvLGhrTd0OZ
zs6ahgLro!ipGECHS|DHVT~BjGO6*ZZXjty-R`-FbQF=|
zAbF^MK95f&me;eIH0Ja@fQvFQ;rz+zlM|8W!&M{O9f&l0u{gDfwIXdd;ULHvJZs!*ZeDB&rKXpB%caMlIs{`YJ$r
zX*oHk0K)wa-WEAV5ps^HiCSzVAR~iKdgpigmoH}6lt&(4KVQ>Xk|9N-equ6_1HAh#
z`NPJ4-}}B9R5M($`f9FGN#&U~p~8>v}ahnh2|x+!cs6wp4?6r~~iHYte_yFq9I^$;bEb*|TSasfB@pW-wbHBO`-S
z5BCT*x=yy(hvOXZ~4}G&
z8Tx7U(!XHl=Bx*+A#&F_IH)dhsDA@VwUiW()YQHUVWop#zorB)U|lFEDDawm%RxaA
z$u^PVv)l-L^|E(LGFK;lJV@YGcix4=k2l3-`LuIfxi82AOP%~0!mmo>cunN$`M$G=
zPku15bj~!yyY)0RkNeV#50^rdiIm*R=+E~`x>uS`-qMSAMNnfZQ#cFD))k`@|F-K0u*ZD8E104RQ
zpuE>mc}wkN4eIaE6H_~uT;8yBrG^LsR;w?TGq#gKhT?>NIC$>!6xxSQqtASU`Oh%o
z=wknZ85=YC@8a+`Sy_*3XRCkD)ybov(9NTbklDK0*51ChhG8)u$k#vreVNq=J`+iN(NA#~Iq-5E|qpPiMlrRN`wxr!_5E3&vb^MIZ1A%J~q`ljXrZYE37EA*I
zV5TA`rYNUv;=&pc6NI0tzkYU
zCo{Q8-0Iako}rv;g-vs+G5>LO&v91gDl+AGv5H>4s*m(Clk5d-XFX->6~EKjguTsW
zhOZU_=YNP!px%D9xFC=jx4Ho1YuucAJx_POLD6$8@E$$as2tair@|H#V^!|e6`%Q>
zIzKde9SrCF6ysXkGx7ZEL)3>ic;4!ZJZ|&PeAUs>7JG9$nN_wAZbaUW?ZT*~z0uz%
zt~I$2nmGop8~!*pUXFt`h@?|Bn@OXCc;4JK@s`#db7wtGdnN3xcW~IWm$cuCP8EEB
zQ~YB6wbKfh6~b8Jf=v-bWg`*iH{qw=9?i$|#OtPQZX3tqI<36wOeh*a!g|Px--^#w
zX|Gjw-i7+z<%K;G5i7?M>FaG{Z~qcY=#`?JoSZZhP3->p^L*q?`7Y{v_1DrRkA~q?j>9M7hAhvjmVG8)*(aZ^O0^&)(HvDCFM*?4_RMZXOs*&{;i~@
z_Uih{4{WD4H#fa8pG(>FU$;};6}}rS{nbUV>CLm!q4RWucVhkR?0Ag$kX>)TbJ6xagOs~RV9MqtBAZhLwdef|LmmkTT`5yQgF%GR1F8pHb3{^X9Fqtbc4S_-&yu$^Gm1Q$
zSTz%C__Gpb%ErzSgd0`4Bd7;afFMs;5*)wo!$@?j=a9e_IF7(OcUMM8ify{j77J3BQRGy-uTdwyjs{
z%CXg*ea_rmc^?Jdvym^4g+E}!<$Gh&O!Cu;X)$>V6H#o_S!`+7Sx=;0|IM@@UCyhX
z#Fz7$?aiA@mS;QFgE=4SwrECK&~tDvJT@8pEB)Txd%D~uT9cdM3P&Q>J$iZuMOPQ!
z{idnu{^cuICZQn>m)kkx{YalnO0?RqKDaPZ+|TfJPV>~ynS_>XQ)Uc;A%HeYaXcm7
zeDlm;s8VEDLb?l9YOMDyfRK>va+K>ifKhH1}Wjr^!F>ZS3`O9_4!?
zQjtR1UahC!9*Bt&5a7_swm1^KFVRMK9Hjeka&tFfSP)@@rU>vV$70o&&X=bymA#YC
z$SXRWF;2>HT;7rxqCwTqP^gOuPv&I0il`6N0;w^wBLUb5q|si+S$lDhYrAcEs~gmz
zA66dq$X?%+#D%9ePUVRL6?rhj~*av*(lsqT06
zPKC#w$C4;xL2fhYiu&7}n=5j%qoD}jEz3$Q)9suVngbN&p*zt?l`$#LS@1~Z<{iLJ
zS&@ija}P(?daXSN1~BZJ$Y~ncZ8K|UPoS(`i^Z6)?hCrW8Z3@f3mG}Tx!D4f9Ud@u
zuFNY4!J3UuT)M`V=6XDO@lNgUR
zv?tbotC+GbJ2RjF;4wzm;de!qPdLS~JQDMFDpTfu0evqAIjv!H@Nki76aUz7Kth)2
zd#$4#`xr*M&Wz&GEBq#RNY+5@Z{b$GqzN*}j~@dKVRf{CpAxyH8W)hkwiS>*JKClC
zAGrWy1XJ#Jj9A~Y<7Yx>U*4fk?wwtmEayMx_M{`|>DUH)A)^Qd>E?D5lA?q|nvj*;Yg0pp$de6p+5H-vPrFCLMxwt7WPC2Y28T;H6@%29?!mF-Rlw<#*
zAJt%(<0ALP{>A&9zhLg^H8<#9Bn*!eRRpf3p$URV9SE;0T?`i)c(o~`Y?#ngvuAeS
zWZd|x*)af#j#B_8if*;(3_r#1t1wap&arv&d*~hS4Vz!~6`E*~$KOIL<8;uszFSet
zU#$7?{mZhGjfkzNBKzij%EvDouQ#!n?Twz%*KutAY^F<2c|j_DWFeT#(|3*fx$0S!
zd(g(aT#&S6vWF=ee7Wy;k-xm7W^x@bHH{XR-5x*gCC$8utEAD8+ZVp2k#d$o++*=-
zir3^R)nrLpk6I=OIv*aa96krkd9u9Z`R_Ff%{t-PJbyXsZYn&}f<1beTeB5EKYS_Y
z#>s{cw_oAnDB`For?YJl*&QElhvaSr>r_NM*ca3`6MS?2as^9t)aiS+=0_VUP33$n
zAN#GSQ>=>N-vC!*4B_CVrKMlR=2ZSWy{XTCe7HdoU|j1l0XV>84D8HQXIa&A}>Jlq0(jf&=iQC09>f3H4|^*<9MY*4OX)Of0e9`>S2QGG%NyW7w{B
zi~8qxH<9-)uYKEe6(}_Ih;S&0np(@FB~EB++MlJmN8#_)?*_yIZA8vQoV#%3KZS!{Cp6&9tv)cK4G?Zl|MAjNsj_7J&U%w{WoL
zsWqd%E;9i$K-*4)%U`}wc-@t<{`3J9>5m(}?5XZ8)>I2Hob|>m
z#$;_Q1S5Qxyz@tVuHrP3?-i6XiAJ4z6>nSR(RV(q?bKL$Br)-&xy>t?-W-3-UwS35r%}Oudw|
z6E)8A=UIZy-;&x@8xQ>m2KhreVVzVO>G}2a4};$X-KLt2pbwaPMLsXF&39x{ZLi-x
zF$RDih#)bo)RCAWNFppI=81DW*dtegcVq>uyBN=26`-KJQuc+;`Io)dM0nn_N*wq*
zMgd%4r`l0Tj`Yj5v?NuAP@k;#kT+pqXgJ|gy%DZZ7tMJxPDU8*%K7pU+sTHEAVyX0
zAAzHe0KLf@8z+wyH+4N1oZQKIRptNU^Vs7fW&J{T1|C>xiuM=x+i|PJs-;NNL&ggQ
zCkojA5{OgHa>N}8e)RR&2|%S-B+~Q1=l9RgRp3AX@ud4x);=G5SmQNl@hc!yke_#aK^ihioZm
zCFy{^hK-o*%X@|pz@&CzS|V5?
z)}}DcO-&~+P&CY}O*A6>U&@P!5M=znmYiN;5)T_XLH2TMwSOadF74*A?QXPeQ@GF!
zMg6=VqO5|Mg-I&Bdq{tKGv>^*J|VV%l|u*KEu@b8m3r^|;(=hy*yx*Snoh4de4%2b
z8vOH&rVelYA-3FUcaI=*pwzD9Yv6lP@BP)Vkixi&x!W16O0jDLgx$5_*M6%;t8h8A
z6_sPW%;|RP@Ryt?Wp3YNU|HsFQCaZ#+_@yPvPLI6@+vbbWRl@bOQVJG@94s2!gqEr
ztI>0PmF20VZDOi#;44<;V=D5Pug9eD
z{MZhiKl*ub#Y9b&XTJ~73j7q&RQJhbS4`e&+qz{9^{n3@3;z3Di`A!)9m8}?FfAH!
zDX+egQPg$y=1TFrr0;I0i1ES@;p4GD3=uoSygKErV5UQo|PGjMiKks&~F9u7!!t(V3jSc>29-3!;pVJ!ZE>6zujuaBI>G!qVBJOIG!LPRjOn(#a@R=W7Lemi4w
zi+|-8U5l`c53%9icLzDn9_#1d5cZ=*RZBUqZ+S@{1UPs^M}HojqW+bY$1&*mWF+<`
zwoQ!*R~6(fJGNs)uDGJiBL;G)f1K8;FQ21eJ8>!g^{|{L^J|UBpu$JT{?he({5Nti
zTkWerqy;?;am_bToK#&f>~wwP;~%|30$VC3CRRzrQ_9Z&O~qq39>xBBiNR>;
zL$nypTipmM2kz6!j;S<&VQ7l`;-hXl9^{}W7(m+kdzpH_g|01hm_l=??+WUILWV~K
zje>P9Z6!ZnorK1n5~H35P%MAfN{ejTz>@Us5Q~&+zIm
zQhHnZ>V^`w!{)oc`y{Eb(9o9fPdH*K=x3weC`
znNVILl}NYaDeZ(5_MyHy>$JB0+ZWkea&{T)uUrbFtjkI}I!V&Tt^-KA4v76OsTB%}
zU(Q$aZQts&k*3;rcw~vhSt3h_XaBgmH?>$&ghSK&B*8g=&
z%fpQ&93576_x3p!*)Sk-KvCY8adG#{xUjT0Z~a^^SE4<>jSFPW4W->XPFtDWFDDnK
z?;
zoehED4#C|C?hxDw?(Psma0u?N$#>5GpZniew_e?DJx_jf3lEVj!{jY|s7Cvn7ph_YhRb}BHUE6Ump=h;al2C#4+Xn>Q
zO$b{@{cUCDs7UVrti=brvuiI)5@4`!+xjLJ+jkvi!Lu%?@MOkARwUlIB+^zZT)X=j
z+4_6PQxQ)Dgxi7o8p1;UjZVev04AEk5(M^V``Wp1vazgh%B2^+=3CT0ZnxNkIw$_e
z$mnOSRr=p7QWf=th(vsDW^#^$&5I2`b_$0l$;9o4Pr)o|sRmSp$ng(2cbt{&9T_LU
z?iqFC@8Su*w>uJHt?{tuyCe7Y_jlWH=jY~%p3=L_4~8giu02U9&rQPyl9L0zWKHt;(T=`U=A#1@g@qo*
z8=_x%xWsV%k8V8xKBd`CjKgK`A`i2z-jJs>JriWompY~)=tO?fvOVqf&ifJkI5DVQ
zvvWz%>;uM!!SId8Jez#{h94hCxP0a!^HD{G0v-}5JA8egOqmW{T&aXbJP?b^_@kqI
zIpW!zJwz^5*c9xW)wmkB>z?Qw^YTcAW!`7cip!HF#ZY{Y<0!KAwH6TO^T8anPT#y5
zk*-N)^;II3+%sh$8laHHNuD(rd7ddLu?_Af&m$lFtZ9rGyEWYn`nERpE
      ZXZFRty<69nOOQf(A(XKxM%V!f)n&Apu11A=-{4?=Va8y!V!QweexE>7k
zM{WYZu|`l}1jDTV7=W}lG5XBoRMSP2s<9bm^Y%=V7T2RUp9j~2PaNuRJb8WlpDA%o
zm)w74;Mj#4oBv|)faxCo@m~>GdYbqc@!u
z04ej{(jX9_W%SJV(v;X(1T9%~`4hw8Mw5JjSVC>zfdKgkZ+cf%_D>xU-afID!?T7{
z7NL#zQ^}d{0~T=PLtWbX#C>oN(Rr1HBEf?megy=2q3MLl2rc$@7N4;giHK48`o}My
z=E0xcI?*se%COVhJ7+(6_NaJ-G*3N1{tc}W=Z|TbXCA&FXb^ijE)}@e26q5$NTpp+
z22$N_ImFdFI=7>N1QZ)@FxXQA&-92tWaPR&TnriV3`_7fspq$nDexot3@<+JrjhNATXnE2Z
zw3&hH)`AUWaq&3uSX0e;0r7I{|BWxnasOIfYGKixP~{u0qPF&uxgbv(?v4AQtsp?G
z#O94~;NU0U@GLiBW$d$U-B0=UrC^DMWn8+Ghe5a!dneZiAEN-6&Q4c0rvxl6g=-uD
zDReGtGF&^!UlSH-RwM-18lg@nY-6)rgsEj48arCXOlW_AZM*2IVC|p0`#u4;dKJN=
zd}w=m?I{XbiN8)J(yY0Ggy#O}MRTCF?BydY!a*?M_n_53Qf6h?f
z*8At|N!y%KVK8!*f{P1Bp&0AK1oOmKwN~z#7NoNR;(+J
z*Ii#ww$(cc_z3Uk?Zso3-#+vFGWZ#5LlSSV*90IOusIO*Q*E@?FoEEvx^dR5X}Afo2ShC_2|?*Ii8>J
zPT#fM@^sJwz^RDu{tjtGE2#Ryfg#I>?W~2ClG0RoT_+MxZv!#A^8w0FB?3uNs0p>7
zuIv^0A7VfAtFqgFJpsCj*`2uJg`C0n&f##M9h
zd9oq}Lvzz_6Hg)G<@F1gEQkC4h{LTL=&Duj+4`+Su6ts}^$izzDTM`STlZU4u6aAg
zd2(RQII^;_8>?b6l8i*_NM+M*bzoje^dx#D4v
zKCN^HG%jHj6uW(DjZWI1N8*@n?`$#_QLR0+c`Fb}SmMjbTWb)xh5AD~G-3!(A|`6KdFxpe{11-sGllNAa!s(raFbLF&mZ
zE4yzFq0n}flozIVjuY0-<=ACiTNW|*QL~i6#EGVx4xXFF{Y7hZs_lLs+H14ca_gVo
zA+(U#G{f04*^RNFb2fZe(%mR+_SO7=rIpdflo%#gEZO((w*xf
zM*51X9TNNIl!pzLdF%ZtPs5-pCFQ+r`tVNWOuuoZ`m$Q3b+KIbokVCTGv4c%PGcS&
zEYl4HG002|T#czdrGW{eS*iCm^`$;evXzcgfncJ)R`2dd)5A-Ds4ojoCH;A!(5S`2
zqWTq6twMsFZ=AS@S_liqm0%3kxNGl%W7fXvj$o)%e})KprHa{(?3On(Ij+FU(=1<9
z?Lq0s#K-SX_|O_-pPPo1c|I=x?mYcHIbxrY3c6h%fz9CnGoi
z%tMKxOkdq4$7XC04JG3iv3-pNdxZeZ$T2eIoKlZB;gFHb^DqV+sj**ke1w*5Bux&K
z-e$8_$84_`6AU^2_<*Ft+u}aXt9F`g!1m3G>|1U8tgjm*ZX|+AeAaI9H^xc@{CKRh
zJC8B~gg4PR=jt59=j|7e?^qKMA*&86k8nAFQW2_Alhw1jR1Ov9`?4Mg%0CXunLI5K
zFNuQ#>s2zu9f1(^l&G&n%*TpkmT=wgM46|-=H^kE=eAeb9;LFF#hjhydMsU=Z%<|`
zP>GHag!nq}zDbl|Uj&&u2v5K+RR>-r)_2~D+i29l6mJ6>
zqS=TgBHfgAXH)nz~jD|EZTyySDD7Zj1K^2JcAq^S}#yOLF5buWYHsfSS-ow
z23r8#2KKFpW@2YqANLU)Z?D_V38`Baxv1cbw>OV~lJiEc_ZaJn0r_VE?RKkNG0fZ5
zVbHG_l2909I0mg>5$<|e_2|eTtUq^?{)e@VHq6N9~Zbd4A5IQ9LI(DP2VxA
z%d0n%`aMQ{m;N|u?A8Cs_G4t${CDJoT}E{IYC+D!*s5kAD>y~Cy?y|BxH}vsKd`aY
z_nbG9{>Sv+*v$@Tj4sE%ht|1@e4YD#+S^ucvf64?3h*@h(H=f~)*RlnoonNd+9()8{CE`QDI6h@gNy8#7P*vo6I>0_+;$PVA@GtuSb0>}*{4Mp&gDZ|HS
zd;Ge+Cgc=*Vv;5X#7Tn9d8M#Fr_)9CEe8&6x#$a?M}rJB++g+Ye{n5`92z}WLvnhq
z(N~stmV{D-c5T-{oy|@&ULv@wizY#dIddqfY6Z?C(TZ1V%HJ-x)!YsQoQGHS(JfV^
z2o#X5ztrLjjmB==}}lHyHtM24P9P7i#&QEIdYc4lSpLqM3c3Z_l7
z{gSE(r~l6ON+$ncoEzbYJTB(2tKZY&hcaqa*>UpEvV>P5~vk0Gg;M
z`Z#1dTvBzRA?qfC9OPV#d_)hq(vUszj!`ln16OX4RRh?Op1p}Y?E()Sj2N8B=IBj(fE-Y#ZJSW_8`CH&UZ}?@53!6tCG4D1KQl7!X%Ir>tR3=dNdctNmpBYxCAQ*r{`{m|#Dmyx
zy&8|n4sBEtW9Opw>`blBFgz;Py><5j!cV&uEB!haRTJpw;DI|%x)kZhv#K&#qo#PF*cS2r-KN1MVa0*;_aqo1q(vy;=&bLpsC
zE}B%4uo%5?W`xV^KZtgT(<{?#r~opbx_{7rr1_bus0H@~t`mqL9|P7j#%#_>E*k>$&_F-&Zf!V?R)Hn`=L06|BZ);kzR@?>)7&
zzv8bG@+xws!otGbh6b)8?+&Sa;PBxCKr-=4`ubJw#0NcgO}%DyHTal@|G+50wA*Y<
zf2#ihC3NESHjgVP+q+g){(&h_V%9Y_O&3u9qHF)42mSvC{_g)CtiZnT5k`ooJ|qdu
zQ`OX^(h<&HXXB)ic~>@*?;h!ILg3)(8!Ogq-PGVcIZwLe=gt{RO>m;uI05osVCiO&
z@dC78EjIDgy?Z<7kw$n;j+EgNlI>9FL1MOIMCuhQF(mp~lD-L8dE_~MSx}$kNxpc_
z!1e;v6G3C$R43rtz-R&d>
zs@O#AD)+u>3k%!9;SX@tcMb@pMA{UHkoRWP#?L7b&0f<=DR;VJ;>taT7sgLXMn1Jy
z^a@GyV)3TD@kc3~{A3F(#9{ScdE2Qlb#b#5d!({)wq_Jg1eC$M0>Fn
z25MukzSh4Gm>nFbzP`Te*zGW*#Qotu;&fZy);VSZDbGK-(~}7x-z`$!v}GKV3Z6x{
zD;>IAFPhDtfp5Dro$HZYApqv^A;xXHT}W!&TgM-Cccce?sE=!Q9>9kWs5J#wZ=pY5
zu1AmeoCHB5G#{qPXz&-GIpqzu{c__W^?cwU=2clczQE0g5a}?3HA6lrbF4k%cW6Nr
z@jb?>zn(m7)t6+?YW5YLPN3X@%LiC<9UZBp`FZtb9p+bI=C^O(9QZRW?Clo>5M8$%
zcmcHEL{svWS$FIy`qm$m{jxF0>s9)zZEzw}N}GxHb*aYJUX)7qS*!UE*q{U{qCeov
zmuP2`;u!>Ue`h%+F7Ae%J;kctFqJiX7WFa$v^5dDe5s#S8S>iyn;4YU#RV~R&R9!J
zEA7{*=T?i2rPW|ll1Ld4-t}}J$Uw~Yx{jf+;S9y&vparzx6sT@cwPNKRZTCf7Wm?6
zC=_Cw6CrqcF9iWq&g63JCqC!8QJ9uHxf^X{)j(xTgqGFAczQBTKh>|dez_|FY?;}w
zD++qDnmdD=lTdn=zQF{j|gw=`m{F%947F|E8|Vs
z0ynWT{H+fr_-<562*4G(cK>YpfjdcQ%$uXIlrI4lfYC5ezcSvl>AK_*61fr2kYh+7
zC69y%(Ikd1%Yq4FI_oG#!|H3m)@;LRTG$P`4f_Ur{a8$DTuobZws265aRLKhyCR6L
zbG{3Cu-s-pdHQy3+wD0?Y<9j}hV>M*PwYv_R`0o-Jq^&w-1gGl>ypDabo#Ur9V1=`
z0o@w62FbM%sN&*Yi_I6%(HTc~lxuu?*<^lCd#EUw7(w&q=`q`jVG%3_IzM*Kw-R~&
z>#!w(0E0@Zrk(@kk0KBq!iFM|u3xn>?VEf`Y9j=u^)ckUd>#-BUy+TiF*8=ipK&=&
z5Tm1DNNtma%^+oIBu08%@^}JsHZpb!wGSN!5BBP%tZBM$e%Wpe8MacI&p9%BPi^h$
zS=~@lzq4)%Gk?14j)EakInl^?dRF}+4Rb)~Va+3vjFKMn#_nPFGdm}@V+k>3xIzt&
ziV}3K7L{@Nr~D~+Wo$s4oSv{oELe1My)k2of>Fa9sY`oQt5w08D$ifE-;Syd1egg%
z8H}1Ioys&?SL1vV#&0u^r^32bmGm0RlZ320S%K!{jBm#w{NIB5O|MeeYdcGc+q;LB
zfkulF?PWG<76Ez7ddHT^k4rEibqZ=+J*0SW%KMv>hE8@iJUPaZ;>O4dxCCR+qW=9x
ze5cNoPYC8W+M?)2+X9^e#UpcLW6Eor@4g;!01{kbC_%bEE65-
zI_0{8E>Uwa2yH2MT}GUs39u6~>NB#bq`0K`tZAY!=!ITwXq3yG$lK6@*GJ`;y4^n
zcub_NAo0Hw8s1r1Y9OE4KYAi9ThRj|+&YFA%u{P3W{|X?1ed>>~1Leh->^;c-`wx(D^sDv^l
zBOmF0n44)7%w|&)6QVtNRC%)#@itEMgP@}WGx3n4p@K_|Xe#O`$vm1UoOSGHpfZ;*
z`*>DUcB0FT6VNjSbHeAXlN-TAAcXGw5%L9{-<`9=ecWShFc&4!{w+S7GJ1d;q+)oT
z(Ng`^@)t_V7U)moq`~!HyEcyZ#>-Bd!2!z{Q=u+RCSZz>0U4cHE9Ive6#1X4$$paC3k!pJ1fr;aShWgM4=8
z8Suw!GeYxHwt(IsKb=$bn(R+CYel5WFrU
z&TSK0DxLMJ0WL+w$lkTOf$fg(JBFO}opyY-E+W(#A9x)KFrSfHF49ae+?iATTkTVb
zYda~_X@DYGqz$AHgI8>wKA!Gjt5gJq#*`XPlMj24!YT;6TVOQmZ}WAbA*W@(tmX(P
zQ0gQvdll73CBQ|03S
z0EL4NH>Y7N@K5PQ%ue7#;f{d&Xy1_xl#9Fv8?X}8EfHfFw@rVFl%#r_6pfVrT8~!!
z@g(hGpc#rLNPx>J9E02`A||5OAG;UbP(Y4{6ECA<=0@keA&McjuPE@@|)FaD(AL9v#p=giA6v
zp?RYv=hyUybu2O9YsDh4^_*PAnh-F>htd`!F}N{qOWf7k69{=0p{{fYqJUD^`N^J~
zRm5WJZ_aNYOYEG*a8ateW9p%g6@Oh$&i;Du>B|ub3*|HuZxGRSnpT-m4)DkWkNxWw
z32AAFK$$ip(PuI18sE^uzl#+o!O=7rQd>&v;R`n5#f*)|PTdpUqtz^{sF(xt#VOZ#
zE?|qe{x?l4A+_O>K!(FUjTK9ryW+v?5a00QbvFQ&yw5hY{Qp|N;dpkw3w=*dGlW}1
zSA>06Nh$#CUQ~EhY7{zW)c2Jw&X=*B9-jV(!#i|n>G&^zf7OVd*~_XbuB%v=4X1&F
z8=(!ib`?V~h{X7qwjZYXDgn??YK%%^|2%()HA?O`5*HOYj`$!hzJ+V}RQp%G^Y=~q
z|Hu^^|08_=OGeAHr=n;$jA^tRf5G_=Mj1PyoSUQLJoCfL`)&Ht03CeHgD
zYV^KrBrrbhb#Q7)5Tq5uTg!Kc*p>7)A`@H{;N!{o7~E2#g3$|6G6B<3!PnQ)6dWO4iK;{q!J;w}BKFofJ@C
zRGVusaChWuBV`Fj{n59%>e5c7jBRP-w*7nG3qHVqmKv%27w{yq*CC)xeLKRds}&L~
zNr#DLBOQumz*$R1t4j!Q==7y(-1XaquC3LDCD=emhp;d}hMr`Ipc*6Asxc`heZKOJ
z*=j&}P@0;YzH9C`=?egu=D}4q>1yrwNiQFt?yIs5FFvcpw#-^Qe?JG=NK%nLFY81S
z%}dSwk$ppSuJ3n?{y~Aq!7cUBjimpgtkK9qk00#zg1Ls&4rHA6zO`s&JS39Zt;HAT
zKRp;L(>WmJ%yE0j2i6g$k_Q>jTNk+VDu+DRchu_;nwW^A3hShPe~rxRK9A>rJkHEq
z^ef1_U<0H~D93>UmFfP^-%&|sUa#eqa6Gl~FVqUhoW}YX`6`fVBh)rPr1=K#ULkfHu!PHg6tW6|jX+ljk?L
z@I?B~hrNEpPIy;V_J=86lSlz!KNr!Pf0+I3;ihTZKKn$XY{Yrp87%W2U?RCm_=6b4
z9w^tXP?t7x=Ykz~qOzE}O*QrczC-#KDjO-o0J#kZ8
zSq;A7Chlr*4n94v?0$ShN{5u}8aFw=xd4`9;4*}MKw+YfOB;2E
z=VcL8JmNj&3@~Cs{k!xPR(+RKPxWXEfzE^V*Vk_C`IlbWHyJ%D6BS~nwj&Y~YIBX7
z3AR#GJOVJ^HHY{M@+*NvtWA%_2S6hLT?r5X0Z@igut);;Zy-emZv8ek%K;0{9;5x=
z@LN}2TUUBM&+qSRmTb-*o*s2veqG4ijyY#<2D-v+wrmn_9A4y?G$Xd&BpMy`Jy)j~
z=l`&7TH*4Wuy_JDXSm{c>t=?Qe6nzBIiLBokU!>oEvMYk9EA+Q;?s=f9i0sDx2-E^
zTl)Iga5gGSli}Iz&ji%p(s^dPRQ#Ut=RVkqt~|M3Da_6`!P@R!J)HMNkm;+EcPh0m
zgq%K4w1zteFW1@INjd_8WNz>9k@M*X0WMi=aG_e1$5tjuY@m%*`b}ofLprJ@R(PJI
zj09BH^I@?6;2Quwuz#tAFjf0NNc$?*JZRU`zk+c);ahu3FjrhrNSxhC#p8y4B6&Ca
z8YHk2*Vmn@jd?%68wXQ8U+t`kChuL}pT#J4992RcN<^#88t!zfAZi6CZJ-^!;mIL@b~7jiJrCDG|i$2j%t8k#9MqfVm#A!OK_=-OT2t(fAl
zRp8C=ig&&I9V85(S@p?n^9{8TP|7RGM1B`M8CZIqYry@@Tal)aM0D4S6Mosx7W(0c*+g|o7?U9C-~~2qt$K_PxosP!ch1PvLJSRfjXE@go_H!9b!4mS}
zg@pbAI%%^CU?%9@^5&WN(ogK8fhvlAHpx`SDJ?!_vXrMR{Q*_)azZ+4&=pD2BKCEX
zmAKbwL^fX}F+i-qLxMC1rWvIu1sG-04Y0BPPBjyD!n4JSPtb4w&@MB1Y+rl+aHOW!
z`qd1<=W%vVkh${-tS0w(pg)6jao#okEji`>kFH<8v<^nWO*I50_^G|jfSaDE?&byD
zhCKhy7;)sCp&cyvtby-MeDM5-3rWNM(H>Gb+$4&f>;9c;i(v!Xz@WG}n?9C~cIr(f
zlmPP04x*x*>UR&h9Q3s`ecI0H78j0U)UE~l
zRG)Jldh?f0NuTeWgSY2RvFg#Jls^E%s3q(Xm!VhCQiV^&m-j!#kh4MmNb^QYU!{3X
z+I!+t{Qy#We3Gy6vg=4(RT4ry^g}jmu)fFVZMra|OtMlleUuT!W8>#1Fs<)
z0oz*^l20E9!!5-gB>O5xThWrY+^cNG6K0?^fAdBXksDZm`AIw7F-8%+z;3%YP@PXJ
z=8Im<(84m1laA4b9O-9Q{W~=tzb2Jl5R!j(g~_%xoui{>mA@~Wi7N0Ql0^N{bLAXt
zY+!drx;FI#=-^1@;ogeK<8big?~ntse<OjCg`>o0H@hm8H3%!d74=9KXM3ZAxKmRc{m
z=!YNtHcywl&3R&vm=QiZ!1eh4@C_v2)U5hgF>fVwUtwFZtaZ3BZ-f@(b#&HTNancD^U31&&rY-4H3*X;&y(V&vS
z9OTRd)0Y8y0u~?Qp1Bv%gP#}
z^V2M_LnZTDI`Wu_+U`w&W-O5hy&Y={|Bb2*whBh0z)#tWn{zDO9#>%~dcMZMN1)pj
z1kXx{!XQvo)6KZiFQ`7uJoQ1mz&OBvzPLq)I=?$7f}pjAKC^-`BrCmj45%^k%*~11
zabTegSbsNtm%BHcd@zs%0?8~47Yl~83)}76*Gc}*OZKD9f2Z9TGz{GTA?A$7Ci)LC
zr%X7?KNcac8|G2>!~RD*RlHH)f3#D{q}HRp6EBcba}_?~)d>imq)0)=bgE-#r5=O|
zB)1@8GNeY}^=ZR|ks98zM(#;G>H3|!^n1(6iX=+9iO@&%h~ELRnDM}n6Y+QUPETmJ
zkRdlgL$sR$IsU*nl$4VC9KeUv3Zfzt{r)_cmmTwY%K_UPNzU;|m5UMsp}n@naCA}+
z{TR0*p9V)J-r=`23?f=`?|&rF%<=MKC@WMNjxf;haW|pj*5rXgoMt~@1=h6nEYP}$qA6KB-zChsya1M^
zy#pd7T3zSNSrqh3o;1?l*Ogs7T{GWB{2nWj`q8|fwC&=Y6gprF$rs)n$BpwzMHU6z?%8{@V$2i>ZE?9CWDDW98z26#B1B+t@gN-mxU;7aLRJO$5MeJsS%NYb3@<7hFAf
z=ZkznS&4|7((TLXAVtCC_T1@QIiE0HK}T)?>mvkHF1Fn80`3bxD3%BdtZRLaA=++Z
zt}HG?wAOH=#cTEq5K65GSshjN3!Gv;VM}~@Pw}O9>$cx^QQv_u=H(Za>Ktc%%Lhn@
zpB6ONKa&mSXGK{FzrRn{0eJPEB|5z~F_uF=0Bi#ofxU}<7WJVTthw6_eP92XU02(6
z@S`e9KBFB))VMn&f8#{E0_T
z*D`|8u{5%f{NmE{;ZB}1yhv%FwO;T`LwZD7w12%A=xncvXUoGf%Idq;a>EPu`jd&`
zQ6yxw%bnd36TKRX29lJb`i{LEPZOCkBsr(hdbT~oM>b6-OB>|v?=RY6N<>jUpgq_>
zdE1DO&im?D0T`|nTMp0@PaCqgPu(f5G{qB}y9?YUU&BK~TQFY(04U=e=4`65CuJ2&`}6X!vleTF>!!=NfRk6LH@>6^DXi(L
zWX6QSP~&*0{57dT$hpbYmQ7YMTgCwhH3wFUfcPA;`cPU1Non2c4Ug(&;C6*Bv
zzwdsHc>bmQrq-9L-YUjS9dAceh;v`5#nWr%Dx@%DJSYC-+
zHdnd#ls#qx;_yeZ*SHM|z8X?h6=}<^^=cm`niSJ~>YBZ64dX9WbmKqbt~)A(2}T_b
zAa80;aB*Iqtdrtdy5bX>*-~B1Xx4xgjTL!@_wTinI4wU3LrE+MMjijCnw>lXNbBoR
zly6%Ii_Tnu{s3&Wzu$C!`8#?F%4>iH8ycwFb%YJ2U#H7@Jq2qja&4NLClm)8`C#Um
zyttPcH-Y2QW!tSBQiiWGQ$}j?Z|RCtEfDS);hR=H8C&xfqw%vMzdj=Wf}%)S^G7$F
zi@l%S2CP3?q<{Y~Y@ZYm5IWBdZAsyqf$KF(GSAY#hHGExs`0+#-urM;Op2~`Q
zFm`%@hd9T7S=oybbCXQ7`i?o2u+??EpcwFFu^l3PF7oBOXW9V=M%d-=vQLo`3KP5^
z*b!3L49RJuPKp&uSTs4U>4Q;{B3GAb45^O%dY(@@;O##XERbxWb%om@zeB1(W$r}&t;aVo`GdIF=qY*eFRz)84u^Ux6eo(TXxQpNy3Fay?5Y4J72)EUn;aYkCy
zq3-cKOpm8-^``Vl*wya_kd@iol!b(ufe$zDc#2VgS&tsoc!KVsgDU8CYKlK8B~s@u
zq5S2q#ZXk#H^=T))hWTE!arcP^vD$cN)c3&ig%_0c=MX9RA?I=o@r)v3Q@37MUlrL
zDnKkyT}tJ)e*FN~$pxn#A+zRSjsVGODX%{}d*|>|+%=txD#TQ0ds;8d#XVLchmx~^IRqA9r4-tH9IM4
z%q{Q~LF?MO3oU9+8CwNMSYFA!FYTeRCtFM+xr}UOojeJki&@!1JIWl|asbx0oT4Jh
zL;BeO`tUuyKEQ4XNc;%t@|38<8@wZG3eTXed_@;WX_5DLdjcE-<5Ev1`Sp5K=Q$0o
z2E=$h3W$aM;44quB8lPxml9yRZP=|yP9Xt5r2ukr!l=BKmg50*OEGMT#bY;BH8o2T
znk{OC#VkL_bT?87OHYzWNhsK#&8*%|%&-T){eN`ye6(5jg``u={!9*PuWKY_7ElY6rVc+EJxOts@rxwNO85vjyS(Gpx^;2K+!CgtyxU(of#mqx
zfsgQsqFEPJhrI~ROr8`zVSM1+WYg)p0V_Va%*SN>nfS0Vvp}FP$<(xPURmp#&`jvu
zA!1GE87GijHBU=Kl1?Ex7oi19?`DDxrpgVqqz?a}VrL8t*!J`4s>3A=g@S!`
zQn*~vYrWkT_z7J_=@jNR$J`rteoP@ki(wS-9jAE6=&!o0d8Ei^EWG-md@Y5RiKng*
zD`)`>9lrD$0*TrGn7@GK7YNW&#k?cWaip{w`a9}>)3)7=1AelsyFINV7G`VL^dXC`
zF{FX*;P3eq@PuFFa!BA5w}P7Hb1QSNI?f6N&L=DC*y{DsP~vG6Sn&spJ0I{Rq!=gX
z(_OvNNILJg5`Ub;6?rvYhvvZp=}l?rn~HquuM0$7WY4v@0&dwBu0Xd@v)L5=s!y*6
ze$>51>C&+qFEJ`;axFy?Xgmp?*b_50HV$bz-`1ZuI>wW*u&!oJkGdW5y0`Pecq!^f<2%&0=ONU@1e*Ei
z0F~R_4PooL??|A;20g+1X(w#bDkVP6ZSnlBm@FT%kY!7t9mLj`3VhqgKI^$uuA%}A
z3rm*nx|uVc#X(hjlMmYSpBR=|6iMBAB$kSSWfWT;cL;Lq@Xb#XRqwiUom>N7ajCdB
zuW5=bWtDF|NpabMu_~u;tA2|U8fvzD)Y5CF*Xidil;^0xiy)PEyS8$O5hkf7o22og
zSwmDjJkeKy1l@Z(Hd3Z4Ek3sXWWW<1)9>M%>01eIYy`F5WPW78aa9XJP2P!MlG>h^
ziT`4*_b4CqiVlevaKEN(@#29Zp^4gPLzOQEy`Q0rlqZ6Pq?A=yPV09QcFn6>t2w*F
zX3sa~9!wWV1$CkglpYHGTLK(-!*{cXHh9P?7n8d<#k
z@-tBO$n1X@i+ea!}7O5#aUxATN)Cm^YC7-H~0-zCA{;cRR`|~dh
z#cSOX2G$;;Vbi``#9bc$9I}$QvgX01p-1?;%b>rz+)|rVJ&6
zeNWNfsiM}4WLDC>l5=#oi}nQ_wRoVGqChb>wstQ$+1d>d;A0dL|8vTcJgs?NpLp0r
zWo8rOijGc|?s@m))~tfb=^rxJQ}@FV#PFm~D>v_GKnfu^v{)i`%G(;Yv=Uc#?pAF)
z=)jJqJRb){#lKSjxxe-wqkM^YOzB=ikk2PA^c!5HXn#$_PLM;6v;sxD7Pt5i38zRWQf4v%7ugM6#Ov(pIAJchw%?8?h2>n!s
zD)m#^sNaFYnt#lSQORP1+B$?VGo(rMJG}yqmKls6db`|R)Zih{5=W#)=v9^ETrfJW
zqQ2FdKbo7nN_7eogrU6dTfB5aOkB7ULt7RcRaKIsc6@**_5
zo>L?L-cx77bN!$xG+lk$a_)FIYKBGX=Mjhax3g2)_7x+b!AO|$r*UWM+EoeZnUtiP
zS<~%%SqC#PXU3L^w)E{UaF9&+oXR3wn!BC+UbPYQ-cb87DjikiRws4Zj(ky!VpnI$
zl(Rp3gaIe#pher6rY%E3W*7
zo?G{ow&4(PfDsH-H0?R+d(?biJoeQeX{36HroLSS#mIG%6N%;Z*^fKFyS5trv>jWbnP2TV1Bk7p!j73%^g`lSg0zy8#hx%V?7crQUR!
z9|U}tGP~7f$l3Yu(_;NGy+ZOrw*~rSXBAOhG1|Z=L!bdGyp~h}vzg*EL%D`CdXU7f
zg$;7|j+?>iZ{cRIEoqa22(7_aGAR%GZ`lwkotr;cc0OzWDW|k(>k$pc;Pe^uXiYyL
z(Hd<#_f$WavskS)cGmPuF9ra*plH->O~QzXXnu@HplQ&kxd(yIj`>n}E3+m4T9MMn
zHUDj?j)PR2L%H3p8)2~lM2s%a*>H#>XP2kK61>D}JjAXtRc$rj)ts9O-;qa}>+1vs
zh77C9|8-Kd`qx2y=Gj;ZZt?P4Z3)O@FW1yBc~5yT93HJ|(0>4hzFiKF86|nXx4``_
zzF_h1D)80ipCOJPB7--4`b7o$Sy9#M<@-?gCX8R~!dYHnOijMDN|oPpl=h7bkK3nNk~UdtOrtO+)c|)heq0CQ{TY(pzaQz#mW1
zFKiX|A;9(`9#Z{h*aKGLqES)>i7V13EJ>=@XlruyyQo^2NmS;QACP8z4YuOq)Cq&T
zeg0s(rK<$y{lCjj!TFzTW4Ckysu1)4Ty=o2hOz4~d_N4#N>fgSA}XA_0mfNuFZU_}z;
zG-$;>E1-jqfUq#XlD5^{UGV9mYLo0`IRFqqz6;M1xu0xLC*jc%!UckBAbDS^o5Jfj
z%K#wm>s&)kVXb5th&hf>DdeJODhnL4c-JY+Jibix0ho`?r&)Zr^Gqs^w-z*yQ54N<
zsK`fqpS!yTUR}PF-x&XeR!ah*A%5&9e$LR#sF1tgbkSfl6SuE0{^v$){y$)`|KD%K
zgn0;Nb>KncZl~)}$16=cU7w*!zI_wDIay<~nx%iM(~RC5jFQk0_3AMU_=UgPzBxHN
zJ1&_f8(tqRu@XkTdBpiUx&FQl)3^pURaT-lt+{EJWq(ptHJB?^(`c~5q5Y8d1+cO!
zSd%>N4um^T$bN*LvbbEG_;Ya)mz^C0cvpfHh3}}#)vbG;VPB`;-&bC=>;Y^QIedz+
zFaNLc%m~pySPCH_64*cp0IOVSwCx3+`W3;X-MCrNwBEziv^srob9i`o4m_L*sMNLx
zi0u0S14F|GEoF7}V7e?1NWi(v#zq6jl4g7P
zF=(VMJ%#4&mk`8e{ZnUP$;S-m`7tr}m4FN}S8Uh90^aD%0F9kJ1FwB7I2Zu@ak)xn*eGr$xG>v
z;HTXPqn>~v^0W?#Otz}h>L6Y~bm~_N_u}IxK*VO<)#JQ>F1+zB`{k&Q#qW*+l~mBToBQy9u*PPI
z8F1ETS5@P3dG7@rB;?1o?iDB9HI}M;;Mq=@KdFlJ0J#1q1|?ZloKe8x#Z-
zq&qep!lt`96TF}2J@5JAobUb4UuXRkx9qjoUURNF#~kAt*SKbb#mJN9<8iRBdp?Nn
z8rIdG5ylyg-x(qSI_QF+``$CZJft$HZQDXE2%{i=-OCoI53HxArXYSmU6PWO3Y@se
z`gPslDi{qS0wMLexc&hKJoMtS(x%c%|7M~Kf%-YQpw~t&=Lc~^Znu<{Yu76WD#EzE
zX{!`to87&|$JUdIl*RGDd>P7Za=IHmLJD+0nKFZe0I6dA;u+ZHCM4BvsW!KPju;i`
zNvQZV$gjT>V$^M{hHn2(gv>WpDb*%i8T!7z0UT~1y|K(J^UJW}
z&r-lMuwNs!^y75WH#KN>8XUL{{IZ8%M!Wf@~
zs^9It9%Ew?zKz|QHed~CZ-4xeV5AP39QaU9>CI|fOJ83~l;QV)p-NcFev4#=JoO0T
z?b^){-b>7Sedhv(=7~>y$_Fv;I0!qjUJLjqCll&;ACKYlIh%u$ZCZpc$HQn$HP(M5
zvxi)Xnj<12&N|3$26tTV1nOG7XKtV6aD{Yax*%AFj9EsUr&8KzFyewgrA7v)K6ij^
z^!riY7L3(Oh3&2@OGq*HPC|VU>=`Ejz;Eds6#~Mvn
zpRm-c>6KaQLZhRn!#%B4T-tITL|R-JbESBQD0TDX4RuO46b1mr{wcGJ&PWn|R-k`4
z>oTEhGtNn-YpoYj$MpHbBx#s&v`=%tdwh!%AWlo
zWk5wT$#`>QAB=rx`K1d9n!z>C*E6~=j$v#T!;}I?gJRo0=6~i|_#q2N8zbAcP<>j^A_y}&L&lG;J`ZuTvzHN{QT?dzW90Z=aBzC70)?*bHd8?Zp$+kSLp3T+9Vsb)qRaEkl7pNOy<-6WW3mGeF>*-9JLsQ}07;|{&)IAx
z5N;(KFXg8!9=GK-`UX+|-AzuDPvm(lDJ&E`!nZTylP#yECOUEq6t9WJd`RI(0EYa`N*ttcv1dt6R!e
za<>IHQ!5@w`z3Td6buYh>R6R|6|KVt>tjV<9
z@N->BuT9;naBT|Y2exhAga~jS>Mq)Uer{p2h;AO>1Pe5__As|Ql}tO>rzWJvYQpe$
zBHNu-^b(hwe;x+eofW@qH0{dquXi@Ioox(K2{Bx%zX`<<7jHDKO4>Wj(1)+$Jvq&1C?^h*W9f^j
z>0>i;1cK^ShGpga#?rVuZN7T5)U3dE{xZ@5dqF-e6?0Z~a=O#(?=Dcv-aA{4>b2bA
zB4RawfbIwelAI49K;jGl=SrHIp?9lkTwGit>)Qu+8*YX7Y@A*`iRj^f_2M%q7DzB3
z%#2rmfrb=_r!yN>O%p~Q@cm2KxTGGB7d|E;I&PeoQJGxJ7FQ&M6J1@ann&>1yYiKU{{GK+e`&8sb%F%iBS&YPv87OJh>HRb;Wq$0><*au9cI-wJEnF=@m5=XhS(u7CRt8g1sw5Muweq
z)OGX$#7h1d`82%$4q5LF&)ZC-4$B&U(unXfn$jdeVeE4Z&FiH(uU*7J4hrt^)oOJ*BNTU^G$9nq~1qET)z20sns3qTh?DnF{)HkQ`30%ZO5L+ph81YMJ3w>+wvut
zl<<1q-hvYgV+2v%@Z}T5Gw>8XzWA4qR!ysVoN#;EB4ro+i$huY^fb
zjZR#?tw{#%6#w(LBbYRoz-E~_zD4A1E_FN
zBz};#;YxXgC0QrrE&*~4zYso>jB%&|$l%XHJ^PalRmos10)n(U!N8Xyr#mNScR|+Za!G^lNLo*Id(0Z_0rUO`e-9+jCdaZXqT_~?5#_uAGzegke|2~R^xcFvq
z;l5$#v=}X2sYD$IL!JWR`$e(J>c}|zOO)QP4!v(j#~uzc@RKC;{R(8z9pzIKMGSm?
z1?yv?{V9xyjD$)wg)*VTjf)$u2{Vs{oO``CJiHJ++l2o!#Sed2P8@L*?jCvh4i1Pt
znquRr1If3yv-Lvtn?)6@g#2tA8v&GXGzzNO_4Q9P6%mq>EbzG)iA>quxPT8dcOQ6+
z1|d9neswSvrDR`E{Hg!;YB}!VAX8s38Ptm|7_D!d*&twrj3;7UUn{iH^A=I~_SB32
zQ$k8;#0SQi6Q`HqoKhyUu@!?jbx11p6lGn9D5tw#fb&s
z8V4y+3pU7I%+Y>$dRj>@`V`uPfryb7K^@!B0?NXEzOX7y?Bg3io=#;f3)6PHQY4u3
zF^YK{N~_eYCwz0Z)$Ne6e0&_?zEpAhb9yc2wa@ztSM(3n)iyIq)^qQ~$GK!OEUk$4
z+ff*vpi3Ezm+I;I#W7&qvj;xJ-t&M8P(X~^vA8r|RW02j=
z6rFE#SomFu6Lht8p?=v?%NYcBwFaB_v3LOrk9VV*Qp-dF;VUBjz-CUVl(_Ur!6r6>
ztpOILEB^CK1*&I{3Nwdj>`qLohGQza1G2IlI|;}Es*WwKPtVX2w#h&r?fVf3WXek1
z)303MT!*p>=8RuZ(}p&Fq&7+Lt_xp7pi+vOSyjB@w>5hZ{fY3SqzT#jcI4!ML;lFP
zKWZVHp0k8nv5ZnnU;LF3<(4f=bH}w2e?XNt#=EH3(=D87f&cPMabGxcJWa$}2HL1HRty2x3ggJ4P-Pc
z1&PPfV&$(I?hS6$yFBo-13(Yzi}V%Yn|*T4QyVU#y+N^rUqw{jg#5J_c?uEGqlbPw
z(CxD>?iDimy9wly`*Q;SZpxdT9O=9}%#*=1Oub8Khf-naml+oQxIFJrH~6`5lF}Ri
znLVlbmB`CV#IvY>9SyLTKfZt4;
z;6oKtw9hpyiyc)CyDe2utV%J$J3rv*)rZ1%sd-;QS}&oziC~+VCQeOF=w4NZ?xQ;G
z^NTq!>~he-qAml&EG(<7#a*=5fZ>B3fWB%l0(52wxb>iNTwDnOGCDCqfhirqFp>ZG
zeyv7nn=c28`1fsBF-!zN^-@(=w<4k0P*vqzSZynpT3mEIgMXX&@j<1hbH_v(QPi*H
zOWo00KpOyg_BU_d(By6l5Y^!tZFuo3sVRlniwE>swtsq=RKK3WK1d-!g!fqyVL;&c
z`N^)3zdb9e%!A*!6q1o-eq=(`$dc?SPM!<*dF#Q+Nq420^QA-4=F1b)*o1L%!Z?E(
z;B0De?cB@>)O+R7&7}|EeFJvpBZU+_W~ewE@>dOc0P_GjP%AFwmO9u!iS20S?&|(p
zU*AXLC3NBr4paf(St|k8ul@Z^B0o2VX<7shR|*=C+5?{8T?*jdO-Sw{%ounG6ie?i
zrmK$6F_FIj$x^@v5S5hdY6#3NZbiK%vKz{%0G|B&UXzo9`46!mW
z$lW(tA|td&i*MxgbeCEk8d-V-
z*b__{z^iwuZyw@KqFw8b5QdZIge`l^AXxmS&P*0muIu*bqvW>2pJ>WQyKN0mc3W%F
zGYwV(W)NO}n`P))sNH4p>&)6teLqIF-7b7v|1_d?e0M0ubZv1br0ji%1#IsG#NHq$
zLrA0zcK+rEMalr8jHcYMl^Np%YAyfWB*Q
z+ER6wIhTWnfC}%kccrJo7Ty2X(JqX~p0|4Yll|APs9;>mH|DgNvM1i2
z56d!Mt_Q230gbI^U+VWb(8*}OS9?$xu$p5XboknI6}Rd8+ZU9cn!)8qsv8cBQzUv!
z(I(21q@;l;PBas9-paYlwl2eJXTt(?Zy3Nf_v`e6+t?;;Uk&*`RgF*o{+>XL&zTH_
zPPpN@9cVukSp#T%j*wh!ct6%k#@q7*K(*03%sC7u6I&~5&-3Sf!rm~P)Oa-^7{IzZ
zer_y_DhOYvrVWCMUMyfwAkVNLKgWK2M^o*ETJDnW}r|UF7d7R+0UV14Y2hG#_imO0c`h$q2Tr`E`8Km!f6i(dR4F;<>y%ITQ
zuZ6Ct+ZWHUaL3Cg1I5m1-bjy5S59y*4Bn_frU@tpv@UwqX_*B`+`LRo%)YKwjkEjD
z94u9lIf;U8OI`TxjS8(vsg4IEB4XdH2w8MQejeBl9A&CGU*S21?4rWb{ToN#nzY?O
zUz=!6x`piAl+4Z|L$bCiL}k@5D4eLu?P=Ai>ofd?657pa+1IK|M>6MfG}p^f3|NVI
zHj9b~8O=>K*UMb`2TF(j1^736D^iua!cRk&uH9;T%V@~SqXX{~B(j>9rwKhpRy!nX
z>j{*s5q!;akjS)8^9FSEWg^-7(5@UxnMu$=hVl_Mnh~2lo)WLJ`=i@ni6wlGL|E~K
zxG6pr6l+~C+DaVLg!N*@=6FkmD|Ad?esG&zOT9{yS{_g3DYJez{q^EY766H}-0!`_
ztk^f|`PNYR++$DG-8Ze{t#vP8zFLdaP24lgq4Ux0ZsYkhRIs)CwOC;7
z=@X^D4(A8u@x8^V%FXvx-d#^9JgGqcq$)6696S6f8z32kcTM5-57oj#fa~Z!4s0f9
zexQ@iarFE1Ew@Yj6Qj#tMOb&aTU63H{tEvO&bB*oM%ZJg1fP<=P;SFAX0Wn4=r8w%
zKR8@3j~{ImTfa*dax3^xeZ*-u$2z&apOO%bAfL#-uJActiQ2)Mv!4BxAEr))t~6bK6_P+2mbe$DplCZbG#Bwc!0q81MyG?qiw{%4&7CT<_NToiNL}
z|2Xp6ucxt(KFSTyRB>Xn85V(TA5$Yjo|?Yu?Hmn-eueO_6`Z!`KH
zPQ(2g;W(h?)5v^a`Mi_G$Iz}<1edF(Z};m=i{rzk2S`0GOcUkz6BrX)3^;8
zV`+U$MM6Ng_3AXA-9M&d#UITen6W;3567x4Pdn@OVCZMibHtb5a@8X{-AEgdOwqIPGCegQx^*u`2&|baY}9LrkLti
z`48<^4bROmYyNn4D^Xkm4Z6m?k@4}<7+9+%?4;cLAcm~~bJYm(CBI({=$?gRZ2b>>4*~9lu{#HN;f>2N&?x|n#Di}i`oW%*
zpa9#PBW!civUK^b!+{K0c2SWmjJ6cv!CPynCw5Sf31A4cZ@U_9O$z<&g%P*~+r3~Y
zKQg@Bi2-5kL&#B&Y{wZJ@1I2n%havrX?hkeUmr}G$XE*E$Y=cB5i(T=pP=2PF4a!W
zE)kQBtq`flvQHkrAEMwVS9T(jI9Dai1pbq61sCXLIJ}i94O@`l9!RzL(c7l$FZNLG
z397{NFjJiu4v?LCH`|_p*_wMUoz~{h^}}52DtgWTkx9qH&E?#cm?uRVB?Uv)eL&Pq
z41{LQ_Nv!&G|j?~Qsz#?(qnjU`x4h+<&R!i
z9bTyT-fwn>uXg&6L^F|rc+iyfk3T~#AT@dTmV*#$Pn{Mk;=yif6MV56$q(SGLc?p3afBFRN2+hy9)#}+vp^z{+yUZA0IvbLGAMiGjNpj`LVR^jC?73ay!Ngng
z(TR(%2T-QTs(s8NhRp@(s<%HAeG+}IDUV1K3ta>tBAOOx>0W0{v81IU9N0(*aE8er
zB=l1Ph*~+dVeXHrtY+AnkEi)kh2DhQ^E?jkeD5DvWxwvWPTo`}2i|`!^R(920XapD
z>|5y4V{wY7p2sdmOTV8da@p~qBK0$j$kJke-yB1ntlb8?W)d2_AQ)_GLvdPPdwXW@
z{n1Q(l=pw?(f>bjS%b9fo1nnO95TlSyG(0!%OnmDYY7~+?UMV|&KDs*I{Qw-&g$)&
zzGdUH_e-z&see{bcXjZqa>c!_}_MxaXO`(MYk0
zo!xw^^3}xz*)u{LFEb)kBt}g~&Vz$WY_n}fPEI|6tGySgyvtUHu7I}>HnV<=N|Ida
z_`>BLv=-vv;&T0Sn!QLHFL1_(PGWKCLL>duw#^C`SBG2ggzNSwBu=AdhxJ*t$}^d>
z&SbrpHfE!UroTzTc5m!I7bUe?pW+3%@8{nJ49r|qg&JVmFAE;-
z#qpbpVNTC@gr1fQmv?#jY9oqI`%tC{HZIrQ-oS0S%7xV0RZW5X9LRcju(9#K0Vz`U
zHg}AsS`w=!5lES~06};g+Z(9CqjAOEZXo)N>Qzf>ad_hIG3CC8$Ng)1n|bz(d%Ir@-X?omLb3aEN^nv=$|*i{%Bc4
z1>!jjQw75WRa2-?F
zzo#H~UHC9V06D&cio)~zs%sZ?Z5mDD?9fX8M@eCkt;o&ykwku{5A8o*C3jb=LRmr&
zMndA3%->r4P9Bb_DJVEHTw3vWs8iS7?(D#58?mJzGf#G?akYVCZnEaF=BgV0iN{17
zxzu_&C+Y2dIS^;A+TQ3A!fGVRoT`u#wlPX|7c?k_%v;6J&igpwL7pK`wk-2_o^A%G
z!U-{{j*qJ7Eh
z3D?y|H(E2vHc%MSy!BLlGv=3Zz2yxE57pXESMHn&8D$*+MKeM_jn!~%x}N>R1Ew(0|MAevdn*-o;
zdER{$m&|=XAUuO%M^tsvYW*u3!-&f*MI!s#a+L40
zZ5e~e;^#AVA4<5hkzL^!&W(jJ^)``96*p~6gm=45<-O8{zAiOF@Ah_FHES}M=EK7(
zFA!)fnFvFdSlVtd$Uoy>Dn39!*0{J85;L(V^<30)UroYz;s$vNvFjwbx@56Z{S|92
z5wtp4+aRsB4J$7ZV@)K)dZ_086$|lFp{taES1;&veiks~EKe?ADN5>iw+5G85g`>$
z>kc@;ht9fRbaKSbrRa?(#)HTU$|Ajg_(HqL5dseeFf}eRNGh#1madL-$M#d61Mcb7
z`K?+vW2m@aWhHy%?(JwHp}E7s&%9S5fH}>thS(;|Nl2cy4dq_pesz^e3)=rtGbY3L
zvEo;8xil8qCbfY%4=1dZG94P3Z^IKt8EBu8gS;Y_RUNKQksduI|4cjX^W}!;rZeB`
z3EEG0g;ehXVZBDW3V+qgBQhf63CVUPMqgjE2O|Y$V-G9Ln)NlBRPfAdToLuk$%wc~
zgG=CDAYhk55kvTY80X}}Nz&q?;)@NA#X@~i9+#1VJ*H-{v2`taL@uodBL^uJ5JlC&
z8@`rrQ%Gr|oiCCl)98pJvnndCRerb0NBgDm^Ad_FJAjj9lrd%^3fI)&e8r+yFx3P$m}qhfo@
z%FC_98zifGnv$26da7W%z5M1be?DDZON(FJ7Yu*yN4V-?snt*?^Fp%AZr5~OWSxLl
z4(jFM4YNA!@c`ypL+uD?0Cl8J+Phlus0WB4FGtUsb(P`}~MX`fF+jZNQQ+Wpo_
zNe+CNyCi{`cnDfR`)+eb@Nt-j*FgG4SnWC{zpIIpa(~et{lNyoNn#xa*_^gRa3;O}
zUiU`zOGO?z?{5%2{|2V4c9a#9^&g}tjt|Y~`VD0K_sKir^1jY}zKf?mr)3t*#gtml
z?xKQZM%xE{IV2TJ9cPA8?JbA%-WOi3a*9undD6HvY)l)9ArQ!{U~Ef&fsrTeyVSUG
ztj|LK3{~{1t2*=NkLA;Zcuf0N4?`FlZ`mj=X^ZkBiG(e_WL-$8M@4veMUg7tM;v4b
zQ^&wTn;5JVoP$dk&-H1Ua48&};y5E4!#-y_t>DN)C?6&0I?4R5Y-(ed8oEZIdjap%
z-~J?QGk<_28Qe4xCodinV)?cM`{+RZSwF8|Kp?l^Wp0;$N~nqx&KOIxqjNxXffOq;
zJ~x&64m||_1^Gh@Xy=b$a)?Nq4|6^A07Eo_Y@XZS;)68PeGt4cs9UEHqs#x+{c0*<
zN)yUz?$?ZzG(@}5ubtP^>f6Y3`tDR2nL4{fE8M)Z8IfXnT-PD!%5-eZfv_vov72PX
zWJ1rOvjBlw#fLwn$Jb~N#nNSX?)lZd#*
z%~L;H9EaI*;LWuD4As;rgnY-$&-6W6gW08gJ`+KJ08fN_j^}2p&1hoU8n?CkX)f|T
zYT|5uu_f@4ER~>+8EV-cMb;`h&XsU=_LzsnK_M5{?_n!D2A8&FDpv|Br~xCr`h~Oq
z+KH2J4`#N?DF#xH^p1{88U4_@aujYT$IEdp{+Y=N@2~cYU+Y~0ADS(#rO*_9qUGfs
zu|DgEM|t+c;vjFT&wZt^yk~li?Dp!FCc6{+a7q1f$^nMt26P}p3sogGkV!HIE=tgW
z0u{-oRT6p-D1k3fWKpYI+|@UA>(*<(aFcJR#u3xTE_l2t$QnM*^X5TWqY;<=uv(EY``M4kE+c3ND=w{66whpDHuDZ~
zuLyPo37^Z|j1bhMhjkyM=ReBDGiqkJd{AA#qhCnYM8bu4J^*x_whTPFA*?%Jp~2$1
z86b&ghWxP_S+wLpCZ1T$wc>#+MlG^X87D?Wa2{s*Ozhw
zdi$3Gpynet0lh;EgK3mD%@a5_wAh<_Ua#i;lklSxB6L&2F;RWb+4JAO6|3AUzP&`U
zelg+2b%$Lr7*$*aLT&VZyn=k1;f7~vK08KV9V@Q3<@%k<>y2NJ`(Ui@FJP9MGRP(meM=$f!ie-J`3hgx{@X5wORBl$rp
zb8*nf+s-4pKvoX*^Ukz0>A9@3)GaC>Yb4LAX?-?GANB{!Y`UJrQLrz*+RP@C!N+%!RXKZYrejD>UMenXRHuEJNuKd
zcEUN$0vV_sswrHrViWPPemYJShz$)5<@&}T!q`glmX-*+JYnA>1L{Z>_p)AKH-C=^
z;O6114VX}%bq`c=cdsX>cpdkScqHJp4Q_LRAR8N-BMLw`w#3$447_8Cudd4|isxBzHiS-m@~!vgUBzWV?9
z(p*Hrc-?9~T^ok*h?P+!J
zAUEHn_iBSLWF)g6isig(WHc(kRTMu=p{Va&FG;VTlN{Bf-%$zK%vb84MqD-li=u(D
z@ua|PH>uFKm8VUofk7sSw7m7kI&g>NIBS*NGvQsOLKO4@qg4As*8;q2(KK@0zY=r-
z(`An(`cV}L2l-0$`2G&^K&=v~w?X8=AqoRY-N}q@GP_lf{-sWpb%;<>i!#0XcD%Zd
zPF9=XS=qsXfd3B(v{$#V{OMXBw_GCyxmp_2s7R9!UCxB0TjhDu2^O(X92r!vtzeXQvc;v)+K{
z1Ld-0X5rWGU9;P>+N!8#^cEawtEl;Pl;nB2iumGHRZqxZ?Qv7h4QzLl3JfMR5=0ho
zVFMMpw&}Ig$)_2G<;D0JwJa(Pyof%#POxA>pD2mGtIL+S14Pzkm!XHnFxI}L?em*Y
z=)1jpUcm8HhOvV28S(I+>r8bYJ|Jv!npu>s%P+fR`*Mwg#&a(Qx!@d5R#G1S4T#t>Zat>L%P*(
z+z}vvnTf
z$R&1Vi_iI$qIIvSPgL8VN>Z0ZB#2*E;Qj3TTBtuS0OG?NoJz3}x40SI>1pO=wF9kRlR6+(QRZddbtSU<{k*X|~Nf$Q)Z
z7o&$j2!;L`N5sq_={^>zqM~VWkuYZ;qU)Wx-mB^L+-zkIXI0tNIxGCf-O!47M)<+R
z>-}>F*{#XSVYZ#0tb&}d)8p8JEEJaQGNPRZ`66S%x!UzEm_J_Euf>&ZS_q`ZUtRUC
z3%aJMC1J-&ZEq$>AH5)6HG35t60+I2e|aZ8TVt85Ap^boOu7PoRq=(~#c+2?JOrnC*W9v7GGA=vYL(^>EHb-ZT`uFoU*
zN2#b}B$JYw!Dn2KZ32(yt9F#-QEn3)!7ao&X@U);ArO&14ja9)5Ln
z6yT$wQ()3oZxbi7x8O#ruTH6CKRg1Ab?i;_ArIY|i<;l?o8$FfQkJtV6fS2X!RR}(
z>W62vE`Q=NRcV@G@IHCLc9)h~Z2Wc?4lRzx%Sk(+BN+$Esp}nT?f8
zMxRmksF&X@jg#25MH+toc&LL~cY&($h`j_CS{)w}m>61n?|$43%DV#@`F?cYy`04U
zuf2@z-MssFfwmO7G5z&I)C*L)RvRbI@bIsEPd9)5!a|&G5qy-HeV=Ky}^KqL{jm=w`n=M!$fpO-{w9
zObYadv+YE!V?(N1H$Bbnd#QP!3Qe$FW6xA3A${D+Ey%MiHiCl`h2G78FaFc54pDPy
z2Ms4%JgPev=+LJeH~tKxh3mYyRAM&0{XfUNRN4lM%4>Vnml#@FHRWTwX4%9Obloyh
zr3@sXjk)s{JM(xOdp92)Cr<0XW_JnOH$0uLD~b4ntf-_^k$1Hrm|HeYHNqiRp22=B
zS7U)!F2fR~4s$YupI%?QCP=>SS)Xn`xOAMTGbbt~+955w>F`3R79QcKIT|^>I4h+B
z{(`n=%OdNjojLdQ+D$LcOr@sCWpyAJ8yu$*5*MCxl5yAxv3g`fKT4Ij^|Khd^{qXI
zQWDb2@n~8~$!c?DOh|=qJw5#ST;&D>W9*bvDQFkrzGONGov*~a)*{KuJaiX0IDhvB
zqr@mPGt-eT?Z90?P3k4V^XJbWKYH|;60EC*IXO8%Zp9lY5P?>G4hs)2jSK+$I*=RV
z2g{GBzI^FF=AhWMVMKTuejLvP6+t|N)jChhwAw`4q1lUFTVI<8k(!9+Ol({gE(JO&z8>VTH88TJGl{w
z4$o0@HSbr(q(r8}^u}>*1d~i_IG0w({(UQ5hEv?S3k^
zF^!%HbH3NTo_%WLDs3rwqOVt1^)kDQ^L_YB)1SgYEK%-^jR^eV&=J+a8|59@X!%0m
zj78-!m1QUvV9on{E~*yX@QJv#9)IESn7+T@Di>q!Y%^ajPB{4BP(bT!=W&}Y5obc}
zdZN#y=eP2TAVdk_xTCmB!yWon(~OdLgRe0HF>Wdf+EMrQ=}+SSWN(D`Ue8VC+5WPGx`TK~t^oG7B5)0fb*57+o
zR@EqBDt0{=^y#hRf3szSU-gGD`*{A{`l-fipUm3Q8QqPQ`n%lal1<~y{ioR?h@_BzTIo!G=kyRBP>5z;Zc6zc%|QO*ul+zMN0Jh%9}JX8u(jWzL(x{
zMpiSo-u2X9_QQp>)TLw~5EuWLlCi*_Kc#uo#xpp_SWyXrGZPboo79p?;&f41=;>vF
z_zP~{_at#i$x2(rPrTR7paupw>Zs+M?!40GQksmkJGJFkmfKZAOGN;;Ui0lT9UJIbb@mzrO1p|Qyd
zQfkH4W%AyheFN0Ld^x;v*`5aoEy_*ENZRvUYf&H$u%VrZf7iwUwj^)~;T148!1B;D
zmKaAcjW&JygxR2zpB|=Ho)A-ln6$UI_r(K!*(_fUbA*F850N0D7gW=CUK>(nhwVya
zY^W0pB$TMeOc1J@8^joRs&Ajp=8q5GZ2NpkZt;G-Xrj
z;oX_HE}e|;TS0zuniMo^TNf4D2Yi6#exT)(%Xj)pLqo&j
zJM7q#XshBoXhl1)~Fao(@*$nGDHZ9A$|oHnMp7b8_paLUldf(=U79
z-T!I;6-t=Ct#@MX4gf1@Dqg-(TiWB6$54y}A0
zN>gBq6SnHk??#4UKAM^?+ar3X!oms)G(8KwO;)!nxagj1RzUkCLpgf7{0b~@nLtush)AE(8
ztLtFNcOpWY9PvKY>;+9Schor+c8hwRH(<$0tx4xxd_9
z8X0)!ZeWAi^ZU1aakhwZMV+{ukY+yT?I{__Yz%V;YplI3imtn+8(K?aozC;r$mjS!
zy1M9vh1;~O_TpWQT{+PN_nxIzlPq`?}SSh-;iF%DrPOr^xk<
zaNgo-hjVlj;(lcf@q#<=ti0<)#qsvgvYO-L%(j}UYAn!}EozBstYmO$!}b2E#m}`n
z@@w{iL^r3>KzRSiDmR*HcPTD>Fz_p
zyVw6aUM7qI=l~q!^z@8sn?-5URm-26B|0sKxU}f-+>}6gt0pBz;j+-3Evs82H$~78
zX1=7BpeM5#4R-%~t3iSW2|)iF?Qj^v;(hV~QlbyeS}nVskVE0zn)YejX#M>7(P}Bh
zrj&wddfxRhmW|%IcaTjeiS}k0P1zge1TI`kc)x|tr}q%npfuC9b4#AUkzUYWIELxM
zphnMgfdmIHLE{s8#H;>&0YQiE6f;IQs*P_LQpcmac^2xMH=YVe5CF2>V_$@s6c1l;
z!p=S3L|zUwlGQA1uO5Fwj(~nN6MoaRxFy?-je`rTky`K3R@Hf32zhq)H}n&sINCi`
z14!2T#AHyFdeNj@W^iLnEx#^N{Pv!e_1X||saC93cPQkW5Uu-NuYGwk4FH+8?zMFs
z^MMmFfB-~5eaEly2hT)E+aQC3|GI3flK{(?{i!6Ji48rl#$>8
zB>!J+a#{Yd*ti4Os~bFr+8t%y)3AMR8U#R4S0s6~t-ZN#fi?Q#`P#=BimchjT|4g0
z_P0J8(5@Y;0`CUXy
zP384*&$m0?T1`j%Ho7ff40_y+!SxkaLY^0zpHp?vAoO1r5W(~ClVomvRSg2kADj4o
zl)rG6hW!==ISt%j7iUBKn7)d`-wkwd{8!`i|6*AGf6~YNWLMW$dSS;}BzK)@wou7;
z*P(t3RTs<0p3AMiU`i=_rah;t)Qr`;T2tb*8<}mi2WQZB-b1mFRRO^@oEFcCkB+Nl
zlu6MCjt9SAXm?M-CL{x@qAvYxUKad4Re)O%aw
zr;IYMu{FV?GMo`Cpj-DAyrW3<*DOZopy}uJaJ*{kUN^-XeM<=5I{Q1={U|pMxo=p$
z&9kl^d%`I1aGNW!`{^YTt*WXKQ5o+8tj9Oyzjr_>Lr39-#4+~?`{@&9?z?YT!28!X
zSnae4eAzE!H6x({X27rQuQiC}nA7J@r#CBn<@`dTeSZ~f0GebXvIuybEd@A1!B;Za}KyOaLi!-o?RQPR=4
zH{KQFS6+ebi+oOu~_{5
z4sf~uQ!WOK5g~jBD}YNEQ`1TsCV0R6AmEy#smzbZcMt~M~nM>>_m1W-?IIVbr1tnka=Q_k-|sq*LIna2**
zDMnE*>ucd&I1R(;YKvqpn`FujpqDYWx7fj?fPl~j2ai-xP#|5ZRWlrbh*A;>kI=&F
zwDt!m%EVI&UhQ=>?li&}?@s&-3dJZW#DH3WR;_i?n1kP!I{QV@>s1!t&y-LgXwbME
z$$x($k!}6UCb!*q%2M5?TAe8rga9e@e@4N7)%3-_P0q7$LH@$V@4oj1)S*+#knp>z
z0#~v#)Ni5Abz3VbuW)csF*heigXAHyr&J{IP^Neo~Z#1
z$<52#9Ly90n!i
zO`U*^p>fYHOiTiCq0O}vyRv0*b7@+4e^2M7ACI6w2MMQ481&H{zW~VB7XaM?&y~+o
zE6#jO(#Qz;g(~@$K&t|$Y`)SYyw-XuD~a7~b4*=-wGUqL(Fn(JI|@rdeZ9tTA%+6v
z>NiIpeFk2h#kdOLHzE0vQ7JO-oVt0RrrG0%7^I`%mO0&abiBcSRE`Y=WDwumo6XTe
z6%v}4VjWL#3#5YInlF6wC**T3;B)@-WvwrzchUZC(84ClC*)XKa)6Y^=Jo0Pgq_bJ
zQStJFmlU9}Zcvwm=$IHBGO}`jJAeuGXW@IG=k@VKjnlfq-M~&}GYUrS_{ztO85_@{
zUuH8?YXNGgE{;ZCmx4)9+O*rMouKd2FvbR%Ios>N;Pg7N25fGq@9p*GOkMe1_#Pha
z@@Mcllg8I?;2|m^KYBFO>~RRfHqi4})bgL+;>*g&6m}b%BWncW6-d2G<`@#g5X|wp
zzMun{Xn;Bdzolhll)rl_Mp1&)G8YSh7>SyQv1~q9?z#@0IF>WDr62}3!4KA9PKb_<
zKKji*@N?0g7ED60Nw}I6Vt}%qUV5H&<|;mP%u!#wW}RA?0m1TG1SiE7I{9V&BeSh{)tEp2yM7n^p=9
z4Gp;Ya9hv8{XKg0C^`q|T4<#rAu9ky6eVft4?E3=3Z@P45X(LwQbM~i>X`}bMgFF*50Lb0<4P};Qo{OM)-(H{g3=F7)X$~}L%v^{kG3R3-0Y8D#52Xya
ztH&4^bv$U8vtT$4WlM3|Omo~lwC{d&bvVF4MJ3^Vaa6&FZh)fi
zbDk@7d*wtT;I7!0!mVCs3+1q$WOdn{OC#75A>ifZrKhKlrmV3XljV2Y83nB?0P<$E
zFJ37B`t^%Y(6bs0Km!NmXJ_6(@hLh7R@M|bL8uBaP)tgI<{S;nvB*U4H0=uAHPB*r
zuEle~|DkcR>Bh&?_wNw|k4IH<?>bU;g2CWad1tG`B&`J81QIeL0F4v&n~
zIBzH){}~eVJ@3`mzHikPlr9}oWRv#gcfUh#@
zMt6aYM{q+$2!Jsh1dL-2hb3`NtMT7=_A&g!he5KNy@$seBT}HR65is2r!mp!0z0~Z
zm0Q8aOFhq56OMtDn+6Gv^tb@XouPh`5r3(Q{5U8mC^~1kI|_C@p+5l>Y@ETgV*uDD
z`27X2Ge@Uwx4LA$R~2A>#zjXPIv76VDb;JyijIwr&H_Sp8mUOG65mlYesjEP0bM#>
z?~sjzPF(N^i&}%^5waFA>dD-8={YJAyP0Ak99H9ueM#(63~D8Vz-Fuh>!k2VV*qx%
znPir()a1I&@$SqX46a)HJQI0x3X1>M+_gtTxv$|#TlP+|tDQn&|+oVy1
z$p{(g!VJ0JGRAOfMT%+-Ly6q)m#LUAE-AY(xrA|v8I;7hOzqr?aNcj6v)2Ciob%6_
zHGh0#&3x-}n`kM8a`=e?hQ^yv#agRY
ze?N8dWQ%Mg6r>Z0`_$EKj~_ptIwm&t;kEX&1azFDNwUwL%wwc@lw^Wd2;SCqc0B8j
z|9%ON;XqgM^csMzjjQ)_9bAng3#Z?fnbWx-1$QeR^&CMKfLzAx%ul^EHK^zCuAnd)
z5C?&TpktI-))!ia#V78QlMy3hU4DB&Sw&?sM&)5TPu!zkueCEM^qb>0UrvG=zKuN%
znu*Bu@WnLq49RNC$lzJTv8_Aslt2vQ*D>Jvvls`
z3+7d4xzbn%h|o5EevkW~dKLAQI5{au9BkY~Ojl%Rg@nzHXQ-r6>Ha(Nj}i!pZtV|C
z0IwnT;n55NI+O-;?(
zL2z7eOz;#&RXKYw80wd~Oi*W+J2kjE~T`?kb4>JoT;`O|)nX6m*)M!Yu2#=t|Ju0rg1M
zBimMu?&Qc}XotmRK1%{7vcG+Npo|L`YqNvVp_eh|La63qk8Y5Y8Kq%O?%MTgetv$G
znbt!r%A7}uQ-xL7{FDte58scB1Pz9cks)-m$1`tz?N>sj_k-t_lDl%ra32ux2MNpH
z00_Ym3&IwJNQ7qxPjgyAhBpCO%>t@Ke)mFz8G*y~>&(o}i$XpPvKJ?czM&Kiu7L(3
zj=rz%>v@hdccYtV`T|&5q~+rc$iN8l`fvH>|CBRdeQ{&UZ@)k-)CI&Q-FbBptF-G;
zQR?8f1qB6jDQywK%|F31qn@t~DPid~L?*m}PPA9@^(;ec2PszD4XQuDUX#UhYRUsTssS$Anyinvu(*lD`_?p!
z3#d63e+~l~Qgwa^Jlh*hZoI7k_5xl`|3y}|;MP9&aR57$kxxi^PH;tfonWJxnS1zG
zM&cHsG0kztM66JeQvv67WO>*zmUJxfMCL;AfV9$)V#$4#SRn5OzDo}d`SbwML+pR^
zE(2>ocZ12g@FQs;qr6XzO$JYE^3RxUz|=b4HAH(-LG=xV{rBzD
z1egG&s(3VH4Yl9{91e#Ld?wXlfa!wKax8CRI@Guad}!Jd4)Rmp@{2+SL(NUX=8FSe+D#TxATYSK+{>7ny8MlLWV?)v2mAy{2(s}fe&^Aa
zrn}pa+5lH3k%TNIH5A8zUqS;xE%b0@*9A0A-}%4Pey+c?dV}loFC<0Df~p&M)EKy))B1(N*hQ
zLn;D6doUQ6*Gbw*XlLNiqa6MdSn(ibvP6zgIDbA9KA_3d{Ve_dUbySTQl6FuEJ@d`
zMRhr}BhyTutp(>u&lMFPtW~5Gj80Rk3P(4!VOFVCe4)n>;mnzPfC>t@&Pu-#ZiSCa
zEx5B|nOoceUETHly&xiME0_m6NT2-zcDPfCi8t4Jh}@R
zD|5_%Hmk>bKoAI?hO0^=7Ql!xq@X8e!
zuBH!0tcH8NeKHz50=?07;q>YV?G+SCD=sAr(DidD)R
z2qfLGxsV)TAr$3Y@^N*|u*Ku`FZVs_{0j`2A=EZBbO`v^($O5Ra-z(e&$e4$TIdD)
zMB|c(lmY-b`>ZvytSUyz2a!>pO?Q8lGxX1{`}$rIGI>6jBzvyMNh4NXk8~F%R#|SX
z$#VQbI0bOsaf?Pha;NEqSFwhZ^Ad_zu*{k-H@(?{+_Kw#MybjAo&;6^GOx(GE{n7g
z^L3+K$Gc8px*7Jw&>kJ<>fr7jF4PPVNb(qJQ%*XYd1#1Q#tAPcbsPncDh%YUmp+`X
zhR;n23X9)sS?=1fL3!_9f-w?ztew_uKMz`|dH{A>4o^(MZtY+z5smZnVrw_-pKZjf
z*dUk&vU(-JS6&MO3n4601UX3wiHU^Ktgec=Aq;^?D
zGx%i;{28^nU*zw|;eRx?%h_+)Rc-{)N%Y$73q
     
     
      gizmo_histogram(
-  key = "sequence",
+  key = waiver(),
   hist = NULL,
   hist.args = list(),
   hist.fun = graphics::hist,
   just = 1,
   oob = oob_keep,
+  metric = "counts",
   alpha = NA,
   theme = NULL,
   position = waiver(),
@@ -75,7 +76,8 @@ 
      Argumentskey
 
      A sequence key or binned key
-specification.
      
+specification. Internally defaults to a sequence key when the scale is
+continuous and a binned key when the scale is binned.
      
 
 
 
      hist
      
@@ -91,7 +93,9 @@ 
      Argumentshist.args
 
      A <list> with additional arguments to the hist.fun
-argument. Only applies when hist is not provided as a <list> already.
      
+argument. Only applies when hist is not provided as a <list> already.
+Please note that these arguments are only used for binning and counting:
+graphical arguments are ignored.
      
 
 
 
      hist.fun
      
@@ -113,6 +117,13 @@ 
      Argumentsmetric
+
      A <character[1]> either "counts" or "density" stating
+which field of the <histogram> class to display. The "density" metric
+might be more appropriate to display when the histogram breaks have
+non-constant intervals.
      
+
+
 
      alpha
      
 
      A <numeric[1]> between 0 and 1 setting the colour transparency
 of the bar. Use NA to preserve the alpha encoded in the colour itself.
      
diff --git a/search.json b/search.json
index 8a8d5f7..1809be4 100644
--- a/search.json
+++ b/search.json
@@ -1 +1 @@
-[{"path":[]},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"our-pledge","dir":"","previous_headings":"","what":"Our Pledge","title":"Contributor Covenant Code of Conduct","text":"members, contributors, leaders pledge make participation community harassment-free experience everyone, regardless age, body size, visible invisible disability, ethnicity, sex characteristics, gender identity expression, level experience, education, socio-economic status, nationality, personal appearance, race, caste, color, religion, sexual identity orientation. pledge act interact ways contribute open, welcoming, diverse, inclusive, healthy community.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"our-standards","dir":"","previous_headings":"","what":"Our Standards","title":"Contributor Covenant Code of Conduct","text":"Examples behavior contributes positive environment community include: Demonstrating empathy kindness toward people respectful differing opinions, viewpoints, experiences Giving gracefully accepting constructive feedback Accepting responsibility apologizing affected mistakes, learning experience Focusing best just us individuals, overall community Examples unacceptable behavior include: use sexualized language imagery, sexual attention advances kind Trolling, insulting derogatory comments, personal political attacks Public private harassment Publishing others’ private information, physical email address, without explicit permission conduct reasonably considered inappropriate professional setting","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement-responsibilities","dir":"","previous_headings":"","what":"Enforcement Responsibilities","title":"Contributor Covenant Code of Conduct","text":"Community leaders responsible clarifying enforcing standards acceptable behavior take appropriate fair corrective action response behavior deem inappropriate, threatening, offensive, harmful. Community leaders right responsibility remove, edit, reject comments, commits, code, wiki edits, issues, contributions aligned Code Conduct, communicate reasons moderation decisions appropriate.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"scope","dir":"","previous_headings":"","what":"Scope","title":"Contributor Covenant Code of Conduct","text":"Code Conduct applies within community spaces, also applies individual officially representing community public spaces. Examples representing community include using official e-mail address, posting via official social media account, acting appointed representative online offline event.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement","dir":"","previous_headings":"","what":"Enforcement","title":"Contributor Covenant Code of Conduct","text":"Instances abusive, harassing, otherwise unacceptable behavior may reported community leaders responsible enforcement tahvdbrand@gmail.com. complaints reviewed investigated promptly fairly. community leaders obligated respect privacy security reporter incident.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement-guidelines","dir":"","previous_headings":"","what":"Enforcement Guidelines","title":"Contributor Covenant Code of Conduct","text":"Community leaders follow Community Impact Guidelines determining consequences action deem violation Code Conduct:","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_1-correction","dir":"","previous_headings":"Enforcement Guidelines","what":"1. Correction","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Use inappropriate language behavior deemed unprofessional unwelcome community. Consequence: private, written warning community leaders, providing clarity around nature violation explanation behavior inappropriate. public apology may requested.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_2-warning","dir":"","previous_headings":"Enforcement Guidelines","what":"2. Warning","title":"Contributor Covenant Code of Conduct","text":"Community Impact: violation single incident series actions. Consequence: warning consequences continued behavior. interaction people involved, including unsolicited interaction enforcing Code Conduct, specified period time. includes avoiding interactions community spaces well external channels like social media. Violating terms may lead temporary permanent ban.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_3-temporary-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"3. Temporary Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: serious violation community standards, including sustained inappropriate behavior. Consequence: temporary ban sort interaction public communication community specified period time. public private interaction people involved, including unsolicited interaction enforcing Code Conduct, allowed period. Violating terms may lead permanent ban.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_4-permanent-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"4. Permanent Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Demonstrating pattern violation community standards, including sustained inappropriate behavior, harassment individual, aggression toward disparagement classes individuals. Consequence: permanent ban sort public interaction within community.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"attribution","dir":"","previous_headings":"","what":"Attribution","title":"Contributor Covenant Code of Conduct","text":"Code Conduct adapted Contributor Covenant, version 2.1, available https://www.contributor-covenant.org/version/2/1/code_of_conduct.html. Community Impact Guidelines inspired [Mozilla’s code conduct enforcement ladder][https://github.com/mozilla/inclusion]. answers common questions code conduct, see FAQ https://www.contributor-covenant.org/faq. Translations available https://www.contributor-covenant.org/translations.","code":""},{"path":"https://teunbrand.github.io/legendry/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"MIT License","title":"MIT License","text":"Copyright (c) 2024 Teun van den Brand Permission hereby granted, free charge, person obtaining copy software associated documentation files (“Software”), deal Software without restriction, including without limitation rights use, copy, modify, merge, publish, distribute, sublicense, /sell copies Software, permit persons Software furnished , subject following conditions: copyright notice permission notice shall included copies substantial portions Software. SOFTWARE PROVIDED “”, WITHOUT WARRANTY KIND, EXPRESS IMPLIED, INCLUDING LIMITED WARRANTIES MERCHANTABILITY, FITNESS PARTICULAR PURPOSE NONINFRINGEMENT. EVENT SHALL AUTHORS COPYRIGHT HOLDERS LIABLE CLAIM, DAMAGES LIABILITY, WHETHER ACTION CONTRACT, TORT OTHERWISE, ARISING , CONNECTION SOFTWARE USE DEALINGS SOFTWARE.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/gallery.html","id":"rugs","dir":"Articles","previous_headings":"","what":"Rugs","title":"Example Gallery","text":"easy way wrap rug guide combine primitive_ticks() manual key. Axis guides lookup values plot data, need feed rug data manually. simplest way use guide secondary axis.  guide can also easily stacked typical axis guides. style ticks drawn rug differently regular axis ticks, can give rug guide local theme.  using rug colour bars, can feed rug guide_colbar(second_guide) argument. Note colour-bar guides default inward facing, white ticks, might like style look like regular ticks.","code":"guide_rug <- function(x, ...) {   primitive_ticks(key = key_manual(x), ...) }  rug_wt <- guide_rug(mtcars$wt) rug_mpg <- guide_rug(mtcars$mpg) base <- ggplot(mtcars, aes(wt, mpg, colour = drat)) +   geom_point() +   labs(     x = \"Weight (1000 lbs)\",     y = \"Miles per gallon\",     colour = \"Rear axle\\nratio\"   ) base + guides(x.sec = rug_wt, y.sec = rug_mpg) long_ticks <- theme_guide(   ticks.length = unit(0.5, \"cm\"),   ticks = element_line(colour = \"dodgerblue\") )  base + guides(   x = compose_stack(\"axis\", rug_wt),   y = compose_stack(\"axis\", guide_rug(mtcars$mpg, theme = long_ticks)) ) rug_drat <- guide_rug(   x = mtcars$drat,   theme = theme_guide(     ticks.length = unit(2.75, \"pt\"),     ticks = element_line(colour = \"black\", linewidth = 0.5)   ) )  base + guides(colour = guide_colbar(second_guide = rug_drat))"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"stacking","dir":"Articles","previous_headings":"","what":"Stacking","title":"A guide to guide composition","text":"cut open guide examine innards spilling , eyes first meets skeleton holds guide together. skeleton composition guide: guide whose task render compose guides. composition guide may entirely foreign ggplot2-user. vanilla ggplot2 also contains composition guide, namely guide_axis_stack(). accepts input guide specifications stacks guides top one another.  legendry, composition operation: compose_stack(). regular axis guides x y aesthetics, works way guide_axis_stack(). However, guides stacks supports aesthetics, like colour, can also used .","code":"standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   labs(     x = \"Engine displacement (litres)\",     y = \"Highway Miles per Gallon\"   ) +   theme(axis.line = element_line())  standard + guides(x = guide_axis_stack(\"axis\", \"axis\", \"axis\")) staxis <- compose_stack(\"axis_base\", \"axis_base\", \"axis_base\")  standard +    aes(colour = cty) +   guides(     x = staxis,     colour = guide_colbar(first_guide = staxis, second_guide = \"none\")   ) +   theme(legend.axis.line = element_line())"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"primitives","dir":"Articles","previous_headings":"","what":"Primitives","title":"A guide to guide composition","text":"point, might wise take closer look exactly guide_axis_base() . pull threads class , mystery starts unravel: Indeed, using compose_stack(\"axis_base\", \"axis_base\", ...) stacking stack! peel back layers see inside guide_axis_base(), find stacks? : good things must come end must guides building blocks. composition skeleton building blocks flesh providing function. building blocks called ‘primitives’ legendry. example, guide_axis_base() function stack three primitives. respectively build axis line, ticks labels. complete guide, don’t spacing , let’s exaggerate spacing clarity.","code":"class(guide_axis_base()) #> [1] \"ComposeStack\" \"Compose\"      \"Guide\"        \"ggproto\"      \"gg\" standard +   guides(x = compose_stack(     primitive_line(),     primitive_ticks(),     primitive_labels(),     theme = theme_guide(spacing = unit(5, \"pt\"))   ))"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"introducing-the-rest-of-the-family","dir":"Articles","previous_headings":"Primitives","what":"Introducing the rest of the family","title":"A guide to guide composition","text":"’ve already met ‘famous’ primitives (lines, ticks, labels), let’s round acquaintances. spacer primitive can use increase spacing different pancakes stack, . also ‘ranged’ triplet: brackets, boxes fences. require niche range key power display nested axes.  last member family primitive_title(). Aside just displaying text, three things: >1 title, distribute titles along range. makes convenient label lower higher ends scale. ‘absorbs’ regular axis title turning . title primitive guide actual title, makes slightly easier prevent unwanted double titles.  implemented guide, take place regular axis titles. also means titles repeat facets.","code":"range_key <- key_range_manual(   start = c(2, 4), end = c(5, 6),    name = c(\"First\", \"Second\") )  standard + guides(x = compose_stack(   \"axis_base\",   primitive_bracket(range_key, \"curvy\"),   primitive_spacer(unit(0.5, \"cm\")),   primitive_box(range_key),   primitive_spacer(unit(0.5, \"cm\")),   primitive_fence(range_key, rail = \"outer\") )) standard + scale_x_continuous(guide = compose_stack(   primitive_title(c(     \"Sneaky little displacementses\",      \"We needs it. Must have the displament\")   ),   primitive_title(\"Gollum explains engine displacement to you\") )) + labs(x = \"A normal person explains engine displacement\") last_plot() +   facet_grid(~ year)"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"dont-use-primitives-directly","dir":"Articles","previous_headings":"Primitives","what":"Don’t use primitives directly","title":"A guide to guide composition","text":"giving primitive_-prefix, made impossible use name inside function don’t expect . acts little bit discouragement using primitives complete guides. However, can use primitives name inside guide composition functions, use full constructor function.","code":"standard +    guides(x.sec = \"ticks\") #> Error in `validate_guide()`: #> ! Unknown guide: ticks standard +   guides(x.sec = compose_stack(\"ticks\"))  # Looks identical to the above standard +    guides(x.sec = primitive_ticks())"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"sandwiching","dir":"Articles","previous_headings":"","what":"Sandwiching","title":"A guide to guide composition","text":"Aside making stack primitives, can also build sandwich primitives. Analogous two pieces bread outside good bits inside, sandwich composition guides often sees centrepiece flanked two guides. Similar naively believed guide_axis_stack() little snowflake guide, guide_colbar() fact composition: Focussing ‘bread’ part first, two guides can use flanking innards. One called ‘text’ one called ‘opposite’.  called ‘text’ ‘opposite’ ‘text’-guide take position indicated legend.text.position theme element. Perhaps unsurprisingly; guide end called ‘opposite’ guide. can expose swapping theme element.  also noted guide label-supression mechanism, ‘opposite’ guide drawn surpressed labels. mechanism place guides like guide_axis()/guide_axis_base() display example facet_grid(axis.labels = \"margins\").  thing guide_colbar() , compose_sandwich() , adjust theme settings match ggplot2::guide_colourbar() closely. Alright, fine, get ‘bread’ part sandwich! inside? ’m glad asked.","code":"class(guide_colbar()) #> [1] \"ComposeSandwich\" \"Compose\"         \"Guide\"           \"ggproto\"         #> [5] \"gg\" standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_sandwich(       text     = primitive_labels(),        opposite = primitive_ticks()     )   ) last_plot() + theme(legend.text.position = \"left\") standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_sandwich(       text     = \"axis_base\",        opposite = \"axis_base\"     )   )  # The same plot standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = guide_colbar(vanilla = FALSE)   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"gizmos","dir":"Articles","previous_headings":"","what":"Gizmos","title":"A guide to guide composition","text":"insides guide_colbar() called ‘gizmo’. gizmo differs primitive gizmo general building block, rather specialised display particular aesthetic. Also, complete guide allow complete crucial task translating graphic display interpretation data. called ‘gizmo’ sort gadget don’t appropriate name . Hence: gizmo.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"my-first-gizmo","dir":"Articles","previous_headings":"Gizmos","what":"My first gizmo","title":"A guide to guide composition","text":"can display gizmo guide_colbar() —sandwich spread, — gizmo_barcap(). also immediately clear need bread case.  Similarly guide_colsteps() gizmo_stepcap(), might second gizmo may already encountered.","code":"standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = gizmo_barcap()   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"exotic-gizmos","dir":"Articles","previous_headings":"Gizmos","what":"Exotic gizmos","title":"A guide to guide composition","text":"also gizmos may less familiar. reasonably simple one gizmo_grob(), just allows place grob guide. example, can stack axis, use non-bread part sandwich. Please note good representation plot’s colour aesthetic. hope wouldn’t necessary : don’t make plot like !  Perhaps gizmo’s inherently useful gizmo_density() gizmo_histogram(). default, wrap density() hist() functions called layer’s data. can pass arguments functions density.args hist.args respectively. ’ll repeat : gizmos, full guides. Also: please ignore ’re guiding colour fill colour visible.  However, can easily promote gizmos full guide adding axis. compose_sandwich() can reasonable job .","code":"my_grob <- grid::grobTree(   grid::rectGrob(),   grid::textGrob(\"Grob\\nGizmo\") ) my_gizmo <- gizmo_grob(my_grob, width = unit(2, \"cm\"), height = unit(2, \"cm\"))  standard +    aes(colour = cty) +   guides(     x = compose_stack(\"axis\", my_gizmo),     colour = compose_sandwich(middle = my_gizmo, text = \"axis_base\")   ) standard +   aes(colour = cty, fill = cty) +   scale_colour_viridis_c(     option = \"C\",     guide = gizmo_density(density.args = list(adjust = 0.7))   ) +   scale_fill_viridis_c(     option = \"D\",     guide = gizmo_histogram(hist.args = list(breaks = 10))   ) standard +   aes(colour = cty, fill = cty) +   scale_colour_viridis_c(     option = \"C\",     guide = compose_sandwich(       middle = gizmo_density(just = 1),        text = \"axis_base\"     )   ) +   scale_fill_viridis_c(     option = \"D\",     guide = compose_sandwich(       middle = gizmo_histogram(just = 0.5),       text = \"axis_base\"     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"other-compositions","dir":"Articles","previous_headings":"","what":"Other compositions","title":"A guide to guide composition","text":"following compositions situational aren’t part ‘proper’ guide. compose_ontop() guide lets render one guide . can see plots allows us touch panel composing top one another, stacking.   also compose_crux() (‘cross’) parent composition compose_sandwich(). Instead allowing bread two sides, can also put guides top bottom. isn’t currently use complete guide though.","code":"top <- guide_axis_base(   key = key_manual(32, label = \"Here is 32\"),   theme = theme_guide(     ticks.length = unit(1.5, \"cm\"),     ticks = element_line(arrow = arrow()),      line = element_blank()   ) )  standard + guides(y.sec = compose_ontop(\"axis\", top)) +   labs(title = \"compose_ontop\") standard + guides(y.sec = compose_stack(\"axis\", top)) +   labs(title = \"compose_stack\") ball <- gizmo_grob(grid::circleGrob(   r = unit(0.5, \"cm\"), gp = grid::gpar(fill = \"tomato\") )) block <- gizmo_grob(grid::rectGrob(   width = unit(1, \"cm\"), height = unit(1, \"cm\"),    gp = grid::gpar(fill = \"dodgerblue\") ))  standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_crux(       centre = gizmo_barcap(),        left = \"axis_base\", right = \"axis_base\",       top = ball, bottom = block     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"keys-in-vanilla-ggplot2","dir":"Articles","previous_headings":"","what":"Keys in vanilla ggplot2","title":"Key information","text":"way guides exchange information scales called ‘keys’. Keys simply data frames typically hold information aesthetic, values represent displayed. may already seen keys ’ve used get_guide_data() function , can used retrieved guide’s key. data frame , can see key ‘x’ aesthetic. tells us relative location tick marks aesthetic’s x column, numerical values represent .value column. values communicated users captured .label column. Sometimes, keys information additional aesthetics, like y column key .","code":"standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(shape = drv, colour = drv)) +   labs(     shape  = \"Drive train\",     colour = \"Drive train\",     y = \"Highway efficiency\",     x = \"Engine Displacement\"   )  get_guide_data(standard, aesthetic = \"x\") #>           x .value .label y #> 1 0.1127946      2      2 0 #> 2 0.2811448      3      3 0 #> 3 0.4494949      4      4 0 #> 4 0.6178451      5      5 0 #> 5 0.7861953      6      6 0 #> 6 0.9545455      7      7 0"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"keys-in-legendry","dir":"Articles","previous_headings":"","what":"Keys in legendry","title":"Key information","text":"key difference keys legendry keys ggplot2, legendry exposes users keys. first, can inconvenience, allows greater degree customisation.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"why-use-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Why use keys?","title":"Key information","text":"dig different types keys, worth noting exactly keys exposed. Keys represent ‘rules’ annotate scale, whereas guide display rule. example, key_log() instructs annotate every 10x change large ticks, changes smaller ticks. doesn’t really matter whether rule applied axis colour bar. rule independent display makes modular.","code":"logkey <- key_log()  ggplot(msleep, aes(sleep_total, brainwt, colour = bodywt)) +   geom_point(na.rm = TRUE) +   scale_y_log10(guide = guide_axis_base(key = logkey)) +   scale_colour_viridis_c(     trans = \"log10\",     guide = guide_colbar(key = logkey)   )"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"regular-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Regular keys","title":"Key information","text":"understand better typical key works, can use key_manual() manually create key. Usually sufficient just provide aesthetic argument, .value .label columns automatically derive . want custom labels, can set label argument. guides legendry accept key argument, cause guide display information key, rather information automatically derived scale.  addition, can provide automatic keys keywords. Setting key = \"minor\", setting key = key_minor(). fashion many key_*() functions can used keyword omitting key_-prefix.  keys don’t directly return data frames, return instructions keys interact scales. example key_auto(), default key many guides legendry, needs know range populate tickmarks. can preview values ’d label letting key absorb scale known limits.","code":"key_manual(aesthetic = c(2, 4, 6)) #>   aesthetic .value .label #> 1         2      2      2 #> 2         4      4      4 #> 3         6      6      6 my_key <- key_manual(aesthetic = c(2, 4, 6), label = c(\"two\", \"four\", \"six\"))  standard + guides(x = guide_axis_base(key = my_key)) standard + guides(x = guide_axis_base(key = \"minor\")) key <- key_auto() print(key) #> function (scale, aesthetic = NULL)  #> { #>     aesthetic <- aesthetic %||% scale$aesthetics[1] #>     df <- Guide$extract_key(scale, aesthetic) #>     df <- data_frame0(df, !!!extra_args(...)) #>     class(df) <- c(\"key_standard\", \"key_guide\", class(df)) #>     df #> } #>  #>  template <- scale_y_log10(limits = c(1, 1000)) key(template, \"y\") #>   y .value .label #> 1 0      0      1 #> 2 1      1     10 #> 3 2      2    100 #> 4 3      3   1000"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"ranged-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Ranged keys","title":"Key information","text":"special type guide may find legendry called ‘ranged’ guides. difference regular guides mark single point aesthetic, rather use start- end-point mark range aesthetic. can convenient annotate co-occurrances data plotting events. example, can annotate airtimes TV shows timeseries data. Compared regular key, don’t aesthetic column, replaced start end columns. cases, indicate single .value, can still use .label column. .level column indicates far offset range, ’ll display “Frasier” farther away “Golden Girls”.  also ‘automatic’ ranged key, attempts find patterns key labels.  example obvious pattern x-axis labels plot first 3 entries 3 drive trains 1999, followed 3 drive trains 2008. default, key_range_auto() tries split label non-alphanumeric character, give explicit split instructions using sep argument.","code":"ranges <- key_range_manual(   start = as.Date(c(\"1985-09-14\", \"1993-09-16\")),   end   = as.Date(c(\"1992-05-09\", \"2004-05-13\")),    name  = c(\"Golden Girls\", \"Frasier\"),    level = 1:2 ) ranges #>        start        end       .label .level #> 1 1985-09-14 1992-05-09 Golden Girls      1 #> 2 1993-09-16 2004-05-13      Frasier      2 ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = primitive_bracket(ranges)) plot <- ggplot(mpg, aes(interaction(drv, year), displ, fill = drv)) +   geom_boxplot() +   labs(     x = \"Drive train by year\",     y = \"Engine displacement\",     fill = \"Drive train\"   ) plot # Split on literal periods key <- key_range_auto(sep = \"\\\\.\")  plot + guides(x = primitive_bracket(key = key))"},{"path":[]},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"piping-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Piping keys","title":"Key information","text":"key_manual() key_range_manual() functions equivalents easy pipe. called key_map() key_range_map() respectively, can replace following: following, pipe-friendly version: keys display something like :","code":"key <- key_range_manual(   start = presidential$start,   end   = presidential$end,   name  = presidential$name ) key <- presidential |>   key_range_map(     start = start,     end   = end,     name  = name   ) ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = primitive_bracket(key))"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"formatting-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Formatting keys","title":"Key information","text":"addition lot control keys display, also control common text formatting operations keys. key options ... argument allows many arguments element_text() passed labels.  cases know label advance, almost every time one uses key_manual(), key_map() ranged equivalents, can even vectorise formatting options.","code":"ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = guide_axis_base(key = key_auto(colour = \"red\", face = \"bold\"))) guide <- presidential |>   key_range_map(     start = start,     end   = end,     name  = name,     colour = ifelse(party == \"Republican\", \"tomato\", \"dodgerblue\"),     face  = \"bold\"   ) |>   primitive_bracket()  ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = guide)"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"forbidden-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Forbidden keys","title":"Key information","text":", time writing, two keys probably shouldn’t use code. key_sequence() key_bins(). hope mentioning use prevent experimenting subsequent frustration keys. can see key_sequence() produce informative axis.  reason key designed colour gradients  Likewise, key_bins() designed regular guides, specific colour steps.","code":"my_sequence_key <- key_sequence(n = 20) standard +   guides(x = guide_axis_base(key = my_sequence_key)) ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c(     guide = gizmo_barcap(key = my_sequence_key)   ) my_bins_key <- key_bins()  ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c(     guide = gizmo_stepcap(key = my_bins_key)   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"axes","dir":"Articles","previous_headings":"","what":"Axes","title":"A guided tour","text":"Axes truly bread butter guides. Naturally, axes shine brightest guides positions like x y can moonlight auxiliary guides well.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"where-not-to-apply","dir":"Articles","previous_headings":"Axes","what":"Where (not) to apply","title":"A guided tour","text":"legendry, staple axis guide_axis_base(). first glance, axes utterly unremarkable much mirror ggplot2::guide_axis() design.  terms novelty, ‘extra’ option axes offer display bidirectional tick marks.  However, guide_axis_base() flexible ggplot2::guide_axis(). ggplot2, ’d typically switch ggplot2::guide_axis_theta() display axis theta coordinate polar plot. custom axis knows fit polar coordinates, fuss needed switching polar coordinates.  Argueably, custom guide little bit flexible. exactly scruples displaying arbitrary continuous aesthetics, like colour plot . can see, informative colour guide reason ’d advice . unadvised yet possible topic resurfaces later article.  summary, guide_axis_base() flexible guide can used position aesthetic, can () used continuous aesthetics.","code":"# Turn on axis lines theme_update(axis.line = element_line())  # A standard plot standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   labs(     x = \"Engine Displacement (Litres)\",     y = \"Highway Miles per Gallon\"   )  standard + guides(   x = \"axis_base\",   y = \"axis_base\" ) p <- standard +    scale_x_continuous(guide = guide_axis_base(bidi = TRUE)) +   scale_y_continuous(guide = guide_axis_base(bidi = TRUE)) p p + coord_radial(start = 1.25 * pi, end = 2.75 * pi) standard + aes(colour = cty) +   guides(colour = \"axis_base\")"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"nested-axes","dir":"Articles","previous_headings":"Axes","what":"Nested axes","title":"A guided tour","text":"Currently, exactly 1 ‘novelty’ axis guide_axis_nested(). Let’s suppose ‘nested’ data, purposes just means discrete variables kind categories interactions can laid nested fashion. category categories, . example three super-categories ‘Drink’, ‘Fruit’ ‘Vehicle’ granular categories like ‘Coffee’ ‘Pear’ belong super-categories. can use interaction() function paste together name inner category name outer category.  can also nest vertical axis x/y aesthetics swapped.  Instead just relying formatting labels correctly splitting, can also manually annotate outer categories. , can use key_range_manual() function constructs brackets see fit.","code":"df <- data.frame(   item = c(\"Coffee\", \"Tea\", \"Apple\", \"Pear\", \"Car\"),   type = c(\"Drink\", \"Drink\", \"Fruit\", \"Fruit\", \"Vehicle\"),   amount = c(5, 1, 2, 3, 1) )  plain <- ggplot(df, aes(interaction(item, type), amount)) +   geom_col() plain + guides(x = \"axis_nested\") ggplot(df, aes(amount, interaction(item, type))) +   geom_col() + guides(y = \"axis_nested\") my_key <- key_range_manual(   start = c(\"Coffee\", \"Apple\"),   end   = c(\"Tea\", \"Pear\"),   name  = c(\"Drinks\", \"Fruits\"),    level = 1 )  ggplot(df, aes(item, amount)) +   geom_col() +   scale_x_discrete(     limits = df$item,     guide = guide_axis_nested(       regular_key = \"auto\",       key = my_key     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"brackets","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Brackets","title":"A guided tour","text":"change style range indicators, can choose different bracket setting. theme elements legendry.bracket legendry.bracket.size control styling size line. settings shortcut theme_guide().  brackets can provided string naming bracket function, like \"curvy\" invokes bracket_curvy(). follows overview build-bracket shapes.  Quite possibly, might bracket shapes want use, aren’t built legendry. Luckily, can build custom brackets, using numeric matrix : 2 columns corresponding x y coordinates. least 2 rows. values 0 1. x-coordinate stretched along axis, whereas y squished fit legendry.bracket.size theme setting. custom bracket can just provided bracket argument.","code":"plain + guides(x = guide_axis_nested(bracket = \"curvy\")) +   theme_guide(     bracket = element_line(colour = \"blue\"),     bracket.size = unit(3, \"mm\")   ) brackets <- list(   \"atan\"    = bracket_atan(),   \"chevron\" = bracket_chevron(),   \"curvy\"   = bracket_curvy(),   \"line\"    = bracket_line(),    \"round\"   = bracket_round(),   \"sigmoid\" = bracket_sigmoid(),   \"square\"  = bracket_square() )  brackets <- cbind(   as.data.frame(do.call(rbind, brackets)),   shape = factor(rep(names(brackets), lengths(brackets) / 2), names(brackets)) )  ggplot(brackets, aes(x, y)) +   geom_path() +   facet_wrap(~ shape) +   coord_equal() zigzag <- cbind(   x = seq(0, 1, length.out = 20),   y = rep(c(0, 1), length.out = 20) )  plain + guides(x = guide_axis_nested(bracket = zigzag))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"boxes","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Boxes","title":"A guided tour","text":"Alternatively, also possible forego brackets altogether use boxes instead.","code":"plain + guides(x = guide_axis_nested(type = \"box\"))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"customising","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Customising","title":"A guided tour","text":"needn’t strictly use guide_axis_nested() discrete data: can use continuous data well. However, ’d need provide manual ranged key, one created key_range_manual()/key_range_map().  customise different depths bracketed text, can give list text elements levels_text argument.  Alternatively, can tailor many usual text formatting options encoding key.","code":"presidents <- key_range_map(presidential, start = start, end = end, name = name)  eco <- ggplot(economics, aes(date, unemploy)) +   geom_line() +   labs(y = \"Unemployment\")    eco + guides(x = guide_axis_nested(key = presidents)) presidents$.level <- rep(1:3, length.out = nrow(presidents))  eco + guides(x = guide_axis_nested(   key = presidents,   levels_text = list(     element_text(face = \"bold\"),     NULL,     element_text(face = \"italic\")   ) )) presidents <- key_range_map(   presidential,    start = start, end = end, name = name,   level = rep(1:4, length.out = nrow(presidential)),   colour = ifelse(party == \"Republican\", \"tomato\", \"dodgerblue\") )  eco + guides(x = guide_axis_nested(key = presidents))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"dendrograms","dir":"Articles","previous_headings":"Axes","what":"Dendrograms","title":"A guided tour","text":"Dendrograms popular method displaying results hierarchical clustering. standard way computing hierarchical clusters compute distance metric data dist() forwarding result hclust(). default plot method shows dendrogram.  packages many options display dendrograms, notably ggdendro dendextend. legendry package ambition best dendrogram visualiser, find dendrograms use useful annotation. use dendrograms, can provide object produced hclust scale_(x/y)_dendro(). ensures scale follows order clustering result default uses guide_axis_dendro() display dendrogram next labels.  guide_axis_dendro() function can decomposed labels segments. can use primitive_segments(\"dendro\") display labels, may convenient rather place labels opposite end panel. plot use raw segments draw radial dendrogram. vanish = TRUE option indicates fit dendrogram root tree middle, ever relevant secondary theta axes.","code":"clust <- hclust(dist(scale(mtcars)), method = \"ave\") plot(clust) ggplot(mtcars, aes(mpg, rownames(mtcars))) +   geom_col() +   scale_y_dendro(clust) ggplot(mtcars, aes(mpg, rownames(mtcars))) +   geom_col() +   scale_y_dendro(clust) +   coord_radial(theta = \"y\", inner.radius = 0.5) +   guides(     theta = guide_axis_base(angle = 90),     theta.sec = primitive_segments(\"dendro\", vanish = TRUE),     r = \"none\"   ) +   theme(     axis.title = element_blank(),     plot.margin = margin(t = 50, b = 50)   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"colours","dir":"Articles","previous_headings":"","what":"Colours","title":"A guided tour","text":"colour fill aesthetics wonderful build guides , can apply pretty much anything. First, ’ll take gander variants colour bars gander rings.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"bars-and-steps","dir":"Articles","previous_headings":"Colours","what":"Bars and steps","title":"A guided tour","text":"Two variants colour guides exist {legendry}: guide_colbar() reflects guide_colourbar() guide_colsteps() reflects guide_coloursteps(). used standard fashion, look similar vanilla counterparts.  Please note following paragraphs apply equally guide_colsteps(), ’ll take guide_colbar() examples.","code":"standard <- standard +    aes(colour = cty) +   labs(colour = \"City Miles\\nper Gallon\")  standard +   scale_colour_viridis_c(guide = \"colbar\") +   labs(title = \"Custom colour bar\")  standard +   scale_colour_viridis_b(guide = \"colsteps\") +   labs(title = \"Custom colour steps\")"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"caps","dir":"Articles","previous_headings":"Colours > Bars and steps","what":"Caps","title":"A guided tour","text":"thing sets guides apart indicators data goes --bounds. common case --bounds data, set scale limits narrower data range. plot , cty variable observation lower limit 10, upper limit 30. Typically, displayed na.value = \"grey\" colour. bars display data --bounds gray ‘caps’ two ends bar.  can change --bounds strategy, oob argument scale, caps reflect colour --bounds data acquired.  can also force caps appear, even --bounds data, force cap colour consistent scale.  shape cap needn’t triangle. can set shape built-cap shapes.  caps can provided string naming cap function, like \"arch\" invokes cap_arch(). follows overview build-cap shapes.  certainly possible use shapes imagination well. provide shape, use numeric matrix : 2 columns corresponding x y coordinates. least 2 rows. positive values 2nd column (y). Start (0, 0) coordinate. End (1, 0) coordinate. can see shapes requirements hold built-shapes. matrix can given shape argument guide.","code":"standard +   scale_colour_viridis_c(     limits = c(10, 30),     guide = \"colbar\"   ) standard +   scale_colour_viridis_c(     limits = c(10, 30), oob = oob_squish,     guide = \"colbar\"   ) standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = c(FALSE, TRUE),        oob = \"squish\"     )   ) standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = TRUE, oob = \"squish\",       shape = \"arch\"     )   ) caps <- list(   none = cap_none(),   triangle = cap_triangle(),   round = cap_round(),   arch = cap_arch(),   ogee = cap_ogee() )  caps <- cbind(   as.data.frame(do.call(rbind, caps)),   shape = factor(rep(names(caps), lengths(caps) / 2), names(caps)) )  ggplot(caps, aes(x, y)) +   geom_path(arrow = arrow()) +   facet_wrap(~ shape) +   coord_equal() hourglass_cap <- cbind(   x = c(0, 1, 0, 1),   y = c(0, 1, 1, 0) )  standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = TRUE, oob = \"squish\",       shape = hourglass_cap     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"side-guides","dir":"Articles","previous_headings":"Colours > Bars and steps","what":"Side-guides","title":"A guided tour","text":"colour bars come small party trick: two rows tick marks separate axes masquerading parts colour bar. becomes easier see wash away make-vanilla = FALSE.  trick allows tailor colour bar liking separate sides. can use invoke tricks described axis section, like setting minor ticks, swap axes annotation-primitive like primitive_bracket().","code":"standard +   scale_colour_viridis_c(     guide = guide_colbar(vanilla = FALSE)   ) brackets <-    key_range_manual(     start = c(9, 25),     end   = c(19, 30),      name  = c(\"A\", \"B\")   ) |>   primitive_bracket(bracket = \"square\")  standard +   scale_colour_viridis_c(     minor_breaks = breaks_width(1),     guide = guide_colbar(       first_guide = guide_axis_base(\"minor\"),       second_guide = brackets     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"rings","dir":"Articles","previous_headings":"Colours","what":"Rings","title":"A guided tour","text":"Aside bars steps, also option show colour ring. understand might convenient, can help understand type data suitable . prime example cyclical data can month year. time December January just one month, encoded numerically, difference 11 months. problem can show sometimes periodic data, like housing sales .  Every year get sharp colour transition winter. remedy problem use cyclical palette. {scico} package offers suitable cyclical palettes, like ‘romaO’, ‘vikO’, ‘bamO’, ‘corkO’ ‘brocO’.  already much better, guide poor job displaying cyclical nature months. better reflected guide, can use guide_colring().  ‘thickness’ donut can controlled legend.key.width parameter, default 1/5th diameter. outer diameter ring controlled legend.key.size parameter, multiplied 5 consistency colour bar multiplier. Like custom colour bars, possible set custom guides, hoarded inner_guide outer_guide distinguish aren’t first second.","code":"housing <-    ggplot(     subset(txhousing, city == \"Houston\"),      aes(date, volume, colour = month)   ) +   geom_line() +   scale_y_continuous(     name = \"Total volume of sales\",     labels = dollar_format(scale = 1e-6, suffix = \"M\")   ) +   labs(     x = \"Date\",     colour = \"Month\"   )  housing +   scale_colour_viridis_c(limits = c(0, 12)) # Colours from scico::scico(12, palette = \"romaO\") periodic_pal <-    c(\"#723957\", \"#843D3A\", \"#97552B\", \"#B08033\", \"#CBB45D\", \"#D5DA99\",      \"#B8DEC3\", \"#85C7CF\", \"#599FC4\", \"#4E73AB\", \"#5F4C81\", \"#723959\")  housing +    scale_colour_gradientn(colours = periodic_pal, limits = c(0, 12)) housing +    scale_colour_gradientn(     colours = periodic_pal, limits = c(1, 13),     breaks = 1:12,     guide = \"colring\"   ) housing +    scale_colour_gradientn(     colours = periodic_pal, limits = c(1, 13),     breaks = 1:12, minor_breaks = breaks_width(0.25),     guide = guide_colring(       outer_guide = guide_axis_base(\"minor\"),       inner_guide = \"none\"     )   ) +   theme(     legend.key.width = rel(2.5), # fill to center     legend.key.size = unit(0.5, \"cm\") # actual size is 0.5 * 5 = 2.5 cm   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"legends","dir":"Articles","previous_headings":"","what":"Legends","title":"A guided tour","text":"addition full guides , legendry also three variants guide_legend() legend. first guide_legend_base(), similar ggplot2::guide_legend(), offers design argument lets put keys arbitrary cells rectangular layout.  Secondly, guide_legend_cross() let ‘cross’ two variables, ; generate legend key every combination two variable levels. legends merged share title, wise construct common legend setting key strategy title.  Alternatively, can also use guide compound variable already combines two variables. Note missing combinations correctly omitted case.  Lastly, also legend suitable displaying groups. guide_legend_group() legend adds additional titles separate groups. default, splits labels first non-alphanumeric character, can also use key_group_lut() indicate groups.","code":"design <- matrix(NA, 3, 3) diag(design) <- 1:3  standard +    aes(colour = drv) +   guides(colour = guide_legend_base(design = design)) common <- guide_legend_cross(key = \"auto\", title = \"Cross legend\")  standard +   aes(colour = drv, shape = factor(cyl)) +   guides(colour = common, shape = common) standard +   aes(colour = paste(cyl, drv)) +   guides(colour = \"legend_cross\") set.seed(42) i <- sample(nrow(msleep), 6)  ggplot(msleep[i, ], aes(sleep_total, bodywt)) +   geom_point(aes(colour = paste0(vore, \"vore.\", name))) +   guides(colour = \"legend_group\")"},{"path":"https://teunbrand.github.io/legendry/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Teun van den Brand. Author, maintainer, copyright holder.","code":""},{"path":"https://teunbrand.github.io/legendry/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"van den Brand T (2025). legendry: Extended Legends Axes 'ggplot2'. R package version 0.2.0.9000, https://github.com/teunbrand/legendry, https://teunbrand.github.io/legendry/.","code":"@Manual{,   title = {legendry: Extended Legends and Axes for 'ggplot2'},   author = {Teun {van den Brand}},   year = {2025},   note = {R package version 0.2.0.9000,     https://github.com/teunbrand/legendry},   url = {https://teunbrand.github.io/legendry/}, }"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"legendry-","dir":"","previous_headings":"","what":"Extended Legends and Axes for ggplot2","title":"Extended Legends and Axes for ggplot2","text":"goal legendry provide additional guide functionality ggplot2 ecosystem.","code":""},{"path":"https://teunbrand.github.io/legendry/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"Extended Legends and Axes for ggplot2","text":"can install development version legendry GitHub :","code":"# install.packages(\"devtools\") devtools::install_github(\"teunbrand/legendry\")"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"example","dir":"","previous_headings":"","what":"Example","title":"Extended Legends and Axes for ggplot2","text":"Let’s first set basic plot experiment : legendry package offers selection calls ‘complete guides’. complete guides can just drop-replacement regular guides, can specify using ggplot2’s guides() function using guide argument scales. example , ’re using two custom variants vanilla guides, namely guide_axis_base() guide_colbar(). custom variants additional options allow greater degree customisation: axis guide option bidirectional ticks. colourbar automatically recognises --bounds values displays cap.  Besides complete guides, legendry also incomplete guides can composed. ggplot2::guide_axis_stack() axis composition function can used display multiple guides. , use ‘primitive’ guide (incomplete building block) display range axis. stacking regular axis primitive guide completed.  legendry package extends guide composition concept beyond axes types guides. example compose ‘sandwich’: central guide flanked two others. bracket primitive, matter aesthetic displays can re-use sandwich. ’ve yet write vignette composition.","code":"library(legendry) #> Loading required package: ggplot2  base <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   labs(     x = \"Engine displacement\",     y = \"Highway miles per gallon\",     col = \"City miles\\nper gallon\"   ) +   theme(axis.line = element_line()) base +    scale_colour_viridis_c(     limits = c(NA, 30),     guide = \"colbar\"   ) +   guides(     x = guide_axis_base(bidi = TRUE)   ) # A partial guide to display a bracket efficient_bracket <- primitive_bracket(   # Keys determine what is displayed   key = key_range_manual(start = 25, end = Inf, name = \"Efficient\"),   bracket = \"square\",   # We want vertical text   theme = theme(     legend.text = element_text(angle = 90, hjust = 0.5),     axis.text.y.left = element_text(angle = 90, hjust = 0.5)   ) )  base + guides(y = guide_axis_stack(\"axis\", efficient_bracket)) base +    scale_colour_viridis_c(     guide = compose_sandwich(       middle = gizmo_density(),        text = \"axis_base\",       opposite = efficient_bracket     )   )"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"code-of-conduct","dir":"","previous_headings":"","what":"Code of Conduct","title":"Extended Legends and Axes for ggplot2","text":"Please note legendry project released Contributor Code Conduct. contributing project, agree abide terms.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":null,"dir":"Reference","previous_headings":"","what":"Bracket options — bracket_options","title":"Bracket options — bracket_options","text":"functions construct various sorts brackets. construct matrix can supplied bracket argument primitive_bracket().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bracket options — bracket_options","text":"","code":"bracket_line()  bracket_square()  bracket_chevron()  bracket_round(angle = 180, n = 100)  bracket_sigmoid(curvature = 10, n = 100)  bracket_atan(curvature = 5, n = 100)  bracket_curvy(angle = 225, n = 100)"},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bracket options — bracket_options","text":"angle numeric(1): angle degrees circle piece drawn. bracket_curvy(), angle 180 270. n integer(1) number points use bracket. curvature numeric(1) controls curliness bracket. precisely, used construct sequence seq(-curvature, curvature, length.= n) logistic arctangent functions evaluated.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Bracket options — bracket_options","text":" coordinates points brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Bracket options — bracket_options","text":"designing custom bracket shapes, expectation columns number 0 1. first column follows direction guide whereas second column orthogonal direction.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"functions","dir":"Reference","previous_headings":"","what":"Functions","title":"Bracket options — bracket_options","text":"bracket_line(): simple line bracket. n = 2 points. bracket_square(): square bracket. n = 4 points. bracket_chevron(): chevron (V-shape) makes bracket. n = 3 points. bracket_round(): One circular arc makes bracket. bracket_sigmoid(): Two sigmoid curves stacked top one another form bracket. bracket_atan(): Two arctangent curves stacked top one another form bracket. bracket_curvy(): Four circular arcs make bracket.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Bracket options — bracket_options","text":"","code":"plot(bracket_sigmoid(), type = 'l')"},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":null,"dir":"Reference","previous_headings":"","what":"Cap options — cap_options","title":"Cap options — cap_options","text":"functions construct various sorts caps. construct matrix can supplied shape argument gizmo_barcap().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cap options — cap_options","text":"","code":"cap_triangle()  cap_round(n = 100)  cap_arch(n = 100)  cap_ogee(n = 100)  cap_none()"},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cap options — cap_options","text":"n  number points use cap.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cap options — cap_options","text":" coordinates points brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Cap options — cap_options","text":"designing custom cap shapes, expectation first point starts (0, 0) coordinate last point ends (0, 1) coordinate. first column follows orthogonal direction bar whereas second column follows direction bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"functions","dir":"Reference","previous_headings":"","what":"Functions","title":"Cap options — cap_options","text":"cap_triangle(): equilateral triangle n = 3 points. cap_round(): semicircle. cap_arch(): Two circular arcs forming equilateral Gothic arch. cap_ogee(): Four circular arcs forming 'ogee' arch. cap_none(): cap.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cap options — cap_options","text":"","code":"plot(cap_arch(), type = 'l')"},{"path":"https://teunbrand.github.io/legendry/reference/common_parameters.html","id":null,"dir":"Reference","previous_headings":"","what":"common parameters in legendry — common_parameters","title":"common parameters in legendry — common_parameters","text":"collection common parameters needn't re-documented time.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/common_parameters.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"common parameters in legendry — common_parameters","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. available_aes  vector listing aesthetics guide can build. direction  indicating direction guide. Can \"horizontal\" \"vertical\". angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides in a cross — compose_crux","title":"Compose guides in a cross — compose_crux","text":"guide composition central guide optionally surrounded guides four sides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides in a cross — compose_crux","text":"","code":"compose_crux(   key = NULL,   centre = \"none\",   left = \"none\",   right = \"none\",   top = \"none\",   bottom = \"none\",   args = list(),   complete = FALSE,   theme = NULL,   theme_defaults = list(),   reverse = FALSE,   order = 0,   title = waiver(),   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides in a cross — compose_crux","text":"key standard key specification. key shared among guides NULL keys . See information linked topic. centre, left, right, top, bottom Guides use composition per position. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. complete  whether treat composition complete guide. TRUE, title margin added result. FALSE (default), titles margins added. theme  object style guide individually differently plot's theme settings. theme arguments guide overrides, combined , plot's theme. theme_defaults  theme elements override undeclared theme arguments. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides in a cross — compose_crux","text":" guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides in a cross — compose_crux","text":"","code":"# Roughly recreating a colour bar with extra text on top and bottom crux <- compose_crux(   centre = gizmo_barcap(), left = \"axis_base\",   right = \"axis_base\",   top = primitive_title(\"A lot\"),   bottom = primitive_title(\"A little\") )  ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty)) +   guides(colour = crux)"},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides on top of one another — compose_ontop","title":"Compose guides on top of one another — compose_ontop","text":"guide can place place guides top one another.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides on top of one another — compose_ontop","text":"","code":"compose_ontop(   ...,   args = list(),   key = NULL,   title = waiver(),   angle = waiver(),   theme = NULL,   order = 0,   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides on top of one another — compose_ontop","text":"... Guides stack composition. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. key standard key specification. key shared among guides NULL keys . See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  giving aesthetics must match guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides on top of one another — compose_ontop","text":" composite guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides on top of one another — compose_ontop","text":"","code":"# Using the ontop composition to get two types of ticks with different # lengths ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = compose_ontop(     guide_axis_base(       key_manual(c(2, 4, 6)),       theme = theme(         axis.ticks = element_line(colour = \"limegreen\"),         axis.ticks.length = unit(11, \"pt\")       )     ),     guide_axis_base(       key_manual(c(3, 5, 7)),       theme = theme(         axis.ticks = element_line(colour = \"tomato\"),         axis.ticks.length = unit(5.5, \"pt\")       )     )   ))"},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides as a sandwich — compose_sandwich","title":"Compose guides as a sandwich — compose_sandwich","text":"guide composition middle guide flanked two parallel guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides as a sandwich — compose_sandwich","text":"","code":"compose_sandwich(   key = key_auto(),   middle = gizmo_barcap(),   text = \"none\",   opposite = \"none\",   args = list(),   complete = TRUE,   theme = NULL,   theme_defaults = list(),   reverse = FALSE,   order = 0,   title = waiver(),   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides as a sandwich — compose_sandwich","text":"key standard key specification. key shared among guides NULL keys . See information linked topic. middle Guide use middle guide. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. text, opposite Guides use legend.text.position location opposite side middle guide respectively. Guide specification middle argument. args  arguments pass guides given either function string. complete  whether treat composition complete guide. TRUE, title margin added result. FALSE (default), titles margins added. theme  object style guide individually differently plot's theme settings. theme arguments guide overrides, combined , plot's theme. theme_defaults  theme elements override undeclared theme arguments. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides as a sandwich — compose_sandwich","text":" guide object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compose guides as a sandwich — compose_sandwich","text":"sandwich composition effectively crux composition lacking two opposing arms.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides as a sandwich — compose_sandwich","text":"","code":"# A standard plot with a sandwich guide ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty)) +   guides(colour = compose_sandwich(     middle = \"colourbar\",     text = \"axis_base\",     opposite = primitive_bracket(key = key_range_manual(       start = c(10, 20), end = c(25, 30), name = c(\"A\", \"B\")     ))   ))"},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides as stack — compose_stack","title":"Compose guides as stack — compose_stack","text":"guide can stack guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides as stack — compose_stack","text":"","code":"compose_stack(   ...,   args = list(),   key = NULL,   title = waiver(),   side.titles = waiver(),   angle = waiver(),   theme = NULL,   order = 0,   drop = NULL,   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides as stack — compose_stack","text":"... Guides stack composition. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. key standard key specification. key shared among guides NULL keys . See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. side.titles  giving labels titles displayed side stack. Set NULL display side titles. waiver(), attempt made extract titles guides use side titles. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. drop  giving indices guides dropped facet requests labels drawn axes panels. default, NULL, drop every guide except first. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  giving aesthetics must match guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides as stack — compose_stack","text":" guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides as stack — compose_stack","text":"","code":"ggplot() +   geom_function(fun = dnorm, xlim = c(-3, 3)) +   guides(x = compose_stack(     \"axis\", \"axis\",     side.titles = c(\"first\", \"second\")   )) +   # Add margin to make room for side titles   theme(plot.margin = margin(5.5, 5.5, 5.5, 11))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: capped colour bar — gizmo_barcap","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"guide displays colour bar optional caps either ends bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"","code":"gizmo_barcap(   key = \"sequence\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   oob = \"keep\",   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"key sequence key specification. Defaults key_sequence(n = 15). Changing argument key_sequence() fine, changing key type advised. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point()  # Just a bar p + scale_colour_viridis_c(guide = gizmo_barcap())   # Caps show up when there is data outside the limits p + scale_colour_viridis_c(   limits = c(10, 30),   guide  = gizmo_barcap() )   # The scale's out-of-bounds handler determines cap colour p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = gizmo_barcap() )   # Customising display of the guide p +   scale_colour_viridis_c(     oob = scales::oob_squish,     guide = gizmo_barcap(       shape = \"arch\", show = c(FALSE, TRUE),       size = unit(2, \"cm\"),       theme = theme(legend.key.height = unit(4, \"cm\"))     )   ) +   theme(     legend.frame = element_rect(colour = \"black\"),     legend.key.width = unit(0.5, \"cm\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: kernel density estimate — gizmo_density","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"guide displays kernel density estimate (KDE) aesthetic. aesthetic colour fill, shape reflect .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"","code":"gizmo_density(   key = \"sequence\",   density = NULL,   density.args = list(),   density.fun = stats::density,   just = 0.5,   oob = \"keep\",   alpha = NA,   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"key sequence key binned key specification. density One following: NULL using kernel density estimation data values (default).  vector feed density.fun function. named  x y numeric elements equal length, one returned using density() function. Please note  input expected scale-transformed space, original data space. density.args  additional arguments density.fun argument. applies density provided . already. density.fun  use kernel density estimation density argument provided list already. just  0 1. Use 0 bottom- left-aligned densities, use 1 top- right-aligned densities 0.5 violin shapes. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: kernel density estimate — gizmo_density","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"Non-finite values NA NaN ignored infinite values -Inf Inf squished limits.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c()  # Density from plot data p + guides(colour = gizmo_density())   # Using bins instead of gradient p + guides(colour = gizmo_density(\"bins\"))   # Providing custom values to compute density of p + guides(colour = gizmo_density(density = runif(1000, min = 5, max = 35)))   # Providing a precomputed density p + guides(colour = gizmo_density(density = density(mpg$cty, adjust = 0.5)))   # Alternatively, parameters may be passed through density.args p + guides(colour = gizmo_density(density.args = list(adjust = 0.5)))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: custom grob — gizmo_grob","title":"Guide gizmo: custom grob — gizmo_grob","text":"guide displays user-provided grob.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: custom grob — gizmo_grob","text":"","code":"gizmo_grob(   grob,   width = grobWidth(grob),   height = grobHeight(grob),   hjust = 0.5,   vjust = 0.5,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: custom grob — gizmo_grob","text":"grob  display. width, height [][grid::unit] setting allocated width height grob respectively. hjust, vjust  0 1 setting horizontal vertical justification grob used guide x y aesthetics. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: custom grob — gizmo_grob","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: custom grob — gizmo_grob","text":"","code":"circle <- grid::circleGrob()  # A standard plot with grob gizmos ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   guides(     x.sec = gizmo_grob(       circle, hjust = 0.75,       width = unit(2, \"cm\"), height = unit(2, \"cm\")     ),     colour = gizmo_grob(       circle, width = unit(1, \"cm\"), height = unit(1, \"cm\")     )   )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: histogram — gizmo_histogram","title":"Guide gizmo: histogram — gizmo_histogram","text":"guide displays histogram aesthetic. aesthetic colour fill, shape reflect .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: histogram — gizmo_histogram","text":"","code":"gizmo_histogram(   key = \"sequence\",   hist = NULL,   hist.args = list(),   hist.fun = graphics::hist,   just = 1,   oob = oob_keep,   alpha = NA,   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: histogram — gizmo_histogram","text":"key sequence key binned key specification. hist One following: NULL computing histograms data values (default). atomic  feed hist.fun function. named  breaks counts numeric items, breaks item exactly one element longer counts item. typical way construct list using hist() function. Please note  input expected scale-transformed space, original data space. hist.args  additional arguments hist.fun argument. applies hist provided  already. hist.fun  use computing histograms hist argument provided list already. just  0 1. Use 0 bottom- left-aligned histograms, use 1 top- right-aligned histograms 0.5 centred histograms. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: histogram — gizmo_histogram","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide gizmo: histogram — gizmo_histogram","text":"Non-finite values NA NaN ignored infinite values -Inf Inf squished limits.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: histogram — gizmo_histogram","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c()  # Histogram from plot data p + guides(colour = gizmo_histogram())   # Using bins instead of gradient p + guides(colour = gizmo_histogram(\"bins\"))   # Providing custom values to compute histogram p + guides(colour = gizmo_histogram(hist = runif(1000, min = 5, max = 35)))   # Providing precomputed histogram p + guides(colour = gizmo_histogram(hist = hist(mpg$cty, breaks = 10)))   # Alternatively, parameters may be passed through hist.args p + guides(colour = gizmo_histogram(hist.arg = list(breaks = 10)))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: capped colour steps — gizmo_stepcap","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"guide displays binned variant colour bar optional caps either ends bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"","code":"gizmo_stepcap(   key = \"bins\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   oob = \"keep\",   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"key bins key specificiation. Defaults key_bins(even.steps = FALSE, show.limits = NULL). Changing arguments key_bins() fine, changing key type advised. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"GizmoStepcap object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point()  # Just some recangles p + scale_colour_viridis_c(guide = gizmo_stepcap())   # Caps show up when there is data outside the limits p + scale_colour_viridis_c(   limits = c(10, 30),   guide = gizmo_stepcap() )   # The scale's out-of-bounds handler determines cap colour p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = gizmo_stepcap() )   # Customising the display of the guide p +   scale_colour_viridis_c(     oob = scales::oob_squish,     guide = gizmo_stepcap(       shape = \"round\", show = c(FALSE, TRUE),       size = unit(1, \"cm\"),       theme = theme(legend.key.height = unit(4, \"cm\"))     )   ) +   theme(     legend.frame = element_rect(colour = \"black\"),     legend.key.width = unit(0.5, \"cm\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide composition — guide-composition","title":"Guide composition — guide-composition","text":"Guide composition meta-guide orchestrating ensemble guides. , 'composing' guide useful visual reflection scale.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide composition — guide-composition","text":"","code":"new_compose(   guides,   args = list(),   ...,   available_aes = c(\"any\", \"x\", \"y\", \"r\", \"theta\"),   call = caller_env(),   super = Compose )"},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide composition — guide-composition","text":"guides  guides wherein element one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. ... Additional parameters pass new_guide(). available_aes  giving aesthetics must match guides. call call display messages. super  class object giving meta-guide composition.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide composition — guide-composition","text":" (sub-)class guide composes guides.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide composition — guide-composition","text":"","code":"# The `new_compose()` function is not intended to be used directly my_composition <- new_compose(list(\"axis\", \"axis\"), super = ComposeStack)  # Is the same as my_composition <- compose_stack(\"axis\", \"axis\")"},{"path":"https://teunbrand.github.io/legendry/reference/guide-gizmos.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmos — guide-gizmos","title":"Guide gizmos — guide-gizmos","text":"Guide gizmos speciality guide components specific one aesthetics display. Typically can composed guides guide primitives form complete guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-primitives.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives — guide-primitives","title":"Guide primitives — guide-primitives","text":"Guide primitives building blocks complex guides. , useful visual reflection scale. purpose combined one another form complex, complete guides reflect scale way.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-primitives.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide primitives — guide-primitives","text":"guide primitives simple, flexible tailored one particular aesthetic. way can reused combined .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom axis guide — guide_axis_base","title":"Custom axis guide — guide_axis_base","text":"axis guide visual representation position scales can represent x, y, theta r aesthetics. differs guide_axis() can accept custom keys can act axis coord_radial() like guide_axis_theta().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom axis guide — guide_axis_base","text":"","code":"guide_axis_base(   key = NULL,   title = waiver(),   theme = NULL,   n.dodge = 1,   check.overlap = FALSE,   angle = waiver(),   cap = \"none\",   bidi = FALSE,   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom axis guide — guide_axis_base","text":"key standard key specification. Defaults key_auto(). See information linked topic 'Details' section. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom axis guide — guide_axis_base","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom axis guide — guide_axis_base","text":"hood, guide stack composition line, ticks labels primitives. set minor ticks, use key = \"minor\", use type argument key_manual() key_map(). use logarithmic axis, set key = \"log\".","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom axis guide — guide_axis_base","text":"","code":"# A standard plot with custom keys p <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   scale_x_continuous(     guide = guide_axis_base(key = key_minor())   ) +   scale_y_continuous(     guide = guide_axis_base(key = key_manual(c(20, 25, 30, 40)))   ) p   # Is translated to theta axis without fuss p + coord_radial()   # To use as logarithmic axis: ggplot(msleep, aes(bodywt, brainwt)) +   geom_point(na.rm = TRUE) +   scale_x_continuous(     transform = \"log10\",     guide = guide_axis_base(\"log\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":null,"dir":"Reference","previous_headings":"","what":"Dendrogram guide — guide_axis_dendro","title":"Dendrogram guide — guide_axis_dendro","text":"axis speciality axis discrete data hierarchically clustered. Please aware guide affect scale limits, set appropriately. guide give misleading results step skipped!","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Dendrogram guide — guide_axis_dendro","text":"","code":"guide_axis_dendro(   key = \"dendro\",   title = waiver(),   theme = NULL,   labels = TRUE,   space = rel(10),   vanish = TRUE,   n.dodge = 1,   angle = waiver(),   check.overlap = FALSE,   ticks = \"none\",   axis_line = \"none\",   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Dendrogram guide — guide_axis_dendro","text":"key segment key specification. See information linked topic. Alternatively, object class  automatically invokes key_dendro(). title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. labels, ticks, axis_line Guides use labels, ticks axis lines. Can specified one following:  FALSE set guide guide_none() TRUE, set guide appropriate primitive.  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. space Either   object length 1 determining space allocated orthogonal direction. space argument class  (default) base size taken tick length theme setting. vanish relevant guide used secondary theta position:  whether continue draw segments meed center (TRUE) strictly observe space setting (FALSE). n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Dendrogram guide — guide_axis_dendro","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Dendrogram guide — guide_axis_dendro","text":"","code":"# Hierarchically cluster data clust <- hclust(dist(scale(mtcars)), \"ave\")  # Using the guide along with appropriate limits p <- ggplot(mtcars, aes(disp, rownames(mtcars))) +   geom_col() +   scale_y_discrete(limits = clust$labels[clust$order])  # Standard usage p + guides(y = guide_axis_dendro(clust))   # Adding ticks and axis line p + guides(y = guide_axis_dendro(clust, ticks = \"ticks\", axis_line = \"line\")) +   theme(axis.line = element_line())   # Controlling space allocated to dendrogram p + guides(y = guide_axis_dendro(clust, space = unit(4, \"cm\"))) +   theme(axis.ticks.y.left = element_line(\"red\"))   # If want just the dendrogram, use `labels = FALSE` p + guides(y = guide_axis_dendro(clust, labels = FALSE), y.sec = \"axis\")"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":null,"dir":"Reference","previous_headings":"","what":"Nested axis guide — guide_axis_nested","title":"Nested axis guide — guide_axis_nested","text":"axis guide gives extra range annotations position scales. can used infer nesting structure labels annotate ranges.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Nested axis guide — guide_axis_nested","text":"","code":"guide_axis_nested(   key = \"range_auto\",   regular_key = \"auto\",   type = \"bracket\",   title = waiver(),   theme = NULL,   angle = waiver(),   cap = \"none\",   bidi = FALSE,   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = NULL,   levels_text = NULL,   ...,   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Nested axis guide — guide_axis_nested","text":"key One following: range key specification. key = \"range_auto\", additional labels inserted represent point values.  passed key_range_auto(sep) argument. exception made string valid key specification. regular_key standard key specification appearance regular tick marks. type Appearance ranges, either \"box\" put text boxes \"bracket\" (default) text brackets. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_text list  objects customise text appears every level. ... Arguments passed primitive_bracket(), primitive_box() primitive_fence(). order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Nested axis guide — guide_axis_nested","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Nested axis guide — guide_axis_nested","text":"hood, guide stack composition line, ticks, optionally labels either bracket, box fence primitives. default, key = \"range_auto\" incorporate 0th level labels inferred scale's labels. labels look like regular labels. offer keys opportunity display ranges alongside regular-looking labels, regular_key argument can used setup separate key display ticks ranges.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Nested axis guide — guide_axis_nested","text":"","code":"# A plot with nested categories on the x-axis p <- ggplot(mpg, aes(interaction(drv, cyl), hwy)) +   geom_boxplot()  p + guides(x = \"axis_nested\")   # Apply styling to brackets p + guides(x = \"axis_nested\") +   theme_guide(bracket = element_line(\"red\", linewidth = 1))   # Don't drop nesting indicators that have 0-width p + guides(x = guide_axis_nested(drop_zero = FALSE))   # Change additional padding for discrete categories p + guides(x = guide_axis_nested(pad_discrete = 0))   # Change bracket type p + guides(x = guide_axis_nested(bracket = \"curvy\"))   # Use boxes instead of brackets + styling of boxes p + guides(x = guide_axis_nested(type = \"box\")) +   theme_guide(box = element_rect(\"limegreen\", \"forestgreen\"))   # Using fences instead of brackets + styling of fences p + guides(x = guide_axis_nested(type = \"fence\", rail = \"inner\")) +   theme_guide(     fence.post = element_line(\"tomato\"),     fence.rail = element_line(\"dodgerblue\")   )   # Use as annotation of a typical axis # `regular_key` controls display of typical axis ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = guide_axis_nested(     key = key_range_manual(start = 2:3, end = 5:6, name = c(\"First\", \"Second\")),     regular_key = key_manual(c(2, 2.5, 3, 5, 7))   ))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":null,"dir":"Reference","previous_headings":"","what":"Circle size guide — guide_circles","title":"Circle size guide — guide_circles","text":"guide displays sizes points series circles. typically paired geom_point() draw_key_point() glyphs.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Circle size guide — guide_circles","text":"","code":"guide_circles(   key = NULL,   title = waiver(),   theme = NULL,   hjust = 0.5,   vjust = 0,   text_position = NULL,   clip_text = FALSE,   override.aes = list(shape = 1),   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Circle size guide — guide_circles","text":"key standard key specification. Defaults key_auto(). See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. hjust, vjust  0 1 giving horizontal vertical justification, respectively, central shapes. recommended hjust = 0.5 text placed left right vjust = 0.5 recommended text placed top bottom. text_position string, one \"ontop\", \"top\", \"right\", \"bottom\", \"left\" describe placement labels. default (NULL), take legend.text.position theme setting. clip_text  whether give text \"ontop\" position small rectangle background colour. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Circle size guide — guide_circles","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Circle size guide — guide_circles","text":"Please note default size scales scale area, radius, equidistant breaks appear irregularly spaced positions due labelling diameter circle. graph designed standard round shapes mind, .e. shapes 1, 16, 19 21. reason, shape = 1 default override.aes argument. shapes probably drawn quality alignment label placement may unsatisfactory.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Circle size guide — guide_circles","text":"","code":"# A standard plot p <- ggplot(mtcars, aes(disp, mpg)) +   geom_point(aes(size = hp), alpha = 0.3)  # By default, the sizes aren't large enough to make this guide clear p + scale_size_area(guide = \"circles\")   # Update with a more approrpriate scale p <- p +   scale_size_area(     max_size = 30,     limits = c(0, NA),     breaks = c(0, 25, 100, 250)   ) p + guides(size = \"circles\")   # Horizontal orientation p + guides(size = guide_circles(   vjust = 0.5, hjust = 0, text_position = \"bottom\" ))   # Alternative text placement p + guides(size = guide_circles(   text_position = \"ontop\",   clip_text = TRUE ))   # More styling options p + guides(size = guide_circles(override.aes = aes(colour = \"red\")))+   theme(     # Key background     legend.key = element_rect(colour = \"black\", fill = 'white'),     # Padding around central shapes     legendry.legend.key.margin = margin(1, 1, 1, 1, \"cm\"),     legend.ticks = element_line(colour = \"blue\"),     legend.text.position = \"left\"   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom colour bar guide — guide_colbar","title":"Custom colour bar guide — guide_colbar","text":"Similar guide_colourbar(), guide displays continuous colour fill aesthetics. additional options display caps end bar, depending --bounds values.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom colour bar guide — guide_colbar","text":"","code":"guide_colbar(   title = waiver(),   key = \"auto\",   first_guide = \"axis_base\",   second_guide = first_guide,   shape = \"triangle\",   size = NULL,   show = NA,   nbin = 15,   alpha = NA,   reverse = FALSE,   oob = scales::oob_keep,   theme = NULL,   vanilla = TRUE,   position = waiver(),   available_aes = c(\"colour\", \"fill\") )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom colour bar guide — guide_colbar","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key sequence key specification. Defaults key_sequence(n = 15). Changing argument key_sequence() fine, changing key type advised. first_guide, second_guide Guides flank colour bar. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. first_guide placed location specified legend.text.position theme setting. second_guide placed opposite position. second_guide label suppression mechanism, labels drawn guide. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. nbin positive  determining many colours use colour gradient. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom colour bar guide — guide_colbar","text":" object","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom colour bar guide — guide_colbar","text":"colours always rendered gradients, important use graphics device can render . can checked using check_device(\"gradients\").","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom colour bar guide — guide_colbar","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty))  # The colourbar shows caps when values are out-of-bounds (oob) p + scale_colour_viridis_c(   limits = c(10, NA),   guide = \"colbar\" )   # It also shows how oob values are handled p + scale_colour_viridis_c(   limits = c(10, NA), oob = scales::oob_squish,   guide = \"colbar\" )   # Adjusting the type of cap p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = guide_colbar(shape = \"round\") )   # One-sided ticks p + scale_colour_viridis_c(   guide = guide_colbar(second_guide = \"none\") )   # Colour bar with minor breaks p + scale_colour_viridis_c(   minor_breaks = scales::breaks_width(1),   guide = guide_colbar(key = \"minor\") )   # Using log ticks on a colourbar ggplot(msleep, aes(sleep_total, sleep_rem)) +   geom_point(aes(colour = bodywt), na.rm = TRUE) +   scale_colour_viridis_c(     transform = \"log10\",     guide = guide_colbar(key = \"log\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":null,"dir":"Reference","previous_headings":"","what":"Colour rings and arcs — guide_colring","title":"Colour rings and arcs — guide_colring","text":"Similar guide_colourbar(), guide displays continuous colour fill aesthetics. Instead bar, gradient shown ring arc, can convenient cyclical palettes provided scico package.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Colour rings and arcs — guide_colring","text":"","code":"guide_colring(   title = waiver(),   key = \"auto\",   start = 0,   end = NULL,   outer_guide = \"axis_base\",   inner_guide = \"axis_base\",   nbin = 300,   reverse = FALSE,   show_labels = \"outer\",   theme = NULL,   vanilla = TRUE,   position = waiver(),   available_aes = c(\"colour\", \"fill\"),   ... )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Colour rings and arcs — guide_colring","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key standard key specification. Defaults key_auto(). start, end  radians specifying offset starting end points 12 o'clock. NULL default end, internally defaults start + 2 * pi. outer_guide, inner_guide Guides display outside inside colour ring. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. nbin positive  determining many colours display. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. show_labels  indicating guide labels shown. Can one \"outer\" (default), \"inner\", \"\" \"none\". Note labels can omitted related guide label suppression mechanism. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  vector listing aesthetics guide can build. ... Arguments forwarded outer_guide inner_guide provided functions strings.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Colour rings and arcs — guide_colring","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Colour rings and arcs — guide_colring","text":"","code":"# Rings works best with a cyclical palette my_pal <- c(\"black\", \"tomato\", \"white\", \"dodgerblue\", \"black\")  p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_gradientn(colours = my_pal)  # Standard colour ring p + guides(colour = \"colring\")   # As an arc p + guides(colour = guide_colring(   start = 1.25 * pi, end = 2.75 * pi ))   # Removing the inner tick marks p + guides(colour = guide_colring(inner_guide = \"none\"))   # Include labels on the inner axis p + guides(colour = guide_colring(show_labels = \"both\"))   # Passing an argument to inner/outer guides p + guides(colour = guide_colring(angle = 0))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom colour steps guide — guide_colsteps","title":"Custom colour steps guide — guide_colsteps","text":"Similar guide_coloursteps(), guide displays continuous colour fill aesthetics. additional options display caps end bar, depending --bounds values.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom colour steps guide — guide_colsteps","text":"","code":"guide_colsteps(   title = waiver(),   key = \"bins\",   first_guide = \"axis_base\",   second_guide = \"axis_base\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   reverse = FALSE,   oob = scales::oob_keep,   theme = NULL,   position = waiver(),   vanilla = TRUE,   available_aes = c(\"colour\", \"fill\") )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom colour steps guide — guide_colsteps","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key bins key specificiation. Defaults key_bins(even.steps = FALSE, show.limits = NULL). Changing arguments key_bins() fine, changing key type advised. first_guide, second_guide Guides flank colour steps. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. first_guide placed location specified legend.text.position theme setting. second_guide placed opposite position. second_guide label suppression mechanism, labels drawn guide. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom colour steps guide — guide_colsteps","text":" object","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom colour steps guide — guide_colsteps","text":"steps rendered clipped rectangles, important use graphics device can render clipped paths. can checked using check_device(\"clippingPaths\").","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom colour steps guide — guide_colsteps","text":"","code":"p <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty))  # The colour steps show caps when values are out-of-bounds p + scale_colour_viridis_b(   limits = c(10, NA),   guide = \"colsteps\" )   # It also shows how oob values are handled p + scale_colour_viridis_b(   limits = c(10, 30), oob = scales::oob_censor,   guide = \"colsteps\" )   # Adjusting the type of cap p + scale_colour_viridis_b(   limits = c(10, 30),   guide = guide_colsteps(shape = \"round\") )   # The default is to use the breaks as-is p + scale_colour_viridis_b(   limits = c(10, 30), breaks = c(10, 20, 25),   guide = \"colsteps\" )   # But the display can be set to use evenly spaced steps p + scale_colour_viridis_b(   limits = c(10, 30), breaks = c(10, 20, 25),   guide = guide_colsteps(key = key_bins(even.steps = TRUE)) )   # Using tick marks by swapping side guides p + scale_colour_viridis_b(   guide = guide_colsteps(     first_guide  = \"axis_base\",     second_guide = \"axis_base\"   ) )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom legend guide — guide_legend_base","title":"Custom legend guide — guide_legend_base","text":"legend closely mirrors ggplot2::guide_legend(), two adjustments. First, guide_legend_base() supports design argument flexible layout. Secondly, legend.spacing.y theme element observed verbatim instead overruled.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom legend guide — guide_legend_base","text":"","code":"guide_legend_base(   key = NULL,   title = waiver(),   theme = NULL,   design = NULL,   nrow = NULL,   ncol = NULL,   reverse = FALSE,   override.aes = list(),   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom legend guide — guide_legend_base","text":"key standard key specification. Defaults key_auto(). See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. design Specification legend layout. One following: NULL (default) use layout algorithm guide_legend().  string representing cell layout wherein # defines empty cell. See examples.  representing cell layout wherein NA defines empty cell. See examples. Non-string atomic vectors treated .matrix(). nrow, ncol positive  setting desired dimensions legend layout. NULL (default), dimensions derived design argument fit match number keys. reverse  whether order keys inverted. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom legend guide — guide_legend_base","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom legend guide — guide_legend_base","text":"","code":"# A dummy plot p <- ggplot(data.frame(x = 1:3, type = c(\"tic\", \"tac\", \"toe\"))) +   aes(x, x, shape = type) +   geom_point(na.rm = TRUE) +   scale_shape_manual(values = c(1, 4, NA))  # A design string, each character giving a cell value. # Newlines separate rows, white space is ignored. design <- \"   123   213   321 \"  # Alternatively, the same can be specified using a matrix directly # design <- matrix(c(1, 2, 3, 2, 1, 3, 3, 2, 1), 3, 3, byrow = TRUE)  p + guides(shape = guide_legend_base(design = design))   # Empty cells can be created using `#` design <- \"   #2#   1#3 \"  # Alternatively: # design <- matrix(c(NA, 1, 2, NA, NA, 3), nrow = 2)  p + guides(shape = guide_legend_base(design = design))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":null,"dir":"Reference","previous_headings":"","what":"Cross legend guide — guide_legend_cross","title":"Cross legend guide — guide_legend_cross","text":"legend type similar guide_legend() displays crosses, : interactions, two variables.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cross legend guide — guide_legend_cross","text":"","code":"guide_legend_cross(   key = NULL,   title = waiver(),   swap = FALSE,   col_text = element_text(angle = 90, vjust = 0.5),   override.aes = list(),   reverse = FALSE,   theme = NULL,   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cross legend guide — guide_legend_cross","text":"key One following key specifications: group split specification using legend display compound variable like paste(var1, var2). standard key specification, like key_auto(), crossing two separate variables across two scales. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. swap  TRUE exchanges column row variables displayed legend. col_text  object giving adjustments text column labels. Can NULL display column labels equal fashion row labels. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). reverse  whether order keys inverted, first value controls row order second value column order. Input  recycled. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cross legend guide — guide_legend_cross","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cross legend guide — guide_legend_cross","text":"","code":"# Standard use for single aesthetic. The default is to split labels to # disentangle aesthetics that are already crossed (by e.g. `paste()`) ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv))) +   guides(colour = \"legend_cross\")   # If legends should be merged between identical aesthetics, both need the # same legend type. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv), shape = paste(year, drv))) +   guides(colour = \"legend_cross\", shape = \"legend_cross\")   # Crossing two aesthetics requires a shared title and `key = \"auto\"`. The # easy way to achieve this is to predefine a shared guide. my_guide <- guide_legend_cross(key = \"auto\", title = \"My title\")  ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = drv, shape = factor(year))) +   guides(colour = my_guide, shape  = my_guide)   # You can cross more than 2 aesthetics but not more than 2 unique aesthetics. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = drv, shape = factor(year), size = factor(drv))) +   scale_size_ordinal() +   guides(colour = my_guide, shape = my_guide, size = my_guide)   # You can merge an aesthetic that is already crossed with an aesthetic that # contributes to only one side of the cross. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv), shape  = drv)) +   guides(     colour = guide_legend_cross(title = \"My Title\"),     shape  = guide_legend_cross(title = \"My Title\", key = \"auto\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":null,"dir":"Reference","previous_headings":"","what":"Grouped legend — guide_legend_group","title":"Grouped legend — guide_legend_group","text":"legend resembles ggplot2::guide_legend(), ability keep groups blocks titles.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Grouped legend — guide_legend_group","text":"","code":"guide_legend_group(   key = \"group_split\",   title = waiver(),   override.aes = list(),   nrow = NULL,   ncol = NULL,   theme = NULL,   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Grouped legend — guide_legend_group","text":"key group key specification. Defaults key_group_split() split labels find groups. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). nrow, ncol positive  setting desired dimensions legend layout. Either nrow ncol can set, , theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Grouped legend — guide_legend_group","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Grouped legend — guide_legend_group","text":"","code":"# Standard plot for selection of `msleep` df <- msleep[c(9, 28, 11, 5, 34, 54, 64, 24, 53), ]  p <- ggplot(df) +   aes(bodywt, awake, colour = paste(order, name)) +   geom_point()  # By default, groups are inferred from the name p + guides(colour = \"legend_group\")   # You can also use a look-up table for groups # The lookup table can be more expansive than just the data: # We're using the full 'msleep' data here instead of the subset lut <- key_group_lut(msleep$name, msleep$order)  p + aes(colour = name) +   guides(colour = guide_legend_group(key = lut))   # `nrow` and `ncol` apply within groups p + guides(colour = guide_legend_group(nrow = 1))   # Groups are arranged according to `direction` p + guides(colour = guide_legend_group(ncol = 1, direction = \"horizontal\")) +   theme(legend.title.position = \"top\")   # Customising the group titles p + guides(colour = \"legend_group\") +   theme(     legendry.legend.subtitle.position = \"left\",     legendry.legend.subtitle = element_text(       hjust = 1, vjust = 1, size = rel(0.9),       margin = margin(t = 5.5, r = 5.5)     )   )   # Changing the spacing between groups p + guides(colour = \"legend_group\") +   theme(legendry.group.spacing = unit(0, \"cm\"))"},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":null,"dir":"Reference","previous_headings":"","what":"Group keys — key_group","title":"Group keys — key_group","text":"functions helper functions working grouped data keys guides. share goal creating guide key, different methods. key_group_split() function factory whose functions make attempt infer groups scale's labels. key_group_lut() function factory whose functions use look table sort group membership.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Group keys — key_group","text":"","code":"key_group_split(sep = \"[^[:alnum:]]+\", reverse = FALSE)  key_group_lut(members, group, ungrouped = \"Other\")"},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Group keys — key_group","text":"sep  giving regular expression use splitting labels provided scale using strsplit() function. defaults, labels splitted non-alphanumeric character. reverse  FALSE (default) treats first part split string groups later parts members. TRUE, treats last part groups. members vector including scale's breaks values. group vector parallel members giving  group member. ungrouped  giving group label assign scale's breaks match values members argument.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Group keys — key_group","text":"function use key argument guide.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Group keys — key_group","text":"","code":"# Example scale values <- c(\"group A:value 1\", \"group A:value 2\", \"group B:value 1\") template <- scale_colour_hue(limits = values)  # Treat the 'group X' part as groups key <- key_group_split(sep = \":\") key(template) #>    colour          .value  .label  .group #> 1 #F8766D group A:value 1 value 1 group A #> 2 #00BA38 group A:value 2 value 2 group A #> 3 #619CFF group B:value 1 value 1 group B  # Treat the 'value X' part as groups key <- key_group_split(sep = \":\", reverse = TRUE) key(template) #>    colour          .value  .label  .group #> 1 #F8766D group A:value 1 group A value 1 #> 2 #619CFF group B:value 1 group B value 1 #> 3 #00BA38 group A:value 2 group A value 2  # Example scale template <- scale_colour_hue(limits = msleep$name[c(1, 7, 9, 23, 24)])  # A lookup table can have more entries than needed key <- key_group_lut(msleep$name, msleep$order) key(template) #>    colour            .value            .label         .group #> 1 #F8766D           Cheetah           Cheetah      Carnivora #> 2 #A3A500 Northern fur seal Northern fur seal      Carnivora #> 3 #00BF7D               Dog               Dog      Carnivora #> 4 #00B0F6             Horse             Horse Perissodactyla #> 5 #E76BF3            Donkey            Donkey Perissodactyla  # Or less entries than needed key <- key_group_lut(   msleep$name[23:24], msleep$order[23:24],   ungrouped = \"Other animals\" ) key(template) #>    colour            .value            .label         .group #> 1 #00B0F6             Horse             Horse Perissodactyla #> 2 #E76BF3            Donkey            Donkey Perissodactyla #> 3 #F8766D           Cheetah           Cheetah  Other animals #> 4 #A3A500 Northern fur seal Northern fur seal  Other animals #> 5 #00BF7D               Dog               Dog  Other animals"},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":null,"dir":"Reference","previous_headings":"","what":"Range keys — key_range","title":"Range keys — key_range","text":"functions helper functions working ranged data keys guides. share goal creating guide key, different methods: key_range_auto() function factory whose functions make attempt infer ranges scale's labels. key_range_manual() uses user-provided vectors set ranges. key_range_map() makes mappings  set ranges.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Range keys — key_range","text":"","code":"key_range_auto(sep = \"[^[:alnum:]]+\", reverse = FALSE, ...)  key_range_manual(start, end, name = NULL, level = NULL, ...)  key_range_map(data, ..., .call = caller_env())"},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Range keys — key_range","text":"sep  giving regular expression use splitting labels provided scale using strsplit(). Defaults splitting non-alphanumeric character. reverse  FALSE (default) treats first labels inner labels last labels outer labels. TRUE, thee first labels treated outer labels last labels treated inner labels. ...  set mappings similar provided aes(), evaluated data argument. key_range_map(), must contain start end mappings. Can contain additional parameters text styling, namely colour, family, face, size, hjust, vjust, angle lineheight. start, end vector can interpreted scale, giving start end positions range respectively. name  list expressions level  giving depth range avoid overlaps different ranges. level smaller 1, brackets drawn. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Range keys — key_range","text":"key_range_auto() function. key_range_manual() key_range_map()   class.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Range keys — key_range","text":"level variable optional missing, guides use algorithm similar IRanges::disjointBins() avoid overlaps. key_range_auto() work expression labels.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Range keys — key_range","text":"","code":"# Example scale template <- scale_x_discrete(limits = c(\"A 1\", \"B 1\", \"C&1\", \"D&2\", \"E&2\"))  # By default, splits on all non-alphanumeric characters auto <- key_range_auto() auto(template) #>   start end .label .level #> 1     1   1      A      0 #> 2     2   2      B      0 #> 3     3   3      C      0 #> 4     4   4      D      0 #> 5     5   5      E      0 #> 6     1   3      1      1 #> 7     4   5      2      1  # Only split on a specific character auto <- key_range_auto(sep = \"&\") auto(template) #> Warning: Not all labels in `key_range_auto()` can be split into equal lengths. #> ℹ Is \"&\" the correct `sep` argument? #>   start end .label .level #> 1     1   1    A 1      0 #> 2     2   2    B 1      0 #> 3     3   3      C      0 #> 4     4   4      D      0 #> 5     5   5      E      0 #> 6     3   3      1      1 #> 7     4   5      2      1  # Treating the letters as outer labels and numbers as inner labels auto <- key_range_auto(reverse = TRUE) auto(template) #>    start end .label .level #> 1      1   1      1      0 #> 2      2   2      1      0 #> 3      3   3      1      0 #> 4      4   4      2      0 #> 5      5   5      2      0 #> 6      1   1      A      1 #> 7      2   2      B      1 #> 8      3   3      C      1 #> 9      4   4      D      1 #> 10     5   5      E      1  # Providing custom values key_range_manual(   start = c(1, 5,  10),   end   = c(4, 15, 11),   level = c(0, 2, 1),   name  = c(\"A\", \"B\", \"C\") ) #>   start end .label .level #> 1     1   4      A      0 #> 2     5  15      B      2 #> 3    10  11      C      1  # Values from a  key_range_map(presidential, start = start, end = end, name = name) #>         start        end     .label #> 1  1953-01-20 1961-01-20 Eisenhower #> 2  1961-01-20 1963-11-22    Kennedy #> 3  1963-11-22 1969-01-20    Johnson #> 4  1969-01-20 1974-08-09      Nixon #> 5  1974-08-09 1977-01-20       Ford #> 6  1977-01-20 1981-01-20     Carter #> 7  1981-01-20 1989-01-20     Reagan #> 8  1989-01-20 1993-01-20       Bush #> 9  1993-01-20 2001-01-20    Clinton #> 10 2001-01-20 2009-01-20       Bush #> 11 2009-01-20 2017-01-20      Obama #> 12 2017-01-20 2021-01-20      Trump"},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":null,"dir":"Reference","previous_headings":"","what":"Segment keys — key_segments","title":"Segment keys — key_segments","text":"functions helper functions working segment data keys guides. share goal creating guide key, different methods: key_segment_manual() directly uses user-provided vectors set segments. key_segment_map() makes mappings  set segments. key_dendro() specialty case coercing dendrogram data segments. aware setting key alone affect scale limits, give misleading results used incorrectly!","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Segment keys — key_segments","text":"","code":"key_segment_manual(value, oppo, value_end = value, oppo_end = oppo, ...)  key_segment_map(data, ..., .call = caller_env())  key_dendro(dendro = NULL, type = \"rectangle\")"},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Segment keys — key_segments","text":"value, value_end vector interpreted along scale guide codifies. oppo, oppo_end vector interpreted orthogonal value value_end variables. ...  set mappings similar provided aes(), evaluated data argument. key_segments_map(), must contain value oppo mappings. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages. dendro data structure can coerced dendrogram .dendrogram() function. NULL (default) attempt made search data scale. type string, either \"rectangle\" \"triangle\", indicating shape edges nodes dendrogram.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Segment keys — key_segments","text":"key_segments_manual() key_segments_map(),   class.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Segment keys — key_segments","text":"","code":"# Giving vectors directly key_segment_manual(   value = 0:1, value_end = 2:3,   oppo  = 1:0, oppo_end  = 3:2 ) #>   value oppo value_end oppo_end #> 1     0    1         2        3 #> 2     1    0         3        2  # Taking columns of a data frame data <- data.frame(x = 0:1, y = 1:0, xend = 2:3, yend = 3:2) key_segment_map(data, value = x, oppo = y, value_end = xend, oppo_end = yend) #>   value oppo value_end oppo_end #> 1     0    1         2        3 #> 2     1    0         3        2  # Using dendrogram data clust <- hclust(dist(USArrests), \"ave\") key_dendro(clust)(scale_x_discrete()) #>         value       oppo value_end   oppo_end #> 1   17.994141 152.313999  4.765625 152.313999 #> 2    4.765625 152.313999  4.765625  77.605024 #> 3   17.994141 152.313999 31.222656 152.313999 #> 4   31.222656 152.313999 31.222656  89.232093 #> 5    4.765625  77.605024  1.500000  77.605024 #> 6    1.500000  77.605024  1.500000  38.527912 #> 7    4.765625  77.605024  8.031250  77.605024 #> 8    8.031250  77.605024  8.031250  44.283922 #> 9    1.500000  38.527912  1.000000  38.527912 #> 10   1.000000  38.527912  1.000000   0.000000 #> 11   1.500000  38.527912  2.000000  38.527912 #> 12   2.000000  38.527912  2.000000   0.000000 #> 13   8.031250  44.283922  3.875000  44.283922 #> 14   3.875000  44.283922  3.875000  28.012211 #> 15   8.031250  44.283922 12.187500  44.283922 #> 16  12.187500  44.283922 12.187500  39.394633 #> 17   3.875000  28.012211  3.000000  28.012211 #> 18   3.000000  28.012211  3.000000   0.000000 #> 19   3.875000  28.012211  4.750000  28.012211 #> 20   4.750000  28.012211  4.750000  15.453120 #> 21   4.750000  15.453120  4.000000  15.453120 #> 22   4.000000  15.453120  4.000000   0.000000 #> 23   4.750000  15.453120  5.500000  15.453120 #> 24   5.500000  15.453120  5.500000  13.896043 #> 25   5.500000  13.896043  5.000000  13.896043 #> 26   5.000000  13.896043  5.000000   0.000000 #> 27   5.500000  13.896043  6.000000  13.896043 #> 28   6.000000  13.896043  6.000000   0.000000 #> 29  12.187500  39.394633  9.625000  39.394633 #> 30   9.625000  39.394633  9.625000  26.363428 #> 31  12.187500  39.394633 14.750000  39.394633 #> 32  14.750000  39.394633 14.750000  28.095803 #> 33   9.625000  26.363428  7.750000  26.363428 #> 34   7.750000  26.363428  7.750000  16.891499 #> 35   9.625000  26.363428 11.500000  26.363428 #> 36  11.500000  26.363428 11.500000  18.417331 #> 37   7.750000  16.891499  7.000000  16.891499 #> 38   7.000000  16.891499  7.000000   0.000000 #> 39   7.750000  16.891499  8.500000  16.891499 #> 40   8.500000  16.891499  8.500000  15.454449 #> 41   8.500000  15.454449  8.000000  15.454449 #> 42   8.000000  15.454449  8.000000   0.000000 #> 43   8.500000  15.454449  9.000000  15.454449 #> 44   9.000000  15.454449  9.000000   0.000000 #> 45  11.500000  18.417331 10.500000  18.417331 #> 46  10.500000  18.417331 10.500000   6.236986 #> 47  11.500000  18.417331 12.500000  18.417331 #> 48  12.500000  18.417331 12.500000  13.297368 #> 49  10.500000   6.236986 10.000000   6.236986 #> 50  10.000000   6.236986 10.000000   0.000000 #> 51  10.500000   6.236986 11.000000   6.236986 #> 52  11.000000   6.236986 11.000000   0.000000 #> 53  12.500000  13.297368 12.000000  13.297368 #> 54  12.000000  13.297368 12.000000   0.000000 #> 55  12.500000  13.297368 13.000000  13.297368 #> 56  13.000000  13.297368 13.000000   0.000000 #> 57  14.750000  28.095803 14.000000  28.095803 #> 58  14.000000  28.095803 14.000000   0.000000 #> 59  14.750000  28.095803 15.500000  28.095803 #> 60  15.500000  28.095803 15.500000  21.167192 #> 61  15.500000  21.167192 15.000000  21.167192 #> 62  15.000000  21.167192 15.000000   0.000000 #> 63  15.500000  21.167192 16.000000  21.167192 #> 64  16.000000  21.167192 16.000000   0.000000 #> 65  31.222656  89.232093 23.796875  89.232093 #> 66  23.796875  89.232093 23.796875  44.837933 #> 67  31.222656  89.232093 38.648438  89.232093 #> 68  38.648438  89.232093 38.648438  54.746831 #> 69  23.796875  44.837933 20.343750  44.837933 #> 70  20.343750  44.837933 20.343750  26.713777 #> 71  23.796875  44.837933 27.250000  44.837933 #> 72  27.250000  44.837933 27.250000  29.054195 #> 73  20.343750  26.713777 17.937500  26.713777 #> 74  17.937500  26.713777 17.937500  16.425489 #> 75  20.343750  26.713777 22.750000  26.713777 #> 76  22.750000  26.713777 22.750000  22.595978 #> 77  17.937500  16.425489 17.000000  16.425489 #> 78  17.000000  16.425489 17.000000   0.000000 #> 79  17.937500  16.425489 18.875000  16.425489 #> 80  18.875000  16.425489 18.875000  12.878100 #> 81  18.875000  12.878100 18.000000  12.878100 #> 82  18.000000  12.878100 18.000000   0.000000 #> 83  18.875000  12.878100 19.750000  12.878100 #> 84  19.750000  12.878100 19.750000  10.736739 #> 85  19.750000  10.736739 19.000000  10.736739 #> 86  19.000000  10.736739 19.000000   0.000000 #> 87  19.750000  10.736739 20.500000  10.736739 #> 88  20.500000  10.736739 20.500000   7.355270 #> 89  20.500000   7.355270 20.000000   7.355270 #> 90  20.000000   7.355270 20.000000   0.000000 #> 91  20.500000   7.355270 21.000000   7.355270 #> 92  21.000000   7.355270 21.000000   0.000000 #> 93  22.750000  22.595978 22.000000  22.595978 #> 94  22.000000  22.595978 22.000000   0.000000 #> 95  22.750000  22.595978 23.500000  22.595978 #> 96  23.500000  22.595978 23.500000  11.456439 #> 97  23.500000  11.456439 23.000000  11.456439 #> 98  23.000000  11.456439 23.000000   0.000000 #> 99  23.500000  11.456439 24.000000  11.456439 #> 100 24.000000  11.456439 24.000000   0.000000 #> 101 27.250000  29.054195 25.750000  29.054195 #> 102 25.750000  29.054195 25.750000  20.198479 #> 103 27.250000  29.054195 28.750000  29.054195 #> 104 28.750000  29.054195 28.750000  23.972143 #> 105 25.750000  20.198479 25.000000  20.198479 #> 106 25.000000  20.198479 25.000000   0.000000 #> 107 25.750000  20.198479 26.500000  20.198479 #> 108 26.500000  20.198479 26.500000  12.614278 #> 109 26.500000  12.614278 26.000000  12.614278 #> 110 26.000000  12.614278 26.000000   0.000000 #> 111 26.500000  12.614278 27.000000  12.614278 #> 112 27.000000  12.614278 27.000000   0.000000 #> 113 28.750000  23.972143 28.000000  23.972143 #> 114 28.000000  23.972143 28.000000   0.000000 #> 115 28.750000  23.972143 29.500000  23.972143 #> 116 29.500000  23.972143 29.500000  14.501034 #> 117 29.500000  14.501034 29.000000  14.501034 #> 118 29.000000  14.501034 29.000000   0.000000 #> 119 29.500000  14.501034 30.000000  14.501034 #> 120 30.000000  14.501034 30.000000   0.000000 #> 121 38.648438  54.746831 34.437500  54.746831 #> 122 34.437500  54.746831 34.437500  20.598507 #> 123 38.648438  54.746831 42.859375  54.746831 #> 124 42.859375  54.746831 42.859375  41.094765 #> 125 34.437500  20.598507 31.875000  20.598507 #> 126 31.875000  20.598507 31.875000  15.026107 #> 127 34.437500  20.598507 37.000000  20.598507 #> 128 37.000000  20.598507 37.000000  15.122897 #> 129 31.875000  15.026107 31.000000  15.026107 #> 130 31.000000  15.026107 31.000000   0.000000 #> 131 31.875000  15.026107 32.750000  15.026107 #> 132 32.750000  15.026107 32.750000  12.438692 #> 133 32.750000  12.438692 32.000000  12.438692 #> 134 32.000000  12.438692 32.000000   0.000000 #> 135 32.750000  12.438692 33.500000  12.438692 #> 136 33.500000  12.438692 33.500000   3.834058 #> 137 33.500000   3.834058 33.000000   3.834058 #> 138 33.000000   3.834058 33.000000   0.000000 #> 139 33.500000   3.834058 34.000000   3.834058 #> 140 34.000000   3.834058 34.000000   0.000000 #> 141 37.000000  15.122897 35.500000  15.122897 #> 142 35.500000  15.122897 35.500000   6.637771 #> 143 37.000000  15.122897 38.500000  15.122897 #> 144 38.500000  15.122897 38.500000  13.352260 #> 145 35.500000   6.637771 35.000000   6.637771 #> 146 35.000000   6.637771 35.000000   0.000000 #> 147 35.500000   6.637771 36.000000   6.637771 #> 148 36.000000   6.637771 36.000000   0.000000 #> 149 38.500000  13.352260 37.500000  13.352260 #> 150 37.500000  13.352260 37.500000   3.929377 #> 151 38.500000  13.352260 39.500000  13.352260 #> 152 39.500000  13.352260 39.500000   8.027453 #> 153 37.500000   3.929377 37.000000   3.929377 #> 154 37.000000   3.929377 37.000000   0.000000 #> 155 37.500000   3.929377 38.000000   3.929377 #> 156 38.000000   3.929377 38.000000   0.000000 #> 157 39.500000   8.027453 39.000000   8.027453 #> 158 39.000000   8.027453 39.000000   0.000000 #> 159 39.500000   8.027453 40.000000   8.027453 #> 160 40.000000   8.027453 40.000000   0.000000 #> 161 42.859375  41.094765 41.000000  41.094765 #> 162 41.000000  41.094765 41.000000   0.000000 #> 163 42.859375  41.094765 44.718750  41.094765 #> 164 44.718750  41.094765 44.718750  33.117815 #> 165 44.718750  33.117815 42.750000  33.117815 #> 166 42.750000  33.117815 42.750000  10.771175 #> 167 44.718750  33.117815 46.687500  33.117815 #> 168 46.687500  33.117815 46.687500  27.779904 #> 169 42.750000  10.771175 42.000000  10.771175 #> 170 42.000000  10.771175 42.000000   0.000000 #> 171 42.750000  10.771175 43.500000  10.771175 #> 172 43.500000  10.771175 43.500000   8.537564 #> 173 43.500000   8.537564 43.000000   8.537564 #> 174 43.000000   8.537564 43.000000   0.000000 #> 175 43.500000   8.537564 44.000000   8.537564 #> 176 44.000000   8.537564 44.000000   0.000000 #> 177 46.687500  27.779904 45.500000  27.779904 #> 178 45.500000  27.779904 45.500000  13.044922 #> 179 46.687500  27.779904 47.875000  27.779904 #> 180 47.875000  27.779904 47.875000  18.993398 #> 181 45.500000  13.044922 45.000000  13.044922 #> 182 45.000000  13.044922 45.000000   0.000000 #> 183 45.500000  13.044922 46.000000  13.044922 #> 184 46.000000  13.044922 46.000000   0.000000 #> 185 47.875000  18.993398 47.000000  18.993398 #> 186 47.000000  18.993398 47.000000   0.000000 #> 187 47.875000  18.993398 48.750000  18.993398 #> 188 48.750000  18.993398 48.750000  10.184218 #> 189 48.750000  10.184218 48.000000  10.184218 #> 190 48.000000  10.184218 48.000000   0.000000 #> 191 48.750000  10.184218 49.500000  10.184218 #> 192 49.500000  10.184218 49.500000   2.291288 #> 193 49.500000   2.291288 49.000000   2.291288 #> 194 49.000000   2.291288 49.000000   0.000000 #> 195 49.500000   2.291288 50.000000   2.291288 #> 196 50.000000   2.291288 50.000000   0.000000"},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":null,"dir":"Reference","previous_headings":"","what":"Speciality keys — key_specialty","title":"Speciality keys — key_specialty","text":"functions helper functions working keys guides. functions described widely applicable may apply small subset guides. , fine adjust arguments speciality key, swapping types ill-advised. key_sequence() function factory whose functions create regularly spaced sequence limits scale. used colour bar guides. key_bins() function factory whose function create binned key given breaks scale. used colour steps guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Speciality keys — key_specialty","text":"","code":"key_sequence(n = 15)  key_bins(even.steps = FALSE, show.limits = NULL)"},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Speciality keys — key_specialty","text":"n positive  giving number colours use gradient. even.steps  indicating whether size bins displayed equal (TRUE) proportional length data space (FALSE). show.limits  stating whether limits scale shown labels ticks (TRUE) remain hidden (FALSE). Note breaks coinciding limits shown regardless setting. default, NULL, consults scale's show.limits setting defaults FALSE.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Speciality keys — key_specialty","text":"key_sequence() function.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Speciality keys — key_specialty","text":"","code":"# An example scale template <- scale_fill_viridis_c(limits = c(0, 10), breaks = c(2, 4, 6, 8))  # Retrieving colourbar and colourstep keys key_sequence()(template) #>       fill     .value #> 1  #440154  0.0000000 #> 2  #461F66  0.7142857 #> 3  #453478  1.4285714 #> 4  #414888  2.1428571 #> 5  #3C5B8A  2.8571429 #> 6  #336D8D  3.5714286 #> 7  #2B7F8D  4.2857143 #> 8  #2B9089  5.0000000 #> 9  #26A186  5.7142857 #> 10 #40B17B  6.4285714 #> 11 #5FBF69  7.1428571 #> 12 #76CE56  7.8571429 #> 13 #A4D848  8.5714286 #> 14 #D2E039  9.2857143 #> 15 #FDE725 10.0000000 key_bins()(template) #>      fill min max .label .value #> 1 #46286D   0   2        NA #> 2 #3B5E8B   2   4      2      2 #> 3 #2B9089   4   6      4      4 #> 4 #5ABC6D   6   8      6      6 #> 5 #C0DD40   8  10      8      8 #> 6      NA  NA        NA"},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":null,"dir":"Reference","previous_headings":"","what":"Standard keys — key_standard","title":"Standard keys — key_standard","text":"functions helper functions working tick marks keys guides. share goal creating guide key, different outcomes: key_auto() function factory whose functions extract typical key major breaks scale. key_manual() uses user-provided vectors make key. key_map() makes mappings  make key. key_minor() function factory whose functions also extract minor break positions minor tick marks. key_log() function factory whose functions place ticks intervals log10 space. key_none() makes empty key entries.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Standard keys — key_standard","text":"","code":"key_auto(...)  key_manual(   aesthetic,   value = aesthetic,   label = as.character(value),   type = NULL,   ... )  key_map(data, ..., .call = caller_env())  key_minor(...)  key_log(   prescale_base = NULL,   negative_small = 0.1,   expanded = TRUE,   labeller = NULL,   ... )  key_none()"},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Standard keys — key_standard","text":"...  set mappings similar provided aes(), evaluated data argument. must contain aesthetic mapping. aesthetic, value vector values guide represent equivalent breaks argument scales. aesthetic mapped, whereas value . intents purposes, aesthetic value identical. label  list expressions use labels. type  vector representing one break types: \"major\", \"minor\" \"mini\". NULL (default), breaks treated major breaks. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages. prescale_base  giving base logarithm transform data manually. default, NULL, use scale transformation calculate positions. advisable set prescale_base argument data already log-transformed. using log-transform scale coord_trans(), default NULL recommended. negative_small  setting smallest absolute value marked tick case scale limits include 0 negative numbers. expanded  determining whether ticks cover entire range scale expansion (TRUE, default), restricted scale limits (FALSE). labeller  receives major breaks returns formatted labels. key_log(), NULL default scales::label_log() strictly positive numbers custom labeller negative numbers included.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Standard keys — key_standard","text":"key_auto(), key_minor() key_log() function. key_manual() key_map()   class.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Standard keys — key_standard","text":"","code":"# An example scale template <- scale_x_continuous(limits = c(0, 10))  # The auto, minor and log keys operate on scales key_auto()(template) #>      x .value .label #> 1  0.0    0.0    0.0 #> 2  2.5    2.5    2.5 #> 3  5.0    5.0    5.0 #> 4  7.5    7.5    7.5 #> 5 10.0   10.0   10.0 key_minor()(template) #>       x .value .label .type #> 1  0.00   0.00    0.0 major #> 2  2.50   2.50    2.5 major #> 3  5.00   5.00    5.0 major #> 4  7.50   7.50    7.5 major #> 5 10.00  10.00   10.0 major #> 6  1.25   1.25    minor #> 7  3.75   3.75    minor #> 8  6.25   6.25    minor #> 9  8.75   8.75    minor  # So does the log key template <- scale_x_continuous(transform = \"log10\", limits = c(0.1, 10)) key_log()(template)  # Providing custom values key_manual(   aesthetic = 1:5,   label = c(\"one\", \"two\", \"three\", \"four\", \"five\") ) #>   aesthetic .value .label #> 1         1      1    one #> 2         2      2    two #> 3         3      3  three #> 4         4      4   four #> 5         5      5   five  # Values from a `` key_map(ToothGrowth, aesthetic = unique(supp)) #>   aesthetic .value .label #> 1        VC     VC     VC #> 2        OJ     OJ     OJ  # Empty key key_none() #> [1] aesthetic .value    .label    #> <0 rows> (or 0-length row.names)"},{"path":"https://teunbrand.github.io/legendry/reference/legendry-package.html","id":null,"dir":"Reference","previous_headings":"","what":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","title":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","text":"'ggplot2' extension focusses expanding plotter's arsenal guides. Guides 'ggplot2' include axes legends. 'legendry' offers new axes annotation options, well new legends colour displays.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/legendry-package.html","id":"author","dir":"Reference","previous_headings":"","what":"Author","title":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","text":"Maintainer: Teun van den Brand tahvdbrand@gmail.com (ORCID) [copyright holder]","code":""},{"path":"https://teunbrand.github.io/legendry/reference/legendry_extensions.html","id":null,"dir":"Reference","previous_headings":"","what":"ggproto objects in legendry — Compose","title":"ggproto objects in legendry — Compose","text":"legendry package relies extension system ggplot2 ggproto class objects, allow cross-package inheritance objects geoms, stats, facets, scales coordinate systems. purpose making plots, users invited wholly ignore objects, since interacting objects preferred various constructor functions. legendry package introduces new  ggproto class support variations axes, legends colourbars.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives: boxes — primitive_box","title":"Guide primitives: boxes — primitive_box","text":"function constructs boxes guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitives: boxes — primitive_box","text":"","code":"primitive_box(   key = \"range_auto\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.4,   min_size = NULL,   levels_box = NULL,   levels_text = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitives: boxes — primitive_box","text":"key range key specification. See information linked topic. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. min_size [][grid::unit] setting minimal size box. levels_box list  objects customise boxes appear every level. levels_text list  objects customise text appears every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitives: boxes — primitive_box","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitives: boxes — primitive_box","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.box  boxes draw.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitives: boxes — primitive_box","text":"axis.text.{x/y}.{position}  text inside boxes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitives: boxes — primitive_box","text":"legend.text  text inside boxes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitives: boxes — primitive_box","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +  geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_box(),   y.sec = primitive_box(key = key) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: brackets — primitive_bracket","title":"Guide primitive: brackets — primitive_bracket","text":"function constructs brackets guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: brackets — primitive_bracket","text":"","code":"primitive_bracket(   key = \"range_auto\",   bracket = \"line\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.4,   levels_brackets = NULL,   levels_text = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: brackets — primitive_bracket","text":"key range key specification. See information linked topic. bracket bracket providing one following: bracket , bracket_square.  naming bracket function without 'bracket_'-prefix, e.g. \"square\". two-column  giving line coordinates bracket, like created bracket functions, bracket_round(). angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_brackets list  objects customise brackets appear every level. levels_text list  objects customise text appears every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: brackets — primitive_bracket","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: brackets — primitive_bracket","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.bracket  line used draw brackets. legendry.backet.size  setting space afforded bracket.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: brackets — primitive_bracket","text":"axis.text.{x/y}.{position}  text displayed brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: brackets — primitive_bracket","text":"legend.text  text displayed brackets.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: brackets — primitive_bracket","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +  geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_bracket(),   y.sec = primitive_bracket(key = key) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: fence — primitive_fence","title":"Guide primitive: fence — primitive_fence","text":"function constructs fence guide primitive. customisation options easier understand view fence 'post' vertical pieces real world fence, 'rail' horizontal pieces.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: fence — primitive_fence","text":"","code":"primitive_fence(   key = \"range_auto\",   rail = \"none\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.5,   levels_text = NULL,   levels_post = NULL,   levels_rail = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: fence — primitive_fence","text":"key range key specification. See information linked topic. rail  giving option display fence railing. Can either \"none\" (default) display railings, \"inner\" draw one rail closer plot panel, \"outer\" display one rail farther plot panel, \"\" sandwich labels rails. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_text list  objects customise text appears every level. levels_post, levels_rail list  objects customise fence posts rails displayed every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: fence — primitive_fence","text":" primitive guie can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: fence — primitive_fence","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.fence.post  line used draw pieces orthogonal direction scale. legendry.fence.rail  line used draw pieces parallel direction scale.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: fence — primitive_fence","text":"axis.text.{x/y}.{position}  text displayed.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: fence — primitive_fence","text":"legend.text  text displayed.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: fence — primitive_fence","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +   geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_fence(rail = \"inner\"),   y.sec = primitive_fence(key = key, rail = \"outer\") )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: labels — primitive_labels","title":"Guide primitive: labels — primitive_labels","text":"function constructs labels guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: labels — primitive_labels","text":"","code":"primitive_labels(   key = NULL,   angle = waiver(),   n.dodge = 1,   check.overlap = FALSE,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: labels — primitive_labels","text":"key standard key specification. See information linked topic. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: labels — primitive_labels","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: labels — primitive_labels","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: labels — primitive_labels","text":"axis.text.{x/y}.{position}  display labels.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"as-a-legend-guide-","dir":"Reference","previous_headings":"","what":"As a legend guide.","title":"Guide primitive: labels — primitive_labels","text":"legend.text  display labels.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: labels — primitive_labels","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +  geom_point()  # Adding as secondary guides p + guides(   x.sec = primitive_labels(),   y.sec = primitive_labels(n.dodge = 2) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: line — primitive_line","title":"Guide primitive: line — primitive_line","text":"function constructs line guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: line — primitive_line","text":"","code":"primitive_line(key = NULL, cap = \"none\", theme = NULL, position = waiver())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: line — primitive_line","text":"key standard key specification. See information linked topic. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: line — primitive_line","text":"PrimitiveLine primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: line — primitive_line","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: line — primitive_line","text":"axis.line.{x/y}.{position}  line style.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: line — primitive_line","text":"legend.axis.line  line style.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: line — primitive_line","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   theme(axis.line = element_line())  # Adding as secondary guides p + guides(   x.sec = primitive_line(),   y.sec = primitive_line(cap = \"both\") )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives: segments — primitive_segments","title":"Guide primitives: segments — primitive_segments","text":"function constructs guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitives: segments — primitive_segments","text":"","code":"primitive_segments(   key = NULL,   space = rel(10),   vanish = FALSE,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitives: segments — primitive_segments","text":"key segment key specification. See information linked topic. Alternatively, object class  automatically invokes key_dendro(). space Either   object length 1 determining space allocated orthogonal direction. space argument class  (default) base size taken tick length theme setting. vanish relevant guide used secondary theta position:  whether continue draw segments meed center (TRUE) strictly observe space setting (FALSE). theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitives: segments — primitive_segments","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitives: segments — primitive_segments","text":"theme options determine style guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitives: segments — primitive_segments","text":"axis.ticks.{x/y}.{position}  display segments. axis.ticks.length.{x/y}.{position}  base size segments orthogonal direction.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitives: segments — primitive_segments","text":"legend.ticks  display segments. legend.ticks.length  base size segments orthogonal direction.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitives: segments — primitive_segments","text":"","code":"# Building a key key <- key_segment_manual(   value     = c(1.6, 1.6, 3.4, 5.2),   value_end = c(7.0, 7.0, 3.4, 5.2),   oppo      = c(1.0, 2.0, 0.0, 0.0),   oppo_end  = c(1.0, 2.0, 3.0, 3.0) )  # Using the primitive in a plot ggplot(mpg, aes(displ, hwy)) +   geom_point() +   scale_x_continuous(     guide = primitive_segments(key = key)   )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: spacer — primitive_spacer","title":"Guide primitive: spacer — primitive_spacer","text":"function constructs spacer guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: spacer — primitive_spacer","text":"","code":"primitive_spacer(   space = NULL,   title = waiver(),   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: spacer — primitive_spacer","text":"space [][grid::unit()] title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: spacer — primitive_spacer","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: spacer — primitive_spacer","text":"#' theme options determine styling guide. guide option dependent role axis legend. legendry.guide.spacing  setting amount spacing space argument NULL.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: spacer — primitive_spacer","text":"","code":"ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(     x = guide_axis_stack(\"axis\", primitive_spacer(unit(1, \"cm\")), \"axis\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: line — primitive_ticks","title":"Guide primitive: line — primitive_ticks","text":"function constructs ticks guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: line — primitive_ticks","text":"","code":"primitive_ticks(key = NULL, bidi = FALSE, theme = NULL, position = waiver())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: line — primitive_ticks","text":"key standard key specification. See information linked topic. bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: line — primitive_ticks","text":"PrimitiveTicks primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: line — primitive_ticks","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following:","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: line — primitive_ticks","text":"axis.ticks.{x/y}.{position}  major tick lines. axis.minor.ticks.{x/y}.{position}  minor tick lines. legendry.axis.mini.ticks  internally inheriting minor ticks smallest ticks e.g. log axes. axis.ticks.length.{x/y}.{position}  major ticks length. axis.minor.ticks.length.{x/y}.{position}  minor ticks length. legendry.axis.mini.ticks.length  internally inheriting minor tick length smallest ticks e.g. log axes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: line — primitive_ticks","text":"legend.ticks  major tick lines. legendry.legend.minor.ticks  minor tick lines. legendry.legend.mini.ticks  smallest ticks e.g. log axes. legend.ticks.length  major ticks length. legendry.legend.minor.ticks.length  minor ticks length. legendry.legend.mini.ticks.length  smallest ticks e.g. log axes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: line — primitive_ticks","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point()  # Adding as secondary guides p + guides(x.sec = primitive_ticks(), y.sec = primitive_ticks())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: title — primitive_title","title":"Guide primitive: title — primitive_title","text":"function constructs title guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: title — primitive_title","text":"","code":"primitive_title(   title = waiver(),   angle = waiver(),   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: title — primitive_title","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: title — primitive_title","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: title — primitive_title","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: title — primitive_title","text":"axis.title.{x/y}.{position}  title display.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: title — primitive_title","text":"legend.title  title display.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: title — primitive_title","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +  geom_point()  # Adding as secondary guides p + guides(   x.sec = primitive_title(\"Horizontal Title\"),   y.sec = primitive_title(c(\"along vertical\", \"Multiple tiles\")) )"},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":null,"dir":"Reference","previous_headings":"","what":"Dendrogram scales — scale_x_dendro","title":"Dendrogram scales — scale_x_dendro","text":"speciality scales use hierarchically clustered data. scale automatically orders limits according clustering result comes dendrogram axis.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Dendrogram scales — scale_x_dendro","text":"","code":"scale_x_dendro(   clust,   ...,   expand = waiver(),   guide = \"axis_dendro\",   position = \"bottom\" )  scale_y_dendro(   clust,   ...,   expand = waiver(),   guide = \"axis_dendro\",   position = \"left\" )"},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Dendrogram scales — scale_x_dendro","text":"clust data structure can coerced  object .hclust(). ... Arguments passed ggplot2::discrete_scale aesthetics names aesthetics scale works . palette palette function called single integer argument (number levels scale) returns values take (e.g., scales::pal_hue()). name name scale. Used axis legend title. waiver(), default, name scale taken first mapping used aesthetic. NULL, legend title omitted. breaks One : NULL breaks waiver() default breaks (scale limits) character vector breaks function takes limits input returns breaks output. Also accepts rlang lambda function notation. labels One : NULL labels waiver() default labels computed transformation object character vector giving labels (must length breaks) expression vector (must length breaks). See ?plotmath details. function takes breaks input returns labels output. Also accepts rlang lambda function notation. na.translate Unlike continuous scales, discrete scales can easily show missing values, default. want remove missing values discrete scale, specify na.translate = FALSE. na.value na.translate = TRUE, aesthetic value missing values displayed ? apply position scales NA always placed far right. drop unused factor levels omitted scale? default, TRUE, uses levels appear data; FALSE includes levels factor. Please note display every level legend, layer use show.legend = TRUE. call call used construct scale reporting messages. super super class use constructed scale expand position scales, vector range expansion constants used add padding around data ensure placed distance away axes. Use convenience function expansion() generate values expand argument. defaults expand scale 5% side continuous variables, 0.6 units side discrete variables. guide function used create guide name. See guides() information. position position scales, position axis. left right y axes, top bottom x axes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Dendrogram scales — scale_x_dendro","text":" object can added plot.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Dendrogram scales — scale_x_dendro","text":"scale limits determined order labels clust argument. limits argument scales, breaks argument can still used selectively omit breaks labels can used formatting purposes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Dendrogram scales — scale_x_dendro","text":"","code":"# Hierarchically cluster data, separately for rows and columns car_clust <- hclust(dist(scale(mtcars)), \"ave\") var_clust <- hclust(dist(scale(t(mtcars))), \"ave\")  long_mtcars <- data.frame(   car = rownames(mtcars)[row(mtcars)],   var = colnames(mtcars)[col(mtcars)],   value = as.vector(scale(mtcars)) )  # A standard heatmap adorned with dendrograms p <- ggplot(long_mtcars, aes(var, car, fill = value)) +   geom_tile() +   scale_x_dendro(var_clust) +   scale_y_dendro(car_clust) p   # Styling the dendrograms p +   guides(     y = guide_axis_dendro(key_dendro(type = \"triangle\")),     x = guide_axis_dendro(space = rel(5))   ) +   theme(     axis.text.y.left = element_text(margin = margin(r = 3, l = 3)),     axis.ticks.y = element_line(\"red\"),     axis.ticks.x = element_line(linetype = \"dotted\")   )   # In polar coordinates, plus some formatting p +   coord_radial(     theta = \"y\", inner.radius = 0.5,     start = 0.25 * pi, end = 1.75 * pi   ) +   guides(     theta = primitive_labels(angle = 90),     theta.sec = primitive_segments(\"dendro\", vanish = TRUE),     r = guide_axis_dendro(angle = 0)   )"},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":null,"dir":"Reference","previous_headings":"","what":"Theme wrapper for guides — theme_guide","title":"Theme wrapper for guides — theme_guide","text":"function shorthand names theme elements relating guides. intended used guide_*(theme) argument. intent, due legends axes mutually exclusive theme elements, function sets elements simultaneously.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Theme wrapper for guides — theme_guide","text":"","code":"theme_guide(   text = NULL,   line = NULL,   title = NULL,   subtitle = NULL,   text.position = NULL,   title.position = NULL,   subtitle.position = NULL,   ticks = NULL,   minor.ticks = NULL,   mini.ticks = NULL,   ticks.length = NULL,   minor.ticks.length = NULL,   mini.ticks.length = NULL,   spacing = NULL,   group.spacing = NULL,   key = NULL,   key.size = NULL,   key.width = NULL,   key.height = NULL,   key.spacing = NULL,   key.spacing.x = NULL,   key.spacing.y = NULL,   key.margin = NULL,   frame = NULL,   byrow = NULL,   background = NULL,   margin = NULL,   bracket = NULL,   bracket.size = NULL,   box = NULL,   fence = NULL,   fence.post = NULL,   fence.rail = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Theme wrapper for guides — theme_guide","text":"text  setting legend.text axis.text elements. line  setting legend.axis.line axis.line elements. title  setting legend.title axis.title elements. subtitle  setting legendry.legend.subtitle legendry.axis.subtitle elements. text.position, title.position, subtitle.position One \"top\", \"right\", \"bottom\" \"right\" setting following elements: text.position: sets legend.text.position. title.position: sets legend.title.position. subtitle.position sets legendry.legend.subtitle.position legendry.axis.subtitle.position ticks  setting axis.ticks legend.ticks elements. minor.ticks  setting legendry.legend.minor.ticks 6 axis.ticks.minor.{r/theta/x.top/x.bottom/y.left/y.right} elements. mini.ticks  setting legendry.legend.mini.ticks legendry.axis.mini.ticks elements. ticks.length, minor.ticks.length, mini.ticks.length [][grid::unit()] setting following elements: ticks.length: sets legend.ticks.length axis.ticks.length. minor.ticks.length sets axis.minor.ticks.length legendry.legend.minor.ticks.length. mini.ticks.length sets legendry.axis.mini.ticks.length legendry.legend.mini.ticks.length. spacing, group.spacing [][grid::unit()] setting legendry.guide.spacing legendry.group.spacing theme elements. key  setting legend.key element. key.size, key.width, key.height  setting legend.key.size, legend.key.width legend.key.height elements respectively. key.spacing, key.spacing.x, key.spacing.y [][grid::unit()] setting legend.key.spacing, legend.key.spacing.x legend.key.spacing.y elements respectively. key.margin  setting margin around legend glyphs. frame  setting legend.frame element. byrow  setting legend.byrow element. background  setting legend.background element. margin  setting legend.margin element. bracket  setting legendry.bracket element. bracket.size [][grid::unit()] setting legendry.bracket.size element. box  setting legendry.box element. fence, fence.post, fence.rail  setting legendry.fence, legendry.fence.post legendry.fence.rail respectively.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Theme wrapper for guides — theme_guide","text":" object can provided guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Theme wrapper for guides — theme_guide","text":"","code":"red_ticks <- theme_guide(ticks = element_line(colour = \"red\", linewidth = 0.5))  # Both axis and colourbar gain red ticks ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   guides(     colour = guide_colourbar(theme = red_ticks),     x = guide_axis(theme = red_ticks)   )"},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-development-version","dir":"Changelog","previous_headings":"","what":"legendry (development version)","title":"legendry (development version)","text":"Fixed bug guide_circles() used multiple layers (#58) Fixed bug hindering position = \"inside\" placement (#42) Fixed bug theme_guide(key.size, key.height, key.width) (#41) Complete guides based crux composition now render legend.background element (#50) better attempt honour ggplot2’s mechanism  variables (#45) Better alignment compose_stack(side.titles) (#48) Fixed aesthetic standardisation override.aes arguments (#60)","code":""},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-020","dir":"Changelog","previous_headings":"","what":"legendry 0.2.0","title":"legendry 0.2.0","text":"CRAN release: 2024-12-14 small feature release introducing dendrogram scales size guide. New scale functions scale_x_dendro() scale_y_dendro(). New full guide function: guide_axis_dendro(). New primitive guide function: primitive_segments() New key functions: key_segment_manual(), key_segment_map() key_dendro(). New supporting theme element legendry.legend.key.margin. Fixed bug guide_axis_nested(key = key_range_auto(...)) produced duplicated labels (#31).","code":""},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-010","dir":"Changelog","previous_headings":"","what":"legendry 0.1.0","title":"legendry 0.1.0","text":"CRAN release: 2024-11-01 First release. Thanks following people catching reporting early bugs mistakes: @davidhodge931 (#7, #8, #9, #12) @luisDVA (#18) @mthomas-ketchbrook (#21)","code":""}]
+[{"path":[]},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"our-pledge","dir":"","previous_headings":"","what":"Our Pledge","title":"Contributor Covenant Code of Conduct","text":"members, contributors, leaders pledge make participation community harassment-free experience everyone, regardless age, body size, visible invisible disability, ethnicity, sex characteristics, gender identity expression, level experience, education, socio-economic status, nationality, personal appearance, race, caste, color, religion, sexual identity orientation. pledge act interact ways contribute open, welcoming, diverse, inclusive, healthy community.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"our-standards","dir":"","previous_headings":"","what":"Our Standards","title":"Contributor Covenant Code of Conduct","text":"Examples behavior contributes positive environment community include: Demonstrating empathy kindness toward people respectful differing opinions, viewpoints, experiences Giving gracefully accepting constructive feedback Accepting responsibility apologizing affected mistakes, learning experience Focusing best just us individuals, overall community Examples unacceptable behavior include: use sexualized language imagery, sexual attention advances kind Trolling, insulting derogatory comments, personal political attacks Public private harassment Publishing others’ private information, physical email address, without explicit permission conduct reasonably considered inappropriate professional setting","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement-responsibilities","dir":"","previous_headings":"","what":"Enforcement Responsibilities","title":"Contributor Covenant Code of Conduct","text":"Community leaders responsible clarifying enforcing standards acceptable behavior take appropriate fair corrective action response behavior deem inappropriate, threatening, offensive, harmful. Community leaders right responsibility remove, edit, reject comments, commits, code, wiki edits, issues, contributions aligned Code Conduct, communicate reasons moderation decisions appropriate.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"scope","dir":"","previous_headings":"","what":"Scope","title":"Contributor Covenant Code of Conduct","text":"Code Conduct applies within community spaces, also applies individual officially representing community public spaces. Examples representing community include using official e-mail address, posting via official social media account, acting appointed representative online offline event.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement","dir":"","previous_headings":"","what":"Enforcement","title":"Contributor Covenant Code of Conduct","text":"Instances abusive, harassing, otherwise unacceptable behavior may reported community leaders responsible enforcement tahvdbrand@gmail.com. complaints reviewed investigated promptly fairly. community leaders obligated respect privacy security reporter incident.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"enforcement-guidelines","dir":"","previous_headings":"","what":"Enforcement Guidelines","title":"Contributor Covenant Code of Conduct","text":"Community leaders follow Community Impact Guidelines determining consequences action deem violation Code Conduct:","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_1-correction","dir":"","previous_headings":"Enforcement Guidelines","what":"1. Correction","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Use inappropriate language behavior deemed unprofessional unwelcome community. Consequence: private, written warning community leaders, providing clarity around nature violation explanation behavior inappropriate. public apology may requested.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_2-warning","dir":"","previous_headings":"Enforcement Guidelines","what":"2. Warning","title":"Contributor Covenant Code of Conduct","text":"Community Impact: violation single incident series actions. Consequence: warning consequences continued behavior. interaction people involved, including unsolicited interaction enforcing Code Conduct, specified period time. includes avoiding interactions community spaces well external channels like social media. Violating terms may lead temporary permanent ban.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_3-temporary-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"3. Temporary Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: serious violation community standards, including sustained inappropriate behavior. Consequence: temporary ban sort interaction public communication community specified period time. public private interaction people involved, including unsolicited interaction enforcing Code Conduct, allowed period. Violating terms may lead permanent ban.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"id_4-permanent-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"4. Permanent Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Demonstrating pattern violation community standards, including sustained inappropriate behavior, harassment individual, aggression toward disparagement classes individuals. Consequence: permanent ban sort public interaction within community.","code":""},{"path":"https://teunbrand.github.io/legendry/CODE_OF_CONDUCT.html","id":"attribution","dir":"","previous_headings":"","what":"Attribution","title":"Contributor Covenant Code of Conduct","text":"Code Conduct adapted Contributor Covenant, version 2.1, available https://www.contributor-covenant.org/version/2/1/code_of_conduct.html. Community Impact Guidelines inspired [Mozilla’s code conduct enforcement ladder][https://github.com/mozilla/inclusion]. answers common questions code conduct, see FAQ https://www.contributor-covenant.org/faq. Translations available https://www.contributor-covenant.org/translations.","code":""},{"path":"https://teunbrand.github.io/legendry/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"MIT License","title":"MIT License","text":"Copyright (c) 2024 Teun van den Brand Permission hereby granted, free charge, person obtaining copy software associated documentation files (“Software”), deal Software without restriction, including without limitation rights use, copy, modify, merge, publish, distribute, sublicense, /sell copies Software, permit persons Software furnished , subject following conditions: copyright notice permission notice shall included copies substantial portions Software. SOFTWARE PROVIDED “”, WITHOUT WARRANTY KIND, EXPRESS IMPLIED, INCLUDING LIMITED WARRANTIES MERCHANTABILITY, FITNESS PARTICULAR PURPOSE NONINFRINGEMENT. EVENT SHALL AUTHORS COPYRIGHT HOLDERS LIABLE CLAIM, DAMAGES LIABILITY, WHETHER ACTION CONTRACT, TORT OTHERWISE, ARISING , CONNECTION SOFTWARE USE DEALINGS SOFTWARE.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/gallery.html","id":"rugs","dir":"Articles","previous_headings":"","what":"Rugs","title":"Example Gallery","text":"easy way wrap rug guide combine primitive_ticks() manual key. Axis guides lookup values plot data, need feed rug data manually. simplest way use guide secondary axis.  guide can also easily stacked typical axis guides. style ticks drawn rug differently regular axis ticks, can give rug guide local theme.  using rug colour bars, can feed rug guide_colbar(second_guide) argument. Note colour-bar guides default inward facing, white ticks, might like style look like regular ticks.","code":"guide_rug <- function(x, ...) {   primitive_ticks(key = key_manual(x), ...) }  rug_wt <- guide_rug(mtcars$wt) rug_mpg <- guide_rug(mtcars$mpg) base <- ggplot(mtcars, aes(wt, mpg, colour = drat)) +   geom_point() +   labs(     x = \"Weight (1000 lbs)\",     y = \"Miles per gallon\",     colour = \"Rear axle\\nratio\"   ) base + guides(x.sec = rug_wt, y.sec = rug_mpg) long_ticks <- theme_guide(   ticks.length = unit(0.5, \"cm\"),   ticks = element_line(colour = \"dodgerblue\") )  base + guides(   x = compose_stack(\"axis\", rug_wt),   y = compose_stack(\"axis\", guide_rug(mtcars$mpg, theme = long_ticks)) ) rug_drat <- guide_rug(   x = mtcars$drat,   theme = theme_guide(     ticks.length = unit(2.75, \"pt\"),     ticks = element_line(colour = \"black\", linewidth = 0.5)   ) )  base + guides(colour = guide_colbar(second_guide = rug_drat))"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"stacking","dir":"Articles","previous_headings":"","what":"Stacking","title":"A guide to guide composition","text":"cut open guide examine innards spilling , eyes first meets skeleton holds guide together. skeleton composition guide: guide whose task render compose guides. composition guide may entirely foreign ggplot2-user. vanilla ggplot2 also contains composition guide, namely guide_axis_stack(). accepts input guide specifications stacks guides top one another.  legendry, composition operation: compose_stack(). regular axis guides x y aesthetics, works way guide_axis_stack(). However, guides stacks supports aesthetics, like colour, can also used .","code":"standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   labs(     x = \"Engine displacement (litres)\",     y = \"Highway Miles per Gallon\"   ) +   theme(axis.line = element_line())  standard + guides(x = guide_axis_stack(\"axis\", \"axis\", \"axis\")) staxis <- compose_stack(\"axis_base\", \"axis_base\", \"axis_base\")  standard +    aes(colour = cty) +   guides(     x = staxis,     colour = guide_colbar(first_guide = staxis, second_guide = \"none\")   ) +   theme(legend.axis.line = element_line())"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"primitives","dir":"Articles","previous_headings":"","what":"Primitives","title":"A guide to guide composition","text":"point, might wise take closer look exactly guide_axis_base() . pull threads class , mystery starts unravel: Indeed, using compose_stack(\"axis_base\", \"axis_base\", ...) stacking stack! peel back layers see inside guide_axis_base(), find stacks? : good things must come end must guides building blocks. composition skeleton building blocks flesh providing function. building blocks called ‘primitives’ legendry. example, guide_axis_base() function stack three primitives. respectively build axis line, ticks labels. complete guide, don’t spacing , let’s exaggerate spacing clarity.","code":"class(guide_axis_base()) #> [1] \"ComposeStack\" \"Compose\"      \"Guide\"        \"ggproto\"      \"gg\" standard +   guides(x = compose_stack(     primitive_line(),     primitive_ticks(),     primitive_labels(),     theme = theme_guide(spacing = unit(5, \"pt\"))   ))"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"introducing-the-rest-of-the-family","dir":"Articles","previous_headings":"Primitives","what":"Introducing the rest of the family","title":"A guide to guide composition","text":"’ve already met ‘famous’ primitives (lines, ticks, labels), let’s round acquaintances. spacer primitive can use increase spacing different pancakes stack, . also ‘ranged’ triplet: brackets, boxes fences. require niche range key power display nested axes.  last member family primitive_title(). Aside just displaying text, three things: >1 title, distribute titles along range. makes convenient label lower higher ends scale. ‘absorbs’ regular axis title turning . title primitive guide actual title, makes slightly easier prevent unwanted double titles.  implemented guide, take place regular axis titles. also means titles repeat facets.","code":"range_key <- key_range_manual(   start = c(2, 4), end = c(5, 6),    name = c(\"First\", \"Second\") )  standard + guides(x = compose_stack(   \"axis_base\",   primitive_bracket(range_key, \"curvy\"),   primitive_spacer(unit(0.5, \"cm\")),   primitive_box(range_key),   primitive_spacer(unit(0.5, \"cm\")),   primitive_fence(range_key, rail = \"outer\") )) standard + scale_x_continuous(guide = compose_stack(   primitive_title(c(     \"Sneaky little displacementses\",      \"We needs it. Must have the displament\")   ),   primitive_title(\"Gollum explains engine displacement to you\") )) + labs(x = \"A normal person explains engine displacement\") last_plot() +   facet_grid(~ year)"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"dont-use-primitives-directly","dir":"Articles","previous_headings":"Primitives","what":"Don’t use primitives directly","title":"A guide to guide composition","text":"giving primitive_-prefix, made impossible use name inside function don’t expect . acts little bit discouragement using primitives complete guides. However, can use primitives name inside guide composition functions, use full constructor function.","code":"standard +    guides(x.sec = \"ticks\") #> Error in `validate_guide()`: #> ! Unknown guide: ticks standard +   guides(x.sec = compose_stack(\"ticks\"))  # Looks identical to the above standard +    guides(x.sec = primitive_ticks())"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"sandwiching","dir":"Articles","previous_headings":"","what":"Sandwiching","title":"A guide to guide composition","text":"Aside making stack primitives, can also build sandwich primitives. Analogous two pieces bread outside good bits inside, sandwich composition guides often sees centrepiece flanked two guides. Similar naively believed guide_axis_stack() little snowflake guide, guide_colbar() fact composition: Focussing ‘bread’ part first, two guides can use flanking innards. One called ‘text’ one called ‘opposite’.  called ‘text’ ‘opposite’ ‘text’-guide take position indicated legend.text.position theme element. Perhaps unsurprisingly; guide end called ‘opposite’ guide. can expose swapping theme element.  also noted guide label-supression mechanism, ‘opposite’ guide drawn surpressed labels. mechanism place guides like guide_axis()/guide_axis_base() display example facet_grid(axis.labels = \"margins\").  thing guide_colbar() , compose_sandwich() , adjust theme settings match ggplot2::guide_colourbar() closely. Alright, fine, get ‘bread’ part sandwich! inside? ’m glad asked.","code":"class(guide_colbar()) #> [1] \"ComposeSandwich\" \"Compose\"         \"Guide\"           \"ggproto\"         #> [5] \"gg\" standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_sandwich(       text     = primitive_labels(),        opposite = primitive_ticks()     )   ) last_plot() + theme(legend.text.position = \"left\") standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_sandwich(       text     = \"axis_base\",        opposite = \"axis_base\"     )   )  # The same plot standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = guide_colbar(vanilla = FALSE)   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"gizmos","dir":"Articles","previous_headings":"","what":"Gizmos","title":"A guide to guide composition","text":"insides guide_colbar() called ‘gizmo’. gizmo differs primitive gizmo general building block, rather specialised display particular aesthetic. Also, complete guide allow complete crucial task translating graphic display interpretation data. called ‘gizmo’ sort gadget don’t appropriate name . Hence: gizmo.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"my-first-gizmo","dir":"Articles","previous_headings":"Gizmos","what":"My first gizmo","title":"A guide to guide composition","text":"can display gizmo guide_colbar() —sandwich spread, — gizmo_barcap(). also immediately clear need bread case.  Similarly guide_colsteps() gizmo_stepcap(), might second gizmo may already encountered.","code":"standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = gizmo_barcap()   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"exotic-gizmos","dir":"Articles","previous_headings":"Gizmos","what":"Exotic gizmos","title":"A guide to guide composition","text":"also gizmos may less familiar. reasonably simple one gizmo_grob(), just allows place grob guide. example, can stack axis, use non-bread part sandwich. Please note good representation plot’s colour aesthetic. hope wouldn’t necessary : don’t make plot like !  Perhaps gizmo’s inherently useful gizmo_density() gizmo_histogram(). default, wrap density() hist() functions called layer’s data. can pass arguments functions density.args hist.args respectively. ’ll repeat : gizmos, full guides. Also: please ignore ’re guiding colour fill colour visible.  However, can easily promote gizmos full guide adding axis. compose_sandwich() can reasonable job .","code":"my_grob <- grid::grobTree(   grid::rectGrob(),   grid::textGrob(\"Grob\\nGizmo\") ) my_gizmo <- gizmo_grob(my_grob, width = unit(2, \"cm\"), height = unit(2, \"cm\"))  standard +    aes(colour = cty) +   guides(     x = compose_stack(\"axis\", my_gizmo),     colour = compose_sandwich(middle = my_gizmo, text = \"axis_base\")   ) standard +   aes(colour = cty, fill = cty) +   scale_colour_viridis_c(     option = \"C\",     guide = gizmo_density(density.args = list(adjust = 0.7))   ) +   scale_fill_viridis_c(     option = \"D\",     guide = gizmo_histogram(hist.args = list(breaks = 10))   ) standard +   aes(colour = cty, fill = cty) +   scale_colour_viridis_c(     option = \"C\",     guide = compose_sandwich(       middle = gizmo_density(just = 1),        text = \"axis_base\"     )   ) +   scale_fill_viridis_c(     option = \"D\",     guide = compose_sandwich(       middle = gizmo_histogram(just = 0.5),       text = \"axis_base\"     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/guide_composition.html","id":"other-compositions","dir":"Articles","previous_headings":"","what":"Other compositions","title":"A guide to guide composition","text":"following compositions situational aren’t part ‘proper’ guide. compose_ontop() guide lets render one guide . can see plots allows us touch panel composing top one another, stacking.   also compose_crux() (‘cross’) parent composition compose_sandwich(). Instead allowing bread two sides, can also put guides top bottom. isn’t currently use complete guide though.","code":"top <- guide_axis_base(   key = key_manual(32, label = \"Here is 32\"),   theme = theme_guide(     ticks.length = unit(1.5, \"cm\"),     ticks = element_line(arrow = arrow()),      line = element_blank()   ) )  standard + guides(y.sec = compose_ontop(\"axis\", top)) +   labs(title = \"compose_ontop\") standard + guides(y.sec = compose_stack(\"axis\", top)) +   labs(title = \"compose_stack\") ball <- gizmo_grob(grid::circleGrob(   r = unit(0.5, \"cm\"), gp = grid::gpar(fill = \"tomato\") )) block <- gizmo_grob(grid::rectGrob(   width = unit(1, \"cm\"), height = unit(1, \"cm\"),    gp = grid::gpar(fill = \"dodgerblue\") ))  standard +   aes(colour = cty) +   scale_colour_viridis_c(     guide = compose_crux(       centre = gizmo_barcap(),        left = \"axis_base\", right = \"axis_base\",       top = ball, bottom = block     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"keys-in-vanilla-ggplot2","dir":"Articles","previous_headings":"","what":"Keys in vanilla ggplot2","title":"Key information","text":"way guides exchange information scales called ‘keys’. Keys simply data frames typically hold information aesthetic, values represent displayed. may already seen keys ’ve used get_guide_data() function , can used retrieved guide’s key. data frame , can see key ‘x’ aesthetic. tells us relative location tick marks aesthetic’s x column, numerical values represent .value column. values communicated users captured .label column. Sometimes, keys information additional aesthetics, like y column key .","code":"standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(shape = drv, colour = drv)) +   labs(     shape  = \"Drive train\",     colour = \"Drive train\",     y = \"Highway efficiency\",     x = \"Engine Displacement\"   )  get_guide_data(standard, aesthetic = \"x\") #>           x .value .label y #> 1 0.1127946      2      2 0 #> 2 0.2811448      3      3 0 #> 3 0.4494949      4      4 0 #> 4 0.6178451      5      5 0 #> 5 0.7861953      6      6 0 #> 6 0.9545455      7      7 0"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"keys-in-legendry","dir":"Articles","previous_headings":"","what":"Keys in legendry","title":"Key information","text":"key difference keys legendry keys ggplot2, legendry exposes users keys. first, can inconvenience, allows greater degree customisation.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"why-use-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Why use keys?","title":"Key information","text":"dig different types keys, worth noting exactly keys exposed. Keys represent ‘rules’ annotate scale, whereas guide display rule. example, key_log() instructs annotate every 10x change large ticks, changes smaller ticks. doesn’t really matter whether rule applied axis colour bar. rule independent display makes modular.","code":"logkey <- key_log()  ggplot(msleep, aes(sleep_total, brainwt, colour = bodywt)) +   geom_point(na.rm = TRUE) +   scale_y_log10(guide = guide_axis_base(key = logkey)) +   scale_colour_viridis_c(     trans = \"log10\",     guide = guide_colbar(key = logkey)   )"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"regular-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Regular keys","title":"Key information","text":"understand better typical key works, can use key_manual() manually create key. Usually sufficient just provide aesthetic argument, .value .label columns automatically derive . want custom labels, can set label argument. guides legendry accept key argument, cause guide display information key, rather information automatically derived scale.  addition, can provide automatic keys keywords. Setting key = \"minor\", setting key = key_minor(). fashion many key_*() functions can used keyword omitting key_-prefix.  keys don’t directly return data frames, return instructions keys interact scales. example key_auto(), default key many guides legendry, needs know range populate tickmarks. can preview values ’d label letting key absorb scale known limits.","code":"key_manual(aesthetic = c(2, 4, 6)) #>   aesthetic .value .label #> 1         2      2      2 #> 2         4      4      4 #> 3         6      6      6 my_key <- key_manual(aesthetic = c(2, 4, 6), label = c(\"two\", \"four\", \"six\"))  standard + guides(x = guide_axis_base(key = my_key)) standard + guides(x = guide_axis_base(key = \"minor\")) key <- key_auto() print(key) #> function (scale, aesthetic = NULL)  #> { #>     aesthetic <- aesthetic %||% scale$aesthetics[1] #>     df <- Guide$extract_key(scale, aesthetic) #>     df <- data_frame0(df, !!!extra_args(...)) #>     class(df) <- c(\"key_standard\", \"key_guide\", class(df)) #>     df #> } #>  #>  template <- scale_y_log10(limits = c(1, 1000)) key(template, \"y\") #>   y .value .label #> 1 0      0      1 #> 2 1      1     10 #> 3 2      2    100 #> 4 3      3   1000"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"ranged-keys","dir":"Articles","previous_headings":"Keys in legendry","what":"Ranged keys","title":"Key information","text":"special type guide may find legendry called ‘ranged’ guides. difference regular guides mark single point aesthetic, rather use start- end-point mark range aesthetic. can convenient annotate co-occurrances data plotting events. example, can annotate airtimes TV shows timeseries data. Compared regular key, don’t aesthetic column, replaced start end columns. cases, indicate single .value, can still use .label column. .level column indicates far offset range, ’ll display “Frasier” farther away “Golden Girls”.  also ‘automatic’ ranged key, attempts find patterns key labels.  example obvious pattern x-axis labels plot first 3 entries 3 drive trains 1999, followed 3 drive trains 2008. default, key_range_auto() tries split label non-alphanumeric character, give explicit split instructions using sep argument.","code":"ranges <- key_range_manual(   start = as.Date(c(\"1985-09-14\", \"1993-09-16\")),   end   = as.Date(c(\"1992-05-09\", \"2004-05-13\")),    name  = c(\"Golden Girls\", \"Frasier\"),    level = 1:2 ) ranges #>        start        end       .label .level #> 1 1985-09-14 1992-05-09 Golden Girls      1 #> 2 1993-09-16 2004-05-13      Frasier      2 ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = primitive_bracket(ranges)) plot <- ggplot(mpg, aes(interaction(drv, year), displ, fill = drv)) +   geom_boxplot() +   labs(     x = \"Drive train by year\",     y = \"Engine displacement\",     fill = \"Drive train\"   ) plot # Split on literal periods key <- key_range_auto(sep = \"\\\\.\")  plot + guides(x = primitive_bracket(key = key))"},{"path":[]},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"piping-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Piping keys","title":"Key information","text":"key_manual() key_range_manual() functions equivalents easy pipe. called key_map() key_range_map() respectively, can replace following: following, pipe-friendly version: keys display something like :","code":"key <- key_range_manual(   start = presidential$start,   end   = presidential$end,   name  = presidential$name ) key <- presidential |>   key_range_map(     start = start,     end   = end,     name  = name   ) ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = primitive_bracket(key))"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"formatting-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Formatting keys","title":"Key information","text":"addition lot control keys display, also control common text formatting operations keys. key options ... argument allows many arguments element_text() passed labels.  cases know label advance, almost every time one uses key_manual(), key_map() ranged equivalents, can even vectorise formatting options.","code":"ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = guide_axis_base(key = key_auto(colour = \"red\", face = \"bold\"))) guide <- presidential |>   key_range_map(     start = start,     end   = end,     name  = name,     colour = ifelse(party == \"Republican\", \"tomato\", \"dodgerblue\"),     face  = \"bold\"   ) |>   primitive_bracket()  ggplot(economics, aes(date, unemploy)) +   geom_line() +   guides(x.sec = guide)"},{"path":"https://teunbrand.github.io/legendry/articles/keys.html","id":"forbidden-keys","dir":"Articles","previous_headings":"Futher gimmicks","what":"Forbidden keys","title":"Key information","text":", time writing, two keys probably shouldn’t use code. key_sequence() key_bins(). hope mentioning use prevent experimenting subsequent frustration keys. can see key_sequence() produce informative axis.  reason key designed colour gradients  Likewise, key_bins() designed regular guides, specific colour steps.","code":"my_sequence_key <- key_sequence(n = 20) standard +   guides(x = guide_axis_base(key = my_sequence_key)) ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c(     guide = gizmo_barcap(key = my_sequence_key)   ) my_bins_key <- key_bins()  ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c(     guide = gizmo_stepcap(key = my_bins_key)   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"axes","dir":"Articles","previous_headings":"","what":"Axes","title":"A guided tour","text":"Axes truly bread butter guides. Naturally, axes shine brightest guides positions like x y can moonlight auxiliary guides well.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"where-not-to-apply","dir":"Articles","previous_headings":"Axes","what":"Where (not) to apply","title":"A guided tour","text":"legendry, staple axis guide_axis_base(). first glance, axes utterly unremarkable much mirror ggplot2::guide_axis() design.  terms novelty, ‘extra’ option axes offer display bidirectional tick marks.  However, guide_axis_base() flexible ggplot2::guide_axis(). ggplot2, ’d typically switch ggplot2::guide_axis_theta() display axis theta coordinate polar plot. custom axis knows fit polar coordinates, fuss needed switching polar coordinates.  Argueably, custom guide little bit flexible. exactly scruples displaying arbitrary continuous aesthetics, like colour plot . can see, informative colour guide reason ’d advice . unadvised yet possible topic resurfaces later article.  summary, guide_axis_base() flexible guide can used position aesthetic, can () used continuous aesthetics.","code":"# Turn on axis lines theme_update(axis.line = element_line())  # A standard plot standard <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   labs(     x = \"Engine Displacement (Litres)\",     y = \"Highway Miles per Gallon\"   )  standard + guides(   x = \"axis_base\",   y = \"axis_base\" ) p <- standard +    scale_x_continuous(guide = guide_axis_base(bidi = TRUE)) +   scale_y_continuous(guide = guide_axis_base(bidi = TRUE)) p p + coord_radial(start = 1.25 * pi, end = 2.75 * pi) standard + aes(colour = cty) +   guides(colour = \"axis_base\")"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"nested-axes","dir":"Articles","previous_headings":"Axes","what":"Nested axes","title":"A guided tour","text":"Currently, exactly 1 ‘novelty’ axis guide_axis_nested(). Let’s suppose ‘nested’ data, purposes just means discrete variables kind categories interactions can laid nested fashion. category categories, . example three super-categories ‘Drink’, ‘Fruit’ ‘Vehicle’ granular categories like ‘Coffee’ ‘Pear’ belong super-categories. can use interaction() function paste together name inner category name outer category.  can also nest vertical axis x/y aesthetics swapped.  Instead just relying formatting labels correctly splitting, can also manually annotate outer categories. , can use key_range_manual() function constructs brackets see fit.","code":"df <- data.frame(   item = c(\"Coffee\", \"Tea\", \"Apple\", \"Pear\", \"Car\"),   type = c(\"Drink\", \"Drink\", \"Fruit\", \"Fruit\", \"Vehicle\"),   amount = c(5, 1, 2, 3, 1) )  plain <- ggplot(df, aes(interaction(item, type), amount)) +   geom_col() plain + guides(x = \"axis_nested\") ggplot(df, aes(amount, interaction(item, type))) +   geom_col() + guides(y = \"axis_nested\") my_key <- key_range_manual(   start = c(\"Coffee\", \"Apple\"),   end   = c(\"Tea\", \"Pear\"),   name  = c(\"Drinks\", \"Fruits\"),    level = 1 )  ggplot(df, aes(item, amount)) +   geom_col() +   scale_x_discrete(     limits = df$item,     guide = guide_axis_nested(       regular_key = \"auto\",       key = my_key     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"brackets","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Brackets","title":"A guided tour","text":"change style range indicators, can choose different bracket setting. theme elements legendry.bracket legendry.bracket.size control styling size line. settings shortcut theme_guide().  brackets can provided string naming bracket function, like \"curvy\" invokes bracket_curvy(). follows overview build-bracket shapes.  Quite possibly, might bracket shapes want use, aren’t built legendry. Luckily, can build custom brackets, using numeric matrix : 2 columns corresponding x y coordinates. least 2 rows. values 0 1. x-coordinate stretched along axis, whereas y squished fit legendry.bracket.size theme setting. custom bracket can just provided bracket argument.","code":"plain + guides(x = guide_axis_nested(bracket = \"curvy\")) +   theme_guide(     bracket = element_line(colour = \"blue\"),     bracket.size = unit(3, \"mm\")   ) brackets <- list(   \"atan\"    = bracket_atan(),   \"chevron\" = bracket_chevron(),   \"curvy\"   = bracket_curvy(),   \"line\"    = bracket_line(),    \"round\"   = bracket_round(),   \"sigmoid\" = bracket_sigmoid(),   \"square\"  = bracket_square() )  brackets <- cbind(   as.data.frame(do.call(rbind, brackets)),   shape = factor(rep(names(brackets), lengths(brackets) / 2), names(brackets)) )  ggplot(brackets, aes(x, y)) +   geom_path() +   facet_wrap(~ shape) +   coord_equal() zigzag <- cbind(   x = seq(0, 1, length.out = 20),   y = rep(c(0, 1), length.out = 20) )  plain + guides(x = guide_axis_nested(bracket = zigzag))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"boxes","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Boxes","title":"A guided tour","text":"Alternatively, also possible forego brackets altogether use boxes instead.","code":"plain + guides(x = guide_axis_nested(type = \"box\"))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"customising","dir":"Articles","previous_headings":"Axes > Nested axes","what":"Customising","title":"A guided tour","text":"needn’t strictly use guide_axis_nested() discrete data: can use continuous data well. However, ’d need provide manual ranged key, one created key_range_manual()/key_range_map().  customise different depths bracketed text, can give list text elements levels_text argument.  Alternatively, can tailor many usual text formatting options encoding key.","code":"presidents <- key_range_map(presidential, start = start, end = end, name = name)  eco <- ggplot(economics, aes(date, unemploy)) +   geom_line() +   labs(y = \"Unemployment\")    eco + guides(x = guide_axis_nested(key = presidents)) presidents$.level <- rep(1:3, length.out = nrow(presidents))  eco + guides(x = guide_axis_nested(   key = presidents,   levels_text = list(     element_text(face = \"bold\"),     NULL,     element_text(face = \"italic\")   ) )) presidents <- key_range_map(   presidential,    start = start, end = end, name = name,   level = rep(1:4, length.out = nrow(presidential)),   colour = ifelse(party == \"Republican\", \"tomato\", \"dodgerblue\") )  eco + guides(x = guide_axis_nested(key = presidents))"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"dendrograms","dir":"Articles","previous_headings":"Axes","what":"Dendrograms","title":"A guided tour","text":"Dendrograms popular method displaying results hierarchical clustering. standard way computing hierarchical clusters compute distance metric data dist() forwarding result hclust(). default plot method shows dendrogram.  packages many options display dendrograms, notably ggdendro dendextend. legendry package ambition best dendrogram visualiser, find dendrograms use useful annotation. use dendrograms, can provide object produced hclust scale_(x/y)_dendro(). ensures scale follows order clustering result default uses guide_axis_dendro() display dendrogram next labels.  guide_axis_dendro() function can decomposed labels segments. can use primitive_segments(\"dendro\") display labels, may convenient rather place labels opposite end panel. plot use raw segments draw radial dendrogram. vanish = TRUE option indicates fit dendrogram root tree middle, ever relevant secondary theta axes.","code":"clust <- hclust(dist(scale(mtcars)), method = \"ave\") plot(clust) ggplot(mtcars, aes(mpg, rownames(mtcars))) +   geom_col() +   scale_y_dendro(clust) ggplot(mtcars, aes(mpg, rownames(mtcars))) +   geom_col() +   scale_y_dendro(clust) +   coord_radial(theta = \"y\", inner.radius = 0.5) +   guides(     theta = guide_axis_base(angle = 90),     theta.sec = primitive_segments(\"dendro\", vanish = TRUE),     r = \"none\"   ) +   theme(     axis.title = element_blank(),     plot.margin = margin(t = 50, b = 50)   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"colours","dir":"Articles","previous_headings":"","what":"Colours","title":"A guided tour","text":"colour fill aesthetics wonderful build guides , can apply pretty much anything. First, ’ll take gander variants colour bars gander rings.","code":""},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"bars-and-steps","dir":"Articles","previous_headings":"Colours","what":"Bars and steps","title":"A guided tour","text":"Two variants colour guides exist {legendry}: guide_colbar() reflects guide_colourbar() guide_colsteps() reflects guide_coloursteps(). used standard fashion, look similar vanilla counterparts.  Please note following paragraphs apply equally guide_colsteps(), ’ll take guide_colbar() examples.","code":"standard <- standard +    aes(colour = cty) +   labs(colour = \"City Miles\\nper Gallon\")  standard +   scale_colour_viridis_c(guide = \"colbar\") +   labs(title = \"Custom colour bar\")  standard +   scale_colour_viridis_b(guide = \"colsteps\") +   labs(title = \"Custom colour steps\")"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"caps","dir":"Articles","previous_headings":"Colours > Bars and steps","what":"Caps","title":"A guided tour","text":"thing sets guides apart indicators data goes --bounds. common case --bounds data, set scale limits narrower data range. plot , cty variable observation lower limit 10, upper limit 30. Typically, displayed na.value = \"grey\" colour. bars display data --bounds gray ‘caps’ two ends bar.  can change --bounds strategy, oob argument scale, caps reflect colour --bounds data acquired.  can also force caps appear, even --bounds data, force cap colour consistent scale.  shape cap needn’t triangle. can set shape built-cap shapes.  caps can provided string naming cap function, like \"arch\" invokes cap_arch(). follows overview build-cap shapes.  certainly possible use shapes imagination well. provide shape, use numeric matrix : 2 columns corresponding x y coordinates. least 2 rows. positive values 2nd column (y). Start (0, 0) coordinate. End (1, 0) coordinate. can see shapes requirements hold built-shapes. matrix can given shape argument guide.","code":"standard +   scale_colour_viridis_c(     limits = c(10, 30),     guide = \"colbar\"   ) standard +   scale_colour_viridis_c(     limits = c(10, 30), oob = oob_squish,     guide = \"colbar\"   ) standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = c(FALSE, TRUE),        oob = \"squish\"     )   ) standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = TRUE, oob = \"squish\",       shape = \"arch\"     )   ) caps <- list(   none = cap_none(),   triangle = cap_triangle(),   round = cap_round(),   arch = cap_arch(),   ogee = cap_ogee() )  caps <- cbind(   as.data.frame(do.call(rbind, caps)),   shape = factor(rep(names(caps), lengths(caps) / 2), names(caps)) )  ggplot(caps, aes(x, y)) +   geom_path(arrow = arrow()) +   facet_wrap(~ shape) +   coord_equal() hourglass_cap <- cbind(   x = c(0, 1, 0, 1),   y = c(0, 1, 1, 0) )  standard +   scale_colour_viridis_c(     guide = guide_colbar(       show = TRUE, oob = \"squish\",       shape = hourglass_cap     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"side-guides","dir":"Articles","previous_headings":"Colours > Bars and steps","what":"Side-guides","title":"A guided tour","text":"colour bars come small party trick: two rows tick marks separate axes masquerading parts colour bar. becomes easier see wash away make-vanilla = FALSE.  trick allows tailor colour bar liking separate sides. can use invoke tricks described axis section, like setting minor ticks, swap axes annotation-primitive like primitive_bracket().","code":"standard +   scale_colour_viridis_c(     guide = guide_colbar(vanilla = FALSE)   ) brackets <-    key_range_manual(     start = c(9, 25),     end   = c(19, 30),      name  = c(\"A\", \"B\")   ) |>   primitive_bracket(bracket = \"square\")  standard +   scale_colour_viridis_c(     minor_breaks = breaks_width(1),     guide = guide_colbar(       first_guide = guide_axis_base(\"minor\"),       second_guide = brackets     )   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"rings","dir":"Articles","previous_headings":"Colours","what":"Rings","title":"A guided tour","text":"Aside bars steps, also option show colour ring. understand might convenient, can help understand type data suitable . prime example cyclical data can month year. time December January just one month, encoded numerically, difference 11 months. problem can show sometimes periodic data, like housing sales .  Every year get sharp colour transition winter. remedy problem use cyclical palette. {scico} package offers suitable cyclical palettes, like ‘romaO’, ‘vikO’, ‘bamO’, ‘corkO’ ‘brocO’.  already much better, guide poor job displaying cyclical nature months. better reflected guide, can use guide_colring().  ‘thickness’ donut can controlled legend.key.width parameter, default 1/5th diameter. outer diameter ring controlled legend.key.size parameter, multiplied 5 consistency colour bar multiplier. Like custom colour bars, possible set custom guides, hoarded inner_guide outer_guide distinguish aren’t first second.","code":"housing <-    ggplot(     subset(txhousing, city == \"Houston\"),      aes(date, volume, colour = month)   ) +   geom_line() +   scale_y_continuous(     name = \"Total volume of sales\",     labels = dollar_format(scale = 1e-6, suffix = \"M\")   ) +   labs(     x = \"Date\",     colour = \"Month\"   )  housing +   scale_colour_viridis_c(limits = c(0, 12)) # Colours from scico::scico(12, palette = \"romaO\") periodic_pal <-    c(\"#723957\", \"#843D3A\", \"#97552B\", \"#B08033\", \"#CBB45D\", \"#D5DA99\",      \"#B8DEC3\", \"#85C7CF\", \"#599FC4\", \"#4E73AB\", \"#5F4C81\", \"#723959\")  housing +    scale_colour_gradientn(colours = periodic_pal, limits = c(0, 12)) housing +    scale_colour_gradientn(     colours = periodic_pal, limits = c(1, 13),     breaks = 1:12,     guide = \"colring\"   ) housing +    scale_colour_gradientn(     colours = periodic_pal, limits = c(1, 13),     breaks = 1:12, minor_breaks = breaks_width(0.25),     guide = guide_colring(       outer_guide = guide_axis_base(\"minor\"),       inner_guide = \"none\"     )   ) +   theme(     legend.key.width = rel(2.5), # fill to center     legend.key.size = unit(0.5, \"cm\") # actual size is 0.5 * 5 = 2.5 cm   )"},{"path":"https://teunbrand.github.io/legendry/articles/tour.html","id":"legends","dir":"Articles","previous_headings":"","what":"Legends","title":"A guided tour","text":"addition full guides , legendry also three variants guide_legend() legend. first guide_legend_base(), similar ggplot2::guide_legend(), offers design argument lets put keys arbitrary cells rectangular layout.  Secondly, guide_legend_cross() let ‘cross’ two variables, ; generate legend key every combination two variable levels. legends merged share title, wise construct common legend setting key strategy title.  Alternatively, can also use guide compound variable already combines two variables. Note missing combinations correctly omitted case.  Lastly, also legend suitable displaying groups. guide_legend_group() legend adds additional titles separate groups. default, splits labels first non-alphanumeric character, can also use key_group_lut() indicate groups.","code":"design <- matrix(NA, 3, 3) diag(design) <- 1:3  standard +    aes(colour = drv) +   guides(colour = guide_legend_base(design = design)) common <- guide_legend_cross(key = \"auto\", title = \"Cross legend\")  standard +   aes(colour = drv, shape = factor(cyl)) +   guides(colour = common, shape = common) standard +   aes(colour = paste(cyl, drv)) +   guides(colour = \"legend_cross\") set.seed(42) i <- sample(nrow(msleep), 6)  ggplot(msleep[i, ], aes(sleep_total, bodywt)) +   geom_point(aes(colour = paste0(vore, \"vore.\", name))) +   guides(colour = \"legend_group\")"},{"path":"https://teunbrand.github.io/legendry/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Teun van den Brand. Author, maintainer, copyright holder.","code":""},{"path":"https://teunbrand.github.io/legendry/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"van den Brand T (2025). legendry: Extended Legends Axes 'ggplot2'. R package version 0.2.0.9000, https://github.com/teunbrand/legendry, https://teunbrand.github.io/legendry/.","code":"@Manual{,   title = {legendry: Extended Legends and Axes for 'ggplot2'},   author = {Teun {van den Brand}},   year = {2025},   note = {R package version 0.2.0.9000,     https://github.com/teunbrand/legendry},   url = {https://teunbrand.github.io/legendry/}, }"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"legendry-","dir":"","previous_headings":"","what":"Extended Legends and Axes for ggplot2","title":"Extended Legends and Axes for ggplot2","text":"goal legendry provide additional guide functionality ggplot2 ecosystem.","code":""},{"path":"https://teunbrand.github.io/legendry/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"Extended Legends and Axes for ggplot2","text":"can install development version legendry GitHub :","code":"# install.packages(\"devtools\") devtools::install_github(\"teunbrand/legendry\")"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"example","dir":"","previous_headings":"","what":"Example","title":"Extended Legends and Axes for ggplot2","text":"Let’s first set basic plot experiment : legendry package offers selection calls ‘complete guides’. complete guides can just drop-replacement regular guides, can specify using ggplot2’s guides() function using guide argument scales. example , ’re using two custom variants vanilla guides, namely guide_axis_base() guide_colbar(). custom variants additional options allow greater degree customisation: axis guide option bidirectional ticks. colourbar automatically recognises --bounds values displays cap.  Besides complete guides, legendry also incomplete guides can composed. ggplot2::guide_axis_stack() axis composition function can used display multiple guides. , use ‘primitive’ guide (incomplete building block) display range axis. stacking regular axis primitive guide completed.  legendry package extends guide composition concept beyond axes types guides. example compose ‘sandwich’: central guide flanked two others. bracket primitive, matter aesthetic displays can re-use sandwich. ’ve yet write vignette composition.","code":"library(legendry) #> Loading required package: ggplot2  base <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   labs(     x = \"Engine displacement\",     y = \"Highway miles per gallon\",     col = \"City miles\\nper gallon\"   ) +   theme(axis.line = element_line()) base +    scale_colour_viridis_c(     limits = c(NA, 30),     guide = \"colbar\"   ) +   guides(     x = guide_axis_base(bidi = TRUE)   ) # A partial guide to display a bracket efficient_bracket <- primitive_bracket(   # Keys determine what is displayed   key = key_range_manual(start = 25, end = Inf, name = \"Efficient\"),   bracket = \"square\",   # We want vertical text   theme = theme(     legend.text = element_text(angle = 90, hjust = 0.5),     axis.text.y.left = element_text(angle = 90, hjust = 0.5)   ) )  base + guides(y = guide_axis_stack(\"axis\", efficient_bracket)) base +    scale_colour_viridis_c(     guide = compose_sandwich(       middle = gizmo_density(),        text = \"axis_base\",       opposite = efficient_bracket     )   )"},{"path":"https://teunbrand.github.io/legendry/index.html","id":"code-of-conduct","dir":"","previous_headings":"","what":"Code of Conduct","title":"Extended Legends and Axes for ggplot2","text":"Please note legendry project released Contributor Code Conduct. contributing project, agree abide terms.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":null,"dir":"Reference","previous_headings":"","what":"Bracket options — bracket_options","title":"Bracket options — bracket_options","text":"functions construct various sorts brackets. construct matrix can supplied bracket argument primitive_bracket().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bracket options — bracket_options","text":"","code":"bracket_line()  bracket_square()  bracket_chevron()  bracket_round(angle = 180, n = 100)  bracket_sigmoid(curvature = 10, n = 100)  bracket_atan(curvature = 5, n = 100)  bracket_curvy(angle = 225, n = 100)"},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bracket options — bracket_options","text":"angle numeric(1): angle degrees circle piece drawn. bracket_curvy(), angle 180 270. n integer(1) number points use bracket. curvature numeric(1) controls curliness bracket. precisely, used construct sequence seq(-curvature, curvature, length.= n) logistic arctangent functions evaluated.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Bracket options — bracket_options","text":" coordinates points brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Bracket options — bracket_options","text":"designing custom bracket shapes, expectation columns number 0 1. first column follows direction guide whereas second column orthogonal direction.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"functions","dir":"Reference","previous_headings":"","what":"Functions","title":"Bracket options — bracket_options","text":"bracket_line(): simple line bracket. n = 2 points. bracket_square(): square bracket. n = 4 points. bracket_chevron(): chevron (V-shape) makes bracket. n = 3 points. bracket_round(): One circular arc makes bracket. bracket_sigmoid(): Two sigmoid curves stacked top one another form bracket. bracket_atan(): Two arctangent curves stacked top one another form bracket. bracket_curvy(): Four circular arcs make bracket.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/bracket_options.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Bracket options — bracket_options","text":"","code":"plot(bracket_sigmoid(), type = 'l')"},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":null,"dir":"Reference","previous_headings":"","what":"Cap options — cap_options","title":"Cap options — cap_options","text":"functions construct various sorts caps. construct matrix can supplied shape argument gizmo_barcap().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cap options — cap_options","text":"","code":"cap_triangle()  cap_round(n = 100)  cap_arch(n = 100)  cap_ogee(n = 100)  cap_none()"},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cap options — cap_options","text":"n  number points use cap.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cap options — cap_options","text":" coordinates points brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Cap options — cap_options","text":"designing custom cap shapes, expectation first point starts (0, 0) coordinate last point ends (0, 1) coordinate. first column follows orthogonal direction bar whereas second column follows direction bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"functions","dir":"Reference","previous_headings":"","what":"Functions","title":"Cap options — cap_options","text":"cap_triangle(): equilateral triangle n = 3 points. cap_round(): semicircle. cap_arch(): Two circular arcs forming equilateral Gothic arch. cap_ogee(): Four circular arcs forming 'ogee' arch. cap_none(): cap.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/cap_options.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cap options — cap_options","text":"","code":"plot(cap_arch(), type = 'l')"},{"path":"https://teunbrand.github.io/legendry/reference/common_parameters.html","id":null,"dir":"Reference","previous_headings":"","what":"common parameters in legendry — common_parameters","title":"common parameters in legendry — common_parameters","text":"collection common parameters needn't re-documented time.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/common_parameters.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"common parameters in legendry — common_parameters","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. available_aes  vector listing aesthetics guide can build. direction  indicating direction guide. Can \"horizontal\" \"vertical\". angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides in a cross — compose_crux","title":"Compose guides in a cross — compose_crux","text":"guide composition central guide optionally surrounded guides four sides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides in a cross — compose_crux","text":"","code":"compose_crux(   key = NULL,   centre = \"none\",   left = \"none\",   right = \"none\",   top = \"none\",   bottom = \"none\",   args = list(),   complete = FALSE,   theme = NULL,   theme_defaults = list(),   reverse = FALSE,   order = 0,   title = waiver(),   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides in a cross — compose_crux","text":"key standard key specification. key shared among guides NULL keys . See information linked topic. centre, left, right, top, bottom Guides use composition per position. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. complete  whether treat composition complete guide. TRUE, title margin added result. FALSE (default), titles margins added. theme  object style guide individually differently plot's theme settings. theme arguments guide overrides, combined , plot's theme. theme_defaults  theme elements override undeclared theme arguments. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides in a cross — compose_crux","text":" guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_crux.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides in a cross — compose_crux","text":"","code":"# Roughly recreating a colour bar with extra text on top and bottom crux <- compose_crux(   centre = gizmo_barcap(), left = \"axis_base\",   right = \"axis_base\",   top = primitive_title(\"A lot\"),   bottom = primitive_title(\"A little\") )  ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty)) +   guides(colour = crux)"},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides on top of one another — compose_ontop","title":"Compose guides on top of one another — compose_ontop","text":"guide can place place guides top one another.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides on top of one another — compose_ontop","text":"","code":"compose_ontop(   ...,   args = list(),   key = NULL,   title = waiver(),   angle = waiver(),   theme = NULL,   order = 0,   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides on top of one another — compose_ontop","text":"... Guides stack composition. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. key standard key specification. key shared among guides NULL keys . See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  giving aesthetics must match guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides on top of one another — compose_ontop","text":" composite guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_ontop.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides on top of one another — compose_ontop","text":"","code":"# Using the ontop composition to get two types of ticks with different # lengths ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = compose_ontop(     guide_axis_base(       key_manual(c(2, 4, 6)),       theme = theme(         axis.ticks = element_line(colour = \"limegreen\"),         axis.ticks.length = unit(11, \"pt\")       )     ),     guide_axis_base(       key_manual(c(3, 5, 7)),       theme = theme(         axis.ticks = element_line(colour = \"tomato\"),         axis.ticks.length = unit(5.5, \"pt\")       )     )   ))"},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides as a sandwich — compose_sandwich","title":"Compose guides as a sandwich — compose_sandwich","text":"guide composition middle guide flanked two parallel guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides as a sandwich — compose_sandwich","text":"","code":"compose_sandwich(   key = key_auto(),   middle = gizmo_barcap(),   text = \"none\",   opposite = \"none\",   args = list(),   complete = TRUE,   theme = NULL,   theme_defaults = list(),   reverse = FALSE,   order = 0,   title = waiver(),   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides as a sandwich — compose_sandwich","text":"key standard key specification. key shared among guides NULL keys . See information linked topic. middle Guide use middle guide. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. text, opposite Guides use legend.text.position location opposite side middle guide respectively. Guide specification middle argument. args  arguments pass guides given either function string. complete  whether treat composition complete guide. TRUE, title margin added result. FALSE (default), titles margins added. theme  object style guide individually differently plot's theme settings. theme arguments guide overrides, combined , plot's theme. theme_defaults  theme elements override undeclared theme arguments. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides as a sandwich — compose_sandwich","text":" guide object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compose guides as a sandwich — compose_sandwich","text":"sandwich composition effectively crux composition lacking two opposing arms.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_sandwich.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides as a sandwich — compose_sandwich","text":"","code":"# A standard plot with a sandwich guide ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty)) +   guides(colour = compose_sandwich(     middle = \"colourbar\",     text = \"axis_base\",     opposite = primitive_bracket(key = key_range_manual(       start = c(10, 20), end = c(25, 30), name = c(\"A\", \"B\")     ))   ))"},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":null,"dir":"Reference","previous_headings":"","what":"Compose guides as stack — compose_stack","title":"Compose guides as stack — compose_stack","text":"guide can stack guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compose guides as stack — compose_stack","text":"","code":"compose_stack(   ...,   args = list(),   key = NULL,   title = waiver(),   side.titles = waiver(),   angle = waiver(),   theme = NULL,   order = 0,   drop = NULL,   position = waiver(),   available_aes = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compose guides as stack — compose_stack","text":"... Guides stack composition. guide can specified one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. key standard key specification. key shared among guides NULL keys . See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. side.titles  giving labels titles displayed side stack. Set NULL display side titles. waiver(), attempt made extract titles guides use side titles. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. drop  giving indices guides dropped facet requests labels drawn axes panels. default, NULL, drop every guide except first. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  giving aesthetics must match guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compose guides as stack — compose_stack","text":" guide object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/compose_stack.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compose guides as stack — compose_stack","text":"","code":"ggplot() +   geom_function(fun = dnorm, xlim = c(-3, 3)) +   guides(x = compose_stack(     \"axis\", \"axis\",     side.titles = c(\"first\", \"second\")   )) +   # Add margin to make room for side titles   theme(plot.margin = margin(5.5, 5.5, 5.5, 11))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: capped colour bar — gizmo_barcap","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"guide displays colour bar optional caps either ends bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"","code":"gizmo_barcap(   key = \"sequence\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   oob = \"keep\",   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"key sequence key specification. Defaults key_sequence(n = 15). Changing argument key_sequence() fine, changing key type advised. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_barcap.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: capped colour bar — gizmo_barcap","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point()  # Just a bar p + scale_colour_viridis_c(guide = gizmo_barcap())   # Caps show up when there is data outside the limits p + scale_colour_viridis_c(   limits = c(10, 30),   guide  = gizmo_barcap() )   # The scale's out-of-bounds handler determines cap colour p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = gizmo_barcap() )   # Customising display of the guide p +   scale_colour_viridis_c(     oob = scales::oob_squish,     guide = gizmo_barcap(       shape = \"arch\", show = c(FALSE, TRUE),       size = unit(2, \"cm\"),       theme = theme(legend.key.height = unit(4, \"cm\"))     )   ) +   theme(     legend.frame = element_rect(colour = \"black\"),     legend.key.width = unit(0.5, \"cm\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: kernel density estimate — gizmo_density","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"guide displays kernel density estimate (KDE) aesthetic. aesthetic colour fill, shape reflect .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"","code":"gizmo_density(   key = waiver(),   density = NULL,   density.args = list(),   density.fun = stats::density,   just = 0.5,   oob = \"keep\",   alpha = NA,   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"key sequence key binned key specification. Internally defaults sequence key scale continuous binned key scale binned. density One following: NULL using kernel density estimation data values (default).  vector feed density.fun function. named  x y numeric elements equal length, one returned using density() function. Please note  input expected scale-transformed space, original data space. density.args  additional arguments density.fun argument. applies density provided . already. density.fun  use kernel density estimation density argument provided list already. just  0 1. Use 0 bottom- left-aligned densities, use 1 top- right-aligned densities 0.5 violin shapes. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: kernel density estimate — gizmo_density","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"Non-finite values NA NaN ignored infinite values -Inf Inf squished limits.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_density.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: kernel density estimate — gizmo_density","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c()  # Density from plot data p + guides(colour = gizmo_density())   # Using bins instead of gradient p + guides(colour = gizmo_density(\"bins\"))   # Providing custom values to compute density of p + guides(colour = gizmo_density(density = runif(1000, min = 5, max = 35)))   # Providing a precomputed density p + guides(colour = gizmo_density(density = density(mpg$cty, adjust = 0.5)))   # Alternatively, parameters may be passed through density.args p + guides(colour = gizmo_density(density.args = list(adjust = 0.5)))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: custom grob — gizmo_grob","title":"Guide gizmo: custom grob — gizmo_grob","text":"guide displays user-provided grob.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: custom grob — gizmo_grob","text":"","code":"gizmo_grob(   grob,   width = grobWidth(grob),   height = grobHeight(grob),   hjust = 0.5,   vjust = 0.5,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: custom grob — gizmo_grob","text":"grob  display. width, height [][grid::unit] setting allocated width height grob respectively. hjust, vjust  0 1 setting horizontal vertical justification grob used guide x y aesthetics. position guide drawn: one \"top\", \"bottom\", \"left\", \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: custom grob — gizmo_grob","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_grob.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: custom grob — gizmo_grob","text":"","code":"circle <- grid::circleGrob()  # A standard plot with grob gizmos ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   guides(     x.sec = gizmo_grob(       circle, hjust = 0.75,       width = unit(2, \"cm\"), height = unit(2, \"cm\")     ),     colour = gizmo_grob(       circle, width = unit(1, \"cm\"), height = unit(1, \"cm\")     )   )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: histogram — gizmo_histogram","title":"Guide gizmo: histogram — gizmo_histogram","text":"guide displays histogram aesthetic. aesthetic colour fill, shape reflect .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: histogram — gizmo_histogram","text":"","code":"gizmo_histogram(   key = waiver(),   hist = NULL,   hist.args = list(),   hist.fun = graphics::hist,   just = 1,   oob = oob_keep,   metric = \"counts\",   alpha = NA,   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: histogram — gizmo_histogram","text":"key sequence key binned key specification. Internally defaults sequence key scale continuous binned key scale binned. hist One following: NULL computing histograms data values (default). atomic  feed hist.fun function. named  breaks counts numeric items, breaks item exactly one element longer counts item. typical way construct list using hist() function. Please note  input expected scale-transformed space, original data space. hist.args  additional arguments hist.fun argument. applies hist provided  already. Please note arguments used binning counting: graphical arguments ignored. hist.fun  use computing histograms hist argument provided list already. just  0 1. Use 0 bottom- left-aligned histograms, use 1 top- right-aligned histograms 0.5 centred histograms. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". metric  either \"counts\" \"density\" stating field  class display. \"density\" metric might appropriate display histogram breaks non-constant intervals. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: histogram — gizmo_histogram","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide gizmo: histogram — gizmo_histogram","text":"Non-finite values NA NaN ignored infinite values -Inf Inf squished limits.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_histogram.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: histogram — gizmo_histogram","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_viridis_c()  # Histogram from plot data p + guides(colour = gizmo_histogram())   # Using bins instead of gradient p + guides(colour = gizmo_histogram(\"bins\"))   # Providing custom values to compute histogram p + guides(colour = gizmo_histogram(hist = runif(1000, min = 5, max = 35)))   # Providing precomputed histogram p + guides(colour = gizmo_histogram(hist = hist(mpg$cty, breaks = 10)))   # Alternatively, parameters may be passed through hist.args p + guides(colour = gizmo_histogram(hist.arg = list(breaks = 10)))"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmo: capped colour steps — gizmo_stepcap","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"guide displays binned variant colour bar optional caps either ends bar.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"","code":"gizmo_stepcap(   key = \"bins\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   oob = \"keep\",   theme = NULL,   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"key bins key specificiation. Defaults key_bins(even.steps = FALSE, show.limits = NULL). Changing arguments key_bins() fine, changing key type advised. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"GizmoStepcap object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/gizmo_stepcap.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide gizmo: capped colour steps — gizmo_stepcap","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point()  # Just some recangles p + scale_colour_viridis_c(guide = gizmo_stepcap())   # Caps show up when there is data outside the limits p + scale_colour_viridis_c(   limits = c(10, 30),   guide = gizmo_stepcap() )   # The scale's out-of-bounds handler determines cap colour p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = gizmo_stepcap() )   # Customising the display of the guide p +   scale_colour_viridis_c(     oob = scales::oob_squish,     guide = gizmo_stepcap(       shape = \"round\", show = c(FALSE, TRUE),       size = unit(1, \"cm\"),       theme = theme(legend.key.height = unit(4, \"cm\"))     )   ) +   theme(     legend.frame = element_rect(colour = \"black\"),     legend.key.width = unit(0.5, \"cm\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide composition — guide-composition","title":"Guide composition — guide-composition","text":"Guide composition meta-guide orchestrating ensemble guides. , 'composing' guide useful visual reflection scale.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide composition — guide-composition","text":"","code":"new_compose(   guides,   args = list(),   ...,   available_aes = c(\"any\", \"x\", \"y\", \"r\", \"theta\"),   call = caller_env(),   super = Compose )"},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide composition — guide-composition","text":"guides  guides wherein element one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. args  arguments pass guides given either function string. ... Additional parameters pass new_guide(). available_aes  giving aesthetics must match guides. call call display messages. super  class object giving meta-guide composition.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide composition — guide-composition","text":" (sub-)class guide composes guides.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide-composition.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide composition — guide-composition","text":"","code":"# The `new_compose()` function is not intended to be used directly my_composition <- new_compose(list(\"axis\", \"axis\"), super = ComposeStack)  # Is the same as my_composition <- compose_stack(\"axis\", \"axis\")"},{"path":"https://teunbrand.github.io/legendry/reference/guide-gizmos.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide gizmos — guide-gizmos","title":"Guide gizmos — guide-gizmos","text":"Guide gizmos speciality guide components specific one aesthetics display. Typically can composed guides guide primitives form complete guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-primitives.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives — guide-primitives","title":"Guide primitives — guide-primitives","text":"Guide primitives building blocks complex guides. , useful visual reflection scale. purpose combined one another form complex, complete guides reflect scale way.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide-primitives.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Guide primitives — guide-primitives","text":"guide primitives simple, flexible tailored one particular aesthetic. way can reused combined .","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom axis guide — guide_axis_base","title":"Custom axis guide — guide_axis_base","text":"axis guide visual representation position scales can represent x, y, theta r aesthetics. differs guide_axis() can accept custom keys can act axis coord_radial() like guide_axis_theta().","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom axis guide — guide_axis_base","text":"","code":"guide_axis_base(   key = NULL,   title = waiver(),   theme = NULL,   n.dodge = 1,   check.overlap = FALSE,   angle = waiver(),   cap = \"none\",   bidi = FALSE,   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom axis guide — guide_axis_base","text":"key standard key specification. Defaults key_auto(). See information linked topic 'Details' section. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom axis guide — guide_axis_base","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom axis guide — guide_axis_base","text":"hood, guide stack composition line, ticks labels primitives. set minor ticks, use key = \"minor\", use type argument key_manual() key_map(). use logarithmic axis, set key = \"log\".","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_base.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom axis guide — guide_axis_base","text":"","code":"# A standard plot with custom keys p <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   scale_x_continuous(     guide = guide_axis_base(key = key_minor())   ) +   scale_y_continuous(     guide = guide_axis_base(key = key_manual(c(20, 25, 30, 40)))   ) p   # Is translated to theta axis without fuss p + coord_radial()   # To use as logarithmic axis: ggplot(msleep, aes(bodywt, brainwt)) +   geom_point(na.rm = TRUE) +   scale_x_continuous(     transform = \"log10\",     guide = guide_axis_base(\"log\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":null,"dir":"Reference","previous_headings":"","what":"Dendrogram guide — guide_axis_dendro","title":"Dendrogram guide — guide_axis_dendro","text":"axis speciality axis discrete data hierarchically clustered. Please aware guide affect scale limits, set appropriately. guide give misleading results step skipped!","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Dendrogram guide — guide_axis_dendro","text":"","code":"guide_axis_dendro(   key = \"dendro\",   title = waiver(),   theme = NULL,   labels = TRUE,   space = rel(10),   vanish = TRUE,   n.dodge = 1,   angle = waiver(),   check.overlap = FALSE,   ticks = \"none\",   axis_line = \"none\",   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Dendrogram guide — guide_axis_dendro","text":"key segment key specification. See information linked topic. Alternatively, object class  automatically invokes key_dendro(). title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. labels, ticks, axis_line Guides use labels, ticks axis lines. Can specified one following:  FALSE set guide guide_none() TRUE, set guide appropriate primitive.  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. space Either   object length 1 determining space allocated orthogonal direction. space argument class  (default) base size taken tick length theme setting. vanish relevant guide used secondary theta position:  whether continue draw segments meed center (TRUE) strictly observe space setting (FALSE). n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Dendrogram guide — guide_axis_dendro","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_dendro.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Dendrogram guide — guide_axis_dendro","text":"","code":"# Hierarchically cluster data clust <- hclust(dist(scale(mtcars)), \"ave\")  # Using the guide along with appropriate limits p <- ggplot(mtcars, aes(disp, rownames(mtcars))) +   geom_col() +   scale_y_discrete(limits = clust$labels[clust$order])  # Standard usage p + guides(y = guide_axis_dendro(clust))   # Adding ticks and axis line p + guides(y = guide_axis_dendro(clust, ticks = \"ticks\", axis_line = \"line\")) +   theme(axis.line = element_line())   # Controlling space allocated to dendrogram p + guides(y = guide_axis_dendro(clust, space = unit(4, \"cm\"))) +   theme(axis.ticks.y.left = element_line(\"red\"))   # If want just the dendrogram, use `labels = FALSE` p + guides(y = guide_axis_dendro(clust, labels = FALSE), y.sec = \"axis\")"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":null,"dir":"Reference","previous_headings":"","what":"Nested axis guide — guide_axis_nested","title":"Nested axis guide — guide_axis_nested","text":"axis guide gives extra range annotations position scales. can used infer nesting structure labels annotate ranges.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Nested axis guide — guide_axis_nested","text":"","code":"guide_axis_nested(   key = \"range_auto\",   regular_key = \"auto\",   type = \"bracket\",   title = waiver(),   theme = NULL,   angle = waiver(),   cap = \"none\",   bidi = FALSE,   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = NULL,   levels_text = NULL,   ...,   order = 0,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Nested axis guide — guide_axis_nested","text":"key One following: range key specification. key = \"range_auto\", additional labels inserted represent point values.  passed key_range_auto(sep) argument. exception made string valid key specification. regular_key standard key specification appearance regular tick marks. type Appearance ranges, either \"box\" put text boxes \"bracket\" (default) text brackets. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_text list  objects customise text appears every level. ... Arguments passed primitive_bracket(), primitive_box() primitive_fence(). order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Nested axis guide — guide_axis_nested","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Nested axis guide — guide_axis_nested","text":"hood, guide stack composition line, ticks, optionally labels either bracket, box fence primitives. default, key = \"range_auto\" incorporate 0th level labels inferred scale's labels. labels look like regular labels. offer keys opportunity display ranges alongside regular-looking labels, regular_key argument can used setup separate key display ticks ranges.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_axis_nested.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Nested axis guide — guide_axis_nested","text":"","code":"# A plot with nested categories on the x-axis p <- ggplot(mpg, aes(interaction(drv, cyl), hwy)) +   geom_boxplot()  p + guides(x = \"axis_nested\")   # Apply styling to brackets p + guides(x = \"axis_nested\") +   theme_guide(bracket = element_line(\"red\", linewidth = 1))   # Don't drop nesting indicators that have 0-width p + guides(x = guide_axis_nested(drop_zero = FALSE))   # Change additional padding for discrete categories p + guides(x = guide_axis_nested(pad_discrete = 0))   # Change bracket type p + guides(x = guide_axis_nested(bracket = \"curvy\"))   # Use boxes instead of brackets + styling of boxes p + guides(x = guide_axis_nested(type = \"box\")) +   theme_guide(box = element_rect(\"limegreen\", \"forestgreen\"))   # Using fences instead of brackets + styling of fences p + guides(x = guide_axis_nested(type = \"fence\", rail = \"inner\")) +   theme_guide(     fence.post = element_line(\"tomato\"),     fence.rail = element_line(\"dodgerblue\")   )   # Use as annotation of a typical axis # `regular_key` controls display of typical axis ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(x = guide_axis_nested(     key = key_range_manual(start = 2:3, end = 5:6, name = c(\"First\", \"Second\")),     regular_key = key_manual(c(2, 2.5, 3, 5, 7))   ))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":null,"dir":"Reference","previous_headings":"","what":"Circle size guide — guide_circles","title":"Circle size guide — guide_circles","text":"guide displays sizes points series circles. typically paired geom_point() draw_key_point() glyphs.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Circle size guide — guide_circles","text":"","code":"guide_circles(   key = NULL,   title = waiver(),   theme = NULL,   hjust = 0.5,   vjust = 0,   text_position = NULL,   clip_text = FALSE,   override.aes = list(shape = 1),   position = waiver(),   direction = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Circle size guide — guide_circles","text":"key standard key specification. Defaults key_auto(). See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. hjust, vjust  0 1 giving horizontal vertical justification, respectively, central shapes. recommended hjust = 0.5 text placed left right vjust = 0.5 recommended text placed top bottom. text_position string, one \"ontop\", \"top\", \"right\", \"bottom\", \"left\" describe placement labels. default (NULL), take legend.text.position theme setting. clip_text  whether give text \"ontop\" position small rectangle background colour. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Circle size guide — guide_circles","text":" object.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Circle size guide — guide_circles","text":"Please note default size scales scale area, radius, equidistant breaks appear irregularly spaced positions due labelling diameter circle. graph designed standard round shapes mind, .e. shapes 1, 16, 19 21. reason, shape = 1 default override.aes argument. shapes probably drawn quality alignment label placement may unsatisfactory.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_circles.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Circle size guide — guide_circles","text":"","code":"# A standard plot p <- ggplot(mtcars, aes(disp, mpg)) +   geom_point(aes(size = hp), alpha = 0.3)  # By default, the sizes aren't large enough to make this guide clear p + scale_size_area(guide = \"circles\")   # Update with a more approrpriate scale p <- p +   scale_size_area(     max_size = 30,     limits = c(0, NA),     breaks = c(0, 25, 100, 250)   ) p + guides(size = \"circles\")   # Horizontal orientation p + guides(size = guide_circles(   vjust = 0.5, hjust = 0, text_position = \"bottom\" ))   # Alternative text placement p + guides(size = guide_circles(   text_position = \"ontop\",   clip_text = TRUE ))   # More styling options p + guides(size = guide_circles(override.aes = aes(colour = \"red\")))+   theme(     # Key background     legend.key = element_rect(colour = \"black\", fill = 'white'),     # Padding around central shapes     legendry.legend.key.margin = margin(1, 1, 1, 1, \"cm\"),     legend.ticks = element_line(colour = \"blue\"),     legend.text.position = \"left\"   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom colour bar guide — guide_colbar","title":"Custom colour bar guide — guide_colbar","text":"Similar guide_colourbar(), guide displays continuous colour fill aesthetics. additional options display caps end bar, depending --bounds values.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom colour bar guide — guide_colbar","text":"","code":"guide_colbar(   title = waiver(),   key = \"auto\",   first_guide = \"axis_base\",   second_guide = first_guide,   shape = \"triangle\",   size = NULL,   show = NA,   nbin = 15,   alpha = NA,   reverse = FALSE,   oob = scales::oob_keep,   theme = NULL,   vanilla = TRUE,   position = waiver(),   available_aes = c(\"colour\", \"fill\") )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom colour bar guide — guide_colbar","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key sequence key specification. Defaults key_sequence(n = 15). Changing argument key_sequence() fine, changing key type advised. first_guide, second_guide Guides flank colour bar. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. first_guide placed location specified legend.text.position theme setting. second_guide placed opposite position. second_guide label suppression mechanism, labels drawn guide. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. nbin positive  determining many colours use colour gradient. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom colour bar guide — guide_colbar","text":" object","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom colour bar guide — guide_colbar","text":"colours always rendered gradients, important use graphics device can render . can checked using check_device(\"gradients\").","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colbar.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom colour bar guide — guide_colbar","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty))  # The colourbar shows caps when values are out-of-bounds (oob) p + scale_colour_viridis_c(   limits = c(10, NA),   guide = \"colbar\" )   # It also shows how oob values are handled p + scale_colour_viridis_c(   limits = c(10, NA), oob = scales::oob_squish,   guide = \"colbar\" )   # Adjusting the type of cap p + scale_colour_viridis_c(   limits = c(10, 30), oob = scales::oob_squish,   guide = guide_colbar(shape = \"round\") )   # One-sided ticks p + scale_colour_viridis_c(   guide = guide_colbar(second_guide = \"none\") )   # Colour bar with minor breaks p + scale_colour_viridis_c(   minor_breaks = scales::breaks_width(1),   guide = guide_colbar(key = \"minor\") )   # Using log ticks on a colourbar ggplot(msleep, aes(sleep_total, sleep_rem)) +   geom_point(aes(colour = bodywt), na.rm = TRUE) +   scale_colour_viridis_c(     transform = \"log10\",     guide = guide_colbar(key = \"log\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":null,"dir":"Reference","previous_headings":"","what":"Colour rings and arcs — guide_colring","title":"Colour rings and arcs — guide_colring","text":"Similar guide_colourbar(), guide displays continuous colour fill aesthetics. Instead bar, gradient shown ring arc, can convenient cyclical palettes provided scico package.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Colour rings and arcs — guide_colring","text":"","code":"guide_colring(   title = waiver(),   key = \"auto\",   start = 0,   end = NULL,   outer_guide = \"axis_base\",   inner_guide = \"axis_base\",   nbin = 300,   reverse = FALSE,   show_labels = \"outer\",   theme = NULL,   vanilla = TRUE,   position = waiver(),   available_aes = c(\"colour\", \"fill\"),   ... )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Colour rings and arcs — guide_colring","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key standard key specification. Defaults key_auto(). start, end  radians specifying offset starting end points 12 o'clock. NULL default end, internally defaults start + 2 * pi. outer_guide, inner_guide Guides display outside inside colour ring. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. nbin positive  determining many colours display. reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. show_labels  indicating guide labels shown. Can one \"outer\" (default), \"inner\", \"\" \"none\". Note labels can omitted related guide label suppression mechanism. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". available_aes  vector listing aesthetics guide can build. ... Arguments forwarded outer_guide inner_guide provided functions strings.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Colour rings and arcs — guide_colring","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colring.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Colour rings and arcs — guide_colring","text":"","code":"# Rings works best with a cyclical palette my_pal <- c(\"black\", \"tomato\", \"white\", \"dodgerblue\", \"black\")  p <- ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   scale_colour_gradientn(colours = my_pal)  # Standard colour ring p + guides(colour = \"colring\")   # As an arc p + guides(colour = guide_colring(   start = 1.25 * pi, end = 2.75 * pi ))   # Removing the inner tick marks p + guides(colour = guide_colring(inner_guide = \"none\"))   # Include labels on the inner axis p + guides(colour = guide_colring(show_labels = \"both\"))   # Passing an argument to inner/outer guides p + guides(colour = guide_colring(angle = 0))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom colour steps guide — guide_colsteps","title":"Custom colour steps guide — guide_colsteps","text":"Similar guide_coloursteps(), guide displays continuous colour fill aesthetics. additional options display caps end bar, depending --bounds values.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom colour steps guide — guide_colsteps","text":"","code":"guide_colsteps(   title = waiver(),   key = \"bins\",   first_guide = \"axis_base\",   second_guide = \"axis_base\",   shape = \"triangle\",   size = NULL,   show = NA,   alpha = NA,   reverse = FALSE,   oob = scales::oob_keep,   theme = NULL,   position = waiver(),   vanilla = TRUE,   available_aes = c(\"colour\", \"fill\") )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom colour steps guide — guide_colsteps","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. key bins key specificiation. Defaults key_bins(even.steps = FALSE, show.limits = NULL). Changing arguments key_bins() fine, changing key type advised. first_guide, second_guide Guides flank colour steps. guide can specified using one following:  class object.  returns  class object.  naming function, without guide_ primitive_ prefix. first_guide placed location specified legend.text.position theme setting. second_guide placed opposite position. second_guide label suppression mechanism, labels drawn guide. shape cap specification providing one following: cap , cap_triangle().  naming cap function without 'cap_'-prefix, e.g. \"round\". two column  giving coordinates cap, like created cap functions cap_arch(). size  setting size cap. NULL (default), cap size proportional shape coordinates legend.key.size theme setting. show  control caps displayed ends bar. TRUE, caps always displayed. FALSE, caps never displayed. NA (default), caps displayed data range exceed limits. given , show[1] controls display lower end show[2] upper end. alpha  0 1 setting colour transparency bar. Use NA preserve alpha encoded colour . reverse  whether reverse continuous guides. TRUE, guides like colour bars flipped. FALSE (default), original order maintained. oob --bounds handling function affects cap colour. Can one following:  like oob_squish.  naming function without 'oob'-prefix, \"keep\". theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". vanilla  whether default style match vanilla guide_colourbar() (TRUE) take theme verbatim (FALSE). available_aes  vector listing aesthetics guide can build.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom colour steps guide — guide_colsteps","text":" object","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Custom colour steps guide — guide_colsteps","text":"steps rendered clipped rectangles, important use graphics device can render clipped paths. can checked using check_device(\"clippingPaths\").","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_colsteps.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom colour steps guide — guide_colsteps","text":"","code":"p <- ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = cty))  # The colour steps show caps when values are out-of-bounds p + scale_colour_viridis_b(   limits = c(10, NA),   guide = \"colsteps\" )   # It also shows how oob values are handled p + scale_colour_viridis_b(   limits = c(10, 30), oob = scales::oob_censor,   guide = \"colsteps\" )   # Adjusting the type of cap p + scale_colour_viridis_b(   limits = c(10, 30),   guide = guide_colsteps(shape = \"round\") )   # The default is to use the breaks as-is p + scale_colour_viridis_b(   limits = c(10, 30), breaks = c(10, 20, 25),   guide = \"colsteps\" )   # But the display can be set to use evenly spaced steps p + scale_colour_viridis_b(   limits = c(10, 30), breaks = c(10, 20, 25),   guide = guide_colsteps(key = key_bins(even.steps = TRUE)) )   # Using tick marks by swapping side guides p + scale_colour_viridis_b(   guide = guide_colsteps(     first_guide  = \"axis_base\",     second_guide = \"axis_base\"   ) )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":null,"dir":"Reference","previous_headings":"","what":"Custom legend guide — guide_legend_base","title":"Custom legend guide — guide_legend_base","text":"legend closely mirrors ggplot2::guide_legend(), two adjustments. First, guide_legend_base() supports design argument flexible layout. Secondly, legend.spacing.y theme element observed verbatim instead overruled.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Custom legend guide — guide_legend_base","text":"","code":"guide_legend_base(   key = NULL,   title = waiver(),   theme = NULL,   design = NULL,   nrow = NULL,   ncol = NULL,   reverse = FALSE,   override.aes = list(),   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Custom legend guide — guide_legend_base","text":"key standard key specification. Defaults key_auto(). See information linked topic. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. design Specification legend layout. One following: NULL (default) use layout algorithm guide_legend().  string representing cell layout wherein # defines empty cell. See examples.  representing cell layout wherein NA defines empty cell. See examples. Non-string atomic vectors treated .matrix(). nrow, ncol positive  setting desired dimensions legend layout. NULL (default), dimensions derived design argument fit match number keys. reverse  whether order keys inverted. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Custom legend guide — guide_legend_base","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_base.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Custom legend guide — guide_legend_base","text":"","code":"# A dummy plot p <- ggplot(data.frame(x = 1:3, type = c(\"tic\", \"tac\", \"toe\"))) +   aes(x, x, shape = type) +   geom_point(na.rm = TRUE) +   scale_shape_manual(values = c(1, 4, NA))  # A design string, each character giving a cell value. # Newlines separate rows, white space is ignored. design <- \"   123   213   321 \"  # Alternatively, the same can be specified using a matrix directly # design <- matrix(c(1, 2, 3, 2, 1, 3, 3, 2, 1), 3, 3, byrow = TRUE)  p + guides(shape = guide_legend_base(design = design))   # Empty cells can be created using `#` design <- \"   #2#   1#3 \"  # Alternatively: # design <- matrix(c(NA, 1, 2, NA, NA, 3), nrow = 2)  p + guides(shape = guide_legend_base(design = design))"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":null,"dir":"Reference","previous_headings":"","what":"Cross legend guide — guide_legend_cross","title":"Cross legend guide — guide_legend_cross","text":"legend type similar guide_legend() displays crosses, : interactions, two variables.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cross legend guide — guide_legend_cross","text":"","code":"guide_legend_cross(   key = NULL,   title = waiver(),   swap = FALSE,   col_text = element_text(angle = 90, vjust = 0.5),   override.aes = list(),   reverse = FALSE,   theme = NULL,   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cross legend guide — guide_legend_cross","text":"key One following key specifications: group split specification using legend display compound variable like paste(var1, var2). standard key specification, like key_auto(), crossing two separate variables across two scales. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. swap  TRUE exchanges column row variables displayed legend. col_text  object giving adjustments text column labels. Can NULL display column labels equal fashion row labels. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). reverse  whether order keys inverted, first value controls row order second value column order. Input  recycled. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cross legend guide — guide_legend_cross","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_cross.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cross legend guide — guide_legend_cross","text":"","code":"# Standard use for single aesthetic. The default is to split labels to # disentangle aesthetics that are already crossed (by e.g. `paste()`) ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv))) +   guides(colour = \"legend_cross\")   # If legends should be merged between identical aesthetics, both need the # same legend type. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv), shape = paste(year, drv))) +   guides(colour = \"legend_cross\", shape = \"legend_cross\")   # Crossing two aesthetics requires a shared title and `key = \"auto\"`. The # easy way to achieve this is to predefine a shared guide. my_guide <- guide_legend_cross(key = \"auto\", title = \"My title\")  ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = drv, shape = factor(year))) +   guides(colour = my_guide, shape  = my_guide)   # You can cross more than 2 aesthetics but not more than 2 unique aesthetics. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = drv, shape = factor(year), size = factor(drv))) +   scale_size_ordinal() +   guides(colour = my_guide, shape = my_guide, size = my_guide)   # You can merge an aesthetic that is already crossed with an aesthetic that # contributes to only one side of the cross. ggplot(mpg, aes(displ, hwy)) +   geom_point(aes(colour = paste(year, drv), shape  = drv)) +   guides(     colour = guide_legend_cross(title = \"My Title\"),     shape  = guide_legend_cross(title = \"My Title\", key = \"auto\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":null,"dir":"Reference","previous_headings":"","what":"Grouped legend — guide_legend_group","title":"Grouped legend — guide_legend_group","text":"legend resembles ggplot2::guide_legend(), ability keep groups blocks titles.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Grouped legend — guide_legend_group","text":"","code":"guide_legend_group(   key = \"group_split\",   title = waiver(),   override.aes = list(),   nrow = NULL,   ncol = NULL,   theme = NULL,   position = NULL,   direction = NULL,   order = 0 )"},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Grouped legend — guide_legend_group","text":"key group key specification. Defaults key_group_split() split labels find groups. title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. override.aes named  specifying aesthetic parameters key glyphs. See details examples guide_legend(). nrow, ncol positive  setting desired dimensions legend layout. Either nrow ncol can set, , theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\". direction  indicating direction guide. Can \"horizontal\" \"vertical\". order positive  specifies order guide among multiple guides. controls order guides merged multiple guides position. 0 (default), order determined hashing indicative settings guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Grouped legend — guide_legend_group","text":" object.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/guide_legend_group.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Grouped legend — guide_legend_group","text":"","code":"# Standard plot for selection of `msleep` df <- msleep[c(9, 28, 11, 5, 34, 54, 64, 24, 53), ]  p <- ggplot(df) +   aes(bodywt, awake, colour = paste(order, name)) +   geom_point()  # By default, groups are inferred from the name p + guides(colour = \"legend_group\")   # You can also use a look-up table for groups # The lookup table can be more expansive than just the data: # We're using the full 'msleep' data here instead of the subset lut <- key_group_lut(msleep$name, msleep$order)  p + aes(colour = name) +   guides(colour = guide_legend_group(key = lut))   # `nrow` and `ncol` apply within groups p + guides(colour = guide_legend_group(nrow = 1))   # Groups are arranged according to `direction` p + guides(colour = guide_legend_group(ncol = 1, direction = \"horizontal\")) +   theme(legend.title.position = \"top\")   # Customising the group titles p + guides(colour = \"legend_group\") +   theme(     legendry.legend.subtitle.position = \"left\",     legendry.legend.subtitle = element_text(       hjust = 1, vjust = 1, size = rel(0.9),       margin = margin(t = 5.5, r = 5.5)     )   )   # Changing the spacing between groups p + guides(colour = \"legend_group\") +   theme(legendry.group.spacing = unit(0, \"cm\"))"},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":null,"dir":"Reference","previous_headings":"","what":"Group keys — key_group","title":"Group keys — key_group","text":"functions helper functions working grouped data keys guides. share goal creating guide key, different methods. key_group_split() function factory whose functions make attempt infer groups scale's labels. key_group_lut() function factory whose functions use look table sort group membership.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Group keys — key_group","text":"","code":"key_group_split(sep = \"[^[:alnum:]]+\", reverse = FALSE)  key_group_lut(members, group, ungrouped = \"Other\")"},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Group keys — key_group","text":"sep  giving regular expression use splitting labels provided scale using strsplit() function. defaults, labels splitted non-alphanumeric character. reverse  FALSE (default) treats first part split string groups later parts members. TRUE, treats last part groups. members vector including scale's breaks values. group vector parallel members giving  group member. ungrouped  giving group label assign scale's breaks match values members argument.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Group keys — key_group","text":"function use key argument guide.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_group.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Group keys — key_group","text":"","code":"# Example scale values <- c(\"group A:value 1\", \"group A:value 2\", \"group B:value 1\") template <- scale_colour_hue(limits = values)  # Treat the 'group X' part as groups key <- key_group_split(sep = \":\") key(template) #>    colour          .value  .label  .group #> 1 #F8766D group A:value 1 value 1 group A #> 2 #00BA38 group A:value 2 value 2 group A #> 3 #619CFF group B:value 1 value 1 group B  # Treat the 'value X' part as groups key <- key_group_split(sep = \":\", reverse = TRUE) key(template) #>    colour          .value  .label  .group #> 1 #F8766D group A:value 1 group A value 1 #> 2 #619CFF group B:value 1 group B value 1 #> 3 #00BA38 group A:value 2 group A value 2  # Example scale template <- scale_colour_hue(limits = msleep$name[c(1, 7, 9, 23, 24)])  # A lookup table can have more entries than needed key <- key_group_lut(msleep$name, msleep$order) key(template) #>    colour            .value            .label         .group #> 1 #F8766D           Cheetah           Cheetah      Carnivora #> 2 #A3A500 Northern fur seal Northern fur seal      Carnivora #> 3 #00BF7D               Dog               Dog      Carnivora #> 4 #00B0F6             Horse             Horse Perissodactyla #> 5 #E76BF3            Donkey            Donkey Perissodactyla  # Or less entries than needed key <- key_group_lut(   msleep$name[23:24], msleep$order[23:24],   ungrouped = \"Other animals\" ) key(template) #>    colour            .value            .label         .group #> 1 #00B0F6             Horse             Horse Perissodactyla #> 2 #E76BF3            Donkey            Donkey Perissodactyla #> 3 #F8766D           Cheetah           Cheetah  Other animals #> 4 #A3A500 Northern fur seal Northern fur seal  Other animals #> 5 #00BF7D               Dog               Dog  Other animals"},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":null,"dir":"Reference","previous_headings":"","what":"Range keys — key_range","title":"Range keys — key_range","text":"functions helper functions working ranged data keys guides. share goal creating guide key, different methods: key_range_auto() function factory whose functions make attempt infer ranges scale's labels. key_range_manual() uses user-provided vectors set ranges. key_range_map() makes mappings  set ranges.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Range keys — key_range","text":"","code":"key_range_auto(sep = \"[^[:alnum:]]+\", reverse = FALSE, ...)  key_range_manual(start, end, name = NULL, level = NULL, ...)  key_range_map(data, ..., .call = caller_env())"},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Range keys — key_range","text":"sep  giving regular expression use splitting labels provided scale using strsplit(). Defaults splitting non-alphanumeric character. reverse  FALSE (default) treats first labels inner labels last labels outer labels. TRUE, thee first labels treated outer labels last labels treated inner labels. ...  set mappings similar provided aes(), evaluated data argument. key_range_map(), must contain start end mappings. Can contain additional parameters text styling, namely colour, family, face, size, hjust, vjust, angle lineheight. start, end vector can interpreted scale, giving start end positions range respectively. name  list expressions level  giving depth range avoid overlaps different ranges. level smaller 1, brackets drawn. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Range keys — key_range","text":"key_range_auto() function. key_range_manual() key_range_map()   class.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Range keys — key_range","text":"level variable optional missing, guides use algorithm similar IRanges::disjointBins() avoid overlaps. key_range_auto() work expression labels.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_range.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Range keys — key_range","text":"","code":"# Example scale template <- scale_x_discrete(limits = c(\"A 1\", \"B 1\", \"C&1\", \"D&2\", \"E&2\"))  # By default, splits on all non-alphanumeric characters auto <- key_range_auto() auto(template) #>   start end .label .level #> 1     1   1      A      0 #> 2     2   2      B      0 #> 3     3   3      C      0 #> 4     4   4      D      0 #> 5     5   5      E      0 #> 6     1   3      1      1 #> 7     4   5      2      1  # Only split on a specific character auto <- key_range_auto(sep = \"&\") auto(template) #> Warning: Not all labels in `key_range_auto()` can be split into equal lengths. #> ℹ Is \"&\" the correct `sep` argument? #>   start end .label .level #> 1     1   1    A 1      0 #> 2     2   2    B 1      0 #> 3     3   3      C      0 #> 4     4   4      D      0 #> 5     5   5      E      0 #> 6     3   3      1      1 #> 7     4   5      2      1  # Treating the letters as outer labels and numbers as inner labels auto <- key_range_auto(reverse = TRUE) auto(template) #>    start end .label .level #> 1      1   1      1      0 #> 2      2   2      1      0 #> 3      3   3      1      0 #> 4      4   4      2      0 #> 5      5   5      2      0 #> 6      1   1      A      1 #> 7      2   2      B      1 #> 8      3   3      C      1 #> 9      4   4      D      1 #> 10     5   5      E      1  # Providing custom values key_range_manual(   start = c(1, 5,  10),   end   = c(4, 15, 11),   level = c(0, 2, 1),   name  = c(\"A\", \"B\", \"C\") ) #>   start end .label .level #> 1     1   4      A      0 #> 2     5  15      B      2 #> 3    10  11      C      1  # Values from a  key_range_map(presidential, start = start, end = end, name = name) #>         start        end     .label #> 1  1953-01-20 1961-01-20 Eisenhower #> 2  1961-01-20 1963-11-22    Kennedy #> 3  1963-11-22 1969-01-20    Johnson #> 4  1969-01-20 1974-08-09      Nixon #> 5  1974-08-09 1977-01-20       Ford #> 6  1977-01-20 1981-01-20     Carter #> 7  1981-01-20 1989-01-20     Reagan #> 8  1989-01-20 1993-01-20       Bush #> 9  1993-01-20 2001-01-20    Clinton #> 10 2001-01-20 2009-01-20       Bush #> 11 2009-01-20 2017-01-20      Obama #> 12 2017-01-20 2021-01-20      Trump"},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":null,"dir":"Reference","previous_headings":"","what":"Segment keys — key_segments","title":"Segment keys — key_segments","text":"functions helper functions working segment data keys guides. share goal creating guide key, different methods: key_segment_manual() directly uses user-provided vectors set segments. key_segment_map() makes mappings  set segments. key_dendro() specialty case coercing dendrogram data segments. aware setting key alone affect scale limits, give misleading results used incorrectly!","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Segment keys — key_segments","text":"","code":"key_segment_manual(value, oppo, value_end = value, oppo_end = oppo, ...)  key_segment_map(data, ..., .call = caller_env())  key_dendro(dendro = NULL, type = \"rectangle\")"},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Segment keys — key_segments","text":"value, value_end vector interpreted along scale guide codifies. oppo, oppo_end vector interpreted orthogonal value value_end variables. ...  set mappings similar provided aes(), evaluated data argument. key_segments_map(), must contain value oppo mappings. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages. dendro data structure can coerced dendrogram .dendrogram() function. NULL (default) attempt made search data scale. type string, either \"rectangle\" \"triangle\", indicating shape edges nodes dendrogram.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Segment keys — key_segments","text":"key_segments_manual() key_segments_map(),   class.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_segments.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Segment keys — key_segments","text":"","code":"# Giving vectors directly key_segment_manual(   value = 0:1, value_end = 2:3,   oppo  = 1:0, oppo_end  = 3:2 ) #>   value oppo value_end oppo_end #> 1     0    1         2        3 #> 2     1    0         3        2  # Taking columns of a data frame data <- data.frame(x = 0:1, y = 1:0, xend = 2:3, yend = 3:2) key_segment_map(data, value = x, oppo = y, value_end = xend, oppo_end = yend) #>   value oppo value_end oppo_end #> 1     0    1         2        3 #> 2     1    0         3        2  # Using dendrogram data clust <- hclust(dist(USArrests), \"ave\") key_dendro(clust)(scale_x_discrete()) #>         value       oppo value_end   oppo_end #> 1   17.994141 152.313999  4.765625 152.313999 #> 2    4.765625 152.313999  4.765625  77.605024 #> 3   17.994141 152.313999 31.222656 152.313999 #> 4   31.222656 152.313999 31.222656  89.232093 #> 5    4.765625  77.605024  1.500000  77.605024 #> 6    1.500000  77.605024  1.500000  38.527912 #> 7    4.765625  77.605024  8.031250  77.605024 #> 8    8.031250  77.605024  8.031250  44.283922 #> 9    1.500000  38.527912  1.000000  38.527912 #> 10   1.000000  38.527912  1.000000   0.000000 #> 11   1.500000  38.527912  2.000000  38.527912 #> 12   2.000000  38.527912  2.000000   0.000000 #> 13   8.031250  44.283922  3.875000  44.283922 #> 14   3.875000  44.283922  3.875000  28.012211 #> 15   8.031250  44.283922 12.187500  44.283922 #> 16  12.187500  44.283922 12.187500  39.394633 #> 17   3.875000  28.012211  3.000000  28.012211 #> 18   3.000000  28.012211  3.000000   0.000000 #> 19   3.875000  28.012211  4.750000  28.012211 #> 20   4.750000  28.012211  4.750000  15.453120 #> 21   4.750000  15.453120  4.000000  15.453120 #> 22   4.000000  15.453120  4.000000   0.000000 #> 23   4.750000  15.453120  5.500000  15.453120 #> 24   5.500000  15.453120  5.500000  13.896043 #> 25   5.500000  13.896043  5.000000  13.896043 #> 26   5.000000  13.896043  5.000000   0.000000 #> 27   5.500000  13.896043  6.000000  13.896043 #> 28   6.000000  13.896043  6.000000   0.000000 #> 29  12.187500  39.394633  9.625000  39.394633 #> 30   9.625000  39.394633  9.625000  26.363428 #> 31  12.187500  39.394633 14.750000  39.394633 #> 32  14.750000  39.394633 14.750000  28.095803 #> 33   9.625000  26.363428  7.750000  26.363428 #> 34   7.750000  26.363428  7.750000  16.891499 #> 35   9.625000  26.363428 11.500000  26.363428 #> 36  11.500000  26.363428 11.500000  18.417331 #> 37   7.750000  16.891499  7.000000  16.891499 #> 38   7.000000  16.891499  7.000000   0.000000 #> 39   7.750000  16.891499  8.500000  16.891499 #> 40   8.500000  16.891499  8.500000  15.454449 #> 41   8.500000  15.454449  8.000000  15.454449 #> 42   8.000000  15.454449  8.000000   0.000000 #> 43   8.500000  15.454449  9.000000  15.454449 #> 44   9.000000  15.454449  9.000000   0.000000 #> 45  11.500000  18.417331 10.500000  18.417331 #> 46  10.500000  18.417331 10.500000   6.236986 #> 47  11.500000  18.417331 12.500000  18.417331 #> 48  12.500000  18.417331 12.500000  13.297368 #> 49  10.500000   6.236986 10.000000   6.236986 #> 50  10.000000   6.236986 10.000000   0.000000 #> 51  10.500000   6.236986 11.000000   6.236986 #> 52  11.000000   6.236986 11.000000   0.000000 #> 53  12.500000  13.297368 12.000000  13.297368 #> 54  12.000000  13.297368 12.000000   0.000000 #> 55  12.500000  13.297368 13.000000  13.297368 #> 56  13.000000  13.297368 13.000000   0.000000 #> 57  14.750000  28.095803 14.000000  28.095803 #> 58  14.000000  28.095803 14.000000   0.000000 #> 59  14.750000  28.095803 15.500000  28.095803 #> 60  15.500000  28.095803 15.500000  21.167192 #> 61  15.500000  21.167192 15.000000  21.167192 #> 62  15.000000  21.167192 15.000000   0.000000 #> 63  15.500000  21.167192 16.000000  21.167192 #> 64  16.000000  21.167192 16.000000   0.000000 #> 65  31.222656  89.232093 23.796875  89.232093 #> 66  23.796875  89.232093 23.796875  44.837933 #> 67  31.222656  89.232093 38.648438  89.232093 #> 68  38.648438  89.232093 38.648438  54.746831 #> 69  23.796875  44.837933 20.343750  44.837933 #> 70  20.343750  44.837933 20.343750  26.713777 #> 71  23.796875  44.837933 27.250000  44.837933 #> 72  27.250000  44.837933 27.250000  29.054195 #> 73  20.343750  26.713777 17.937500  26.713777 #> 74  17.937500  26.713777 17.937500  16.425489 #> 75  20.343750  26.713777 22.750000  26.713777 #> 76  22.750000  26.713777 22.750000  22.595978 #> 77  17.937500  16.425489 17.000000  16.425489 #> 78  17.000000  16.425489 17.000000   0.000000 #> 79  17.937500  16.425489 18.875000  16.425489 #> 80  18.875000  16.425489 18.875000  12.878100 #> 81  18.875000  12.878100 18.000000  12.878100 #> 82  18.000000  12.878100 18.000000   0.000000 #> 83  18.875000  12.878100 19.750000  12.878100 #> 84  19.750000  12.878100 19.750000  10.736739 #> 85  19.750000  10.736739 19.000000  10.736739 #> 86  19.000000  10.736739 19.000000   0.000000 #> 87  19.750000  10.736739 20.500000  10.736739 #> 88  20.500000  10.736739 20.500000   7.355270 #> 89  20.500000   7.355270 20.000000   7.355270 #> 90  20.000000   7.355270 20.000000   0.000000 #> 91  20.500000   7.355270 21.000000   7.355270 #> 92  21.000000   7.355270 21.000000   0.000000 #> 93  22.750000  22.595978 22.000000  22.595978 #> 94  22.000000  22.595978 22.000000   0.000000 #> 95  22.750000  22.595978 23.500000  22.595978 #> 96  23.500000  22.595978 23.500000  11.456439 #> 97  23.500000  11.456439 23.000000  11.456439 #> 98  23.000000  11.456439 23.000000   0.000000 #> 99  23.500000  11.456439 24.000000  11.456439 #> 100 24.000000  11.456439 24.000000   0.000000 #> 101 27.250000  29.054195 25.750000  29.054195 #> 102 25.750000  29.054195 25.750000  20.198479 #> 103 27.250000  29.054195 28.750000  29.054195 #> 104 28.750000  29.054195 28.750000  23.972143 #> 105 25.750000  20.198479 25.000000  20.198479 #> 106 25.000000  20.198479 25.000000   0.000000 #> 107 25.750000  20.198479 26.500000  20.198479 #> 108 26.500000  20.198479 26.500000  12.614278 #> 109 26.500000  12.614278 26.000000  12.614278 #> 110 26.000000  12.614278 26.000000   0.000000 #> 111 26.500000  12.614278 27.000000  12.614278 #> 112 27.000000  12.614278 27.000000   0.000000 #> 113 28.750000  23.972143 28.000000  23.972143 #> 114 28.000000  23.972143 28.000000   0.000000 #> 115 28.750000  23.972143 29.500000  23.972143 #> 116 29.500000  23.972143 29.500000  14.501034 #> 117 29.500000  14.501034 29.000000  14.501034 #> 118 29.000000  14.501034 29.000000   0.000000 #> 119 29.500000  14.501034 30.000000  14.501034 #> 120 30.000000  14.501034 30.000000   0.000000 #> 121 38.648438  54.746831 34.437500  54.746831 #> 122 34.437500  54.746831 34.437500  20.598507 #> 123 38.648438  54.746831 42.859375  54.746831 #> 124 42.859375  54.746831 42.859375  41.094765 #> 125 34.437500  20.598507 31.875000  20.598507 #> 126 31.875000  20.598507 31.875000  15.026107 #> 127 34.437500  20.598507 37.000000  20.598507 #> 128 37.000000  20.598507 37.000000  15.122897 #> 129 31.875000  15.026107 31.000000  15.026107 #> 130 31.000000  15.026107 31.000000   0.000000 #> 131 31.875000  15.026107 32.750000  15.026107 #> 132 32.750000  15.026107 32.750000  12.438692 #> 133 32.750000  12.438692 32.000000  12.438692 #> 134 32.000000  12.438692 32.000000   0.000000 #> 135 32.750000  12.438692 33.500000  12.438692 #> 136 33.500000  12.438692 33.500000   3.834058 #> 137 33.500000   3.834058 33.000000   3.834058 #> 138 33.000000   3.834058 33.000000   0.000000 #> 139 33.500000   3.834058 34.000000   3.834058 #> 140 34.000000   3.834058 34.000000   0.000000 #> 141 37.000000  15.122897 35.500000  15.122897 #> 142 35.500000  15.122897 35.500000   6.637771 #> 143 37.000000  15.122897 38.500000  15.122897 #> 144 38.500000  15.122897 38.500000  13.352260 #> 145 35.500000   6.637771 35.000000   6.637771 #> 146 35.000000   6.637771 35.000000   0.000000 #> 147 35.500000   6.637771 36.000000   6.637771 #> 148 36.000000   6.637771 36.000000   0.000000 #> 149 38.500000  13.352260 37.500000  13.352260 #> 150 37.500000  13.352260 37.500000   3.929377 #> 151 38.500000  13.352260 39.500000  13.352260 #> 152 39.500000  13.352260 39.500000   8.027453 #> 153 37.500000   3.929377 37.000000   3.929377 #> 154 37.000000   3.929377 37.000000   0.000000 #> 155 37.500000   3.929377 38.000000   3.929377 #> 156 38.000000   3.929377 38.000000   0.000000 #> 157 39.500000   8.027453 39.000000   8.027453 #> 158 39.000000   8.027453 39.000000   0.000000 #> 159 39.500000   8.027453 40.000000   8.027453 #> 160 40.000000   8.027453 40.000000   0.000000 #> 161 42.859375  41.094765 41.000000  41.094765 #> 162 41.000000  41.094765 41.000000   0.000000 #> 163 42.859375  41.094765 44.718750  41.094765 #> 164 44.718750  41.094765 44.718750  33.117815 #> 165 44.718750  33.117815 42.750000  33.117815 #> 166 42.750000  33.117815 42.750000  10.771175 #> 167 44.718750  33.117815 46.687500  33.117815 #> 168 46.687500  33.117815 46.687500  27.779904 #> 169 42.750000  10.771175 42.000000  10.771175 #> 170 42.000000  10.771175 42.000000   0.000000 #> 171 42.750000  10.771175 43.500000  10.771175 #> 172 43.500000  10.771175 43.500000   8.537564 #> 173 43.500000   8.537564 43.000000   8.537564 #> 174 43.000000   8.537564 43.000000   0.000000 #> 175 43.500000   8.537564 44.000000   8.537564 #> 176 44.000000   8.537564 44.000000   0.000000 #> 177 46.687500  27.779904 45.500000  27.779904 #> 178 45.500000  27.779904 45.500000  13.044922 #> 179 46.687500  27.779904 47.875000  27.779904 #> 180 47.875000  27.779904 47.875000  18.993398 #> 181 45.500000  13.044922 45.000000  13.044922 #> 182 45.000000  13.044922 45.000000   0.000000 #> 183 45.500000  13.044922 46.000000  13.044922 #> 184 46.000000  13.044922 46.000000   0.000000 #> 185 47.875000  18.993398 47.000000  18.993398 #> 186 47.000000  18.993398 47.000000   0.000000 #> 187 47.875000  18.993398 48.750000  18.993398 #> 188 48.750000  18.993398 48.750000  10.184218 #> 189 48.750000  10.184218 48.000000  10.184218 #> 190 48.000000  10.184218 48.000000   0.000000 #> 191 48.750000  10.184218 49.500000  10.184218 #> 192 49.500000  10.184218 49.500000   2.291288 #> 193 49.500000   2.291288 49.000000   2.291288 #> 194 49.000000   2.291288 49.000000   0.000000 #> 195 49.500000   2.291288 50.000000   2.291288 #> 196 50.000000   2.291288 50.000000   0.000000"},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":null,"dir":"Reference","previous_headings":"","what":"Speciality keys — key_specialty","title":"Speciality keys — key_specialty","text":"functions helper functions working keys guides. functions described widely applicable may apply small subset guides. , fine adjust arguments speciality key, swapping types ill-advised. key_sequence() function factory whose functions create regularly spaced sequence limits scale. used colour bar guides. key_bins() function factory whose function create binned key given breaks scale. used colour steps guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Speciality keys — key_specialty","text":"","code":"key_sequence(n = 15)  key_bins(even.steps = FALSE, show.limits = NULL)"},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Speciality keys — key_specialty","text":"n positive  giving number colours use gradient. even.steps  indicating whether size bins displayed equal (TRUE) proportional length data space (FALSE). show.limits  stating whether limits scale shown labels ticks (TRUE) remain hidden (FALSE). Note breaks coinciding limits shown regardless setting. default, NULL, consults scale's show.limits setting defaults FALSE.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Speciality keys — key_specialty","text":"key_sequence() function.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_specialty.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Speciality keys — key_specialty","text":"","code":"# An example scale template <- scale_fill_viridis_c(limits = c(0, 10), breaks = c(2, 4, 6, 8))  # Retrieving colourbar and colourstep keys key_sequence()(template) #>       fill     .value #> 1  #440154  0.0000000 #> 2  #461F66  0.7142857 #> 3  #453478  1.4285714 #> 4  #414888  2.1428571 #> 5  #3C5B8A  2.8571429 #> 6  #336D8D  3.5714286 #> 7  #2B7F8D  4.2857143 #> 8  #2B9089  5.0000000 #> 9  #26A186  5.7142857 #> 10 #40B17B  6.4285714 #> 11 #5FBF69  7.1428571 #> 12 #76CE56  7.8571429 #> 13 #A4D848  8.5714286 #> 14 #D2E039  9.2857143 #> 15 #FDE725 10.0000000 key_bins()(template) #>      fill min max .label .value #> 1 #46286D   0   2        NA #> 2 #3B5E8B   2   4      2      2 #> 3 #2B9089   4   6      4      4 #> 4 #5ABC6D   6   8      6      6 #> 5 #C0DD40   8  10      8      8 #> 6      NA  NA        NA"},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":null,"dir":"Reference","previous_headings":"","what":"Standard keys — key_standard","title":"Standard keys — key_standard","text":"functions helper functions working tick marks keys guides. share goal creating guide key, different outcomes: key_auto() function factory whose functions extract typical key major breaks scale. key_manual() uses user-provided vectors make key. key_map() makes mappings  make key. key_minor() function factory whose functions also extract minor break positions minor tick marks. key_log() function factory whose functions place ticks intervals log10 space. key_none() makes empty key entries.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Standard keys — key_standard","text":"","code":"key_auto(...)  key_manual(   aesthetic,   value = aesthetic,   label = as.character(value),   type = NULL,   ... )  key_map(data, ..., .call = caller_env())  key_minor(...)  key_log(   prescale_base = NULL,   negative_small = 0.1,   expanded = TRUE,   labeller = NULL,   ... )  key_none()"},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Standard keys — key_standard","text":"...  set mappings similar provided aes(), evaluated data argument. must contain aesthetic mapping. aesthetic, value vector values guide represent equivalent breaks argument scales. aesthetic mapped, whereas value . intents purposes, aesthetic value identical. label  list expressions use labels. type  vector representing one break types: \"major\", \"minor\" \"mini\". NULL (default), breaks treated major breaks. data  similar object coerced fortify() , mapping argument evaluated. .call call display messages. prescale_base  giving base logarithm transform data manually. default, NULL, use scale transformation calculate positions. advisable set prescale_base argument data already log-transformed. using log-transform scale coord_trans(), default NULL recommended. negative_small  setting smallest absolute value marked tick case scale limits include 0 negative numbers. expanded  determining whether ticks cover entire range scale expansion (TRUE, default), restricted scale limits (FALSE). labeller  receives major breaks returns formatted labels. key_log(), NULL default scales::label_log() strictly positive numbers custom labeller negative numbers included.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Standard keys — key_standard","text":"key_auto(), key_minor() key_log() function. key_manual() key_map()   class.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/key_standard.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Standard keys — key_standard","text":"","code":"# An example scale template <- scale_x_continuous(limits = c(0, 10))  # The auto, minor and log keys operate on scales key_auto()(template) #>      x .value .label #> 1  0.0    0.0    0.0 #> 2  2.5    2.5    2.5 #> 3  5.0    5.0    5.0 #> 4  7.5    7.5    7.5 #> 5 10.0   10.0   10.0 key_minor()(template) #>       x .value .label .type #> 1  0.00   0.00    0.0 major #> 2  2.50   2.50    2.5 major #> 3  5.00   5.00    5.0 major #> 4  7.50   7.50    7.5 major #> 5 10.00  10.00   10.0 major #> 6  1.25   1.25    minor #> 7  3.75   3.75    minor #> 8  6.25   6.25    minor #> 9  8.75   8.75    minor  # So does the log key template <- scale_x_continuous(transform = \"log10\", limits = c(0.1, 10)) key_log()(template)  # Providing custom values key_manual(   aesthetic = 1:5,   label = c(\"one\", \"two\", \"three\", \"four\", \"five\") ) #>   aesthetic .value .label #> 1         1      1    one #> 2         2      2    two #> 3         3      3  three #> 4         4      4   four #> 5         5      5   five  # Values from a `` key_map(ToothGrowth, aesthetic = unique(supp)) #>   aesthetic .value .label #> 1        VC     VC     VC #> 2        OJ     OJ     OJ  # Empty key key_none() #> [1] aesthetic .value    .label    #> <0 rows> (or 0-length row.names)"},{"path":"https://teunbrand.github.io/legendry/reference/legendry-package.html","id":null,"dir":"Reference","previous_headings":"","what":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","title":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","text":"'ggplot2' extension focusses expanding plotter's arsenal guides. Guides 'ggplot2' include axes legends. 'legendry' offers new axes annotation options, well new legends colour displays.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/legendry-package.html","id":"author","dir":"Reference","previous_headings":"","what":"Author","title":"legendry: Extended Legends and Axes for 'ggplot2' — legendry-package","text":"Maintainer: Teun van den Brand tahvdbrand@gmail.com (ORCID) [copyright holder]","code":""},{"path":"https://teunbrand.github.io/legendry/reference/legendry_extensions.html","id":null,"dir":"Reference","previous_headings":"","what":"ggproto objects in legendry — Compose","title":"ggproto objects in legendry — Compose","text":"legendry package relies extension system ggplot2 ggproto class objects, allow cross-package inheritance objects geoms, stats, facets, scales coordinate systems. purpose making plots, users invited wholly ignore objects, since interacting objects preferred various constructor functions. legendry package introduces new  ggproto class support variations axes, legends colourbars.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives: boxes — primitive_box","title":"Guide primitives: boxes — primitive_box","text":"function constructs boxes guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitives: boxes — primitive_box","text":"","code":"primitive_box(   key = \"range_auto\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.4,   min_size = NULL,   levels_box = NULL,   levels_text = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitives: boxes — primitive_box","text":"key range key specification. See information linked topic. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. min_size [][grid::unit] setting minimal size box. levels_box list  objects customise boxes appear every level. levels_text list  objects customise text appears every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitives: boxes — primitive_box","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitives: boxes — primitive_box","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.box  boxes draw.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitives: boxes — primitive_box","text":"axis.text.{x/y}.{position}  text inside boxes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitives: boxes — primitive_box","text":"legend.text  text inside boxes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_box.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitives: boxes — primitive_box","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +  geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_box(),   y.sec = primitive_box(key = key) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: brackets — primitive_bracket","title":"Guide primitive: brackets — primitive_bracket","text":"function constructs brackets guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: brackets — primitive_bracket","text":"","code":"primitive_bracket(   key = \"range_auto\",   bracket = \"line\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.4,   levels_brackets = NULL,   levels_text = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: brackets — primitive_bracket","text":"key range key specification. See information linked topic. bracket bracket providing one following: bracket , bracket_square.  naming bracket function without 'bracket_'-prefix, e.g. \"square\". two-column  giving line coordinates bracket, like created bracket functions, bracket_round(). angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_brackets list  objects customise brackets appear every level. levels_text list  objects customise text appears every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: brackets — primitive_bracket","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: brackets — primitive_bracket","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.bracket  line used draw brackets. legendry.backet.size  setting space afforded bracket.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: brackets — primitive_bracket","text":"axis.text.{x/y}.{position}  text displayed brackets.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: brackets — primitive_bracket","text":"legend.text  text displayed brackets.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_bracket.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: brackets — primitive_bracket","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +  geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_bracket(),   y.sec = primitive_bracket(key = key) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: fence — primitive_fence","title":"Guide primitive: fence — primitive_fence","text":"function constructs fence guide primitive. customisation options easier understand view fence 'post' vertical pieces real world fence, 'rail' horizontal pieces.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: fence — primitive_fence","text":"","code":"primitive_fence(   key = \"range_auto\",   rail = \"none\",   angle = waiver(),   oob = \"squish\",   drop_zero = TRUE,   pad_discrete = 0.5,   levels_text = NULL,   levels_post = NULL,   levels_rail = NULL,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: fence — primitive_fence","text":"key range key specification. See information linked topic. rail  giving option display fence railing. Can either \"none\" (default) display railings, \"inner\" draw one rail closer plot panel, \"outer\" display one rail farther plot panel, \"\" sandwich labels rails. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. oob method dealing --bounds (oob) ranges. Can one \"squish\", \"censor\" \"none\". drop_zero  whether drop near-zero width ranges (TRUE, default) preserve (FALSE). pad_discrete  giving amount ranges extended given discrete variable. applied drop_zero setting. levels_text list  objects customise text appears every level. levels_post, levels_rail list  objects customise fence posts rails displayed every level. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: fence — primitive_fence","text":" primitive guie can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: fence — primitive_fence","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following: legendry.fence.post  line used draw pieces orthogonal direction scale. legendry.fence.rail  line used draw pieces parallel direction scale.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: fence — primitive_fence","text":"axis.text.{x/y}.{position}  text displayed.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: fence — primitive_fence","text":"legend.text  text displayed.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_fence.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: fence — primitive_fence","text":"","code":"# A standard plot p <- ggplot(mpg, aes(interaction(drv, year), displ)) +   geom_point()  key <- key_range_manual(c(2, 4), c(5, 6), c(\"A\", \"B\"))  # Adding as secondary guides p + guides(   x.sec = primitive_fence(rail = \"inner\"),   y.sec = primitive_fence(key = key, rail = \"outer\") )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: labels — primitive_labels","title":"Guide primitive: labels — primitive_labels","text":"function constructs labels guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: labels — primitive_labels","text":"","code":"primitive_labels(   key = NULL,   angle = waiver(),   n.dodge = 1,   check.overlap = FALSE,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: labels — primitive_labels","text":"key standard key specification. See information linked topic. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. n.dodge positive  setting number layers text labels can occupy avoid overlapping labels. check.overlap  indicating whether check omit overlapping text. TRUE, first, last middle labels recursively prioritised order. FALSE, labels drawn. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: labels — primitive_labels","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: labels — primitive_labels","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: labels — primitive_labels","text":"axis.text.{x/y}.{position}  display labels.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"as-a-legend-guide-","dir":"Reference","previous_headings":"","what":"As a legend guide.","title":"Guide primitive: labels — primitive_labels","text":"legend.text  display labels.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_labels.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: labels — primitive_labels","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +  geom_point()  # Adding as secondary guides p + guides(   x.sec = primitive_labels(),   y.sec = primitive_labels(n.dodge = 2) )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: line — primitive_line","title":"Guide primitive: line — primitive_line","text":"function constructs line guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: line — primitive_line","text":"","code":"primitive_line(key = NULL, cap = \"none\", theme = NULL, position = waiver())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: line — primitive_line","text":"key standard key specification. See information linked topic. cap method cap axes. One following:  one following: \"none\" perform capping. \"\" cap line ends extreme breaks. \"upper\" cap line upper extreme break. \"lower\" cap line lower extreme break. [1], TRUE equivalent \"\" FALSE equivalent \"none\" options . sorted [2n] even number members. lines drawn every odd-even pair.  takes scale's breaks first argument, scale's limits second argument returns [2n] described . theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: line — primitive_line","text":"PrimitiveLine primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: line — primitive_line","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: line — primitive_line","text":"axis.line.{x/y}.{position}  line style.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: line — primitive_line","text":"legend.axis.line  line style.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_line.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: line — primitive_line","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point() +   theme(axis.line = element_line())  # Adding as secondary guides p + guides(   x.sec = primitive_line(),   y.sec = primitive_line(cap = \"both\") )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitives: segments — primitive_segments","title":"Guide primitives: segments — primitive_segments","text":"function constructs guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitives: segments — primitive_segments","text":"","code":"primitive_segments(   key = NULL,   space = rel(10),   vanish = FALSE,   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitives: segments — primitive_segments","text":"key segment key specification. See information linked topic. Alternatively, object class  automatically invokes key_dendro(). space Either   object length 1 determining space allocated orthogonal direction. space argument class  (default) base size taken tick length theme setting. vanish relevant guide used secondary theta position:  whether continue draw segments meed center (TRUE) strictly observe space setting (FALSE). theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitives: segments — primitive_segments","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitives: segments — primitive_segments","text":"theme options determine style guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitives: segments — primitive_segments","text":"axis.ticks.{x/y}.{position}  display segments. axis.ticks.length.{x/y}.{position}  base size segments orthogonal direction.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitives: segments — primitive_segments","text":"legend.ticks  display segments. legend.ticks.length  base size segments orthogonal direction.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_segments.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitives: segments — primitive_segments","text":"","code":"# Building a key key <- key_segment_manual(   value     = c(1.6, 1.6, 3.4, 5.2),   value_end = c(7.0, 7.0, 3.4, 5.2),   oppo      = c(1.0, 2.0, 0.0, 0.0),   oppo_end  = c(1.0, 2.0, 3.0, 3.0) )  # Using the primitive in a plot ggplot(mpg, aes(displ, hwy)) +   geom_point() +   scale_x_continuous(     guide = primitive_segments(key = key)   )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: spacer — primitive_spacer","title":"Guide primitive: spacer — primitive_spacer","text":"function constructs spacer guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: spacer — primitive_spacer","text":"","code":"primitive_spacer(   space = NULL,   title = waiver(),   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: spacer — primitive_spacer","text":"space [][grid::unit()] title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: spacer — primitive_spacer","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: spacer — primitive_spacer","text":"#' theme options determine styling guide. guide option dependent role axis legend. legendry.guide.spacing  setting amount spacing space argument NULL.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_spacer.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: spacer — primitive_spacer","text":"","code":"ggplot(mpg, aes(displ, hwy)) +   geom_point() +   guides(     x = guide_axis_stack(\"axis\", primitive_spacer(unit(1, \"cm\")), \"axis\")   )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: line — primitive_ticks","title":"Guide primitive: line — primitive_ticks","text":"function constructs ticks guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: line — primitive_ticks","text":"","code":"primitive_ticks(key = NULL, bidi = FALSE, theme = NULL, position = waiver())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: line — primitive_ticks","text":"key standard key specification. See information linked topic. bidi : whether ticks drawn bidirectionally (TRUE) single direction (FALSE, default). theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: line — primitive_ticks","text":"PrimitiveTicks primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: line — primitive_ticks","text":"theme options determine styling guide, may differ depending whether guide used axis legend context. Common types following:","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: line — primitive_ticks","text":"axis.ticks.{x/y}.{position}  major tick lines. axis.minor.ticks.{x/y}.{position}  minor tick lines. legendry.axis.mini.ticks  internally inheriting minor ticks smallest ticks e.g. log axes. axis.ticks.length.{x/y}.{position}  major ticks length. axis.minor.ticks.length.{x/y}.{position}  minor ticks length. legendry.axis.mini.ticks.length  internally inheriting minor tick length smallest ticks e.g. log axes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: line — primitive_ticks","text":"legend.ticks  major tick lines. legendry.legend.minor.ticks  minor tick lines. legendry.legend.mini.ticks  smallest ticks e.g. log axes. legend.ticks.length  major ticks length. legendry.legend.minor.ticks.length  minor ticks length. legendry.legend.mini.ticks.length  smallest ticks e.g. log axes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_ticks.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: line — primitive_ticks","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +   geom_point()  # Adding as secondary guides p + guides(x.sec = primitive_ticks(), y.sec = primitive_ticks())"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":null,"dir":"Reference","previous_headings":"","what":"Guide primitive: title — primitive_title","title":"Guide primitive: title — primitive_title","text":"function constructs title guide primitive.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Guide primitive: title — primitive_title","text":"","code":"primitive_title(   title = waiver(),   angle = waiver(),   theme = NULL,   position = waiver() )"},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Guide primitive: title — primitive_title","text":"title   indicating title guide. NULL, title shown. default, waiver(), takes name scale object name specified labs() title. angle specification text angle. Compared setting angle argument element_text(), argument uses heuristics automatically pick hjust vjust probably want. Can one following: NULL take angles justification settings directly theme. waiver() allow reasonable defaults special cases.  -360 360 text angle degrees. theme  object style guide individually differently plot's theme settings. theme argument guide overrides combined plot's theme. position  giving location guide. Can one \"top\", \"bottom\", \"left\" \"right\".","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Guide primitive: title — primitive_title","text":" primitive guide can used inside guides.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"styling-options","dir":"Reference","previous_headings":"","what":"Styling options","title":"Guide primitive: title — primitive_title","text":"theme options determine styling guide, may differ depending whether guide used axis legend context.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"as-an-axis-guide","dir":"Reference","previous_headings":"","what":"As an axis guide","title":"Guide primitive: title — primitive_title","text":"axis.title.{x/y}.{position}  title display.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"as-a-legend-guide","dir":"Reference","previous_headings":"","what":"As a legend guide","title":"Guide primitive: title — primitive_title","text":"legend.title  title display.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/primitive_title.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Guide primitive: title — primitive_title","text":"","code":"# A standard plot p <- ggplot(mpg, aes(displ, hwy)) +  geom_point()  # Adding as secondary guides p + guides(   x.sec = primitive_title(\"Horizontal Title\"),   y.sec = primitive_title(c(\"along vertical\", \"Multiple tiles\")) )"},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":null,"dir":"Reference","previous_headings":"","what":"Dendrogram scales — scale_x_dendro","title":"Dendrogram scales — scale_x_dendro","text":"speciality scales use hierarchically clustered data. scale automatically orders limits according clustering result comes dendrogram axis.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Dendrogram scales — scale_x_dendro","text":"","code":"scale_x_dendro(   clust,   ...,   expand = waiver(),   guide = \"axis_dendro\",   position = \"bottom\" )  scale_y_dendro(   clust,   ...,   expand = waiver(),   guide = \"axis_dendro\",   position = \"left\" )"},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Dendrogram scales — scale_x_dendro","text":"clust data structure can coerced  object .hclust(). ... Arguments passed ggplot2::discrete_scale aesthetics names aesthetics scale works . palette palette function called single integer argument (number levels scale) returns values take (e.g., scales::pal_hue()). name name scale. Used axis legend title. waiver(), default, name scale taken first mapping used aesthetic. NULL, legend title omitted. breaks One : NULL breaks waiver() default breaks (scale limits) character vector breaks function takes limits input returns breaks output. Also accepts rlang lambda function notation. labels One : NULL labels waiver() default labels computed transformation object character vector giving labels (must length breaks) expression vector (must length breaks). See ?plotmath details. function takes breaks input returns labels output. Also accepts rlang lambda function notation. na.translate Unlike continuous scales, discrete scales can easily show missing values, default. want remove missing values discrete scale, specify na.translate = FALSE. na.value na.translate = TRUE, aesthetic value missing values displayed ? apply position scales NA always placed far right. drop unused factor levels omitted scale? default, TRUE, uses levels appear data; FALSE includes levels factor. Please note display every level legend, layer use show.legend = TRUE. call call used construct scale reporting messages. super super class use constructed scale expand position scales, vector range expansion constants used add padding around data ensure placed distance away axes. Use convenience function expansion() generate values expand argument. defaults expand scale 5% side continuous variables, 0.6 units side discrete variables. guide function used create guide name. See guides() information. position position scales, position axis. left right y axes, top bottom x axes.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Dendrogram scales — scale_x_dendro","text":" object can added plot.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Dendrogram scales — scale_x_dendro","text":"scale limits determined order labels clust argument. limits argument scales, breaks argument can still used selectively omit breaks labels can used formatting purposes.","code":""},{"path":[]},{"path":"https://teunbrand.github.io/legendry/reference/scale_x_dendro.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Dendrogram scales — scale_x_dendro","text":"","code":"# Hierarchically cluster data, separately for rows and columns car_clust <- hclust(dist(scale(mtcars)), \"ave\") var_clust <- hclust(dist(scale(t(mtcars))), \"ave\")  long_mtcars <- data.frame(   car = rownames(mtcars)[row(mtcars)],   var = colnames(mtcars)[col(mtcars)],   value = as.vector(scale(mtcars)) )  # A standard heatmap adorned with dendrograms p <- ggplot(long_mtcars, aes(var, car, fill = value)) +   geom_tile() +   scale_x_dendro(var_clust) +   scale_y_dendro(car_clust) p   # Styling the dendrograms p +   guides(     y = guide_axis_dendro(key_dendro(type = \"triangle\")),     x = guide_axis_dendro(space = rel(5))   ) +   theme(     axis.text.y.left = element_text(margin = margin(r = 3, l = 3)),     axis.ticks.y = element_line(\"red\"),     axis.ticks.x = element_line(linetype = \"dotted\")   )   # In polar coordinates, plus some formatting p +   coord_radial(     theta = \"y\", inner.radius = 0.5,     start = 0.25 * pi, end = 1.75 * pi   ) +   guides(     theta = primitive_labels(angle = 90),     theta.sec = primitive_segments(\"dendro\", vanish = TRUE),     r = guide_axis_dendro(angle = 0)   )"},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":null,"dir":"Reference","previous_headings":"","what":"Theme wrapper for guides — theme_guide","title":"Theme wrapper for guides — theme_guide","text":"function shorthand names theme elements relating guides. intended used guide_*(theme) argument. intent, due legends axes mutually exclusive theme elements, function sets elements simultaneously.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Theme wrapper for guides — theme_guide","text":"","code":"theme_guide(   text = NULL,   line = NULL,   title = NULL,   subtitle = NULL,   text.position = NULL,   title.position = NULL,   subtitle.position = NULL,   ticks = NULL,   minor.ticks = NULL,   mini.ticks = NULL,   ticks.length = NULL,   minor.ticks.length = NULL,   mini.ticks.length = NULL,   spacing = NULL,   group.spacing = NULL,   key = NULL,   key.size = NULL,   key.width = NULL,   key.height = NULL,   key.spacing = NULL,   key.spacing.x = NULL,   key.spacing.y = NULL,   key.margin = NULL,   frame = NULL,   byrow = NULL,   background = NULL,   margin = NULL,   bracket = NULL,   bracket.size = NULL,   box = NULL,   fence = NULL,   fence.post = NULL,   fence.rail = NULL )"},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Theme wrapper for guides — theme_guide","text":"text  setting legend.text axis.text elements. line  setting legend.axis.line axis.line elements. title  setting legend.title axis.title elements. subtitle  setting legendry.legend.subtitle legendry.axis.subtitle elements. text.position, title.position, subtitle.position One \"top\", \"right\", \"bottom\" \"right\" setting following elements: text.position: sets legend.text.position. title.position: sets legend.title.position. subtitle.position sets legendry.legend.subtitle.position legendry.axis.subtitle.position ticks  setting axis.ticks legend.ticks elements. minor.ticks  setting legendry.legend.minor.ticks 6 axis.ticks.minor.{r/theta/x.top/x.bottom/y.left/y.right} elements. mini.ticks  setting legendry.legend.mini.ticks legendry.axis.mini.ticks elements. ticks.length, minor.ticks.length, mini.ticks.length [][grid::unit()] setting following elements: ticks.length: sets legend.ticks.length axis.ticks.length. minor.ticks.length sets axis.minor.ticks.length legendry.legend.minor.ticks.length. mini.ticks.length sets legendry.axis.mini.ticks.length legendry.legend.mini.ticks.length. spacing, group.spacing [][grid::unit()] setting legendry.guide.spacing legendry.group.spacing theme elements. key  setting legend.key element. key.size, key.width, key.height  setting legend.key.size, legend.key.width legend.key.height elements respectively. key.spacing, key.spacing.x, key.spacing.y [][grid::unit()] setting legend.key.spacing, legend.key.spacing.x legend.key.spacing.y elements respectively. key.margin  setting margin around legend glyphs. frame  setting legend.frame element. byrow  setting legend.byrow element. background  setting legend.background element. margin  setting legend.margin element. bracket  setting legendry.bracket element. bracket.size [][grid::unit()] setting legendry.bracket.size element. box  setting legendry.box element. fence, fence.post, fence.rail  setting legendry.fence, legendry.fence.post legendry.fence.rail respectively.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Theme wrapper for guides — theme_guide","text":" object can provided guide.","code":""},{"path":"https://teunbrand.github.io/legendry/reference/theme_guide.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Theme wrapper for guides — theme_guide","text":"","code":"red_ticks <- theme_guide(ticks = element_line(colour = \"red\", linewidth = 0.5))  # Both axis and colourbar gain red ticks ggplot(mpg, aes(displ, hwy, colour = cty)) +   geom_point() +   guides(     colour = guide_colourbar(theme = red_ticks),     x = guide_axis(theme = red_ticks)   )"},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-development-version","dir":"Changelog","previous_headings":"","what":"legendry (development version)","title":"legendry (development version)","text":"Fixed bug guide_circles() used multiple layers (#58) Fixed bug hindering position = \"inside\" placement (#42) Fixed bug theme_guide(key.size, key.height, key.width) (#41) Complete guides based crux composition now render legend.background element (#50) better attempt honour ggplot2’s mechanism  variables (#45) Better alignment compose_stack(side.titles) (#48) Fixed aesthetic standardisation override.aes arguments (#60) default key now depends scale type: continuous scales invoke key_sequence() binned scales invoke key_bins(). using binned key gizmo_histogram(), default hist(breaks) argument populated key’s breaks.","code":""},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-020","dir":"Changelog","previous_headings":"","what":"legendry 0.2.0","title":"legendry 0.2.0","text":"CRAN release: 2024-12-14 small feature release introducing dendrogram scales size guide. New scale functions scale_x_dendro() scale_y_dendro(). New full guide function: guide_axis_dendro(). New primitive guide function: primitive_segments() New key functions: key_segment_manual(), key_segment_map() key_dendro(). New supporting theme element legendry.legend.key.margin. Fixed bug guide_axis_nested(key = key_range_auto(...)) produced duplicated labels (#31).","code":""},{"path":"https://teunbrand.github.io/legendry/news/index.html","id":"legendry-010","dir":"Changelog","previous_headings":"","what":"legendry 0.1.0","title":"legendry 0.1.0","text":"CRAN release: 2024-11-01 First release. Thanks following people catching reporting early bugs mistakes: @davidhodge931 (#7, #8, #9, #12) @luisDVA (#18) @mthomas-ketchbrook (#21)","code":""}]

      Usage