From 6e680035b467e8057c9334a321adc50e78e7ddac Mon Sep 17 00:00:00 2001 From: Dan Knight Date: Tue, 14 Nov 2023 17:16:20 -0800 Subject: [PATCH] Update linear test data --- tests/testthat/data/linear.data.Rda | Bin 736 -> 831 bytes tests/testthat/data/linear.plots.Rda | Bin 9636 -> 9675 bytes tests/testthat/helper-multitest.R | 3 --- 3 files changed, 3 deletions(-) diff --git a/tests/testthat/data/linear.data.Rda b/tests/testthat/data/linear.data.Rda index 9ced492b53d488462d039c4a3aa404b612b07e22..ef037545943adaf2559ad0525d1092841df2cd31 100644 GIT binary patch literal 831 zcmV-F1Hk+riwFP!000001Ep2XZqq;z-o{R7N@#HH&I`#FDZ?Ouc4qSPmGm=hlpix<;_0d-hDXuxogv#%m6eY4lbqt)~f% z{P9f*-qkhNz@}|u%f*gKh*x8Faki^xc@8EPHVu`9;-ny=4I=W++hC_(!T6Vb^)*L%KtmzQTasDyIu1Pe{a~uyF zx<#_XiAch4)%wzZ@N@0qs`lgYo3Dmi;@^LX=0K~TJ|p>EdueKKV{flCBGkUjK51)* z!SR?6!zrs*Wf)TbZON`0TX9yUV>V|k5|UYbJQu&WzTMzek5S=_XgX%2E0McJOuzSi;z+ zJcuKh1K&RavA?wjtV}%Ii_>&o-=YC{tq7g^{&X@8DQA$zt&l~>d~8%z3>k-X$U}8_M>IbU%e)0T)0c*EGGfUb(viqnFydoivC(nvrNLIWbA*35VI|bbq1>&+W{yU! z0PQ3`(~2S>^jr2J7?=HcazcH67(_f}?`l?cNK+=UJ2_sg7qT}L=(;E8)wSSM`@j!r zn#$$@a7nzK+EJ2aSGeS_rz%+;=$794?sE(URX4Ua_o2?uUiX01-`O>LC26p+KPctC zZG!yr#Q|KIy1BgroM!LkvvnwT>-md8Z`-(j_d%bS@)|nwN*dR!ATQM9`Ew~r*>3+Y zs`*25Rn951k)D52I#+Oc;(*gI@c)AToAt^nnxX+2sI!M-QYJ43ryS|oJRQXmKcYS> zLMWHDA}F$P#GiIcOswz`+ln?5b0oRTg?|fDxUm&0iI%S&PZ%WE&L^C+_gs#|#UHVq Jj~PM;002{yl~@1( literal 736 zcmV<60w4V!iwFP!000001Ep2XZqq;z-o#EIrL;lZIdNrW?|S`nft2)D{fpWll>@3a zTc@$=*u~xeM;?JA2cCgP;RU#IMm#~wI@xg>w-uGJWX(4--|WuL%-RR5M|9z60U=}{ z)2Jb%p&)9!>94==5i;vasUZ`!lx)XQ67meoFqim*OO8zZG)0N7QJ z4S-ZUCJmUQvB9WSan~IWoFwoo&W9Fe#IpkTN_U8F2du(t^s`BFrj_RFj3;7rSAtJ0 z?AwI8E^&O~QO1G_vrW{lffIOyIfUAjY5S7RuwzZPcL{MTQOh>LggAr+YH1Z(E{0v| zGs=9+a{|k%)~)Sh>RFymZI3bEcieI_f<0FqmU_(bynCkDrVIyx=LN*J9HtIetW?Bx zoUgrSKUbc2@Q;`8zS(AJ|Ng5O4%GSl1?lJ3qM6;bot@H&Q0r1X+SiJs(~%s+ld#&A zLCnQj$(|p*M#9HoUe1_q-8s*~L;^*OqWA<_pG?Nbc|Ojs>mvC8dcE5NPn-%aqcnlJ z5@HCjx3K~&1&?>qJio4Q@Cc%o3!Muw8Bby^LrCL6944o7WY4PvGLHEmjG=`|dJ^KP z1&cH;^DeA~K3|VkmVU%gli#|`;9L^v_?!!Q93?Uj-&efmfajsMJ)YWU@bFS1wF zhiM{*T!gbFjLS+B3_Uo-KdD(xxN{We5-tBZG7BNO*7U;3 S@RQV6;^HqsBhN-52LJ%ws&UT% diff --git a/tests/testthat/data/linear.plots.Rda b/tests/testthat/data/linear.plots.Rda index aafb54112a5813ef3ea5d025686fe84e8832f047..506b831960dbd754ac9c33fea883091238203863 100644 GIT binary patch literal 9675 zcmb8Ubx>Se@bAmu4hil!2_J>s)LXqd$9nnd z#z-PIiOFeu`Pg-)Xzt$bdDUjW-g?4V^*6&PLs*!fGMeJo@qV}C4w)N&>zU&>1sw-I zU5%bVtY0Hj z-ZTF+;&A24GJ_2ZpHqv9Gi}w@FAabF*9Y4qcjUIR-Yg`|qoa>M?K>uJRHTt_ky1GJ z1%KJw5#z$ik67z;<{6F;yhTcUCzp79@_~^>jYZI9A4W)?Ld<-Q!!mQQ6(0i8#6)r3^2*3~#7P8LzYc*64bsD1BqOaPDdd7Tm^^Ex`? zJwMpXgs6KCYCxmsjLd2n{~-FL0hMZ~$pg0*&0XY^W(G%z8izR7K(*(23CFX=+@3*2 zqg7}gxy*YI@;dd2s>6JeWe0| zw;92_e|hji1eG36pZGpSx058eY0Wm%`M#FyGdmM*OyaTGpDq?Zh&+5->Bq94IFS|2 zNKL6S=9^S1xA!Sf)Wz3hYF=`mYpsC%wMS(0^?4VyWjeaDX3{qiDfc|K`ZP({Z?=#} ztj8Eiwy-;w`kMmxlU=*Dv6Cq;Swn)!+G9D?s4+bnO`b&5u<>A9m)d7GatpFBzT#xd z+~fXesd`qmLHd#l{^d^4@agQOVa=*-Bi1p~tN3hG&8NTTe6X#}ewUNl#J`1Gz!$g! zb%1Sdp0{uX^?sDjS+O%kM*Hj$DJT>U#lB~Ffo)NdO`Ldp>*ljs2vxAqz)Hlp)Rya7 zFGm*1PC?(or zj+_uw+K4qfv+&7XVLSA7iHs3=`W}VW@ku0ZHb%fMt^bbok4V1$AFs%X=(fymn&648eMXcXy`;X$}qr2Vh*%yY6&k>wSl|*@pYOPX_9_-NwEQEYbnn5C1E?_+qM3?aUrccwU7S&u$Cdw zQ615As2&fe!0#Wz!0c! ztDoe{G>mlPFY8j)(c=Yixb2cxz&Mf%6=(rv7B|Zcu!Zmw3tth`2)IE~?m)O9Q0@RM z0l<0)OBmoagrzrNJ-`wfcnuJRl;sHERt)IJndCzx*8uHc|5yb;5%Ad&pvd_42vBtV z3Ir%N{y72^ADr{_IliI^fC?TRhr1OZ%n+Vj^!A zE3iZCE_X&`yGaFfXXyNM{kAE%^0kQTG3dKkq1SXqu_yIUNFB-3<}CpISHnKqdX^Yp zw)^z;j)K^o+P?n8suu9cO=?C-!z1Y8G413DLI%|JE(QACG2q)Z(YUJ;p>^xc@wy!S z#_EmqEDL(t1 ziPEc|JE(Pg%Uinn8qHC0>?HaPnpoP((|o?yDX8_lrx7@@2NX%I_d8o#29EzB-t>19 z3au!k5Hg4P;&0qPU-!`L0ohuSiur%h%5I9jp4{Ey@6q%}%#{Td3RH!k`W}O3S29m5 zryLO_Lwum?)sw&Q=e%5R|F{z3GrZi)lblHdSsu>$8W3qEZ*H|R-K=mV8Ib2%n`_u4 z^JLIqT37s%W`&Bc0>>PZQOW4PP2%x+9G9M4Q%yYhP1d)aoP~X;+i~03?9dt_91V3z z-}gs720n&7ggx5UBh_Qo6Vy}G)75{d=c*T^MiXN5NV{m|^ZX z?7!J3+9%tm+NRylODRZhNFGRDNIpo0E#g%g7>aiJ1wW%d65Vp0xG&;W85oQ9`9(aF zKJwf;pTIQHz-)%;pN>)I-;{pPw5U8Yr0Q<|>56$wJkL>Tt$9#+W<=H79P0Y^m~sAF zX^Eyq)fs&KYmRgwKd#prs46!}A83v_00^;fdLm9xoCtkaj7#kC39xUKO@GJBYND2c z=_;#?uASVpRDeS+Rr})&HJPP`ZeMNqmt(p3+)9NI$I~}8LvP(S#;Tq6hg4JPwa8+b zZpqMKZ@F;GhmmaC6hS*uy8j8askVlMWxE|hg_lR5i7AI zbq06_d(__Mq|a@9JcA$tuhXBM08!ggX?vlzgPq6%>^7ce@A>FXAusRg46^65{>hdG zj}|Mp`zf?sQTDGLlQA#0(}KQ19oJd@75f68nRvrQnjypC<|M|4qEb?K^5=X>B0QD- zTU0cAlNPQj#3keU*%Pj|S8~TKLwa>wQ;cMd<;qVgP0 zp8|YOqj0>F%v!|^U^X9HsvQY^<8-V|7Qn|YBJNWsdTP8g4Xs|Kr7bjvL8+Oy`l<=p z_PmN=r+zHI+Gn&|EG<_guGf;=e9W#=u7&%Kbmk0TdFK{4+L;UC5~9hsSxF8WSPxs6 z5A9y*qR&jQ@0+K2QHKN4?O5603nrD=>LYw>Jl{NXze2k?!q6byXta1v1rW$z>EE1e zFqR%N*0op?;z5VA=Zd+iF*LHIcq`8V=PS}A(Y_9!78p)H&u7@*S3Z*d1nR{_{|(Ci zGDkx?qh8s5+wHK3XMZKbRl7(^sX<;80eTj|S-Ha!)A*c~srKRB!2^ql)2wS7$^!1h10poqI#;CLeNX7riM z;o5mw&ZpVX)=YOKv2e9kvNv9xNtMQaE~eON2lKYhv^9{y4BAvCn8>$fk~bVms$bSKtZwj$+Ijtmzj2(gf2Sb%0;f)bEJmV) z{Ds|&V#l$pg3oNzL8|lX#LIpcMPyd$>v(Q%ab%X`!Ec=Tabx5%@eMi1UsL4tt442K zDbAqvuL`#~?W5?iitNkRe($Bg#3k6m?@W>DqHod#kGZ5iS%$W+484golo}0sR8ry! zLa7!nIuxMOY&Tn*u{|&* zeik{=2tDwXy2!eXEjRc|+O-pSAJ<%FgdC!^3O+<=4KdcKr_Q=U&_kPa1=JxG>VfzW zwh(_3;M;+o5oXyz&&ad(AU6b45|A6BDKE$k*;E7MhHB~#+CliCix5SS<%q-`9neoS z$%jPl4iZA>#R3TddMQ9ch`k>`LP))WAR**lIgk)auMS8EwbvRXgx2c~@`XaRJhixtk>P#J;P15*@|`VgVEn9 zAjFxsx$M;%2q|cMx>&UV_hypT`?;EcnQ{Tm*`h(F2+tCggrL~B%lA^JzQB9at^4ze z8|1H6QM6(FB%oNRR^2})b3n2u(=Yn40pQSg=`mbNtk^dPJb5|t{U!aP^3m4O3b!9NV)}J#J!HKMt%S;5z|0BaJ|4MLQYxguDCL{Zt_B2M(<>B zZCF#Q>rrKJd7cH#?-0S1DHPjOS0XYmh0Wd*fBt}+tXy6>cm)D>Po4+56@H01`E{y} zTlk7OL9V@Zy!4TV>JCqX*A%RhnIroN3^l*~|b-J^oyeU0fY`O6q z-TVs)`15_)Z9#BM;I;2oOqswyFt$t&@riM3aK9gFlX#`(2~Sw4ggiZ-H5i_Cq;J9{F`rHQ$^_en*_eWv+%miCD#H*9E=S{*NUxMrZCi51P# z>EwM6ZaqSgd5gsg{|czsUgY(g6SmAuQvLem1HBAd2ef5f1u&hxG}JX!<7LMv4rC3lC7S0gk(*u}UaIPe7rl-kD5e7-6RR?OBludqXzwzM|CrEW&b@4i_qx<9cAWcK$Kv69+I`9Lnj*mY&VGh>@|I3(q@& zyXHo!Rkr>>N24@S-ZQi_lC$?`y#Lp2$v*8q!#?x=$9;}{o_+p(;aj8=l0l`)jpYAB zTT%&cOFEkaU6GG5=gCS1HGfsI8KrkOhqz)Nlh5;)dTXLpu^FfLHix+q9<$7Am9}X9 zs$w%q?{AKBr92jx_bh$%pzgdv%y@s%+BHsB;qZ+@d;9NaS<*R9&f%uQkG|iI1GkYh z9(uo9UG#mFgVqZLztOO{b{dat4ayL^Ti~$Iu%Xd>b7mxM*CZtKUgI!)&rA0sx9mvm z(m+F=N7mFu=Z>*6wNin4%2F6EWlKatL}Sr3!D!3FD9Hs8-sn}NVQZ4*`UpBl(w1T-(->V@g1Af>hECuKC(wNDTB_HVQ7mSoND%+KfmNBcwVQ}?aZ^q{r7h1{5! z16D?W)p%Gt%{rm{d%)4dPZMj>3em3t&2C3~-MYn}F_bk5^o3Woy5Nsa_w$ZZ7mvel zdwP#lf72Kzg*Xd&+L9yYZ4*bF%`Uin*I(PJfS{ThA{(SR#R^dTjga8_K^Q|>tIFv; zfJG3+1B{T67M5V%lOXgqt6FT6`)yV%f%eQvP@W)$@{ktl^vU*e1bSg_F6$4c@5G@c zXfgrAES$}nciY>j)|E6He2w?f3 zo&!%r5g_T~q%htqTeB6;4$m5Rq4583G{c3D&46zjmcTWQ`S5(erfP{La$f^v6^9Wa zR^0zDh6ytNGE9g?NYF#^kwsK>vrUkL+dkP|mVhxNNqht%GY#Z_2~Pg{clu{ZL{;@t z8Fa*N^8(Sxg(tnK@EX92M99yKb!}-#0*|1^F#BJej{qrrzztD8YsS?q$)oY_w_uWz zU+sTU_4f?rmp8&1yj+Xqs)rF=72QrtuNP#WYjZe3dfe}`ZU(_~^dLPBIy;Z4%Qbq? zbC(5WLl2$?oc6fzan4AvT^xdIPxa8crNqE?%VeJ!dxsGcq5x-baYdCD!%s$Oc>n7GCEhE-&FtTj z1Tk9l$;QQ@0Wn$lk%8~c#Ny%%^8Qs}Slz#JcG#o-ue|JV6=dIVz%5py+JBL7!Ii~U z?$3yDv~QFj|D_1eQWde#_U~tmj>#~&iHcOejgdQ|*9tZZo|{K|@q+_lM!->bsoZ7U z8*4buYK!CSr$2dqZH8t6&9}KNO0WDqG6AVGP6O*fVR`=D-!Zc6>=NnL)x3Eylp$q0 zNs`Yu@Yk<_(QTaE{Q(}CbH|LRwx1CqhO&PObn8Lcj1PXbu4GRm4=D+~(14q-%1tSe zz=|I~YnGj~3|m>Nf#rsy3{HcnWC9+!A|Q{w`~yJM&3F!83>=M6^s*&j~czgi;U9&3qx5U;@COwWz~=&U|Guj#Z+$!@(D3(+Gcng{@!bqv(W=sN)X<| zD|vKe2q#pdrUthho#b%)I{~g#n^vzlxGNUJcmG@brJ9ybmk5$#48IWIi^&hC%Mxz5 zhPkT}A98jQ04x;c@h|8S3<1Nafq5I|Dj5Hw=lc)+)qm)*;U$Sj!BFYkpPE_{er)}G zlK}EvSAjyLT#ODUCS3UIo87|&#He$>m2eUr5mFs-E}T8IzOZOLfm}K@e(a@eb-AhC zS(UMVq4hVX%1|u(&bUZjS?`2m>KJhvMYXpb?c^v;kibH;>>i=<$6f6~{>siPC_TYJ zqX{!g-kKvq0qLwTS`Kx+i^PS8?pBo%xoDRe(>E5^fa6PIWXnnM@$vE=(+^50nlqkIxqqfCg|08j(1HZsYg6@jG0P>8XX;cc8CQ0*7a zpj@?xOpSoUOfj_F-6vMa&k!u2P_8z_%`Rh9uAh<3j^*#^CVVUV%{tDk7#O1eAxUS> z`OC^fs2Q88ewgZhD=UkJG9Bz~6njXpl&*m`9gy$p&w!R+hm#euBTdSP@#mT3ro|fV z9C@-I1LjxWj1aap3VB?iNZa1o&ojA9f^}D0D*^S5l*Xxztl#7d$EsRS`m(?#9|&Ww#3{hF_I!-#AX>~CR62XYji(M@gTl9`nER$F5AGwyj z!ZwC#+O^7t!S2bLJyM2+NG#yHJ=it1dmj^6Rno(CE{tNZy8_r`N)+9dt$u%=;7&2R z#jSozZeQPfYg!^c(lj5tV@c`}ocpJLBNYq1bRA!Hb12dN|GU#;a&Nv-Pv}AFGP&$T zE#+;w2PGBBL^1Z`{aPgZiEwiV*)#QK5*>TsbB;-Knv{8Yr$Qpcp>sDcfxE<<1~}-b-CT3e7;bl@j*>Ov7Ta zjMV|Bwz@K6PTnqt@-5dMfSUDBak&vK11nMK_NPB;!H&L$byglP7o%5SW?O8!mYvZ| z)DhLce=;{0uRG8e67Zde)KC^ow2Nn!y*y#i{NY=;aT(^C2S(^xMOI>rui0cdW}_U3A@_1xrJ13$!^WkhnKfS2}~uHre(`@PkEbM0A|7| zq@)l{|`y$*IGTvRk^w`k+Ykv-hqjtf|DYf7F*uXjbIL z;7elmESW&wLP=a%F+bM}`+O+Zj=g7sXW!Q7U5!0|5=DY@lTnRZC7z>h2nP{^NwkWe zl0y!IZ)Ti@&RCF12Ia~LN`a=Z&ime*)eO-QDBf9U)#p;?&gs7~IT2xBwSqq?%{-Y? zSvMtrgmt=9biTZ$zw98FONpf4G;D)?9FD~)ZpWLPw`0`{;+PJtlu9!exAsm7v}D?z z`=@fLah;{0%R!>_v+eyL50$*mo(DT_!D5L|BHb3wj@=^V{JK%P zi4lPe*_3w+2_bIO`%o6C7N;kVy0ifZ(e>cF{XX(4lIx@%p*BvxtTUQV6G(APNLb<4 z`JU`_y}HDgoOg%WaUWuF$W<9-iCY#X)S>!)o2eGpn8Qwsiro`;@?F}`w&ljo_8Sow z!FO79CuEp4R@GK^JBDui+;|JlX(ls?2rz|wcT+=&)zV%uUZsqzT946@QR_`p4E7#U z;3jeD?MVEZM<5|s?Z@FKapnvpmea^fCB!D-7zIjmA7q>NyJ5KJ7Eb%#Y4;gMHgw}Y zF1ie63ka%_H*Lk?^jL1(tTSZBw9 z+YnGKj`WJ#j}PK2ia%E7%tK#>?%6XsnkGa7uVT>V9bf)YIZ=z2bFFzEb=GYv-GAx3 z|AYCp=m{w!?vGbdyzndge(jJuN+KiNW!6E8}|uQx1bw^_p}cr&|OCKe*4x|c?}HU{YY z>S_)b2QQPC$GhN)Xr!N|CQZ%t4>wx z9}NsoUOQcR$z&~)a`jFUYXqfRyYo_m#Dt{&J4e}2SSihupLy#*Rn6}Ph;=}uioCL< zOrsj{baU+50_jtT3R8KbGaJJXGNl~Oe;E3NDPZd_f_Rn4#ZbcM4NPIG>11|7R|xrX zyK&fP0-?(}tjkk8jB<fG7cujzA`A|glHSLm z=Q&2a{c)0?u(P4*Sl#$n>xA)?p;Y;;$`?GuU-lJ=3QS=-0$+9SWu92nJ!WSN{N-r~ zj>H*bB!Ueh2gW-ag)CQj1QZvmj7dCZ%N`_%Kdj);$M@4Jl4}T%JGXp+VV7yX-C#oh zLDXPJmralB8ryjJn~yDDtIzLNOfP+*dTQ!V4F-c_a$IjhbnjELqF(n;B1#g2NXU(L zMT0cH>`tsmxAXKJkyTZrgsM$nEMEoF&d`vbllWKN=>d1ew;I(Hz&6TAeVN9bZglC8 zF-oG(?y8I3-;Cs>S25gFNw*6>%{r29Dyve(&7NSrItqdv*z*dYs9Fc?bR8!#E@`}K zsRp+ydb9&>M=ECc)2u zW;fnBPPVAlzOmx!s7OnBKzKP^0Ioh@kR$)cn9jx^`-w|SS6)^{WY~*o`02!@>bm5A z_8|_lSyZwWF)$rhaBKa$U>AKlm3$-kq7Dx&c)H%*o)ao2We-CDUV`m$1m~mMb zrryN-erH+pq>XaaF_(n-mnE?vy-eZfcee>jpByvY*9c-}DU|57`I*%iurWh6Lz>F% zM{AE`Nh_Y{GMlDNb3Ji6uU{Vs<>)D$xm_Q`WRDBQk8+LQ6|7`RpDH@plTQ8p;$fP5 z|LMQ~5#c>7RmY!tI*eF99oK*--+lX^Ch=BnIxgNzNE zkCs-7p?5&sKZ8GRjo!b^8IQdYso?GHCHEa*aaU9tLJ)H>=R+ z5c5DzB65lv^!Pk<_;;PCiq<+bm{T{#`Y^|H`galcSI#T?(%!2CEn}2_Dg_7m0OTFL zy%ae4(1{mow^6Kgr$E=K&Dh?j%9uXYb+NxpZwlsGDS$o z(cq!I>Qk!gtm02aWqqaqBdpG8P{6+Fa_+>qJ`4q`E1W?rv|p^WMGf_Xws#oeX**n0`9p6UD%t zm%X+;C4&1`4U5&%RGWJLsyTgr$10Zn!cqw=_VCYS_pb}%hBno@i1}~xic?Cug^47+ z*!o4W%8)O{Wzt0NUGX-57IR)jHzjgZ-FoG!u`V2H1-ieQQ7sYvacD2Sa3^@&9OHEl zyX21y=Xt!7h1KVEwYz8|NT8pe0-0`7;^X?{nX37!0GoOLCNC<3HoQ3_ZMX->{VCEC zr6%Vyc>Nxy7GCLMFZ&yn3%{*ynEqa*S9bh6BauT`hlg_=pL{#~Bft9R`Z-DZZbHW| zb4=Br#z_VvSLw#LT@E$pbR4e?6^bW@s}KQ>dd?x9?L(&|(-#hAUlf{GO-)bkN~zM- zI+LSJcwc9fYQB>?9rZ4LNqv*7`7E4co>BBw`AP-Msp6~e=t(-Jr_y8y?Z+Eu^`t$vfwL8n32su|zY< zv~RKW>%zq&2@2@tI~QWxn;;24e3^adm(eJg#AW%aMBa{N3~dB@6R1OYOP+@0ne>4b9!}A7-Djs{Qj5gD;-;q7xMkU=lP|Yvmc2 zqwMnO(jl;ehR^D+;Y(6VdH25k^%jj;hZl^KQf)#)vE8qzSH<*FK^CX)n}Xn_-Ioif z#9>`u5t5HfmkT1P6z_hECBz%zp?4iVl*{xOEtN8aa7mv3N?xXG2Xa+iY+v~tuF?AS z_{aLEc3%{oO(jN<90Um*rbkst{=VsP&XrU|5I%1HT_obEI4fjqa_T(4p5VQNl^JJn zMWa9N+zt63v0%(a^<{+^Ox|bm-m#s}4ztfvYwUGGp@t6=t@9fblfs@%|%PM)Q2f~W3s zU&dsvX<@P)ms`*xo_NJyZY}T66a^S`H5YQ)#&Qssa^4q53nNOj?o{QK{#02jeb5-ZXPSD+ThpMIB0o>21~)9`G{_pyH`Ud-41?#ce>+m{F!s5J6pdaWW^jOqM5I# z^L`2SwO*G{ooN+!F;xFDsMdg33j{75t_Y79=q+n zxa4tK3>`A8KMDV1IDA{q%)1b9jt`Skek|=Da*98zKeRb&svf>QUA`}?ac6;L-JCwJ zGK%hWJg?o~68HoVd)WruF&)}L04GwM37ZX zEh$uIG0+K4sTpdMP`)4bJTc@BQ%er@NDTCdQ)+>FC6phEJ%A4CL>V9jb)pV1gF4X$ zgg~9>1Fu1y7z4VXPRs!tP$$-a52zE{78`PmmXw21PYd$H7^y~Cp$2xK+r~hSNs@BV z>P>_lCFKUto$}Az?Ax@NUl!D}ICTKwtk+xF$t0G;pSsuJYswm$t z3X+OU(844l9VJSRqExb3b-cq@QNC#klB!J5;v^znrF4#>IkH(dyhHIQ-y8)=O(tl` zZ*fq8*GB~yM${1DxXwi4PB*s$nD5OrqnL4PMT1>euvc$1V`%unl~hNU)V*7*J+Iq$ znQN}tKXCJL3pmz{A`KzK$~|eUESIzo-yZiH3w75Lf;7e*Hl`f!4)OQ^!Fj1Uax$bCE{WtL(H3aE-|lf0^>KmA`XR4}Puqav z^W2_39RNV~k?8Fsn-9oSIm|v3>;c%(bTj-S1i(mKg>Fn0>O;7O*{Z;&zawItu|MgbF$P7LDjc>xB5{xhz(^x^}A zUOeVrSsbHn{eY@(P_Gk2R@B&rr8WX0v!wAJWJ~e-PCVG-9YqKtdxk1|)(+Tko|W*_ zuFnYjE()=80vfR+#VB%fR-N#aYE6c2V zOrXv@b>rQ1H}J0LDkJ)y2;!*a@x8e~B=#Ng`(Jr2WN%g)0wUNKF=pbweD0YWhB)>z z2HjnCq5mK!-jJGYV~q87w)c;f#`&?n*CM*$g8w6gkqsk=2YY7b^2+CI5lj0|<1a`9 zOy1WGnlI3C7I83jR>Ju73R`=NUTaczOXL^`9qO z%{U@bAlqf!&9^9-$nORf4I7n(5UQD)mhN+LG=aJ>_EvHn;Lr54yGvacAe%tz-a-zT ziA`Uy^d@tfiA@)Lw`82iWIymGmZ326`={}}nmM}uIqD0VlB|oZi*xWf*h`|-G#(w+ zCobS_N^Hufr)lcpBem(*dlI=u*uv~?xIWbi^^)5R?R|{AC%j=kHC&%=-4Gz==i}Gp z_uxBOKLZd8@J&h&b`DApbq+}ncMkhOPSDnHn`vDYm#b@YtUCJrVoylcIGRmd zhnK7Ca%?(=C6QYJJknUKHo?-YS26;O4F@c;R_YqH)FxP&^-IQpiQ&M-x0R_zVs#1D zW`mM(U`jauqFvFPQOl%c0+=2yy%-`*wCRPKNE)ziIh^cG(?~aj{$R@qE??*WqHo7B zU)EdTXuW68DC$VH^5g9r-$pZU@;PpbNj~kQK2frvCdCOX)nzxa@rev}eW#RSJDeZO zigeN{@#3wVq+VRqY)71d<$Z#~&AFu}FA1xMT4VeDu0e#hSVj6b{UhWGZ5s9>Z9IWG z_gClo3 z?}Qc7-Br4eSud<`UAFO7g*kx@Uq2h4M~LR;saY8LmiI0wk%yG^6s^#FpbII!`h}I# zA)8;*RcCcpKOuGiH?Jx(6ixWy;qBsfO!6UTYM(c=tK!K1?wkKj8u$j?OzUFKJg!{u z@?@wC0oB<3?f>3MjK|FI&~M$^3d~1O z%n*w%UP$QIAdZ9U*>{&P=8Y&FC*1>f%C(`MmCo4E%;$iu??n;5TM@sp+vYBPX9^uT z(u2~r2vS@}@rkX)Z=RO^F7HLet2#Gz!rB7k$Mb$zbVKj4U^IC_0+!kMFco4)x>^q+ z*rIr8GSHh9CW;ss4DDeTbQgPzRa=D9z8SALMo)!$_SE>+R_vem@6 zp~SYx-&q#QWw>xUdamK-+Pt*{9O`;9brh_70sC_{ACxN2PIc3k=cYDlG2EKBEVNZ| znnRViB>H%}*mo2kZr%*0}z|gh}jIF+?1>T1$t0j$77}ibqH{ zmTx`lv>V!RF9q0`qQjfo^VHR2p)IMPpL$2a3ppN z+p+YYrLEg;i*Q}2pE4kXI%fN2y25r7yKK?2Z3MNj||Q4utNX;cJ55JX2nTUI!gW= zMg3&6c6f)vQNCFUk{V2AB}r4dN;e$BL|Trf`M<^G3%m-g*_yUbpTMEYL5{{ZbakQM zJ%wX~Homx#p3}tMbMnebi_s3$llCvxxD!}Mv1p0yC<1Ou!f=vNVs-l^p`~5K19{xi z&yP(EK#d9kagKeoSRuKJMbAo_fr#A75%@LL!0QEphKQl?fPuCK84qkofSQ8+RnZgRlWUBX`5jfa5$5raFrz3zIZJ0 zmW88ltCno6&BAD6YX;pJZ~Y`=J$A00?D;tnRk1-WE$V29oWYffl6f>l#QQJ0MH?S) z5d&3c(UIY;wWa&TeLO&~$0Ez#rv%`Z+4tZ6i!YMSEbvIqpjn!Ytwbcxi_o7z zw&5(6yOY(5ZNM_^u*&DYQDB)!(`hJ_78p1uv)|yS3eu5-M_fN`0deo(nQPQEEMM;9 zEe(9Jlv6jH!z2%=l>SgYEZ3(JuvozdZ(N=TQ|!O+Rd-1PShO3W9Tz(yioSS!`B~VF zflFWlu7YO)U#y?jwm#`3HKymK?uwx+m%z~BkJLQZo^1SW2P?W>Axv zza}A0S(&?jGQTHK+Cz}CTfm7^q9Srtyidbz5tB~lHZc*l8NvY${(07^@3Y;fVy63- zdY1-wH@yXj;_+bvtzI&oU7j*tU0(m!l?gwxG7-=e@DNB8s1cYJIIE+#>;Up@Wj~ zU~0JVqFW`*XsK?>209EwVW2!0|2RzOM;92Cx>`%Z-XswIz4U-;zo_|Axr+TSvFRbH zYMDG`3-=)WukSlkuflX6+a24jE_?uI|B%DB!`@1718iY`62! zX=1QtI$`1SH52O5w<^7#7K^eZ`R=*Llv&eo4Yc_$Vd{6c0aMl_`Fq(17hCF2z9jk8 zn$peDh^JJHQkN2Q-ic!8R1`3Hb)i3pOqwL0*DV-!TyS*C0?K(VdTu`TpH+rPLPKs- z2GwhlP{1Q)og)I;Ew~Vs1}$X(S0?K(4wC$O`(k!fPA&rm7LZ*GiY7^ZicsxrWk-r4 zn%*LA_B%8^Z&R1doLXOIR8EOGP-c#45GiWf_asbpjS)1jD->KUW6awmjMB<#UM8dl z6MklP66W7ZG-b%xU4=UfNMsVNT!s~uQ>tYQh?F*6N@#kbM760XrLWorqcBRjQ4>;8 z(nPp;aJ5#FFkci{`r!bX+QUyV=aK42bDxps+G$%M7^N6c8&-DPkGa^T3K)9U3Ka9F z>+@Z@G}%mOM=VVa8|KW)kaoCV2l-pd9(L5DsWlms1kFrUw0U}qr-$LrATuRM`^k3~ z%l#X83W|uoL&T-Alm*f$A&_CregzQq=w}9|E_Uz@Dz4Vjqm0$XrEwwhjicob?DaV( zB(w+h_S$L+VI=tpa)u|TkzF$XgHb94C5`phFcP~-XCWjObu{W|dPoUwDhV#?4W!>Bkk2I_-$>iPp4!P|W4D#psi-$KQ$fP4K%r!4gVfU)2}h29 zl&)Yw2Ir|f5~K8(ds7#A?^9ulltKnC?NMFnfGPhW*oO?AD&)_9pFd(pPFlYWCyo8F zh>IM+UVMX$C24*B2(EE{$HyF`<*CT1m;XbMN*-h0kg7glO4s7J|0OGs?;CMQ4wku{ zgWBpwa?1yBnQr|U3RuJMq=336?L$kUAjnLZy>?;b_W}#ZOn})cVCFBB1@zeKPuKED zY>32t%H}{Z9s3U(>QS^^YRD`$b`r`}N$@k~$z^f(g8_BE`|7>o(BX_3Qnk3vJ8%-S zSoW_Db^g=(*ODuIaRrQd*86@J4P3AS4>lSdk}WOLrS^%OsEf^vmb7|AJJNsfMQa zt-=|J4;}~u)yNErWVK%-=ap(~8Y(9oeH}?$xUoKx3-Fq27NiCIS644i#!%9b)Ki~| zPh(>z0+H!?*H8w4fc$>j(kdmFd0=X~^bcZCAv>elC zHI(_uel?~z9gEpg3@wvkSCZfY(liDOk;le#1nF}Puf53Cy+_~Pz6=t&zJl}}cIKrN z6tG>Q!RvL8Z+C&c$S|BJ6K{n2L?@$&usaX`3I9~QVO55qB_=lh;-tJQ6QlHUu}anY z=?=*glT=AUdjC5~TrHoTIl1?tR%p0dVHt?6JAOM1T&nRMjuDq-qpayOyQrSS8Y0B?zJQ!w<@Wy`s#CEaa1iQQCq}UWO^G?A}#1cQjyqz z!2o2E&y;f_^Muio5Gkis{@Z0Nx|EToDEN~xN_Qf;9lh-CqtMPAT zY!cr zH9DLrSC4v5-a>Dm@x*xMqe6ZTCdgM4IdY^rbfZvKSW2@svXZ2($*ITCCZ)S}rMfr4 ze(J;28I9{rMS(^+yi4UpnUqERhJ4fW=}|q>9W+5D;*1%c}S3lw1S`-k zyXt*MTiZ5p@nA*oy+tN=e#g2h%=ce|XUIC8Tg(~IY+k6%mHJh%%-o4Vo||Gkt?X;S znv5=cYI&`GhlBAMqNogSoGDFMH78p2-0p^;8^UW;G3A-$oGe=7TV{1h)J#IdC^~p; zTk&SRZ7~IAcMuR!ly$d}iH}oh&ZRyWQPolAcAks9CLXXf=gV*OEqpgi##Q-T_#prP zysgtemDFP3eh!}9{q$3Km|`=d`m2NE{Ck<?Jg^LZU=X z9{<5)L_@3X1g?s@K7Bn1D@=7&AfV_7v;UCs;DH@ji8x;y_9w&gPsC5C?}(j4_y4d- z4*Mu2ES2c1ZrH^-b~xhX4V>n)A0r&aR1HKSuCyn- z?+lyY`_pVpPM*@cDgqp|*3@KUMD{oaRM0txzu5CoC$txTXGrr4SLf)|fgc3`uX^w6 zR^KqUxE@83m*6Q_cRE>DJBJH+T43QfB|aD?+jD}WRSvI?$SPc?AkT5++XS~J-vl+q zvr)sYlYH8>B}!;TeXxTlhxGx5+JbxH+cy}L?`M~?J69bk=q|RGvG~LX|E|z5P3>Pl z$R~uIOUHxzGwHZ_+G)+y)W(in12cxiTr9>1*S(3=67i1tNzNM?Y`F}eK z=#9;A)pS6-uwdtllJCD)Wo<2w@G@36MQQgutC*G}a{;4=H zy@)lJ*Ctw%zol*=t6bRF;}lK2?!u9aWz-*MDB!PPtJo98vR}&HJN=O0<2tqtYgfKX zpjqA&L0;c(!0S=wR)Ms8pLB}u|cdwH*E4ahU2C3LNEDWjI(8Tl- z8{%<8>q;)e=2AnH zqST_-L$t0d$8cGD+v9|dY1_o!(;y-X54Y?AJvWv1L)ll6XTG6`3BKY?tEkMDz6q19 zy(*jwgQCC+!Wgh zQ)%%K`m<-a&V|`y&JYs+TFo=gvjSKIX6UG)dWd3vRo&{&%c?}JSt$5{b&!zO@Xu2! zwh`(=K;)B0U@npIF)zUHlw`5mI&gxV(ieW;8z>k^x3%NNx+9?ZTmL0Nl@U!x(=ruy zAb6z6%NAF7?|leAbaWffUO?>U>*2`HtaUEGW2dfkJCc>R?fI0fTS%0StLJH@?J7Xw zse^od+Zfuxm<`K=J-YGZsmiwXt%11Qesg1pnhJ4c(-{`O)JrnGS21Nju;u$(49D40 z`+2hIs)Ol5$y23{4r}D><8ghMQirtp-r1Dsn&xt!l4Jo7wCa4Mjtm}q!)0i)Zc z0QNX8`nWbTo1jR2?idd;jAk{XmSi=e7)c4!f8yDIrAlj$KrO@lw<3}sd_*(oh#sr4qrghhl=!K}h-jbOPF7;YP=hT-wcTld z$CEYaV5TErzX``biDC=LGb{gI2-|6rzNpDFiDDO`#6)DKulTx$nF*|W)rJrQr^F)O0tn!m0FYj<7eHSdjypKozl3_GO#h-W22Z&v;_7?59I z{L=7~S~0_2eq?-PGUI!A-Cn?yodOjtG1>Qpb8he*wu>tQ5_~WM7nqe+A`)3I73!Xv zq|Be>xq0o2ILPdvFYH2D+l?X@G=J)pj1gLwj_H)@M!cqHhZ&iZ+uU*)u^S#tNK~bG z@-ohG4IY?sN9(J7I%x8lha3zmujJE=*+0@2DlKu#DSSNgxT*qu9sEnu046PPgbH>1 zSr)8*9;D!ShnWCf9XCzbc_A)KA)Qd$_;np`eCs&lbfF~FQ=Z2Aw&Luy(4 zlDbD_J3?~q*5MgSck#fcU7n7`?)0Uwc+h9Z+m#$oZZsZG6#Dp%-Z5B%(M}=JFJJ9v zi`IEFqL;PN?E`?=E$dH7_R?yNmMqsGX0?TxNY-U*36?#8+oHjB;|&%muh#N2OoU&se0#Iz3ajy8VIG= tJHpIVyr$y&5XY{{v~G)&&3n diff --git a/tests/testthat/helper-multitest.R b/tests/testthat/helper-multitest.R index 0c721b2..d83c5df 100644 --- a/tests/testthat/helper-multitest.R +++ b/tests/testthat/helper-multitest.R @@ -1,7 +1,4 @@ create.test.tree <- function(tree, node.text, sample, ...) { - tree$edge.col.1 <- 'navy'; - tree$edge.col.2 <- 'gold'; - out <- SRCGrob( tree, node.text,