From 7c755bc48c9262d3fe6cb7dcfe8b815dafebb849 Mon Sep 17 00:00:00 2001 From: Ernest Guevarra Date: Sun, 3 Mar 2024 00:31:32 +0000 Subject: [PATCH] create acdc dark theme --- DESCRIPTION | 3 +- NAMESPACE | 17 + R/africa_cdc.R | 365 ++++++++++++++++++- R/motif.R | 5 + R/utils.R | 22 ++ README.Rmd | 56 ++- README.md | 27 +- man/figures/README-acdc-primary-1.png | Bin 0 -> 2422 bytes man/figures/README-acdc-secondary-1.png | Bin 0 -> 4353 bytes man/figures/README-mtcars-acdc-1.png | Bin 18528 -> 17495 bytes man/figures/README-mtcars-acdc-2.png | Bin 0 -> 17450 bytes man/figures/README-mtcars-bar-acdc-1.png | Bin 0 -> 17495 bytes man/figures/README-mtcars-bar-acdc-2.png | Bin 0 -> 17450 bytes man/figures/README-mtcars-scatter-acdc-1.png | Bin 0 -> 26109 bytes man/figures/README-mtcars-scatter-acdc-2.png | Bin 0 -> 24285 bytes man/figures/README-unnamed-chunk-2-1.png | Bin 0 -> 2422 bytes man/print.palette.Rd | 16 + man/theme_acdc.Rd | 123 ++++++- 18 files changed, 577 insertions(+), 57 deletions(-) create mode 100644 man/figures/README-acdc-primary-1.png create mode 100644 man/figures/README-acdc-secondary-1.png create mode 100644 man/figures/README-mtcars-acdc-2.png create mode 100644 man/figures/README-mtcars-bar-acdc-1.png create mode 100644 man/figures/README-mtcars-bar-acdc-2.png create mode 100644 man/figures/README-mtcars-scatter-acdc-1.png create mode 100644 man/figures/README-mtcars-scatter-acdc-2.png create mode 100644 man/figures/README-unnamed-chunk-2-1.png create mode 100644 man/print.palette.Rd diff --git a/DESCRIPTION b/DESCRIPTION index 2cd09f4..65d67ce 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -18,7 +18,8 @@ Depends: Imports: ggplot2, stringr, - systemfonts + systemfonts, + withr Encoding: UTF-8 LazyData: true RoxygenNote: 7.3.1 diff --git a/NAMESPACE b/NAMESPACE index ebb6c06..787850a 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -1,5 +1,6 @@ # Generated by roxygen2: do not edit by hand +S3method(print,palette) export(acdc_black) export(acdc_brown) export(acdc_dark_green) @@ -14,6 +15,22 @@ export(get_colour) export(get_colours) export(motif_fonts) export(set_acdc_font) +export(theme_acdc_dark) export(theme_acdc_light) +importFrom(ggplot2,element_blank) +importFrom(ggplot2,element_line) +importFrom(ggplot2,element_rect) +importFrom(ggplot2,element_text) +importFrom(ggplot2,margin) +importFrom(ggplot2,theme) +importFrom(ggplot2,theme_minimal) +importFrom(grDevices,col2rgb) +importFrom(grDevices,colorRampPalette) +importFrom(grDevices,rgb) +importFrom(graphics,image) +importFrom(graphics,par) +importFrom(graphics,rect) +importFrom(graphics,text) +importFrom(grid,unit) importFrom(stringr,str_detect) importFrom(systemfonts,system_fonts) diff --git a/R/africa_cdc.R b/R/africa_cdc.R index dba1a2d..6f177f9 100644 --- a/R/africa_cdc.R +++ b/R/africa_cdc.R @@ -122,22 +122,58 @@ set_acdc_font <- function(alt = motif_fonts$motif_noto) { #' #' A [ggplot2] theme using Africa CDC fonts, colours, and palettes #' -#' @param base_family Base font family. Default is set by what is available in -#' the sytem via `set_acdc_font()`. -#' @param base_size Base font size. Default is 11.5 -#' @param plot_title_family,plot_title_face,plot_title_size,plot_title_margin,plot_title_colour plot title family, face, size and margi -#' @param subtitle_family,subtitle_face,subtitle_size,subtitle_colour plot subtitle family, face and size -#' @param subtitle_margin plot subtitle margin bottom (single numeric value) -#' @param strip_text_family,strip_text_face,strip_text_size facet label font family, face and size -#' @param caption_family,caption_face,caption_size,caption_margin,caption_colour plot caption family, face, size and margin -#' @param axis_title_family,axis_title_face,axis_title_size,axis_title_colour axis title font family, face and size -#' @param axis_title_just axis title font justification, one of `[blmcrt]` -#' @param plot_margin plot margin (specify with `ggplot2::margin()`) -#' @param grid_col,axis_col grid & axis colors; both default to `#cccccc` -#' @param grid panel grid (`TRUE`, `FALSE`, or a combination of `X`, `x`, `Y`, `y`) -#' @param axis_text_size font size of axis text -#' @param axis add x or y axes? `TRUE`, `FALSE`, "`xy`" -#' @param ticks ticks if `TRUE` add ticks +#' @param base_family Base font family using Africa CDC fonts. Default is set +#' by what Africa CDC font is available in the sytem via `set_acdc_font()`. If +#' none of the Africa CDC fonts are available, the default becomes Noto Sans. +#' @param base_size Base font size. Default is 11.5. +#' @param plot_title_family Font family to use for the plot title. Default is +#' `base_family`. +#' @param plot_title_face Font face ("plain", "italic", "bold", "bold.italic") +#' for plot title. Default is "bold". +#' @param plot_title_size Plot title text size in pts. Default is 18. +#' @param plot_title_margin Margin at the bottom of the plot title. Default +#' set at 10. +#' @param plot_title_colour Colour of the plot title text. Default +#' is `acdc_green`. +#' @param subtitle_family Font family to use for the plot subtitle. Default is +#' `base_family`. +#' @param subtitle_face Font face ("plain", "italic", "bold", "bold.italic") +#' for plot subtitle. Default is "plain". +#' @param subtitle_size Plot subtitle text size in pts. Default is 12. +#' @param subtitle_colour Colour of the subtitle text. Default is `acdc_gold`. +#' @param subtitle_margin Margin at the bottom of the plot subtitle. Default +#' set at 15. +#' @param strip_text_family Font family to use for the facet label. Default is +#' `base_family`. +#' @param strip_text_face Font face ("plain", "italic", "bold", "bold.italic") +#' for facet label. Default is "plain". +#' @param strip_text_size Facet label text size in pts. Default is 12. +#' @param caption_family Font family to use for the caption text. Default is +#' `base_family`. +#' @param caption_face Font face ("plain", "italic", "bold", "bold.italic") for +#' caption text. Default is "plain". +#' @param caption_size Caption text size in pts. Default is 9. +#' @param caption_margin Margin at the top of the plot caption text. Default is +#' set at 10. +#' @param caption_colour Colour of the caption text. Default is `acdc_gold`. +#' @param axis_title_family Font family to use for the axis title. Default is +#' `base_family`. +#' @param axis_title_face Font face ("plain", "italic", "bold", "bold.italic") +#' for axis title. Default is "plain". +#' @param axis_title_size Axis title text size in pts. Default is 9. +#' @param axis_title_colour Colour of the axis title text. Default is +#' `acdc_gold`. +#' @param axis_title_just Axis title font justification, one of +#' "bl" (bottom-left), "m" (middle), "rt" (right-top). Default is "rt". +#' @param plot_margin Plot margins (specify with `ggplot2::margin()`) +#' @param grid_col Grid colour. Default to `acdc_gold`. +#' @param axis_col Axis colors. Default to `acdc_gold`. +#' @param grid Panel grid. Either `TRUE`, `FALSE`, or a combination of +#' `X` (major x grid), `x` (minor x grid), `Y` (major y grid), and/or +#' `y` (minor y grid). Default is TRUE. +#' @param axis_text_size Axis text size in pts. Default is `base_size`. +#' @param axis Add x or y axes? `TRUE`, `FALSE`, "`xy`". Default is FALSE. +#' @param ticks Logical. Should ticks be added? Default is FALSE. #' #' @return A [ggplot2] theme. #' @@ -184,7 +220,7 @@ theme_acdc_light <- function(base_family = set_acdc_font(), caption_family = base_family, caption_size = 9, caption_face = "italic", - caption_colour = acdc_green, + caption_colour = acdc_gold, caption_margin = 10, axis_text_size = base_size, axis_title_family = subtitle_family, @@ -255,6 +291,7 @@ theme_acdc_light <- function(base_family = set_acdc_font(), ggplot2::theme(panel.grid = ggplot2::element_blank()) } + ## Set axis design ---- if (inherits(axis, "character") | axis == TRUE) { design <- design + ggplot2::theme( @@ -298,6 +335,7 @@ theme_acdc_light <- function(base_family = set_acdc_font(), design <- design + ggplot2::theme(axis.line = ggplot2::element_blank()) } + ## Set ticks design ---- if (!ticks) { design <- design + ggplot2::theme(axis.ticks = ggplot2::element_blank()) design <- design + ggplot2::theme(axis.ticks.x = ggplot2::element_blank()) @@ -313,6 +351,7 @@ theme_acdc_light <- function(base_family = set_acdc_font(), ggplot2::theme(axis.ticks.length = grid::unit(5, "pt")) } + ## Set axis text design ---- xj <- switch( tolower(substr(axis_title_just, 1, 1)), b = 0, l = 0, m = 0.5, c = 0.5, r = 1, t = 1 @@ -322,18 +361,23 @@ theme_acdc_light <- function(base_family = set_acdc_font(), b = 0, l = 0, m = 0.5, c = 0.5, r = 1, t = 1 ) + ### x-axis text ---- design <- design + ggplot2::theme( axis.text.x = ggplot2::element_text( size = axis_text_size, margin = ggplot2::margin(t = 0) ) ) + + ### y-axis text ---- design <- design + ggplot2::theme( axis.text.y = ggplot2::element_text( size = axis_text_size, margin = ggplot2::margin(r = 0) ) ) + + ### axis titles ---- design <- design + ggplot2::theme( axis.title = ggplot2::element_text( @@ -341,6 +385,8 @@ theme_acdc_light <- function(base_family = set_acdc_font(), colour = axis_title_colour ) ) + + ### axis title adjustment ---- design <- design + ggplot2::theme( axis.title.x = ggplot2::element_text( @@ -348,6 +394,274 @@ theme_acdc_light <- function(base_family = set_acdc_font(), family = axis_title_family, face = axis_title_face ) ) + + design <- design + + ggplot2::theme( + axis.title.y = ggplot2::element_text( + hjust = yj, size = axis_title_size, + family = axis_title_family, face = axis_title_face + ) + ) + + ### y-axis on the right ---- + design <- design + + ggplot2::theme( + axis.title.y.right = ggplot2::element_text( + hjust = yj, size = axis_title_size, angle = 90, + family = axis_title_family, face = axis_title_face + ) + ) + + ### Set facet label design ---- + design <- design + + ggplot2::theme( + strip.text = ggplot2::element_text( + hjust = 0, size = strip_text_size, + face = strip_text_face, family = strip_text_family + ) + ) + + ### Set facet design ---- + design <- design + + ggplot2::theme(panel.spacing = grid::unit(2, "lines")) + + ### Set plot title design ---- + design <- design + + ggplot2::theme( + plot.title = ggplot2::element_text( + hjust = 0, size = plot_title_size, colour = plot_title_colour, + margin = ggplot2::margin(b = plot_title_margin), + family = plot_title_family, face = plot_title_face) + ) + + ### Set plot subtitle design ---- + design <- design + + ggplot2::theme( + plot.subtitle = ggplot2::element_text( + hjust = 0, size = subtitle_size, colour = subtitle_colour, + margin = ggplot2::margin(b = subtitle_margin), + family = subtitle_family, face = subtitle_face + ) + ) + + ### Set plot caption design ---- + design <- design + + ggplot2::theme( + plot.caption = ggplot2::element_text( + hjust = 1, size = caption_size, colour = caption_colour, + margin = ggplot2::margin(t = caption_margin), + family = caption_family, face = caption_face + ) + ) + + ### Set plot margins ---- + design <- design + ggplot2::theme(plot.margin = plot_margin) + + ## return design ---- + design +} + + +#' +#' @rdname theme_acdc +#' @export +#' +theme_acdc_dark <- function(base_family = set_acdc_font(), + base_size = 11.5, + plot_title_family = base_family, + plot_title_size = 18, + plot_title_face = "bold", + plot_title_colour = acdc_green, + plot_title_margin = 10, + subtitle_family = base_family, + subtitle_size = 12, + subtitle_face = "plain", + subtitle_colour = acdc_black, + subtitle_margin = 15, + strip_text_family = base_family, + strip_text_size = 12, + strip_text_face = "plain", + caption_family = base_family, + caption_size = 9, + caption_face = "italic", + caption_colour = acdc_black, + caption_margin = 10, + axis_text_size = base_size, + axis_title_family = subtitle_family, + axis_title_size = 9, + axis_title_colour = acdc_black, + axis_title_face = "plain", + axis_title_just = "rt", + plot_margin = ggplot2::margin(30, 30, 30, 30), + grid_col = acdc_green, + grid = TRUE, + axis_col = acdc_green, + axis = FALSE, + ticks = FALSE) { + ## Set theme_minial ---- + design <- ggplot2::theme_minimal( + base_family = base_family, base_size = base_size + ) + + ## Set plot background design ---- + design <- design + + ggplot2::theme(plot.background = ggplot2::element_rect(fill = acdc_gold)) + + ## Set legend design ---- + design <- design + + ggplot2::theme( + legend.background = ggplot2::element_blank(), + legend.key = ggplot2::element_blank(), + legend.title = ggplot2::element_text( + family = base_family, colour = acdc_black + ), + legend.text = ggplot2::element_text( + family = base_family, colour = acdc_black + ) + ) + + ## Set grid design ---- + if (inherits(grid, "character") | grid == TRUE) { + design <- design + + ggplot2::theme( + panel.grid = ggplot2::element_line(color = grid_col, size = 0.2) + ) + + design <- design + + ggplot2::theme( + panel.grid.major = ggplot2::element_line(color = grid_col, size = 0.2) + ) + + design <- design + + ggplot2::theme( + panel.grid.minor = ggplot2::element_line(color = grid_col, size = 0.05) + ) + + if (inherits(grid, "character")) { + if (regexpr("X", grid)[1] < 0) + design <- design + + ggplot2::theme(panel.grid.major.x = ggplot2::element_blank()) + + if (regexpr("Y", grid)[1] < 0) + design <- design + + ggplot2::theme(panel.grid.major.y = ggplot2::element_blank()) + + if (regexpr("x", grid)[1] < 0) + design <- design + + ggplot2::theme(panel.grid.minor.x = ggplot2::element_blank()) + + if (regexpr("y", grid)[1] < 0) + design <- design + + ggplot2::theme(panel.grid.minor.y = ggplot2::element_blank()) + } + } else { + design <- design + + ggplot2::theme(panel.grid = ggplot2::element_blank()) + } + + ## Set axis design ---- + if (inherits(axis, "character") | axis == TRUE) { + design <- design + + ggplot2::theme( + axis.line = ggplot2::element_line(color = acdc_green, size = 0.15) + ) + + if (inherits(axis, "character")) { + axis <- tolower(axis) + + if (regexpr("x", axis)[1] < 0) { + design <- design + + ggplot2::theme(axis.line.x = ggplot2::element_blank()) + } else { + design <- design + + ggplot2::theme( + axis.line.x = ggplot2::element_line(color = axis_col, size = 0.15) + ) + } + + if (regexpr("y", axis)[1] < 0) { + design <- design + + ggplot2::theme(axis.line.y = ggplot2::element_blank()) + } else { + design <- design + + ggplot2::theme( + axis.line.y = ggplot2::element_line(color = axis_col, size = 0.15) + ) + } + } else { + design <- design + + ggplot2::theme( + axis.line.x = ggplot2::element_line(color = axis_col, size = 0.15) + ) + + design <- design + + ggplot2::theme( + axis.line.y = ggplot2::element_line(color = axis_col, size = 0.15) + ) + } + } else { + design <- design + ggplot2::theme(axis.line = ggplot2::element_blank()) + } + + ## Set ticks design ---- + if (!ticks) { + design <- design + ggplot2::theme(axis.ticks = ggplot2::element_blank()) + design <- design + ggplot2::theme(axis.ticks.x = ggplot2::element_blank()) + design <- design + ggplot2::theme(axis.ticks.y = ggplot2::element_blank()) + } else { + design <- design + + ggplot2::theme(axis.ticks = ggplot2::element_line(linewidth = 0.15)) + design <- design + + ggplot2::theme(axis.ticks.x = ggplot2::element_line(linewidth = 0.15)) + design <- design + + ggplot2::theme(axis.ticks.y = ggplot2::element_line(linewidth = 0.15)) + design <- design + + ggplot2::theme(axis.ticks.length = grid::unit(5, "pt")) + } + + ## Set axis text design ---- + xj <- switch( + tolower(substr(axis_title_just, 1, 1)), + b = 0, l = 0, m = 0.5, c = 0.5, r = 1, t = 1 + ) + yj <- switch( + tolower(substr(axis_title_just, 2, 2)), + b = 0, l = 0, m = 0.5, c = 0.5, r = 1, t = 1 + ) + + design <- design + + ggplot2::theme( + axis.text.x = ggplot2::element_text( + size = axis_text_size, margin = ggplot2::margin(t = 0) + ) + ) + + design <- design + + ggplot2::theme( + axis.text.y = ggplot2::element_text( + size = axis_text_size, margin = ggplot2::margin(r = 0) + ) + ) + + ## Set axis title text design ---- + design <- design + + ggplot2::theme( + axis.title = ggplot2::element_text( + size = axis_title_size, family = axis_title_family, + colour = axis_title_colour + ) + ) + + ### Set x-axis placement ---- + design <- design + + ggplot2::theme( + axis.title.x = ggplot2::element_text( + hjust = xj, size = axis_title_size, + family = axis_title_family, face = axis_title_face + ) + ) + + ### Set y-axis placement ---- design <- design + ggplot2::theme( axis.title.y = ggplot2::element_text( @@ -355,6 +669,8 @@ theme_acdc_light <- function(base_family = set_acdc_font(), family = axis_title_family, face = axis_title_face ) ) + + ### Set y-axis right side placement ---- design <- design + ggplot2::theme( axis.title.y.right = ggplot2::element_text( @@ -362,6 +678,8 @@ theme_acdc_light <- function(base_family = set_acdc_font(), family = axis_title_family, face = axis_title_face ) ) + + ## Set facet label design ---- design <- design + ggplot2::theme( strip.text = ggplot2::element_text( @@ -369,15 +687,21 @@ theme_acdc_light <- function(base_family = set_acdc_font(), face = strip_text_face, family = strip_text_family ) ) + + ## Set facet spacing design ---- design <- design + ggplot2::theme(panel.spacing = grid::unit(2, "lines")) + + ## Set plot title design ---- design <- design + ggplot2::theme( plot.title = ggplot2::element_text( - hjust=0, size = plot_title_size, colour = plot_title_colour, + hjust = 0, size = plot_title_size, colour = plot_title_colour, margin = ggplot2::margin(b = plot_title_margin), family = plot_title_family, face = plot_title_face) ) + + ## Set plot subtitle design ---- design <- design + ggplot2::theme( plot.subtitle = ggplot2::element_text( @@ -386,6 +710,8 @@ theme_acdc_light <- function(base_family = set_acdc_font(), family = subtitle_family, face = subtitle_face ) ) + + ## Set plot caption design ---- design <- design + ggplot2::theme( plot.caption = ggplot2::element_text( @@ -394,9 +720,12 @@ theme_acdc_light <- function(base_family = set_acdc_font(), family = caption_family, face = caption_face ) ) + + ## Set plot margin ---- design <- design + ggplot2::theme(plot.margin = plot_margin) ## return design ---- design } + diff --git a/R/motif.R b/R/motif.R index 394b2e7..92baff7 100644 --- a/R/motif.R +++ b/R/motif.R @@ -12,5 +12,10 @@ #' @keywords internal #' @importFrom stringr str_detect #' @importFrom systemfonts system_fonts +#' @importFrom ggplot2 theme element_rect element_line element_text margin +#' theme_minimal element_blank +#' @importFrom grid unit +#' @importFrom grDevices col2rgb rgb colorRampPalette +#' @importFrom graphics rect par image text #' "_PACKAGE" diff --git a/R/utils.R b/R/utils.R index e69de29..4b51dfa 100644 --- a/R/utils.R +++ b/R/utils.R @@ -0,0 +1,22 @@ +#' +#' Print function for palettes +#' +#' @param x An object of class `palette` +#' @param ... Additional arguments to print +#' +#' @export +#' +print.palette <- function(x, ...) { + n <- length(x) + + withr::with_par( + new = list(mar = c(0.5, 0.5, 0.5, 0.5)), + code = { + image(1:n, 1, as.matrix(1:n), col = x, + ylab = "", xaxt = "n", yaxt = "n", bty = "n") + + rect(0, 0.9, n + 1, 1.1, col = rgb(1, 1, 1, 0.8), border = NA) + text((n + 1) / 2, 1, labels = attr(x, "name"), cex = 1, family = "serif") + } + ) +} diff --git a/README.Rmd b/README.Rmd index dbb9c4a..b555d8e 100644 --- a/README.Rmd +++ b/README.Rmd @@ -50,9 +50,20 @@ install.packages( ## Usage -### Africa CDC colours, palettes, and `ggplot2` theme +### Africa CDC colours and palettes -```{r mtcars-acdc, fig.align = "center", fig.width = 6, fig.height = 5} +```{r acdc-primary, echo = FALSE, fig.align = "center", fig.height = 1} +structure(acdc_palettes$acdc_primary, class = "palette", name = "Africa CDC Primary Colours") +``` + +```{r acdc-secondary, echo = FALSE, fig.align = "center", fig.height = 1} +structure(acdc_palettes$acdc_secondary, class = "palette", name = "Africa CDC Secondary Colours") +``` + +### Africa CDC `ggplot2` theme + +```{r mtcars-bar-acdc, echo = FALSE, fig.show = "hold", fig.height = 6, out.width = "50%"} +## theme_acdc_light ggplot( data = mtcars, mapping = aes( @@ -62,11 +73,50 @@ ggplot( geom_bar() + scale_fill_manual(name = "Cylinders", values = acdc_palettes$acdc_secondary) + labs( - title = "Plot of mtcars using theme_acdc_light", + title = "Light ACDC Theme", subtitle = "Using the Africa CDC secondary palette", x = "Engine Shape", y = "Counts" ) + theme_acdc_light() + +## theme_acdc_dark +ggplot( + data = mtcars, + mapping = aes( + x = factor(vs, levels = c(0, 1), labels = c("v-shaped", "straight")), + fill = factor(cyl)) +) + + geom_bar() + + scale_fill_manual(name = "Cylinders", values = acdc_palettes$acdc_secondary) + + labs( + title = "Dark ACDC Theme", + subtitle = "Using the Africa CDC secondary palette", + x = "Engine Shape", y = "Counts" + ) + + theme_acdc_dark() +``` + + +```{r mtcars-scatter-acdc, echo = FALSE, fig.show = "hold", fig.height = 6, out.width = "50%"} +## theme_acdc_light +ggplot(data = mtcars, mapping = aes(x = mpg, y = disp, colour = factor(cyl))) + + geom_point(size = 5) + + scale_colour_manual( + name = "Cylinders", + values = acdc_palettes$acdc_secondary + ) + + labs(title = "mpg by disp grouped by cyl") + + theme_acdc_light() + +## theme_acdc_dark +ggplot(data = mtcars, mapping = aes(x = mpg, y = disp, colour = factor(cyl))) + + geom_point(size = 5) + + scale_colour_manual( + name = "Cylinders", + values = acdc_palettes$acdc_secondary + ) + + labs(title = "mpg by disp grouped by cyl") + + theme_acdc_dark() ``` ## Community guidelines diff --git a/README.md b/README.md index 953e145..0032798 100644 --- a/README.md +++ b/README.md @@ -49,26 +49,17 @@ install.packages( ## Usage -### Africa CDC colours, palettes, and `ggplot2` theme +### Africa CDC colours and palettes -``` r -ggplot( - data = mtcars, - mapping = aes( - x = factor(vs, levels = c(0, 1), labels = c("v-shaped", "straight")), - fill = factor(cyl)) -) + - geom_bar() + - scale_fill_manual(name = "Cylinders", values = acdc_palettes$acdc_secondary) + - labs( - title = "Plot of mtcars using theme_acdc_light", - subtitle = "Using the Africa CDC secondary palette", - x = "Engine Shape", y = "Counts" - ) + - theme_acdc_light() -``` + + + + +### Africa CDC `ggplot2` theme + + - + ## Community guidelines diff --git a/man/figures/README-acdc-primary-1.png b/man/figures/README-acdc-primary-1.png new file mode 100644 index 0000000000000000000000000000000000000000..f47806cf41355d98ded63549f179619402968125 GIT binary patch literal 2422 zcmd6oS5Om*5{3hT&;&(#P@19?kAoQjXiZqcXgx*`g5C{;6A|Qg&F$hSIDoC%= zg47_L5JKx{O(9qD*($dk<(bLm`K=ceC5F-NvBO@a-GcyYd3oGjx zHa6C?XW7o3JIl^~j)UVoCkF=?CkHndCl5ClFAp~_FApCdFBr_n&kw$E0W2VJK~V6b zkf4CDkf4aL&?OP!%a=q%FN=s>6%`Y^A}J|;O;TLyn#6S}Nr<$R4CK13jI^9AL|#rt zK1D-8UIwZls|b}-Qj}LxQczZcswgX}-c(joRZ&;F0aL%J0aMk~P}9;>*VcmRXv1{1 zHS}~e_4Tw3^mPmkbd3!4ZW-y_zNK$`+rY%w5N={*3cqD$dfVL8*uu=@j=71Y1>EY6 zskNnaA{8-rKculq$g!QOU`_rl9ll!J2N#W>uGNG)4ZIt{G4=r-t(e@>{o?3 zB}KV};yl8u{L+#auL<}vLP2?HLB;Erm1Tuhy)+p@;Gil+L?=7y@4#_HCl>h_kJj@H`Fwzu!v>$*DXyE_|t-Zl1hH4(d;`+HjY zdt2Z4wG9y42m3pQ-ggWQ4UG)G8y)H*4R?$B0u~vojL|Gn0d}Q$usp z!{nKf`PmW5?C8QAiAo+@od2*y8DCzQSfNg?E>5j2O|36aZ?4X6uFY+&legFBcQz=y zo0N}R3!k>BdpnDN>@NNK^@|!aU2uA)O#b>dK>z?-_uoN7^dq;sMs{y);cqr*;F@NN?Md#OA`ZrWb46~4fcqiuCW*znjl>^5-s}7T;w6* zS?Xc`8QrUa2#qq_kd=cZZ1pgNlItj=4C@D~L5C6deomzZNG==~U&&suEZovyQGl~fC=$+C<|MwH;2uYOL`g*%k{zl;TlTNzSVDrE1&yeg>d2~t zkz>e0yX$=jygcrW6ZwiH$rD+Ho-pYqq7E!jvy~H5<`Bqed*jX5)57K3jl;^v%SBk_ z``2eNpeZj$Xl2S5I$t~JN-YLV&`ttUsynGo8FjW?*hcB=0eTCmpM9BdvEP<_XHb_A za>jdp_Z*mvG{fj=4|K0$eHefTNj^dNcZ3tBXD7RClK#gRuL8g9CT8yQE*G{(=0($`ug9*J0tvvXxrZg#Y2ThjDoMr7LP z(o4FXJaeZCIr#1z)SJu}?2i~o?11uOFEI$C*>F6LUjF%!Z!XlY4EW`aE6%&3W|@i+ z_=1pDb^`G}6{!{>C9v;-r&ZYgg5+M#+T4ZX4bq0z%ISVW{`812@il9$6N^(Gfknzh zcGZ7`N$%>nb0&jb7BI-+*1>!?haRFFq-09D4WG2X1{zWXvR1@mY!%lv`)r5~ai=%b z5RM;z@eO%1uh2x1IaqVAlRrN1t|vn?P*(}4%IJsnQ4}V1w!-jbwgTDFBU?d>&HD=V zq%-nw*;pnTgsv>bfh3;Pj)HfHgMyBTLKu(UMHzJ8d=34GQ^7^C!?rI^4kEgE&II?g zm2}nL##UlL8>j28-)rZ}8#hXd8rxUdg`Rp^aT8`^q5DB}`q_4D$7&(uhJP_sYcGJt zg95@?3aj%uhSfL1x>zb&Pz}l(%PKR-!%1ky&Jd+L@BCR_L8nLD-vhAUf8iDU8ti%6 zeSYxP&(vxaLdO5>Zv*=-yNa=m)JlU*1{q=nL&1-?(hw+jL%m%7go2R0^s<)bE7P{- zWe6d}wQ(4I;8z>e=wM&ac_RUu(T8n7{Nl`9re4xjOV_|b5o+aC=c7A?VVlP*lAi`^ zXnVc()Y6`Ae_ueZs2iE`IBk`UDkp`nLh7*Y>-jEEZ~ODTa9!6;pGB|ItAmzx4DH{)W|O8`>}{h3RX*VTEeVNmeBPtNssgu>;pmC{Wq?jyc_gqcHOS71jP5 zZXfaz%o+q1)uPROqmKZFO*Ef?Vr!trv-ouWe-=+@P<$&^hcB%MPCpaCK*w0SQqwW! EFZUOCWB>pF literal 0 HcmV?d00001 diff --git a/man/figures/README-acdc-secondary-1.png b/man/figures/README-acdc-secondary-1.png new file mode 100644 index 0000000000000000000000000000000000000000..3eead5f990063afbada4022f529d1b8f4c13abf6 GIT binary patch literal 4353 zcmc(iS5y;Pvw&lvOOqxdM7p6xq)G`AkY1GD0xC!m5~NB{;0OVcZ~zg3Pz32jB!EaS z(z|pBH38|p7+NTQ&UwGR9^#08B0av`ZbH1x^3}%XeK(b+dr9%^4Rfwh2D!osUPn%R_EBhjExt#}!cJK%%e~Fs3RZhN%l)Z3j1~5fRh>#RYKT29FLG!~?6xFb*BMI^ z59^~54h;F6Pfch!E$w)jD6=giqZ`rwdzY4C{Sia`cLvJ%7moQ7IM{$=|>xo8B?u4zIkAkn{$VdmEN-$lUk}Mb=r>^ zP79tWOX{1u8y-$YQ{}lQAqHaDIos5)m>n7M6(i2~?bJfAMWkT$f`aPfv!KCG2Qe+= z?dgyb@<8cPj+2k0hK!&Fb=YnmcCxi(dGFXqxV25qE1ome-KkVXB?KK4QjnJw?_f1T zxo+>Ly^muH7|DGOuk(FQ{J=_FCy%aQTFGMBdBD2J z5#mr2sBdZOm`$GNgvG|2>i38()O4{xjet}8bM7?w!=SUg6a9+wiVFXQKh_2!`^-3v z?kIXx9Cj^5*j>R{tzQ^*ZOzlt;xTtdLfzB0vJYW2*P-2FVlyfgBtDhB&SJO*&FK#4 zV|mFw@k47z;ox|ftL)@=E+pHM#2qovvGXMYu5uBeoQmo&ZaC@XwLv*AiHN9=<6N9v zLP&vt8Y#OlnkYp!mYi?7{_`6d9`gAQEp^=>^LfVU| z@pzWKJnT~DAvc{@X%(ttNraluJ#oOby!LVFxQ5^e`>259d_|GHoAaO9x8Babd@g>9 z?}wyFfkj2}Qq4|M7f6Jy96BoUw8HNqVZkP#QCHVM>+>nXMt1Y!7Rbo~{ag2uo#`K&kJUm?L=+@}?C_idsRAEEqrIo!= z@yX_tsIg2cy87_;f%6fJQEqgJgiKEGK4}(al;hw;Z@yaf9&jUw8fVlL6Fl4yfzJqh zs=S-gX)eEA`Yz4}AX5+vUYoA9l#~_-L`+YQdtyRXX{Kccrl*H(n=e;dveD^$_Ue#? zK%kfV7-FM+r%IagjDZ@#uBx^CJv;%)tL(KBu_)>W&q|0Dp5@*7W&+&Vsgs>EIPKt%jL5Fl52%ig>-;oT&)Dm_ zVAF@$g9eO@wEP}SE^{d)<#F8Z%=W4Zay}MqcdUKjV_9W|sJA)<6+E5FQZydDlv6v+N zu&*9?{+%3E7Nr;LD2SGWH^o2Jpr$L1&B@X1On+Uur5Sxg_DQ>@C^txVxr;4bi|H%Q zb6|K-1XTbMzmGp)GdMK1zRDMSI2=lK28S=-SKgj#sK;Wvk#o(Q1QOi67tbn~@G0TQ zky=^N%GPQJsIRAkdZ>xg)?(tj`=sn6TT+ke+Ip?`U=~o+SYH0F>jkQiG zlbtK1U1*GR=~bB2pLIBLsX2ExOgmy0y--O*U;^Wcrnfh1DdD!fwNIf&m&+^1?ctA(@j=pyyA%_Fd{ABHU>;T9{KcK+}u4)&rz%;7!h_{8|K zO-GW-wlKdC|Dvwlv!O`!nA6=WoA6_1R5*&W_jGW2rJf|cRfsFho9r2>a`5cgY^-v3 zf58If?Ej2O#Bd}fYtmLDmp>0jKIMgVm2{Ggzn9(eAix8gHYVsmpg}LMP)C8R?5UfA z5`P+f5}PmH3=BPRaDbVQj&ycTHb1LRP0gzb^m221>3WC16}e`1RmB%Z8?drRAEl?6 z+`Q*qhGJQEGctJk6!-CbGdh3Jb!aF)RPx!gtW%ozvBTyG>?u?EhBt&Ig?00XUm@(Q zA6b=o)NB7-{F;`R$H|5TiL*lOm$>}Py`_@K*pkSQ1G0<=#UWte;Pya_B#Du6IN1I= zH;*Rs6Qs@;O#VCkun|4&DJiQpI3MXB;WY58$W0gA5Y1k0s_5D?e=-? zsJM}6185|1oR*T`6b)}dbv&NMW8+PHEcfLCl+qjEeb~_X#C47AL8n_6EF>Pv?7r6-1+_83(N1AQfdALH;Y7Ka=tYXxX-^DqPHm`D1)4?3P&LH zEpUkmahb!VA5q2h7q7nbC@*py)nEf_&{Mu#3gZqH?k@`LYXZL()$PgTiHYMRq$Dp& zg1#;f@{;Q+i~UpO{D$7u=V?)+;-b^iVh~%%*`69o3N`&0V-)XTW@l@uP5Wig)yKu4 z-h1h4Y~0yw11fGUr4npk|3bQjsEqS(-66{h~r6Zskb(RO6tk)hXC9NJ9e-OE(AaS71j?EXBnnd%$7{#2ik`_f)W7 zaJIvL+toej>fgZob`7=Dy}9BYOgwu}x3#(6I_zgJypmIpl^q!ywNA#+#Vi2JD&-FPzsrkCzm1dP;^y?VwxWE7+eu*D)M zA(4FZhG5>*I5U{3>HYy69iUkAI<+i*etL1M&tZINH{k8Kr#%DX?~GxDQ)%Rb0$Evk z1fI11_fGBXXXQ`q3zQnpxh5s$vvwU&#ek?L`L*DUxs`0tsUoy9M_Mo(bwf?ko{yD{ zYyXbd#7SSpSbcspuOvS|0!12ZGeip|$MWA#wW?Ku zBS8{%0SCR~p0njg0W+e-IoaukYVPihXs%-zC8cUH^RyfLa;Ek<%%01`V;-AZH1Kek z+gct9sj4b~aV1sB8HaXKmB-!CpdeMXksoq$7mjdALCKjH=>URSd!nT63o<2dXzIO;Gdp-v8tKBQTYR*}nu`1>E*of^PMMep|O2 zHUH#SK4Lojz21l_!P4v(2D0e=QpX4}yYeOMD(+WzcW3WsrRu7p>E*PG3G`cq?de*7 z@!pEq(FN&jS6Le~k5hgEfguY0J!4r!RkzkpLE!cZm-hY=@%Sy=)x2NfTr zy&8g-_w6|XifoGWvJ7awZc0m>%w_KstRzu|hYJh8mj6bnKR=XuiJo4jRMX@?_rTu@ z@FAy8_Q7v+F@=R+-okzPE-Sxq*4+f~%yNpw?9^kGk169?wvb#*BQn!CSTs~eb0H$bDr~jynCjpLVKR&JOl!v zRehrP90ED@1^hguIt5Z=^K?xt%CqmuTFh(Vxm|RN+lAX_p47Cpt?W<2rC|iw1rZqkR(GwHvSs!7SqS7~ zLKuu`ZGRt)dY%J2I#f%00V}~sR)639T6$13 z)D~|a5}8ukn+xwi)vZJY;e8(`H8@RAQwkgztaU65GX;L$-%n>C6&g8oGF6}uW>0PV z-U#U%UzQm3DU;>dA+M>RR;x;0WC_)duV3J)jtonAw(%Dq);q;t29+%G;|Xo}m~LAe|lah%5TuVz>UO?mGb>@e?YkyW*V zB1cxMQ2wMIy>PkmQG9d~k5PeEm99%W$=cBIU~Qf}G(I_~1`|hMUW+phF)|M^mdceA zsy*0i?K=+x*Um!zz#k}1g(FQrHgLti(u<}~7>!?$x_8e^KnxPZ`fVb+*f;djn&Fm@!1>UvMg^cWd7Ij&)_g{ z2;B3WnM2ECzb%{%x9PMEk#^@oovcSytv(C?CW4i>-l%aXW$|eFfHE7!4swRR z^c$8o$9~O~sNuBPB8AJfm);*hEb=HuA1%d_-Lf|sSkuSXP1MhGItP$)6(UslNjRfc zGn`tO(PnjWCpTxPW})BCdo$d@j+PTNWzgCrDeFN_}c4OjL0Cv7R-cWdR16K&30 z!L>gQI;DofQ|F@o6m?9jA5V!XZF8mj?h+SO$u3DUoZ4_ZDLonZ za>Lm0(Lr>^{xm#EPZC+W9h5@e?Ctex_YD8$p>|xA*5XI5+$&XWy48cY3}T6xNB!=v z4Tf82{C(LQp)V6^zZx}i+>y^zziK>@)1oPd%=gQ|_-L9SY)x9ja(Pu|;Ax%gUrf98 z%)~d}rgruCZ>U7#2gdbX?DukBktEKJC#csO_bhr=lpfpTM-uyHcy4GB9)oHfKQv-;wX!>GWNq3r86g1CE;Z# zMVXi2(MM8dQkZ?QAWNFdpNQIstmEEqZ_}QM%f(8rPvsi0)`{&Y5%dR(#dI=x_@5d~ zJ~$#De-&G)K&^`%7^fX(#s0Z%W$k2yDQM=%FcW|Xe!1GT+eR5KFXUB8!})^+FJBtu z=IH&NJ~Oj+GnYfgcL}xQ2I@ZR89fq;mxTa6G zdAGUVq_%eLTI`4)7x=noB}%Zt+D`R)MJhL+>2E=Y%Ul(eYE)(7TU!I)g`&e!q?6;Q z(FW@@HlAWqIYv@O7~_d^ng6)I`YO`>Ie3NIbdDU#wbp%XE~J@*ytG2*3Ek^ShcSJq z%^ZIh5^g==w-U-4M!%)pRp+vu)!z9K9vr7;O1-{bJ&K1R$*3eAk5GC899xSd+!XR^ zQt-`M42EatE<=TiaZWaZ{^o@AYIj@pPQ$c`jSH_7@@pNv(*%!I3l%1Z6dV2pT0n^5s#*gw~2pi?_)@nZe~f5vLg z_mbP~5`7zjKY2Pg2v<|1U;f%hOXaYs2*+xZe2AwYr{4$5OC!FgG^mN0WmRwK5HvH6 zZDt9csKF@qa#>~skif1WG=7g!KtLmqzvg(a_tfdlFv>0o`DV2BF9(+ zjefP{sj%TP9owDEx0TCR_pbA~Q|b&LhX?8MdI9ysx6kQXR%BCt(;8g?VkJs*E6A0& zBI8RDOrg}6k)~{Wf#13P>zZ@O!1B--cGxRAoaS{EG~g4da>m?-4(AX1zWT&KCv4Me zW9H`bI5mRw{WQeW9SwL&pVO3>iaaKfH2B_$%)%%$y`4fPJotlQKzx@jnNg#a^(sf< z{3P|kDw<)q)?1<8+pP)8XWm=+?m5@d^e3j}Ok|D!ksD)T8ju7)djBT&6k+ zLE7emRWlKa4xP`)`^{RN9#A8{Cq}uR@o+n$hUsT*_SjcA3ygV{*FG)vK(3eGtABum zJj4lsa9t|XaWC8or3YY*17LK#D5(%}WEGB;tvNVl1a&*;+is1v=KOUH?oPuwWRq4` z&)?WguHYz@I(qwq6}y-5`R#MgU%8`Zhn{0;hEc8kT{AoHB#`A>D1`_B_y}CkWWy2+ zPOD}oQXODavlW*{_Da3`QfkAxw{X5YzI3blczZk{F8r9#AkQMEl0-n8o_o{O;^aQC zXTn7arFU8N+ui)77AK9vO4l3=nz&GL)?@02Fh?aMI#h;@D=3Wt604_*0$WR8_>lZF3oTLFY53*?XAdhZUX%_Mo@h#5{>m2+>cc~Tj@?P32+}0vp zJ7W5f1cMzoVVDXf#H9H9(xo>yMX=6+gNb~{4M$>}ih63>1O`%0i#n6SL|ov?)cdTb z>$Ag5a+_@~T4rtlh*h;`G&9ICbnMTg1C1P+&=QAKoT3U_vlHlTejJBu!$(v8H;6tL zoJl#3e-$t!HSBTQ9Cd;yRMbT(aM>U2Wv9QbMlek^g?xd(#c=vov`k?IGZD-F=0(FaQd()F~aWNgKAgT{Sk&7L+9{lkN>`$4z>i;Na)+O3O{M`{CM^cmI} zb%AnyJTj7=#B1Z!n-@|q%i7trnR5QBK0BTwZ5YcsLX;ZjS&)O8EdSJs4yXd8!O191 zVQTbpt;FV9a5S2U#$2Gv*00uPtAqJW=UlA*=G>jU;HJ6S{e6rG;JMKa3 zo(HE_f&YtkA#DQ!AqoKGEZ=M_fL-)o%=7}w^>-&&Mtii4zlYvs_|$MITN?6e{l+Be zwZGz+G^N~+k$Z7nJRBrq+mf3O#`ECkfdyJ)N}sz+yIKJPNp*{8C=EOstw?D=WFS&v z|70h)c=vWK6>35t&zLE2`cQLRVug<-K_BgKo@Jc17@CrhVgu;?>Ln4TZ^m;4GcTzi zujo1d?w6_wpuzjEHdLs+z0IHtygTeU6c?PDrzQSCgZA|!zj++M**($?^u7FtnFTbG zwze9-_aciB8%Pxfoq4Wo<6eQd0o~Vn@z>Q;pbq4!`tAOOWY+c^v;7*EhaW7h!}B*9 zhk_&q<7)iQnL@W?x;u8)A}=fGCUEd|kM`-B*;gcDkRe$r>Tq_qcgh~iJ!m#oGuu4= zXE|al#f4amgrGR5PkPXkX~{~FM7D{8weFqy{4Mquh>tpQK?@66Xo2@?$%7<|Zt3hT zQ3&;g$Y2!xU*=gDwjPSW*13y+&`}%if7+ge8U-$<-Li$w-d|=K{WKVg&oF zaIL_-YCjLv1 zwDO5W5gNL)+Ai7AKpnl07fWDoexmQ3-7RB-Jmk2vo+~chWnN+EezEAT0M@1g8rGujDsrG3 z$DUlaPQAdt<7ld_^NB0;C3z^IqQrzh^t-1Q`{>4txpyHfQQ|VtK9E)pUL^`toU365 zDQeL!cw2|{^@}W@pn6)=Hr3a>w*iO3)?rMBa|P&w?~$!3 zDOhz?@vA7r%H9@s>YQaYHlCIqi;PTsqmXx6D^`yYmg`H4Ns;+=t@W=zWQ{Ivbz&cbl(F1yB)Bz>50 z_1C(GF6-~Fc^N2dPEJc+#rtKhmeqX!cuO=3&dLrebbt8 z>k28kN=Cesm(^Ls&6(U9zq5vQQdL1alo`Q^y)(>b!{Gb^V@5ikuEiyChTeIw6Bgw9 zCdf5Y*u>})BfEs8WI!1_h`7<5QCG8g^oAjnJ{;DdXZpkD_1K%dUmun?v*NfYx19+> zS^ORZp&OpB)gC7`VI%@}P7~58&L)`+=`GayosE8S^r;DxdxykVJj8Y5btwJKg~_q{ zTPs-%BA1`fk2(&ep62i)DS01+rXTm&^HpeF$0bY6G0~NNIavPLI(GBh>g4Z%?j7YQ zWf3Rrt-wbcN~0+&n)BfFX`-J{pXbnV_b;4Lvci+T2s-Gj<|S>kdDM00OoTX`ZdPWM zJ=}5f`Sz7NXtt)%QrXnrbN7Dx@zbo{bD`0m1We!Hr`m<1#Y_DN6ZDr}TZJsN&q3&2 zIyD-oy=e09P`mC9fF!dVm@g8(lq%W8GPZ?4KVOvZsHZHl@0K)gBh$iJwHcJNL?}UA*V9dWKOi^1oI`M+dTB6(1A0 zQLoji1^m`{2qQk6D6_7+6q(>Sy~!ORTyXK zqs@}W_3U4r5QQBgGcgOvh7KJxyV;sZF5h2V?ZRfIKGQ_g3xozKeTgW& zg}pCC+K42<8MH#gpG7y?N+mBnv`PeD7h5sN$m!44@O0N=dWAL=I6vu(66hVikvTla z+#D-^XvBvMcU#g*u?CN9fC5JLw6SrNVcN=Wz}Xf!dyq!;AVO;VsXL18(@quun^5{k zQ>r=f$#pSkqO|Bh7qy9TWVad8K#1 zj~9LIomqvZYzjQM`K|a{9kTfA_;P$nbV2zo^WK@dPQ1zdPVjeaP&Dk0cSLsPW;lEf zI$Osq5E!P*l0#*ZIo*B_guEIe3(dzE;cpdlDys*F(>p=P7Zlfy`HnHZZ09Z?cMR|; zLp~UW`u;PN50?Eo6<@9@s>}c+yKlm#vHh*RS)^g6U4x@tbq$yo@w8v3?{$~3nh z@G3;t4}-c;da1NR`kyU>4?rgGtH=v<;k09q;sD@sTA3!ij*>7~VGa86U*J2}q7&HC}zzZ-UfESO_ATu20A z;5V@6pxHxREfV)yyqcPms9f5gA>}ju3>3PYAt`445UqzlUaYtuX!Mlr4QrnKEv*VtZZkAbN^;r zlo~-iEIXX9>k_RTI?p-rL9YF=0Pg!n0@kW}e7SHdvI5mDxn2ga*!||tDjq=^!9zV% zQf3%%6TR-(!MYljF!~sNa?%uH>u=?vp6eqK^qKv34WIjc zCA4})^d;yx6>a@KxlZeYvKa-(Uc{x+Qmde2if{J{-63uGcYTLr zpY0C{&Rb~p25qX|z#NLXYx`%pY(>XFs>(ah?tsvaVp z`E`d37$cm+v~+(8If-}L_R`zGw6O#(#753kFw)=WkDjLOJGXh8*gGPxvL(UZh(!t!GkcX(DlUw(2iLd1=TNj+` zLMKM#hH&81p$0ktP+2ywR0;7Hb!L`^18F#ow+Y*N`z^IbH>dmj?7Jojtg@SZAjIoB zxlvzg=HG74gb#(GH3-nex_Z}YhD`(NdlU}AGzQKdi7HLg|ZrRMT9U0q- z${qKD+e~3?*U6bE>Rk-|b6vh(4mw~p-#zrkl2v*KLy}C6{w24#csTQZDUi2uz^cl`UOwwA2Y5brvzP-Jw$7eIjo9syV1U*CvT26dAl~6>O5v>lzW2R`q!RS@?W43cNoqYM5!i!&&x&e z9vp?AhFoB1wm2jI=ZDmAQ2>YTm9K!D-J>83YmIz#j?4GKF&Rmld*(vX?Ox+5b*UBSQ*?92~ ze`RFjxsz($;qiP+1<+o&KtLd#@D=$is`v9GS!RCd<4Y zryi?Nn^zll+9#Zb1Ygj-=$)m~cR9?F^m7wt*c$&nBBR`|pR7{|=C-dh z$EX5(=263XY|IM&$K4^gu6_U(djIl&hK*WjyI(NQ@^vd|1NmyPk}OfmR8fZ8K%`(` z>}hfkWzhgl-~b;ORomtJe=-Ts3j~=63OfmArX{qMoI7xz8q9|CuCFKg>9<5B;pZ3% zoUegFvGQE-Fssb1ncO_1(-6p}_I{)@sMbzhddou)NU*;ydsDUe3;zmeZBw&Wp{ySD z0#HY4TzM($XV@hnU{(qCBO~~#7Y!InKjo!79MZ~I5nt#l49t4U1%dol#B-#mqEwT< zkKVI7D;+*v+J-^7hK_Mvutq&Y1V6HGsgtQxgWQmeJB^ip&?Ll0FKj`w2~vNOo@*fs zKK^KKd^R;n+7P7MKna+8U(1tuLxy79t$sQ)vpH>-sV4kmb0sHra{PC7+yQAZWydxx z4}qh)J|Iu&QawJFT<9cTh|vF1*8(<+wi4A=lJAZi7D(yhHm_bWCN5R1alB{lI}H&W z0lS0VDPs9lb>pU-36-|?4+)Q+0-%sQuf7f9{mZ5vaXy-f3ll~Ucw|?au@W8Rq5QK+ zjTm`w;lI5AK4%0%7gueeBHnxq06&pO{1y2fj?25&f6|C&Giu< z&CxA`Utn9hi1VJg?u}@!uCe3MjGq?VROY4kBp=+ww+F8M)LSDIz}8MaKSgNc`gWwX zHgE2^E8=@D&xA_w4p^`DyKC%NPBBIUg%PxgdpICebtf@FxlPv#2sz57ND^Ufym&2W zH}6L=rs$Jf`z3TolpOlo)<@pmdcN?Fcif)@qz9CzcXzi~SKb3*%jH!n>CfSDzFGJD zP5`9wOV%bc#@n0H&zrLF9}zt~3xPB~ya59De}H3x-=5jk85^*Rsjsi+$?)$J%B`jxt8~Emts&nr@JRLC!m=>AwY7yrBK3=23R(P$ zaMp^8ja5`pDSXZdfrJeGx!R`P)J_`HxmRrlwiOC|m@uV*R%?LYgM$=ea|lJblW` z$48ot(MmlncU$;AP_QQL?~HDf{&Kip{xq#l5r6r%Zepe6J>S$`k%xGN;78`RsUd4& za5(%k;eAa_&DfYBBf#}nf>*~Vf)4jKS|XVj=H?{lXBQUGzkcPtybSKP>CeTz(9qC7 zfBrD?y_lVyjg60QI9M*Mt*w>7c*cx*Q9!>o79{?XiOq*nU!J}x-8lM3P7wrp_y4s$=j~2U z%f)k6B>w?^ipN@=Va0*upO=nwDBnggu55zWm|1WAH?{?VAQzmJ8cUJV(6HC1IDDvs zp{`VGTo?X=NX1Ut5!X3tcH9DI>AXXF(XWWwi1U+_{--hr`6-%d5EFvG{$?NlKMhaD z1N@*iu8rcW0QKlN533f_x2u!_q$xDk=Pz?rWa;K;JBg=rPxWQzUe61xytt*EqQ5WB z@6dfvKm|y$()ROV@p8ZE*CD}8KdmcQM-Qv#-8j|M){A1{jE%#=k)6knANumj}2 z;m5~BDO`tu|Cg2Pmx0x*@zp2T>ww2j8(jKwggHOn?2ubJVulHwvV{s+t)Or29{c&b zOrO>@>hU>1$*x{mg^s_g$A6;MVOuJ>Dtnv^8e^7Xeg|AQkJj~MFN`}F$50iv9L`a~ zqq=HjMSbfn&C#3(C#wc3J80vQSJY?;4WP_W-_^g<;RzMBA^4zjZW`tG!>=P6YXu5h zQavVTfQbJ>EjPjJSKh|(na~f<(hY&`t;$exzx$}wxk59AZ0iwVfc>;x+%;HI()uy) zN4DxPqNav+^_-LnFsZ$IX6sTc0;@WAh6kGB;<_tVLpslyd0FIrIjW$rordb#-O#*y zl3xaE-zrAq^P2$i(@5Rd!38IR##sf1Vx^aA2U??Z^%~|77Nsn0)!ie;qA`!9>r8Ws z*4qi%dTQghwWqcw?7f$MPqK#8fznJOd3=-RRD3j_V0W#0+=(el88$gS{JG!deDo9X z$|3fN0}f{W$9=z64uZ0bAtjlVkPGLnD^#hbmgjr>PnkAMHBbo6h55yXpD523JPuy6 z(YjeGrqdj$d4sje@OmKGjXu-415~eWmjVHej+e`KVo3~idBPOdU@0T6tr+grk0a6RJvfk#N#VHPYVc~$GBkgzn2UfR; zx0FHTJZkFd(xEaZ*y62{e*gLax>m4y;cAIty*Vz8x`u=>4D!wOelRELvc9D7Lo|NH zv&6K)yxl)59MyzTNpda_U{F{cS+BRepVDPdT!+aJ*Dq>wgRTbz)NbH5T}UsFpv+wW zwW4+C)717SEI;H;Z$IeJjr8M&@!Zu_^UJ4k4e`Qr)<9N?s8JmSvLLUlg?;|cPUQLq zeEHj>V&&ZsG?a9Wx&HxE#dzo+b#kxeiBKA4i*iw1$Rs;6;%7V7oa~D7__E) z4qt*94NzInq8nW0y4NPB?eDaY`GcDQ3oX`&<57cqla!=dcSFvEFM?eT(_E19B0L5v zG_TqYvvojz|5CuI%p8-A@2LK7+Z11K5tUtV!L|WC2{YSIMV2-*tO!T1c5@gFi^ZYD z&h8ytK2tFl-uOyd3x{XsidqsYf3RtaZEJ3CcP&4z_^Kfq-C>?k0?Q?Kqs zO%9iskWTnfO0E51f!E3q1~8%?d2+pGuHR-GPuG0Yw$)z{h_V0UTaykB4jF+5OL2Vq zP}Ve~;vq4Ip$Yen`%6npWo2b>*`1eaY8~Dk@cF)g!bX^-PG zGD4BLnldwQ#ZG{Y^o^KSF364waKLKdpBT5LHppQw=<6X=w^n`on8MHTtE)FlkDhu6`d8 z({t)n$gg+xPWB1GQ&taQl3E$h7C1thZV3H2ZCW}ERN}fiV`EJueZ{DwC`(#`o5$|< zrPF&+Zx8XoTaz;!#o+u*&v_>Fv&vAGxTRKqWm|7=+CMlrh=`!F(hLX)c=#}QOZZ$C zylF8@!R=v>|0ybOW8GEv=0AUG-Z$`o&0uF|SAnzZu|qvQugeF@aB(SN3cwH@^XH;> znr5}@)X!?Hufsxj8W$H=5bzfw>+7vM6TbrX6Wo+n+d!;{+cmnEX3y*{bOHaEs1T9j z(lBaKcDR*6UR_+gDq`KaIoA=#umyoUs2DE_hn4&ocLHzzbfGLbX!eszU01JtrCI{N zNu6gtFX(38zCW~NJqlq+4(|%kdrShb00{t7Xl;XXFoG%^;Gdm70jJLu<4!8j`nb=5 zk(vv>JKwAx0Za64eK6kCdi5db_xgc&Iw$lZJ0#dc&$I@SRs6NywRF>UD;$+1yby?M zeBf2cVhc*qLwB9|!wKh#^PG<29r0S}Nyk}cU`m#6G7x+cyPrjBNW2W<4hi%>C#OmW z+c<(YQNVg|1;E;yaq?FvBQrJgD8+x|9GK?y1qc7#!XzDV->^$3?re*b{JHYf^l3vQ zlLdSGYQodmMymhV#;xCb8ZtXP=DGR1q&j6q4QS2JbNM%DKjAOh8s_e z;-4Ly@9gf-_DmoO3WyQ8TDF_BEi6%ol;7uq!XUxsB^{0hcSc=^>slEBs05ciY$@5i z+Ti5kC$950yGs6aIr9z6c`)dU2II5ZisEl&&+(b(t^+*ym>LfIj_;-x$ehr8H z&h7}}KH?(20S5OAlt5v-wiR@;?TjbT`5*LmZj7LkJd5zTql3Sk{qyhLJ=u#3=f_<- zY8sgU(gEki@4x;&kN>?}e!nzxO*jR}!j*-Pz{UZ?!hd9#hnv_U1|->0pf(UPYj;B~ z>V$yevOK^AD1yDd=p-PqV1!VJJ<*#uTz4<%BFIH;PcwW8$s>FO6@crOfz!yx{gaH3pz->M^?kfTX+PZpt;GgFMtR;e#Ljd!KmW`FO zkA6>#4(Y-a{&_ye;rYGR75=+VvU+VR4bzg(nq2uiA^!TBwNkKY-!6iO8fow7OEJq< zw^2X@XMIR2(J2k09=Px{e3#s@c8vA0y2u6P^^*?;nhOCvlDoj9MXBXK;p-*KSJ+{LcQEc{C=o_?ag30}RhA1v_iy6@Qcf4>e0es6ED zB|2IU0UjYa_lYy;VncTJZ7C^3JTC-t)%Z1-YJ`Q!ZvMW-$jCS~H5JJ$kS^s_FsAf( zpUJk)#>S?nrw5?88W)J@wVf!p>Hz&F=&Q?#L{GG^7~`lHkB8p9%MVPt|AL=%M;*Zg z_lCd90EaqP5|GLfg>lwLyrt`I5{8T>p+ni1x1E46on!;)5#Y>86l7h z{Qm;_4{rV6KHtK!iQ=Zb@EDa^tdBSY31R#1*(0CC+BxHd(E%%Qpl`3A&KWZNXLlS~ z_-Jij(iJ~*_?u(B#1{szWlRquKS{WjcY;VGb8k5>f(r3pHm>~-duS*Y;~Ydj+Ldsg z80qW#oSN$2BfA?K9$sj21p?t^-MqD@SNNjXsG0!yVZibJf|nE~MoZ34JY|p{JnR)m ziw~|gEOrg(^fw6x^#TP=%^2OO{}&xHBp8e zwcpZJ5=i(o1{eftx$(Q(UkKy1!^f9zP4`iPl+6HF^hKId^$rfsO}j6LC3ab7^)A+{ zKY4BVgSRD@^!rbumTGWsnbTR8-K3LYDCYW+kbKl#o{sST`w3 z2krl+ZA;H9X@J&7e{Jk!T+n#!zxqhpxzHDdp!)~){i-RLSsN3TLH#{P^Ea@a1Jj3| zt4;qV*dJ&`GTk35w~FL7!TGKfuMC&!e{(Qa9~>MUuXd3it~@BW*(vYb_d0(8JQx@J zXt^}#Xl1H7yvM5;h=D)^G@jM`>(NQ_K_)x9*DgI67{5`KV_&u^CVryUV*#<&V5F@*MIgvowa0>gjK31Rqow!ah1~vZjDdlH zsi`RqGk-myZY6e~M=RZbCQ2fjU3P3}Xnt)?-ljX%$hlU@$G$gHsTwpSSfn2-D=Y1} z=FePe!otF_xl&S6Sb&!J@oJc-=dadQz>Gx!CHE;PE8B?EH$)`PO3Ez33Jogl2M6`d0?=%*A~O`$zVdjAE{I-%SPqvZ{&_57)9q+)@4G*j zK*uhV*S}O!GyQ&bb@j&&QM854gdf7IVCWph!C4A<^{yn51qsx?hLVz!w|5QwG@$ew z8yiW2<_gs<_6`nYVy^rV_(^-x57U+3YR-rB!Dd;5fIhRn1h3r zQaFnkucYLtb%pHqfX<~$mrx|k+J$q?RZinT@$HI@jU5=!wJNT37?vZgR!~z@lXmc= zqqQLNYDEvP))9_;WcK)Rvp~>(M{sa3n>18r;}=7_4is^eWRng$hmHh+Vf)I`h68)h z&M8gkUVSNxx6}fw1NHOf&6|YU1$L{plSM7alWSWns4re@*v0z!jiN*8!8Jy0GAc(M zdt|mgL`HTvlp^Ef;^N}t=U+~K@LO9-JN1}(VKO`)Xv2U0JVSdagAJ}d-0Y|{bh5Fr z*@A(CDkvx@dg1Ww*)vyHS9|+q9W7Zg7{OTO77f$AMERgVb@k5TYV7jTQc^+!PpGYn zO9pt#6STX`;KW&2e4A+{Y7hu!Mn=h@I-oo=T)rGiAH%JYEaS6T=d}__zrVjvNyqNL zHx;g{2uJmPjOmMwW_GSVV;8{CRf&^`=j^RJgghkEfYYf9ywH=6d_(a{8A< zS)yJPdU<*2#ixqcX!`p4Dl4}d>d2(v?d^Tf@P{ornho3x*jx}$+%awTl~O~``%Eq| zFl=>6;HWsypFbZ;50^i#naM9HDf#l{2B)H`>O0d?cy#oOc}hx35{X3jTlp^*WjH&g zLvH@w&6^5I4_4&3L%}1p>wq2=O|Pu5GBM59H(uK{eaL<0a2@PX5e)0YBOw6;k^yMk zb>-IPyVF3TytJZ_mzPh|+y#jPf^QXvB2PAj1Rc(BhzJX_`>hIDQKV@uOnhDR$bhj3US{9H~LgfZM-3X6wM}Gf;#rKvVL;%C&Dr*H8s@) z0mZnX*@T3IhD~6YgY6YFpSd_n4*x%0UB$W9)lTCto`u5UkSBip@Z2R}+}zxdCl71gxbcvx47O$()293KhJfr7D`Q#;8sQX`3WHEHPqF0 z=j8zyolJ(z$OpqaJ3H&^>na=pp5WUQsG^iB0Cxviyq%w$-nZnbZ{nr*`0-T1K7Fav>je?mPu-(gj_LV>!J3QRq zDy`pq8rf3ryKRp&l?R`xTsg(heu_Of6zm5eKs!6*E-n)_+J%GMTwJod6CPMB)_(Y` zvCK(#`cUDdar<|@8feyo|FS6aboSphFD6iC{17QIoIkO0F(ofQz36zz@Y_klGG2jB7I|P&`|4F!-44vTb*nxY*CFBG zo?79L(A5G?Iiwl+mR0-b?}^mVluE&s4y4&pz{KYsW-0@$j$>Ig6()wWYLW03XIF1r=&ece>)j z{NLpU2*;gG8PMsS-Z=Ta07E6f6%=ywa|*b9r=b20i2-Nk`RI9}7-u4N1OcgYfgP;( zLJ{!v-~W{ltdYcv>49@I3K76{=9VzAw8UWeqDFdQ5)JeXZ9m~%MQqiQyl>}V*AaMf zLCXa^@&MHCEx7aVL~>qaVOd#~H}Ev{)H&B?2{7whF2@={12*(wr4NBNAN=PN@Bjk% zr|LDgk5Eq(cRpa_LRZhT8zu+^>8e>;J=QR9WrW*%@q=MTG{^qEJ2wredWVd~fKUu9 z%gY6u7oCrGJC(E~h7-2??w+FqZP>Y?PKR{4BYI?0b5B2yF4fc=!5@%>{v%H{ZEd5Ub!KynBG4ww>Bpe-E@pDRk>h~*Y#m<5`Q{S5evzi2#L;x(W z6>U@sftjo*&Eg}7n}=r&@w*(TcIIe1QN!L933yt=dyF;B`>P`0p4&UYI3O#$)G}!- zrq(O2HmlVPm`WE|uQJP9cS|@V4C}sTkv$Z{Nqp0;bIju(A>$o3R4Wc2EAO3AWRpK! zg2_s5+f@J$CRVy-vdPIEB6#PFO7@HN2P1={+@TLXRcjEZ5|%=K#+*zC#Pq2-L13+c z3CmVO47l!l_Xb|R5i5ctkbWw8JfziWfmCMWSdb&kbK|ynhUsqvoP2 zTNEPt-k5+VWq{}F@2>;W&$*#t4*8`+L8mc1yXjxK0`nZ7fhBexsC8hrgAKeSm3CZo zpLDL3OUtw#xXY+HJ^2q*6L5v87W&@aXSEs*8-Q=mir|B@uJ+jvjYiFC&WYFdr@Vif z3I($-@YsY(3WnvXR9*9cEwD&&0#7S2$R!%un{2mIiv;=)X$pC-n-IZWiw>rNxfWb4 znJe@T@Lqq-vHkf0G06W;dOlnbjHU$d0RIK^>p+8KlrdElI8LwS%awdT|Fr(Cytz%E k`JebpD*ls+J&{bY#fwUmmAq^R>{k#~B~8T=g;#I>7guR;`Tzg` literal 18528 zcmdtKby(Ez*Dg9@4J8ODB0023NjHe3bazS$4Be>=B2pp((jwB`-QCiXLpMWrormvl zzkC02_V2ykeXeuPKG&IR6t0<1JkNU8TF-soYkde(l$XTDc#Z*qK(M8y#FQZrG!Y2o z&KwjCeA0|1jt73A+ev9TLLiS?ZvWlsu+21qKqw&6Vy{)*61Hbty$DRNAMTo$o63Bf zIW!q2h9%;C!zFlZN%!mX=a1b+yn=!?8M9}1#rAmW-YEEXBrXg1e$f<(poK!EBL3iu zO6~kUsh<#P5PmSm8A>y;wFFB(2_`I+g>|GwFsui#A0EC7FkJM5U8ml-GnbUOJVUHQC)1&o>+E&kYDH9qDz2!PZtae| zZY8ySig!&Rm#EciQvOFF^P6Q#xmNrKTd?bmUpnqRX*JyWbLkB_d+tBGktn@G{x6?| zOFwZzEN%wLY9tNK#-`u>8FS?#VUqLRieD|)|7(goK9acdRj{qTC_!>LaZXk&C-MsC zPMnzOd%q5UJ@xKSbcOEw9m@(^!lzUfPgza=(zAMvchEn_moywp5R*sy^r|Gc={I)? zBX=at7ShMVRarzd)3Z>|WBrc{^UcP|=ysWlWnPS+yRZYkL(x|HE^+nIOyphK5HU%r z>Zhz6|6H$+{<-6w<7++Jj*B*2QO)MD(($_FYoz!6Kq$;C`igCF>L&K+Be>?6YxwkB z;bprMa)~B9{n`cL0i&vY$`MDxV}C*wUu9X}Pi~y58$%*cnjf#kv4Yn75f;)gv{P2) zTdx?eGNq&deF0}!uAz@#3-N$Azd`le(!2{5qd#^zUZ}ySd}L&S-S-!pHB6BL>i{~B zma8@FFuL5A>+ai>GUI+B6W2Xiy3LTqrbO!My3j0rCn(xfeOs@B`^Im1-rGRnE!6!w zU6?V^ZJbrd$78C8j-g+ZtloW%+?MQI(oeZ=yGib<{LJT^E;(UV4C+pQc5NE@)Yr>l zQGrId;=T5juJ=wzgU!V6HY_8T<*k{7vb@~1W-UsEM{mztN+rGYYHhTF%ae{-*c$}3 zzv&Mvy)?Y%lVAVhb>vRGQ$+~6w=>s;CJ-->tSSW=~$&npY$`#mwx%02f3zS_JlLq%WLDnQEjzM zLhpy??l*MT*{AHT=MC`fR~G0ne)997fzb+NRI#_kcAs$N*`;fnTpC`4iL%H->WhZZ zLyVm=S!u_K4D)(Eo!E)7VHAUN&`GdXf}P}hyKkl+=0nJ*Jc|;UT7us7%uyqj#t6L} zJXFk%?k6gd&l6QUEi8aQ{NPbh)R#iEL>rb88vXh~;~y8r)L~5=*3=2j5x28O8JfE8 zJRYXFG2tC|!BmDGwv3{hGm*iFyW)~h>1Ov9LNf04;@W;8s*2`S+ve=yy6Sg875ysP zpGn;rcNuYBuXbJCZqW5tYT&+UoapZD!|_^Ra3-p4`uORWxyxl$)kRDv3!H%o&M@O* ze^TRm>HN!A0M^=DoO5#J?Aye`Ew&y~-Cdpy-fzSuh4s#N^ef!TEVPp^QEgAIuWI9>!4~&~67jy}!#O|$JYCIfZotj9aVz;^m%T}0MFqX-$?y?}( z7VFD&UUOs%3k>%4Sq>b>rlmSzElAldyRuy#S)DQ!=kXOh4c{qt)#~Qay*vooXTQ0$Fcz^O04VM;x7AOc3AqUi|#PGZ1ix#u{Xyf!-bwPS$uh>d3|Fp|kXGRLOx znp@5c|AaMz*>@SocKR7t8FJRfdKmSIOWT?VG9FmuN%(6v6U^WH?1D3zyeH@mx<8|> znbu~AePoug*Dn*}7bm+@xuiFI*RQxqH~EE_s3-QDmwtA!Q>EiL21~mh;;-yiKnaJm!v0MWmxvn6#!I z8U!=zogDCMI0*Mrey{*Og`JXx7lFY2HE5+jalm&{GoSK{Y8v$k)?51LdmDO1#sj)n z2pGa?jjy5e?@&(Xa7@4bx;WI{-XRH(XD>1JW<`{yoo*wjG|-@O9p@l*)sBhe1uwiR z*7S61Xs~Uv_UeA%NWKr|;)>3(g+$3-YGkrjbk>fwn={g&>MBB$zWRmNT`+5@j>lenz^}@v z?>#-fn69gPPSSizB+BAnV$U>a9ko4GH*4+Vl)&bh-eMe^>o@XxLNMwI zp=4aPPHnH4x?mY^x`@c-^dAf9Lr9-1#B8SR2K*X!(;>cxxl!|+O0cC{n>p`C@nKOG zjzfX>=ARm*{$FY63rmI_9g|Xp5uF2rs4r<%&i5%l(C6^Q$2XXvk{P)_Kghgf&+eCW z`!umUg5AMPT7;0pmiJgab~aA=jJuyPQ$WhdCz@ZIoM2n*Vu2-yz`aA|c9ZXlH)@ag z8W%Px+2EdEUoxMq_m`(M{egn}YFLAvWa#Fj`VyuKPf;oLKJgwj^5pY`DW+N6xN4s! zZ4_dZTWjj(c=!fSREYO#`SM4VE|;e6<|&aji+|xit5uPJOlRMKR=}P%2)-s&fM#u4 zpUy;QY@S;~iKj~K#jUxQ2H8#_m1CqM7F=L^>y5kUC%_ah=(|$!Qx@#RbY0fH4tO=o zva(kiSZQfa*OudGpnvLn0uoUlV-4L-hp?>YlD5qAs%WMqyt6v|r}o1|LQ2tR6>YtH zik0}H_ptC+iTk$ws-5)wD_lxB661g1JF}m($U=j5u{_sTGSVn5f17I->QKOz>ZM(g z-0Sev35zqe*YDPf5~g>!EY8a>N3g>k=ngXi(s4xzHaPM`*WtVt3wSWN8{`a-J%WLQK$7X+W&l|FIMFv*+vn?8f>UWz3I zk@%%rA5sM=!Nov06!ogiM`VW8`0jtpc?1%+F?^x@k3k}h##=r7OXJ}l1$@!{4a`r9 zU7cmt^96?`Sh`u7X0hZOWX7@4da<^=^Fm*XS1{nl39AJt%t{cY^_Z?3)$(cyHHz_( zDlr;=HI1uCny=5HKi-|aDC0QY%L+w&ZAY!ht(IH!Rfso2jlDYtLVoy2PUkVp_xq1q z@_RZHERdPRxpkZ!R*fcYgyauX?Rn}7S>j%a6cNo) z{k#STs+{Ha5BhK8U*@KoLKn@Ub$=JKTe{ktv}W{M6NYD`-7aR)+qDk53(H%Bn_4Vw%PO*o8vHKyCOu;&lv$?Qjh7BX z63h`=eHBL^En@29h(g5j_4pbK zIen%{{us-5owVlNE}Dj|l3ebWuIDK_$blkTmbz%7|B?LIc(j_|hw{Oz$1CWy3L*kR z@6OhLV%L5^4jGSpMQHej%J5l~?8M}-1k`ftJ?hB%jVnHP%J=GH9~xgKoz3{C2`N{6 zD~w7Y;iJR0C*?QK%*L#*hKsK=d{LbfZ*CL6{xfc28lD%k+#U+oA1WTz$(;AdY}Qdr zHbRr?_lf|-B4ZHpsNGTpm_z1kg%!X0)o#oV`GnW#beRcWM#rCFSE3pxF`qieonTmq z>Qd`AAAf1XdFbzyob~L`DflkiZ*|Z4aFh>sH-GUCo4jbyQ41_28Ft9VL;TMc3k%U@ zT$F!)qMch+Q)WBP^~mkwdH+8dU7;PN_j#OQWO2XD8`X{x>|!J7V)KZbbZQk}*u>A# z)WvclB6qx5xiC$j|E1^H?0Is{&F)O_6bovM$T^xgcf9v%c$ix#8jnMZIl|T8%vAl) z>V`M6E+v*zqg-v7lYse)!S3<4Ey?Ls7|YI$o6)ovY63WKc6r1?=T4IyUo~x$M*k}_b%Vkr-|me?@A8_BKN}i;-N=3QmR6Q5%3FG*qEsGmaU)S1{l+=ZK&5nDit)#}##wn7RI#Txm%)b%DKpWOW_e9YW02t8=)% zpHWfgmChE4OKJE+YM_vR(YA!~-C5yl12|ih>ABn43;3`6lKGmg9Zx3S-mv_x(ys*Y z1*tCko3n0bQxz-zAeqKTj0(%(`UeEsUB&x?>^wO9~C*?&u4Ibqd{P4ng z^JAOPRijkhA=JQmm2*%SCbDiYru-Uuw%8w4(cX)$m>plE<5RgGDe#(9xDy+-SVxs8 zCO=&?zES5Zi07``2*rsZ*&I7Ux&9#4i=+v{Y!JFhlqfJluX(>ytsw6UBY?`p_w;hz zJoS=$V?}{OBW#zwKqB*Z<9O24;1ad6OFUUh`VfO9u;~|KDwpLKRxGI}fDwN|o+nB` zd~HK_wdQT8doyln);F+y>iCOKpB`5?vuiLO%iFW!7WrIT5PjB@7_{)CV%3pGEF58u zX~Q9w+m=09JryRsLqV>Be9mnwn8DPM`Cg3GGUIv^>Z5;n=a7t*>Hiqb&PBP_`+^wd zz>Ui4F5jpW+dVX5zcC(5)Ietnq9phV=nN_McmH&-_?v#!(w(!rs5?=85 z%JtcH%MG9NdhVe0zT?sQg`CqH_(a45?clxH2m|3=Bul@yV<|^ndTN+yA0VzO{uzu4 z)#DC@#XNhD(t3}ALu|jqy+!ZIj`HD_oUWv_To+6hRvn)(OkxSaaX! zs*z5o-F_E#l1Zfj*cs?X-rQXimU;+ z|MH>-FlZ$2KFfuRlU#aW+LddUu&_|stDKczUDjXrLOnQ~19C=|8!}jYQ%nnVUR_kD zr*M9)!6$4#Yx9aK;w<6I5g*>z`VDo#)CKV(KO)ON`@^t9-b>32YLC$A zZfk})1N)(b_jlJN??_ZV??Sr|i^V?(!?zTxl{xjZE7qvSE@W-!?T=QO_%g9M%*B#q+`kfBbp06)ih+OXJJ;5nz^ zVuN}UpImC%B`kX}^W}w%WOWjZxavuh1rbSDBZTDrOkNHgLuN|DF0-)ccV0$cYn)y} zLW`iNZBRlzD~fBAzm5f}-YLm52t*P6&I1TURn+ee1QLa72!V*u-1{$o92Uru zj8F<7HGFPZN{nw{=C#pr5+X5EimWveEUBvBUAlHvF%#Tg=l1zJj=DGx_*}_5Z|}IR zEd5RnZX<5iJaVx$wO_O|?p&%aS94?_3 ztrXpCcxiFHK%@2+%*ZSA^`B|ieESqg6 zyoeM6!Myj^G%qymjA&|7hv7b2M23Ot;Zoc5hv1`$a&LnMTu!6cj^0Kpa%5Dv*>7k& zsArgPzW}i>@|EyA9p^KxlCC*IfiCIv+yVh%?)BM|q9f{Kk`5yD1S*yJ$|0m_&4_!VzX{ zf-BrguC1zZHw*E#git?>{+dYmp+^9z5lZ3ZBcF&wYjgU zQgwcY-uwoBEDw^KH3HX|!LM03V0lV&r@k2`VpBnpbA z+M<6+Xs>~oZB`sQ;RTVxmOCW`z1#~$HN8ILYi zsH2b1kBpJyEQpRi%lwxXHuMovdLL8a7~zTDqhUUIHz%zgA`H6TjCaje60J=8QCwjn z5Hj@fT&)&YY^wa~!|xN;#amH4f-`+;G<0{Hm6w>4B>az0lenYEnt<;fDu)*^^ABrA z;y;U!fWD}zM9%O}&+vbYhi7-G1>Hl)VVdy>Ar~X#y9*8emEbpbS=i;H;eA)Q9 z^wY-H#2Q{#RX z@S;SAoyGD8GjBcmB83?q|BfqupS`@M`i%dj_eH+8ip^|V^SiwlGEbQGnXuDrf;pa+QK^)1hot*^E25El>fk4y_Y7hlQiO?V~RVW1D=GEvz7p z5~6&jTe`pDW3}8vD3s|-pth6}>NF@FkB-Ajibywo9!~1}*E-+LTMxibj#<4S5P*AF z9Lh#>5}Iw}1tm_`Ha|cvtcLq)>-fNR7e4wGevjK{mvg?)7C>AP22N}vJkjP7Gdvvu zw_q5+HP;{){hXgcwb~oKhreT|ey&--sPSgEay>F#cp+PPHDQ9%@SZNVzw`Gie=ryB zf=ZsaMwjyRoUH0YC$Ej6pPj^&raqJ9*|sdoRd4BCjAa3Y z7Fm8QV0li3z(xK<&yzFlI|_(cQm-q|0rs^xWLl(~k%rD6?|{h9Vq87x=dK}YcccVV5oKCP%Utv++Sr!0<3wDS*h#;cG<>5X6GE?6mvAIf81 zXArIB5nIU7$oB(xe)sLEqd8CA)nYI0o529Vrp0u}Rj!AV3!KZV3o6kMLTe&CeII#O ze9P&x`19y`Ov@IkQQ;R?%r10i4`@95C6qzEJ;Lcb=N{RqEyi#d!tJc%lf(dH*97@< z$KbBa3R7ZiwgeAssh&g5P!Ls0cD^yBSPpE#Mo<_tgK$yg!eNsyaJ}*@E`?jQCzhBTYw4z+eZ$muXPNZn^-J9zD9xtbvqSD7ys71uy}Qx=7h7xUy_%VVA>}HDiak{ z&i#&$_YTC2*GH;YPVZ44I#qCtKKZ^(x`DD_J*sLRs1whfu272Q6Xq7w4J##4soq!7u}Kcl+tZTd2}Rhh-P)YN0QqTl1qX<*ujh8`=? z5#sAc@$d#XXE*sYvW5=E z#pp7IgotJ|uJIpde9@tk{GGDG{EWKsD@557BHGmYxy$^I2Q`fBIdA2~9(<=$+^lPV_aQFWR~I4{BO_M z;zRiKVpP+gi}K&KDR@0w{b6k6=Qyrt!taLO)%4I$WGJH>9o+&LLh5&aL+#u2ks~L& zVgCl_G2&)n>$g7b<>%R$Z%=+6ugKVUog7~1YvC{ziJ84 z0@irQDm^_X2zP;6#Q{f8)d%0!>$7PeScGMF;bn7c*ORb0W`u5?chxsjt-A85V##4E z{y^P4DMl&;^~|N`dekJ(7arMWd36+P} zFI@Lz6R);Jawc>QI^*Qvvyb0cWgxdXJ9Rp2BI>OeqC3%Hd^u;jkE9b4x*A*MF>bTf zaPgb*P3D_VBNOV5Q5F5~-|$H5)s4IY3lx`68xS1R&0dN`<@#QMz4O+f%o;nNaUGai zEO}V&%(eaC30OmsTK;h!|DIgd`zjs_L~xoz)bxZuuCjsqe21+**BU1l)$T44A^S31 zR7%13;k_$|0}S(Luf0d_qhMBCoMTIeHPkK8{BzTXaQzf4s9#FthcIJW z5p6|2<*+cL=}*%Qh5?;)tDXVrWrl#9icnH)p@iIrzfC9GA43~!UfJJEe-x`5=Q(#d zkUXYgR+V{qG}(WiZ7rv9&`M0c^i zf|2HAtAaLFeq~Eb$xbuJa?^8%1oq+yqV+#|0mK+1Dny79Q(&=Wl;AgKSG^dL!~o zVx3G?Ct_kyn>5COr3H#^gi+!WC^qwZ+&M~jI%9LaP$h=EhN`LyKm+g() zC!^<92hVdH(VCSjFBW+P{qnZ$9!%=vWgUpv zCMr^|yUIPup9MS3S?rXYMBYZaW1X$-6UKn}GEdTx>oG?DA_${h_ki|_|#m2{ZV!gF=8Ntfs!f|R> zO!jqbxI9DzG8-BMd3Ucl%Q5+7@1&kVl%9tBhl?vd<})&u8%_8fx-6@GCWRGq_`utn zUTZE8qAF&>R^9=N*~XDOkD+Y=gvW)nseBw=EY#A&6Ccz|8a6c)z&S!3+yrsl9ynJ%$9FG`@R4~Rut_697?0y z2H=s0O-%4x!R2USdclwAFm#ojm-Uqe<&U@zVhVxQ+A#8$4@u);N!% z2))qo8TrHTFJ_~8J!OBCe;lv&Lo00D|E$MjO7Z8*WSt1w5AKHpE*w-1*Y>$&OD+$_RXteKTEa&+Xx(czfVGK(4Fwk2L@GBhY z;uf5onP{{X1iT#cS^yoe@=@D7IlGb{1 zP3Fku80g+9#oe3o-uhk>zk!)b$3y@Xe|sXrUBK$I3An!YuFE|$E+PQN+KX<^1F1o7 z14NHJ+F_&dW?u~l0{IhAK~*^X@McukKni*`-(#NN`_9WB?=1Tv1hUqwgL# zOrt%6d2xjm>kYI;<93*YWCb5yVYN`p)+IN9RwqAW0c7i-vOz*})y&WFLdKrHSo@Bg z%jkPRbeQ99bm+H653OnwU+=Lc0w_&3h-z?dys z4<2i3==4P-TBTudf0%QiNj-c1HxiTbjQP$d)0TY7dKn0$W}df^@#GJfzAiqv+WO;O zTX3q#i=?|-e@`|&`l|NIHQchm?bn)5V$NuhEpk8l+OxmmpWZr8;p2fjD=1QU?D1}p zK>cbSfItHOSaR+LM_YTXERoNK4y-5yLh2@j#$Rp4#NAXZHZ_BX=Up;W!@9-^QZlL! zEtEq~&MSuX%bLfeoP^*kzRu@X<)BD*q?(AWz(Y;l?x=!abYhgwN|hc{b(lqB%+a0O zvy6YFP+MKD=&7I6b0$pw%nRP}*z?5>G3}cn#WpLEMtvlw2E%)T1jf|&JkG#5^uRXK zN|E~J)e~9y_%Q@x-Q?(}Cs0SjW>oL1$p-tKz9rkg&Xnbtv|IsB{E0T;3fm}4yshw! zq^KP7O$R_B5U%+fE|0|WmiHg$D}d(n^Zq~v?weF|GUNew!<;mtu!lp>{32TGJXD~q&ueY zcTSx=DH|`F51GLcn3kR!ChMoi)agv&pX0~Jbo*J+qRcY^3@R`NzRf4#`&DaxLlDom z6}0o^dtUm+vVd9R{@;>;_AYG>$2W2c>KPaqwCg;|Oy!-Oj~2s);dQ-{3PQZ*{Um`g zAV?mGtN3kCR~>8?G$aYQ7a#TR?>hvE6~7;4=t*d76#3_vFbPRNPEJmnzlAVvZjC(k z6OZiLS^;```d6>f4XQGe5FzC`*K$?!MEoQ{~@ zMjW73Kd|_cMJ_I#AUtHGsweu#&b2&}TzmsKFEiEl)`M}{MNLq>+k(`RD3p1MaGJZzrK3svf)0}R- zQ<{1~Kna0_X#KA>R66-aefL*ORNL1>!|EyX={tzT^tici_p|4dp16hqG&6wee^cA$ zx6eCh5(%#hUafI@Y1~Qu2nf^;USrBuS(~_VR%_P;v)l(#y_-9<(VcC0yhydiObXZI zrJ8$o^wxWu#PTp;^8bS5yncQIgzCo3=HitvA5+!RGOGDE?xUsT=!m#YlPEN-H5n9} z4@X9(-}JM%EhNb)(55q;;K-EMb&yxoK8xiMrheaUCqr&}t8It9<04WZzciP$QUme` zT)!e-t{pJuj7Qc|3FQJ5jBU|RDHm3&DzhZ3Q$WtC%&+21*LJkxDm<+$=Qdf^)nK?ivkY(z&u$FX|JCM%H`9Pc~Q$`ACpstgz3Yq7)M{5_aqfMkrgvpAKi zKGFL-Gdf7|v}rWypL@8z{(fw;TA-H7qc5ggO}Xj|F5a^U^=Q}3 zs`}0ra}wBZ08J?fF78o38ZiVaO{BR%_C7S9fj8EB<0TG~KFS>0Q*8d|I@svmi;^U> zXSA!m+#Y%r%QUNDUYVQgKin4ICe2M z6V}uSr*bu*8xcm4a~q`F#dJqaJ9)}Hfl+(!c=Y7-nnlXa!`(COj^=5B@CaOJfaJVF zHT_Uk64?3l0k#`OCn2c0`1yAx%%nM}IeIG<#Lw06KW7W`A&GG)h}ZbxYoRo^1<0h6+sQ9;+ERSWY&i4At z<34R9q{mGI(_cK0OW?RNn$j4%V~6n=(rEMp$if@NDv36nV~&_5_2W)l4jrG1Mm`2C^*9eR11`WslA8ISyg>#DOdE0 zskNh0R?9o{j9wpFm+qOeC#$j&SGXHQytl5`fgT>ex$*RC{mFK7?o23W75Exd5)@T@ zm|@#K5t{8x_|KBm4ct?5>iUHbp9|$#&##cK%;U#K)dTjQTavc|_%&X$zB>buyeTi1 zVz5UE0pow`a2%sMZR<@oBuX6}y-dc~dtRSWla^Cgp1=PwN5^mZ)cSiPD5ya?0Aa`~ zNoML3RMfH0=Qxo}QT%lXP2fA>b+xzP0I=aZqt=T5P~H`!raeG`}1dktNr1&5Jl4Js%}URlfUS`PT@F#v_J)~+UaEL zY^B;lC_a(SCA>IvzP#qR-3emLUtGmS`#QW{f~ui~6&YzfM$%vfbY%+fZYR^q`L+TS z%h1JX?$hDhc;E^xH@j&J7cvH&7|Y9J$ZDx z7+zq|pifVbuV1HKK(6Oo1i*;|8tI*}k&#lfzBsvft|Pu`wpiJzavPm$Crbwh2Pvse z8J4<{i3#`9U8AJ#dti}Ls2aZn2kYtSfgKo^=qyL(r>Uvw^H5pItjSp38zDtqm;V9iRGi~ac&gc+MSl^WcKDg2Gpc<8WJL)On?F&bh8<2@#9o2Jv=l&VQhF6;TRmwn9J5Cf3C zbr)ailSJ?}D&>0zpD0lLe5auWG^!d`H%S>9WB?D8RL7KJx~nBR`l+w4FI-+mCO9xK z@Q6(`MU$T3JJoNZLF_WWC6GrYHKBwan?-)u(IyE*L8uVZo;!6Cse4x^$np1OuU@^f8qZ&5 z4!HvfAstQ2D4oe0O*5|yeAwVkV>%YeFres@^W5_L{l5nT!bqzy5em(Eue1H-9`~$= z5JL{B*dq=ruE(OiW{dNr1#%aC+bKxeJs{$CL(RtwK_=su(*nT2y-G{`}gbs!qw167$ zOM(PEg5&3b_Mua2o$x7pkJdWB&rqU=o~yYI6H+{s=XNef1o^XIQr*LIS^e;L-vt#?jfdbr#b*Dq`#s_K7GU?NP2ol?kI>fz^EDXHp8P|6A&*Q8 zn3(ZoK;6g15@T!a9EbHEl6#hqCUL*2gzg{LE@$$&ye>5=X9WtI9z&JT-1GmW>tOx7 z0c15pMvLse0p5d9_2G?Q${iWZV7EETw`iS*-Wm(ks~6XN7gS>U>rQNv8xgsS$$NSc zRJSNDGh^JD=n!-bN7Ep1L1o?X^`j3epCOQu$ZoZ3qb|DRx)xTn2+cUIo%{7K9q!$( zyJEO$A6^ip>Dcf=bUpENLH5P9j@v8%ED3D&Q{P7X6QG%(bwGsvi|lDAD6-6Y{f~vy zmW!XTuHFA^^z4HO#Zn1H;J?;p*wqVc?m!gkiR;;a1gb?vcEp141;B)pay%OmmOYOB zJ~^A~iq#Kk`%VSfAA~jDdj9y`hPf_KLO9EBPPyH;|9x_=0Wuhg$z-}yy-a2P9I(p2 zKlFe8aF^H>x4o){hVb?2;+SKS*M1kT zRj(`hoZ|81LjPL>*BxjL$9)$uS3l{rp-^J(w`t0BbabLpPEJm0YNKJK{JD2!Q42IK z%74@NTPd~$uG;@2uS+qO$?zK*I6Zs@6U$Q77RJKH7Ia(*IU@PTLrHZALX;iM6@ZQu z*!;Aie$X3V(#U8Y4EoELFN}_0XY%*=cV`4_m&6|h!NkEiIXb!}%sxIorl!l1zmY9QDJG;>;k3^HL3c<`_VhmnyHNT}F2IIA_xAhp@w4y1Kv=BjEn zX|Vp?~vK-tEFcLJ|mVBX;%BAXuQze7mFno0RweP7gET5wKP$fQ%g zHCeW~*FkR3;8UkauM4ys{esmR`hTtek1mtRa+|54G?~cA$Ty;*`X1|P{r&wdfndA; zmlxg5&CQif9i*nEb-+neUaz!YWY(|kv;{Kc9K`9Nri=_GtaW&Jn5|=GrYhNyez0Hsjg^ssOiWDI*Voet0Nmi<;B1;MG3z@JvXFgA4FwgUb@<*PF;F7s=&|0h ztrfO?(04Mpi;0e|L{9*oN}Ya_r>>)^`HYaTlR>=08C!jYpwITG2bt4OJ~{7`NBqN`cgSdQcuI6}=B#KM&Al=l&V>#qGxP zUr}Vlt{%oV>Hl_!QbY{+g~Qka_^r5r(BJrH-oN)Y+7d(oDE*HIW(!}L%r^%F;*hVT zZC;>iY)?=#wN8TR92^`Z!akSU2BtlY&rD)doH1CvpsaqI9RPI2L`6C06=)ZmNZZ*J z`t#p^CIqmF-PN;6L9L!>CP%LfNJ}6jwY_GiUPn!>%;(AjWn^Ww>5n5+>9E}W`}eFb zWVtm6-@yAwO-?RUmsvqt+WmAsFirWziK>mw_Qq(AqobpquI^Jt%|eSoO1O`n-i&#& zcXVRn%*@O-3MFJUmYXIM?-sG{fYeCEG#TASW~fPgMWrb zhF2Yol?&FG`3ekAL*G3uJzXMC9bYtzg!h*!1D#ylh*eQ~dV0gvwr#l3`Px!fB-l^J z3k+ByyU0A&V5o_m`U}*2Ah{1PMK~${@p?wGgt&NHdwX2piiUyrC=z)S%02t_ZJIC; zG}}Xo0g_%=T&&W#RaB404S)*^dme8YT<^yKvXkh!QQ&)J1*{&-QolAoACZ()4|G=4 zi)d2=&uz{RB84v7+8;!Afo2Fu6W?xLbw74#5NPizaaexq>wD8d<{6^14;Ik#d_5yn zBDJF81n9X!owT%wLdJ{p&4T#8m2rJfIchxb%e{`Osw#B!hRd=-pN9%a`8y;J#v3yq z6BC2^Syg@YIo+L)x2@Nrz+H2y4trUuZR71-*JZK~UdP8_;o-hVqZ;M|Nj8=y*OzAp zD}9)c9@PU=BqSyVe*w*Xf`Wo2<^w(pL3E;`qF&zKV5JyidV0FM84Iefj;DZ>i4K#N zmR3oZohY*+g#E6p~j-1dx>lm@}U9hsS#ySuwF z20mKU=c6o@SC5kF6VZ6E!WuK1SbLc&rX6tesAYn(xWU4X<3kz@FKPMG{2#ER(nymE3 z8i4D)e%;g+Ne8HF$F`!`KvLq5ADv8dD=V}F7#exnYD!A>sOhTS-rkB?kC#kL+i5ZS z3r}$|0>-c%Vvt}?H-~|l9JPS2pWpsnfDGYvr|QywULc-oPZxskj{Y28uawY?Hhs3T z<9kyhw%>|ovRa$W$sr=hB9 zJzc4krud1xH+VcDA1%L{v&rQc_PZk?9C);S?_IQV>6tgu;Y3sR<`_IM;J@}>93TOl;Yz3kt`MPi~nyzSZhm*Kd!?{ zFHxw3injLoO1y0`qZR8jM$9b`+kcDRO(%Y7Yio0zb*F<-^YQV4of~;`eKJvEPE1T( z0Z^#(raJ2P@af(n$O*IFCo{kg01B)?`gradY|qDG6$hEJX-P|WogJ)t)-7en|G>oq z=6mwwsGom_fPmn8R8$=ZC9WiDl1vr9h)-0k-Li>%M<8EIy?v`pPjJPIOG0uvB*S7e zTkC#tybX#9%?NY_!K0Bm8(JC~CgAVG>2e@(rNqRHhY+zd#;oyzK%T00wgQrfg~b{u z_>et*+|*}K_I?y3^5a?0ouk9U%+U=(eK(_xkt_u6CnNQI-P;OA9nf_|Q+CUz;8r#^ zWy8b}f13p`?1qDWegI1^8g4FxH)C|2@g1)(SA~6dn;yQ@$aivZh!ge&xHgTc!c5bZ z?@!^qXXv0vT8YsUh&W}wC!r343l2wtlv{-v{lMR7qS#bHV6U~08`3At(k8Y-^n zXCMhQ_*~VxAHeI5)Kdp5fmMUV*xdI`fCBLh7tmZNOe{q)SGQ^(2JeSm4bN}u6?v+lr21FX(^0&=NCB>Y zI{60!G~ssj{2iOn?t|U~eN%&xC@1yva&8Tf7uQ4h^+~nkMKA#%#v1SCN7{YE-t!SB zjN&sLQxmch#x3cxTgmY4NMk&}OlpmjOREx2;yo-N!ZaY)wh|!)XZs`(NmTQx zPI^>V{?erz&ovn;DrMOp9`nWL>6bJzp$O0;GoX7YVXlMidXMXm3}}RiULiBoQfG{A zlhxYVcxt%bX3h0H)I)=tvxPN8k${X_gTeJ(pM>b=2@@XQ%i;2NHc=_B4K^UZi%K<} z=>h4~EV9X(tyNxYVVQhtR@eUeRDv*yr3bIBoQifGo+kNcF0py-1LUsXJYVfQY*cQa$M@}Yn}bFQuXivH0@Knd^1nJ%(mtCHW(UI z)=H@3wwcAGEXvKxy4+GA@6|0G8;X%)3|7$caJcbwAXEUo1UN{0z@V|HC=eE$d3WYj zK)F^)$t@T3|CPEcCEApMRu4-@16-&$=pVym+1lF=r$IQmjwr-ke-7?008;wFUte=Z z-QhuHPN@u555U$9E6t{h(syoUp+2p38K}L|`SZi)qEhdU#F2B-#&q{#)Fzi9?QzpN z^}kbSCC7*Djgi8Y_j}D$6kOwF=gr)u4aKxY+}?wgk$EHC)pix2g;Yp95P*rL+npSS zQX(qdKYd>&qd-(Uty{mhVSGj8tc%GEe-A`_kUHp;Gq#7Exb(_Yp3wjj z&PsXjqk#*{G$Ac(h#%H@AG)_eb6lVP^(*}Jyg9RDr;1Jj@COM%194y3eIz<8Io7JtVZe!Kxh`R^Se%`_mjh5?9->lmXH}rVKd(VRD&6j7kFctm zgL1(pS9}P#xwc$R$xs0@9rSAndQmnTn|o$;aF4C%Os-q!z^xeQ5USA$-)r2u5(FRY z5J=zvoukq2s?@ves0ERQL$51v!3@f;kJ)_M_v$tSM2m9b8x-l+Yh+m%2L1rys-N@> z2PQ`U4TwfOu0g@6c6&(<2lxS6H4gH&TqS0NX*;dNWJ~bWohenr))7!|AV(fV$8x%# zhmF6Vl%>53Yn9&6_OdTXFOg=9kc+$SRJ)xq66kM_hGxC8(o%RhJZNFR8Fv(|-c9@l zkL~N>3B8hd1xD%T4@i@YgHJA_z6=!9`+@YcSVQ@f_*N+Qd&^S6S^yoy%h!BD(qce!;E!rr9h)$41^xhf0cN5Wx-pdfZ z8@&zVY~T0yJm-1OI?wszyzd{scdb3kT6^~FeedhO>gW1gLf$LO5#OV|2LgeJ-^#yM z1A%U(0Uv4nTfi9!;G=r^cpe z5l=Dk{-f%Twi~lj%j}_ANp1aQj6QQEm!F*B{fC#%&KV^s{7+eij5o$441k5`Y>R7K zZR>nHDUd53Zy*PO2F)IMZr+BVX+a?A8Row@pl_r&_d%ci@!de6r>}qA20doF^$2(Y zvON$;KKL^pNE&?SB?v_Rdx z>EIB?@nll4h(>GcGcWGir}Q0YF#)A z9tO#z^f>UI3^EX)34{!?SlfK8B8x@EVM{y2wey8smIoz8^Q<%@ie6A~9F^e70DJ$@ zL#cVVDQXJ*ZO80H1CEX#(lk_rGtTV`}#90^cO_#IX|UJRjs}z3dJk!g1=$ zCENmRLWYjvC601wLSo5wyaT1?&ip#939gUVul}g(QV`r@BDo_0h&Qv47;oi&JahDp z-sT-Wt8L@$*MX#qp8bZdV}sL5w?P)Fc=sw4-;w>!Pso`XF&BT4=`{O&&&(&h8PZO8 z&la;G&?lgqLE-7=;_}_Wk3}Y-dQ{IRMG|GyEL`WAF4~g*AWCE8z2Y#c`&=_yQe@)% zx!!u&itVsw69~lZ%PsuH-llS_?vEa|QXlHoY1fF%KyXgcp_c98#LvLn-dr~CN1u*O zqAXIaRFuTLj;C~?W1TK+{-l0fZz*i^(G8KQM40W+PYAA}PjU&Q_G6F2Kb{;DOv!L{ zb5U0JLg@ydfbk)!b`GXeP_OqCPckeMZ;eqD7N4=e@T?_r)vp~rb5^$fNV&%Z#y2?$ z+z*u^cHbnjwuwf13)d-4H^vf{wnHn%wcKAU^FLSc?Uw9|d4yS~aC*KCUFDK`aOC#H zxB%hGKP{)1-1IJD@>Z&6Pe!T+>&$S+j9QFakL#V;6!|Vo-tbDXP91|#(nR=}^<{Ln zF%qKc8As2*^ROGS-{^q@@*>;&{rKmtObL(Wx~I$G{iFVFxw~i8wK!h#VH*CosTO|q zOYclX5$fYQ!I@pY?-d9JWrk=M1pFY**{pS1Qw@{IE^|(`RIwLD1&}6QLWV+8-gxE= zO{11YNDC>zHV1-4XMQagE{w~vN9g)(s zT@8rH`pA}p!O_SriSG{bVfak0XV#e; z#rQ*=+rcFL88T`m)P@@c7K6XBwajap?SrkR_NBk5efr4l-JLzYj*0T^zI2YVVotw$ zrQ+=IP4q23U)v8#FKybBSbz9FVQk>lP>4Wgc2P%Pc+FeSBS*t=Oo2Y`A%0lJ+J>*A zd|2Bq6D64b{`p*qICUSY@`7ax8Vs2Woy5zDv&$d|@;Oa5N`nv8`m70hmzR2Kv; z#4Nwei2Xly+{xdo~>y2Im7np2zEXUO#+zWku5=ILqz<%;&8y$I&)=zH3!U;Wb12F_}hXhfk?Oyv}mf#DG?rK-hS zQt**58~o|dZ-f4%vdxG_fBtYc6`yL0R?G;kebmYNO5>4`sGVX@nBC0%EoGZM2mupG zs$}tFf9*xC`_^Fmp^2ouZ2#HyD}QURXvT?TN-*cKCQ+3L9b6!Or|W^e3jq`E-6+E% zQTpWgJX+-US&3JIR^Uc$uRV({Hh&S13;B+_N4G$+kC@$<{NFDfXj3GRnlz3bE15?! z=AI*l#fEnr6TCyE})RYw4eKI=9mMfWap|mja zn@ouU>@Qe$dL-fhfwO$*XIsgobX_&2i2VE5uJte<2aDpj-6 z-M9GuYvb7JcY0~g!^HEPgt#ByYPOx_iG+ zs5j2dy6^#!=81X5M?)Zeq0jyC@7XqEmUEyLj+gK_m zQ|qpBrMee~4J{&@cCYFw%Ea3Rcitgov76ez8i-a~nMz1AILU)8beBr%#UC8~^l!ZV zC#2|pO2DV4vypwvFy@a zLiDZ#Q#}+a!pA+M2#MA%IER;oEDsI)wR-#F7qQ+dj^3`b>@Ra#f=X9uH4>!S9RCrU z2p-SLo!PRXO^{*+=@Uv=>?q*OE9f6Ky>qR|cr)<(9@Eb^%$3yDnF#h8mgT;3^DMeQ zLmg6)4SNmw9#&1d6l-U6gFxIaKpJ^|e%1}YkUw}bkpF8cl^`MzUWU1%N0bTH&A262 z%JJCteynUGdHyrtR#{17IDV1HdU3=Z;?UvQi8ENGA?WX-%LZAa79pBwl)JFt`cuW7 zG2XT$PX9fN1&2((Jti)4I_)4j7C7Mt$;1rmxNUIo!;>SQiAPjmn-i_bntECv8O2dE zXy1m%*Ljr@GL#^_V*RCI=TEF!1yM`=Z~Q7w&P_5Vn~SIWBjIwC_s@^Z{9FxuRSJS# z!trAvQGe1X+x#HE6pOtiqH`={r0p2WT-4toydE}g8ia>D0>76rplsv5E<{Jycm+i z$qhANR_SXRIwGW)^5F!BygKzIuEdWe*Ab^)uLkCf43_RzUkvDv3qRexICldAepwgF z?ZO&D$ppAeIy2jonf*7~Nm|LfO}^tcQDNv6a(3RSRgo8&bh&_I-zu11EeVm#1v@PY z=*_@~=Kc|%S}a{lCp%c1N+z^rw0HY~t)<)8jD>Zmfned0W)cx5fHetM-A8fpsr63pXQhvGWy#5?7h$Ke0G9kxRU-a7Jqq- za3D!oU-LtG*G!OwcprXMWuFi&m(xk2yBfp0WO){m)vANM+%B;1fiIk;ccUT=Ghq)wptQc1 zC!=@=!{zJ$3YYN%BncZIrOny<$4ZD$T@d=6H9TUU^n^KdT@ zvo^CBNNwu*NXFvr?D&n40VyxN%L7|XmOts15JST0Mzt57qL=S`JF|oB{M%+KJNCSz zKJd#03iK|!Bw4a1gr&uJV}j$bqacuYGuFv)$Jtcn+EVpn)mlCyv;f9*TztJr2%8t% zot~1>HRSXT`kIRS*q57ZkLJVVug1cotZJ*BrGaX^FX`1*T$_KtANa}j96G5}b51>E z++*aP)`X`W^(S^@<+2KCXWOQZ&SRT4lOu(Rw`09fR5C@>BjX00*vrjf2G0neYixX| z8uFd%o8eg{Ql0*1<>Glp^rS7ngclfMHCa`P!g zFoLzcsRNWmeYR5Sa=Zf@w0O-*!cjc%na84gsjTDiDF!y7ju=sMvW z)8B_goy>_n&{2InSf`aURSDLwyHv^Xn+m~p`h*r}usIUc%oSR{qtj2GV+# zTg`L*ixfP_GLP%@7n!OIVvo^VHPDz<1yXayzUE_W>~8I+KjX=rq16n0w4-l7c+SH* z??eqf_QwzWee`b-gC~{ac6|+YgYd8_mgjgtQQVqmS z+8<2L@myJt9SCB~l({Lvv)5fng$ONK%*8k=3VJbtn6ZD*WV9bq9$Jrv+is>B>X3V? zeGfhvZwx1l-7U;JSTa9k#x-iz`QunPssUN|~<%`j}BrxfhD}WkG9ByUKKI?!5?n?9VH3lBgHzcTU5` z7EgyEegldg-`^0^ihA?mN;EiC@-Q7`X1BM$HI9MSZy**DVe}|f_!H3~G1zJvT?wss zf5f6-jnX2ltI@{XCdeI-r)d^zwd4IegT@cbhoj8iZRf%s?ra@Wd4kisw)3x+%u}8h zT-luOZct!8ethcg)qT{Cw2Y-*9*B)!qv#Lq@*`ZQovGx5t6@502QZMI^f>AThH=#8uw})Eq^>9dp zX1u(L+Pddy-hA2}(U3dwq~CoZaqk>MdCDZ4)wC` zEA@5X$R|+2Vxx8%BIjL3;zapz>(%JdJd+uS&2QMc{U*;wUnyk$_Cfw_TK_8!1! z4xP3L4J(~vGoJIaQFZV{MW-CC2FX5qTdgWXs5_hBOOL&(&?84}6`q$tBGwpFX^likWvgoNU~#NU^UBEHESSIBMx7tk1@-F!mDT3hK%b zGBoXD1C9L-06|oj-sr?b3Jimo?!y^TsHe3O$Eh@kVPvfr#{Y!|94x~^eFm8aM2fJ*XTGIqAmz6oINaR$kpew zm3EFV@wz_lXv(T1x1o-D1vw~B9ufuo^UI6BE8yVXH^;M0r^_)6a!BW$u1#HZ!=W$~ z*8a`Yj)BepfuO+r5^>|f>LzfR&FtzL$H~!id5$h80;U|5?bF%AR0dJaDK0h^eu-{l z;Y6iCZRnM!x%W!UCt}T#qC=mfscIer@y*_eNOCX{iP;?M-FQ|OT`7a= ztvMd3E8wFu3(jt*`!qM~_B_1JWtM4yrGi$Qp=);IUzksSUO%Z@OZRzgeR%PO%f9}M zCPU79a}m=1ArM9b<}_%UFy@b>RU14zk9aUz)ZEB)KGFZ^0Pr^xP`*({{Hj$!D`S{d zsZ2-Cfc1@mx_sG+;xQ!DvXH$V1zvZ^*!^nbSbXdlAQ}yp#oprx!Qs|A7tB z`+SyI^Yr3NfiV38DTH})Cv|L);$Vb!V73Wu`ZOb)P6t|)5uED{ z-zl2-TB)NnaJgI$h%z>&LD-(h-KQlclMMk*ckmm_Ok{T)64pw#7w>B_1Qd2PW#a_Z z89*Algg;i*L%SsocjmAD<{eCBK2Y@IX{BxW4t5<(s1g!wQ5PN^nmJ#B!I z5)3ah8Cd@0WfHWt6#ihAOGqM*H+OtT+_A7cxT z3S#L?6r4m&v@Qjyi2|&x8uPh3?^ce?ZjJrE(X{%lOK|XV7XM*#w=0u>C*4;`n**v6 zC`Yki?1-VxPKa_%Jo%ga_JpA!QaH|iQ6oH9aq&`rqIEv$A&H#pw&*_gH&;nxore)}dp%^* zNx?--K&jx9=Lhr|M37iYr81?}jv9P<}HDM*N4;BoA|C)jLkz7Z>WL;=4nicwZq2 zGw_C&bhvV`UghIF6dV$J0xEoYRJcvk4jKK-m1{mCKVWGV{jK$}|=CK9l4r(q}Mg#2M(VLCX;$ zLTsc&KGkqo0tXYn#9REb`t@H7_nQ}s59x?D|6)Z?QIfClRdwg4Z~wT$m?9A6IqOD8 z#_aSu$a9A%MFhgJe`zqFsX_xH3Nf6?mGd~7Z(&}!hQpE_PoDV=JDvizkfX9LT`Qp;qL)TM2=IHUb^#kB@IecevIs;CYixJ%!`;wHAr z90jE7$v40~U!Rw@YeTVP-0BD#|qM6ECVe_P+@W*u;Fw)IKJ zDvu7trYbJsWhNPa9aP}xe9n_OWxC@zF*{%jJP z_ZR|T1|SRJ-l?7l-MM5SZcIA=6D;&&AGD~@&R~E9R^l{vK$C`Hd#(>+u%*|q|F?TM zfpJ!fzh2t7r0~7SLEH5oq<8;&KZJLwLqV(ELowc(6|)a7Mxt&!`ox6R*=2g+QQLhQ zTaJ=KMF#=CJI<4RGp>w@H5N0Yy%z!#x>lh}JsY>7-XE$O`k|BJTR>_JBxJ5VwR1z( z%_fq1&3gDNQmO59Cr;SABw#K6$XnBjUvSJi7H;95rA0I~n5bIs2j=R*qhkV9k|8=(~HB&y9vO zYuHGy)Jt|Pi)NiwKgb>NK8V>B*S^TavN-VGRFi`b|FR<{`4K99K&khQdx z<3cO%i<@3LTb}@NTtD`V(OMu+VwUX~-Aw7Mx}uA}=d3=mY^Pd2eSN^YR@U zsoG7neepSp5b6(J_&pbo^gh~L&gp+Ayp{-4dXY$U?Ey33rH_A6Jn-{VlZt@L8~5G9 zmc;7V%bj@+Pgi@(&u;S!6zWMQ0gA3o`z?VQxl4hfGDv4s9&RtEVV$}3Jf~JB|JF#y z={b<>$ST6B$`3Ghsc}DzFlUE5f_BhXDO)u2NQ6qHGgBL^S!k#4z7XJPdD=G~@D~~_ z#u@rxCKO=F$bGz6w72baTJuyY=iEN9ncxL^!|FqEXrh?)fsSxHgB0Wt&?0=Muef8; zi|pIUE=!PB515M7ylaN8Ta)gjbDz{m{=gcFj#fyZdkiUT(K@1Xx$B9y$ zUGj>TCH8-UBaZdvRS9RF-V}p&eUI?d{L}+Uy1WjC%v6462+q1-1?lcbFw9AubX>GT zn_}Z*&aN=#>v|8wnx%O!qtTaFyLz3%r}-IuJ|ZA#t-VQgM&}SRxF>%i5l>^a$;M`r zRv*2oKwg0m{iF_jaaXTn(||@y0G5317ob9TEDC@2MBS3EDwnJ#_tGdc0C#q$JAh#Y6ACzWAg$+`(0m*FX=@2Ivg>aeqpr z2daJI|NYhe|J-WK^7$1DsSO~dtBGzD_o%B;eQ!@T<3rq*q>Awz7w!c zFH5#0cQRT4EXXuN@7MLkkTvu7E=H)~!CwjW3?~f;gtDmz_~rBZyNwz6ey^@}n?{bF z1MS?94fuCdHL4SfT}{xf;SpLp&$S;Z`{%u!eq948ehJdVqDFr=;x;IaYlD8TJER&A zz=qy!5a?j&Jj_mC*|U59xtBH2{FM}o{Cl6F2>w^@S{cRyR9EZt{Vlga4*P&8CM6sJ z^oJO@ftN?tmLBk6wPDe}$g3z}x1Vs zvQ8dNE>?W*K{IIFSNAbyjs^5BsUJrw&ED0j({zljW7JkIC5z}#LgLD36`-F_)2~I( z97G(qO09;J3A5!q zP${eFk6r;nludG?_2xM;q=CxIbA)aCkp*RGhh0#*Q!$TsOE& z3y7>FSz;OKy?^3ABq69&s9l4u7J5Wh{~ug{tv6NfG(zo0{H1H@AKvoC9dW+`yN-P` zHjl`3|~EH z9K40L^F$$Jar}H-Lb(W`qYgH<#n||lFS319I$3y#L7z#o`0rkho16wR2%^dh_xU*x zw{iW*8PA`EByYS0eAgo}IqG_e^lUmrMC^GK1ueC{A(b;rydytnJtZzkx^q;tzavGo`b^?c^r~8TD8DA=cSR33Sfm`^mylPPV|Igw4-*{_Urc$J$8L*sg=)mrt*+ z+g1V7NZVSc$C*zuVprQDNbC#b^ZTL1T6Ol#yrt)WgEfnKIjQ>$g>#yc)^KI@VANYl z#tu%4PYM>j%I!!gc;>zNGkG3jC z5ZFC)?ZksiIe~#goO)pf6%j6@rX^l}V-p2%s;j;b<*_UnlXTGFhScUXr`gPsW@J4k)dn-;2Z$(gukd9=9nnEG_4JFshcEQ>Q*WqDDKX0PtV5M!Ii# zUp&zA6Ln2A*3FCu9``93bAyRnkpHhnNtbeH)YfN(akedkTVm-`G*u^;!ZcN?4COl6 zFdT;QBt5eYgInB!Z~l$RIDifh?gCwPU9M5@9r2kG%dRc$$y^x0y6&_~tP^{ODFiF9 z;k@kgmK^fIgvKplUEh&tJWR*SNpH-Td+7;G)cFm4#=im0$oVmV`YvP?-Iu_Q_nkJm z&D`dZIynjg@{`I&1rhpq&xus6!WlOI+ST1Pq;}m}qetV8Z|oY^wCe&DOydpUjX-IJ zyp-4t{zDRaZscw#6AYC^MHGMpP*3ygs|6Wosw4p8jaNDV5OKp=b~P+H`4*r*>+IO` z-3tkfGIp0nm}NOagZJSWvauRI+x5sb@jQuZ7C_!zi_1nH10*a4un4_QsaxmQ zkSmjoN5|269ZC=9J1yQ{UtEMj=tvrmW*I`C_>)Td>_y;RV^N;D20{oqn+5A#Z)`dy zN2Q?TC@{cX7(sE;|Si~{1?;65At z=yc9Ce$2{hV#lc&;Fd`TIUr^Y)VJu|#NK}ZQl$K6Bus59>K90)QE#OYp)&AwAO?*c=~WCo8UR`{>LZn%sTg@kG#g{n8`YmQhI)ou zC+(W<2d9KU-6jP$($rP>9eRvm^aQf(tG!JN7&y2_YWl3nGxx3xS*EJjW+WjR>9p9z zbPhzV)N`b)P{D?EjluZp%(98YcLq?Jj6;JLIQVr?cHP~32l@b332!!m9W9vm!c^)C zBfBju?9N3;a7ngfZG|4LzN7p0(*mUf2in?Rr~5!tiSgp15&%Xnj^usL68RyJ5N;?u z&3UPsdH%ZNE7O&eQ~3`-)bQ=SUG$%MN^6JlWh?*-rt;RWbq`NFi2O)Ni2EKRQtQ*t z^QhSh_|mqVY?_q$MtEk5 z&@W(86=%Zla{|?R^gLf1dH#N=`bRFd*5UVhN+f*iU|ecS@w3bk5cFQD-l&I9GkgHR zP4*A30UKG$wW?pq!e^p)J@i+V&?=THH9_i%mg|-0~f4miago1R0wfc7!?C zKOV@oTm*`LS2M?>c>w&2EkaGyemC$`X}&~5?z$HPZ4vA;vlh^dYWrw?a(+9VFfaFt zbPx17VsW*u)pI#l@?hB$0Bj6~#+iG^w>>YXB4diVvAYvFqT9!(U402^wE#@R-1$6L zX?@1gT4{4$-1@z7KicpNJ~0;+r0_h&3p*kYP&uU1RK|aKPx*L!+^AOyQs_n5_syJ* z%h4@G9(HPTb(~V$xbN&#<@Q(s)s4QobDEqtqJ6fEBotO?1r%cOQ#O}}qzw zDbN@(tC$)rczgvkB85w#t~T*40d+uQVNT)&IYlAOU_eH2s<(YVVF{NHfD$7Rh7#5e zve9fO6R8r;D}W_qufm{ijlM~oYxj3k-KX+cm5X8Mn2UA4*lSGFF}i==MgY-@yXv)O zJ;I$9=bBB#@C~z^Ik9f=hHX{9bYqqf$GjjxV%tPB^?Eg<8ga*!@M!* zNVxSlU|Sv&!=EI8-tkw!VI})D^dsFnhgPgl>yl2${2De4l;z}r1WhamfP|1dUf+Kj zc`di}QppZABt=BrXdOxa(;2z}AE2BQBQE}b1c&!*;&@17xxW0+Ur8aBWughJp|0cG zv(Pod*X1Le6hY!q6yj4+w}9rgOAgt;@+M+4>Yc(V-R%^C-|nqni6B&rTpWZ!iI`?% z5U4)1pKQ-gWqs-6N9!608(Wf~SfqtX@1xT^-?w)~g|x~o$7?lGr5e}1<<_}^KXXyW+@wsm0%Eq+ym80(_B-9 zzwk1iZ{GsaD2a)2;Bag1q$2}AogBC;kCMo zIb4LEFTTIN^s%boy^(;+MbbgdmC)Rblq3qMRA0d+Ifpev zfE=o!pJ5O21o!lcm_q%~FMEJOO?xkZ`5LoGv*55i8>WyRb@%d!uNc>fQuZrD z(o0u|a_(b5PGQ$@ZGklV6Tsj-XdFYFcLA3Hs_Xzf1z@QSSAj#o*$u#!LEW-XrqNK{ z%U`IdKdZ{Fvlk}+oNc-q>S&gDfqUFL1S|(Z=oNzla#l*^nm5qYsc{=iS#K?YqsO3^ zMs~*NcU}cn_5cN1+EGQ)Ly4W941C9L0mFDc;d6Zyxc%p8QXbY0%E{TNcou|Atjv8~O+|$n@u*npr-8?1pn~atBBc zNO7Zi>bj__vz0BQ6qbMC|M%o>P1(nbV(~Lln`Mg}c{W8W#cpzC+9-r@nnz5mBXpUuQ z#=3zP=7#_ML)@XZFime0iY1H%I z^eN%I+S=j(`ioNMyHvwaFwafWp*6@awKJ89N`q0wQU?B znmp_GKO*M)aufaf?NAYCmnbOm?25;JxFOHAlgR^+4Z^z7N1h#9 zoByK%%w$Ucu}iZ6r$!}aoQN*Y`~_{Z^G=>_jXkwKH_!dDUD5;?z_A0+&90{H^l>e(;v934BAcHU)%L+jJq?rSn!fcE(RK6&szY(%5)Q4Wki?dDbgUFR0M z04@_v!N02cwRex=hmpB5Hz>iZjm6J(7+mx@fK%iRrWJ$u_f-l8S z)$Iah(O}?0X|XHOv(SY13TnC6aR7WZvw1Y6tx6@Yz}s}V(QO425p5C4@G&{nPn?te zr;KITYk8kFP9c;?`~jCG@txH^)4-SL6|HyjTwS73``X{0emyV9M`5itc9l# ziD+MCF7(gl;S7Sr`5{eRZ#w_x(b`{IYQcnE)qLfs8H({6NK)(z5EXKt-{NWVtgL)O zny9Y((3vICnUesB2Wd`taNSVRZe#uO^aE4(v~t#3lMiG0j@Mn-5RZwwpwIncr=o5U zGA$(qy^1Q2mY#B>_lhnFtIBUx6#2FcXn?x|g*}gd=?u|GN9|GZE#RKnPK-dR08;v2 zom5FzzP5Ihra9Up@}_vWW}Y~A_wVqBe@|Tl24B)p?p38cj{x3tJWKmotj{D_Nk+@BN|64J-_VAMf`68UHMv!}`+%3E-D>R$+2ZQK}M6@+2^ z1-E0YwGJ%PtCS`GYPvIEV;0Ar7a!<4X5{DcOVUTgy)$QsSvOY(4htkL!pyu1x|FQ- z-a=6#n}7SE2hH#+1Fug7_D-b}g2vG$8A#Eg{DdR!Eav(y1CnIbHObeh|Kxy+5#1B# zPe`oSywyM;{l@;}0Pfr=8@0&fW&}6ouyQoUX_)Im6R^x(u~Q}w2$>(|Y2l2nZAD%; zK}VHdL6KRNRh{TPltqbSvLU46q-U~`{9m`b!P7B9fnJvHpJ+4w_+zWluL8AOf zTtw$zo(`~eKweM(e-56>HM|dC=RK(KuFY~J5(@k6N&CKJ`U*UMF$sQqcR1;!}$doo)0rA+;PK{Nhr z5C_mfvAp&zj>wdwRJ1Ph1zX*Zcd@nVX}1@jh=Uk@<`{J8X5z9MTqygJ1b;?nG;8ar zLg?zf-@G|W@1$|Joht)y(iL+(I!^b$d9bUK1X@^^sapNoBsblr0B!Vos?}_IWK2v7 zJE8WU&A*ZaG8mTeffB-!DK(cufDvTnS}mHWMlTn zPQ@$WXb)1(Vj5tN#~51p~jiMg)=Wpb>aXot*xvV`k7=w3Er02F4Gyc(;*&d>Zijx zyR`cocLTU}mCM4wxJKO9v85ofOdnKbf$Jsj+F5$Pmt12(jfQzvLd6JY0;{C1?&doI zLkSj?g~lnvej!RXIm)iPJ5Ob+$kVDMAt@%tL=rw*WAw3Z>_<$L9e^3>>n!XCm`5nO zXcJ>1J=VCm8m!cGor@x4W1oe_iL)4}{-mPgxbp4Fo>8+f@7wvHrL2%xlQkM|k;L2R z?K9KZ;JTUj)8X|~v9H(I<=2E5?a|AXj|r^BNk8r0xA!QGvGrWleIgX7I~CfcTyGS? zo0t8Vt@DFEaMI;Xd(cZSLi*4rVB@~E$k*2aVBK(W$`A_z*AE%3aZ$$c{LiXNJL4N> z@J^H;42~=)2!+$ener86Q{gbZ=B0eLy%6{EMSHZ3g5!fg8rB3Q1$P(T>hZtLA(qd~ zm|lBV3rfw@S50#HvlkJ?BpoR+F7>>vdCEo`M8isLswa%jrvlUS90S09PPlTnL;Q&P zJN}M($`v)c=anU^CwvexFup9lpYFBC>DDfLSK0BOiex873NSs#ajfPYv#%~6a}q|> z{#112BFxdkO1n+r;&;V(-s~Ct%n0_DAa`YSh@_3v(4pWgxc826iyUk-tD{$0!CL=r z{ubt^>a)938U{3NqrL4ZN1j<5W#LS7=#m{#r z`laq%=VJWVV>x=gipc!XLET2f;_fDzZv;5=E-aJ8bq`~%SW<4Y%ozt9Pjs?~eGQ4= z_iXPz_|=j*S0?krpgSl1io9mWrDRfD(52GMM$!aOcMT0ZbiG)o8Sq3ypGig$Ya5sH zS;mH+XjAvcW0sWQ+8;^@tg|T&+bY&Inu&dzrQQHGm*b$#QE=}~5Y`adwnI>}5%W1k zcd|19;}7fidWR2a-Q6#`5Lc5y_aXMyx#gGRNmZ zhp9$2Wy6GRL2(fwWZa*G;V?%`i7Tst^tUlTFy_f{iu*-Z2jVc)a}S6;yJu@aN2-~5 zE}?!8a6Q@4E$d^wI{B;H&b{Rsh}KRoI~BK);%TJ@>nMt^;NW+$fJZuLpAL;$@eSSl zYi`}cOg#T*D5R=1GXATAC8RWK$Y5h_7HE%)K8*RJakysPqY{JHQ}89VC?7vS@6m8- zer~t2uW}F>Ja(LUqPj8fxzvo6kl>Z-K(tMQXg{Pf)2#PV4I;Gh-PTXl;+UB~1Jx0< zag}y@$D!d6z#vm^HMAGTXyTd>60JvFrgWR!3}kt; zSXdt9Mt(Z(sv=+lHl2^jw!Nb#GB)~o=!-nqm(EVe(Se0ABi*R@!l7U^p;pX1pD>4a zG@zHNv5_hU)n!(5Kh!c+AC8KrBZNi|%ttzsg-)+;tyBI?zwMX`Kca2wmDVC_kOLy$ zV^N>Sj*Wj(Q$MOhnEdhODz)asg)B`K=5L)yI1@xl9OD2bIk_6;{?ukDP7^uqiK9QW z$w)D+->Yu>Bc=PF+kgs}{6*p@u=wH`!wM&#L!fX~I{NR5GZ;yNd=CJU$! z2F38Ko5tY$sh(hvE_~Mw96K)XUk=Lrq@L+SPfyPUs~glJzIWO0UZCduhAJDOqpKrDH3=s0Ld-Xi%`TbDxdZQ=uH5R z$i7b9nI6D;DogAy_n>9-rQO|**xfZ@z&z-=F)dg806YzEhM&&Q>mSZbHF+PN{7`A0 z+@DFEk29*d+=ylgpRsK00YEEzZ|$R_4-;?6`n*7(+if@h7eI7-6@^ij+?P6pdhAAM zLrEIW^-kZN@2jKD&7T5f6TvK>-6Mjl45>^lO;uqhH6+ld|A1YafqHuG4B|`xyoa)i zvo?OIra4mqc)iU8a$Zl$O1_zNaXn;Hjjf7TQab7ugh3H&;W5systu!;vX_51OG`D%>#J#PQ~TMhYO*IdO4pf zLucRj?D~cq%1$h8n(=~l4glY!9Zvy9oq9IVm;rEOF{2+Q?lHX>CJ!R{LjgY8i9YYY z>;ne_wA0gONw58$#id*XY+H2U_--Z_<#PRjlL0sw*jvG>If`t-wQWjdEPBmSg-{=Pg8x;tUW=j>ptT=L~;VqS;FK$_xM)-nM<@CgD@ zIr~hE#4hUgXAh-s}3&{OQLWmg<{_0`1+w=G`mo);{wAdQM!BgSl?s#P4E7U&4B?6$$S&eR0&K zQlZ^{h1Cb%575xdK1OQxP!m2npNl3AqCo!E>ZHQu)T@akK=P-+1c2P{?{;;?L5y)@ zTx{8A(w0j(X3Edu0My5LaXz!~-gN!fZ0K{9$E4(7fVXV#{oeUfqpH>Je5l4ewE|G_ zOMOlN`|`XWV>j=035+=TlcK%K-A|jNfEJCTm*Qf?d4E`H*xk<&PlS8VPvmY`;`!`P zBm@^`pvefB?D{O=1=dMzG^2K9PH=%%nEBb9`=`Y_|A+loiT{tn^C!?A)H-!;>IIll fwr2A!!`FB}tn;OXjinWVGoZJ!%CC#TMqmCf<*LW~ literal 0 HcmV?d00001 diff --git a/man/figures/README-mtcars-bar-acdc-1.png b/man/figures/README-mtcars-bar-acdc-1.png new file mode 100644 index 0000000000000000000000000000000000000000..48c57f580bd3676208de3112caecefaea051388b GIT binary patch literal 17495 zcmdUX2T+smmu|2DB7!2IARsEBp!6bLks{JWK%@&u?=7LjPe4$FsPwLY^dcZNgn$T< zF1;q9_kGk169?wvb#*BQn!CSTs~eb0H$bDr~jynCjpLVKR&JOl!v zRehrP90ED@1^hguIt5Z=^K?xt%CqmuTFh(Vxm|RN+lAX_p47Cpt?W<2rC|iw1rZqkR(GwHvSs!7SqS7~ zLKuu`ZGRt)dY%J2I#f%00V}~sR)639T6$13 z)D~|a5}8ukn+xwi)vZJY;e8(`H8@RAQwkgztaU65GX;L$-%n>C6&g8oGF6}uW>0PV z-U#U%UzQm3DU;>dA+M>RR;x;0WC_)duV3J)jtonAw(%Dq);q;t29+%G;|Xo}m~LAe|lah%5TuVz>UO?mGb>@e?YkyW*V zB1cxMQ2wMIy>PkmQG9d~k5PeEm99%W$=cBIU~Qf}G(I_~1`|hMUW+phF)|M^mdceA zsy*0i?K=+x*Um!zz#k}1g(FQrHgLti(u<}~7>!?$x_8e^KnxPZ`fVb+*f;djn&Fm@!1>UvMg^cWd7Ij&)_g{ z2;B3WnM2ECzb%{%x9PMEk#^@oovcSytv(C?CW4i>-l%aXW$|eFfHE7!4swRR z^c$8o$9~O~sNuBPB8AJfm);*hEb=HuA1%d_-Lf|sSkuSXP1MhGItP$)6(UslNjRfc zGn`tO(PnjWCpTxPW})BCdo$d@j+PTNWzgCrDeFN_}c4OjL0Cv7R-cWdR16K&30 z!L>gQI;DofQ|F@o6m?9jA5V!XZF8mj?h+SO$u3DUoZ4_ZDLonZ za>Lm0(Lr>^{xm#EPZC+W9h5@e?Ctex_YD8$p>|xA*5XI5+$&XWy48cY3}T6xNB!=v z4Tf82{C(LQp)V6^zZx}i+>y^zziK>@)1oPd%=gQ|_-L9SY)x9ja(Pu|;Ax%gUrf98 z%)~d}rgruCZ>U7#2gdbX?DukBktEKJC#csO_bhr=lpfpTM-uyHcy4GB9)oHfKQv-;wX!>GWNq3r86g1CE;Z# zMVXi2(MM8dQkZ?QAWNFdpNQIstmEEqZ_}QM%f(8rPvsi0)`{&Y5%dR(#dI=x_@5d~ zJ~$#De-&G)K&^`%7^fX(#s0Z%W$k2yDQM=%FcW|Xe!1GT+eR5KFXUB8!})^+FJBtu z=IH&NJ~Oj+GnYfgcL}xQ2I@ZR89fq;mxTa6G zdAGUVq_%eLTI`4)7x=noB}%Zt+D`R)MJhL+>2E=Y%Ul(eYE)(7TU!I)g`&e!q?6;Q z(FW@@HlAWqIYv@O7~_d^ng6)I`YO`>Ie3NIbdDU#wbp%XE~J@*ytG2*3Ek^ShcSJq z%^ZIh5^g==w-U-4M!%)pRp+vu)!z9K9vr7;O1-{bJ&K1R$*3eAk5GC899xSd+!XR^ zQt-`M42EatE<=TiaZWaZ{^o@AYIj@pPQ$c`jSH_7@@pNv(*%!I3l%1Z6dV2pT0n^5s#*gw~2pi?_)@nZe~f5vLg z_mbP~5`7zjKY2Pg2v<|1U;f%hOXaYs2*+xZe2AwYr{4$5OC!FgG^mN0WmRwK5HvH6 zZDt9csKF@qa#>~skif1WG=7g!KtLmqzvg(a_tfdlFv>0o`DV2BF9(+ zjefP{sj%TP9owDEx0TCR_pbA~Q|b&LhX?8MdI9ysx6kQXR%BCt(;8g?VkJs*E6A0& zBI8RDOrg}6k)~{Wf#13P>zZ@O!1B--cGxRAoaS{EG~g4da>m?-4(AX1zWT&KCv4Me zW9H`bI5mRw{WQeW9SwL&pVO3>iaaKfH2B_$%)%%$y`4fPJotlQKzx@jnNg#a^(sf< z{3P|kDw<)q)?1<8+pP)8XWm=+?m5@d^e3j}Ok|D!ksD)T8ju7)djBT&6k+ zLE7emRWlKa4xP`)`^{RN9#A8{Cq}uR@o+n$hUsT*_SjcA3ygV{*FG)vK(3eGtABum zJj4lsa9t|XaWC8or3YY*17LK#D5(%}WEGB;tvNVl1a&*;+is1v=KOUH?oPuwWRq4` z&)?WguHYz@I(qwq6}y-5`R#MgU%8`Zhn{0;hEc8kT{AoHB#`A>D1`_B_y}CkWWy2+ zPOD}oQXODavlW*{_Da3`QfkAxw{X5YzI3blczZk{F8r9#AkQMEl0-n8o_o{O;^aQC zXTn7arFU8N+ui)77AK9vO4l3=nz&GL)?@02Fh?aMI#h;@D=3Wt604_*0$WR8_>lZF3oTLFY53*?XAdhZUX%_Mo@h#5{>m2+>cc~Tj@?P32+}0vp zJ7W5f1cMzoVVDXf#H9H9(xo>yMX=6+gNb~{4M$>}ih63>1O`%0i#n6SL|ov?)cdTb z>$Ag5a+_@~T4rtlh*h;`G&9ICbnMTg1C1P+&=QAKoT3U_vlHlTejJBu!$(v8H;6tL zoJl#3e-$t!HSBTQ9Cd;yRMbT(aM>U2Wv9QbMlek^g?xd(#c=vov`k?IGZD-F=0(FaQd()F~aWNgKAgT{Sk&7L+9{lkN>`$4z>i;Na)+O3O{M`{CM^cmI} zb%AnyJTj7=#B1Z!n-@|q%i7trnR5QBK0BTwZ5YcsLX;ZjS&)O8EdSJs4yXd8!O191 zVQTbpt;FV9a5S2U#$2Gv*00uPtAqJW=UlA*=G>jU;HJ6S{e6rG;JMKa3 zo(HE_f&YtkA#DQ!AqoKGEZ=M_fL-)o%=7}w^>-&&Mtii4zlYvs_|$MITN?6e{l+Be zwZGz+G^N~+k$Z7nJRBrq+mf3O#`ECkfdyJ)N}sz+yIKJPNp*{8C=EOstw?D=WFS&v z|70h)c=vWK6>35t&zLE2`cQLRVug<-K_BgKo@Jc17@CrhVgu;?>Ln4TZ^m;4GcTzi zujo1d?w6_wpuzjEHdLs+z0IHtygTeU6c?PDrzQSCgZA|!zj++M**($?^u7FtnFTbG zwze9-_aciB8%Pxfoq4Wo<6eQd0o~Vn@z>Q;pbq4!`tAOOWY+c^v;7*EhaW7h!}B*9 zhk_&q<7)iQnL@W?x;u8)A}=fGCUEd|kM`-B*;gcDkRe$r>Tq_qcgh~iJ!m#oGuu4= zXE|al#f4amgrGR5PkPXkX~{~FM7D{8weFqy{4Mquh>tpQK?@66Xo2@?$%7<|Zt3hT zQ3&;g$Y2!xU*=gDwjPSW*13y+&`}%if7+ge8U-$<-Li$w-d|=K{WKVg&oF zaIL_-YCjLv1 zwDO5W5gNL)+Ai7AKpnl07fWDoexmQ3-7RB-Jmk2vo+~chWnN+EezEAT0M@1g8rGujDsrG3 z$DUlaPQAdt<7ld_^NB0;C3z^IqQrzh^t-1Q`{>4txpyHfQQ|VtK9E)pUL^`toU365 zDQeL!cw2|{^@}W@pn6)=Hr3a>w*iO3)?rMBa|P&w?~$!3 zDOhz?@vA7r%H9@s>YQaYHlCIqi;PTsqmXx6D^`yYmg`H4Ns;+=t@W=zWQ{Ivbz&cbl(F1yB)Bz>50 z_1C(GF6-~Fc^N2dPEJc+#rtKhmeqX!cuO=3&dLrebbt8 z>k28kN=Cesm(^Ls&6(U9zq5vQQdL1alo`Q^y)(>b!{Gb^V@5ikuEiyChTeIw6Bgw9 zCdf5Y*u>})BfEs8WI!1_h`7<5QCG8g^oAjnJ{;DdXZpkD_1K%dUmun?v*NfYx19+> zS^ORZp&OpB)gC7`VI%@}P7~58&L)`+=`GayosE8S^r;DxdxykVJj8Y5btwJKg~_q{ zTPs-%BA1`fk2(&ep62i)DS01+rXTm&^HpeF$0bY6G0~NNIavPLI(GBh>g4Z%?j7YQ zWf3Rrt-wbcN~0+&n)BfFX`-J{pXbnV_b;4Lvci+T2s-Gj<|S>kdDM00OoTX`ZdPWM zJ=}5f`Sz7NXtt)%QrXnrbN7Dx@zbo{bD`0m1We!Hr`m<1#Y_DN6ZDr}TZJsN&q3&2 zIyD-oy=e09P`mC9fF!dVm@g8(lq%W8GPZ?4KVOvZsHZHl@0K)gBh$iJwHcJNL?}UA*V9dWKOi^1oI`M+dTB6(1A0 zQLoji1^m`{2qQk6D6_7+6q(>Sy~!ORTyXK zqs@}W_3U4r5QQBgGcgOvh7KJxyV;sZF5h2V?ZRfIKGQ_g3xozKeTgW& zg}pCC+K42<8MH#gpG7y?N+mBnv`PeD7h5sN$m!44@O0N=dWAL=I6vu(66hVikvTla z+#D-^XvBvMcU#g*u?CN9fC5JLw6SrNVcN=Wz}Xf!dyq!;AVO;VsXL18(@quun^5{k zQ>r=f$#pSkqO|Bh7qy9TWVad8K#1 zj~9LIomqvZYzjQM`K|a{9kTfA_;P$nbV2zo^WK@dPQ1zdPVjeaP&Dk0cSLsPW;lEf zI$Osq5E!P*l0#*ZIo*B_guEIe3(dzE;cpdlDys*F(>p=P7Zlfy`HnHZZ09Z?cMR|; zLp~UW`u;PN50?Eo6<@9@s>}c+yKlm#vHh*RS)^g6U4x@tbq$yo@w8v3?{$~3nh z@G3;t4}-c;da1NR`kyU>4?rgGtH=v<;k09q;sD@sTA3!ij*>7~VGa86U*J2}q7&HC}zzZ-UfESO_ATu20A z;5V@6pxHxREfV)yyqcPms9f5gA>}ju3>3PYAt`445UqzlUaYtuX!Mlr4QrnKEv*VtZZkAbN^;r zlo~-iEIXX9>k_RTI?p-rL9YF=0Pg!n0@kW}e7SHdvI5mDxn2ga*!||tDjq=^!9zV% zQf3%%6TR-(!MYljF!~sNa?%uH>u=?vp6eqK^qKv34WIjc zCA4})^d;yx6>a@KxlZeYvKa-(Uc{x+Qmde2if{J{-63uGcYTLr zpY0C{&Rb~p25qX|z#NLXYx`%pY(>XFs>(ah?tsvaVp z`E`d37$cm+v~+(8If-}L_R`zGw6O#(#753kFw)=WkDjLOJGXh8*gGPxvL(UZh(!t!GkcX(DlUw(2iLd1=TNj+` zLMKM#hH&81p$0ktP+2ywR0;7Hb!L`^18F#ow+Y*N`z^IbH>dmj?7Jojtg@SZAjIoB zxlvzg=HG74gb#(GH3-nex_Z}YhD`(NdlU}AGzQKdi7HLg|ZrRMT9U0q- z${qKD+e~3?*U6bE>Rk-|b6vh(4mw~p-#zrkl2v*KLy}C6{w24#csTQZDUi2uz^cl`UOwwA2Y5brvzP-Jw$7eIjo9syV1U*CvT26dAl~6>O5v>lzW2R`q!RS@?W43cNoqYM5!i!&&x&e z9vp?AhFoB1wm2jI=ZDmAQ2>YTm9K!D-J>83YmIz#j?4GKF&Rmld*(vX?Ox+5b*UBSQ*?92~ ze`RFjxsz($;qiP+1<+o&KtLd#@D=$is`v9GS!RCd<4Y zryi?Nn^zll+9#Zb1Ygj-=$)m~cR9?F^m7wt*c$&nBBR`|pR7{|=C-dh z$EX5(=263XY|IM&$K4^gu6_U(djIl&hK*WjyI(NQ@^vd|1NmyPk}OfmR8fZ8K%`(` z>}hfkWzhgl-~b;ORomtJe=-Ts3j~=63OfmArX{qMoI7xz8q9|CuCFKg>9<5B;pZ3% zoUegFvGQE-Fssb1ncO_1(-6p}_I{)@sMbzhddou)NU*;ydsDUe3;zmeZBw&Wp{ySD z0#HY4TzM($XV@hnU{(qCBO~~#7Y!InKjo!79MZ~I5nt#l49t4U1%dol#B-#mqEwT< zkKVI7D;+*v+J-^7hK_Mvutq&Y1V6HGsgtQxgWQmeJB^ip&?Ll0FKj`w2~vNOo@*fs zKK^KKd^R;n+7P7MKna+8U(1tuLxy79t$sQ)vpH>-sV4kmb0sHra{PC7+yQAZWydxx z4}qh)J|Iu&QawJFT<9cTh|vF1*8(<+wi4A=lJAZi7D(yhHm_bWCN5R1alB{lI}H&W z0lS0VDPs9lb>pU-36-|?4+)Q+0-%sQuf7f9{mZ5vaXy-f3ll~Ucw|?au@W8Rq5QK+ zjTm`w;lI5AK4%0%7gueeBHnxq06&pO{1y2fj?25&f6|C&Giu< z&CxA`Utn9hi1VJg?u}@!uCe3MjGq?VROY4kBp=+ww+F8M)LSDIz}8MaKSgNc`gWwX zHgE2^E8=@D&xA_w4p^`DyKC%NPBBIUg%PxgdpICebtf@FxlPv#2sz57ND^Ufym&2W zH}6L=rs$Jf`z3TolpOlo)<@pmdcN?Fcif)@qz9CzcXzi~SKb3*%jH!n>CfSDzFGJD zP5`9wOV%bc#@n0H&zrLF9}zt~3xPB~ya59De}H3x-=5jk85^*Rsjsi+$?)$J%B`jxt8~Emts&nr@JRLC!m=>AwY7yrBK3=23R(P$ zaMp^8ja5`pDSXZdfrJeGx!R`P)J_`HxmRrlwiOC|m@uV*R%?LYgM$=ea|lJblW` z$48ot(MmlncU$;AP_QQL?~HDf{&Kip{xq#l5r6r%Zepe6J>S$`k%xGN;78`RsUd4& za5(%k;eAa_&DfYBBf#}nf>*~Vf)4jKS|XVj=H?{lXBQUGzkcPtybSKP>CeTz(9qC7 zfBrD?y_lVyjg60QI9M*Mt*w>7c*cx*Q9!>o79{?XiOq*nU!J}x-8lM3P7wrp_y4s$=j~2U z%f)k6B>w?^ipN@=Va0*upO=nwDBnggu55zWm|1WAH?{?VAQzmJ8cUJV(6HC1IDDvs zp{`VGTo?X=NX1Ut5!X3tcH9DI>AXXF(XWWwi1U+_{--hr`6-%d5EFvG{$?NlKMhaD z1N@*iu8rcW0QKlN533f_x2u!_q$xDk=Pz?rWa;K;JBg=rPxWQzUe61xytt*EqQ5WB z@6dfvKm|y$()ROV@p8ZE*CD}8KdmcQM-Qv#-8j|M){A1{jE%#=k)6knANumj}2 z;m5~BDO`tu|Cg2Pmx0x*@zp2T>ww2j8(jKwggHOn?2ubJVulHwvV{s+t)Or29{c&b zOrO>@>hU>1$*x{mg^s_g$A6;MVOuJ>Dtnv^8e^7Xeg|AQkJj~MFN`}F$50iv9L`a~ zqq=HjMSbfn&C#3(C#wc3J80vQSJY?;4WP_W-_^g<;RzMBA^4zjZW`tG!>=P6YXu5h zQavVTfQbJ>EjPjJSKh|(na~f<(hY&`t;$exzx$}wxk59AZ0iwVfc>;x+%;HI()uy) zN4DxPqNav+^_-LnFsZ$IX6sTc0;@WAh6kGB;<_tVLpslyd0FIrIjW$rordb#-O#*y zl3xaE-zrAq^P2$i(@5Rd!38IR##sf1Vx^aA2U??Z^%~|77Nsn0)!ie;qA`!9>r8Ws z*4qi%dTQghwWqcw?7f$MPqK#8fznJOd3=-RRD3j_V0W#0+=(el88$gS{JG!deDo9X z$|3fN0}f{W$9=z64uZ0bAtjlVkPGLnD^#hbmgjr>PnkAMHBbo6h55yXpD523JPuy6 z(YjeGrqdj$d4sje@OmKGjXu-415~eWmjVHej+e`KVo3~idBPOdU@0T6tr+grk0a6RJvfk#N#VHPYVc~$GBkgzn2UfR; zx0FHTJZkFd(xEaZ*y62{e*gLax>m4y;cAIty*Vz8x`u=>4D!wOelRELvc9D7Lo|NH zv&6K)yxl)59MyzTNpda_U{F{cS+BRepVDPdT!+aJ*Dq>wgRTbz)NbH5T}UsFpv+wW zwW4+C)717SEI;H;Z$IeJjr8M&@!Zu_^UJ4k4e`Qr)<9N?s8JmSvLLUlg?;|cPUQLq zeEHj>V&&ZsG?a9Wx&HxE#dzo+b#kxeiBKA4i*iw1$Rs;6;%7V7oa~D7__E) z4qt*94NzInq8nW0y4NPB?eDaY`GcDQ3oX`&<57cqla!=dcSFvEFM?eT(_E19B0L5v zG_TqYvvojz|5CuI%p8-A@2LK7+Z11K5tUtV!L|WC2{YSIMV2-*tO!T1c5@gFi^ZYD z&h8ytK2tFl-uOyd3x{XsidqsYf3RtaZEJ3CcP&4z_^Kfq-C>?k0?Q?Kqs zO%9iskWTnfO0E51f!E3q1~8%?d2+pGuHR-GPuG0Yw$)z{h_V0UTaykB4jF+5OL2Vq zP}Ve~;vq4Ip$Yen`%6npWo2b>*`1eaY8~Dk@cF)g!bX^-PG zGD4BLnldwQ#ZG{Y^o^KSF364waKLKdpBT5LHppQw=<6X=w^n`on8MHTtE)FlkDhu6`d8 z({t)n$gg+xPWB1GQ&taQl3E$h7C1thZV3H2ZCW}ERN}fiV`EJueZ{DwC`(#`o5$|< zrPF&+Zx8XoTaz;!#o+u*&v_>Fv&vAGxTRKqWm|7=+CMlrh=`!F(hLX)c=#}QOZZ$C zylF8@!R=v>|0ybOW8GEv=0AUG-Z$`o&0uF|SAnzZu|qvQugeF@aB(SN3cwH@^XH;> znr5}@)X!?Hufsxj8W$H=5bzfw>+7vM6TbrX6Wo+n+d!;{+cmnEX3y*{bOHaEs1T9j z(lBaKcDR*6UR_+gDq`KaIoA=#umyoUs2DE_hn4&ocLHzzbfGLbX!eszU01JtrCI{N zNu6gtFX(38zCW~NJqlq+4(|%kdrShb00{t7Xl;XXFoG%^;Gdm70jJLu<4!8j`nb=5 zk(vv>JKwAx0Za64eK6kCdi5db_xgc&Iw$lZJ0#dc&$I@SRs6NywRF>UD;$+1yby?M zeBf2cVhc*qLwB9|!wKh#^PG<29r0S}Nyk}cU`m#6G7x+cyPrjBNW2W<4hi%>C#OmW z+c<(YQNVg|1;E;yaq?FvBQrJgD8+x|9GK?y1qc7#!XzDV->^$3?re*b{JHYf^l3vQ zlLdSGYQodmMymhV#;xCb8ZtXP=DGR1q&j6q4QS2JbNM%DKjAOh8s_e z;-4Ly@9gf-_DmoO3WyQ8TDF_BEi6%ol;7uq!XUxsB^{0hcSc=^>slEBs05ciY$@5i z+Ti5kC$950yGs6aIr9z6c`)dU2II5ZisEl&&+(b(t^+*ym>LfIj_;-x$ehr8H z&h7}}KH?(20S5OAlt5v-wiR@;?TjbT`5*LmZj7LkJd5zTql3Sk{qyhLJ=u#3=f_<- zY8sgU(gEki@4x;&kN>?}e!nzxO*jR}!j*-Pz{UZ?!hd9#hnv_U1|->0pf(UPYj;B~ z>V$yevOK^AD1yDd=p-PqV1!VJJ<*#uTz4<%BFIH;PcwW8$s>FO6@crOfz!yx{gaH3pz->M^?kfTX+PZpt;GgFMtR;e#Ljd!KmW`FO zkA6>#4(Y-a{&_ye;rYGR75=+VvU+VR4bzg(nq2uiA^!TBwNkKY-!6iO8fow7OEJq< zw^2X@XMIR2(J2k09=Px{e3#s@c8vA0y2u6P^^*?;nhOCvlDoj9MXBXK;p-*KSJ+{LcQEc{C=o_?ag30}RhA1v_iy6@Qcf4>e0es6ED zB|2IU0UjYa_lYy;VncTJZ7C^3JTC-t)%Z1-YJ`Q!ZvMW-$jCS~H5JJ$kS^s_FsAf( zpUJk)#>S?nrw5?88W)J@wVf!p>Hz&F=&Q?#L{GG^7~`lHkB8p9%MVPt|AL=%M;*Zg z_lCd90EaqP5|GLfg>lwLyrt`I5{8T>p+ni1x1E46on!;)5#Y>86l7h z{Qm;_4{rV6KHtK!iQ=Zb@EDa^tdBSY31R#1*(0CC+BxHd(E%%Qpl`3A&KWZNXLlS~ z_-Jij(iJ~*_?u(B#1{szWlRquKS{WjcY;VGb8k5>f(r3pHm>~-duS*Y;~Ydj+Ldsg z80qW#oSN$2BfA?K9$sj21p?t^-MqD@SNNjXsG0!yVZibJf|nE~MoZ34JY|p{JnR)m ziw~|gEOrg(^fw6x^#TP=%^2OO{}&xHBp8e zwcpZJ5=i(o1{eftx$(Q(UkKy1!^f9zP4`iPl+6HF^hKId^$rfsO}j6LC3ab7^)A+{ zKY4BVgSRD@^!rbumTGWsnbTR8-K3LYDCYW+kbKl#o{sST`w3 z2krl+ZA;H9X@J&7e{Jk!T+n#!zxqhpxzHDdp!)~){i-RLSsN3TLH#{P^Ea@a1Jj3| zt4;qV*dJ&`GTk35w~FL7!TGKfuMC&!e{(Qa9~>MUuXd3it~@BW*(vYb_d0(8JQx@J zXt^}#Xl1H7yvM5;h=D)^G@jM`>(NQ_K_)x9*DgI67{5`KV_&u^CVryUV*#<&V5F@*MIgvowa0>gjK31Rqow!ah1~vZjDdlH zsi`RqGk-myZY6e~M=RZbCQ2fjU3P3}Xnt)?-ljX%$hlU@$G$gHsTwpSSfn2-D=Y1} z=FePe!otF_xl&S6Sb&!J@oJc-=dadQz>Gx!CHE;PE8B?EH$)`PO3Ez33Jogl2M6`d0?=%*A~O`$zVdjAE{I-%SPqvZ{&_57)9q+)@4G*j zK*uhV*S}O!GyQ&bb@j&&QM854gdf7IVCWph!C4A<^{yn51qsx?hLVz!w|5QwG@$ew z8yiW2<_gs<_6`nYVy^rV_(^-x57U+3YR-rB!Dd;5fIhRn1h3r zQaFnkucYLtb%pHqfX<~$mrx|k+J$q?RZinT@$HI@jU5=!wJNT37?vZgR!~z@lXmc= zqqQLNYDEvP))9_;WcK)Rvp~>(M{sa3n>18r;}=7_4is^eWRng$hmHh+Vf)I`h68)h z&M8gkUVSNxx6}fw1NHOf&6|YU1$L{plSM7alWSWns4re@*v0z!jiN*8!8Jy0GAc(M zdt|mgL`HTvlp^Ef;^N}t=U+~K@LO9-JN1}(VKO`)Xv2U0JVSdagAJ}d-0Y|{bh5Fr z*@A(CDkvx@dg1Ww*)vyHS9|+q9W7Zg7{OTO77f$AMERgVb@k5TYV7jTQc^+!PpGYn zO9pt#6STX`;KW&2e4A+{Y7hu!Mn=h@I-oo=T)rGiAH%JYEaS6T=d}__zrVjvNyqNL zHx;g{2uJmPjOmMwW_GSVV;8{CRf&^`=j^RJgghkEfYYf9ywH=6d_(a{8A< zS)yJPdU<*2#ixqcX!`p4Dl4}d>d2(v?d^Tf@P{ornho3x*jx}$+%awTl~O~``%Eq| zFl=>6;HWsypFbZ;50^i#naM9HDf#l{2B)H`>O0d?cy#oOc}hx35{X3jTlp^*WjH&g zLvH@w&6^5I4_4&3L%}1p>wq2=O|Pu5GBM59H(uK{eaL<0a2@PX5e)0YBOw6;k^yMk zb>-IPyVF3TytJZ_mzPh|+y#jPf^QXvB2PAj1Rc(BhzJX_`>hIDQKV@uOnhDR$bhj3US{9H~LgfZM-3X6wM}Gf;#rKvVL;%C&Dr*H8s@) z0mZnX*@T3IhD~6YgY6YFpSd_n4*x%0UB$W9)lTCto`u5UkSBip@Z2R}+}zxdCl71gxbcvx47O$()293KhJfr7D`Q#;8sQX`3WHEHPqF0 z=j8zyolJ(z$OpqaJ3H&^>na=pp5WUQsG^iB0Cxviyq%w$-nZnbZ{nr*`0-T1K7Fav>je?mPu-(gj_LV>!J3QRq zDy`pq8rf3ryKRp&l?R`xTsg(heu_Of6zm5eKs!6*E-n)_+J%GMTwJod6CPMB)_(Y` zvCK(#`cUDdar<|@8feyo|FS6aboSphFD6iC{17QIoIkO0F(ofQz36zz@Y_klGG2jB7I|P&`|4F!-44vTb*nxY*CFBG zo?79L(A5G?Iiwl+mR0-b?}^mVluE&s4y4&pz{KYsW-0@$j$>Ig6()wWYLW03XIF1r=&ece>)j z{NLpU2*;gG8PMsS-Z=Ta07E6f6%=ywa|*b9r=b20i2-Nk`RI9}7-u4N1OcgYfgP;( zLJ{!v-~W{ltdYcv>49@I3K76{=9VzAw8UWeqDFdQ5)JeXZ9m~%MQqiQyl>}V*AaMf zLCXa^@&MHCEx7aVL~>qaVOd#~H}Ev{)H&B?2{7whF2@={12*(wr4NBNAN=PN@Bjk% zr|LDgk5Eq(cRpa_LRZhT8zu+^>8e>;J=QR9WrW*%@q=MTG{^qEJ2wredWVd~fKUu9 z%gY6u7oCrGJC(E~h7-2??w+FqZP>Y?PKR{4BYI?0b5B2yF4fc=!5@%>{v%H{ZEd5Ub!KynBG4ww>Bpe-E@pDRk>h~*Y#m<5`Q{S5evzi2#L;x(W z6>U@sftjo*&Eg}7n}=r&@w*(TcIIe1QN!L933yt=dyF;B`>P`0p4&UYI3O#$)G}!- zrq(O2HmlVPm`WE|uQJP9cS|@V4C}sTkv$Z{Nqp0;bIju(A>$o3R4Wc2EAO3AWRpK! zg2_s5+f@J$CRVy-vdPIEB6#PFO7@HN2P1={+@TLXRcjEZ5|%=K#+*zC#Pq2-L13+c z3CmVO47l!l_Xb|R5i5ctkbWw8JfziWfmCMWSdb&kbK|ynhUsqvoP2 zTNEPt-k5+VWq{}F@2>;W&$*#t4*8`+L8mc1yXjxK0`nZ7fhBexsC8hrgAKeSm3CZo zpLDL3OUtw#xXY+HJ^2q*6L5v87W&@aXSEs*8-Q=mir|B@uJ+jvjYiFC&WYFdr@Vif z3I($-@YsY(3WnvXR9*9cEwD&&0#7S2$R!%un{2mIiv;=)X$pC-n-IZWiw>rNxfWb4 znJe@T@Lqq-vHkf0G06W;dOlnbjHU$d0RIK^>p+8KlrdElI8LwS%awdT|Fr(Cytz%E k`JebpD*ls+J&{bY#fwUmmAq^R>{k#~B~8T=g;#I>7guR;`Tzg` literal 0 HcmV?d00001 diff --git a/man/figures/README-mtcars-bar-acdc-2.png b/man/figures/README-mtcars-bar-acdc-2.png new file mode 100644 index 0000000000000000000000000000000000000000..5510917fff4194b10df72ede08bf831f326d6b09 GIT binary patch literal 17450 zcmdVCcQjn@+c!E=lqk_9N<>6S^yoy%h!BD(qce!;E!rr9h)$41^xhf0cN5Wx-pdfZ z8@&zVY~T0yJm-1OI?wszyzd{scdb3kT6^~FeedhO>gW1gLf$LO5#OV|2LgeJ-^#yM z1A%U(0Uv4nTfi9!;G=r^cpe z5l=Dk{-f%Twi~lj%j}_ANp1aQj6QQEm!F*B{fC#%&KV^s{7+eij5o$441k5`Y>R7K zZR>nHDUd53Zy*PO2F)IMZr+BVX+a?A8Row@pl_r&_d%ci@!de6r>}qA20doF^$2(Y zvON$;KKL^pNE&?SB?v_Rdx z>EIB?@nll4h(>GcGcWGir}Q0YF#)A z9tO#z^f>UI3^EX)34{!?SlfK8B8x@EVM{y2wey8smIoz8^Q<%@ie6A~9F^e70DJ$@ zL#cVVDQXJ*ZO80H1CEX#(lk_rGtTV`}#90^cO_#IX|UJRjs}z3dJk!g1=$ zCENmRLWYjvC601wLSo5wyaT1?&ip#939gUVul}g(QV`r@BDo_0h&Qv47;oi&JahDp z-sT-Wt8L@$*MX#qp8bZdV}sL5w?P)Fc=sw4-;w>!Pso`XF&BT4=`{O&&&(&h8PZO8 z&la;G&?lgqLE-7=;_}_Wk3}Y-dQ{IRMG|GyEL`WAF4~g*AWCE8z2Y#c`&=_yQe@)% zx!!u&itVsw69~lZ%PsuH-llS_?vEa|QXlHoY1fF%KyXgcp_c98#LvLn-dr~CN1u*O zqAXIaRFuTLj;C~?W1TK+{-l0fZz*i^(G8KQM40W+PYAA}PjU&Q_G6F2Kb{;DOv!L{ zb5U0JLg@ydfbk)!b`GXeP_OqCPckeMZ;eqD7N4=e@T?_r)vp~rb5^$fNV&%Z#y2?$ z+z*u^cHbnjwuwf13)d-4H^vf{wnHn%wcKAU^FLSc?Uw9|d4yS~aC*KCUFDK`aOC#H zxB%hGKP{)1-1IJD@>Z&6Pe!T+>&$S+j9QFakL#V;6!|Vo-tbDXP91|#(nR=}^<{Ln zF%qKc8As2*^ROGS-{^q@@*>;&{rKmtObL(Wx~I$G{iFVFxw~i8wK!h#VH*CosTO|q zOYclX5$fYQ!I@pY?-d9JWrk=M1pFY**{pS1Qw@{IE^|(`RIwLD1&}6QLWV+8-gxE= zO{11YNDC>zHV1-4XMQagE{w~vN9g)(s zT@8rH`pA}p!O_SriSG{bVfak0XV#e; z#rQ*=+rcFL88T`m)P@@c7K6XBwajap?SrkR_NBk5efr4l-JLzYj*0T^zI2YVVotw$ zrQ+=IP4q23U)v8#FKybBSbz9FVQk>lP>4Wgc2P%Pc+FeSBS*t=Oo2Y`A%0lJ+J>*A zd|2Bq6D64b{`p*qICUSY@`7ax8Vs2Woy5zDv&$d|@;Oa5N`nv8`m70hmzR2Kv; z#4Nwei2Xly+{xdo~>y2Im7np2zEXUO#+zWku5=ILqz<%;&8y$I&)=zH3!U;Wb12F_}hXhfk?Oyv}mf#DG?rK-hS zQt**58~o|dZ-f4%vdxG_fBtYc6`yL0R?G;kebmYNO5>4`sGVX@nBC0%EoGZM2mupG zs$}tFf9*xC`_^Fmp^2ouZ2#HyD}QURXvT?TN-*cKCQ+3L9b6!Or|W^e3jq`E-6+E% zQTpWgJX+-US&3JIR^Uc$uRV({Hh&S13;B+_N4G$+kC@$<{NFDfXj3GRnlz3bE15?! z=AI*l#fEnr6TCyE})RYw4eKI=9mMfWap|mja zn@ouU>@Qe$dL-fhfwO$*XIsgobX_&2i2VE5uJte<2aDpj-6 z-M9GuYvb7JcY0~g!^HEPgt#ByYPOx_iG+ zs5j2dy6^#!=81X5M?)Zeq0jyC@7XqEmUEyLj+gK_m zQ|qpBrMee~4J{&@cCYFw%Ea3Rcitgov76ez8i-a~nMz1AILU)8beBr%#UC8~^l!ZV zC#2|pO2DV4vypwvFy@a zLiDZ#Q#}+a!pA+M2#MA%IER;oEDsI)wR-#F7qQ+dj^3`b>@Ra#f=X9uH4>!S9RCrU z2p-SLo!PRXO^{*+=@Uv=>?q*OE9f6Ky>qR|cr)<(9@Eb^%$3yDnF#h8mgT;3^DMeQ zLmg6)4SNmw9#&1d6l-U6gFxIaKpJ^|e%1}YkUw}bkpF8cl^`MzUWU1%N0bTH&A262 z%JJCteynUGdHyrtR#{17IDV1HdU3=Z;?UvQi8ENGA?WX-%LZAa79pBwl)JFt`cuW7 zG2XT$PX9fN1&2((Jti)4I_)4j7C7Mt$;1rmxNUIo!;>SQiAPjmn-i_bntECv8O2dE zXy1m%*Ljr@GL#^_V*RCI=TEF!1yM`=Z~Q7w&P_5Vn~SIWBjIwC_s@^Z{9FxuRSJS# z!trAvQGe1X+x#HE6pOtiqH`={r0p2WT-4toydE}g8ia>D0>76rplsv5E<{Jycm+i z$qhANR_SXRIwGW)^5F!BygKzIuEdWe*Ab^)uLkCf43_RzUkvDv3qRexICldAepwgF z?ZO&D$ppAeIy2jonf*7~Nm|LfO}^tcQDNv6a(3RSRgo8&bh&_I-zu11EeVm#1v@PY z=*_@~=Kc|%S}a{lCp%c1N+z^rw0HY~t)<)8jD>Zmfned0W)cx5fHetM-A8fpsr63pXQhvGWy#5?7h$Ke0G9kxRU-a7Jqq- za3D!oU-LtG*G!OwcprXMWuFi&m(xk2yBfp0WO){m)vANM+%B;1fiIk;ccUT=Ghq)wptQc1 zC!=@=!{zJ$3YYN%BncZIrOny<$4ZD$T@d=6H9TUU^n^KdT@ zvo^CBNNwu*NXFvr?D&n40VyxN%L7|XmOts15JST0Mzt57qL=S`JF|oB{M%+KJNCSz zKJd#03iK|!Bw4a1gr&uJV}j$bqacuYGuFv)$Jtcn+EVpn)mlCyv;f9*TztJr2%8t% zot~1>HRSXT`kIRS*q57ZkLJVVug1cotZJ*BrGaX^FX`1*T$_KtANa}j96G5}b51>E z++*aP)`X`W^(S^@<+2KCXWOQZ&SRT4lOu(Rw`09fR5C@>BjX00*vrjf2G0neYixX| z8uFd%o8eg{Ql0*1<>Glp^rS7ngclfMHCa`P!g zFoLzcsRNWmeYR5Sa=Zf@w0O-*!cjc%na84gsjTDiDF!y7ju=sMvW z)8B_goy>_n&{2InSf`aURSDLwyHv^Xn+m~p`h*r}usIUc%oSR{qtj2GV+# zTg`L*ixfP_GLP%@7n!OIVvo^VHPDz<1yXayzUE_W>~8I+KjX=rq16n0w4-l7c+SH* z??eqf_QwzWee`b-gC~{ac6|+YgYd8_mgjgtQQVqmS z+8<2L@myJt9SCB~l({Lvv)5fng$ONK%*8k=3VJbtn6ZD*WV9bq9$Jrv+is>B>X3V? zeGfhvZwx1l-7U;JSTa9k#x-iz`QunPssUN|~<%`j}BrxfhD}WkG9ByUKKI?!5?n?9VH3lBgHzcTU5` z7EgyEegldg-`^0^ihA?mN;EiC@-Q7`X1BM$HI9MSZy**DVe}|f_!H3~G1zJvT?wss zf5f6-jnX2ltI@{XCdeI-r)d^zwd4IegT@cbhoj8iZRf%s?ra@Wd4kisw)3x+%u}8h zT-luOZct!8ethcg)qT{Cw2Y-*9*B)!qv#Lq@*`ZQovGx5t6@502QZMI^f>AThH=#8uw})Eq^>9dp zX1u(L+Pddy-hA2}(U3dwq~CoZaqk>MdCDZ4)wC` zEA@5X$R|+2Vxx8%BIjL3;zapz>(%JdJd+uS&2QMc{U*;wUnyk$_Cfw_TK_8!1! z4xP3L4J(~vGoJIaQFZV{MW-CC2FX5qTdgWXs5_hBOOL&(&?84}6`q$tBGwpFX^likWvgoNU~#NU^UBEHESSIBMx7tk1@-F!mDT3hK%b zGBoXD1C9L-06|oj-sr?b3Jimo?!y^TsHe3O$Eh@kVPvfr#{Y!|94x~^eFm8aM2fJ*XTGIqAmz6oINaR$kpew zm3EFV@wz_lXv(T1x1o-D1vw~B9ufuo^UI6BE8yVXH^;M0r^_)6a!BW$u1#HZ!=W$~ z*8a`Yj)BepfuO+r5^>|f>LzfR&FtzL$H~!id5$h80;U|5?bF%AR0dJaDK0h^eu-{l z;Y6iCZRnM!x%W!UCt}T#qC=mfscIer@y*_eNOCX{iP;?M-FQ|OT`7a= ztvMd3E8wFu3(jt*`!qM~_B_1JWtM4yrGi$Qp=);IUzksSUO%Z@OZRzgeR%PO%f9}M zCPU79a}m=1ArM9b<}_%UFy@b>RU14zk9aUz)ZEB)KGFZ^0Pr^xP`*({{Hj$!D`S{d zsZ2-Cfc1@mx_sG+;xQ!DvXH$V1zvZ^*!^nbSbXdlAQ}yp#oprx!Qs|A7tB z`+SyI^Yr3NfiV38DTH})Cv|L);$Vb!V73Wu`ZOb)P6t|)5uED{ z-zl2-TB)NnaJgI$h%z>&LD-(h-KQlclMMk*ckmm_Ok{T)64pw#7w>B_1Qd2PW#a_Z z89*Algg;i*L%SsocjmAD<{eCBK2Y@IX{BxW4t5<(s1g!wQ5PN^nmJ#B!I z5)3ah8Cd@0WfHWt6#ihAOGqM*H+OtT+_A7cxT z3S#L?6r4m&v@Qjyi2|&x8uPh3?^ce?ZjJrE(X{%lOK|XV7XM*#w=0u>C*4;`n**v6 zC`Yki?1-VxPKa_%Jo%ga_JpA!QaH|iQ6oH9aq&`rqIEv$A&H#pw&*_gH&;nxore)}dp%^* zNx?--K&jx9=Lhr|M37iYr81?}jv9P<}HDM*N4;BoA|C)jLkz7Z>WL;=4nicwZq2 zGw_C&bhvV`UghIF6dV$J0xEoYRJcvk4jKK-m1{mCKVWGV{jK$}|=CK9l4r(q}Mg#2M(VLCX;$ zLTsc&KGkqo0tXYn#9REb`t@H7_nQ}s59x?D|6)Z?QIfClRdwg4Z~wT$m?9A6IqOD8 z#_aSu$a9A%MFhgJe`zqFsX_xH3Nf6?mGd~7Z(&}!hQpE_PoDV=JDvizkfX9LT`Qp;qL)TM2=IHUb^#kB@IecevIs;CYixJ%!`;wHAr z90jE7$v40~U!Rw@YeTVP-0BD#|qM6ECVe_P+@W*u;Fw)IKJ zDvu7trYbJsWhNPa9aP}xe9n_OWxC@zF*{%jJP z_ZR|T1|SRJ-l?7l-MM5SZcIA=6D;&&AGD~@&R~E9R^l{vK$C`Hd#(>+u%*|q|F?TM zfpJ!fzh2t7r0~7SLEH5oq<8;&KZJLwLqV(ELowc(6|)a7Mxt&!`ox6R*=2g+QQLhQ zTaJ=KMF#=CJI<4RGp>w@H5N0Yy%z!#x>lh}JsY>7-XE$O`k|BJTR>_JBxJ5VwR1z( z%_fq1&3gDNQmO59Cr;SABw#K6$XnBjUvSJi7H;95rA0I~n5bIs2j=R*qhkV9k|8=(~HB&y9vO zYuHGy)Jt|Pi)NiwKgb>NK8V>B*S^TavN-VGRFi`b|FR<{`4K99K&khQdx z<3cO%i<@3LTb}@NTtD`V(OMu+VwUX~-Aw7Mx}uA}=d3=mY^Pd2eSN^YR@U zsoG7neepSp5b6(J_&pbo^gh~L&gp+Ayp{-4dXY$U?Ey33rH_A6Jn-{VlZt@L8~5G9 zmc;7V%bj@+Pgi@(&u;S!6zWMQ0gA3o`z?VQxl4hfGDv4s9&RtEVV$}3Jf~JB|JF#y z={b<>$ST6B$`3Ghsc}DzFlUE5f_BhXDO)u2NQ6qHGgBL^S!k#4z7XJPdD=G~@D~~_ z#u@rxCKO=F$bGz6w72baTJuyY=iEN9ncxL^!|FqEXrh?)fsSxHgB0Wt&?0=Muef8; zi|pIUE=!PB515M7ylaN8Ta)gjbDz{m{=gcFj#fyZdkiUT(K@1Xx$B9y$ zUGj>TCH8-UBaZdvRS9RF-V}p&eUI?d{L}+Uy1WjC%v6462+q1-1?lcbFw9AubX>GT zn_}Z*&aN=#>v|8wnx%O!qtTaFyLz3%r}-IuJ|ZA#t-VQgM&}SRxF>%i5l>^a$;M`r zRv*2oKwg0m{iF_jaaXTn(||@y0G5317ob9TEDC@2MBS3EDwnJ#_tGdc0C#q$JAh#Y6ACzWAg$+`(0m*FX=@2Ivg>aeqpr z2daJI|NYhe|J-WK^7$1DsSO~dtBGzD_o%B;eQ!@T<3rq*q>Awz7w!c zFH5#0cQRT4EXXuN@7MLkkTvu7E=H)~!CwjW3?~f;gtDmz_~rBZyNwz6ey^@}n?{bF z1MS?94fuCdHL4SfT}{xf;SpLp&$S;Z`{%u!eq948ehJdVqDFr=;x;IaYlD8TJER&A zz=qy!5a?j&Jj_mC*|U59xtBH2{FM}o{Cl6F2>w^@S{cRyR9EZt{Vlga4*P&8CM6sJ z^oJO@ftN?tmLBk6wPDe}$g3z}x1Vs zvQ8dNE>?W*K{IIFSNAbyjs^5BsUJrw&ED0j({zljW7JkIC5z}#LgLD36`-F_)2~I( z97G(qO09;J3A5!q zP${eFk6r;nludG?_2xM;q=CxIbA)aCkp*RGhh0#*Q!$TsOE& z3y7>FSz;OKy?^3ABq69&s9l4u7J5Wh{~ug{tv6NfG(zo0{H1H@AKvoC9dW+`yN-P` zHjl`3|~EH z9K40L^F$$Jar}H-Lb(W`qYgH<#n||lFS319I$3y#L7z#o`0rkho16wR2%^dh_xU*x zw{iW*8PA`EByYS0eAgo}IqG_e^lUmrMC^GK1ueC{A(b;rydytnJtZzkx^q;tzavGo`b^?c^r~8TD8DA=cSR33Sfm`^mylPPV|Igw4-*{_Urc$J$8L*sg=)mrt*+ z+g1V7NZVSc$C*zuVprQDNbC#b^ZTL1T6Ol#yrt)WgEfnKIjQ>$g>#yc)^KI@VANYl z#tu%4PYM>j%I!!gc;>zNGkG3jC z5ZFC)?ZksiIe~#goO)pf6%j6@rX^l}V-p2%s;j;b<*_UnlXTGFhScUXr`gPsW@J4k)dn-;2Z$(gukd9=9nnEG_4JFshcEQ>Q*WqDDKX0PtV5M!Ii# zUp&zA6Ln2A*3FCu9``93bAyRnkpHhnNtbeH)YfN(akedkTVm-`G*u^;!ZcN?4COl6 zFdT;QBt5eYgInB!Z~l$RIDifh?gCwPU9M5@9r2kG%dRc$$y^x0y6&_~tP^{ODFiF9 z;k@kgmK^fIgvKplUEh&tJWR*SNpH-Td+7;G)cFm4#=im0$oVmV`YvP?-Iu_Q_nkJm z&D`dZIynjg@{`I&1rhpq&xus6!WlOI+ST1Pq;}m}qetV8Z|oY^wCe&DOydpUjX-IJ zyp-4t{zDRaZscw#6AYC^MHGMpP*3ygs|6Wosw4p8jaNDV5OKp=b~P+H`4*r*>+IO` z-3tkfGIp0nm}NOagZJSWvauRI+x5sb@jQuZ7C_!zi_1nH10*a4un4_QsaxmQ zkSmjoN5|269ZC=9J1yQ{UtEMj=tvrmW*I`C_>)Td>_y;RV^N;D20{oqn+5A#Z)`dy zN2Q?TC@{cX7(sE;|Si~{1?;65At z=yc9Ce$2{hV#lc&;Fd`TIUr^Y)VJu|#NK}ZQl$K6Bus59>K90)QE#OYp)&AwAO?*c=~WCo8UR`{>LZn%sTg@kG#g{n8`YmQhI)ou zC+(W<2d9KU-6jP$($rP>9eRvm^aQf(tG!JN7&y2_YWl3nGxx3xS*EJjW+WjR>9p9z zbPhzV)N`b)P{D?EjluZp%(98YcLq?Jj6;JLIQVr?cHP~32l@b332!!m9W9vm!c^)C zBfBju?9N3;a7ngfZG|4LzN7p0(*mUf2in?Rr~5!tiSgp15&%Xnj^usL68RyJ5N;?u z&3UPsdH%ZNE7O&eQ~3`-)bQ=SUG$%MN^6JlWh?*-rt;RWbq`NFi2O)Ni2EKRQtQ*t z^QhSh_|mqVY?_q$MtEk5 z&@W(86=%Zla{|?R^gLf1dH#N=`bRFd*5UVhN+f*iU|ecS@w3bk5cFQD-l&I9GkgHR zP4*A30UKG$wW?pq!e^p)J@i+V&?=THH9_i%mg|-0~f4miago1R0wfc7!?C zKOV@oTm*`LS2M?>c>w&2EkaGyemC$`X}&~5?z$HPZ4vA;vlh^dYWrw?a(+9VFfaFt zbPx17VsW*u)pI#l@?hB$0Bj6~#+iG^w>>YXB4diVvAYvFqT9!(U402^wE#@R-1$6L zX?@1gT4{4$-1@z7KicpNJ~0;+r0_h&3p*kYP&uU1RK|aKPx*L!+^AOyQs_n5_syJ* z%h4@G9(HPTb(~V$xbN&#<@Q(s)s4QobDEqtqJ6fEBotO?1r%cOQ#O}}qzw zDbN@(tC$)rczgvkB85w#t~T*40d+uQVNT)&IYlAOU_eH2s<(YVVF{NHfD$7Rh7#5e zve9fO6R8r;D}W_qufm{ijlM~oYxj3k-KX+cm5X8Mn2UA4*lSGFF}i==MgY-@yXv)O zJ;I$9=bBB#@C~z^Ik9f=hHX{9bYqqf$GjjxV%tPB^?Eg<8ga*!@M!* zNVxSlU|Sv&!=EI8-tkw!VI})D^dsFnhgPgl>yl2${2De4l;z}r1WhamfP|1dUf+Kj zc`di}QppZABt=BrXdOxa(;2z}AE2BQBQE}b1c&!*;&@17xxW0+Ur8aBWughJp|0cG zv(Pod*X1Le6hY!q6yj4+w}9rgOAgt;@+M+4>Yc(V-R%^C-|nqni6B&rTpWZ!iI`?% z5U4)1pKQ-gWqs-6N9!608(Wf~SfqtX@1xT^-?w)~g|x~o$7?lGr5e}1<<_}^KXXyW+@wsm0%Eq+ym80(_B-9 zzwk1iZ{GsaD2a)2;Bag1q$2}AogBC;kCMo zIb4LEFTTIN^s%boy^(;+MbbgdmC)Rblq3qMRA0d+Ifpev zfE=o!pJ5O21o!lcm_q%~FMEJOO?xkZ`5LoGv*55i8>WyRb@%d!uNc>fQuZrD z(o0u|a_(b5PGQ$@ZGklV6Tsj-XdFYFcLA3Hs_Xzf1z@QSSAj#o*$u#!LEW-XrqNK{ z%U`IdKdZ{Fvlk}+oNc-q>S&gDfqUFL1S|(Z=oNzla#l*^nm5qYsc{=iS#K?YqsO3^ zMs~*NcU}cn_5cN1+EGQ)Ly4W941C9L0mFDc;d6Zyxc%p8QXbY0%E{TNcou|Atjv8~O+|$n@u*npr-8?1pn~atBBc zNO7Zi>bj__vz0BQ6qbMC|M%o>P1(nbV(~Lln`Mg}c{W8W#cpzC+9-r@nnz5mBXpUuQ z#=3zP=7#_ML)@XZFime0iY1H%I z^eN%I+S=j(`ioNMyHvwaFwafWp*6@awKJ89N`q0wQU?B znmp_GKO*M)aufaf?NAYCmnbOm?25;JxFOHAlgR^+4Z^z7N1h#9 zoByK%%w$Ucu}iZ6r$!}aoQN*Y`~_{Z^G=>_jXkwKH_!dDUD5;?z_A0+&90{H^l>e(;v934BAcHU)%L+jJq?rSn!fcE(RK6&szY(%5)Q4Wki?dDbgUFR0M z04@_v!N02cwRex=hmpB5Hz>iZjm6J(7+mx@fK%iRrWJ$u_f-l8S z)$Iah(O}?0X|XHOv(SY13TnC6aR7WZvw1Y6tx6@Yz}s}V(QO425p5C4@G&{nPn?te zr;KITYk8kFP9c;?`~jCG@txH^)4-SL6|HyjTwS73``X{0emyV9M`5itc9l# ziD+MCF7(gl;S7Sr`5{eRZ#w_x(b`{IYQcnE)qLfs8H({6NK)(z5EXKt-{NWVtgL)O zny9Y((3vICnUesB2Wd`taNSVRZe#uO^aE4(v~t#3lMiG0j@Mn-5RZwwpwIncr=o5U zGA$(qy^1Q2mY#B>_lhnFtIBUx6#2FcXn?x|g*}gd=?u|GN9|GZE#RKnPK-dR08;v2 zom5FzzP5Ihra9Up@}_vWW}Y~A_wVqBe@|Tl24B)p?p38cj{x3tJWKmotj{D_Nk+@BN|64J-_VAMf`68UHMv!}`+%3E-D>R$+2ZQK}M6@+2^ z1-E0YwGJ%PtCS`GYPvIEV;0Ar7a!<4X5{DcOVUTgy)$QsSvOY(4htkL!pyu1x|FQ- z-a=6#n}7SE2hH#+1Fug7_D-b}g2vG$8A#Eg{DdR!Eav(y1CnIbHObeh|Kxy+5#1B# zPe`oSywyM;{l@;}0Pfr=8@0&fW&}6ouyQoUX_)Im6R^x(u~Q}w2$>(|Y2l2nZAD%; zK}VHdL6KRNRh{TPltqbSvLU46q-U~`{9m`b!P7B9fnJvHpJ+4w_+zWluL8AOf zTtw$zo(`~eKweM(e-56>HM|dC=RK(KuFY~J5(@k6N&CKJ`U*UMF$sQqcR1;!}$doo)0rA+;PK{Nhr z5C_mfvAp&zj>wdwRJ1Ph1zX*Zcd@nVX}1@jh=Uk@<`{J8X5z9MTqygJ1b;?nG;8ar zLg?zf-@G|W@1$|Joht)y(iL+(I!^b$d9bUK1X@^^sapNoBsblr0B!Vos?}_IWK2v7 zJE8WU&A*ZaG8mTeffB-!DK(cufDvTnS}mHWMlTn zPQ@$WXb)1(Vj5tN#~51p~jiMg)=Wpb>aXot*xvV`k7=w3Er02F4Gyc(;*&d>Zijx zyR`cocLTU}mCM4wxJKO9v85ofOdnKbf$Jsj+F5$Pmt12(jfQzvLd6JY0;{C1?&doI zLkSj?g~lnvej!RXIm)iPJ5Ob+$kVDMAt@%tL=rw*WAw3Z>_<$L9e^3>>n!XCm`5nO zXcJ>1J=VCm8m!cGor@x4W1oe_iL)4}{-mPgxbp4Fo>8+f@7wvHrL2%xlQkM|k;L2R z?K9KZ;JTUj)8X|~v9H(I<=2E5?a|AXj|r^BNk8r0xA!QGvGrWleIgX7I~CfcTyGS? zo0t8Vt@DFEaMI;Xd(cZSLi*4rVB@~E$k*2aVBK(W$`A_z*AE%3aZ$$c{LiXNJL4N> z@J^H;42~=)2!+$ener86Q{gbZ=B0eLy%6{EMSHZ3g5!fg8rB3Q1$P(T>hZtLA(qd~ zm|lBV3rfw@S50#HvlkJ?BpoR+F7>>vdCEo`M8isLswa%jrvlUS90S09PPlTnL;Q&P zJN}M($`v)c=anU^CwvexFup9lpYFBC>DDfLSK0BOiex873NSs#ajfPYv#%~6a}q|> z{#112BFxdkO1n+r;&;V(-s~Ct%n0_DAa`YSh@_3v(4pWgxc826iyUk-tD{$0!CL=r z{ubt^>a)938U{3NqrL4ZN1j<5W#LS7=#m{#r z`laq%=VJWVV>x=gipc!XLET2f;_fDzZv;5=E-aJ8bq`~%SW<4Y%ozt9Pjs?~eGQ4= z_iXPz_|=j*S0?krpgSl1io9mWrDRfD(52GMM$!aOcMT0ZbiG)o8Sq3ypGig$Ya5sH zS;mH+XjAvcW0sWQ+8;^@tg|T&+bY&Inu&dzrQQHGm*b$#QE=}~5Y`adwnI>}5%W1k zcd|19;}7fidWR2a-Q6#`5Lc5y_aXMyx#gGRNmZ zhp9$2Wy6GRL2(fwWZa*G;V?%`i7Tst^tUlTFy_f{iu*-Z2jVc)a}S6;yJu@aN2-~5 zE}?!8a6Q@4E$d^wI{B;H&b{Rsh}KRoI~BK);%TJ@>nMt^;NW+$fJZuLpAL;$@eSSl zYi`}cOg#T*D5R=1GXATAC8RWK$Y5h_7HE%)K8*RJakysPqY{JHQ}89VC?7vS@6m8- zer~t2uW}F>Ja(LUqPj8fxzvo6kl>Z-K(tMQXg{Pf)2#PV4I;Gh-PTXl;+UB~1Jx0< zag}y@$D!d6z#vm^HMAGTXyTd>60JvFrgWR!3}kt; zSXdt9Mt(Z(sv=+lHl2^jw!Nb#GB)~o=!-nqm(EVe(Se0ABi*R@!l7U^p;pX1pD>4a zG@zHNv5_hU)n!(5Kh!c+AC8KrBZNi|%ttzsg-)+;tyBI?zwMX`Kca2wmDVC_kOLy$ zV^N>Sj*Wj(Q$MOhnEdhODz)asg)B`K=5L)yI1@xl9OD2bIk_6;{?ukDP7^uqiK9QW z$w)D+->Yu>Bc=PF+kgs}{6*p@u=wH`!wM&#L!fX~I{NR5GZ;yNd=CJU$! z2F38Ko5tY$sh(hvE_~Mw96K)XUk=Lrq@L+SPfyPUs~glJzIWO0UZCduhAJDOqpKrDH3=s0Ld-Xi%`TbDxdZQ=uH5R z$i7b9nI6D;DogAy_n>9-rQO|**xfZ@z&z-=F)dg806YzEhM&&Q>mSZbHF+PN{7`A0 z+@DFEk29*d+=ylgpRsK00YEEzZ|$R_4-;?6`n*7(+if@h7eI7-6@^ij+?P6pdhAAM zLrEIW^-kZN@2jKD&7T5f6TvK>-6Mjl45>^lO;uqhH6+ld|A1YafqHuG4B|`xyoa)i zvo?OIra4mqc)iU8a$Zl$O1_zNaXn;Hjjf7TQab7ugh3H&;W5systu!;vX_51OG`D%>#J#PQ~TMhYO*IdO4pf zLucRj?D~cq%1$h8n(=~l4glY!9Zvy9oq9IVm;rEOF{2+Q?lHX>CJ!R{LjgY8i9YYY z>;ne_wA0gONw58$#id*XY+H2U_--Z_<#PRjlL0sw*jvG>If`t-wQWjdEPBmSg-{=Pg8x;tUW=j>ptT=L~;VqS;FK$_xM)-nM<@CgD@ zIr~hE#4hUgXAh-s}3&{OQLWmg<{_0`1+w=G`mo);{wAdQM!BgSl?s#P4E7U&4B?6$$S&eR0&K zQlZ^{h1Cb%575xdK1OQxP!m2npNl3AqCo!E>ZHQu)T@akK=P-+1c2P{?{;;?L5y)@ zTx{8A(w0j(X3Edu0My5LaXz!~-gN!fZ0K{9$E4(7fVXV#{oeUfqpH>Je5l4ewE|G_ zOMOlN`|`XWV>j=035+=TlcK%K-A|jNfEJCTm*Qf?d4E`H*xk<&PlS8VPvmY`;`!`P zBm@^`pvefB?D{O=1=dMzG^2K9PH=%%nEBb9`=`Y_|A+loiT{tn^C!?A)H-!;>IIll fwr2A!!`FB}tn;OXjinWVGoZJ!%CC#TMqmCf<*LW~ literal 0 HcmV?d00001 diff --git a/man/figures/README-mtcars-scatter-acdc-1.png b/man/figures/README-mtcars-scatter-acdc-1.png new file mode 100644 index 0000000000000000000000000000000000000000..25f332c08d2fc066c23b6164f50d0687311bb6ec GIT binary patch literal 26109 zcmd?RbySq!_b)zxN=Yasg5UrOlF}U#BGTQAfP{1oT}nu+ba!`miGXx>$I#u)J-pwa z@B01L{qx4UcdhFh*Z9m6=bXLw+40)1M}IjPaV(7I7!U{qOX7p50tAAb4E_qCA%kCL zpNrsvFLbL9>b4LFcI*9Lqz=pM&k)E z)wg_DKmTlC>gHiZ;E8#TZE*?GTR;B)zx=pFakSaF3Nhd;d(!{?e_PRebUqIe@%9#B`zGIeu|8yfKtiz3M^b_+_VX#~2y1udag)>Sk4ed@JL;;}uvaPqY=@088^dT&cvs`j zP$7)bth?wy}8Q!@5LiKwGuotaoD|ZLik*a7= z;lzdJFiqYYvLjQ>CV|tNgI|g#zK?vkUQ$xnk9khN|AVzL!}RwRlbPg+ukW6W`9zdQ zaec|x?#1^szx_I}Z%xOvp@$2*8V?}lL(?d8Ddj1yyRoQwacsw-V)n20b~NP&)h0ii z+#-H+I46&p+}$_5bVjFYUbegztd-NwT_GfzJ4=ES%mVJS>v_zEMl4Jx~ zh3|A;EoaQ@R88a`hZ5y7G0mN-$c&0P)Um5ehnk&F*K}bXhep(Ho)~fL^i4O}jMZ6t zF?;{Wc@wtY6zwyWDr_$Ql_#XIT=CTHA?n7s;^qAI=O<0DnTx4PkLhiW%Z~W2z`JYn zjR^rtVz{H2=Jmp5))p342sHTp?8f2tFk-Ufqs*<#R9;9>(`m@Ff@ZkAUV+Jpz3laQ zy$VbmZIEr;_o4R?3hesiBrL;-)F5_s>P3x;i}`*9*9i1{K_U0$X3l=5skF&VF;;U!xK+33_TiAPPb^eg$fSh%FKBL;tQW(|Bc zM!Mj&po-0*om1t&Tg?9qOl%Ia*vV4=cR3 zM)Sih<-BVyBC4#)H7Z4(9<8ZxE``5GA5V`A?r zFOuwPk7};-*L#@JDZO2xP*KaVrsJ)xM}Z}Qfe=r)F3zoNe~`;@k-EbZ;n%O`&nNB@ z(@-CEe;w<&q56>G z;nsOvVH@@f@qm!vAo6yERTkLQC;k=QKN4zO$e+P+_(yl^-Hrnntwlx@l*L(L4$f(v zCbd(W`3{fX8{!Jn+K=KCy5#;+&ok;O+|6p_xOgZYEtZ!m6PYOUcvplx+Pn>cVWyfj zZt_v>P;*#^0Q1ip9n(S0^*p16L;BTM-7`MELw82M;m;=Sh%?SpA~Fi^eC`ss^XBIc zmkrXWy@MmlybT;W{ipBg<4U}58})Buq%HSuJ#h~agL|17GOM^U;~wuAoa{6&nO!j5 zK1ux{DyTksamgyGBi+&<$Y)p?YZ`0nQCEEv5=5-64txWq%f70F&(I{wUNS7p=M}H7 ztZV{4l_H*SHED=Gbz|qq2pqdV*h3hK0i=kwHYktt05(m@tz{SFZk>M4b+eS|zPv$7 z;Vnu_u}gkAF2i;`GU2z;^w;|bs)nn+bNR|jMIZGr6A)?!7Q!1hK+fe5X8}aE(**;XPW3 zqS7=9&aTZZ83V^wOKRHjk2+Q(o<75B+vWm_#_zZa3NQ@~*!$XLqLE+XRj)djPbE6> zNX5~fe!HTN-5(j!ysd%HMO9@;?<`S3lC{y!^HRf~gfwO8dHrGLd-r0`k)eiT=D@xP zC8=BX%R!0IU%YgktCH%%mUzJ^!*f)J0%qFjy)8tGe<#O@l?TD-AGR zK4{~8wA(W)iN+0c@}GEeg8CSfH{4shnL0 zC6uCMBe`6n@DofQxL|Dg3Kyb4n{i(MsN!r%v`l@Tq3I=RsD-5WkJq-WH(v$N7Dcmw zyWaWju&-)ec-Otvyx+&b6V_)~RY4EGE{Q}3Q5bvi`vt`%lVRFHZG5&xu65P4vk1Q! z&1F1$?6T&!NRJ}wv!;!P8#;6Nv`?-iL9lY&QPFLioqKbb2$zDFcS!uBv_eGo)GCkf z3mfj4tabrDkH6d6PFL9YWZcT|v7aGW?d?$>SL6Mde_|BPMHOCf)tE-nfi@ zX}@T;9-nyQN-LV@Ep4vml_>-e6ujr|v(F;txuq9=RxfTHh<1Hkc=oGkXRwlL3B3+M zw6ZX0?w=@;CNW;A%xhqI;$JiTuM=%_Q8QENK*-+jxi#8C9S8iPkPO%#Z5Qj@ZL{t# zp!1{LbLd|?u2=<=w>AIb=G5){nr^@;&!S+o zGHLqh*TO`8@g#+{flp>Vg@03ES=zkl-vrR(Ev85GILED}>h9H6PTMs&L112@^fKkH zY|Fg`HhBvuQr1#3gkVc8xID^To8_dej_mH>LVC@8<3D@S;wWjhn|=KB zc@xj2xzqA!(@98^dfKwzFw^NO`T5Nf_T`EH(C~cHC5)QzZ0SL>l~3n zTeNmkRD3HIWy&%*|c~Eb7|e z=3ebF8LUa%6=Lj8qeD!={khQM{Z`*X7eo>OB1$@ z?eLq)B%Pk1o(1a~qi)+C4$QE*M`BptRo)Yr1foGb=CAv6a>7z0epd8O%@;o0Z~hxp zsoGVe<+Za}Si!?@-_^dI#H6zJR2Zb-hCmcQyY_!iQFIVP&Tta8xQGipj0K;-MEB~N z4zJ=|u3jwIIJz93amH!6`tKg{Gd|WPowI z#UT`AJ6cKdy@of7smmdPGd}~qXH;De%i~cgGQ}MJ(sxLg(+pQt6hgDsI*~+!rr#(c zY1BZirQVC0q{&w`E&Nz!vMFadJbA-ZnTvn;058na>iQYUv)N6vBlyG4k-OMS7B`jf zgjAV`1b!WxDYLQ}-p?}AdnwaPwikCX2Rv>fu!gqc#U5FZq?cU&nTlQ25dPpzv0c&0 zR37WyiLsqMYN4JdocL)n=vByvJk}AA4B4e$#lLd^MTdZR$#*6VE?2Ufsn6^;&bn9q zYaX0xLH!{fL3Tl%E~NMo2iM-z8@2~*((GG(W>fGlL^rw!-$s2h;+p1z!n#9Dlg{Dk zUs_ZyYhxK9l6xOFyBU?VQ-}G5s60%kOc_EEb{6+?df3Ci2 zIWYNcSBu{vW4Z9893-4>)@O$x$3qsi$q{0qGF<3Vze|YbYmpx~9I>GO<9Yy&-9C?e zooF_O%HopY@^G4taoVbuUkya%Fr5C#q?-S;|04K1NvZR0SKMW=>UWesuJVSTFQPn&r`X;nJ&4b)qN%Y*NNx0OxL;tDa#bW`i?ezWYBr>8VH%X?R7 zW%{r(u%Mz#YkXe6f6>Q0huX3b()e(`#ic(sY^#yC#;YIU_xBqtrrP*J&uEeM9SxsU z({~jydl&3clIJR9wU>^C<@>j{XKTMADyDdybTtpJdI_52aQEj}X-t|Os5#Yk#sb>A z!~~mIcyztLQ_~OVbQW^S5=lvKRBpMw5$3Pn{lW~hOS!aJuGk8Fakg|qJ*Sn|5Jps) zF;`ZD?1+av=VGzWySkcA0@s=oK^u&TB^|dL9BNfu#k!SrU3UG@4_Pv;JoH@>S53^Otc0Y4?Vdx%ZPOqKA#|&^b>?I9c6l zm%Yem^@Ki8{Y+g}sbg1o!klp@ZHwBw1h=XZfUWiZyRJ?CI6BYq1uEWuV5067@O6!g zOa`C~9Owdokp5>5PP{#{j(LJpaw2y)c$8qaVv3Qi7C63!40Twbmgv9jf@5wM`E3qu zKQc$J<1cP}ipKFs7!CT$2{riA8Se7Q?bVOO5@w+~HTPeJBIXC3H?Zhn>F`-vEVRz& zRdR)ojjA##w>k1gO$=*L>w;$=p+OB5S*IC_o5=E2!kP_rt5C;Okz3k@(4c?x#uUR7 zX35lG=;=mgj|UhdQEsmfPGZtlb42jaQ$8Nz7?Iz?S60?0%+c?cUhMi^hejnEoP&B> z>0O4DM`LZDqCg-E^?)DpWs(ONc%YSCGgMCSQ)Or@0zU(3*No95dqUT#(dRM`V zn18k_AAn&{)o!tGXMU11CS2y^q%4h)!$!Ygl;U`FSO|ifZ@mznMZ+sbLD!}Ros;VV zl#fC^vei|4|8w$&chb7%dMY5WWwFy+j-zsq`rnz~V(U;~@|2vFWwz%g@2{|;s-k97 zOz!xh*G*1X9hB!}2FStX<)SIL!>E6j%;MjpSrY<*?mcb*gzk4xe!)pyEU#4}_x%phNrLcDrN zelsoMrLO6=n6Nf{w?}Ev^|HwReuyVy$O5L@$R(mN>~JJatheHm+oM~Jsc4JUxji?Z zCB~-bt$nJ)$srK6c8zAbZ%d?idyCIyUlbeXYGv|5|0pS{*VrnqFqHAn;Xxptiun(( zZ@5Ow)k%kc>OD<5?c#5HUWA{BZ zzt*`bvzTLxZv+#lQiOiKvrlhKv**!e#pJ|ic9O}RtQVx%Fv5i~{OUa{2&6a!v9+Lo z6@0rK#o4OIf-a^U8NVCG@pIOF>eb`GazZUVHTvL>3;T{_I{@Nseiez*XgNid!Si0x z-OGv_MSQ*pTk>;N61;P`^f(Abhu<+?JPu6s(^rHiwf6(@bnq#j^pEKF;Xh~2q5puXg3=z?}wJ2f*? zWAKZjVQ~60BEO(b|Nd?yi02%*GnUW%2N#EzL81WBeAYG(bdnlr592zyFAF7L&~#&S|~_aW`s&N{f! z@%dF~;0eL6?-O2T5XSBzD)T;{o+WKmd*}GM@jvXjs>v+?%YLXrvw^i4t&hS2N^fU9;3lT>z6ZM7B zwMI?)N3tgl+Bm+ESjE3B%1Y-@wzgUf*};YX_)uK4$KJTYW*nGX{Kaz+=pT!+seD5+ z*k22h0m8;_|MUeKoN*F6@b(>%qYPZVCJf8aycL+rN33z4T5^2Krsq(Joa%k;rNAKj zVHKkdRAZt2yB}Zbz;MhD&M6v&X7V_E;kx=Sy}|usE}t5ZgwdipI(A+9NAgg}G*ZmQ za``p8Jg!>g)Q4;w|Nix7b`WS*Q3bmg9nG=2Ybd#4e=e|gW_yg1CY8Hf+t#?wZs;>h zcyJ%kvD-N|8F1c)BS}|h!#nA`(3PoI$d~4td3WctaoR`_p)BZv7p^eIczqF5r-OQA z-JyM0=5Nd!2tI~7HH!{xp)jy>r4%sxcI z5#=|2e55C4^BPuoti=iz#sHqEL@Z)(An`abEpvW(&=A<6=1VYDY|evQF)561e)H+T z{|)beiH`rXgcUc%E5RGzqv!9;%$oe}`g#AehQ-|E6wc3#7c4KC3ua47%E-cJ;k-99 zYM`}qvCqbR9>$k)=cy`a-qQSMlqG&P|smg-}bl1VNm9QJ*Dd>rPS)=Km{NJVG@E*JgCcbo2R)yoVUE;sWK2!z!8cb1v_ zHBD)DSuqu(+?IlQ-Tem|l0dzEQOI*<988*(J$fbOq}3L)wG5h-e3$EK-H{B-2aZMc zhXIpjaBd7|hP=i%cXAbiUr#7%qH@?#D{*J%h#KBwoUMr$Ve$wv;CBJ?;7`UlhDu8#6!shT+jWf6OFlx zi;Lxo#*GXOhXe!KmeSMHZP)s^$sabT?+niN1e(sgc?4OPccom|+T4s}g54eu%hKTo zM7CCFFhHrexF(oI3slBOM!3Koga&2oL~G1NmW;LAHNZCcx={O4vuHMF9p+!~!p&4v zA_tAlxVt{HJQ03??4|!*jwZdy*ny?%ouYe6<>9aHM?t;zDtR?2mD#3yX_EAY4MH>q zB}l>_wC!)(!r~@&QUbSH3OTElEerF$oJ7Vwr@cV7R_>gXIUBH_cxIemnniw~ z>J#Vo7R>~oYBM3t2qTtFils;PJ8pIoWiphQXu9_k=_@(8DKjjc79ko(F(@O`s)=`M zkRuq`WQc-sGycp$5xKOh^($;`7t(j*$B&`3!&z{ z$+E2U^v`4Y>LF0cNP3BnA2lk?h}|COh+1@afLll$q5MwiHRl977rX*4SUoYoGTP^ zf`WpyDom7xgqo|Zm+y^;-ll6dBd$qT;SGjA+6&I!VcYUX<2w6+zdkb1DN`5dp#!O2qd8&#dav zzdJs!QxC7C3>)I!$!Vc{pD0YW@n?lj}c-Zu1Lq)#0|cD{8;|DUn%qPD#in|vxmSQ(9U(bYNta_ z|BDNtrmO*kG!^Di{+tm5BQTMf={j>7-LLhd{%p6Ld&Z~Us}rM8ElxYuClCEPW*T3b zUE4)oB187MNK^NMpZ6v4owbLV4=3R2NNCkM^83_txANhf6Q5q8+xEn8Xik6z4T^zpZaTGGHap;{%7uCn)(&r?7 zatkYRy-T@I>GoN`^ZE`B>Dh(y66Cw$Y;f>oE!wT3??`P}?vMrG3y|}+1 zcf3Z~@{7f>95tDNIegDtBhK~E92vspwYA_vQMCp!1zbdmd`=>Fui%WS_1E=U2;B=#T|U+Yw?KbdwfCF^psB$ctS2X>m9ZuP(5zv;iy$aIked&+jsz4Bn`%WC&d?ZTo( zeQ)!-G;Y4cwOAy`r-#UMRWT-ceT}Db;=Bk$^AiL?pd^PI;u%G-3>q=_&&3{nOV~nb zyP9(3)doqQ={iTxl!DHlC<4p# z{L^)dj!^WYBmzINx_GDG^+r@b4;Z@(^KYUhY~oDv0><2yO7lrhwD)o3KX`YS{_$aA zc?0Z?8_khirNYH_I6_j27PIMYz&fYurBK9a=vn%pTl`2zzdOCn;Vh$(DToypgDo|i zg6>DFotwhSa#KfpA1U+_MviOFEOj}1_V45IoHv*l0q<=`@lblsK;rcgA?MP-U!*|6 zzy{kCIpUFAg%}>k=B57B%=y;Ol_!%sd>w7-H#KP%qYgi*SQw8^m{Kk4igqLpy-?mi z*1EL+^GAJd8x_(VXGPdh#4@U~Avs%ZDm^<%*+OXnzy6CSp=SZZb=zvFt+#E@Rme+G zPsheukAf;ygt$@%jqc8px6fV{E=zp2cHqZ%>G;~-Z4^9;fTz97#+Iits&%P(3GwWI z*L+2*D4pSQvNM|>+`9bc7b`($Ou|;n?kc6hY{4EQDH$y0SB6xlp1}s#A?u?^mdslW zh7H{;X(=scCS#nVjwu--&yMZmw=9YD2WrMcM?bGGX%=f}^m|c8)Uu<7NDZ}-O%+cJUjelz!F*6=h2v2Cc2R^)U^V&Xfu%nCFjAtxpH}EVx6wVP^ z=SdCfJt4(brNucFmVA*yldFsppY3kZ`|jz}(YC5)q7NFqP{)PnA^RkjB$2<()=Pya z18{!Fm=B~cBWYZw+85l+IUntTIEp69;xEPUv&4x+^ggD0GyQlu>+(AO^I9I&B6Di; z+trhB0Je|qYh`ssDZ2cw~e-(e(am;pVGKPj}*&KtUou`2JfqZ2#(u zkXzZiKr6nhz>sLy@dXD??|H5=gu(Ie<{#hv9k87|^e4PE`D^VU5aT@6B(XhmkhG)T zTule;+zpdXjkzLN_~nx2-VFPS&a#NlQMd7$e;1*=VpJPByKRai*`yD)M;1$#%Q?Lb z1HhW6ujd)6Rtk;D)J*ml+a1HSnnGW?UuY3tiF2lwLkU$c6HWb=9aZp~`ihOFy8UM&GDJqu4bC4TEqT7Z#368^?M z3x_b@d0b6<_gN|vLpJbO^^0Z2=vA+0j@V?WbW1?3B-H$EnzquC=6rQFq+MlaZbr!p zdeeq*t@-^=xh4tfxfu`@euUX&u@fP5v~FdE<>$Tt$PMV@8wpKb#-~w_7$uGs(s9zc z#SM2*Hc_HET75emLDE-#)4FsxKki&k3{V45o>^q`y8UpnR=jnR)K9o~e-LWi{RQ91 ztX`K?Q1{njB9qO0;*8_d07%B{!>CR#67SrXXPYSB_(#wo=X3$3MA}oT8dm8wB>~-t zH^^yMnX(umAFKsBi%b*$K0o^;I+F|==ljWR;;xjW+Y?poHhXl#lGR2%KQKDx@@%{1 z8wvgmYYY)4%C}dGgNde(AlIR@hWw>BH{C{+-eN|N$?iU_W?u-GT>lNhk;Dvn8!w{Q z9`4!vA(Uf-t{4@^0_{0mf3d2Yn9wgM{sY(f19XVRU;Zme?cNAx#k(iTwaAwRqtd2^W1{V|1y&7__0K5ujXmb%?mgPM93 zVwKKYaF;xt`qbB^y8ftxQ;9IC@gU?C;3+^k@|>6r?YRaQZr{Bvs70PSIx|~L3wwrhfJtbs)Y4A6}wefEm-CqD&Tgm=O zSI3&{hz+n!h&pjufA!9@ib$SZZvuEKk0`PIc&}HpxJYF{ z4PdBPrvD4iMUa{JIcl)>%g7wsK$#blx3~NLvV(z?-YaWncg%CWJyk= z2C~`Q6nk@SV22Nv!do2d?mliHlfHZSo+hu&?s6oDXqWr;_ytea2BVT+X2X6X?QAfs z7TA_h!?HwN3fxW}S~NMa+^`|7Ocacu8j#QsH~>xH#rh#m4s zBSA$q6ULJnh~Jtt(sJn#<8vBsBllG>;gOgGvLT3A#OF!y6R9xKcH#uM=?#V6^(Ap4 zf+R?Z2@{@>@%|mql9Y%0)5}pPqWZkTsypzH{_}IT^l9yr(}fmx5rfXQyT(s6bm<-| zc5<&VuyKf;Y)8sn_M?d*>koc@kU?W6iHjc*r4Ffew9%g`Zi>bVu28OdBeH9!K#zrH zUB7zZ1Fws~P0eFkK6rqXi{@M{nn@@balG}&{0($vVXvE1adL;lUux%EJ`*hs_Q3ZT zJ-Cmna!bENl$bQ;DIxz$zOi829}Or-IE)};Tf05+u8~32@>om*SQ zq*}E8mitjg6+ap|;SnN`Kr=8N>p~V@zx#NIt)j&} z2!CxK`xTR#^HDa%Ri-qlz`;g&iUZgx#p=BY>m9bhe+qON(y5)y+gb{IVO@_I;nd+t z<3I7sszZj{jd8k_QoOxf*xS<*I10?Xb`=}+PvaG&Z?e&A&UQIRM%Tt0c2EK(bf#}t zws&9r7T&WdYMT7{m~VNTrWp1oh^)KwSlrF2?8eQ3KijSI%25fdY^F!Hm58M2u|uvV z6xd5fzNVwYm?W&;sZ8I1u3u#V&Bh(KZa7{d#{-SmMRSEyWo-o#Y^asFW$n({KL@In02M0ZEE`pSA?Q`U0yu~~8$VxxemkC!5?^LYZQTDq*+l$_`miX}|fpugn=C zJ2*MuP#!Nw z{SS5v-4CC0Iit30U6*lhx+3Us$OW#ikNTT#PN#!|g9C|};I547RTi_644Pza$Abpl zkq3_Tsya?>W*l{-5Bua!m#~uT^>}PW7!1nnT|ldiEl?e%?z*|10yaU{#q5UHxoGp2 zUF~e0!@SF0!^XyjwY4=S5o5g#;-iHHBS1jQ%x9{t`{KD%kl6IGiFta!XDOA1va>&D}tB=ccRlKz}VCTa*E>d^Q zgC+a&ssCiXGWiyr7p_9qoBiXxsaHU!`r7K>D!pgd0`J?4P_Rc!f2SqX>0$A8MIpN{ z{`SG)KOXQxL7j6u(*`sCGDMXk_W`X$jo$Tklv9r*?$uLt=$}p+zv6Wy-9Z#B#;U3W zF<2{lo!v@tonl*`GmYVp8=3JMPks_>P}%wyuE4|v`b$%rkOJ}AGpR(g3GZKX_ys|>uhXHnUW8M%3v`4F7t$BhEOq9{=HAN|qS2=}L2;WtR&?6grfT%(6X*I8U`mg*M{n z&!2fJ1sG^(&p0jOfl(=JCtz;%k#VR*a5Lf2jG*XTiIP4?BoqShg_|7Bku3CV%CyMs zsFxF9NkCfY=;)GBjJ<#VCU^8D@=u#o6snc{HfGDr%w$wA^`5H%SX2CRcf_0iM*G`@ zHR;%Z5R*U9pE>|4>>uQ;#X4z@3JmL$YQ88 zXu6omPM3hfY?pP9*y~p>Aag;Q(dW?|Kl!|UTYWcdxh{!m8oCE6a&ww~MX{5xwiC?f zEILn#`{53tlk*svOzX#c>JMpnfCSqyMqTD+fDbw5V2^m^=U`Utcqx>S8K3%{mZtu$ zS-#b>k(Hj-YiG=v=N@l57KO)|cgH$ZS)P|8n%jA#t#wW-v66z4nD0U!GVPy#4S9`9 zUM+~g1fs=!E5NoaroTpB^KdJcI)6;3WIogr;3A2L<}vbUqP@G| z4ckzfx}BaBc6@_9CB;TmB#`6scVFOLMH9ieYLavf=4uKy2O1ML|5D#K@so|doXGIj6N?-BDeCbO$%{nU_{Zc3mYQ z14nYp)8_t5;6+g~;w0_f2RE>a=b<08D6^}1 zmjr^|0~cRMwSsQy1;8HOT*IAqsU<(4t`*3^ui9{KCuwJk;#_;LYLXh>(QI!1 zxST30;vb=%eIYf9;J$OOHQDRmZNh=<6H5@c#t>0w;@GMys#vAd-~AmUPn>SNeJK35 z4~uDZ93S2&Nbbe&Xq93-+Z9X6n=r0)cTh*eMtd59IuCdqvp)oULHup`pv#H>f| zU4{+k^F)sks`2A%Zl}InY#(D-{yGsu&aA8T2(~~3Toeh+pK&0lX51#{! z<}VxXng?GH97~fNZfnk?(tN9*jIcbo)5jn95Q15mgezBA1N|f zJo>53ndy14P7St@RI?6~8?S zHP9&{;|pL-o19@n0(FzAuYV=A@PDLz9ZyWaoV#=t~nq4_5>>z>hs z+IGI*vpE!UNU{Scrxi(M4#On>>01MCMrSCKg{6(fUDhqa#>V=?=OO(-bf~bsaaWmT zjTx;~^Y?YlwK{qL(f5KX`YY&C-((<$)&*V={9OuT(Ycg+HgWsLGWEyzaw0+CMeW#X z_yo9blE~4ORhbNxameBhXFTGM@pueB-WlEXF6s?GgjhWSMYriv@jB>$^PHTR&io!) zP1WkKa&onq2(I!8PHM4s*2$ydGh7%dqH{3Mohr+y;o9r(#Jlv9u4XX1K2`|>FfG~X zK~aXL$~f7qL2iM~V;s`A!u+}#=L2!IdkIKFvPP!4Cbh+rYIe=Jc~tmqIA}y2A>kQ4 z3v{Uy76n_AoB4(68&YEkf}L`4LOH&%~>6XU5b!bk{X)Rvq!!t z5-itZUh!&{m&Ic&jNJmvsToSS?C3RTmoU^?>jqvwN(^kGhkg#u*8I2z%+CUF)J>SC zrKR~KlHal^GWBl&QXX65!8uW6tR%F`-P=RpMT;}i{?jf!W3E&6 z)pZlPs+kp@*WsiLn>J1rIt&22^y{1vT+l_=sS8QamW)d@LjvoU*!4F`0QU)m}h>`ICJ*XC)J zqJ+4=nDq*2t6Nz;ZXU^qJ=*8$N-df@{!q8E`>Fa+yw|cH4+EzL^`-RWRy5I8pX*ww zZ|Zi3L(%sDau%mkk7Y#*zM4JT-`9*Y0^kJ-2$`zKxxQ_$L6m{-?*{2L&aUCzV_``M ze@u#%;E|sGAUUI{33$)LXQ+DR!23sZBjrlK+kn*TTU|QL;e;ObP||K(EskVo()lw=1n{dthY(l5ib6VG2c@x($Db@=D1pxguPXNaGmm zerP=#tJ_-VV3!lft#2y=RrD>>T7WWRzYNHsZ45+{M&b}%`?u;c^+I-uH}CHhV$ z?~;uNfk9;(f}Kj}+w8&4jC}`#{c`w`noUP^wtt}~_Q{Uu`M*Hx7HNVynj966x9CZU^P9p_7O7#RAt}ilZ0ih2>Cs;n6G)o zmh+atB)xwubXuz9-{e&^{*}OjJt1JRCvMG?!QWh$SG=8*p1pXq-GbsssEVIVdWzes zH@Yv*H}%-FXyGGr>z)on!1Eb-uebF4+l9(}PSKoohYSi?D1^Ri(<&%5T|AVd5*sB|w z6|PxTD>xMsX>6j2$!~KAp)F!k<)1ZQI^+7I{CR4i>LOQb9aUHf@c9QMC{S-)uMe+( z=DcFz*wbvj{0KNT51*#H^n0@cHr{_n#gr?$#RfR1Gnb^kTW`wF$y&&Bb^>p?`wZ>! z$HLDrfOb}DZfyWjK?W%0l_o6(!|zTT0LokoC&+0mFW&7*`E421(dYbjwbI49hyUGJAT zTpox4D*zd4TlO2Kiv!Hp5r`%?a=;2><7qK4kZx-OJe1(eT8Q%J_U|=Fxqlg}CWm!# z?q?s_l@J$Aq-r(~+ENx}i8E*F?cce>jGFKWSr>Y|ENcf6K+1pu5$acPxJ)K#Gs3RP zXO4@dHw2I(1_ISv3CX7)HSK@sf$3N$)<^KQ=TpPbvf zl^|CnCh7=*ktn)apP9Oz-k8I|l`0t3vB$YUSe64=5Y?vImymyx_^w-&7$Uk$gX(;cwyfI_drrV3}%MZRCc-sJKjWA#4^X9V$ z*w0d=NQQpc&KP9WTbk?_lW0f285u+o@9*bsZ24@gl&kMMvyYZVwB16v&|)MH-)XF} z&r+#+p+7v%L3*W?)I@hY7J8nmwg+18+Tq6&d6R+U94b+~IiT-+=3(<@vAiMFoELB` z#Q$LJX70M8U=MyP%H`eHxeo|~gi7Yl6BgM=pgA|7?cJ4pe0TK$G(ppl)y?!S1G~jq z7XK}NTBu{XWZB6a+^8i@-AdqlO$`G$5IbIZxe3p%Yk{2Gx5Ly@Y_Mx}?rZsXpX#ZnkszT9RyDfIS$@Gu7UpAsvV$)M5Ny|) zUptMiC;$XKn+V2g*W=v%oYOzO2)uqX=6NaPixf=VjAAH(`vKoMnXP%D<_Tf1*gc7B zKp%R43)YFn==5Wa|L+&8w%r$L%O8>N8wNt5KAx!alyYbGc{gp=A|U;NSMnVr(0qVG!c`@e`T z`%EKg|BDNN1X=$A(ylyY>g%NZJ3H!!u3~n7gAl;Mj%y%8*17M`acQ~lhgW@leG^z@ zyatarJXT*UYa;TsbEE|QtUF)L(XWpkS%2f%oC^vn zwpQuq&bC0J4S8_SG&q|UDo|@S$pS!zF1n)VUc;!gd+!$qm@MzpxSbAHT5$y9fBt+z zOw4ULSMTlZ4Muwc2#(Y3!6a)vF|1}2#pmbeVu6GkcD4L2rvQcm<^LI=6`>#_&$%A; zhKJ*K;9~pfvpq+L0%n+Vg8(aQ7#SmBVA!u;eF?m4uE5!P&L4Ss5(TyapiwyG$L#@l ztdo-yrFaOHw{Zn{=fujYI8E)p2vz?)ewm8b@9WpERrBsHJ<-f|&2dt%g})2Ew8BU8 z5xxwBQ>T%Zk2=}MB1d7eubUL8gf&VGOIxP0_GB8Sd}!B0@&4gEwR9bCzI_T}gK<6` z0b0h?CLiHF3I5-BQ?Bd;`WZqry8q!!rBtdZx(iUTM9gv|Gr%y;6|-a-PR2B2Vq!e5 zrsvn8#}*B3dW%OzjZexZ>3@ER548ckiGU2+sP2NIH!N|nB54ydt|z@3Ia0m%qXT65 zdo}$%VU*v>3AscmL#d;90tJ9+p8&HHSC5@UICUuc8tZ`cAHr5niUKiyw*}4sBOs{( zFwgaPP#jD^yV?rs*P4PlB)(9gVXmZv&o7!c`sm?9ZgRv++>fB&+$}~Dx5Z6bs6@71 zI%G=|pjQRhqOg~`4FG=q_D@T>g!z8Jf1Am=>@fBFzICGz1%Bt`4$>3?WxfSZ7`{DG z0x(1Xl%Cx)rvNRKN%_}ri^VM|Oo+~OUM$xM;am~+l-V>Pb0LUo_cz!XgMsT*s zZbV;_pa;OSEP??5x^LNd@B$!8kZQmi1!m)SA9Nw^X#e{TzW2jXAQojKtD8p-8YYKk z?aqlx43A|ZU(2lI>CGnKfT9HB?0EprWNa=VAE}CdTzVh4+-~KFEL)BRxqr=M|JA8s zu;HG9+gwN_N?a$Cy+=KrWQ{WaExA@nz+!%EpSdwt>F?Y;Gj2JDRhLGV*H+u}8UCCO zn!^x?Su@mmpV+WB!#63(EMgbCmxx34`tA6X-0x2^;qbMksTW0+A01*VQbdoAhOxv| z>7hXEyg!R0*pn=?T6VA*!pGsq9ha2E~@yC6BvMG~n<5Zf?|$hXR^E zkRuXYvdraV^>ph^;9SAQ#AA)BP0iftyTaY=s_?e+wPe9LL;!(TT4E$l^z6nYGGM&} zmN7&jZ($EMv70s{U&$IYYJC}E=n4G7-gGltSY)kkSST=WwSwnhgbis1u!bvA zR2J#MvsR7Kb))#8h^+Ze)i&msP#OxwDF@_MpP}vc_SO1?$AKgvZmVNGV4SZYg1(eZ zc(WxqYY?M1;41Okk@_KN;@i)gEKx^`sNSgaha6B+P7Nwi2WR$_?Z<&{@>=BVnhP#a zAaDO$bJrc!cy9e9lzXZ)E)4&ra!& z5oz5;9`I++IpYW}NC!}_a5kH-;H7Q?&+DqXwN~BF`bzW8UQUa+U2A@0Sr2jK5#oj8 zpJ9-}4lembcLnE&D?M@Eqf^1;FNI9hz5^%k#S*cl2!7(ESPi;i@7CO_Lz6g0QGQ1u zchjs`yuHqtDsK2eCn3a&Y^v$96T+|16O+4Wcm0O%jy@lx7Z4gQAtN4UHppK8RjSYQ z=)?BM3+{)D-eu5I0S>5+ktxJ$Mcrv8rWfile0{xX^-^|3fYwr0pt| zzh;ZeGf3|Z5;wn1Hu5K=iTjotl?+_9MHx4*!5BT-(aECxy&3tcWR-h1m*{_pu40PaO*RQla zxAkcrHpI9TKIGz`KY$(WmTubAJdNBKJ?WC@sbDUK=VHn&o*zUflNlef7EeL8M2H~C zL4L&5*DU(rxO&Xjdeo2|h*Jcnz13MYQpk1@qkX0SazCJ!;-lv+m@mADJN+MZrf7M( zL>?Be22sFFUUF+1{WU(W?ixI{`lDyk?IbU&Kt6+}ZumOHiJAa94HK@f^q6Ztx83TV zORV0L_B(g@LM2}ft07#VAylaA9ag0*kkTze7P%O#_8~Xu3n~E6rPdmThFZU`7%x(h zvN9?u#>q)pSKPnf8~0dIftuttRpe)g`-5stcIR+jDADB4~O+tHBqk^%j+CMRipc8}O2%qqz39Q*R(^ ziK5Kg9!43)Xsb%Kah(FVja8w@`KO0?L80M?XTcSUQ!VSPRLJ(UqUWbm@mQ(M<1Hz# z24uI8{xY?k-mS&`Emo#(yrGf$N{~ktX^D||y~uqZ@|kAy@3K=9y@THcG=1<8W=0l} z0}VqxK^yY9*uAc#SPmVy#783$+OlXXmHl3G&&^Ajlal-AAZW~-`^rtxFZ5P&kZb_DZ6{<<*&FE zha12RhWVo0g!vcjoBjXDe*7)R5nJ=*Ueb>=%DDhp66(-Q71!~W6+hx-6-Rfn){ezp z?yd#BJP-_?N|wNH_;0LP=Wn_gx_RLkQ2sN|Ob(~y9xH2kvAlowcp(`vSY`0?U6VH+ z;`gGuj{5A;UC3x}BRe)3)jdg@7gMfi;Of*o zU=LX*B7pi)$&-8R#Ty)Cp-gnXVnnOWF2{BlA@qdcU9QW^nRfP7)3=Vm0}qB>@_PXy zOY$Vtza<|O;?nbIX(PAJ7+O1SS{xnCo%0*C&F#Dnno_R!zkQcen~w-$33fWkZH0F; zv}VjFvu{^h0#Cw52g4kDSaP%v8e{l0y&h9eHMV?J&J%$^{sEY1DtQtZS2Tr3phvyg zvK#W{irlluMn(AulX<57zH7EqLb)cJz*{n&E)Vw%wHLkUPN(Ef)Jujl1MV|oAZ z?PLx69I8GGXiLX0W)p?RQc5O(j^1X&Q@r25Z}}We57(eX(huvK!_lASXf2>POK32}U_9Vql>io6Vru*{+ z<}{V{O=hat&$BE7BfFND{M>>5lKHGCy*Qn!c|6ya{bisiqG5`-t;zP=ot>kbs3a10 zHEi7HT`sI&6pO^4e%#U?ArQ!BGi80eJfu_(+}<77eR<-U-mRBdkD-X+p!=wRnBVNb z-TLdZ=kEkWM0oBe3=mfi=}ZcFGMtnyx8w%W6$lbSgh`ix7H+5g)RGdA*<{A#75wu2 z3(`hRh3QR>ucJ{K&DB)!8=_AFoKW4N;o+Cs zc3CI7T4vtK6GLXQD)W%_fXfg-uYu_HkM%pOHYBvW`lb~ZAA0Bc|E4Rx7bSh#yU##K zK!4^rm>Vl5!^Dd`Fe}Q}21@7niUNCP3x_&Y2=g}^3cm&YLt?^4A|b0m#FS5&=vGcQ zw_9df@#1u)GpCEM7`}#tLl17egLu0KM>d829y<_B%Hy0mqK5pxYLuF2{)(pqdizk+SsH_}LpV%8* z>w^9v_L~IUh28>`uEokzL2HYMA4!pxh2M*n-u9IkI#&f&8bd@WE>X(zDc7Vklvwuy z79i(v+JG?4QxtJ;;rq-Y28agGO1%ZHJuYkenW7T2>x&i#Az0>n6LnT=gnk2H@cW@R zd{VRcw5r_`+-7SdVpJ^7nga6B!HS&yXmUvW#UrxE)P|=Dw5P|naA10t$gEb|NrR$N zXyea8L5a(6RXU_;{H(RY0pZ9esLys+ingpNvGl z9!EB8;XfP=lHU;AAHr4Ey5q4rRCN6Fwp(5gVruovxgi>0P4q)_IDB3D#zbUfgxy9) zis5&I*!a$tijSe5!~2N!iR$!+xDP9dF`ft;R; z>d=k!+I!JF@8Z7V`7*ZZNs#s%BhlE3L5vndL;=>d5mFW) zC~jYuRnjq8_3^buQU2~kpDm|GGJJ(&xp8i%?({KueY3gZXK*n?(v0Lm9|~kNOL`i< zsvGb@Oo@Sr9Hhx*R4zleR7v$f3^xpj#Cm{nPDLpyAzK5|$P0|Q^?>rQU`1@T60_gj z`ud&Pjqxgm>(?Kcpz6FsnoLJ(9G7N(1qMAOnahsS&Z@Se~RY|X1GyY*7qLlHcyIZ)P zv{55MHF=YkN-4`>Id|}L)34=CVsUHu`+9FFnXQ}{LOoy2$=WU_35bisCscLy$mpp1 zDIVaQ60lh8MkfdvjgE{kGT_F4-DjhDqM)E)Y;0_8ogea?{Dc5e!V*}OW~@?yi{ZDsV_`fjzH0n&JDE~{|Bv_5(3=2ocN4FK&Xe#)q!&=*DH#l@F z268*s;GJDIS*U{)W3(EX4l3a$H{?O5b3M3@wYX z3{Mu!KvibzK4+&2rL#%VzVU#%|A88j{3m0y16SusS3m*xCbR<&AoJ`_`;CXJRPu*j z(Xw2YmBh<&-o$k~Bz3A;ySVd>qtW}Z9T*H|Ki?(N0j6A&Gg`EL)NEPQ_RH1oT-Y|6 zNIf=OzTjs*SEq#w)hCMZfZ`hC`;LxSa*NX7$N<@yt3p2;%~=DPMkh0UnYWob`f{4)2mo*MqJL|Q78}D05bl=0??_9lv@9rj$ zmXfL;ppj0M@jO@`Eq~+sK)4Jv$;ZSN*&<64~?0(h-7MAav zYRu!(G8EJ~XncLAjLpf82a6xcJYInleK!E6s^6pvqe%4YtYF*e(mu+*F>+bGzweTe zP_Rhb(8PAE?8T8ORyQ*gf&&cF`xKV_AVQV#4RSG$&^Dpy()Y`t;qUQ*cXmz|Qf2V_ z1(;&&RmMZ~bAvW%fzA%2ON^tV=y`}=!0MXyu8+8Tttc#`IId$}`qE`HWwp;8Y-%{g z3t5>?%Q0r!+y19uDblc~LI0Vv9*?~f4oa0Q%Ih$qkCN@(G8hyV`buY*_xyQiD~`}2sK&L%naP8SL18+0F~v=F{2 z#|op`nv9sT@cHJrXxjdf7b<-(CIw~N!4y5hA-&_b(YPcHDb>O{3$fJm7r>FXjKo}> zHfC2WM10B|^wh+BU*kHC@{;?LsnT^P$Ez&5h{LjV^}h1=Gmh|FJVyF(TwIrJgImFN zVo2g@hXg{8FSjD1wlO~z$D4xRY)Rp3IJa5riPu<3MBsP2_>%E9Yr)x2QO~MOQ_K%B zY{l0U8)7DaU4oc~bu*3mNKKv0jpcK1tskw{i><&5d$nOU*Nw+(E!1Z!9FyasQU#V~ zZjf0x#7m0^C8X-o0Exlb*9q;$Iw_kA5n*651+rcgA^G8XbDvQ?lmla zf{b$+-WEv4dEis)9vkvuHS|Z1UiVh#sC_`%#%j&o!8N{AvEH@!mpZ{=)3^wHrPAE9 z$&EEZ=hyN^>R1uPq_BZ*2G2P@M#Q83`tt=NXJz7g`bqjy^6sX~eqC>^b2BPX zCWfN!-(FiZRj`CP^aQs@F1PBg4ytypK5*AO#eDg|5@~+=#j)-1enR=$bhXx9P7Sh9 z#@8?6O=G|@XzDo63;j8aGcqt(i!f0$nwg@G`kYiA?7^_Dtz5(2lgz1|@F@1jF#Tz9 zR{@Oq5INVJP1KdJ+y5xog`7pkqU|X+Gg~CRFj*xbNS`z=UioOS&891_vi)5&QGDge zduK&&qX$^LvB~k`=7#Mb$EA=SKh1I>V7XG*N~7;#B=Gk+J z$Oyq-sY*$i?jIUaJ_B1Ky&|EQDVdIb2)8i4O`Fr5rN45E5o)$M(1#?=n!)( z<=P@>RS%#5PMqI^o03lZft)EK2J}#g*R!d)izYG-*llO0bf?Pk-y#p|(Bq^LYTpl4 zkO^dZJ4cpK+r3}WJgW$4Pdf?h>rx@03re-3q-sZ;+LYPD5y!X)g4>rF$jAbl8~p=v z(d`jx8=Z^UsM2>M--6ZAlIM8NwCEknsa15+BjByuRUmF1`qhKAWexK$%($ ze|&e&%mK66m{OR~B<3;%LCE-;TBts|SFxzF~5W2@VsH+DeF0iTZ zxqIousfgJJ5;jc*m|Rto6{d=s)d_36UIfi4M*Fa}{mX(E9BjKVV4m-e8_;S) zH}Y8TzcR#oN-!_PVTvf()xBf`Z}-mb?)3&Ku;);EAT`MV5s*wfmlP(AdB#KJ7)uq){G7AOu1WWEm97`CGNh?<3gb7q>`^CU8dAgfcNDY{;=$R$r3; z6uiZnZD8udltd>Tj%#$gd?f~y4*3+OT&mf!O)(7uVXtq+Ttc=!VkB3?fhHiQV8uR{qA6O9(5YR}KE*i3)o0}Wx@1MY6A_}S>-B2SZ$l(ZJmTPo1 z`%jzN>in_gS3r#LJwLnP7<6`W-@R*gw7Zb%gU{3FvCMyhbe14tXJ-cl{?Q*68&3%c z2nr_?V+&uDXaD%IJEUjg?CL7xb8-lX3{&1X49IZN@~Z#mQ*4jENd?)|_dBz#4mDl_ z+3L0+r`XQo`_J4CNjyhDh}`s`dFfqIg>z!nEC-NN14ebSbU;;Q<>q9)CrEh#CO}hD z6TpP`SqYAgj*?eADM=v$czkVb8b(G&v_ArI>#ll#QGWg^0I-AV0$~vm*u6c^#e_HV z^70x|rltl8XuN#+5;U%*MGdY!?D|s*ikZY4d*tQjT6KKA*XG#6ltgYs z?2m|P;x(mAp_yZUiv%fP@8pORu@*xdA|*O{tX>_&fo|03WU0GqS|j<&8C8ywWRrV&(p(Z4A} zDKRW$hbn2uE-6|y%lbT&#FdMVbgto524F2@Y5y^maRMIXh|Jke)Kyvz9wX$>Q$A5N z$K$F1*=ms+B)20YBWXg+n**=jRSFmNIT4+iG-t(75X{V*my(gVseT9uun>4*V^h4N zT%>EDug^$J`|F*auCBhms5gH9V9oOC?bg;-IXOACT; zhvPBqVqQp%1Z0SiyE*nX^(@6h=@QHkkRU1 z;HXYF`cEWWtoE~*+iYwtcFyo$Pd7a%n88X+^$YmepSExQu0-?{}iY>oaS zt9I?bbkbkN3rw^Bp@094%5E;Qz67Z*sKgIfuvCfN^Kw#m_NW&Y+&$avPiphX3iH%_ zx0?ztur(4x+;-jJXZ)mLzz{2{J_A)DsfqUe`Exm3mdze_twGOY;fzy{|I|}f?xgmdm$zmiPd{Nx6l!Z{XzERdnwx1%`1J#W8W{+cv!ey8Po zou1}PC(Hd`PunzJj*X?8A-$JDo(SSMkSU;76UK5|;f|v-7F1q2^g{K@&1Ry7sO0C1 zeH<7}`d=8(fo5`S(DSeYobQgzM&dy=;wR67ZIy|mDmXZAZ z14(FV`y8!gOAGWb9Ypyimbv0bAeF;0J_!|zVF=MMxttf%6#b*wCzS-MIzOx z=yCz!BMx!2pG;GV&}NHk%gLmcpQs}yqJ;V$^xpKBonK$&qxzJvNsSC{ZzX`p;;aj7 z7m|*wPt0u3>|f>O{}5%{^^yPGWuh^tg9(SZr=$@z(E*evsI_6ZIH&b#V=xsJuVGpa0{*`)?Nhe>;xqiK2!=vApSr F{{STMJ$nEE literal 0 HcmV?d00001 diff --git a/man/figures/README-mtcars-scatter-acdc-2.png b/man/figures/README-mtcars-scatter-acdc-2.png new file mode 100644 index 0000000000000000000000000000000000000000..5a21a23ee5d801a12224b5f1793b11ff0d970aae GIT binary patch literal 24285 zcmdRWWmH^Ew`OA@IE3I9AV7fN?j&e%Yuq)syF-H0gap?FcXxM};O@}4yU*eMzL|CB zt~GyV-C1|dk6sO@yQ=o7+Gp3ZpZ!#aD#%HoArm5lKp?a)lA=l=5bST@CHxu|xUxhj zf(g7K*-2_Rfb=qDAol!GN#xAz+EOi#5A&PuhKO7zm1{d@*y zrW;nK*!_MiuNL@c{g`_2%UEvaS1p-aS~!J_7+YFu%G=?M&f#b(kf`xzO&pV!QWKZ@ zGntVyXZN&k7lkzU#y&WyNn6A=Ts-pMA5el*k9_X)a$0r3xpMZ=KPrs0P+&kHKRs>y zgtxWVoX@+6x`)nGfTd+Nf;VH&tIZ|A$DnC4SW*zEEg16z_($-YA0h~JLJrRlG{hiZ z1-{_*8U_OdS`~Ti27FHTxeX2ky21SawTa|K11PWK*ZhI2V|?fbYRTis!`U0y9IFlN zO1yBPR+<_C#y(M};YX{?O1^>ulW!(mLreV{L8U9rAcz5zP&XR%xL>8`kZQbzGc_ zTTHVArqrpSH^2Y;X7jsPDYwlo25!#XaMPEM?Sothgc$T=&$iH_c47(-+YLxUV_8+g zc^Rjpwsdv^0kliNVY5Wo@$1u8OB{(nNp5JK*pC&Gg_aZll_7{gVQxsCvdRkSk}8x+ zoZ&F{`|c+;vp3bqXNnxlj0Muk#q3A48|oOAYZ zALE-f2{l|4%7BJh+;pe|-{UP-lo zXL41N_od>K5@qdu{^aFqerry7UYdwS@h0?MVImFO+KZ&+o5w7m4?TwzpLx~dHz`IQ z{`g#Y4+pM-Sx{OoCz~)E*_qSm-3&1dXwpGlCJd2qvv1ag1>w%^!RWDW;HRgMNb;GU z&d@I0_}Caub8>=h<+Yib1=HP44LT@ax8{m8* z7f5hD82<_D7*zD|Blei<+&081hP9>71d-7ar#Z>-fGI230U|3(U@C@?Uw5)nNf~I` zGWoHy2rps?MI0(#eH!~`nj_7}?v^wP7{avI$}n3=o+xob92zJ5VA9^zVQP5`7i-m4 z!)|J>H-KtJQdniYINrl>NZ@@X8-1ipTXq!>^2=uKvl;m!km@o-qIAMbr8=MK@mX51 zG&i8hPBhdd)PKDr!bl*W3QwSEWe82<_8rqfbVqhnZj6yP6(4IlUyRF8sfk25&wINn zHON6ck&2v~lr*j@`_drqRT=mz?q;V&l~#k&Z2Y#KP4L^WAu?09vA#G`^+nqE6p$Ui z#j^49QEsU3CL>;_$UB=TV!=FiciGN^}Hpr^-YkrF9bKoGX$GY6rA=Q2LNHc-``b>)3v1yd{x{ zA;+`wonCHN%_teaTM_elilEkm`=RgepPIJPNgEH+rdbI`u=dSLcD2N~JdhAns23HV zA+uQ|6AWmugY*H135Ci=aYNLp&Fbc}M_wIsNBD7w4azwM<(-wq?>aqh*4D;Kh4{Rd z{6BncND({1x1ka!Y@+Oj=6J)}r>lFv=B-#9xHD?mFRnshD3Y8bd?j`0NOXcVQLP-1M1r!n}GVG;W^^IKz3?Mt2^=nwxK_R;A6@srVe6vGX=8*HtgRk~9XF!}W$o_MotD3v+=~c$8^H5O% z1R$llO1GAcFATR!i`-a1D07qywckHQ)Xd9S7-#dSxCzGOd18n@T6Ybxm%f+r_-pua zL%lch0!_+_;op--oVa1DN*FHW%D^4%u5SMNoC3>UG&|KTbxt~c4d+h{h~}-d``K*Zh1#-us=DI$82!s$wpqlLVPZN=zPJaAqbSyjj{FB-9PONB^U z0Dcmfj~E#xi*ET68Y|AWn8z7LEHBDd6J3R-871`hGsjZg$k1^#nF2*NC46zl-GIXW zXfWS0$$q08q~w$eq^~g>m_G4AGJ90ny#4mlbWLhDK5ju8LWt7k{P9Nf-J2Qmg6^mq zf`t!^DQVAt&iA4fvgHM?jUjs6UkD^7$@8{Th_R>+>zAf+KbhlAu}D*9;9XuE`sXN0 z(;rFq6Sw9b^v`d`DwWO~96AXE?ekJy=^KQFutF}s8bHT7P$ed53+^|A_9ycO7?z0~ zC;SIBolCE@m-L6m!-WoTOZO5%G)^e~hAR*T*Ug^huw(n4vEp0Dy=?pNaG6;T?H@Bw zh;;dvHS9ck7JRmTT2xABTmMvqf=H!-m& z=~CaIpQ$-FYCq~3mM#!Ab2so%iRlO8zR=)(Okx9qv z=s}-;>YrO%c&$nDinCjp3-!rAfX~+30{pEUkMooeOH}suJiuG-r+f2Nx0$S12KFoB z&{E3}Dui@v3iU8>I4hY)h981PW*Z*-OH{yv)}gpgMd~$kn!p|r_g&zIhu)jf;Yg5$ z!;~+AAqAR!VW7jWK8*FH3rC0rWdxkQvAZXq1SJXA(Ww*^GM3T6v_hN=I>w_W=@DnJ zp5~NJPuRk6a{#t4yg)YJ%l?p}%Axwu*tE?jh4mWYiEvYBN;C;ON;bwFY-MW_$zy6y zD$0K8tUrD80AO|l?-NhPI~r($m?(kgsi#b3eJ(O%|L6NXCbBI=X;rVN@c^OSQgP4u z? zK<(WDL{qf0QlT$|aZ)taVL0B5S+X=_YI*KU~vU+#?` zwz#*fjA*I}l(ikK-71fzo^RiD-~Ol}&_Ho0bdvGZz*#ZUR*^atG9duw>De(Pm93Jt z_bqqHtp2}4FT;6uTtoTJVB%P-WZLuRyK%Pp146x*74p;LS{aTsgI*Jo(a8++I>OXg zK5dxCv%8X>Mnv{$z}} z85D*+5NF{tCYhd0*3D^Z9@R)+y)yK;JG9%H)_l`_k-cum49Np4l<3*bJMVs)2_vcd zoL{&*m5peMKH@q_Re7@UpmI7}HIia$+{4~WPLZ~OK3uEervGr@^_)e#zk544tE%)Q zAk}p_9F^dyp3FE*apFdPyEU}4GIHhX1@*G;^^WxYEoRZc5G$9S&QU?L{Vd!W=h7o% zM!cVqs8y%e+5qgrCTp0F4T)u!@pVUk;{$rz%|8{T@Ao&q+t6|w5hId|r-nRnuz5*__8`z&YV~fHdhB5ZN|(kI z&H~|~R9B!#G=0o8Jg~_}Gr>bVITC3-%Q^L3c$KdNj%~)Rm1W*ccsyt?$9RY^l+}cv30ymjwgTI{M{O-=JA_voXIXS z;uo<8J5eagbiGl-&;Arm>UZ;1doL4WfZ^kvmr^EyzCTp250xSVF!s}}q*=af0-mqn zqT)PBVpXI)5Cj`>b^mT1ox7J3AH~5UKvOs>vgJ3qnVK0FTk^6c7k#Ld?yA51;L}E} zLO);MrzGiCRE+rgci=kNJ$x33o^3zR|4JiuJsM_Ja{no9Psy#?ymrKn`pVXwI+O73 zaq%bblGCbGc8PRpSXVR4xJFnNai#dj;+P|esh)UvtrB+VP5h8hYj?`_<%Q#2QTy!R z=VBAxj$zM(SlH5pbXKMfb$N?QnoFnhhh~S(BVp-Xozg9gDuv=&s@Uxn{N0Z_9$ZF5 zndiGD4joM2`0z*vHI}47Z53sRt%BScdSOlistN9z>9RcHA-_r#DVUJhnUcm_qKJL8 zM2-W$=aW~iV(!14iib~zOF7XuXqXjta%ERqzo`}FC8Hf8o>8VmlK^Ab+O(XgY0Jq@!Ys)KwZyna!57#es4LpyTw9??)5nXeDMy zB%n9cpOz_uZB^IlT5poG2hp{sJuWTam>w;%w!cLKc)GWANQ|tB2a{gMQrE%rH*H6_ z{M(<{kUy9!^a#hVyE2p1$`a;rQW5<8ri4TEESA{Zpoz;Xxm}N#S2u8ZH3G-%--D&Lrv zN_M>Tp>ID;#J%^)-lyQkF*on-cw_vR?otw`zSh|z6uB%K^Moi@4V7Qq7(3Z{$agT} z;HSu&Q|uZ}e&3bK@0pR)Az0pm93Si#^RjVDQY0azGv~IXM015&6Mz9)W{wE6lCN(f zD*+I#M!~d0Krx=+y}lPZ+}PD-y?-6rgEh=M-O*Tl5Z8(LfbaaD+o4_F*=_66dUr_b z)m$_g@et<|r(?!=J8XJnE2_`H^)LPOXtyIaWYKLqL_p|1o?=kFcm{@5Nk%k-JvlcB*i)k&&N?yI14vIovPbr%dNNgc5aNI=UQ`9S?}9_4d|39x zORn3?+Pc>@08aw)J$WGJ=VE77e%QUZJ-rg0T(EeVwDt{=i+FJ}pM4R%qr(U`L%4X; z_3~9)uT{N}9cAAqaa$CCH_5XkMSQsTdDOK<0ot5UMZx)~=?zZG)bNn{Ty37TW$(tX zG&B8{T8@JU7#BFw^uXsv-@9GBmb1;jl4l#~52ec6jL*YD{HxXiKnG8&_HC_hS7)A2 z3({%a)4rpJjnAtBOhnBoXa6?U>#aa2#q(k~W$=|Ni+ID@X_dl1?M``arsMk3ABV3c zdQ346_a9o*Z|!Z>78g7gSBWJO`p*!4Q9|=7rtl3jR-F}rCTgeLtIzj*N8T6t;kJ+6 zTJIHS%Zs<3_^v&)F^loJ14^9hz=v?OI&E)c`5 zN#@VbZBh`&5E4+zfhi?eGs3InI;vVSv0tqt!cXIDii#=x6a?$sEn_jxjO_8y*fPMUUqSjPk zCKk~}m%Fm|G5Jd!E8tK~o2PbVR&t|T+gDM_iJx`Znu^T`i08mL9N5f#=pYb3^wjx; z$+N#@<>^GtroLs=;9xA5vE|7O;-)oPQT2m3iJ{Kw;2U_|-Vf-F9}2j{6IjB<%F_L6 zlghtt#e2IM@yhAtyGjfO*D$v4GdLJt0gHnc1(y~AA>QG2_&vB!H;}j+!ih$Ovow|H zmYIvr_yBn8O6T1AfK@cv?9^tCiH~n>rrUEW5-?RT#{*8%eGw7^wdF*x;<<&#FDznp zke_R|H#ftuO2U!2B;F)SJXa22kKY;QNo;7)lB>;ttn_7v3AtW(5jXI4jsU;XB6H(u zZzK1=Q))m5eo3F()NoS=>TN&DW?QHMIxz8TmIDAel5Idu}8)4BLxHJA>ztWF*Xmz$$5`oo)z=PCA1@C22X^nOy zUyytl$?*{ZxI_Y6%7-d&7Sx%W2ZKpo7|vu6>@osm_IF-VHI(WEtDeWunRsbWV6J*H!SpBO_BT@&Jz2idBnul>wTd;_lZpLLA70 zP@~_F>?i53G&9GTW>j1yhTzt2ICM_Pe~cK&(=fx~wv6;G(my0b2I{68xQ&1r-JS47 zrUNnp4a^(>CPT0)`+8Lj;(Gps1F7W}Y;)%k(($k4ssIU=BJl(|5=-D7e*JOEj}=P1 zZB6qx=(yDZ)KH=x=?}xbVT-b0W z?tBOX(%%3EC}@_2P`dG#1J6$l6|!tfCXgY4 z^eaW$;53E}8p&5H%BO>QEMY)d%-!e0!J-`Hx&uyK=l^jX+Cbc9ejE$-bQ%`MAZl^6T?sIEU^;X+}3!aVZ5Lb!E zoOO8HY1xHXtctKxHKRRRG>+)HK^Sms6c`M(jXuct1NFXrULdx~+I79e(En~){)I3H zG1)gz$(nHwzfW^i>9;}Vd-J3S@*`WVM6LNiuBOV``bJ| zwRNh#kD?0fMU2;>ilq8(TvFD$UOc_Xks9@7tZQPfAR)%mqL42%X5kW{Jk zhJ*>!+-8mXN6C+bSo9?U#WG2f0LT_=GX0iT|AVJt5E8^$L{(^S01#5ciLzMLG&ns&|ZP|zyb&lnWMR% zVGP#Z1dp9o&JkU4UAVxnEABpJ$|l*QlMKb{A!sGCvUl(2B*%H_DvSTBE@ zMU<%akA6ty>cRu484lEmU6~=05%@K7 z{bYAj+9m>Vvk-X%kC*}(vGia%SVd5)Y_K$-c+lXpxZ{d;-&+ec6p*m&RQqqXo}FHK znd2RFr`r5D=P4e=K~vH9C)(zr?@ns0WA(re?L(Kzu^98YB!l`_d0Sh{tj$>MBRnD>4BPVmg=U_>vPQylfmx)%ti=P_W!*`X~w%3Wf%w^?ZrWTjes zb#FAwpvXUc=RR&#%$4$xF8KaVAfUlh-06;dYOs}a#yr^$I_s~xtS^m>iSs&M%NNyt zs`tcR^Ai@W4*)>n6GJW!c`Qu^YoY%BIyYYyGEc3b|Tbl z5J6?MQ=i)6T_0OsEf`>sNNeI&a}1U?6pFpA3oFzgG^|MAnWD)EMN*_e zA?;`WZD*Z*nZDh1W6cjc#yk)@jYx9(qt03+P#GqyPxza&1`kt}BuNJCybF2mf}(4x zizCxBu?Hj`SpfkGSrc3aSJ;Z0%;BAg7wp;gO1RBdY+Z)a%`jvpBD>IS_;m^)?ytFr zc3su&`?_&sYNvyaio%-!EPkH%BgW^59uKGBS0H_?l)x2-n<8AFy@!fjT?(BvusoWr z`j_f=S?BcGo}v7_*xY;#ESJE(%?$q#hwU{6b^vhix=hV<_vCAdk2f7uTnw@PNG!3X z_BtFu5Q0FRZX?5nQ1L2@}-G*jU;df62=c_(c`Zz+<>Bs!5u@#YSj0FSC9a^ds>r zvsMO?FA3qV!i6%D8Cz`7Z{2sR-k(#3`!l~7a1IjSA~lgH6p03ok(#L?Hjp5FOj^uA zmB2bI+sn!R!3Zypj+BV7G0*;nHHn|qnhX9M(NkM+)T5jz;D`xEzhV=9Gie$QRCbDa z;vB_Rw2Bgs+s&EIm9-l&E|h<0!!=JNJvdyG;IURQXjZdsz;#|9Hj#KTL9c7in05Zg zj1gLTSWei-W4$?B%_|LHW>CAL}yUKKz=LOxvwGnM8FM z!Cfz{C9~K8#+}lwq625U$rL_{NyuI|Qhn@qVn~Bkk+p5HISUAsCfqi|*7JE3{q-#} zWzUqO(b-MxV9%K+-{Ehi(|Q!(U14iuZ*NYKtAE%s$YbO%I?y?KW#$mt=IPT~2%r>a zL>Rr^80m@6^HU$K_7ca&vzKLX9cPX|_$p~HER|f>sCa4Wvf=qSe~>3lT^ovQEJ&j@ zJi6P^@-hCOS^yHcyhXLd4h|i0wTYluc+d-F;4IU^zEwe`$DGwqAAFknJB6n~dSR}{ z=|>X|h8g5&{7##sIxYuqCA(PZo-SujgO4xE7;-dSQ_C~3UQVs*C<2WW@Q^dA6iVf)P(hGpVnMM=rkkOEJ`!sKzV#O359B2?L`%j4hBPxszxD%B849VzzZ$& zh(*|t%5@^HATp3X+w3@uo_-BfCG8u((So}v&EX!bvv)Rec%w%P{uFCr*vCPQeXYL< zl{*9(Z}g_N4mA=-i;9D?AIsVuAl;6OrVIF-%j1y-8}7>(?!9t6aT0o(+W^)T&0?WB zp8eEPz*D79X|?NzVfR@$uSqc{v7fI<@x-BmO*|ZBHPF8x?UO<*M+-vi2A)9R-$h}w z-bJCn@wYfLs-5FLv-;$^5hv^aafna4A!mlDL~y;7OI$Rl6@_YY3igw9CC3HbEEark z$|!AG&D6_(BoCegI85i=>OQW7c<=(PWk}!G$f=C5jx>m~Es&sC0*Qu^hhE3ldxrUv zE5b;k+9V3#kFa56Pu{~>i{LXDknkn2xDlbBpXQe<7(zmZL{(PO@^lF1uckYeOIXp6 z?;9_zV{?aJKx|bu;@qtt4vIBJfg@FA!@kDDwsLO#_f?eiFIu_u z#@dEVNmWageQ6aARRHu)0|~~F#+W{Ix*14ly?AJ|wryqyjK{2yiJFn<2^SMsQ+}tc ztPCsS?Q+^CKt8f)T-@D}fc%P4V2%-GRxew=Eyu4C2hYezU`k>o;O!2CP>NL*CZYp? z*8+yDtEIz@G(H2!y$pVk09hH+f2k<;KbLrhKyyYFl)qK=LIHS(>a_bVYfWM3jt>t7-&osbL!T8zE)|@{g>NZ_p31mAl zc?>cUH}A*kWVHE0rK9+-WS+O5*5iR%y5z*L-qWz}-JxFN{WQ^?RHPnoug%9Z$MyHq zOQr7nxyw&E3#48Li`{>Ab9(+tA2&eJN_my6*plhI&QLH&_*k+&tS9TbPISzSJDrm~ zKb{7sH~rpK)pMQDTDCj)ZzkymmwKGj_+G}_++JbG&!XSYBI+&pn%_z5d0JeYSuuYg zYc4sSS#~QduqpZV6Yv|z^2A3ulW#JAyec33ZK#d*Vg2Z2WXvWAte?Gp$FXw+B@qJU z;PJ+iTj+IEI=_I&NfJ7R$4x)V&pxtdp9LxT8>SVvyTD`j+mgdjG665Bt?ct_j#M5$RyWEHVu?Lvrr)&NJ`5br=q<1bCf?4jJTm{5vi003-e0D%^#A0tio9L6 zlv&?LnM*|K70r}<1festoi*SP<1FF?odjE{Qf5d>YUF>iRr8v;>WU)cQGU3Tz(}v( zpVs+Vw{Fd(Yk&Rp=s9ol#jShko{(ZM9}qPyVIG_<=%`PKlaZ^M^$`m%%;`8tFC0wd@wj3nFbvCX|(l5u8GCT*mq`l#=3Fq z?r^GUCK3oQ$TtC`K70J7$tLsMVF^NuX2Z{vFd+5sqRLtMEKX+^J4>}kx^-TgX9p5O zr-81mmnF@7TF3ki`)tn-JJ_S>5!!Or`!@6C#o0sH$m?K)vMedyE-!uH*1w}@i};m&)cO!0-VuDM_=D(C@8cX1|3ET zEV9?vCuTDzti{py{+dHy`zs;3rFY(+a=MB&n3f8m*f=^^QI=V|mFasj5BR;bHTuz^mDTHm z18LEYJv!ZhjU9}Y`!IRm(>0;Hn_BlY-^)itGt=|zYBHY{`sdRXvgg9lr}uiyyz_>w z_e9rA9-XW-GquiKk59HO7kaIy7ck#LqO!9nWQivUi%>s@e#>2^a4QD=c9By5$I|me++!F9s!+N7j|u zS9W|c>i>J%Zb8;Chu5tHLO#;XQTY<~F__pbwKt>jXPV1-u_G6KHt92o2}4u3mA3iNX+ zPk`?|ADj8Si9#sln>}>qN!B5OZ!+cH4npSABeJ$t1o)L{k@CbC9u_0a=+2#+xdXI& zA`d>;(>$l=F>2Y`QFJIkh@5?!3-~dkb}CGb++|>+3ChD6ba}dS6yjMCI&C~|it5aj zrE<1I*Nwi>b2GR6pw3G@8WO@nk+G}M$(%aUwP=p7xcNqQU^dHV_(~xWOxhIOKrv*h zb}cLs%Y4lbnv^RdKe0{sNS*;tM)JOPgJh1^pBvA6Y|hPzYTH=<4E>;I7xIC)$)Vj) za*NHq@qz9`6r1Xtv}$F1CqOjo|KWXo^Aj;mE^T-8lz+*4V-Zy}Za748we)}!8P;|| z^%hKJ7IC0adA4jZ4d^4anVb2WO4%gVICs1TKGFEPfiWIz*ao4hj%Ulwkq5yh!?Qsh zDC8r9`FAf|2vCu40dKTAi=|z6)@4V|C)K`iy`oP2A5;ELAmVtnt~l+{uG$K`ZGN;n z=&*b0l^;pKZ8Y_i#0&|s3XU~>Q)4ah(~W|zvcNcs7^u_c|19PV(+wLQ*Uy=kz;UTr zSyDNVu1bp{==pF*5s^U?k&%AgyvRN7?N|`_$%U$-E1aU%OzW$b#Oi@CB%}kzKg8iX zeQ=Cp61LLqS>bQ~!up2$E@q0%$}cOBUbE0+a}OokRNpC*~l+L}qD?t`O}b!dg1I}V`1 zm56?&s~tH$zfxJCH#rh`{!z!$rp((=?A>DleiObTTDsP|k~m10cAj=?X}im;Nbk=$ zG3(*8!XpbTgpzf-52Mjti_wRFjPPzd!U&GxV-_#HC0#*&!};j2X(0gxcGr=SqLI>S zK=sdy+2g$3BuAL35}B@|)8Z;e2SB9bH>|ZkSmp_{1*a0G@VDHIV=FwL-acVoC(WUG;a_a;!}ZC5&`R1Or6dUff^wb zIr{Y$)+mKgAxUe4#5;BEb&m?z&kqr>D1_(W0A-sgjZnQ#Vdg@G)qCwi__!p^68#YB z7Ez>$^&-aRB!QM0MG11T@K!4YwmXU>sz8JIO0d82)-5k!@8E$zvrZ$#LTc1Y;il9- zbJGNxSuQ6jUsT>!jB`#U&j-Jg9-xLlcP_2E0#$b_2!QNH4bWnI_$2O z-S>##G1gm|&yDE$UeVMX78T^(0c<>Apov3KNBiyf97g#@tJ^JGl7-qvZ!pdj)xY}p z;0XR(9dKlt>$N(5AtJBsHnDG`Eu!Q6Ds!iuVahHhpVpqb6AzUF3jel{*08EO;lP4^ z-C4RJ1%T%%rf;ILe+=h@)Sq>JFQSed4y)9VtCd_o{B2kxT5rm9Jb?@%3eYf(-R>ix zZ(X*Z)$=~`cWu5zpIh3F6|(wMi(J?%Ns!=nICuJe@LL46Y*x&Zy^&V<^sf(&Ts)8j z2m8+gTrQWLDC437yJR!9R2OM+-!Zm7^4VFalgjE&`EW8tQ8xxw)RZn*6dVQBfE3i~ zgg+?s;b_;y;e5gTerDZrmulvEO@)52%PiCAB`x%+O@u1qb1!1nVC7)RCWo?s09_W! zZJ>bF+z+$2UOxJBNQdDV7%8M!teQU0i)dy%O90=f+h;ylgLf`|vx{;ICm?R-<$U}K z#Mzn?*JCgPLuRW1<)jLK*jZy!?q7t9N@aMui@Ww&i}Jk&d%E6vS;)cjtNczQ(xP3G z&Kk>lqf$j;Ev<$y0x60)qB`rV!j7pvEbdajnR|*IZ+`FQ(1+Bg%CFr*0GiAnX@RWy zE6zmn(bwGe9k=#WkWjG7-g60_Fg@R6=*=w8m*u?Khj}&kiRZJN+I=s5Ev3?^p03BU zn_wX=+^-T+ADaj!{DEw9@>s_SK|6~Cx)dikKMx#Ra~UV<#VRWcYpE(OHJfRC3u{Of zr^K6KED9<1@7Yokm);;4jIBPAlJ$B?0$neYaEJUbOP!cC+G{2nV-9obji-K?-z~%q z=6ZGHDlM|i#QaVd!eDuN>5kgg6FG3~w1Vamkeu<1tKcY$e)$zn#H6Eiw6ij>*crUYuQQSpS;b6E{2NX`}GgowBfii5n4v-l*y#&yxV~u1tE$L;MXC zus~B-kLY_9Wg^fd$(J~rrv1Cn=>9+9ohZ32<~G)Q%gb}~Qv+*q4kqNQ24X47OWz4E2nVv_cr=%4qyj#fv=~Ek0Upo*Qx!8c))G*gq<{4nEwU=wIceT0I>!CWe@nF6icvR%WtzW{p1f0ZDx^ z5+ctZR=zx-X6pE4_`HUs+^1a+_iYJtvN1UV!W~O8v-d6LfWdQfjn>^wv+t{#KvQA= zj`o9HVK%w*HO$ufH-5oEraJCr3!8);bJT{qa(K{9(B=+{H^0@0WQ|;xM$^w&qF+)S zn`(>JeiZQhbscU;+MZu~M^s13+=ky9Lg*TWP)6M3j?KqBHMN1vETg7YWMQJ+@>OZF z%-aJ$(SYA`;&!RaSRgA0;_|o-1qz`uyFUkS1E#GgR)h$4(q3P%$hcIp0*_sAe@1iA znDvxE3MI`uJ{Ub&v3@o_V`?xT4f6stD*%5)ilu`V(XY_HtAUM)6Q6#0G$Y%NR)6~y z1>(u58P#hyKeP_E#%#O%Z05SJ_5Jk9{znAWfoqP)`nr}atuhUG-y;(ti{HoojzrSt zAH7?J;SAW^Y2N)+kgDSX_B`_HN+Cc#cI19u>3H*-Vvdm=2+-yPGvcN(F0w^l9LL#X zn=4*N{^25kZZv4+VXE=!=;Aq+8($1V!4bC7bAl#L_WEZT%S5Vsbf?Y{Ovw7(SDeV| z=rC)mg7B{2n9#&o69^H00o379FCA{BoXX zEPvhf@6Sxf&9Vx_toz^`kH+Mur)S@rQ=`WvlE~wm*o9jLy9q+#48*+Rf-5m&EtJ{B zc^tU1Tl+3}Q}FcN6j^7>7TYczfUfpYA|L8xO%2*ZyxSOUe#hq z>a;9;?UaWlDUM#k`9q%9rf(DU_~|q^{dSyE=dc{(@oLap=vx|aI;%P^di{uK|Fdx6 z848Ra6I$@~6_5`fd`{$~E=89pvA_Mc;F%=!v^G;LVeSkUyaQt~xYpgTA2rzX%YQiu z7fylcqwbz9_fM_c2M^r{?FiBm3+`prKmj+uq+}J(4v&iUOI!2$`U2%B(39z@l5gi) zo*>pt?`No$xw~8h_0(0&&$dG%fZc+dOzA`lL__poqk)?aBS?=+ULv!CpXF7OqR4*l zW*QFp)b;U`v)#cQfXdp$%iL}aJJ+BccE1EGzQ!^BQlo(t_=1By3scm$1`l|Fj#%p4 z|74GcKK#QTTQil)$?@QBU$%dUrR6SXc#C4_*@3co0=2m&*k1xMDn=zqMy}at>;u`!wI$_!TdQBPc)@I zE)#DbEc`{_t_{M~>GVJV2gyR%KDt|}CdoM>1coHgX$>1RGmO05R72Q#2jH(5 zeA>WY1FP_*i4o9J+&+tS6-@zwfeSv3&MJocf+iec0V(gVq;-ZQiv_TktnV0N(O{gyd9R{ z#a%xp{FF}hxj!z$rzZeo^3*2L(tfVZ{Lc44M5q=@xDR?cGN+Hd7GfW#vt&fK#5q)x zDk=InfzfnVnC^W)+Hx=-<+F|m**NqL;Dr4L&ti$EWDbC<;^C=P>lTJ7<#mYDWyqFS zs6soK9uLqGi(Gv49jr~JVg6;Li&0)!Px(M(?k}Ffq=mt4?sa!L%m*^xC*R;QoIIBj zMIuXDR8G90PAF}T_*P3iXa8#!O3Syp+s$<~X+vps&SS|5DQ_CX5%0q$S^67_eXvfJoIKzk&k5MdQ_fH>;&TA_#Yfzc^ zt)(Z0e9FeTcp|5q@CeyF)PeJk&t}=acbIQFw~lx1xs-WTE%c!cs7Pka-lh#90b$dF z2sme$@X^F}(VVO324M*TU%_?Y1Pey(U9bRX+V}v~hHPe)@@~S!?YSjDJfj}()+PE`vR01C|{KK99^LZwi$50NhuRp%cPptSn!^KYpMhvNH36JFr3XPW;ZHKG;OB8(b;IjfL1X81R|}G&yruIW@U=J zr~Y;O)g(~;ngh}+-Nr1OJrS-1Rev^7Iz%Zjy>7XOqZch^@yO z2(rETXU&Wr_(4`+pg-G6DJ>~;w4~kNv2RG0*4~RKuqk0PM#A|qpaT{}Va5N-;Gx}f zCI=GE*CXx!m*-#=yoZc)iAI!ZCg3s=mYfKQvR*VORr%fEh_Q0zU1dDSq_rw8`dYG3 zF-pU3KrI7$QYG^|5%MrJHU8YV4ZYbvwmh@|w_Kl0-c%`SJ0Garb=4n`%yjFz+6HXz z@?pr%aTeAAAgyg>@7-#p`~A4d;nhANpJvQg(WYJDDq8Avl0K~eBMbAQ5NHP25izLl z`Oml->iVj0l&13$AvtDfold;ij=}q4(bDX+M!!66Uu zeoX|2g@u*`C{hsJm|TCo@F;}URp+KQxo^*EP}K|4V13-Q@7IjjQjxaOl9R%u;r&DU zT=0d+Hfs(g-{|>(zkH4%x)~5)HZ*rPJ^b0Re<`kNFwJ7rv*iDG;w_e#=o-~oY zU#AF|WXvO-Uj6qjGfr$4Pwa9|pv3n=yvfdq2j@Oh=u!;iCdG9M;F~z{#O_7<+rYn6L`{z}RonLZgQh@5E7Z_{iy@h~<>;ioAOhzJ=5<5JW> zTpp?&$Wm=*5R=ETB2-wVi+)(f-M^*GVPO>7q0chEo$z)>98I^Gcs@EVd8XV7`Nde;w*4vG!&T^FYj_3i~D2XiBfbHIs&w1ck#iFj|mw{uJ(gH}1<`6m&_ zSUg#o^44qZ%mHbL>&x!~42n5~8sd3O(72h#`WA>9lqr%G{-qZBo2OIKAO+wFIKaL? z)qk1zzK0FJpnx9!+L<9v0f+*C!Ld1p~6;1OgWvu&Y?$T-8exUa~-V=!>n# zgLDL=fQ;y%3r=_mh^Zv6li7}l!XX5#W@?&5ECp@_u_M<&s^|k`0?xwa^kgY|lGW!L zVN5zBED{b}$hJ?;glHzg^pzarDzz=j3Y0U?~XEm{ZcnHDD`%2c+O zCZR75KE$&a*0CCwxIv&n(LBeqmP>hkDN9dM=%Wb&#RK~h;zzlXg68^;sS{4UrB}Ad z7U08h(cal;A5~48V?BLU&ns<}Mt)3zgH?EdmUts*_#6FgS5U$HcJ@xiAb~xP{VjM< zNIteyT9luMPigdH@)6Z1`iXdtnt8KVpgd$)(mi2aD`xjvzKJBv@$airmda8ckNYD7 z3`azG&L;9-fH;r)-UQ^Y#~Ja4LV;3Z$ELr|YD11J6f>>**JMrQ-rC(CquloT1J-d&H@ z7H$vgkhv@i+pTu0R%>pIc2FarB9*yZh2z<{&?FVU%R>t8pr^d%M7{uH6Y zCBHo2M2=s^dbF@TbL9;S`i+_rh^Wq`Y@x<6T>n0&3eGR-QyW|nkt`}v2~F!@7)x-k zkTAg71L>N&yvQ0Huuyhg16)SLLd5xZtW9Y8gsKj#8hw^cZ3v&+d!PyLR<&LW>i|C} zQA8t)3S=`b+j7`iEE^<{V_R;k(<#|9Jc(cgAf}(nDoDirZ5Wiz%^$OZ=SK?`6pUrV7$BxU%u;pk7L#tCyH9FX3kf z#;5zPca3i~*r28~va_(d-%ML(p3>!c$8-AwW1M;)Yj@XD6o|u<;JuBX3gsyMmln~b@g=txa{YsWiP3K&xFp*cZ#}n z0bzigg3~7FHr0c=PYp0Ma_XBMji&S9E{bIoemP=w;HT`JscyS8BZQ*#%Bfl9Y*lZk zbGr{Vb2%Q-Y#@N-tpPyItmT*zHq2U+YUVP|$@M!cHj6l%GD=8;1M0Sbq_W|&8lsad zP_NVwuN^ORU4+?(oTk&!(voVo>(r`h$MHwkf_h2Fp}xF1w5F|RReZTz83H!oHi>lq zU!ocxj$cBbWr3molc?qg7G)I5JBrv1fzm%YkAL%`IO>vfOyvz$4KE}k2lDb}ks#Lc z5wfE))YU0HNZRl4znX{lV%wJt=p0~Ef`@|BNfPImr^L1NjqE7~=JhdOMQ;Aop*zfAg<~SJ z#7A5ystK?P5-6<$rvxM_TA}mfu<8B^%c#MnJEk4~l8n!DJs%G@+f$J<)%&d7?A1tp z^F-4h2DXt_)aHRJ(CW)CnP5d9sBn=tTb0hhUrq5mcie_Pm7iJ533z&pZ5_}@Z|*_X zzOa@AA?6VQoCF1h|J+n{?%sT9xHh%#Q@0NngS>!ePYs>g2dSTg3X6D{=50&%puJbH zq<$fJ^X^+RBZ2NaccZ9vR{1zpYyM+l!`zTJhr>rGl1|liwy2prj*$l!MaJozfDL(nvD`!bk`L(y2&`BOy6- zcgN7ozz}l}-n;HvcdfhD{eFJ`W}VsR?7iO|@AE!yh%5zISPf~^v@{0@WeYQqdmh); zKLAoe0P=x@%RLIpcMF3ObJs$BFi5q|XlT4W7E`?&(Mg1OFB|FAXz#la5g_9nM5HOd zKR|2N?_&n_3~v96Qes8@BX)$s>Z_fd}Zyf%E~rE8IzW z1F_60f3MeyyQ;V(RW!$;Jw!kN1$$@xuF-hRa`8$>EL0y(L3hv*j zEV`bf&5UtC*=e-jF9EaIxfGpjYtgKt8)vSHz1j(a2_u7vCitL7YGWp8b0mt>>qf95cx>H5(xPdF!cNWpgd0GB<)1uXaTb-1ED6@h&t`>ma-r_hKLQk zj99S+@@99pt;J)kyFLy3-j&5l9P8{C?q*}sm}Y4_fH_Bo#Wo$RoL#lluGi zk#IeG*_47IXu8TtFc6w%R8rn{_i)CfQAiTvgxp~gdaGl_G^IE;~Y5AY~(>d zs;UiIdjE7CcmIAJu!Wy<%`sZj#tf|>m_+@y7Crf2qEg-B_}Emy{a_s}_lqm5D$Qv* z3`i63R0UT{=m{8g?MjGAlqhO!*?3vBbSFb}^|MTMYDGZ}z|qvy<;p5PxeI3=d{t!N z(%w_eGRrGDZ5HX8pX3jcVz~YU2^36kn%|U2UmbEMr3n9J*Sh0bs@P_!dkP*>?7D$I z;>nK;!4=0VeI&NXRXIm#G`Op+X}U5!hUEic5`SqUb;uqg)5&w78gVB{1i1(z$2=RscN*kwq< z{qdkVvcDKdaQV9%_SxAc-PZ23YJ^i4FB0;|b#5RzPjGY~J2qRh0b^N@a|-Y3&F*wb z*Or93eQT1gYMBEwhj+(CwyUtJ73^Wh$VP7!OnJKTX=K^KqA;nLr|&)tl96-}ee*c?fm8(diRGYfolHHX~PP~H;gi>|3(J$uNBIjstW50ClQ zmZ6?U4K1O6g5m)Dt*K|j9JB}>P)(+pjj|qkRL{fc3!7dSKLEluJGr9sCs!Tjtg$td zWASvO+25B*XAS_5U#M)lr*7{pag77Inp*?ycq0Ti*c1pz5vQ-4zst!>%GYaJtBBke z>MQlcyd6Cy|B%CL@jbmvqGpN~4@o~0N@Pb~tLxGWrt&^CEwQt>czFhz)r|sb|?M0Urw%^XZ zvu&|z1^9VZ(_hiDRA_&=y$w(1(UT!S#)hz#J*3$!{vr&rgL>Tbe{AT#j$JDwx)pg+ zq_&@|z6vLAeeTqz5LRf1PB40;F))4Kd#KH3(% zVB7ZvMPhm{j9bxeXBN6}--V06SnXTHoDd;-vBxz(nm9?8&`)CeW=4l6$5?Z#%-Fwu zeRQKm;E#7WdLob;EU6JI3{6&-P=#Rc-Da zzC!B7(LN&YjxY%peQrJ!$C$p)<)Marx-Z8eMk=V%epvV; z{I1*6;tR8bf{*l8DnfOFsY^roxjJ_Q(zISF^2_uVj+BLNp(?d|pRGcwwM&h(MeM~^ zecgUZ)ufsb)4xiH3?UOLDQj#W+RfzQ`YSN4x7a9R~&(UkGm5sw{rgKZfg#7U}$XpT=jDN^x5L0bnsd>MuO0}x?N zZIyyzzM{_-Z*_EN)QV<^zv4}`DGVy*y0dr6VVC|6RnVSu_ac7B_ zCn1DbkJoy)PY0~4emmOFqwRKQ%D2$#e$DwlXq{k*(8Du$E~|`?=lAYEk`KBPv)S2FLggOmEKwjoY|DTlTC?%y_7lvDlXR0>*~ z+m+5j>kIkyZ0jc(Mf66eLW=S=TyP?dN0Yd3+AcRCU5aujOIM0qs)wCm?B&l)LVV?l zF!nf2+L%KnMN(|+DijaIVq%^jQHG~WKmM`g)~~FLbCRrrF0+Ia^z#tOA#wpfM;>!g zq_TAHzqZMrsMRK!eh_{O4Ce~A&9BGLqI55x7fM;#MpRiO-E4|@(7a&DSiHms3P$)G zM*l4C)|321u}}KY;8&~vVDmCDz=VaytA+ZNZoXWj0sS%;20yiWbvYxNYRyl7!>1tQ zoJ|H4%(k0!eS2g$Tn1Y1(UC~|L$;*VpLlTm+5iSZER;hrfT72 zlgZ=V(#Ivm=e^nP*{*VxNuy;*6*2TNEg7F)`a&}y@I(LOQc~C_YK92D{nF{}@qsHAJ0@J-g#Cpg%r9%!XzG+FL&oEz_741~c+P5l%6T2z zuAGonc=S1}fye!H%1L3I9a;C8R;F~p--UOMIvz9 z(S!Qv2o|$As-cpcwMcJjtUoO_TbI97WZ2pYqi4?L%XzXu!Ukd*TsnRQHu4Qkb<$;M zl^5}}&mq^Df^ucBw8}G1PSn>Mtslf^T{-t_`a-u3!#?|9U`Zd^t2bv5(w4U6q^yT1 z1u+0kfyk6o|L*+pPYKss(+e-nu?y(_l&ycdQ77qLcs^Fdyf>%bp%v*LlRjWm019>^N?$TQzU=-m?A@JzPRDsac7{!Mzi~x0B(cQYamt6sZ2@y5 zt_^VW*hz&$o(vuigh_qZwf@@|XXnYihHfO^7YfmwZhBOe3dJw-aj^G#)I>L#k=e;8 zRWUz1HoN9J?O1YGoacIpS@QmBYWap%%|Q`8)kgXi=-267R&VSt&F}`?oCMGNVf^dI zfA9M43?H0rw%@0qJ8Ta>KK$M5UMVK*TAtm;hSmUBa}ZhQVlj$jXtT(Ceasfp8(po5 zsC=@N<1yb$r=`&|Vo);SV(vo6?#Z*-N4FU4DoLkP2m-CHE~UY z^!vQ8vuFP>WlPELQ*VhQP8}!JTJCDs?@tsiTMq@OiKepD8}I)0v-1a#l%3)^YN6V& zbI>cb1Y^e2Ig0i?H_wXL+ubg%{yOS>qJtGrRQ>85+q-A`#!Z$fUgvBK84TcNWK@&j zE_ZV#ZA|@T`7X6_x1Q~N*rXz(W0zA2;@twq-S@MOv&uE($>opTc+fAThZ~C-RvV>{ zPy!;Mf(b|ciVOWa&Tq`s=)D*w*_qI#($Ffci+H$?&xtdiE8jbgR`63h6Scis0aQ%s zX+D=@($>6WwTU?oI}_u*Nj!znT;8oeNH^0GZ+EN5biNLguWR~PHc%TVXDzovZA)lQ zrIF6nWTr$A((e-{*M94GRqJT3ee$4wwg+9`)PE(`jNY=jH&*M}%Da}I8@73@0dSlk zvc6?+KNGjxk3<+XKIC?}eI7LjE{T_X6}xg9v2iZjd#{-?OZ46MA-Kg7)t6sO3Y#yV z3pX_|PRFiRb0I`OP9hmec(D@=;GXUPH%%H~GiC%wOJ)>*VmGmUbH8CCL|n4!r>Q@@ zx8S`;fR2fwUZ{Dxf?p5XH9)&t`qR`Hsc;5qd+|7dC__CKY8GZoApZyyjGxOpTw zv(Chx-d*4&RIyEgeL;GnU+g2?oFyYzu3kKq5-{5m3hu`zyK#L-^1lC(nwluzk{;!( z)b5mJ!CN!BbK9p+*929J`cfuPE37j*EI>CC|uC2?GP$sCHiT0NpO z*;0&=)70UFsUpkmu@jR^^K2X?looeBH3hT2I{sWzVF>qL_~XBc4qcg1eF6Sx}BlCIwB*=Ai+DXDy?wWZ~(O!75D#H*5I)#)0l+-MnuCRC|KEib5t zm~(G7wm`H!?LocZJsW>H4-}%WqG`qDfFUaD@zZoAq>k-RITpi7O4H^Y5vC1h@8vzC z`HPNiLBqo1Va9Ipkn+b*soN+owT32_q{k&)WS>iwLQnetS6o~A`b2vq@EU~ux$P`X zf5=>iOZPolKjr1jOraYOE3q|xl09f{`G8zX<^|%9QN%`(*hl-DxrO~4D{8RY^=gGI zWpa7bZN`l5O4Q+Tc3J=ZKhlVDA37OJtFDBFyWI45M!-6`5Bys+NzT}f`>X#G4d*hw z)t>p+`MnsSMj^RR%w!{JrpE*_35LO3?oX1V|4o+z5GTuJ-?-u9(1f+#o@#aCBx{K0 zC?neCdK^fjeQsY>y{J7B)WL?DgdSIzeqVw-?6tZlzrbjP&D&a2Zc0e*LDOvaoQym^zxBu_(ULFq3o$2N0%sO@CR^R{eB8(0*ax$0*X81W zmTS8mMJ|olRYKa@{uEvL`EKe_^T*5CGP^Iln74+W6O3MxK(9}=knYO<5v4LuiT|#! zB{W%wCAWWV99xbPKmT)VmH<<8bQ5=F|k})GBReDKm#fyoQrTOq|Cf(xYTvXJPY-~yD*f4PB zvT=N>LFX~WHRbtVw_eLFu&Tem@u#l=yierIPXqw+1%>T7^dXyAXHqJ1fSc(^Z4_jt=7 z?R}m+ysy+L%5cDcyYPCC8w0BiAv=i-yug_1HZqZ|d)MV!wA5POZ8W5~v+R-n4`7$r zenuN7L_7BGDs`=Wg>y%@zx|?_DEne}C?`)RhF%~n@tnFSVehUNixb7Cs~z75gBrHH z^TgOqz)C3Pm}OBBDqs7WyyM2upIu9Inb2a8=}GwN$F(pr+9?7LC9VTW6dVKhVRdf* zNrC;3YxMuPc@rh{jDUPW2lf64-0C`eEs=4Rl@Oe^^)UPkb6vqWqA1H5XE+~V?k;fw z#T}UVAvK~{)K;#r(*vyAhg6WjgZ^2^y@U*nnP1Tho!&MUh50vBVVV?H_ni#fj6>))Bq7`ZQmFN&3^`YZre3W zS1D{dI1 zN^zJ5fjnHd<#Vw0wPU&NWMX{A!qdVgl=5)yWZ?BBnyv!%dov!8h8ANIr90~KC67Pi zH;**XFs;Y_D!VRHPx203&B3`#^Alpm4YHQAsfGE=jWm`{md$;pxUM9^aCTBqaNr5c z!R0v=XR(c&Kf|`8mT~BWd9E-(?tS-m*{{&Ip)FPpLSX9ZlVVfjMm=7$EaT8?<)}ag z!CQY2c)95!$B@UnbfiCz-HmY=Cq_pA$~(AO);FLvPSS1u97y;mq8PaeyDo0_|EgmD zkG=7~Y32X_UQwI`cjOt%eJ=rg^`L>?W1~|XUXXhURp7mLV&Dl#<=G3xa)?>Te*ky3 BaTWjo literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-2-1.png b/man/figures/README-unnamed-chunk-2-1.png new file mode 100644 index 0000000000000000000000000000000000000000..f47806cf41355d98ded63549f179619402968125 GIT binary patch literal 2422 zcmd6oS5Om*5{3hT&;&(#P@19?kAoQjXiZqcXgx*`g5C{;6A|Qg&F$hSIDoC%= zg47_L5JKx{O(9qD*($dk<(bLm`K=ceC5F-NvBO@a-GcyYd3oGjx zHa6C?XW7o3JIl^~j)UVoCkF=?CkHndCl5ClFAp~_FApCdFBr_n&kw$E0W2VJK~V6b zkf4CDkf4aL&?OP!%a=q%FN=s>6%`Y^A}J|;O;TLyn#6S}Nr<$R4CK13jI^9AL|#rt zK1D-8UIwZls|b}-Qj}LxQczZcswgX}-c(joRZ&;F0aL%J0aMk~P}9;>*VcmRXv1{1 zHS}~e_4Tw3^mPmkbd3!4ZW-y_zNK$`+rY%w5N={*3cqD$dfVL8*uu=@j=71Y1>EY6 zskNnaA{8-rKculq$g!QOU`_rl9ll!J2N#W>uGNG)4ZIt{G4=r-t(e@>{o?3 zB}KV};yl8u{L+#auL<}vLP2?HLB;Erm1Tuhy)+p@;Gil+L?=7y@4#_HCl>h_kJj@H`Fwzu!v>$*DXyE_|t-Zl1hH4(d;`+HjY zdt2Z4wG9y42m3pQ-ggWQ4UG)G8y)H*4R?$B0u~vojL|Gn0d}Q$usp z!{nKf`PmW5?C8QAiAo+@od2*y8DCzQSfNg?E>5j2O|36aZ?4X6uFY+&legFBcQz=y zo0N}R3!k>BdpnDN>@NNK^@|!aU2uA)O#b>dK>z?-_uoN7^dq;sMs{y);cqr*;F@NN?Md#OA`ZrWb46~4fcqiuCW*znjl>^5-s}7T;w6* zS?Xc`8QrUa2#qq_kd=cZZ1pgNlItj=4C@D~L5C6deomzZNG==~U&&suEZovyQGl~fC=$+C<|MwH;2uYOL`g*%k{zl;TlTNzSVDrE1&yeg>d2~t zkz>e0yX$=jygcrW6ZwiH$rD+Ho-pYqq7E!jvy~H5<`Bqed*jX5)57K3jl;^v%SBk_ z``2eNpeZj$Xl2S5I$t~JN-YLV&`ttUsynGo8FjW?*hcB=0eTCmpM9BdvEP<_XHb_A za>jdp_Z*mvG{fj=4|K0$eHefTNj^dNcZ3tBXD7RClK#gRuL8g9CT8yQE*G{(=0($`ug9*J0tvvXxrZg#Y2ThjDoMr7LP z(o4FXJaeZCIr#1z)SJu}?2i~o?11uOFEI$C*>F6LUjF%!Z!XlY4EW`aE6%&3W|@i+ z_=1pDb^`G}6{!{>C9v;-r&ZYgg5+M#+T4ZX4bq0z%ISVW{`812@il9$6N^(Gfknzh zcGZ7`N$%>nb0&jb7BI-+*1>!?haRFFq-09D4WG2X1{zWXvR1@mY!%lv`)r5~ai=%b z5RM;z@eO%1uh2x1IaqVAlRrN1t|vn?P*(}4%IJsnQ4}V1w!-jbwgTDFBU?d>&HD=V zq%-nw*;pnTgsv>bfh3;Pj)HfHgMyBTLKu(UMHzJ8d=34GQ^7^C!?rI^4kEgE&II?g zm2}nL##UlL8>j28-)rZ}8#hXd8rxUdg`Rp^aT8`^q5DB}`q_4D$7&(uhJP_sYcGJt zg95@?3aj%uhSfL1x>zb&Pz}l(%PKR-!%1ky&Jd+L@BCR_L8nLD-vhAUf8iDU8ti%6 zeSYxP&(vxaLdO5>Zv*=-yNa=m)JlU*1{q=nL&1-?(hw+jL%m%7go2R0^s<)bE7P{- zWe6d}wQ(4I;8z>e=wM&ac_RUu(T8n7{Nl`9re4xjOV_|b5o+aC=c7A?VVlP*lAi`^ zXnVc()Y6`Ae_ueZs2iE`IBk`UDkp`nLh7*Y>-jEEZ~ODTa9!6;pGB|ItAmzx4DH{)W|O8`>}{h3RX*VTEeVNmeBPtNssgu>;pmC{Wq?jyc_gqcHOS71jP5 zZXfaz%o+q1)uPROqmKZFO*Ef?Vr!trv-ouWe-=+@P<$&^hcB%MPCpaCK*w0SQqwW! EFZUOCWB>pF literal 0 HcmV?d00001 diff --git a/man/print.palette.Rd b/man/print.palette.Rd new file mode 100644 index 0000000..faf67f2 --- /dev/null +++ b/man/print.palette.Rd @@ -0,0 +1,16 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/utils.R +\name{print.palette} +\alias{print.palette} +\title{Print function for palettes} +\usage{ +\method{print}{palette}(x, ...) +} +\arguments{ +\item{x}{An object of class `palette`} + +\item{...}{Additional arguments to print} +} +\description{ +Print function for palettes +} diff --git a/man/theme_acdc.Rd b/man/theme_acdc.Rd index f914b90..285deeb 100644 --- a/man/theme_acdc.Rd +++ b/man/theme_acdc.Rd @@ -2,6 +2,7 @@ % Please edit documentation in R/africa_cdc.R \name{theme_acdc_light} \alias{theme_acdc_light} +\alias{theme_acdc_dark} \title{A [ggplot2] theme using Africa CDC fonts, colours, and palettes} \usage{ theme_acdc_light( @@ -23,7 +24,7 @@ theme_acdc_light( caption_family = base_family, caption_size = 9, caption_face = "italic", - caption_colour = acdc_green, + caption_colour = acdc_gold, caption_margin = 10, axis_text_size = base_size, axis_title_family = subtitle_family, @@ -38,38 +39,126 @@ theme_acdc_light( axis = FALSE, ticks = FALSE ) + +theme_acdc_dark( + base_family = set_acdc_font(), + base_size = 11.5, + plot_title_family = base_family, + plot_title_size = 18, + plot_title_face = "bold", + plot_title_colour = acdc_green, + plot_title_margin = 10, + subtitle_family = base_family, + subtitle_size = 12, + subtitle_face = "plain", + subtitle_colour = acdc_black, + subtitle_margin = 15, + strip_text_family = base_family, + strip_text_size = 12, + strip_text_face = "plain", + caption_family = base_family, + caption_size = 9, + caption_face = "italic", + caption_colour = acdc_black, + caption_margin = 10, + axis_text_size = base_size, + axis_title_family = subtitle_family, + axis_title_size = 9, + axis_title_colour = acdc_black, + axis_title_face = "plain", + axis_title_just = "rt", + plot_margin = ggplot2::margin(30, 30, 30, 30), + grid_col = acdc_green, + grid = TRUE, + axis_col = acdc_green, + axis = FALSE, + ticks = FALSE +) } \arguments{ -\item{base_family}{Base font family. Default is set by what is available in -the sytem via `set_acdc_font()`.} +\item{base_family}{Base font family using Africa CDC fonts. Default is set +by what Africa CDC font is available in the sytem via `set_acdc_font()`. If +none of the Africa CDC fonts are available, the default becomes Noto Sans.} + +\item{base_size}{Base font size. Default is 11.5.} + +\item{plot_title_family}{Font family to use for the plot title. Default is +`base_family`.} + +\item{plot_title_size}{Plot title text size in pts. Default is 18.} + +\item{plot_title_face}{Font face ("plain", "italic", "bold", "bold.italic") +for plot title. Default is "bold".} + +\item{plot_title_colour}{Colour of the plot title text. Default +is `acdc_green`.} + +\item{plot_title_margin}{Margin at the bottom of the plot title. Default +set at 10.} + +\item{subtitle_family}{Font family to use for the plot subtitle. Default is +`base_family`.} + +\item{subtitle_size}{Plot subtitle text size in pts. Default is 12.} + +\item{subtitle_face}{Font face ("plain", "italic", "bold", "bold.italic") +for plot subtitle. Default is "plain".} + +\item{subtitle_colour}{Colour of the subtitle text. Default is `acdc_gold`.} + +\item{subtitle_margin}{Margin at the bottom of the plot subtitle. Default +set at 15.} + +\item{strip_text_family}{Font family to use for the facet label. Default is +`base_family`.} + +\item{strip_text_size}{Facet label text size in pts. Default is 12.} + +\item{strip_text_face}{Font face ("plain", "italic", "bold", "bold.italic") +for facet label. Default is "plain".} + +\item{caption_family}{Font family to use for the caption text. Default is +`base_family`.} + +\item{caption_size}{Caption text size in pts. Default is 9.} + +\item{caption_face}{Font face ("plain", "italic", "bold", "bold.italic") for +caption text. Default is "plain".} -\item{base_size}{Base font size. Default is 11.5} +\item{caption_colour}{Colour of the caption text. Default is `acdc_gold`.} -\item{plot_title_family, plot_title_face, plot_title_size, plot_title_margin, plot_title_colour}{plot title family, face, size and margi} +\item{caption_margin}{Margin at the top of the plot caption text. Default is +set at 10.} -\item{subtitle_family, subtitle_face, subtitle_size, subtitle_colour}{plot subtitle family, face and size} +\item{axis_text_size}{Axis text size in pts. Default is `base_size`.} -\item{subtitle_margin}{plot subtitle margin bottom (single numeric value)} +\item{axis_title_family}{Font family to use for the axis title. Default is +`base_family`.} -\item{strip_text_family, strip_text_face, strip_text_size}{facet label font family, face and size} +\item{axis_title_size}{Axis title text size in pts. Default is 9.} -\item{caption_family, caption_face, caption_size, caption_margin, caption_colour}{plot caption family, face, size and margin} +\item{axis_title_colour}{Colour of the axis title text. Default is +`acdc_gold`.} -\item{axis_text_size}{font size of axis text} +\item{axis_title_face}{Font face ("plain", "italic", "bold", "bold.italic") +for axis title. Default is "plain".} -\item{axis_title_family, axis_title_face, axis_title_size, axis_title_colour}{axis title font family, face and size} +\item{axis_title_just}{Axis title font justification, one of +"bl" (bottom-left), "m" (middle), "rt" (right-top). Default is "rt".} -\item{axis_title_just}{axis title font justification, one of `[blmcrt]`} +\item{plot_margin}{Plot margins (specify with `ggplot2::margin()`)} -\item{plot_margin}{plot margin (specify with `ggplot2::margin()`)} +\item{grid_col}{Grid colour. Default to `acdc_gold`.} -\item{grid_col, axis_col}{grid & axis colors; both default to `#cccccc`} +\item{grid}{Panel grid. Either `TRUE`, `FALSE`, or a combination of +`X` (major x grid), `x` (minor x grid), `Y` (major y grid), and/or +`y` (minor y grid). Default is TRUE.} -\item{grid}{panel grid (`TRUE`, `FALSE`, or a combination of `X`, `x`, `Y`, `y`)} +\item{axis_col}{Axis colors. Default to `acdc_gold`.} -\item{axis}{add x or y axes? `TRUE`, `FALSE`, "`xy`"} +\item{axis}{Add x or y axes? `TRUE`, `FALSE`, "`xy`". Default is FALSE.} -\item{ticks}{ticks if `TRUE` add ticks} +\item{ticks}{Logical. Should ticks be added? Default is FALSE.} } \value{ A [ggplot2] theme.