From 828f17d78286d7ed97325956a4197689513d5fe8 Mon Sep 17 00:00:00 2001 From: Mikkel Helding Vembye Date: Tue, 13 Feb 2024 13:31:29 +0100 Subject: [PATCH] Preparing 0.2.0 submission --- DESCRIPTION | 2 +- NEWS.md | 2 +- R/data-documentation.R | 10 +++---- R/power_MADE.R | 2 +- README.Rmd | 31 ++++++++++----------- README.md | 36 +++++++++++++++---------- _pkgdown.yml | 2 +- data/VWB22_pilot.RData | Bin 2650 -> 0 bytes data/VWB23_pilot.rda | Bin 0 -> 2824 bytes man/{VWB22_pilot.Rd => VWB23_pilot.Rd} | 14 +++++----- man/figures/README-example2-1.png | Bin 50304 -> 50310 bytes man/figures/README-example5-1.png | Bin 47777 -> 47785 bytes man/figures/README-example7-1.png | Bin 62890 -> 62909 bytes man/power_MADE.Rd | 2 +- 14 files changed, 53 insertions(+), 48 deletions(-) delete mode 100644 data/VWB22_pilot.RData create mode 100644 data/VWB23_pilot.rda rename man/{VWB22_pilot.Rd => VWB23_pilot.Rd} (81%) diff --git a/DESCRIPTION b/DESCRIPTION index e386861..e362d91 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -21,7 +21,7 @@ License: MIT + file LICENSE Encoding: UTF-8 LazyData: true Roxygen: list(markdown = TRUE) -RoxygenNote: 7.2.1 +RoxygenNote: 7.2.3 Imports: ggplot2, dplyr, diff --git a/NEWS.md b/NEWS.md index 682224e..e7d3bb0 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,4 +1,4 @@ -# POMADE 0.1.0.9999 +# POMADE 0.2.0 * Corrected formula for expectation of tau-squared estimator in the CE-RVE model, in accordance with corrigendum. diff --git a/R/data-documentation.R b/R/data-documentation.R index 3035d1b..b7c0d7c 100644 --- a/R/data-documentation.R +++ b/R/data-documentation.R @@ -1,8 +1,8 @@ -#' Co-teaching Dataset +#' Co-Teaching Dataset #' #' Data from a meta-analysis on the effects of collaborative models #' of instruction on student achievement from Vembye, Weiss, and -#' Bhat (In press/forthcoming). +#' Bhat (2023). #' #' @format A tibble with 76 rows/studies and 9 variables #'\describe{ @@ -20,10 +20,10 @@ #' @source Find background material on \href{https://osf.io/fby7w/}{Vembye's OSF page}, #' and the preprint at . #' -#' @references Vembye, M. H., Weiss, F., & Bhat, B. H. (In press/forthcoming). The Effects +#' @references Vembye, M. H., Weiss, F., & Bhat, B. H. (2023). The Effects #' Co-Teaching and Related Collaborative Models of Instruction on #' Student Achievement: A Systematic Review and Meta-Analysis. \emph{Review of -#' Educational Research}. Access to background material at . +#' Educational Research}, \doi{10.3102/00346543231186588} #' -"VWB22_pilot" +"VWB23_pilot" diff --git a/R/power_MADE.R b/R/power_MADE.R index cc3632e..4a7d137 100644 --- a/R/power_MADE.R +++ b/R/power_MADE.R @@ -54,7 +54,7 @@ #' var_df = c("Model", "Satt", "RVE"), #' alpha = .05, #' seed = 10052510, -#' iterations =5 +#' iterations = 5 #' ) #' #' power diff --git a/README.Rmd b/README.Rmd index 7fd07a9..6bd24be 100644 --- a/README.Rmd +++ b/README.Rmd @@ -25,7 +25,7 @@ knitr::opts_chunk$set( [![](http://cranlogs.r-pkg.org/badges/last-month/POMADE)](https://CRAN.R-project.org/package=POMADE) -The POMADE package provides functions for conducting power analysis for tests based on the correlated-hierarchical effects (CHE; Pustejovsky & Tipton, 2021), multi-level meta-analysis (MLMA; Van den Noortgate et al., 2013), and correlated-effects (CE; Hedges et al., 2010) models for meta-analysis of dependent effect sizes, with the possibility to vary assumptions about the variance estimation and the estimation of the degrees of freedom. These approximations aim to replace Hedges & Pigott's (2001) previous power approximation based on the assumption of independence between effect sizes, which has been shown to work inadequately to predict power for models that handle dependent effect sizes (Vembye, Pustejovsky, & Pigott, 2022). The package also includes functions for creating graphical displays of power analysis results. +The POMADE package provides functions for conducting power analysis for tests based on the correlated-hierarchical effects (CHE; Pustejovsky & Tipton, 2021), multi-level meta-analysis (MLMA; Van den Noortgate et al., 2013), and correlated-effects (CE; Hedges et al., 2010) models for meta-analysis of dependent effect sizes, with the possibility to vary assumptions about the variance estimation and the estimation of the degrees of freedom. These approximations aim to replace Hedges & Pigott's (2001) previous power approximation based on the assumption of independence between effect sizes, which has been shown to work inadequately to predict power for models that handle dependent effect sizes [(Vembye, Pustejovsky, & Pigott, 2022)](https://osf.io/6tp9y). The package also includes functions for creating graphical displays of power analysis results. Find more detail how to conduct reliable power analyses for meta-analysis in [Vembye, Pustejovsky, & Pigott (2024)](https://osf.io/preprints/metaarxiv/3x2en). ## Installation @@ -55,8 +55,8 @@ library(POMADE) library(dplyr) # Find more information about this dataset by executing the following command below -# ?VWB22_pilot -coteach_dat <- VWB22_pilot +# ?VWB23_pilot +coteach_dat <- VWB23_pilot #glimpse(coteach_dat) dat_kjsigma2j <- select(coteach_dat, kj, sigma2j = vg_ms_mean) @@ -78,8 +78,8 @@ power_CHE_RVE_empirical <- seed = 10052510 ) -power_CHE_RVE_empirical %>% - select(J, tau, omega, rho, power, mcse) %>% +power_CHE_RVE_empirical |> + select(J, tau, omega, rho, power, mcse) |> head(10) ``` @@ -95,7 +95,6 @@ power_CHE_RVE_plot <- ) power_CHE_RVE_plot - ``` ### Minimum detectable effect size (MDES) @@ -119,10 +118,9 @@ mdes_CHE_RVE_empirical <- seed = 10052510 ) -mdes_CHE_RVE_empirical %>% - select(J, tau, omega, rho, target_power, MDES) %>% +mdes_CHE_RVE_empirical |> + select(J, tau, omega, rho, target_power, MDES) |> head(10) - ``` The MDES data can then be plotted across plausible scenarios. @@ -160,22 +158,20 @@ min_studies_example <- seed = 10052510, ) -min_studies_example %>% - select(mu, tau, omega, rho, target_power, studies_needed) %>% +min_studies_example |> + select(mu, tau, omega, rho, target_power, studies_needed) |> head(10) - ``` and plotted via ```{r, example3, message=FALSE, warning=FALSE, fig.width=8, fig.height=6} min_studies_plot <- - min_studies_example %>% - filter(mu == 0.1) %>% + min_studies_example |> + filter(mu == 0.1) |> plot_MADE() min_studies_plot - ``` Alternatively, reviewers can investigate how the number of studies needed varies across various values of the effect size of practical concern. @@ -187,7 +183,6 @@ min_studies_plot2 <- ) min_studies_plot2 - ``` ### Traffic light power plot @@ -201,7 +196,6 @@ plot_MADE( expected_studies = c(45, 55), traffic_light_assumptions = c("unlikely", "likely", "expected", "expected", "likely") ) - ``` ## Parallel processing @@ -262,3 +256,6 @@ Pustejovsky, J. E., & Tipton E. (2021). Meta-analysis with robust variance estim Van den Noortgate, W., López-López, J., Marín-Martínez, F., & Sánchez-Meca, J. (2013). Three-level meta-analysis of dependent effect sizes. *Behavior Research Methods*, 45(2), 576–594. Vembye, M. H., Pustejovsky, J. E., & Pigott, T. D. (2022). Power approximations for overall average effects in meta-analysis with dependent effect sizes. *Journal of Educational and Behavioral Statistics*, 1–33. + +Vembye, M. H., Pustejovsky, J. E., & Pigott, T. D. (2024). Conducting Power Analysis for Meta-Analysis of Dependent Effect Sizes: Common Guidelines and an Introduction to the POMADE R package. + diff --git a/README.md b/README.md index e8a2b18..95684da 100644 --- a/README.md +++ b/README.md @@ -24,8 +24,11 @@ degrees of freedom. These approximations aim to replace Hedges & Pigott’s (2001) previous power approximation based on the assumption of independence between effect sizes, which has been shown to work inadequately to predict power for models that handle dependent effect -sizes (Vembye, Pustejovsky, & Pigott, 2022). The package also includes -functions for creating graphical displays of power analysis results. +sizes [(Vembye, Pustejovsky, & Pigott, 2022)](https://osf.io/6tp9y). The +package also includes functions for creating graphical displays of power +analysis results. Find more detail how to conduct reliable power +analyses for meta-analysis in [Vembye, Pustejovsky, & Pigott +(2024)](https://osf.io/preprints/metaarxiv/3x2en). ## Installation @@ -58,8 +61,8 @@ library(POMADE) library(dplyr) # Find more information about this dataset by executing the following command below -# ?VWB22_pilot -coteach_dat <- VWB22_pilot +# ?VWB23_pilot +coteach_dat <- VWB23_pilot #glimpse(coteach_dat) dat_kjsigma2j <- select(coteach_dat, kj, sigma2j = vg_ms_mean) @@ -81,8 +84,8 @@ power_CHE_RVE_empirical <- seed = 10052510 ) -power_CHE_RVE_empirical %>% - select(J, tau, omega, rho, power, mcse) %>% +power_CHE_RVE_empirical |> + select(J, tau, omega, rho, power, mcse) |> head(10) #> # A tibble: 10 × 6 #> J tau omega rho power mcse @@ -138,8 +141,8 @@ mdes_CHE_RVE_empirical <- seed = 10052510 ) -mdes_CHE_RVE_empirical %>% - select(J, tau, omega, rho, target_power, MDES) %>% +mdes_CHE_RVE_empirical |> + select(J, tau, omega, rho, target_power, MDES) |> head(10) #> # A tibble: 10 × 6 #> J tau omega rho target_power MDES @@ -196,8 +199,8 @@ min_studies_example <- seed = 10052510, ) -min_studies_example %>% - select(mu, tau, omega, rho, target_power, studies_needed) %>% +min_studies_example |> + select(mu, tau, omega, rho, target_power, studies_needed) |> head(10) #> # A tibble: 10 × 6 #> mu tau omega rho target_power studies_needed @@ -218,8 +221,8 @@ and plotted via ``` r min_studies_plot <- - min_studies_example %>% - filter(mu == 0.1) %>% + min_studies_example |> + filter(mu == 0.1) |> plot_MADE() min_studies_plot @@ -286,7 +289,7 @@ system.time( ) ) #> user system elapsed -#> 35.40 0.25 35.81 +#> 33.38 0.58 34.30 plan(multisession, workers = 2) @@ -306,7 +309,7 @@ system.time( ) ) #> user system elapsed -#> 0.08 0.00 26.84 +#> 0.14 0.01 23.07 identical(res_seq, res_par) #> [1] TRUE @@ -336,3 +339,8 @@ Vembye, M. H., Pustejovsky, J. E., & Pigott, T. D. (2022). Power approximations for overall average effects in meta-analysis with dependent effect sizes. *Journal of Educational and Behavioral Statistics*, 1–33. + +Vembye, M. H., Pustejovsky, J. E., & Pigott, T. D. (2024). Conducting +Power Analysis for Meta-Analysis of Dependent Effect Sizes: Common +Guidelines and an Introduction to the POMADE R package. + diff --git a/_pkgdown.yml b/_pkgdown.yml index aae6e4f..7e14e06 100644 --- a/_pkgdown.yml +++ b/_pkgdown.yml @@ -27,4 +27,4 @@ reference: - title: "Datasets" desc: "Example datasets" contents: - - VWB22_pilot + - VWB23_pilot diff --git a/data/VWB22_pilot.RData b/data/VWB22_pilot.RData deleted file mode 100644 index 77b879068206d168f96f99013a9875ce2fe177e3..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2650 zcmV-g3Z?ZQiwFP!0000026b2sP*m3yUVbF9fTCzj>)(btjU7c=bU@)eXx${r4!AiW|PSjWr~i7G)48JA5AgYg{f(i(@du5 zNGe5`qD`?B%KxOD5U5fGpA_!Y#I@g=6rF%cGBxWDogVo|Hn5Ac{huuTbpl ziv^q{D}7U$%L}r?yVbs9W8zUuIZV=Az!~~LtrU;I2Muw9q9Rv>Qk(%v@KyCC6rSCL z0#`mS*03HS8C&3IRbtPF76gSQGR@4vhkSm~ttM`r7!DDXxLUbd?Wq-WOPs~Yo|H_g z@wv4b4xGgYtN02o$kGUJK_MqqvsQ)YgHjSNiheC=F67mdqZy+(+RH#dH!^XB{#xp& zo$Y~zv~-sc;1pfBfexPgo}Ei@2)vu8)2VhFL&Q0RDmQC)cx{JYro*J&ryn^v!Kb9y zxu8Uk((_{(KIw5zdROq3+Orr>DV|rBY2zeOj&2*Ti4eX~oF1-Lo9;lTKyNdD4cmfn z8_ewNQ%^J;;PeL-Ppv?2NliuxPGy2cJyg15=Pb^2Xje@vrq|e5i=7X$;}{;GVu`B= zx?FvIO?^)C-U^WmX}3PMSmp%n>Rs#B z9W+Yzofl08NhJb1e9!Or@UE3eLX}6+?tpn-mEY%L14G-SzG!S6?dluKWIGdL*pbPw zv6zJi|IRV zGdzuX{R8}$GXCR8CZ7@*ew+pJD-drY#2d}*kC;JT#PIMrkmtcV3d1wCu#T6>jaQlc z$v}op-$MKV4{7ONt0NL5Dk9&4N9g7Qc z2IdKNLY+SEEdhpAz-NPf9$*dd*uM(M`)DG=g~0z3a2B8lb`Gc?`%(aU53HYSi0=ox z0K|XQq}K}&x2BgN_IV@JQCrCH$V0G)c%@Lk6EFb$T<~An$#4wFS&&y6$n(HnW_g=% z&KwZWX42bR0e2kH%l>w~jQitW%y5FC-pPPY$fp$K*8nF0;{K-sCZiv$Hw9#|fuSAZ zxj>KS1m_y()nSNd0sLsOetldQ?a?3ir|w@2=YfoU!u_qR)AJ6H-`&V?Ch+3{aZd3( zWEm0kuYo)bWbF4s;L8kgt$>Awc(@<3jbRnwp2ZC3gN*x!>y?8)p2xsVhC@Kc{#gL? z!CqwXOvX7&H{^-?zVma2V?oCI5BCM@<{R{R;ys6P?SL!54)05}TiC8&AJ5C&I()@{%ye}~yyq|E+u>K;b=g^z_ z^>H4sFXdo|b7kyXg`s}Te=+c`28KTe9`^F#5rqN&9KC#uMh75yx(!o zB#?2=@LVMu{7Ovt!{!Y8Vg{hfa44@zQ1vO ztP|s7Js5YKL67~x_Y}&Qx782_bw+Z;U}kKU^=_;D<7tKNHLuX;~5cuI=T2lcp^XuGe=r zk>2v#CF`X}8&_T(LKXy%t$kyFi=6-R{gdXeR+9B=H{BUjnn^nQwe{9Vogx=j zcA3&&{xR7#wxnzLrcQFfa(Zv#lnl~*e?({Sz+2?pm4&Acbq*$HR}cGU^w!VFpL5C< zwT>P`j@vJH4BM7Pjy)aLHZrlDT%RoM8Cmc?`P+z-aSqb}(w%h2zIFNya+2&`(71IB z`D<-n&$+pNvblGD$MJ+wr1NfI%}41iS@Pa= z#*-#n*M^ZQeJO9O;}L<2vv)*}Qb$$y@bSa`jTfSMROuB$v(~pCr2?$%Z9w z_q2S_OZH_%{Kh(Q4{3VkV)AUIlT<%mU0(UNl{CbEJ-WHIk<7__^h63ok-hc3Yufg$ zBA@@~e9Y`ScSuK>Fl~8mDLGR=b@%V0(@955C?(jlo$SAx{&e%*R&ss(Pn&jhFCv$7 zhbMpbZV$Q5ebD~LspH7`RrbS8`{T*>z=-#*-?(J>hPt0m{hHFmzLSo{FA-!V=nj>K zcuoT5g+4}b<9~3x9R3_xy#$SBm3w*4hhqO(ia~biKFW|~tmLnq zfSIcQ{za;X_Sv&%e=?Ti5;+;mi2^c4sSwNEl^{h?2^Vy83OAurqJd59U(2We2Xfaw I6y6sA096@H%>V!Z diff --git a/data/VWB23_pilot.rda b/data/VWB23_pilot.rda new file mode 100644 index 0000000000000000000000000000000000000000..5ae16b9377c3fdf7a1ae2cd7173520e8f8fcea4d GIT binary patch literal 2824 zcmV+j3-|OwT4*^jL0KkKS^YB&RR9S=|NsC0|NsC0|NsC0|NsC0|NsC0-~aFb|Nr~{ z_xFF@{{7$xKYMqNd3BI`dyRA9o*e<|kDTp&!Ba-2N#spUsiPWzdW{~V(A3ePrY4OV zXf~z-dY+R#;ri6MUAU2ajO{CD#rkXTl84V9m&>Ci- zs(MuRl=R6x0Wxh(Fe6OUQGl7LjVGwupQ(~taDnl#f!K*%)!jZHH~iBHlnOo5`CQxnvA6V&t(qeD+olS3dHXwVuO z4Ga@CG-w$B0BAG-XaE2jX`@G|00TklGyni-ASBX>`i)GQGHstzrquLI)M@H%Bh&yI8aALbGHIhjAkYl~rbZ)AP&S~@Jwb>71;CNLdfJIy zJGVAwmp2nkXPhTI6S-Qwe}|e>h*T1UHgr_VCa^)u@Yy+Dda_9K6^DC2Nl^buB!t$0 z;g0@V#v&z9={oa35K#`!4A>&qIbhSaF!s&;AxG%a?=a}sK}=lALPxw}ucr5STE^Lu2;C1t;s-4&^I(3|&`9)FT8JEAa!eWvi%kimrIUJxIRd9pR9DlgXsD-2 zp`3`(rBJ@7e-(-}jIE=RDFkoNsV?)+L#39qQMxUgb6T<1w6Z%oZdxji39M@A-NDn_ z9-VM$FmZOx=G0*9SW3vs?K`detmg!aD1CKAW?mDL5ePxfl_V#%suWFDHb<+RVW?xiQf?wuASOtFiV~p$ z=nR1L?P}x-`%|lzM8cVhfW5Vlc5GB@QCQB6t8SAIER7cU4f`e1^v0$S%$u^{IlA}Be8x8DPJ8NpRB!O8pEf33; zkc5!8b_hc4a*jtC+tYPuD9(g+2DDJR(37a>-vy<&Ojb%F9<~%&Q31&3%`}7@vbk0a zu|1A^)nc#^5e^3wRAH0MZMV z2_$Vz7p94xLHLXTFFx)zW-jL=32E&kNWjlEpJ^nAVF)fCLe0^jz_Z|IzQi^y23inl z`^YOD(?Z9RATxBn86vwWrjTf@;d4wiT1fveF<)N^UU5MM%QUSlo+C3!6KdMUvy0rP z0$Li+v-X<_`DwDkyH7wx$F&9h^khXRCkQabri%wnda5v3walHl_HHrX+=x~j*KnB&2XCr}_i-*?9DAe9WfuD}MgRP3{?Tyd{7*Q1P z75d!&RWMPF#y&}=$Z(LBG#KuhOGjrwQB0jA6{#!a;7>Z7ZmGiNAf|+sr+=_iMM?^6 zzC^%H6BSK9f%4a|E$$tFLP_}Tf?Pf!DFPAioO4@wJxO3487>NZm!P@!P15vIV0;rlD>m zAgtvQ4l7`aK^^lY;7r= zHZ(NE*fvW4*-`?1zV63B{hJr{*wia?P+qka*Z3HnR2gEd5pe7F4qs7KqV#hJiMV)l z5=8aihJam0ps!ixpn)HjVwC5UK%#=RXnQ1WAL{6KZtDRNb%tP|K=c%$JLgc#O-Lrtqf%ciq)uGJTIDB{FcoA`^m=qP-s80_ z()^NT%E$KNl5I4kEg+i$zpXJn?@Kw5TUx*0Szz>@3WEdyV7m{C-pvf^TEav$vti2* zWFT4=2Gw_I6G!Riy)Y=FEL5HYiz(VILP0y6>L5oC%Z)a${p5|uf(=GHh<)Y_jA-wo zQci#%D;_F24`8^jh#b_eX<(Z+avT6D6(xDHdwLZI4acu!U*I+v;0!EIXc%QET#hz zQd=UZG;#}7DecB-tsN{^=yu+`HR>R>C!X%UAt8?{%@t2An5z`|(}2*_+CVOg10@d?D**F=*8BZE5 zA707{jjM;D)tICbrKu-2RyD~hZY(n{WN&TqBGTPr?wKp2ZN#$vw8-(6wsH1fVf(ie z*cN}PIc$kR>$-^a($u=XKvUNi#Y7NJV$ZStcSSl470&}mq6A^JUOBr(T9+uv@7kq< zaF~e|?9Pd0h!o4*p4$^^Ze|68UvhC?PnmeYK{Q%nT|AODAK7_j3w>fxyGis_p|R$ zWoeTK=&&diq8zHxOt8&rpbQfr;|s9tek|(8rldn9W~F!{5aA6pSAg09*vYW&Fvd_& z2!ltuay(d(gc%z$xlXCV_MM$&Mw9vwNA}FXe*8FiKDPKMY`xlM9qQ$C^8eFAhcFF+ znQ)ObPpvH$>;(*mqB$FH+2=iF|B}@;$%g1hsmY2-;pr32ed*q@!r27IFZRhzDpM|B zJk;d_ajz{u0!=p7G@~A<pwqXxh4;z$c%am7bpeQrW3dyM@G%y*q|=ZA$0-+P!U)H z1|Wjj7^+T+10!6zEf^CN##FX?MDuaC9^lUrPvkeP@@iQNR+FZvoH=~d?LJf$qYpAn zYneDo-X@J1GsFq-sFFpbUULwAX%bPgY8=Y@RQE~R$I^U$a;~rA8==&AWSYJbg}Gys zTwyK&Kv3W$G$90Z&UAoEUPMoca&#mw>#@g7@M&k?hPSCRa)Nf?S^&6dX3i76PF3AA zvWo?EPKe~{rf*_Fv1?b5kh1vYE2&*#o6sbET~(V$?t0bam^RlT7GXVJUjk^SWj8hN aKkXo!!OW!$tgr|Fi@744C`f*phN^&SjTOlN literal 0 HcmV?d00001 diff --git a/man/VWB22_pilot.Rd b/man/VWB23_pilot.Rd similarity index 81% rename from man/VWB22_pilot.Rd rename to man/VWB23_pilot.Rd index 2e37806..b940c5c 100644 --- a/man/VWB22_pilot.Rd +++ b/man/VWB23_pilot.Rd @@ -1,9 +1,9 @@ % Generated by roxygen2: do not edit by hand % Please edit documentation in R/data-documentation.R \docType{data} -\name{VWB22_pilot} -\alias{VWB22_pilot} -\title{Co-teaching Dataset} +\name{VWB23_pilot} +\alias{VWB23_pilot} +\title{Co-Teaching Dataset} \format{ A tibble with 76 rows/studies and 9 variables \describe{ @@ -23,17 +23,17 @@ Find background material on \href{https://osf.io/fby7w/}{Vembye's OSF page}, and the preprint at \url{https://osf.io/preprints/metaarxiv/mq5v7/}. } \usage{ -VWB22_pilot +VWB23_pilot } \description{ Data from a meta-analysis on the effects of collaborative models of instruction on student achievement from Vembye, Weiss, and -Bhat (In press/forthcoming). +Bhat (2023). } \references{ -Vembye, M. H., Weiss, F., & Bhat, B. H. (In press/forthcoming). The Effects +Vembye, M. H., Weiss, F., & Bhat, B. H. (2023). The Effects Co-Teaching and Related Collaborative Models of Instruction on Student Achievement: A Systematic Review and Meta-Analysis. \emph{Review of -Educational Research}. Access to background material at \url{https://osf.io/fby7w/}. +Educational Research}, \doi{10.3102/00346543231186588} } \keyword{datasets} diff --git a/man/figures/README-example2-1.png b/man/figures/README-example2-1.png index 9c50633f93a3fceb70b6fbde0e87904c32603fca..b15877f3ea36b466ae9d1e102a8c247bce2f38de 100644 GIT binary patch delta 13955 zcmc(G2{_d4_xH@0u}xW`CdyI@g{G413@J)6ZL$%d7j_@`Tei|d%eH+eXpzLiuvB>KIh!$e9q^b`x`No=VmBR zI_nw)MX>VwSx<5sw`vKQt!b8y_Da7cepI&KJ}<_=o#%o`&B61loYB$mkb;z~p3UzM z#y^h{sLOx*v8(Yk^Pq#TNuq#7@@Jtex#`mLKVKV_movQAdv4nM!Y`Avf6}M5H=xaX zxR*81G(6;gN}p-sJK;Cc)=KvuGNrc!RCo9DLwJ?yj!t`j!Umj&G-6Y&i=80n2Xl}n zCEkpJJM+O;jb00Kbo)7~yK-URb-d|xNfAMm+E0#IdskYc^Bena#UcG^o3FKR6;w_U z&;Kdrgx#4RR)KXw2&G+!ryn-p&gD;BuGV|u!9g*rgZGIJFZ8ezUsfDSAVbIYHAuf5 z?k|h(pq&1#MH1}Q`@>fQS4+Z=bc#^LX>z`a?zS={_X*2xR{Jc5T9=Slb0;lUvUS|q zyK4Msf;Rn58mEaFhK(==(%gWwy!=YbI9vYk=wR6XWdAMALWnQMz`j6O=>4|umzs}; zs4C!2n3c9b0d0Ox&f1u|Y6Hx^s}GGEV&9I8KS`K6`+K$5plP*1jgot_fjwy-@yomI zsN~L`*jx=y#C@w8Qmt{FO=_H^|C0+|gH~u8tkGyix?X{Ztfnyh-pF88N=BYyW+c!- z7KfPkF%Q#)YsECzl=*qmql8zJ`8h^zqe zV-(7XF7Ao&nm?A?-(MLzAWLPsLDT4j+8D@k?eWU~SyT4x+wylYF%7uWj!ETL9VG5I z+&)J(K6`-_Cf{>UI`@QPrpnYxmCpqXwYIumZEfssB=dEba=L3$V<8$ZuLtpmt5{-P zUk{UPF{2e!M%H)r%#f?`7oF($Hw)skI{VLfA?99o_O~~3GKwn8XOLNe4|I7wr1Oe4 zMb3O4KTsoXUG0E*WMrRL)YEFG#<`Rl+y4D{Bg%V63)_>>UW0Ja`ly-SS4P;-y8*YV zyD(Yiv_bq=VCY6=c;uB*Gbp&kH)1PJ)rzq#z4FjBv$^Cf`~}kclS|PI`%FPN@Iq(` z*5BV7v*?jfDl*x?`DsFA!zrS34WjDm%|ny7x)WUJW3hG_HA8}~gx9toefYzTtcYDY zf+{^=%MAkf3bz@}D3>M#`;|G(Q)7MGLZRcD&A6s<=vD(9I*<)JwSM{%JaY2nxKCQY zSmW}xvHCf;4Xe1q9w9cl0C%7n8OC+y@Vx0x^eSqkl7VCSLUe2_Z^YeHU6-D(1V60P z+Fy&QX6(0BFIOz7d>NT+H(X(r3e&ynb*-v*f!%1MH~E~v^V5KMPj~_H&_fSYhB8Zj zXh);!lhsb8b**1k0bALzCw{LhhMNTg0{Gz;zmpM4II>Xt#6gd3jddm2D*K3U$N}VR zo@eFyb~>W%UdG*GJDPhN_9e7?72NZ*ue&{NShI)N^W?&9VbYq{r<{-`cQfR0=lZ72 zIt>`BO!ZdkLCr&AXojb8e@)2n9^!`+302a1B5s@tGg#hCqfubM=)o&quMCdEkLbVO zxO|MBwNp)}3^kouikXic@-)D2aZ+fT@K{8bLI2zV{VB~^mr<7! zh$!0>48WH!m7nNCt11si8ON7#gZ(ZNO5W=iJEWr5i;R}&4GxC{{ zi0LOqV;;e(eM`r_$=Gf^@$~+$g)5QC=j~3Y)}sggS1|I9zzJTb%VE>o(_rI!m#jvc z63@qGbo+w9`DJ*EIebhsZbd(7LY(RtToQNf{6-vY1~M&a7B1Vq3Ab(?dONjfamQd- znb*R=wgS0J(xf%q2s|!M-3H*PfKk{0ClEI3Ig(cfm)NYiA|;Czk;T-bMO*qwSK!S~ z?5LW!*3DlNu0X@4U*n~K?GPS*Lw8V6le@o9{ryT&7wr|1t5A-`15#qH4 zAqI=)l{um4g#3u^Us_^BjMlBuEi4wdF7=KVl~psVdMO%LB-px_xN%lOh(;UY`5`Kc zO)CQOVaxwR_i!EW5csqTx-MLb~Cs3{t9vUOhZZ7!26)SK%MRc*ZArk2;CA zaN!ivpyg{$TtQhl>BF@qpYNVEAo?wVVZPdG>d%}9x0{eg%a-Qk|8{*9pnfbSoL68V_+uAq~g@m?9 ze#Qze)Ga;>-E+!{9O~sNKzAV4%rE%fyeM=7=5yMY;2%70NVjo^M;`UtshDZPMSt<1 z1N-#ib<+)Ldi@R7-OA~nb{E`bfpv9tN;M7zA}otzM4d8)Aj8{83y^F@wb5;2%ck;da_}K+_DR8H>DfO;Sk-eC!b6|MOrY;5aOc` zd_`m>s_K*~7R4SUmYUZjEUEnSV0#Be)FR#yI;IGs139tI@haimk~n^R`6=6TzqHM_ z`glGLaT<7J%waI;geH01@RRB`oNlN&FKLZH3WJ|9cMN*wD7qkK5nopo@wWAuGOm4w ztsPwQWAI8`P$2NH6G5%(wQY#cK2);fZ=XdTs;ZAgO_}3KHP~;>9&z_zy6a8}YIXFG z<#0QB6C3X6)T4LMAHg1!1slE$oc{oPi%fp(GvPTttRE<@H9g;p#nGjt+QxG9b)ks} zy8nwdqKGWk5^HqFEX^?XFuandEPvH6uc%F}|6b=C*O1Ssfneyk*19<{0Hs=fEvndP z-H8Zn{s?>IB7eAGKPlvO-*Jkg5iwF;lVrg&dlwBX#0PFO-Yth4yq|qdo5nYfVh+4^ z$}?96+jsA}CQ*<611hRVa}4QP^?$0WXsD5dhQCNU?k70;_#$pI{8oy>g6gyqVpB0; z!>UHYj@kEv5-e$ufM1IOIuS};%@PCX)u0(I2ZPDN_8S=-TShX|w=$@ku<0coYxA>n`>`;=SG*JJFqZK= zqSS>l1-V`DpNIT*>Y$jUB!v#oiN?zs`4Fie)|YM@g3Pi#hBBE);eHv#jzr_D3sYlf zSKWfCFyFsgK(ODlXmg~D$!`k|G>asC{&0m9%*NBNFeI@xGc%;6b?>*bn+5SK`MB>$ z6V`*D!#T0-_HJAnId*;Aa8vU5lWUdd?Komj7|!-IcZ1c0c_idCQJBg=eq>F48Q^^1 zfU99P)9%8aFGllqWHMGUQ?k+RB%Wj|2alXpltCs(OlP}dj}vSB$5pq*`SZe8*%yci zTqt5YLZ25?o)=1{Ncv@C8%EBW-vp*2);K|^;^6XIzRI1&co_3PLCJWFcBR}*4)K{G2- zGS-dXnMg+}a;|)BuUNO9r|VAYd<%bgWI16&&-mQowc^&F5*TM}H4t4+W_Az91P%}r zIj8%FcX=Z}O0@PXRoB$GP}3<#DWXt(ew5PrCX|)v#@hW0cdRCCw%DH}Hq)x1M_+Xo zN|bwEqfD+F-frBM`9lTge{pQf>mD28#+C|N>ifgDUlyX0=UY-R&eHuPZZ*bpfi+7J zrxxW;@C#}8aFJRAQ;4VbE(m*G+54O)l_|c>vK>wGTFjUuw4~u z=0$X&`bk`u+xMeL5!?!&eG_qPhs@-f6cge>2s(0^{l>+D@^CXwwOXNs5I<>3%rE2qqX0rN zzs2RN=FG8Jano9eO}|i`KOD&|DolS2HK$skj1Z4e!Nn}D@CSM9dyh^FDHL*>)@E&cc?z~0z6Ue5Pw88R8EwFZK8eN*y$IrS{6voVq9F}B*$wweNx6%KRRDiphc0!Owh^}xxF0a2J)pG{MB`| zfQpTT-y7Jo_~2rY50d0ZsP~8%CXBTPcT{0<@zcP^@gVjsjczj%4AyqB&fE-bi^zrq2!0ksOAW# z!=HYC9-vMMn|+IAi7f?O6P((kZC-h`URv2o;fCe!kBU$ifP$sH*FeE?@BG9d8cUM{sy4W&1Qd1HBca%4$8(tNm?grqIawzRD=~hBYl{6D>U|H1} zHb`{_!Nx^<6+j)0tZERIMJd(2T&%l$h?^8MLs|_nhmvSY5~)`4HbR$d8S+#>W_+Oy zrSWKt;eE>qc4Q0}JwV$6a^+Hdd-CVUBf1y|0)N|Qc&_n0af+fdi zGjyZOD{o<%C%wD@!S81uUOUb)BKn;!5CKd|L{=0WPB!B4xO1lf#e|1LzjAQk{aPms`d9cYIqMzj- zeP8YV1f4q4P&<@@$)%A~OmM_68pw})om@Uy#s-Kp&PANTS>w}Fr!yJ;x6OIMP{2ok zk;4~5<`9M;#l_MJLUb7<8Z3yF?HY>l6b-#WPiwB}JuUXG-fC(1Pa#n2$NNaI z&?T(H;$mA|B+C?d;HyBFrCI4YRQw~)7Dq$^LIGGR(&WY>cKX00L0WvvdnY3MN4FrO z)aTN)-^^rh`_UXoXd|MF?{7kFec)qySz!DDBo(s)k7^5%!kIh13myan(gM&Z87p#Xfi4 z8f`(z&m>04YF<_e|3 zVhVbVY2kCPMc}#HbG7GZYTv(VFuxl>aUeqH-vj^o7El=;-0sf8l$g7`?j#>v3oyz} zkg^fcjI1XL6+F6y_wH|9kJMea*yJr&L`lTcfKOHD$G@($=_51>R{m z5xF#wacpvnH}NU3oVaGBn8{D754n*v1sx|D-cB)yU&)X6!-*h}=j!c2*l#BpUQKXY zWY{iv<}(2X+i0q;b`&>&h+65p!pL=a$1i$z44sny{Rk*_+-K74;A6UmK0U>tOXAKKQUvhT zR`!^En%z}<mDlVYa4VZTYB;-CDfz=C9q~jR9PuQ0Y(*M| z_2*MwhlvC^ZimJN&OOUhl_flPb5(v%T%L03A$R|UBdF{GGe?SOteC4%sOD7T=B-OlK;6vrG558gQv97CEUy%!8V9@i%X7+e_=4T`5XC82@|ta%LA7n2 zb9eN``-q7kx=7>8GrQ$6fDn9Drw;1lj@X~Z@8u|X^4i^|#2Q`8X2h|^4WRFE_!|e~ z#>pOHsRqq~7%N?Pj?mMk{=ZX? z#o4dyjvAI0u2=8)J0S-7p*L{@F7}_F0t1%b!kO0)VRkT^lMuJy+7uunYsa+=se*eY z3-rZk3c<%VEYGmG1$J?|!8J=nR%UrZwM2V-2B^B#ywGOccj@<+Uj(>KI4LBwZ zzY{;=_``|+sP`Q9#*sF$bYyzE>;t^YHgswE;K!))b0ne$YG7`BB(_FAs zb*KKPGtxGT#B9(o17&j80Uf?JyTgXtdJ*D#z}$n9n~0-SB<}bR{FM+_{j-u@tK-bv ztz`;LQqIJ0hLY6%#?yuT3x0xd-9~d+DxfN;g)IZ^{0H-{H=ULzw_Xe0E1N9+Sfo%%+8<2 z=XUpc1sv7Oolvevt8r&XOB{A^2?#fRcq~S(>pLHN`#Ha6yCJceOE(K_@lKjc!%rk) z)0?5+7Z-g7H~~_@8U66lnFARaEJ?+I0p(d0@hxeXDrtxe7*sqX3y^LXypt-z>vZlR ze)#newMU>60fn&zPmkeL(Ps_J$7w`@YMdqOgIzqK8 zdjUqA0}$@YtqWje#wEDm*5}4n9L6~dFtPvo9Tb|92UCkiP29ES7!VKqm4Sf10RcFm zFT669;~9UsW_G+TLAweQXtu8*7Br;X5Lxa?mUGt=ajamK*IeJ)wE8v)xW_+uWn!u1 zeRd2y2Xsr|zsiFlKl1#`003||{&0Ro*BwDHw)izaptvW7{vX8pE{OW? zxK9>}w8kpPFlr5T!i^$dR!R|G;!X0H%rjF+3;*(V(R*!}3v+=)&9TtJ${sOmD3d-G?b zUa3F(UB+_V2YaO@$XLjJ`&4X6uL9?r*5}Lm$Yd!&mCr8m3Hdb1Z~8;rIf!I1?26nF ztL@=#zMvLs$N+0Vgv`i8TB?NvXRn5r7yl~r^%W0;E+jSjSI0*3_o6f zSxf~lbzN-aG@1b3qF^({MjLKFAOF(+7dh{tXVtSA`Cb8=AqxXyb39|?{2Id5k)stm zaJs+VrPx;LUzq80wz()#Z#WNjO8>!7FCYop9Z5ZjG9Rz`KWl38St;)A9WlSAeyp9= z+ujAGI7sbVzH8vTEN&+k&Xv=~`L0YVr(tGy742P|6V7lJI%%qX5X-zw{jk#`o+wh- ztj>io&Xht>ar>l*@IZosJfRLj~8b6Xp{7Ww7m*jiwJNKwOTXx1Vl(T zHPfw_@92=)RNkloV}JI#nf!zB${Ipi&Xzd4!P5gf@T^7$MqmM@HWal3nh)wL>~1Zd zzjE~)#&Yp6AwxHFt>{?Z_M`DlsKgJi(J4Ip|hoB5DCYfq7j& zILzE|wq}7@=xY_+bXh=jKkWFW%HMp#Ys0jDnT6L!qc!hNK`{bLVec5hAE%{~wt-52-LPjb!=@F@0p1-uDTc*8q(cx@}7cUj;@ z0L&Kg3Oz%tRiKj}e;qoYBjPr&A6z0+w3l(>iP*GPrR2xpcyDlzy3BxM9_7)iL}Y~* z@7w<wK!b&YP(+>WRAfs6jb zgUOkJHY>FsiBcsN=Y~tUxsEjfSQ@x3%vc=n=Su`G;=-T3;rZ?jIJ3o@4hlU{>0ii^ zgfX}uMp#~Cs-~m)hd zGY$&-68LJAFUqbw+v&@SKl~|=mNOuF$i4jRFv{zL<0xvq9p^)r+H6Jp0Zwfd+9W=2 zPyF#2Z05M0%{K7Sf@LED3>x0-0<$jXt}hLrZ_E5a9b zi+ajHfYg9EhBm_)ecX>}L+p2qm#(Q86`hb-m}Go4M#8ST()FgFAIA79)>nCT^bQF> zc+4pHP@riK>!=nkI3{QpY7F%+$#Q^`vf3Q$xF7u_+fpo(5V0Beht~&sZ)ND0d!0$n zKoaEy2fVs+kks)=xsX`na()CtoDBKn)QKi$wZLqnKVZItZN?kqkw^)LbVp% zLpq(gMteL^ToB&ei#qD|-pjAS-0J7W>#FiWSgNXC5cYdl>wGEOt{|T%ZXIao!nSkj z_s=@T{jg=C=B{5lvmfC_@VZLiZ|P${Z*E?pF4Z0-+&bPK;1BJZ*=rh{uIaFI3Zd1h zI)x~l#=Bqjz+z=d7F34hJf@itcai(?3PXU?s8N<-;5{VpKHHJ@Z+a|GA?58-b^%1o z!}}i|azD7n4%e#&MC`+UwOe@amXp(l0{2qwLu2z8RGC; z!nrR#VYL;0tp4zDn3(BBwfs{L+x2Bf7iQEC(5PB8;Fy1u0Ih)MipUhWP3o^L8|^;1 z>&hAj!(H;XvGzAvkrD(rHth5B0K(33-)rzKUgmh_CH6_Mz3pReynHpBoJZ%9HuHn{ z9TnTDO^Y5~ed%rIute>n6@^4iaJo#?!S)|rYISxv!Bz~&`}sA%ktdS4UU&RdMUH zqTFmK;eN14wjZ%f>xgZ*rrttp&4sNB>+Et1#-Ud4REm}4((*FQ$Qh5pH0=(~7@Lha z!W_ao{ecn(K2zaFU^Te=p;29|3SoEC_BH4bithNGKUhAwj-uWnm-V6dPQ`aLGmPGW zo@xy3D{Eg&Cm7&4i|Lfh^?4yTolaGaAs6unyz2;Hh!T-vLP<_p3E`NoD|wB_pp)8q z8eOas%B;*||1|H3!c5Jz-$qP+L_Cx!ys~}mx2brA-n)&`-$uS@5VrEsXLTo@Rll!0 z6!)pELSqH2UJ}VK>m`rylFcTc<7b?O1sN1;PM8Vp6iU)#b?7@`qEZoFgV$=WyixGH zP}h(Ev+u?cVTKB0WXP}B?mFyL^LjtKT6Mt%%1YP7Mz7UW6-V|orRno4A=sTD82pA= zK3v{ryH5)~l#Jru&xv__Dep90T4rw$V3sOeFF~PKRRzs_qilTX3JGberYoCi6oP)C~P=SH~Uc>!a&YPy6owAwMG z>HA4|bEQm+DE0H&Cvu_koI5uMTt~MI!<7W_K6qIAC9az(>m4&5Fimd5%G8a#J(5Qp zpjsOF>D4>;Pj6fo{DA}+>svN`y61W_G|W2;`Lsi_$vY++(x6az;gLF)6ODV}Tge;R z?XtQh&AUH7xegn5_m_jEui$#h=JCO&hIO*I9HXbX_db?&h4rc5i;I@N8@;|tb-wt{ z;J2$spyy4EV;+8=%rfaeE7%4uD5sYrP$LS+Je?QdVm5A{aDDt3O#s%9;tG7e&$T?t zI})YXYJJbN{E|E_cq}@o_ja2|%SSe!sjzwtlojAs*Jd|Y^J@CF!8qdBwe*grGY@tQ z>?_{`<&5!vy{nT7a~BaQvgSr`O+A~~F>6CdD7EFu;*13~8^SQD9VhQW_itRcdJ0|C z`zEjDoOI3A{K7HR^wwCEg+z&lrt|CvVOq!2Y(ac5c{LC50RoQTk2!duBgS3|si^qUhbbVQ}W(~EiO@hsH)dY=t3(qADj-X9(A z`P4&lI1iQFGZOO<>eO{E<9Wl%ENCwr5BIHF3-}UvwT;NAxGUEzFhQ?EWCDgYx&xQ0 zeoRPGk5 z_|`f)iR-U;tMg*+y8eTHkX9efgRmFtD<(ZIZtiWNz0>sH{7y)uD0dN442T`3BG7q^ zm)=y@wPDjJPkubRV)a8AGi=DanDx%lgO^@3-8=Gb75k414Dnvso-Ug|-VYQUkvLAM z=*?9!z?6&l*OdEH(jJ;(&V7=Z`h0%ka`4u69-F`Lo4fNDU>z6P}L2( z*plPxfewbjQ`GrIa7+!p53Y_j1`~x|{q~nT{aMkd2tP@`fM>;3!p6Ne&twX0eU%T5 zSq%o)RgHadb%=c91WHzy-V3uMcvM~M!J%c(nt}p}_Sz-JUi7R!vKS10c z9^O>>%MUK){kz9cHg}0{C%)x_BZ$PDOe@{}7l$`#7s2XfD1jM2C`B1Y2bjT9!ZX)W zG-)q{QLugi1QJ&8y;J|igHj1d^>kQTfsQ83QX5ETl1eptp76n&vx5Ao-nMj7|-z))pU!_kM^> zHI1pRsj-Upazh_xzssvbUrjP-uTyx)Fg>$xZ&&7sHnPp+Z&bzOl)Q%mJY&H!u z4nrniI$8nVUaU8jC#xmFs^{_JPf#!yG*{)fz$_Vz*9FyPT;>U1+lVZ5iv8wi1Fh3$ zLD(kq;Na$NepzBV2r$_M3u2Z>dycnGGbEXD!V}?h!$ZWYa}Bk%n&*&Blox!f-ZAgb z60jSHMNg=e!&dt#O!s%un}g2XulpW_bjtf-G&kmO+?(j5f9zZxFkF*s_{nB3^&!96 zNn3Y6$Eu^m9-7FR`R7(-b=#0+`OLsda=res>OMzUdOb+g@WZ)6c)uwq;|(e~G`Aln zDTKBtEJ{Gh%DJAe$5a6 z{j%TD9|stJh=Bhb@!_FNtj_m~uSumAZ?rA%!;VWke>zTtA&?*jH@3HZ%9opFrny%; z2C5hm^BG+B3cgt73$X(~2DUBy=#&4WtM0on?VhHe4EREg`z;q9jtE`ng@yc&Fo4qY zZu16jKfH{xMU+v{dB4HV=kOxQ>%bS-ftRpnWOe!p7*UG?&pZua>uSb|++zs%2<3Es z8oVn*v|u+Jo<}h$)IsJ!qj{8&!eF>|h6wE{9PUpEDe8x}W_T69fv+;dIqL$=^|&ts v*YKTq7GFovD7g*yq?DFyf)7&qN`k}zF%v%&8}t$Ia@hX8W=5%o_SgRx6L5mR delta 15603 zcmc(Gc|4Tw_xC*$S*9$7sbp)TETfPm%UD8-X!(R>X!%4^N+JyRNE0ec4Jq4xRFtUfoZ~rEp+Wz5z#(`%4fh}isPhDIWxcPuA->DlNYWLS{NICB3XRmZ5tl)A8 zR)IULHe?OQq=m&ULYX#q?L$7{*IU(|S?E1Hko1gpt5o3B_RA6<4}CuWyn8`1a$arv zYvz;dS}x9c3caqL-yWu=QB@VjRoz8fGiSp-Ht@r=Q(^B*3g;$tNL}h|hJQ5V2`m*= zH^cj+(lO{-9`v@3(bbi$wVm#p78=j#hK~7oO>V(Ai0#|GN#km9R=+SM-1B>8Ld+%O zQ`t~?!A~;DdGFq)q2ol@PTH~=`si)%=#CY?`Ql^6BUWd2yX2wQw0kPnSox07Dj zk{-urbAOb(V___m;aqBnOsXYG>>>7%fX#S>4wZ8s;5g+L7*E!0it` zzjlV(q@-Nq#3`=*2688Q0mGV^e)%q$#l9icT$f8 zejR6!GNvkOXAfK7+;gXfhLH7*+W6|Wr7^5Q%sys{{EOg*>CnFEOM%z+?MwE0TX7_C zxOk6LGWMfrVCiRW5u;DrHJp-7Y%NBFPd#;yzLXnR>EcYV=d3zcW^UbhB-H~;J4}T6 z#4Sg;z97>yYrV>eoJH=o4H6j~hsn{qNl* zdVv)$i;eaXxXs zS5TR&z^PAQOPzJJhiwzr_cpv@@3WwK_Fh%VUG%7wIY@fNU_UjHd! za)wYPzp^;8?^3Ag#$}ey|NZ#O+uG1-TJ`NW5q2I+8 zMIAT}2Eutax8(H)e2_ewUYYE#pWpAcy|*A1%OFSiK;`>ugv7XI&*oHd25qu2Abt2e z9$D;7+y02Si3q2+ND9$<1L`CB+k7DZWc^SLqIl~PB@%L;O!Y%Aetz=3@09lo^i$8< z`&W*!=a12}oZF7IJx6VK1JgFsMZLId+;2h8+q(MYDgmZBe1Jw^EA_6Q4e=bgKGo3C z@RDsW-3$lfOMJ)^YRmTEn7x5I_Yh;>#08t&n^BqWpB70?WA95+lDuWUj^^+G95p%7 z{w&%ESC3J}$)m!ieY>-?a!@5S1Y z7j?IPq0!RK;Hx^fEaHa=Qh3XEl0|OO9?7dFCiI9EqQX2rnKIwi@C0$ZTq1T$MgxX{ zPOt7$j?~II^uoYMlq`f8&Ts3)lRYfgn&Hx?LugcH2rh!&J0-@PR9j5lh8GsTCr>MY zS!aZO1C;^A)Wz)hA>Tnx6J8KW=v7mim{0c>qpX%W!)-$yWajYGcY9ctJy|gg*>6S7 z?)=m>4Dyg1zLI%&vgTV-GIlBsIecso)Gd5EzoyeCbc+Ajr2*!txqzL2VWggeoDXS(m8&Q`o##3R$KnqGq0_n`e#3Y(YkEgWyR z;t6I{LL%0&H4I}i${ll0UVKH(4YJ9<-!rx*Pib+gWl+Q0rYD;g&;FITzX-?o;kB_< zTQV>poWj>UU9S%?xD%^9(N06hFHdC>(baXF5eYN%bzGSwE-(l(=qZ* z101Na_j4?VuRlz>o0DsoXB54kl{0pa`~J?13120ho(Zk>(VAi?aWKX4mhzgw3MX=v z_-PxFP{(=~-d1g|)KZBs5LE(2&U;U{xpYS@z}({F*Dq|TtOHsZY-5B*Nz2w$Joyw(n6JQ-&1IiUc6Cakz@zVlwazFgw)-^4t zT$BCnE=6=#Nt1E1qbP&?*yc3JZ5?$Dx9mEzXnxx4bNFE8mIcW~ow!ihOF4(kNqLj~ zE<8R(%?wSBRY1R06LzKN=zQb%xlJm6>P#{GQIZB`gi7O%w0iTpTXQ?gZEv=K)4Osp z1Je05hm$wDCSuP}%k91nyTJpp z)cF&1lmwoTLh#)XNg%7opo2N?x^DlW6}u7Dg1BkTWY_3OCM2Yp6E`afLaEbCh7Cc* zeL&XgW_y2oGoQF%J%;~WO~Q^!Ur5QwkvnPilrR>N5N#P?uTN^)=`iZ-$vcOsYCKo% zOf>`Bf4DfZ2Y4>*m4sa)N8L#L3#+%U9>Jnd7$?jK3@J2|4x$CjjTdajOxX-?P3mk* znLIm1ZdT~gD1D-n;I&xHezGrxJ>G}X$S;l^rtBkXt$CfY9LbhNV#^?W%DeJ>7zeE| zRU|+Y#dU({@1&Vf2agw-h>7G$3(^c!R~!1UHu%Gwl)Z$eRoPkRU-J@FlSh3wChpM@ zq`5j@E64Uqg6Ks%_IeEji9-kUv`?%=vd~Lf+-p!{-peFh9d0yOK?0}N4k*i|=x}Vo zFWxiOw?)^6&z!%>U4=0=e%CvY+J5yWjA=l9K11i@vZu#$2hCwfD?%w@X<;6g8q?ba zP^YTM7K`kC6t!SOU|J0Nh|~hSPg{3db!eGck$rVyz?p*7sVF)?=hu$Q9Hh zUDtLUfPq#7Ms~3?$c842{iDI|7>RCbmi`ZEtAYbbYkq^ifSt6WMWxM#2l=so!l*YtFAhZ!2(k7NeH?HD8h4VBV0>gO}CeOaaAQ+nJ(pwh3>+SwpZ@|5O-_&WNxQ}=nZ>x zfh-2%s$E7{Md+9|>1?)G(VMTbcro|nkCiFxhF(CQw8^vQ&hf8aW*fb0LjB^>#6~k4 z8oYeWmn2nK_N`Gt+{XX|9TWNJfo?Q3(V91DB zRNr=SfHO!TyTLRpGO_`GhEjH)56;kaRW|+f3iE1<-XD~OjcEg!#|qv+ui@Q?P^zVEkp*e4sq6UJ@=R!d1_ibx#|W8vU`*yS&2hEr^%x`_(~!t|`6$V5 z@BGBf>g4B;YRB^nGlOXnkkjV!ECj?ZjP!+h!RhcGUaq#1!co2B%% zY^9ib45IUbdJMO0FHnxdTK4#}nnTKN9^MUlq^5Tzg>KRO;y5#0EjYwPV;q~|Z6rWX zJY_IgrCM!_8-T?jM2GpREi3c21x{sX&X zsI39l14_0BnZ zTAQR6hHNw4(%Z^P_ZsYdjkT^F$?Gw0SoBlt6^zb0ioX5aK^HW4)?->ssqR=L`%Vea z432jn$kW_Mloq@5;vcV*IZbdZp6sXz9qY}aHMG_)6^3hxig7u?GD~h#X0Bp@C-MqU z%Ph?gUZ=7aCA(fp-ia~3!OE=bX`gOJ?b`(JC+Pw81BkS8>Mh5qSZjnQjbYJ*#tsU< zS#%CpRZUqQIHP~)6mZc4xUk_0Vy40xAiFoqrA(NJ2cXu0vWbP&3~wQ)>eQ>Ld}W*~ zp-R~3Y|SFAr+~YqU%YREk9IxKQRwlVQGk}C5s=Q(;NracB?nV8@=MMj&%LGq0|)?Q z$RweiaGdK!Rlj5s99LQM1!V1EfR;q{^@K?P zXziFU;-gi3i6XQCGz37^vPq0jG!Aq22659<9|)Vk4Z|R5wo=)rBn^CuEIO`#W6sV; z?VRTYXWZW}*qci51z;1L+HT7}=a_z{E2iS)0CJo-ei0~WA8`}Bkac%T950fpMvp~O z7l23r9mrs_%j|>Gni_Je-dkF-&uuV2XiXjx$6po);3u3=_outv!B{Fqh`#JiizUC@ zSImL>zO}*_BvPf&(!rkE2kp3U|I23 zqTTmWg9UNv!~Gz(Y-;F_k^j#0gJ$2lNdPD%f!_iS=Snm-T1(oZ?`6ZNHmO#Ht<*;_ zlF)*LS#>rTIqD5^6I&K+>bR2#1$?MuoqXbAC+*$(|Edl*)Kc0m@(|-gIoQMpnoZeK zlaT+X7Gg0i`AjpM6D(%_fCTDf&LG}m1W?}X2N8#XM4aa7z_%ksw$bxK)HR?hFusm< zomUOOVfgD&R&E6*x)LOklb{f?B$gUAe+!WE#Oe^8X0DTA4PlR6>gZY#kn9;X7}UCG zR;;rksb@AQ0@#J#_UbgsF}U}ucaaO71aSdG0bnX;5GN~kj)NLcG$G678qml`L7LzA z*Rk1&;mZ6t*il4}t(5m~MCoJbE)RQN7Dc!A0rxva;cfFc&GBKasfzXySt^V|9kZtM zv3d;rtSD8_9zS|LLrtvqKIA83P9lJ+CZ@61df}bI?@Vpd!rxz(mc)-Wp5_cHeZ_A3 z7KRtSr}L)i!}F)Ro!LsUe`DnGX;Q4%>(*u@ZTO;4b|_Xz{fnxag+RgdmE@M=3Anul zsm5Gl?q!g}{xlEg=yGn8ZR-0`-`BDkvY{OH8uF}hVzR%MhcMs2 zq{3-(lz2B2Xs;g0FE6#6&nmioJ3QMXEji@&dQbM$w!cvYk=~N@{axHh($ZQ^)H-t* z10;`X%QAGfy!@B>b#qB(~j;&YQCgL(2bRKZ+Os70B0I5 znfXGIq8?k8+;$5_57g(Va=PtZF8zL_NhLPJl{G4t&`ygdvKb#oBk#rJ5M*0Nyf-E% zD=xQbDqgkeJQ#CJ9T@cm5rI32ALcS1P2eUAnS1L9^U-EV;%uBB5(|MZSaXwy^xIgt zyPj5cXg#gpZzL|J)9VZSUg4*_kIck1$QdZ@6P&y%fg(FBu<#6(<+fe!6&Y;-}HKrMm=+78pkqDJx<=3#b zY-mp_$eWxT2;9$EHDlLa^R1?ndXA6Q2;BZL0VkCng}^US3_UgVsF3L7hw^B_O(3#; z^4ReG9Z58NrgBy4fH>YWg#i1S5pX@e<9C)Z?1?_40a3&Y5l!a6$;4QyD z-}(cZ)JN(zRy1AdwJZnu)-PtaQS3i@pF~dkAI&`kI9S+%PNWK(;eB1w$`=&l5O&Gk z7GPWQ29sY>Y$gxUD_QJQ9?&)_R#=dtn04+~#6TCKZ7Gdv@J}Fs^eH)mHuQo{N4||p z_oKUL35q-gD+uxuQh3eUXwAR&Or?K*g-!;z?NJE48apF^QZ{XUt_q*}jNGF1_J(k~Qd_Bk!pjk7O zSE)ywi)tScsz6hIy;1KCQiaEht0FY2)F7lwQvW-SSz!k>Vk$i*&oR5EnjM%vTH}qc z7RB*-EO{+Rr?mft6r0gqx+~o;Br~)6B8d1Bc+HjG)-qmN*~d{r@4sNKAL4?Zzg-+B~BA65Cpq>11+4{KQXK|;>l(R zdg{w9(PiB9gM}!x;^qrtkl5nlWzL}6lN3~x06#GkqAMuVuz8Lk)p7>iVts0oYwQg> zWw-P;K3^k&xBRu{Gr1u5b(#TQO4N=vLJF^0-n6h1`0;!73>Ls^CSSk=Z7LBG-+kqMCQ`yp>Xai5 zlojCmHyeQeg57_(EWlNKD_!ir9ofIInhpOi3*aAU`fp7A8+n3REkGnv{l7@@e=h_K zV5}bkRDb1<{|27m|BTo_rG|gByZ;)7{taUPlp6lETm0KB@Ys(gG-81^CO;AFXe@Iw zJf>P?$f&HZi30i@e-=4E4c5k()Jn7!7#(sr;xMOA{MZ+OJE`9w`koR<5fc3gUylRu zSAHc+CA%}Tq}piz&Vwtjz}L}E-Fk_t4w}IZ!&#no6Mol-$H!i)WKYTb14RGGvrpF3 zFflnb$znzhuH(^8A1nJ8Vu?wD`I&WC2>za$S5I>4YA>?~}G zGa?=AC0ceV&OAve!M~dlU9}8+11+uB4WQR^Ib*-PU+)rJi2~zZfR?@>5DfIJ-!G3{ zxqc(b)!Ktf=ojCayP)h;FayG`m%Jf31gVsMf_+f8gBolK9c;<$)oG8IW`NP}BOE#s zOpU=z@mHa>hb`W1d*4jWZbA}W0o{cZ!GD+i{2(HFb>y>3bWT;57N-dpD7cy#>|odj zT6VxE4~XNpT*Bcy6UfHi`Hmd{xC>&uVn_2-Kp*`V)E3!oiC|RrU7gQi+>gDl15`Ha z|4ML~9*Q%F;~xz;P~`K8^RuzqhJUv2U{?R`KamZV<0y=P`Tt;8g#TmNU|DMTKb8%a z!y^0(xc2YNQ1Fiq@_)(#;pH*)zsCZl(TmTC(1k{ zH2#Iv8nnlT$%697g7ofmyjAMKR?ZE^75Ruk}#QTgA>iT`%R|K9~La!=#`q{R6j z;t5_E_DbN-{ts>O-|hhaNVxy1viqOr3I5NB{ZnfA*9GnWwAeqThL>*&{d+BNqX3N& z7`ee;R7C;RNzo164qG@JGyrhUExIR_;MCbvskKMcYN^0_#KWi3cq!|~({@izlYIiG zo;K(hxWYC|mT*ZRj-x=VIiRdG~iPPj7J z`#$*H)U6EXZ5e(4DEw9RYnxO;JZRHLe$f~)RHP3H=P%_O^Zda)eV$>kku6??TlVw0 z=&e&r-Qq&DDAolwP7}!vO$Xj9ZjSZ1zD4X0TzNTbC%DKY#OfSZ`@yzqmis)V?5r2I zTj4*5;|IZ&0#S@e>Y@j87eCE&h0epZcx82^aqI-R*VkVy*^!Jr&Ul{x7eeGi;nOy* z{R;<|5^q7Tb))ys$xaM?i=&()xq)j5$mKpu-+AK2@zQiJBac=WRJP}?mdYF5da(05 z<8mXd$D?xx)6&K_Nev9h%*!Tr=fiFJ6->|Gr?o57?QeoO(BKZ6Xz{YKS?|I(d&Bv&=f{-U;@1NcE76fGIV_Ic z1~jCi1;kbfh=GeUW}qLpuxz^3rSkW4!R^YFtu`%nV1sa-Wu-*-2itT`;AE* zTcah{e%-SjAHg0AM&+O5Afts|!&W?tHXG_;3IQ}EF$btMjNlE;=wPdXk}MvRZaCI{ zrMTFSeaJj+zu)KZd9UWlh9`K^vRrBvADz7>k1b#C%nn+-rAgGx<~vJVW1>sVT9+>T z#UTQjWmfy&-1Cfjd-sNI6j?2~CNRJNSK21b`nKWL(+EGz2>VdeD#vARKI?hqJPzMr z>^~#}dyJTt8#RJEm8|mXp4>a1dqX_jXs5xOi*bVzKkPBGs~f8`5VMR}Z%7P|w{}vP zPm8H1TfX#eCvNy&_tqfaN|oPXBI`q3VI`O?7+O&`2Q9j6xg;(|u3o!xWyuG+adt=( zr%ft06$>w|ST$N41)m_@Rn7v}TF=r=z>rMsfpJ`-7jc7~@}F_3)-P*57xXkClp`2V z^fT60^c-(0IHdJ;hKZS`DxBS!9%c}ollpkYi(TjMLs{U$h&gg`$}($eyzKTt;Wu?D z-e72fVhyNRH)XSTJ5c$>w=1W#sVw)>!ufq!o?{QD>BwAe_mz{P=q|P?VH*z$Dy+fq zjUZN>RChRsxPteBw<9w(6x6dFXQ&8@u5!bV0~6!;sb3gnuC%8c~P&(lcP_>#L?-8 z69X$3SRd`VGl@DSCWbzbVRR~J;n{4TP_*L|xEd@-5coGGM$yiag3Y2JOVw))38Pj& zW<{Squl|hRo2M+c>3!~e_(#!d0hhy51iTGV$f{s;(%~>6jXF0tAx6(731oxd`i!Y# zF`U+oJQj6u->^=yU<3kg`yTO-rO)us&b*9BY2dLryxMA+LPCEq({LitlYr-z#e+x# z>o85V@GjExel8}il!(*={cw`Xz_AlIeX=9ESIAF6td>LUVtLpgzP*QfC)XE+x zJRucO)`98Ey|CH}F1Xjv+##o@kWa-1=}4Q{`Y&NF(<{N{40>ffhEB4oS}SvawBydS zMVaVV%ySQd{N#?qB`%A>&suk=oZB;lR_j!lK_6*tF+R+!`-m}&7L-cYXOc5oZJLn> zgG?yE_3e1H4Y>^+=aUk7g!&?>{A$f8eYVPyIjF1;$5_2`;tW^V;f*lO_Uu~JZW3qfuL94d_T{GIv;VT&8)F@DL zew5vbpx}+Oo;bGHjSJ9sS!#b12ZTBVgla|PDP9(;g^BCaf3yWZ+NxeO4kyUxl^quL z=&BoKy4#<(RXB6)u#gqLR|%1d@S^15PG+^|Cc|hYAXeM5L@cp}7O_qWhxlnTw1f`} zudc5noFUHg7#`xdEBKR-Z|{$)cPGO!6POp{Krz3h@Db*tVMeRxotfT8H(OQgKW?*o zhu*nYGw2H{$xnd99a53s<0Oyg`v5tn*}$N!67bL)vJ=>gg{)IsKFz}H7O-D_Es3=8 zj~lJpPwrca;`cB6hI!nXd*KeDU_#^wL1B^oX_bd|bWXJcP^9Y(ZlH>jn3i!|-`+>! zFdnO~O2K|@-90umv&X*PWzP*hV+h_!Cj)eoxd+Co7Y_D-#yLun3Weo!9A1 zFJQ9$pJ7a#9rGg-wyAV}Og6NR&l`F?Kqpnq*yoY@nL9iD^TvSG`vF?WNAxzn{1}?W zItd?Q%AcS#l-)1IdBgmfZ|RCP53d!UA7OVYwwYo76!2`I7jPU2GSfXNAgJ&U@6Z9> z@yZExP;;{Ai{vxC!^wL_ADEVy!bP8FB6e>iq9R8(dZ5HqC{gFDn!(QdKq419inzpS zlV{7z&50=7j)tY|txGs#W1Kj7hzGQk z@QCp_A`fCTb`+ESs2c<3cuwUp9G^;Uik*o0s;*l#&t4){JYJJW8k&*GBLzl2CM?hq zcftTb!g8lr#PWJr?(|y5m=%5=v7y;O6rwyzG@!&K^1!z%>aDMCW0t(`^w!nXQqN*O zXq>jQ89o&5UAQ(-;EL;Py9I}Lp}&}$W2^6A;aX$=m^jCg+_rO8O)}~&6J;Q`7eUrZ z+9XKFW(%Ifao+3>WVBj-gFwW&;V$vctKSuHON-8_{k!lD0a!~(_dTI|Jv6wXlRRvk z;!azbr7(73J7?9i^1^AXN6a^^#)1oXjZ9HZj`~!sC$cTyp#l|7K78LhVe41yFc&&~ z--fSN3)559SHI<%?to_r>6ZqU&ijsY1>v3lWuUJ(43KGq*syFz*APe z?}Vq0@LVYkSjN#oY6LK(hZn7gW#7;hbjA(s{nk>})Bm;&>=}Jy+HFeq({B;OZ$XJsKn&<(B(RhO)2K zIrnC+W304yVSAqyMQp*ke_Qf`D2L~n(_8V?vRdEmhc61z25$BXi#oHHiWJSfAD}9$ z3KQinXS)~N4NuFU8^?2y>d=Um;G4=dS9ZylqXnpxJmm*eVUA4to>uoQvtE}<;@VV# zziPGaouHSjpZE2=xRCq{EhKBje z;z~*e^yU+z4vVFqBxP_1!j^o1W(Fg(=LGNGU1r9U;ZO>=`3OZ*?A|%&UW_v*eNNh* zEap&{K5zj~M5> zB~!urzXc_Cm|KVJzE6qCa99|TKH`=D-Iy`k4Vmra6DL)b1@CC(s@EpH(j{i}3W~eT zA7+deH<$72`J)vzE+!a}9*$4NXxP19-_9>iq9J}MX&PoL`8ba~zR~5Ca8o9vYOpJA zG|z%$$J6Gj3b)3bR2Sc8+&mv?!JCzNA1r#!a-Xj%e?(d{6J_ugq6n_;a?_o(?l3Qb zE@Nf4YaGemg0~nff$DM&Ie%YLfoB#v0?W#0&41s#iY;XcQJ;d+!$YH4rq7}6R~|&Y zuiJsI;jLCVrgA{$H{T|PTHLL)eewG+GEM8@P|HHqeX8&-d_{Z)=KD#NlktjoUPyMg zIep$d-66B$%(n#XZP39EP@~8v0osX88Lt@7Go4^!srz77&tL=U?n@OBYWi!e#~uCA zB9o6XA8<3rvv`18Ehx@>z7R>oHJo(JTf7%uV|t4Lp%V8YCnCTmmB)4lcGm9oHV&B1 zOIP)Q_ES$^n{A)C<=b2qUEDYn8z#GxEUhi}WVO*Xp0h{t1b2RFl@2-jER^^%XPwiv zHPyYuugbG-Sx!fb7rbznFYvm=k7+<=$B|>&IfT7?Li`bF!0rzT3C zqL9n!&j$`VYGM+*4^~xQge?M}x*X_ws`z4nZMx8i84Ip$jGc2o7LlY@qwpmoGDkA= zDkooon>U2I9dOqTvfS6VxzAWioyiST7KIT2dW3j0CGD6s`s3>$lkwvB(W|)wO^YwH5d(98v#?MVF69E?cmWzUKF5>e&wBP z(Tv&zB}#DeK@(`edIFN&=mm1}l%{lH3U3xSB|BXJuK9+t4#EF*{Z-fg_VPmOkpSbU z>G|ExUZ{dyUJwfZAoPmJ)6H)x865mSHj+xwkh=P=S8_k9>0ZXZmZ|fju^`x|%1_7E zmo)Xwn7B)h+YpP6YZ`BaPHq5V#Of_w@AR>HvM|_Pswp};bJU3R5*A73EbZ*S6Cb8s zt65*H?~f`UHvuN-3mhfr`o-(=DiI>{3J;>aMN3e12g-!k_pGNS6&6aCgc=KpUQ=%6 zP|kX;e{dV>h31K+0s4Jj=;S7_lViqeZ{7FsET^`AaPFu+9rasM*XIj~stp0Xfp1(K zuQFBgcFw9XQnxVS=eudHqIPq>g!u)?`WaB9__-~@`=#GZ1n_R>_;5OaC#)=>*zZ%< zGj|Se;X_L%ArF;XZRKe%LhR!@UPtaLecjprh?=A(`@9W0k;xT57E|Z*A-_GX5Cfgu z3^>{29Jv;++UQly;VCf(Zb56Bxx6{NpVWFYri}CgogM;T>1j;ju|9%o`Vy~9`w+NS z4#>;`9AxR2ml~s&92rJdqJdU4kQ!TEqF)4I; zn15s`QNv7Mb#2}OQikx6cQ~z+zjHi>r*(hZtAQ#A15S)DerDv-S&<1d1xs8q)Y)y9 zFcS6Du*sV>WZ&RQbOIb7R#UkQsKjHOL})W3Hos%47EV62434{bEsCC0Xk=vZdyi*) zHUs)i>_z)|cgXA88GGTRvsaz^iT3Ooh>sh1(_ufkIimQS;tU;_yCIL? zOVIdWq80N_&-hNw=pLx4v=5BejM##&^V!s333EdAh#_#RYf4>J$$Nfvd!M1N&{lls zM_yymkqr2Y&ROY35%9CZUA#&?yYLVSIj{!~4i{P<5GNYm^rRICfnOci0@o#hFZ}3Q zbNDX219QZQVmNkj#K-DDULb@j*o1tE1L{sW2p(0K`JH(1I~54x|1Zw}BSx?TmQHf9 zaZ>uz*C4R~uopK~koy{E{b*BX6`JlAYgz{ZbC`(E}0Ru%(b1Qs>T35kg`YgKU z&9|<32tuhKKS7~r7TrUQQ$7@JLq$@Ci@XIa*3ov@bYyiS&42^@kLbPBvA*@c088H) A3;+NC diff --git a/man/figures/README-example5-1.png b/man/figures/README-example5-1.png index 6861f38ab8fc7f3e302c58cd676582c7e3db9ac3..f24eef4524187fad07ed381471fd29c8dcd13cb3 100644 GIT binary patch delta 13204 zcmc(Gc|4Tu{{KB=tl3Ir%g}~O%AR#(YaxnCk$sDa%D&zcC0SA?gfLOa9wEe7vNMQe ztR-vqbu44%caM6W^PK0L^ZV=jI>+l}aNpN;efIa~^SQ3et5x{hRd~L-yYlBls!B1o zb&t8O#=nhzcKKPvLD`G(;nD9;Y3O0gq8j2h^&Br2Vbh`=^=57fp2|7il+tdK7J5Vc z?XB2XSbz6xh(Ys($JkzXRTe^WgWm;qTq=hgR@g%jJ~oF{^)Q1|#IZ>p`(Y*6j~>GC zug%yYj|0s1RK*gKv)dmMoZucLUDUWw$Z@X1>QIyVK{V_qwu!Y$KxI+ijr=jlJ? z`h{L*RTYKk_>KiVc-TW=E1D#gcKe1vm9PHoSPL%+m>c$q*Lhejmgpr+&$tBmoWWAO zM1|^{N$JT*M28FIM#)kNuOWlM{6M{ibOgANu{!qz`z(n^XjK{2&Q>!KU0yyoms8`7 z@rm?L=^}a|Mb9Ynk~XlGNqc!VbUP%eo7c=rCkV;poJ?|DfT#n34(seGfH;UrtHD-! z@vxTyJ{w={RapZra-zcOu)CjdvELHIm{E!hqkYx6P;4XEDsLVRP2liq*DR$Xb63sp zXWYn?c|>AQy9APYb!@`w5xv3uyU`bU)zsMUV)>2(6NT8jUR=`efwJ||pr7`kK$*89 zaV#zomtNzq>YGqH&6@C*6Lo5CnRu*rfLBaIt731x`l<#X8;1P`aV3ZvoYN;?ts|(- z&~+=*6w5iHirPnANF5B~4*?uGe@VD&TP#0pSOIsR3CDo7@Z}M_HL8r-hrin{e7}1c z*mkdWa!>yB`qK2^{)ET9*xg=S91)4kn*t;;nA^6pk~%V!MvS?xs7jli?jR{hDR=H(LQmN6gU@*Zj33LB@1#1@!in8HiFET%>o_D`Ukl7YV?I~SG^u+kXu(<*I z1Z6Q%KhIIswtj@ex|K>6J9K{_l^r9toNsUJdx|9l@LaidXIDr0F?K}4(!u-&)y^sO z$9c+2^BXmm3uC~&+5g1nJl)EDWlR$18Z5Lu=tDS{i1Y1emJB9bXI@J^`OPR+J%)=P z3Jj}~t*&+s_@q3Tvvk=aiw`v>kX3nN7gi!*-+?5?$x`+8kM}%F`YWy|aCE$UVP0P(H!m|UtmgMBLXGx;0UKZOOU){tlu?%}W9`idgXZomtLq{*l*>yrhuo!{OD~7y zaX;0qMUQO@;1#$BtO{LtvcXRV<7@@#dt9pQuxB#f3QK|F8#I3rxB=WGkMFapT=%Q^ z<-*<@O6sCA&V^|j*zdl)3KOuO_2EJ+JwE|{Ew%&y!BWn!&F%)PfZTB&T!3+y1;@5jzf<%X4ns$p0pHuIUC$%(S#%#@w=>mknpz-X&)c%+zcw zleHJMI_FGEc5P8zw7NM%btP=$C)V3fa~A`3AKLBnSY54gtkJee1}btMX@7+yD0yGj zo-=E5u3!1&3`Hwa{Q!Ys>)3`v@ldb^U zhXB>vAdWHKQ5c>fFwc$#E?3(fMHqx{ z`5~S%HFI{tGsKc&FTOFa1A%4_x}WHm-!Ah;ANQ>c(r|EU!DCwg1Oz7G-Ooin>jEmV z{%da#1|Gu3sWj+bKFsneCx=^1*fr5onj0=w@2?6!i?9umS>A12d90t0VZ2$S^} zREE9h)uzj66vhim{plwMF`5R!XAdf=Pn3heO+TyR)T$H1@{cyBxKLp>PL0OE2IASj zsty9OeNhYEq~+m?^@vEqJt5r6hdl3>jPbyYLt_AcooLA4*iK1e-Yj)KQvjQU5*cyA zvIy?rVz$~Pis5PO=~1VbsaXna1plVUrJ^dzj8TcNlMgEyzrMbly6x%(%z7v`%pt$W zDzIelA#K)!-J7*v0Ox$?gjX*EB8p@jHd-6mHWopuJK#dZnWRxp$nx#y*0 zYcePvZ{U+ZuWZ2~pdu1mC&(Ixfxpwk!1GfKu-8_UJ%=z-xn`?7>7$};CWz^G!Yw@( z1Vo(znfIW?ujS>UU~%~8 z6mFs5tqV_S{@-rKhj<#g0sV2l^hO=|NCMjq_&NSWe^;0B8nC6Zb5w61KKmP%;AiW| zhcoCq>U2_CzzR3V9C%~SBS=b$9GANsN%#QfkJP3PynTU3)NzTZc5c^w_LMww?V&l? z1Y`~{_x+yWWNfd;c**B5(U!W0qyBFs#25^oEAK;21$-+%#*Z=-WWcYmY3}6Zw(Ite zOuJE1I|25GgjN7s{6vrB1Q@W9YCWND`U=SOKk%uJ^mOAw)3DvHp6hMGeSJ%yq%bK~ zm^1oa(-&+BZA2^bXv32vXmYJj>@dmpre@V~i5o@V_K8i6W$tGs1z- zzj61MRi5WDfQ!rNq0<)RZpd@H(g1!-b`@HFDv5hc$kcGi!nwRupOaMI30PlSFJ5a< z3h^{V5JgAnM+VGTBe&LL>z!TPfrySzjCMP+#r;HI1|kAvtNx)4eQQ<`jAlF&j!qbp z8Ta-VN3K1@o~Ks+7g=5%4u19zJJ#2qg~l@Bs-$kqUE$dAhw<#fP=MdIPdMJ1w-m%9 zn12@@=o+7;4jx(=?i&CTC*$i`2NBv;xcQ$pB;5YDCAqceJcH5ZzeV?`R{0W8=zM@5QB?uqnwXQ(79N-}7sZ4dI|Dq<&XDqRIDnzmUj@{InDJ)QaVIq0 zB@e3YuJ0DD?!|U;CTDne)2du3Z#boe*J%Ls`Pa=SUyTU0$kp6`F^z7!Ek}*)a7@;E z4BR+@c-k0$%$mZ9f}yWgzgLm@c$;`$fyp%yEb6vvqu&ja38bZlvlpT}1rY{7!hV8? zKnRmCGn(g;Qh33#!&h-(xI-x?>VTLAWFd>fzU&+9aZsJTzfnfrs1WmuWgP2nxEQ7l zk=83?)1f)8SZgP(4yCN$sewj1?WBmy$M_xWv~@pEHnLalua|!W?(r+|SA3V+q-j2ufs-6ZGo7zLe1R=J5{rf8a6xBgfqu zxnVK9adi$3}x?^r=9{P6iQN0Jhp%EQ@3AKYS%s4=f>s<-az+P5O(S-ANn*Il*u~_;$t6S*_#IP5p0rRTghGDBDEKGX8bIZ{THpSA z)5h@KP-_O^Q5#QMAz!?M*Kz?E!T6m9`a3n=FRa;1H~GeJ&?JBo1|}`E4J&-vUoOZ1 z>lTK(u6}f!VnXg?CSkVU0sD*bQ<$X5%B_uswmO}%c@fO`BN|JfbQf_&&xT9uA0l}1 zSqs9?YVN{ao2wk_>RiKh>Y)$@K~M?mB5j}eCF9lMn12D7ZXh(&o*cFC$2h0N{V!xr z*pB|mba3IRJ&-#|U{0t?70_p_+~{jDbU(hpk#TN?iXa8A}_bNE^90jM*W zD-YHQsPOY7(aq4ws6n_<5?4y#AG{--eDWSG&;9B$`*{&h!+B9qa_|60ewd$KC#yh> zv+HS=nZ$I$+>GDS!*lW#+mjcYA62R-I#$%}xB!GVB61+M`7eZBtszzY^v0YB$aNFK zCG&3p*>ONKUHX80r=C1v4~nOkhGZ9tuFsw=o4uve4=E=4a|5f}KNE%qHX0vXnwDUsc^R})k{oFAM(V(ywYzTgrF!z=Nl+qR zz`jdQ$wh6mS}n73s)kU@rJYkEj6P!JBJG)&^P-Jhld*ONih3(rSCAbqMPA^*$uF@f zyRa&WmQ5v!KC+dOa;%`Yq`5jI=S_5Rwp1q7;tw?J(dN5QtA;r-;|CtuzOniGSlQI9 z&ip14Us1SxOfr1?5bVA2%8eVj*e&E)MX2>!VF8}^S zJ<&=Ox1MH&oKz0|yxTQ^DQvVk8i}ciJ_Z#OCmwIwx_t}M#eeGr9B25djc}~bdX8G( z>ZR{UP*TEgZd0hBucN5n9&JE^5q%`EP5Z66HlpL`eJM?Y`jp4*i0wAXC;K;4@xak1 zu8}TBJ(&21_r*t6@q}%!p-F6g==P*|Iy#5VN8bob8gkcaI>JRMq*=wwBq(RJB z<$2JiNz({avt23&nQ(`#fA?ec@X0ZK|BqIlIBf#m%AFPW(KOGb?95jX>0N)4=6c)z zmxa$;!`v31%}EjtW7y9sajiT&?stYM`Y#5CO8OHIckh%Wtr7R7jN-SLX6l^lL>Ac) z9XPbA@;!+BooRA9GxAi9WF%@B>}8Kf}+E z8bP*Nuucy=g5e3Hb!eATplVIuAKloV#4m|E0?(lK7zR~t*p&H;a^RNqf?NXZ?I(ip zie=l6fEzOZru7T;5f686olLigKy+mPvA4tqZ6O%cw5#X?ZEU}`aOkPaKpT6ZS&}#m zi%)9&58ruO(X{@!=0NGaF-F{-vE~Bs;caUfOpJ67{sG6*bv) zj;hiC65i(1)0!S%+ZO_Kwi(&0JUA@Mn-_$d#Hv5-{nwuOzw-k8pHkmj1^y3Zr-=^! z8(;bFX#SVt!GGBc`EOEp{R;kVC+5FPolg$@r+uLRHg!W0@Xt(U5d7b#j58fA7HkZ>Seu19$fS{#Vq4OF?K4<9|o}lmYlZr5?-z{@PGM zE|<*pEvTRftNyq6-pqpN=#QK`X0y+@6@#QCruE#(ql_;Tr1QI7?am-kflhQpsC16qp|u0u>QF-1|IK zu>t6`fi4G!_@7-|6hXVM4g1u>OUSfsLK4c8-9Tm zH-aKfriJ1;6thYW72AjPy0m)?C4Ts$blOnt9E*0&eLQ=C~&#mr=1h+1%Zm?QNkmg+*R&DqeW63 zt>U8{#qm&qpZF_feOnQQQyxi6dW-U%8LKft&?|1iXl^DPRNAv`j$^0R5|uH{@)3T9 zLPbMXzcj?fRKNn0Ifm%4q8$a%G2sAgz|4}iWmT3hg$=Sk8Ci zU@&ZjV4egyUEFXR-rI4ZP1M|YPBZJ1lK$LYzsY|8tKW`)Tvbx4b+2c6dEbUDV8I+z z+p?oLaoURESoc2{DX_3ckl~X#I)z{uKHhJ6EwvVmJ;`=Z&YHdl>J{7){TCvmT#WBa zFUS*jE!0k(PoVN^^6e4RV6Y82-pdPW%)lKM@)m0)SB5v{iD6LZa})a2=iWr_yrggL zl^^xjuYN4> z#vEz(Svjj&fOssF+c;Ui&^@MN&-MGO%+%m6+0!K15UF^WZ7XYYhjIR?<`48x1jeXs zlpB~yo>XyBi_bZI)xtl83RpsNCyFjp-OBHJEW{|%rtw45*#DSjP{2SLPoAIgTUT4r z`3mmRZ5OBmqw?WST&f*Zrek-Gq(sY6|9KKGLx&-e{X56!X7cPed=IlrwCv*@Y?l&vkKt!kaS^CmwvMW69P-OJBvIHWgoPK_+FxKzqU3hR5r9 zZ3o~P@7308UmCf})!=m?Wj!ykFNE8R$X{C{c9XvfH$PRU`JYX7y_n@b5G7AI5_`XG zO|&I%sn+(&&r6EZg2(bzU1HdeTG10~5|ohS!2qgDd)n0<$CVP(fbTf&;TfojvJ0>r zTyd=``H=7I->ek*4nB=VK6|>Y!+h)xLqTE6D12wmQ85j=ojDrhoyN-^yT2yPg~4eA z``Ycq{-NXP(hx!Fgr|oW{rN-ob`)A9#?hh#+WUh}c%UeO)k0AY052r5C$mgJVat-P z(|nbs-erZ?Cmu19)V$X#*waWwvlk~Cf4ngnk>GbWkQw$KKe+Mkp3C#ibl#bc{5V;RN9t59miQ%$9YBj< z0AZ0q!0_XDNfAu0yP|#b@VvXC07r$~dTnG>WIe&=;Kh9?cRpe_S5hlQ4jBl`mPBv@ zhhD>s{FsWL1ASui)Gnp3r!UWJ72*@4+h4*R@-w8z<{#eg0nC*^0FHSuNO-2k zj0}`e!=x~Kq>~+-ih(k@CBs_LLj3+V1Tc+&ApqucHV+O~FOhlEP%%6eu0aWs!~Ij} zL*<9fD|gO3(E(I!MS6)+A}OHQ>*MqUW)ItCXj9cxIPRl(9_^qOxrZYW?z z_%>rhT_Uvv{MJf-=vOr-6s|cU4LE=-I8C4_utE3h5++U%HFavLLY*u)JFs{IPx>;$ z=$s@(sk8H-y7hNNCJ}xf+^AL`FqORR$2ah!S9+V0MH=^2i1b6msElq=W}P}i>h9bH zW`k{YU@}q~1)`nb`fWzrmIAfaV8<9cCJlgmRhox9owYAa7;A*Vo)10kZnB$dhyv&J z$31nUEI9=dwm*}aIFcUo$ge*}|2SVz;<`uJI_DDlYw33Nfxsh(4hze=f)<#JqQ?41 zwET&rcPe4$VcnlLB7iC`nyx&;UNi>T6`J#*L=G&OHjP-_X&_4$Bn!?(yqs;3CRYbm zbSQb_jnHUs*+F~Jjnyn55L78+J@AH>Bt*oU@ zFRVQZutPKd5bz!WtVD$|vJZD$>^pm%J-aeXw%`0^An~{gp{?r;Sf~)Gd0zYN@g=p3 zLxV?%PU#I?a?^Ji^+ZtxDoNTzYjHXgZnT;EYx{(#=0J;w>M$>Y#On#$s7Slgm<9y_Zt?L z!$~h4vIq-I#TAotM2Q(VB0rZFNSw30h1byZQ~tBX7bhk)x&-NCZn9D0MnrOx^`De9 zOIDbbO6qy!tZ{AJ@;)k8Yzoe-9eNrZ>wj=O$}J5577;s- z3r1fAGr%1z!{EQveB`=Kv~Kxp{8ssqBt9UU8zLaX3?bYx81$hB`A*e&6y!iyNO}2t zppTA2GYGc7y#@dJ8d@M5v9pSjI^Dla{^PCD-3_uwdYAXSy?Ne->mN_UT{ns^66!Tp z1ELafFpI+w#}?rg7awDb0*tbw%nH6wJ+W_*zgg+>)N)aeQNq!wM{AYvFdg(8oi0j} z2C{{rg~Fp&+B+G|1;|rh4yg*|Ef?N^ZXv4h2#NbT0E08=V zYbYM+t|`4Fdrpmp=@~|&D~GQ!>Rvlsp7^7EEid_)#L|sTk%4b%i(;K{2fs_-r@mfL z1&q%@rs9PP0OE1*S{5UCG;{Rlmu7foM%4DKjH`1Jd)Q3k^vkJqd0X>?nOo_ZnEDAp z^X@y3S5;T&Fws!6fO(typYn@(cpX@b_He z-T`Gk?q^_E5FO5yaT9&(h%Wk$o~!P#2(`p>VVMKnP*P@ujC;yAnlXUQS!GQZPyJbu zD8m`05-cw?Z%&<=+-88ex$|ejGdxcWue`^rlyTdUQ!@kjQCf30<|QoJ&PWd2XOWqdJkBzVUu$A zqnr%)GvH-ydbDm@a|mN%XzrzJ3+2EeXg-m*D@!3jS&PW*Gs1&&>KFKNP?j4trp3*e z2&?MTfQGgfVYhNmffZ_A5_SKe$^WN!{RPxL;>kvb1tk;vS%@CA%7>{wG$akqhokzbuEDuG+= zD1*V5sW?y3`Iu~k!B`xwmeCr>U!(cU88?ai3q-Jq{gJP>eK}K`D25@@2R#bE$(Z=! zIx{X*E1ICh1~_p*8csbV>OXWgmtnZv&s?yutd$4F?;fal>vm-FP{{aR)HYNOUHEt~=jr?Nx$fiKDC@AFt~|m< z7&)jAtWp^6KT&Y7eB~M*I`xIt7QcFKKhFoT9jgEtI8p=YFq_*}P_4uP;+JpwA7i#v zAPUFWpbx!*#-ni_=dM6OifW-D6y(y_XZZqjmZA>O&%+|Q-Kd*a|ZK+Y|j8V z(f^tSH1Csdy9Qu*qq6$JC!Np@zA{%S@?zsx9ZE5&i0hGx#k}bvV6BE15c2WynShEq zrKCi+E{lQZ@6JtV)+v0QpAH|AVf(6>uo~mHo|(Ml%#HsluEPs1LCBVM4yqND&B%9W zBJPEH&Th{V7QbeJ0l~DxKr*URFX)Yg6y|7slc?C$zV2=|5GOvbRySzJh6@$t0D$}y zBZR>skD>`ME3}dB%__4S^+y=TJIj&gG`9;6`ki{A7N_j36PeUpbn&BW``#a{Bv{`}gQotSlZ5fBCzNBAV$7rH~ z5$xwP8C;CK&ARsJU<}g#WX-pRtypa0`%65EY95?dz2A-5=i@8l$dj{LjGFpmeON@1 z9X%9K;5^o)h<`U@ar^78$noxKms#!~tQ0>NY<$r{m_4?#NCiHugxxL@h529)7b8J0 zm4IFcC$kO8517m%$-5ED2zl3)Ogb_D)HXUX5V|*IaCdDiRKB%hLEfI78D}$}7(r59 zXuUJtaC{5k4!<280v8Kluy;;UrQq9dr*Z66i*_IliF*c#7pu%ZnM3SVss1c2sV%|S zacAADHxuX+1Xlv?Wf)UVnQokZ4KA~Lx}KO*+w9=R>#xD!07lmS3~<=xDYh8UQ{~c~ z%5hu%2Aub}?_GiPCrh_nvY@wiY33>cW?hm6$$5BRGN{$=OcqHOu(#s*q@Q0cflBxh znMD2`iA^2Qf1>=Tg3vT0)VbY2=P*NRx?}-G+qfu#4&UCQY{16}afc z0s^_){mT3?M-T>Ieop(#l7m?oG`8Dk7oOSOrG`dUoj>-fen+9#kI;8~OI(>;`;=Ps zWMV79$i=fMFC-q{38s<6k)cKej8h`r@I?-#)g|W*Bl*QcwRPIwREtpu%s~|9qT$gI+6aCOk7bZQUEy&6r$UDbu23KJlNTBqd@v% zmBjcghNjE1K1U&fbqd7$>pzs#8}#qk%%@|gs+TP-iO>y* zNDcwUj>WG!s_+)1iW2vwfDUh@5$d>F?M{*@fy_y zJBXF+19L!!^!JB+CS(-UZ1WD z=}g_19;Cdsx*)($;SW`L5=@f3=<-wmExxDbl%M$;?S&8VW@eYC(q^QL1w>Qu?L4xkXfo?( z{fYDT>_=6i#XaV8cqhKtkbZJXUDADtm$p0MqCQFrU^d7q5{}eRecbv+$ z8YZd~K%KcZpp^XbqZs%Rf;`d=6M%3O=!H@+?N6vo i1+W6IFYbFny*(qdarfj7YrN|P>mbJpz-H}2fX-M`dp^$wkdkNV^wuEHg z_jP8>?+$&x&+~kLzvn;rdA)3N@44rE&Uv5rS!UjC!e4E|3(k0{{}j|fg6*G;)B&< zs!)P(lUB?KN|<4K|HR4!(khy+m@a7O%F7B0{b!6KGHBB%u^qI>Re^! zNLC@maEy&V2Xz%w7j7N!yNKEM5#@j6wmqH7N8aTgm~HNB6e&*j*4u47IH3{Y^Ox;> z5q|tw2gJc+|E1i?yr@ z)38K1hUqB>%@gNf7Ub12%`}Wn3af0l1yH@gD=$Ea5T(X8+;W%qPO*_^hl@1^YWmx~ zz>37g#IYTZ z;6lo#&W+$FYpd4zto8%EU}>T$RSqXTS_j%6&w7=WUb}&0-_G8v5Nos2-&geL=T^KbgueB2y4WQ2<0-?? zh<}1T_acySv0CB<``Ibk;~-|tiq`hL?MeAR}|FcKHA)pAmavc>Smmdy%rb>!al&67L6g%U!x|3{`v zsi8Z(8gKNc*BM9bT7-NZ!K_6cvAeOQiL6ZN_-3x>qXaW3x;BmLZqHGyg@+Uj9f=f(covG@5oQ@ch&B10<}8-Ulpq*0=4mz@XVDqp8QylonO~ z&yc+38XDtQUy`yY|9v|L`&rDV6gH3tDGQ2J?(3|T`mdYV(_({aw>QnFx{y#FuhYJ6 zHE-?vWb<;KKIt7Z^3>8g3sP82OPd}`$K>U{H|fxmKRk3f%91v>(H9-Gwz-(e8xE+x z%+zvR8E@VCB=o=KIM=4m*D^}X5ag-4(9Y96lwd{vJ4#{n+$%~Jn8<@aiA62Q5-TK3 z*>&4@&DP3lrsirD*IdrD3R9PMn`~d=&-N;G+uuoec<)Vy{Z~nvm?audhrP{7H9Z7b z4llBQ-#Q6Me7M_SMkC1Xl6e+r_|T~bJjT+qNTVZu`>q=AU84uFE=t&rMjDw%M$JXj zYRV7G%J6hwE&jq-G;rh$w{Saom;9iEl|Eoc_26^`rvgmD>NWF^A7;UDxxcgM7+Tvf z^qjmv@MI;ty^6_DR)gKJr|A1LlqHop|Ck66fmqc$(T|)%I9fMt5`HYdrq-4X}z<)T>if*CvvR9>2 zR#P4ENwkLA4@4MMms^&{!U#)HTzZ|vy)^ghNzyXm{|G>LUGFd1NW0Dr*mt#l?yz;> z+PJ3GRmCK$e;(vbFrXS<51(ng19x=#Ih_Q?wO7|f8ghk zPY*xWfIof?$Y4e?Si2X4TApPaf)!Pz3sz$`A8N^I4hzc};N45oKe3Y6+T4ot^cXw z7NFDYG4^T+S6luXrqE!sa$yuns$1oQ$zGYE%rFrxQiA<;LNUrNtgqX?{{D2lrW}g@ z3p*|Lhv-?00H%c6SiEbQbxJS&Yp6nk@cSUm5fZfwN`?SePJuMpoLYgq$A*^-1PJj~ z`0cbH_j26R`~Y_^vU8<_c>jZw6(65!zf*J*{b=5F=}#>P%f2)VAb zSeB_SEmHMLN|?!2eON}j*T_Awe?;U@*$X>$0@MN?e}yUhswI5WL+pKv4)k5vx=z(a zZ4h8>PdZz|yN(kST{9+R|MJF)LL)Q$+?&UMDgb|*nDEEf4k@k-;(gO^n9Xi+ef&F) zHZGBD@N*9VTB#oUtDA>-=upj}#u{ZZyjBT~!GRZ^9n`X$+>MRrgwWd5SaeK#;!d5* z>cCK&se`%sRkkj24lZp?qIULQ)jIza1Tz-6*e~Z|_E{nSq>uBtHc9P5kuJo?69+6k zC|UoLi~JdcNmIV0gso@QP}8F5kaT*5C6R!D1V114q>#UbKr~#^Sw5b>s63&vN!-gKex?F5{fGK=Lk&JN7jnH$lU-Kc&J& z$JL%q+bdoh5`mwy)rlL^Vug85tJNeD1Yim#Q*u_fdBclvvgXuOxATfm7Y`o!98Pi_ zMA0|o?WFkOV(9k0vrO#Ure!RQUo0G)-HLa?hu3jZ`s7{rAlA6U4{IEd5+&RZ9U|FDTo(W|@!V?nk) zIw%I@hCouUeeZn|2Q45oXT7;Fb}P{`6gXBUgU9zRM|Ct5F-s6Fx1!M}h0t?iDf`_R{33cNKC>pr< zWyIdgtL)baeSVk0+Ip?K|DcCM)$YZVo{CK;T7o0 z?a@N;f!f^i!2r)bLsoWgi!Jw6-RxV18v~W zpJY7bwFuG-o6;HTE~EZEkQ1hWAeoc^CUj)F3nz*Fiv{ajxyG51!e&5qz_dZy<1(r! zH@GmG=L?jxNh@&G%|zf3pF;AWGiStqM9Ub!C|4hM5<~B)2b=&IPnNl?zbkg({uEc`r3Sk zTII5X0CpFeb*tOky!vKBlXf4*;Qpqr5r`*jzW^00qhBc|#mhQDLt^YdJRdVDHvY@^k_U3gO&EDs7O#)r{Xb=vu-yj>+ zcUcRz@w0=kb9*!(VEU(gZHuzWj+BFnJJC7V z5|QNg!*_m+34d?XpmR}O+2*?+-Di8@Eog2Uj2LW_jdYTI2$;!`hJway@p>jA;HNQK zx4u{4@j7WFD8N+rSbCp1vm$FDiC6m?>{}($_n375u;Fdj*g^$7+04h3PB7EzLYk+J zQuXEvA936pg$g3<7N&`yIi8S6yKG4@hfjC2#W7Ss82#c&wOm_N;a1B_wWw6;d;Bmq z#T5&L`2soHsPO_>ik^|`t&V8x7>gRbmf?p0-@)3?$Bk+u83Ufpa;oznqco1aq>UBo zHnWprs093OJ4|B`GsId@6!lru2I3QlM+RJC_w2NR_eaFE$nB&OcP@5~?sX5uEU(jH ze=BeAWZnwHt_Hr^rFJPCaPLHoV%xVC-l?2KXM$XsaPtFKK=V=IDAi1tG?KzSHX75Z z`@UQRB8tNii309;^zWg$NE4>;^DLV#`0sZ--XmxM(%gUcB?DAluk?c1wNJ-JnYo|& z6S8`Ho>E*GU?%rx9J?chzPY#2B!QxGnovhF>00Tz`QcWxd0HUVf`6-ysrdH?D{vq= z`RDdqEZ{Q*dh%xw@sBQ3zv_l?`S1{zBqGf?`LD@X-$Nj{y6e5NNKG)n6Wbo9n@7Ph z>`8FB&xKE_l`msbfR$KdSe~*9#!+s=plw6PM+=7i_U??){4|4dvN-p-+Egq0patVD z%*|9z!xAV@W}_K*A6*@%_^u6Xjt1Q7Qc62lzB~bq@po3*mzNd-eqqvwKx(Yc?f+xA zgfnCX$#6gZ=>RQ13^5rChDhuY6H^=|~ z{(nD^aG-MoT7|GkJ#UQ%scGY7WpO40in?TugX<*>u|f~zINBvB467^G(>#Q?h$_?j zqaOI_WLoooTNAaIxx=zChTdElOBDD2fB&Zs*mKVU)r2pDDJhrL5v!RIwIl}Q!dRm? z*m98o#POFtQ`O3kkuK=HFF#7Uzzbc_DEDYuCnyPwejKOjRl0@`)O4zzw1!r#zr5Hu z5a>LJMi#3!SE%+stU;o(Bx)mxvhGlI&8rD?)M}dgUTqlVBvl+tOezQaVQI;<8vUx} zu<`E_AjGLd(bEF1mQdZ8U>!DI-3Dua=@p!lvDz0Bv#6GITti9~XkL@;K2d$t2eTD>8npGyj4sy$1 zhuduW-vUT?M9uoE80SD8%*|w>vwQ9@^0tBqE)^+R0ax(`(0ZEWGtxNp*S6|l4ieL{ zqkz99PO*m6>}pp8iZWr>433S)LjFGp3^f$810F4od3pk-8du6F2%tmixPX&NzfTCE zfjX*47~pZt?fD~0LjzrhM~MY+9n)Y5x|<>R&)TNJ!nw#8ihLy8F$&X{W{a6lW1|uT z006yv7IUvc2(z3+1%}x`m@skhMg{F}ueqmk1wj2!yxKR3)va+g3IY73G)aH#<KK=pu;Myt@sB{ z*Ejo}uZ3D8srNQcltdAMg<`makeNen9k-8+Nxz3$n&lVB@+h>NJ>`Mv;PIbu$Cdn* z;`-$)85vdr7TxMOE%Sqt5$vXEN=05Ts*l_V-lQRh_MBGPJ{>NX2(xRWZ|O2EIMwoj zqRX5q9w|}SokIFwM4QM-tv+!_EjNd={-8E zEdzcLF*>;01rS0xh4 znFWmQ6S!C?hGTonwqdrKosi_b!#W7ot3iD)zF)A#5&pMuC@gkyH&#LDlm@R&n%wnY z^bf(vRh+owUB8>1Wnb|*k6gNRxf#%MY=)sNXQPZ7rO|61MpENFb(=zO-p0T$MF8P6dh-M{S_tea@_Z@OEYK(8D2wf5(<{n=5UET0-|7~ zUWt3a1uVi#AS|wD@Mp-^Lr7cKoy7`Y|0PvbxE?$@zfD|naVp(~^gt&OF%13sAj;^o z40_Lfg0s&6K^1_ZoA1l2TIZ51(A;IA83bbspkz^#)R!qB$-H_Xr*I&1>WeHSqj^tp zP^fChzTkxBnUnhcV^Q~2iy?(zkaw5~R{OsFR2s1wpLC$?fgChPL&{iA(*I}TvS4Hj zCBP#nwG_-)5^t7Tl2?$=T_PrIbl%#}YIMo-sk&LkWbb;pr)o<2wuZ){)`Hj5fb=x= zxbgToX@Ah)W5;0M)^EC-iVS`F5dcR&JOj8s+%we$7$|2v_1nLx^@}UVY_~}gSAG>F zoQB@alPSNnYP(fFk75IInaP;}5fK6lIIs9xO<+Ob8=zo!5J)8o{F zz`23Nqq{vTLIZ1LVu{w?EzxE6bl99@h|>XbxS?+sfr3lSNZ{EsZC&LfQk~H@w6=G? zsVRNf{XLx0p<86W*5H5ehQ{OLmZAi#3?}EfD>hd(HjAu}}wo**iNsAwmOm)Yg^|GYbmQU_Y6I zF9b1UGg+u&MwPWF(F^TzAI4p?T5*z`AG>Fh&(-kae^no&@_pp*f;X!bMn5+XQvER^ zuY!&sWJD)NlZmCiBI>U$7CMG>?xXNDroJA1Hy6p~VAj_JNeT$y%ULJ>lNd5FjT6;M z;c4k9LpSHQYhDoQqI&9U2ilg>+<5nzF*gE55X#|6&KXg%A^u1Gvq!Nu>1`?X_PtVKI-@09FwWqoJN&ee!N<@sS#rZANCAe+w>4-(u@)0ZTu7?1R zRIVvX1+D8qoff~?*dSl#U?h%CRIX(Kd`R*B?8d_C+vTz)NhYSPoho_5f_~{GQD+NN zUma5%=o^YKE#UMMU5<~4lFrY>Er_Ju&`6Ojkwb&13#~HH{*&In*W9DgTT$X#=Z+P; zt^!GdP%4Z6Y-UO`EY@9`=G(neYHa(8a+7RarO^ABF{Y+OYdp(&WR*3r-29(~a zqV?${1*8=f>w9g%nXJYaCu?Fv83j>rxarjci195M229nZ*R^az8k@Vve=1w5f=|}Z zy|ImL5hjjL47)zBMz!F!A}?Nx$X_$EzAe8|TwNADLNwc$p`z@fk7p-Cvj>whP54eX z(+4R=GH9cl}Psm#{^$5|g~x0K{w|@I%8#06T{gXB=J*YY4+2?3KdOTL!48ty4(y zHl`xD*+P>fLU&F3u8{>5Mc0ZjkLU%e$CEThzBi}k33!kt`zic_=3~i@UlvD`5%gHc z?CL8Oaa-&>2{u)j&sMt89HpFk!LVFe5@Ez3#S%eibV2?!-6{U8$I++cTBtL*wwt@1s|MAS(x*Kb>Q%k zphzrSOoL*~el6?Fm7`$AC~j|y4Hj$h@%N8i{KIhn!Mw(XCIfc!EBX!(G*tqyLfG5}U$;QWaUUPUL)A`I|dOY}3zwq!+i^}^TF*C zObvrCqrt^4U{5crwSSoBW?0UEW3dWYQ8!~|O_fZes^T*L4KH&e8H)bVUn448?k6nh zq!xxStggM>{GZA=hczl6S)zeHc2Xj}=DWQW@m{bxf3$n{XrOgsdRMD?_OD3%onji-SNzZTjinz1|V1c;DzQPU(_H#UQh#_t?T{? z*BKi!<~mg^C|iaS3NpeNkia}Wj2v*CZk)|F(7+8Hg;N$ZlJ51}DpzW9n@<@hJBjuR z1>jH%*>?tjVG?p2pgI%_HIk%y#D1$wB;L8}>+4M1kFOq3VR-<-{lpC)fUwil6W}`W z5mv_oNg**J4X5}R$h$ssPyo(UkU|3p<8}I^ti?zb>1SGYM}t4V$djQ<4;}zv(fT+< zc-Zqh)byC#0$$960zPo;qz_<91Er?p5y+?4;n0ul4?aPaJ+oCfk9ep3qXNN)&#Y7C zbf2AYQ8!!`r4c+7;kuoF^|$SN0rs3X@h(0Ui?eG6oXgy{rU5-?p8QDkGOG3%6BpRk zeLqbPNK!-grHc?eHun1|LBG?FqxI(Txg1DP=~6VsSIq875>e^R)hxs>C2_r4M)1^-BOAD`TI% z&F4(Ob<#O>2NpdQTSt56f+Hk8-p?pPOJv)EYVFCqS@pvH)2a@8vj&6xS{!j3;AI_{ zLFwDEBlCeXRDdK6WaX)lJ~6#d`<2VBTbPe87UZukL}DH`H&m*nq^I9gxOvZgRMf$ zqcwV$YyG@M86Mh3k45R>`ZbmOYR>?c38C4*TuQ5w#-e+)+aqq`TM6g)!rn#s<`l=u z`%S;!v?IXkevp9Db~Ec1@7JiFT~V!S7w-uXbmMYwnmKUIt6AL^{#K#{u;wEXRi+$z z>vPZ<+)y*+>zlncH)vY)tTQCIeOGd>@=?~Fw(Zlgv}1yplmxJgcEDoj$j5uCgIqm1 z%0cQngEW57hct4Ac*l>OW=Bryuv4W#+DSRl){BAVp8^Sp0O`4u;R=`n;W2X#Q@h{& z&k5mgFqceZvwyG11E!Zr-r`naGOWNAmrywFNr+!+xvHsh*}dGu<@5D~JMqSW{Mc2U zYXUAzfHNsh#};%%;Vn-i@&~9Ki+}4i0NJV<>q`^E&*Ok>bym+EYkHuMpM-_*Jc=!S z5LHw^milc_=IlDuP^9zoenj@eMD5-Dj55|QksVlCC)RvEP3d{gr)`;$o@UhJJY}XX z`^ioxlaSi$725uOM&0~$tsT?HxMxGtmglh3(Jq|m6+yjGzwB>vd_ zbj1CFq{#c{IVrvrT?4Q8k}0UMpaDbxCp)&wpDcWpA@t@$pQEy$yc}`uN*IL<)EO{B zhC&~hXx2DSHta{d`{W$z^bTvj9eA0P(IhWoAn}4DBoYyMlKUL;h8LGQP;wL!OMD2? zLmZmK5o5QtK*ARrrU5k*^}2!1<{8JM62E3)IYIRhc&|d$q7Mrl|u!ozoQ-ByThac+@{V`M0G% zSm}Ykvf0_mjP(5#DJr=UcK(y&2!m%KqgDX{_uDohfxJ`Cl;j8`XM0B}7v0+1Lv z>p+JcK1NiC4n6^QEcd|A?w5M#T#XtwRywBL*fg8Mn|4>?x-42Eh!YypC0l#|*Pq=g z7~;K9pyJ-%j^u6%4>gvsxFJNTrC}D>BbAoj-tlVuyY(d8ams-f0Dd+30DQZ$gKCyO z>0lK~bF?|bTV|KqR=)ZU)Yf`eD1F^WZG`%idKB$^+?aQpZrdMDiNaytQ-+vv<3D3MjAbz&mG1ua_%JBRf{WP=tKBPou8u5Li4r{axLYuT9cuOTU->m^q`^09sHmAt z-mGY1R%OmeMe7r3jSzg6cMr>!ZdyyPXAPb;RlF&o%JL1K+*_@jaXW3$fav3nnJQKQ zhnxu`m|3@)!KBfso)p&jz3TjH3rtCF*FGldXz%MLEvT%upw_}C5mt*X0d9BGOhWyc zOsZx>8Po?G6IYWW%J&P~WhZsw(#}-u-Z}}&`K~?X*NDqW@tIB)Z{%JgD;bP_ochZ; zx&1=D!#=XMd`Mi+csh#;9O5<~UX6CeB$Uv>I58O|MjR>#6!Uf8!byjM+Uf-S%zGUw z?aPyM82VEClWYCp-R+&mq?xhL&m*E(R}JbdxP0ejq!s-rXVLyCxU$YSJ<(I&Ke;cm zkJIl5cw=6d9)o3J8cQ|c!x|WhGEvxljC7d*SjC2LDLI`VKwJe9cW~+x&13+OE71#! zt@$(!Bgtl0?`whHPH+Pcc!^jPbwmTXtm;IeSY~Fqmh^B2U)7OTvAwuMpE(s7v zrxkmsBGU9r{Fh@ZKd}v^qV&As5vkU*37qLK$Q+de)LpItu1^tu2o+-~B3B;%XgBB^ zR;j|dEf6>pF)E4!U_f1>yb$`i(%19m=o4u)nH$$DeD4CsE9)%g^aO})_t{K84J567 zk%p#6Q7Yp6GC$GkTQM*Ab+$3#CB-VM%U!yzshxCDa0fFXwv9Q~X_N0ESE=U-osI_= zc%O|6I-Cjy+T7&rET32+Qy-x_!5QuD^gecCpO#?S6tRoQqS7?AuJI`^jt2hCwkBrE)_)8=LkN01gp$gBNn z)Xur$4`2gSP2vp44;(5*(s{|x)Bm@THMA5p$S$v(Fwt%wbp(5Gu}nG=4t2d9!R}dM zDSp1?0oh4D&&O`1J3O<>zD*PeP)BHIZx}N&U?c9G2qfn~e7fI!QJvN$U_gsZEO6tu zR%w9VQuomibzBJk3q=Mlo)K)#dW!C4*FA$u0H^#|lRJRjH^9@1uKm8p=bJ>?#GVD*YEyDys%&xF;OC#q)M~G~%?# z-rh=HK;lbXF(_gpqUkbm!h*5aCB3Ov53hiJ9sd4Z=l!! z#fO^lEnB%Tc|6XoMJA;5p70*d#i+iau~U%Xnddo$?Y^3DYkMT(-c17(BJYEY*)C0^ z$%xA)Oe|L%J0efV2-sB!>1 zMY=HC0#oR(gAxb;j(qFT78v?cgUTZ5U#Q~*Fh>h7ajp_!Jhw#87Y<|>kglKCxul(U I*80K!052Xeo&W#< diff --git a/man/figures/README-example7-1.png b/man/figures/README-example7-1.png index 3c999c67b781e06d03bb5932a33d8960ded89a8d..7fc0cf882df4436fadfee0f5131464b1bbb16066 100644 GIT binary patch delta 13696 zcmZ{K2{@Et_xF^FN>R#^EoG@>iR_`MM3yYs*KCD`(8&6zNF_^#kgbw6gD}QEB4p3L zkL=4B`xt{U-#zMmumAtMzVEp%!#tknzVCDHbAIP{&bhPkbd`9zd;tuk^V-g+N@#=S z!+}DldgCve_nSSXIbH}IsJA6XpMK60J$gws{r8s(n9(msY+rw3SG~RR+f1`(oFf}| zJygw}QTiNR#l4!Vl((j@_uqQfHK}5^KAHKLo%zhY14%V$m(%ZY@Yu35Mlpzu>)fs% z<%A^8ul}4-6*GNLYA>DnSxG!N5il`)6nVYF0?CYHM~Zhm{`dP4WNCq*t5*nEot3d# z;N=cxR_QN6;Kf{VB|ZW_oI-SXs2g^bVa`iJ<|kmZD=-uuLziEx*2lX@+97r9;%X_5 zq-0#BybYQVvaME$=O*wf4pYZ_h0-`B#Q(n1k6Jv>%mi*T@wp6_ks7-)bW)TklQ>iu za}BgxOAu;cF;qBWGhynBUVN+O>&3&Jtkbn`?_J~M`^T!oQ+5!_L2d-gthL!1VI$Y* zMT?_+T>dK|?+^DkI(e1rTwBOx-*7(p-{~I05IZ4a;VKM$5*aCoXT)h#*!RQzUhS_? ztTjC?Xl9koje(LzTiOf|40hA{*62RzOTWrir^Qrc<$X3R7*wrho)Q8nzc?&AC4YhPfFJ0pTjBxaAm}KWRkQxyq01{+6P- zl!L)K^%9;zn`0sNGGpebp_Nxeg~_K1xTocIv@g(o`ALt5jq_X!WMj;P1qQ!X#_ej1 zRkfsjx!X(olBS9XwH@mvMD`K37M`VI;2{<8*vk!fjR(}uiW<(eT0`EpAAd9Mturw6 zp_F5wmc$mvYgI0#vO=#@HT9?j3X{RY)&wtAc74rj)SpD`vr0(|K3sHepl}Go-N zo!a7BTAOKCWyq`C7%bp)4+sG31&g$PJwcp^P(Bnpn~564);JDE-B;-M$Tu8y6i{1_ z=6a&npT3;DAp1=@yjATED%F(&>*PaMb@GGLYDF=l) zlQhzyzgwI068!Tr6h9#}L@2dNxr6@pl{v1tVWo)p#h${)f`1nv?0AbVAF-cxgBPwW@1jMg zpyXEo)~@*r8*X;gdzo+Vsp>MHrvt~>r<%gBRiuTsT1qM<#B0M>35&>+8ITVs@ONCA zh%MI-eb(z)5-e|{e7dWu%n`I-;pnURuJV~@$lAdB=gUUg_x?` zeGvQ7W@GB8-*?FKlnR5*#2^Y=;k|U0triA53sb*&!(d`QM$+Oxp8Pn*F%YOAz%h^I zK`?Xp28jpf?fLAL@P63)ELOb%z0@_UFeknQtu#H?ij{g!*U5rlC)>#{Fj!+)?)dA$nMPwh|$t;{M6VS3U@!hKFj$^jNcf&)VY&*)KKP{q??xWVIKfeK>uH;xN@VnsV8>%y9AZt_(xCBrsq*2~oxDbm9YUh&~6C6I;-uIT*NX_*G%(^-&D%HrA1XWR| z{;X;ohgq9u;KMc)!!@h)mMZHySiG}jR2YOg1G%YVP-rT14Z5XApVz9=+u7DHQfloj z?7CfcN=$8|YwEmJpUN*I1V$d)x;tg%!fUX~*IkwCWi+rQ&g*mX3M}xAb}W|=SQZJp z)AN!ZbI3^79R|~vvv9qt1eqV@vyz(~o^%Vf4FV=zWHU0+xY~OK}@M287dn z1V!^itM1k=x_-wX5?ZGh|L7Fz41v*iRF1&zNZ{xHC(;%1x|Kwp1^_amtL05zwO>WF|M}ne2K{eCrr?WY zH4HZWWW6<(Z)adyOiirA=OQJKXD2UM|LEfi;y319iwPaak?XLthg9!|k5YT`NP{bV zcYx~7e*R3X$8MJo_gG=N@|bI4eMyi%F)!c(2zA|6OX=|9nu3GC5C;tEU-S6ZazS#_|=e4f#^n*H7kA zkTO2>i+=dCqIsLb1HAE@db%tcO;-feX^%7o)_!KvAdoD5wW8p zA4mcIOMR6(H_SCEzw3!kGv?d0%U&Bgy)V%Cs>Xm!E{?itgt#7iz+fl8-4a$6RGfC2UY5apm<;aOM4vBTkh^G%hW*_zdkhoo_4O@+Cc{!ikC(pf z8p`WKSK|HRkNf&#WS|p+?ZOLdBZa{0#Bf|IJGJpf2Vh_NF4%X~nf_Yn#^#->ui&Od zM(bOTtB7rprIul?Ri@e=h67HAtjA_t;ZP8Bl|N#bL|!R$t?j4hXsb8}V}9R?!5#j* z@w9R#)rrp{C)h7dZnrc9ym^Fg4Y8GD#sItd2|L+8tn_eWb9Z|QOC3Qmt5kKmBm(#2~ z#!s-jsniqC+R$Ug=FAu5H?{73r-xJcOd$GYPCnIbyTis=x^HC+3Amb#-aDx^2*A@# zY2}jm!{~+-ucq3qKJ-oeeP!W1?dvpcSu-Z(+|^WUO#1W5BXq*r z>l-%zo@1CKRM#J7R~gUBRTj$_y|(PTsa1J#h%; z_7;pI>pUMeP*JvU=-tz)`LJ>$*J19$>afl(&cYnNlCQ4^YDHl$n&iVx1p1UDe zsIOBj4!a)u@7?&EWkzvWAlZdrxH?6jW`~W;4lrj_NXaF;rosX_F37INEjgQkFwu>4J1lRxeZD?q-9sXgOcv;R#MfRW6wc&Pw!| zakPBDl$~Fy7$3yC#s_iH@5F8b+mE0eYG!xe};N@(UrqjwQ?NJu6Rq0_dhZ6lyI z3`nt_`%kUL6Qxoja(|_~vnO&(ZxPOzL9)87F0N*5v(c5L%FqWb#>nfR$TP3hE%Ooy za$B$C4R1%iX|XZ4VL$G?%@-6V0|kU1dvN7s7?8R~;~5<2IlH#O7xks8+n=X8=9`R0 z%J3iqpqNi)8gy2YYWAc)m$s(@cf5)FU#Z{ksUQyJSo!_z{(O($qFlKnW#}uL7)aUg z$tjhR4{}MRdwd0jjbm#pSs}Ct|;RelYvQD+GERo&RcIw`vurX z4Oe+;>e2sU!Wk)k?f}9d1{>ptjTHXgU01HMtZKYOLQc{sn!S0+8Dfe*@ApZf#BBcu1e|iPHf~MEu zk1_xBn!cx32WLaq%Zads94_Sn%W9p}SFI*?r}?=?tBg({ELt~1?0ZBUfbPCs+Czjg zp!vjT;#gCUwh5LbJ5b9l`s<&2{-rLx&`ENqgwfd^?T;bf;LC)O(yBfZW&?5rnPR1{l)3jB8y^?9;Cj3ar{hn?d;w>Hl9yK=D7jv?Vj`xWE|ef^%Lk}|G_M3BN?X}f@};u$qu=Gkx#@yfGQ zM9;cHG!T+NLP~W}{M-r|%XQIien~ZKM%!LGlne)k5H#hthx=`}Bf>OmFsA#5siOa+ z?a%s)sb$@J(%L(#m25L%c)5!^2PSHJ6V&=PojD>lkjB2RWVm>h2CKS!iZ`^VIXU@X zX_yjsGCU8`-yEOkC>N@H*$27j_FSwmq%RKuGK%gw7Kjk*W+~?_jB<_GqW2)IBui%c zy_0l8GrV??ePbLZqU=>AW!`o~fM z?V)>#c|x$9>u%(jx(NLZ7V>+7jbn=c30CqKHirj$IX!%*Tz98kKa9LWuTTRhkl(H= zbxfHeMlDBSpx$kAd%!L(g}RESZjN9n8@#5xF6QM#vE3=^x?}Uh^M#yOs+4_w@zCa) z)$Vp4b{jk~QU3i2A%zkOc~7((1xWiz=7j%OANrg7x5>U{&~9_z?t~Y0tosi|OlC{F z?SjtV(9)s12LxF3ztHmY)?R3t>@CK{C2&~p5eC@JItAp|FVX+OH}-f3V0wTE_Zp!i zof{9HAHjp;E5R=`EkGOqNVe_;} z#}g;?)74n-hik}OFwEsx+F%Umal+~53%$3{k!`1&(aAcvK`!j=)M%}=uF?mkhIk8< zp)gx$splm#_T(3kRCe$}_CeidU6HS$=*YYUcx%zt^hSn4{Jpk0O&HAh@qSRhJNvr& zL#nRNz2kgAk)v5MX7vpcpfX^Q6K3|suq}~)b&Ao|z~ zr97g1H{5w9mHZon9s>7TU*1&n;xT<=>oC(rHZ3A{XgdU#all~gDlkxcDSA`=fqxAl z-}oS`oforKph2}~f#k-CTVk4Nj_n{Cb!89`&?ueNE-c}I1aoimx6WH^1u6wp>K?9o$o7iom^z(e(Up`KRbzwQ(>2rdGLn2jgA?rn zz~=Jb9sr-$847P%OKzo`-bn*x8Pv8q3hbADuoFX%3MlM+a8`sMVK$Gs6OF(7QrPt7 z%-cKBrloOrnY7H$q`73fc8%1jDgIh4tjR+3;=G+Z3)gNh37ExU%!c0Iy)aYI^-B4u zi%m|nAmHO z=1>{siY>Vm+X_uLp)~_CESGk&DB9n~w6bGDr^H?K(GRvfB|7&KMg~6Q=$z(ocC%%t3!FMLit0UcaU69Bi(VD zoyUlr(&%xrUATuvbYoHumvf*@XXUE&{Vf+;C834{_+?PrL6M!~lY`5x-kFYL+|Vh! zr6oJUL9~SP#(rR8!WuL~^IX4a%`22-A{k1{r!m_+-&#>4h+GyY;5S?ga922Dx5)n< z$F|$H zKf~_B8FMw417tn}I0J^yhN5g9rJiNPJJl|quYziYk>kmpUrIW~@3ZQ^tdJ+#Ix9y; z*Xk}nAHLolYFBQlNYWnseSntUp4~?W3+&;i`J1+je^FO_n3SV|4t>tnb2Yp;`E7LLd77M4;T2_raIx3sR<%<}VWdAhy0?;0tPO z&rj6YE|)u(cn}8rpiWcY`mCUoBir+^gkVYjPY;zJ!ZXLn29S`pbBN$bi@iZy&p@s9 zFNxNm&l{2(x9u+{C0*vf{MUtLA1ce|7a*6^Yn`Uv=V>O~6;eGjI)jv!AQ*d=qvDbs z!_9o%SQYjy{QT|43NY&u%|G3m;?=A}!DM{x4;{6V?6MQ@hW++w?2dGCdYg_|{rvv% z83p8H2$7IrW;Rrgx|%Z+^Jp%Z$s&VOZI;WjAdH_k6gAQ&JYME8te55S3}<_8qQ(SZ zM(LhkrFg_0EM`w#&9bv;8DNi(Pf|55C`FI>a~l;H*=jB22Nn~D1K<0 zeI5aWRUh1g!9(Ve3@+Vv*<;9<)fi~{fI3c4$~mD-|EI%!k)rfFTI>;v_>#8S?|z}) zqdn2K9sc9Cl{jie!vlC*BOJhPLaX+I5e)X{#R-~YskU%D*Lr4&BR|wJluvbJ+KAr_ z&pW)tkdW!Yj!Z|iau%VFz55gN=xO6^Kiv2JVJ<(M?FHqynHWb`>954N|ATdiWG;KX z>pk%9g$U;1oj=p+=j6&h_e6wt9eUh&JHL=R))4FVGlM&{4LaUvErTg$xUR@1;7fd8)=08VUzoi+pErv{avL#9+pY zKAvh=p?GWoq#%Vkm(K~>QfC0@jvUdS9&YS~`!?x6#8NILLGtgl zXWmXBjy#>8t!+Gz*<11LcE%(9aBB=_b7`{Wf?NfEI#;OnyjPjdP-q5HDAtU(SX$C< z+QhM6B{Rk&iAQTj-d|3TI-lUg03y>#n&pevmoO|$x}qNl$=v~Cn>u7jz~}pG>=1}m zIt3;^yVaPNUGcxBH*QoWl|#|xp&0=9h2pY#Tcjw?Zek;zmqyz3B*+IB?3^(sDZkOR z8(sdZ)>o1=(mLnbDoP)zxp{1VifRwiuZ(MpaR%tDer;SoysmfAIwjfCPewhnU%mR( zwF6IDy!;k=hgg13T7hU3wYRgz6X)|^(gOV4t|Ah|{MMHcVa(!U)p@G z1M4d6=}%5=v|Ck(@$on@XGFEsCVbV)<6RJS5K0)LZ*{0FKq~w5^L5F6u-P6ML}8-7 zg|}VH%u;i6CVf)spQ114)%0a-YkD9R=rYp&~=dPNc?{I3`$L0^r17j|0SN*-KjqF5WDbg=hM|?p8UD{ zfDy2+PRjxhbYZ9lFB{VnGQ4}=@-lfdjvD|=oMKkl-K|MZIt&O|9F33#5@|$;cRJ;O z!xkIZBqiD=!SD}2kt;>Xw5MR7tvoRCg;vJvKx;D=JPRI0+LUmeU!C83zS^nOkG!g*OexB# zv?}wQi!rh^>BWKBWaIWBd4I7&{5_c;G=g2EpPow)iOvqIFW>}Q1gq3*b?_K?4E{2- zNHr~^d@}wPw&g2mMfUV^Ub~iXwP~-B3YKVUNM~8`?1V}Qn5E#1ICg5o<^VVFoy$oy zs$PA7*7D*+1_U!ZO_|G^NwByCgyG~611eb`bM!fT^zo2@)ylhytvak_XL1Ii`gWF= z#sqWlJozdY*q;k~{-+IyAe+K~ksxw3s~g{%>r)xkZf6SRoOTVZp4J!n+F7@%-fc`H zUXA-S(UDp++9)Gow%E8k#hrQfcGi-Jvw&Xm?hR#{>RFBquwRYY`tf6Nqt~Gw2_2V_ z!62B9&nuu97i!e3m3P<5N2p0u+&3EajvUA;I#&-|j78%uP==%eaRlYzqy)D34vuE#?+iq~x&!M4Zs6g<{M$sLP+z&_o?c4e+C4<8998 zRjf93<6HWlPZXnfTqOZ43DcT7fx6i#=+3;z0rEqYw*`R83nJT>hW(tET{A{?q_&RT zCt$9e&PGXTvnq!?vRBRUOPaZsUq2H8%H}&E845mlC^bow0hGlf=3i{})fyhP!PojR z@c9v2gOj6Vf=v|M`kOX8I$^NWoV3nry6GB^q(X`YaIQZ!wB|6)K<>*>n?_T(4!FR1 zxfsct-NHWyozU(gMgfVVz+7e#%EDipr;_VNz47mCUthV=7eU=wbXluTm%8+8&=0~V zF*~92@O+GfVAP0%2WcT8_V*uOtR-dKs$Kf9i)kU^&!_o@I@3EFD0(p22O0#h=dQFG zp{Pi21;q*0vNLI>8iILs?Ngq)Xv#H>@46yAU6RKsUM)4a*I27a` zccC>L8OU$FKvTauc>2U^nqe2VRXeqRJsh93^#d+UIl|`xhZA_Zy(IX8?zNrHuI+6x zlFzdo93D)*MB)o_iyCi{eKSX1n?cFMi_`(nHx+X?d(|6@fL0}yfj6FZJVYZ|f`c3_ z%Q6=q!=bV@S(2whHo#<>|BYz6WOqgmase$R6$XO!cu_oWsqD8aC;BwLTG@P5 z%7R!608+;zO+15wxMgR4%F$qx2E>75@+a7{&V0a80O8j{h$fY&PP+UDb2=YiiO(W zJc>S&62hds`Dwct^b_NttIo8gWr}2Gg)Re^nD=KLC#PGXaO@k2RlS;J2R>V)BU@vf zQAW9~axdprraR|*ZS&XOjTNn2Z4%bcEebsDB6g9w9~O8aZqN08C+#=%-62oP zSp)Jk_25cum4!Td;n$pP(!~egCVQ~{-IP(er7|f#IFyeu9l1KUF96UKDWb5|que

*&7Z3Wa)pYVQh+*ciJy!VD5Y%-Trp$|>d)!jT za%klOl&mm>m852_h3Bn0sumXZdUCSB%Le^Nx;ny~E+zf(*Vi*4#1{5+d29OCUmOf@C`xi+T3D(sd<>5(89+G4aWgL0UL)a2F|O$ z)9%JP;A#?0Ju+yKH0Mx@YpFl`4O)c0yXO<)1JfIeHwrBWK>8)28lT)Q84q%1Jy#w^ zEvyOyjS>OCA1yZ&MCNtl&l>?>3Y6O;E;s8K^Mg0%GEzR2kc=$7?cewUL^@}E2x(J! z_Ou%YPI?1N;=8&kpKFd0xRQHmn(HzghZzi^$pTS%K z`0H#V#okHwSP?_&g+vpm&F`al%`ia6PwELCVy7SKYgB43|)U?g8hP{@NrnC#V<-c|ac1SnO>TncR6x8CBT z9j>W4)=<(+}`)>Q>NT@%02x~4&(FyZ2guJTSW8={Z#WB9zWxu$Ni zcPI$z>J&?t9L0pE#e4rbnP*JN;Zpfkk))Ig3S0mRGY9tPdo4m`k`@PgGdC*evzG)o z05j@IcG7JlVo#;&DiRT4E}yA{GX#>a$SnOvj|y-|T65d<$_TvWHxm-$mQSZGa&=>w zzPPjSn*qYwF=Nz3YCi2e-AK#=vmnIXQ(dl8Pcoyv$WlR*p4!lf>1DB+65s~DtaF#2 zY%%C%Ei9ArH5HDif@6R_=lz>C;qA}V5m#*(e71^7<&s5Gjb1YFtP{1-6&y!9Hg}$g z1VvJp*B9QRA`lWRg|Ba4OrULQBuF!2b}B^VB5rU!ITlZi=J5KV?m2b_BDQ60*q4+1 zeY+ARRAm%OT7M9Pj35Mq-5^OwamDi7|kr6}?D5Bi!oXFVscG*0Rk~E=$_A$G52vM3QE6 z6_;bXgf~PbH^{G0_Vtjcdp6lWjAP4Yl{MTryDPCHM0x$fA>w6d>w3d*#nN1;U5I#5 zo?wn_`sgd7Pk`emfy!p1RlXq2D#r|=2Du8`Erd+%1;&6U^>90vhD4|K{I1C&euak8IhaLI*s}arh;4VA5CjEr^G?){p1hgdy5q%F4qM2+``&vWK@E-QL^zp7CnpKU~d97Q1sUl(G7x zWp9+5X+1~?U?5-6?}t~j zd-SsI{VKLpl>YofKV0QY7{7D-j>1QG2Auad%+R1!I-*Z-)M7lZDKmEDopZgMe1t{v z+SzdFiHnk?gBj)JOlyE5IF3N)w<3H_WVC$h*=Do*=sM!*FR>V^3sCJ))d7@}u{oU& zf7!bTieO4B$>zAEl_*qZ)K5D)1Pu%C1SjCa)^gE|*iARCN(LBTu@;67&chpKr~@j1Gt|R{y=Pi{mD->)m+QTYCKBnNXdtm))-2q7hyvEC`dDwBcwN>l zv0sVl+}NM~QP#B-wmwj`HnFCwCp_x6_j7;QKEExFjMu4Xdkcb%D&*9m)GS~PB!pm& z4mem2%k!SM7`2<$e2k?+(kA%cyR(bV*H7lj23w)WT5FrtlF|9WlBDX331;Q=pe{sX zNOQRO+!&9Eng(Q}74d|Hw1<$`^rz{r3nR2X4#Ddi7Z=yUBHYy#I;L}qwe!ykXMDEe z+QJ30#L?lA`IHC|6j`KpQ5f^!{aPrz-J2O1H!dvSbiKuNI_)m4A#$;tZ8TN3E}u>seFY&PYEN4?RcVysv@PRu7tJ!g^VrE6Vy? zp(y9#7q_j-Ol6)m>=c((j{j+{%MPYdYi$|&F-Cruv1J~1|GO?hW5O<4_p9!x9kSsbq+i@^BnmMZOTTF9xIYt45aLcA?~GcNqinb zJ*devlzSLKS-12WxLUxr(`JA|Z83gohaTKE4v;RZN0G>s+SSe0ctZAt zcz-6Yhi8oKf_O#TN}S5&D<f!ya>2*lIT!4-x|EwWX zo|lOFbOd=+b=GSCs3;vDwg1Icd@A|v0^F!MWZRqQ+J4N(#kDdw<&oXeO3E$MtE!LP zDT%N$%?ZW(BPKIH>rM}6eDb?r09j~}6pQgzcY(mLFNuDR_w)G zQt3V_Jb0Xk@2nu|F~Jb4AH}c!q33*Vv=iRv$BZW1wih}kZz(d^VR^>&By_sH@yRI@ zUGpOwQU?{*?8CZDEi$X>k+)uTWN3-A{CGcrQye;ZT9Uw+_;Z@eeJb)zoZA<{+^raq zqzTPy=#WQ;Vy9YX2-ixV_TJ4Ks+-PSn-vutVj;MB>pe(c$qY=*SXX+gZLayF_lJSs z>_Rt%#>q=mAff6g{`i)F1CWt7k5ylSpRVa!&B9w%CPr-nS`NyrVRcQaKPK9{t~VyU z4Rw?FCVl;*137(FJ?hUyAJ?LuQ-jjSRFCrwUy0{NEoB-G;;*)@YR#70KNsKsxI9^L zvHi6{+o_Gn;5C^y;WI^Rrv?1e|9qLRT6}gnpe)2L9ueyJjfG9U>s9u6gRr>neE%56fIb71@1voLnnHFhV5ma;_bvl8 zEDsB`YO^c09F;#5pexTrdzkUZ;XQr_gWaBjV}?fLX|4mV*)SI5J>pH|EusSJ4pY+- VpG>MXNrd(v^;_CEb5*Qg{2ym1FHQge delta 13588 zcmZvDc{r49*#4B>qQz2gAzLbxz3fZ8Y4KX3kbPIkG6;jQJPN6VGRZngvSp1J+Zd6Z zk$oT8cVip-%>3?|-tRlUKYq_~n8+|PYq*Lj`Sbzb)kyU6f$k)cok16jRHbEp>D zQXhDMJumw+8PMgz3ewe%iYU*{dyM}|bG=Or>8M9oCI7Q+ z!Xf4LL_<=bDeMFyzI!w5N#XmXRB`PmrG2QH=WEXeGPH+!T_%~iWebli-7No=qBlzATV99I2{Q1Eg4FVwS{S=6tY0H{E`@(_yWhTrC*#1=ElEk=G9 z^GcGDoSQi|#=0a#C>rvwA~ck2pUG#0(XN_1n3h8WKhhRiw)ZIe?rz)TgkpbPq9wY> zbZwkqLq&%BhqG)~mytAfUz|Kif8+upXP@zBh&s!*8Y35GC2)OnzB^M_wcN+~QfMKx zUAQyl*y0op-n*FFXSU|PjZX{Nc%n#u6xLe&_0T{kYHTHpHGfpZhtI-ydLeQh>&zco zCqa>vJ)~s03@5${$DXaTv^ac}{tRp7*;6%9l+}70#&Oe`scz;1LRHDNYlrq%2D5tA z$`Z@ZsWFbJBuV?xX9vN88FS~9Y8w7BF(Mq8FouVBRG+Y!TCB<^1nzCFBw(27g9i7O zB!Y<)yWL{sa-(?7NvH;TUJ9*qOW_I2xpb!R8uNlbe`w_P7#Fsyl31+-Z;z9(!WX6t zqDfmu?G-#k7S)5oCBftzZzV!uP^%@GT;$77>A#n8{O% zK27uw&8FZ(j#m@hLv*BqXT8EAg~x5PZ~1Nia?G?ZlL)YC{X#Y8QUSc}bmAfUJl)yy zW=Vb;7FwWgyXU3*TA_0WrzZoJ$Cv$Y81=jrD|dnka|mP1!6gTudIuI)d zol|5{+L4Q_|o7Q`>rdD@sgpogBf64LpMw-Lei+SCDlofrw z$N*vBEyV226ZG+{vAK>g#58tWPECF!Fu;9cGNiE*AgPK<_;P>ocPBdBe>vOAr{JTj z)StnP6-3Sld!H^W1gM+)bmP?0+;5Gw@qaAiV}K3V*MHxl4;$=FS}5X@#K&?$p2R^g zNVq=>afuWdv}_3#d2fF4b=Y2&Cpzh}ofrpbC5^J7T&s9A2*VR;or1wGz%*{( zG+2n0vS9nOgb3GIhhQG%iXaCJmu(m;^EQHy;OFK3LgX;)UG`bM!KcOhR_&(zN%zwA z+^W_ZxZI|S!c0AvKEq(mkp-86sQuXnU+-%bU4hjcVYqX<*iihD5`>W_G@WaKdz>^I zg)RN=ti!U_HstxID1$(m@77%z9b)8Px*@8fpqO;_P;gVv@p4T{kcU(#t6FjLy;)%r zay#0pPo&&yYbU6uPklJm%Pf!)*0ylFxs#}?RBpA*9FQ>ugUz@X5gb1h&zom=RW?2- zc;6NHE)JRI`jDXzN)y73p5QmHG+I%qSZ(R$n)dHkV+^-Cuu*#}v;7+O&m*TWbAe)V zry(PMsQoS?n^&!R$g#w945E^^kKu;#q4x`v=Xyhu>i2h%^OHk6VuxWT6&^g@bY3~= z*v4^NS~ed7^Ld2rEN^_*Y{W&z$nRa0Al+rOdCX9lrWycwaHy4iC`V3A=E%9ZYBLwj zShB%hYA+XS%2QkoCKr*6y9;>3ZOou5^|1#oktLPlorY=Y3*Y?}_wo=-+q-B=zE5_pGM%{uqYl*iQ$Eo|# z45$Zn=OLmsb`7FfkyznmcIwU;g#{6Q??5*$w<5O+_{sI zu;6a_gPB%VitWbiWSk@JJ%ycx(qH>3OqQ^Bhml&nn^_FM0Ame#C(uZw?ip30cbr89 zj=|pkYC=wqQ3ZWSM(9nE(ADV`vXupSaqLQp`2*~?M5&q#g@7#!#x(oj_VNin>Q3Xk z2;BZkWdV+|$GxxdnWrBWU40d@a%rdjI?2DGOPP;PL+-lq&EylP*B_Na{=^it`2-1C zw+g?%i=(FWTTvZmySlb?I*K*`o$5cmt=r5dC(u|g_jw9n9yfGqcOjEXUTnnOpsK5K zDz7wYM#<#LsfCWsYP|nH^ebMLikuXpUI7!1v$BUub5hP>C~K{8l~kkt)X%|YVya5~by@*1f= z4F=16Hwa&1$0+*91W`67@R`F2timaIBoW*T^ETK?m^E+vQ`uPY-Z}|hZUd-TfP5GR zo%>3MFiB4_Rx@2MTaMs68ELirf>pTOKsZ)RE^br>cH!_mMvA{`qp#*(WIKjnqT^{e z=ycSY2Jt!N0{0r94(3~os{WpB8!WT5sIml<5x2l!Ji1eD8o!E=1f&*xwq&Cy~R z2Dj^^&~EZLhch@VrMjFAQrp=Y?5vqp@2Ea?hVPL)jS6ndjv<9Y_xdBNqn*OMvU%5g z`=(}jWpTU0p>4zS#c+NY>$4v*cEx353mfEZzz~&Y{GkCQy^1CwR}^5uk6yTWxCF+t zq{g(Kb3)HgLwkYyLO6b^4b?8bmkZ<&3qK+`l9kzqk1u%#+WEbIix5T1yaKgQ}05LT8zx^s_C=FXYVq!zIS?j#%FWcYw12s{Hl@x18 z^uGhaE?i9F8)*yOo9w8ZwgE)+ndFr6u&+w~2+W=~csdw7=KMo9m*pinFnq@TSVBNa zry?hmEoUePJ7EMrXs1_H*l?eGD_jtH4;>D&XsGjci(HglZkka2Vt;{^go;9<#~s)O zIE_B5*WH~RR{d^|L1W|ssQT~&55VM)K233KwT>m{%BnGHGQ+ITr7cFb=b_2u6|pEX zI`2oV8unZ5A!A0Pd;)ojkmt;WWs%Jv-J6;p&2hk7gt5NMV-XsQI-j~_A}~eN4N&KR z)i8l^e&=S(&1}#Ta%U{apq5wPUqG@0G z&cy~6EDPe>y|0JM(`1~}8sNIPM8DmL_dSZN_I1nSstZ&xgNr;2oB0HcgHJ@-G3VT1 zI0^f0P>L|sfL5gIKqeHTL7_N<5TC$_Iy7qRY~70m!QTo$3}aOw9fi3wzvqV4j1c^Z zkU8Rvz5P)Rdg_He&?qs@dyKKUR|5Hx8dWJCgQv!|ImYHVC(1a-=JI-33wnR#^G|Z! zxWz3u$%Q3xPLLG3N*=$Qv=2ygp#2n*WI+AXDaWe$wbx0k5@dJURVZl>3Iln_&wKEc zv5>m%Yf#+D!2|WGJs$74MF)}V3F9^(??pOeC<`-@Ik!%H>uQK1(hK#wx$et^?nA5-8Um2c8^;(_VLyr=C)u+W!JA=^FD56u6`^!f6Q;d2mYe24#4eoh=W5wW+A=SkobXnA#(1j!sj#sy$W?UbrTKdw4Qxr>$>AE0fiQNEE2{>%8&w~X(2+mpfdk5 zP|VF_@#%egE%?T5XJyc4RpfQV)j`@izlP3c=Sa>QrKirOPqXAcXHLC*i@b!?jEc{Dg8jy7AB>J*3ak51gg`)r zWL~r^N2Uc3O+o66P~}FOolywW2(yvTB8IWb5)S4SWM9_*D~-?@KOr(+KL2-h7Berg zG-B^5(GLc&e+7C9giqaQ<0zkMz0Yw_OoLUwr<Sj*%Z}N`M5+ zD}A=H4)voya0q*}{n6QE$kK1afuEaKWncVAe_E`pUx3o3sx?Z|7)?QrV(VB1t5V>Cu+~=mQ4INQydUSYUyhRmyxH>@!)Wovg5K#Zw_l;nDL8=CC zykDNgg;C)o8~5rgsMz++|0e}p?x6-FY+Ilmg!+#A_IMp$RXBCyMeU+9dHu%;{!W^= zbLrlGzMv!%&CGi?qF?EC^ha*)NK1Il9p$h;`Bt00_>sQCsr&TxiqNsm284}W>Je*) zuV(TG?TOX4;s~Y&47w`3&|{e(1T06ZaD`GvDoR1J8Spm_DEerGj;I}|7aQN%J8$j| z`5IIKR26Php3`ICB98)ntq-ISz{t7bC0GBf^=E6%9o^<{NBc4e#*&8yI8Fa?_1#&j zyi@w}j^_31aeVfL|ckn(|EkLy+x%2(l+N)H2oJTRKq_hl9?`IN>kmTo~VBu6kWK z>(rnsnghRPH~Y8cL#D?5s{x&^BYRV2xhzKch}ON)#%A6X_nSI@+y*=aSmB!>)R+37 z>E!69TeRj`h%CMUQ{qzB4Z`}*HN!d;$vdTd*oyog`}Ouq6Cd0I0#6y5`v=!H>=RE} zegSIy>@cc;?v7k3J9dCY?!L@FV}2_=X%47{%{T=)=|Zbjf6mXbSaH8#tsP%MFIF-@ zivbXVPGxm85m`GvUQATu*g1@um8C4*tDiousa)Ni>%7Vvf(LlG6uUa&b-bWr&B1y$ zH*)+BuRQ}{t{L_3PpdzXZtU~NOso*r<8B+wtO)U3iMzX$uX&-!^9Rq3tCqBMm^SX0 zwHP>B&KMJghV*xAHRY>8Y%jL>6QlRp4E&cWgl0|Awa(s!i;bj(i9h&O5@>u2Xx)1n z>3uVs&MAq=Nv}4T(itQ8`xFAl-sYUf8h&NGAy2oZQL3e&YMauqGCsaC8Nx+YO;_-( z@|S;VdnxC_+D>W6cA=4KnLlaa)g7o3Vh0)|fwFP+!{vDz<}>I_UZ#liKd&rvi$+1! zD5>Xvg1qtkeR`~6z5fS)I`mi@=}RZbU$PGtGZU&E1!(sArQ;CIJmkh}FwD!8x_igmR;SE!^nLS~5#%yU3v)V; z0_x=WuA*L%Z(bmNg$@r7eYfPhf6|zkoUmx&Fsq9)FTkc}bp}&T=e{ zJdCqIaP>7%_es>XUEF>+bqTjeEG1AhsI#iO^ZwB8Mn9$7hq^KhIYJ=D`)~(F)NU)$ zw8%EMwjIjUavpVD0;2F$Q)qWY6B`;zAc_RFHxjpF)I8T-s0e`Yzc^URB)XEPJFNC~ z$H~yodGaE)u_O!wN$o~t%ghQwwm>{UI+9}My ztaL>CyLBo;M=a@c_s1vg)vSpnPx+G;u3lEiu%`*};=r8rqCvHCb2Cdwx^-~8py_p# zeq~-auI*A%iq~Tp%)0!DH4OGoRvf&*`0h7xPypu}WN!zq_svYnBu={sqw%pojZ>XS z$aI62bp65FxxaHwL>?JIVlPdjO!+Ooh6i{%IOq4uMWnzT)C4j?^TfJ@sRoqb7Y>_6 z+3(&I0Gd9ivePMvyA@2pD_iBsE2KaiZ;L&czM@e=8KENU?9*7*>%)BQ>`)kMt^HaM zffKAXM+XMF9HFcuzpP#~^e^8RrrLP4R28tQF}ANS!}p+Apt>XBj(tugrjd8Ol~SHi zzgh12%6$BVp($R|Jo0UIAKsx?cJ}+--6f8TY0GWLy`^9<$>%_rz~)$=iD}F%d&SfP z&AT%7xVM3V@0+oQUKW>^KO7l!bHPXzwlG{$$USpmhM1!G)>-%PiP&VHXNO=lUrz^v z{?IPuB*Ul1`Yf+>a@W>u@^G?_p1Xa@;2&(x3`EGMojdo6Gf6{I8;IE&6? zMvMvc5jtyvDk>AakErvGz52!_>2Zvy(RQk~`zZ2}ok~tKE?3rbQfe7lUkrE@ujQ0 zI(?C(c{PqVp$z!9rzXQcBHI7$s6*J97JKJDDn7l0*tJgGjXMI|W0*{HlA}@qW3FDyLp4Dw*YBCaCFgqs zX6ql8yT}@4JFG*)k$1Os(LSb;a6PQv*U$$^U*o!jQ15^}#eot^I6%0~8>STpU}Lxv zz5r1`^tBZSr_Tg1T>A$Ni2F(#tEo8fEF|}apiM~>h82bBa6J~bXT@P>HRDH zPVKL5_0p`Ev1DImno8W!+4M_S?MQYh{pJXLaKp?NJl;FE5_oOl)mUw>U(nRVdI2j< zOCDhY)qU=jL*VDHUiN2!$zJyD%HaKEG{HYt7K2bM*U9R?Rb7G89~oJqWS3c?cl2^n z?=8y>b^c3jO#l*mc|_1^bnGfG?jPq3-`&0VIECq)(eI9)Ir3Y*X0B)-ZEt9}=f(@l zU4cmFhQXmH-m+)avW$e&&Bf7h)zgw@S9F=`baIqlIk}_=4L51qbsije_{>vQi2Jq% zDq3CX=vh8{f{u`@<6$$tnOkoGqHCP!xNa;}8Cthp-!bOl zcDs>Ppwz|390UWm#2ydmr4RS#r8n`EVv~dKJe6;blkMXry|`Hd6_tN{twc!*IwbwD z_rUc!8eldOD8I4^L4wwbv5Bji`Q7s~{%7_AD*PI4f6lQ~ExWA4X;PcDcGJNa|7By8 z`wadt4Ay#?MtFOhF^RC;#>GlG8U~ZD%S$XOYu|`|(bH1M z-7PV=1U<($7~5c zGLy!eA9n^EPpS~Vy;qukgaIMZZlAdYy3FoB7-`JRro;K{o}VRQcTU?-G0lO6Iessy z;3|8n3ScLoA2>$u2q{>Rnsg_y{lCylnAo;!Zgsq4R`3zVG$EDHJ;(-NhzkPv%M zKiJ~oWTnyJC6c-|nq4YVT6j$%)A|!-XX8P$I%sw>@;`zH6>_RsNy{MTS!wwMFkew- z^Mj1P4A6Jmsf<4W0r3jOOmdm-mq|PS`rvY;a-T0SfJr@|@7o+@_T@>0XHJ<_d-RQ9 zlwydK(~p(1Q{+6*LHYvSC@g!LV2Mh6+as##IBS(Tpy75bHAV|F7SxMNp{GoJbnbP~ z7~Y&!z{@_z9&z#2v@Q-%8h_a#e-0ZMl|0pZZ!{zPH8lF$^=Df#p>j~Te95C|AopxV z_CT_0yAgRGHZ?TnM;Lm`3Dl|#nbSozi5=Mai-y1EH3Xb^X5=? zmqw}%ccA=7Sno%l-X&Sr2DT+{JAwZGh`{i;pKt6s?~!%3o;a*|txr8&tlP4`+ort8 zY{p2^%pXphH^)c_O<6JMpE?8!en>ZW>9oRPO)4o9pftu#p1m~vKuJb8PF+WdYn$Wl8L4uE*R~y{QbOs1)?Vi zsmm*xuAgn7IEt2&TV#Zv+s@h5mhX(1H&5rizPtSMlFFp9%ks(X`R00`n9$dwM_hj1 zVigK#6oO-=4&9@GO&}2sS_Pmjt#EkQjm9E`F)3OvYDnT^|D|zAW#Ea-*N}a;rRd{g zvJv}v2)q3#K~%Gw5m(-wFIFM`3g1vpY2R?g@o1NG+h%#7M1a=+Rm<=fP1`Ci>2?${ zvKaNdFBSc}4Mg)@f)8mwd-W}B6aby^(8BtK0;mA&7?vSUa5A<3IuYZ zUY?=zpeqapgMy_DMZSQ-Wxdz%vx1$z^l-Gb`L90U_B&FbHv|io`Q?EdZ85#oMZ@56+I7P2DC!5+0%eV@2LGNyu|{#D;OpQ!NXo%(Q4%Pxz;2`^ z;>?WPNceJ{LPv*$*D*lHT0-=fyjG>|c4+N#gJD&&4RcDCWWlqd+WzM{)3xG0^ais_ zScaZZdG@3{kmDx(u~{B#a0j?<*I!}<(JDW_KHaJnAUF>0xAdEi6@I+T1B1N`p>^G8 z*X=trpVu&Tq^P>#UOHd3tn%#)V&Vi}ji7AGB%tZu$8zAd;NGXZ>(jK!v<~h6H`M=k zq|3dzv8`b)vfiReV(*>XXNtHQY;Qo6gZc<|@MHwL#79-AIu{EJ=s|Z(w~X_&i)<`D z7F0f1;sz3{*OK0y?UE|^7tO{GAv%9v1w^K3q{tR<>MQ8Jx|keAAloSlh(R?4o5F!y zw6VnQYlo>`2}*m+ma_9P*;catdG#wj_{?#z3^h8RYk(0ddfKb6gF2<8(~%?%Y8%0B ziXGO=>9psW})!I}uv-A%rCRONJr3&m` z$&p*8aw5rO^hDpx%-Wco90swq%{9Dya;a9`T9pz}iKU{c1ZS}075a8Czw}ZAh=wz2 zSyO^SCM9b5dT!CWavxj@j3x3+wxo=XflxKO|8GzmY5 zEm$GCxJH?{6a!)oXI0Bmr5w}>S~H~f`#D(Cda8{4R-+OKMWkm=cL54X@-3NMo6qAA zPC@%0?o(Y`G#7f-KKRV8)VtDvg}<2m#A76m7rerizMAAAhuAG@vkN5s_hpzU@ZETKCgIy|%3hBnzCp_l6(!qz0ioPlyc_;k|5L{(DmKF%$-r$G5 zt+@5c7i~Xau(OP`J<{#WV~3LJ$z(RZ6yGpob*v?nJu4i&F`TmUW@N=7%qzVMv!mpO z_BeTse{OHhY9x?EvCDCrP!Vr*Q z@0s07UW^qQWE-e8xyWrrB=Ji-Pv1qZ#7T-hI&QQcnS4>$*=H;3qYl_tNTu}3wM%ZX zy-)kz-P+d9GQ;En0MDyd<~6Seed79 z8x?QgOX<>qW`qD~PSCY0{x;q`2rF;eYF0->eK0DBUb^Lv9vu724 zmhGi}+d3oezQ`B$_Y-gYk>jhglNr!GLeH);&$ZB>Jdp3#SDqk>j$fm3to)f}pX-rm z)l#t6!yl?6>CrV3ZJyj8`qEjTt3XmKrRVq{Kz!SpsG?dev$O{|oiV{rqp`b-cMZUf zOJZ@sXkf^|z;Avs!oICH33#>Q5QswK>ps z7S-hCY*J8(zg>^#-jLM%>CopTYCy|itjZC1sdzk5xhe{teg)d2wS-SEejapD#g0lVwD&gguGTXR_IVijKv6AYHjL`NMSgxYfB-+fwq z{eluhe*Sul2}yh|FC^D^tX%a8Y^88n)v^T6&Q7Q#T8lKP!;@zC@2v3n2wy;%sZRGZ z{!mN357rt0FNf(QYFBa#9An4=rv!$|o>+sE0~St=CcFEiyXvDp0S{HU63``?!}0Fj z-SdmpQSiPN;3aLQ$BD~f=k|Wr&32^VeAjGmawQG^p=Xs1rwxR)(Ym?-*gk}@2h*e> zhg5MF!yW`n#qp*jMK)` zIrG7&%F6QFW;Z$0Gbv63=zrB2J-w}Ux8Eg$z6_IKtur}HQW5WlbUP{`ulcSKGx_wbItB@=>Z;tM$%Lo-lFylsz+fNnU}qa< zUC};)56XEkO29i@PpIyYO3)6f9CBQa*2bwZ0xC01t3VU2L{PNm$+sMkNo%eq&`y)w zu0L7WO)p%^=KioD%vcOm0+fvuYE>@Qs={kN*2vOCxQ_rTMtR>O7r~?8dca0QseA3l zY{zg1zxivxA>UJefYV=+awr?DfcpPb7xn&Y6ZN3F2pNZ0fh8yefLL_bq}Mb$WdN3C zs@U}w5eM>aC@mFVeh(yhD;)ffc8R|6p`CI8)k-`RYr^nf_hj&?=fvT#p*FE6plPzi zy(ln*P)JI&weDztnu^gRTB`?@WeJK;tqvcnm@7s1nQRT)o{FkXAkB_sGD$u8aAI(h zXqjrBP2R|kYijKsutDbvqql0GJKKQEGt>Za+1vMiKagXYCmZkGH!Bila z^}CtmLxvKgmaAg9LyhHn>D9mP;R_7^Ws$R=3O_MCDa=E$ML)rb8U9Qwi~=353eZeD z`kj`^i$~%4pwU$?x8x!^J-qmy^LwxxPpjm1jeyy=-FBlB&cd|CYP6FXe**myfzXvG z9(9Z?DfX_io;7?}J!Bb#D}xkP>K+!Gj98VFTD%P6a`6{|XZvAsr zW6n2K3k%MIURMQ(!yc`99lN_h@l|1UJnpusufkQo$5vaU7u`})+QonMkl^85$bS?r z2`y*6AOv17A3Msfeb$LwaDof@PBZTp+^4t?^RLe-xsDQ-e^kN24&c40#JRurR9oK+cxF`IchG7?Ihm<6wB|~!^@p5N+Du9BKCzt6 zQ!IrteFAd6p+VCOntf%@^dY4vI~!XOe3RSrl*05?sp;parCON^hGSGxJn8+sS5xyx z?ls*mWp>PTz~Wt3*F6pa<-EJ*uQs}qq{lvKSHJN&pUgM3+5Ao0S3~s)6AedO*<}`a z@a-s3)VvBiP5lH*NkK4K!NXh?mwK=wv4A@jG5+UAp<%N?IqcmLjfIht#majq&M#l1ES zftAD$Kr)TcynWT*$-*$D*_+((g>0RK+w93l$Wl(Po+dH&jwsl<;W`M-8sXlhFqes* z>T7cUG;X$9Gt6>@DZIFD;-B%xCx%CW`}w<3*ikHwnV?RqjQs26pThNT;6KI<6%&DK~A z$vf}`dsoiLN4QFts*^2g7!IyaB=T5W&`x?tu31>y5#F)Yf|F*fYC8)_*9!U_3*rYU zj_&oeM)Qn+YRhv0m+?7XT0v}@hyL+U=wDE!g7C+jD48)2w-lKY=6_Vm)##6|M9uQ{ zX&fEu+wI%- z6>ml!?c2TXT_L->avFNrfL*fJlfrlUEv+XX^QcnLP0+V;M^^4j@~LG7^zF;pu4b`& zw45}SaFZes10Q>9#%?z^7xg0=3>D9^Y>_;tvJl zn&{%q9N<}8Rt!{7Y!=u`0p+E41xyt5_?=Wh-61(4w#6U%Yo`KelPWZ?*L`!m_|x9{Ug{q9+~aANJ#q#UTji0gLFr zWUaeC-nD4Rl-tRzX7Nne|GAi7W-`LJs~>?k5kJHLfi=oYWuB_3U^B*g`D-6JSNqc6 zw!6gbR6$XKsk}PN$sy1o0>_4k;rk@b?DtxkdV{q+m0cxjG?KUCVcgRhY(62M_197{ zD6l<8htohBN*N>M%idKXJ>@_3vGg71kY@#tfQ3DOWzt$sQ9MGXbue}F^VqsPy({w3Ecf z?3pYzF}JNfZ?H*(zCxAS`vv^w)EuZS_x~MAKXGK3)0+i%+g{P`7b({mpInPIvPv24n92C zjvfBiw0j2wB21%g^(=bvxsz-= zOgiwcC~d!yi#j<2Lz_)&*b6=`RXtyJQ&Ey?2f*;?5)%y!V(yGOm`bT0zo!Gnlb7Cj z=ytetge$~x;lUJ}+t<#b$Dd0f$(Dy@Z7Ka~ItezOke$)E8D>?5v!YBVfkPHzn5lRp z@u**mqwJ9gA_K~ZjDLn8_$hOBfRwA`2+%x%L}cEZg1rRyVzwZY^1N217?*1bF{Jp$^YQs`Uu zwGtdYazr6-R@$&PE#aD059DXC>EjqU-pF%vGHiyNKP*(|e9wz#Ool&5}cik;DG3xj8%^`1y#Lt;<2v zPL&oqL_Vup3a-l8$mkqKu-MIyaon3S9prZ~(}sBXp$&J3S^AXdwOY(MdGitr9?SL3 z64IKkuu{1e>27D(dIV9WD)n7~mh)*%2CyS^uzNfX~wvTmH%so7VpVnki`fH>6ELHs0 zOkw(}vAs{FDFI68r)~xO6TO_*Pm+pUx^Yn4)MD?boliXTPu!EL%&$s|$z|W4@BeL3 za2y)$^%}FQq?FKz|3dSi&r!7SI;&b!#GJ%fwVoC3QagoCchi9=MblwPuIwN6m?@{o$`j^=;{oT}J&+TJioxhKg(XbQz+V-lSp&VtF zvHm362PUuE*6(~X>BkG)vsXPQ6cHQ#yfMY$T@0VFSZ#AI0cP@nJ!wct<8$P)8)_AHsYmt9tGvRp- z9kNbcO}CrY>zglOJsEEaUV98NEA+(o+|d_I-qaKdj}!X%@#wQ^L_WONKd>WP}X!T;|Xr4q3B8{4V44bc(>(DmZU~k$- z;h6n7j-AoG3;-y8i5H{j;H2CPA6>{2SH+UHq?`d7*D#n$lBKzB@Sy|V($>tloyP6o zhtV|iz>ZooocwJ%oI-tZXS2lL{TZIF+ivYlrZK>FrnT)CN$QO?5}LC#i4e>$|KHy( y)MSk;BPye#=)wU8Lrxw+DU+O0#-zW`Q5m$7ndTo;P@v5W6ww`>+xcqN&;K7j!!8;C diff --git a/man/power_MADE.Rd b/man/power_MADE.Rd index 03e19b2..f4021f5 100644 --- a/man/power_MADE.Rd +++ b/man/power_MADE.Rd @@ -109,7 +109,7 @@ power <- power_MADE( var_df = c("Model", "Satt", "RVE"), alpha = .05, seed = 10052510, - iterations =5 + iterations = 5 ) power