From 045e277cb62baeecfc894ed9487fc5c0b97ab84a Mon Sep 17 00:00:00 2001 From: gnoblet Date: Thu, 10 Nov 2022 18:09:40 +0100 Subject: [PATCH 01/12] Rewrite of `theme_reach()` --- R/theme_reach.R | 218 ++++++++++++++++++++++++++++-------------------- 1 file changed, 126 insertions(+), 92 deletions(-) diff --git a/R/theme_reach.R b/R/theme_reach.R index ee87ca4..93f2278 100644 --- a/R/theme_reach.R +++ b/R/theme_reach.R @@ -1,92 +1,126 @@ -#' @title Base REACH ggplot2 theme -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @description Give some reach colors and fonts to a ggplot. Based on theme_bw() -#' -#' @return The base REACH theme -#' -#' @export -theme_reach <- function(family = "Leelawadee") { - - rlang::check_installed("ggplot2", reason = "Package \"ggplot2\" needed for `theme_reach_*()` to work. Please install it.") - - ggplot2::theme_bw() + - ggplot2::theme( - title = ggplot2::element_text(family = family, - size = 12, - colour = "#58585A", - hjust = 0.5, - vjust = 0.5), - text = ggplot2::element_text(family = family, - colour = "#58585A"), - axis.title = ggplot2::element_text(size = 11), - axis.text = ggplot2::element_text(size = 10), - legend.text = ggplot2::element_text(size = 11), - strip.text = ggplot2::element_text(size = 11), - legend.title = ggplot2::element_text(size = 11) - ) -} - - - -#' @title Some REACH theme for ggplot -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_borders <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_rect(colour = "white", fill = "white", size = 0.5), - strip.background = ggplot2::element_rect(linetype = "solid", colour = "#58585A", fill = "white") - ) -} - - - -#' @title Some reach more minimal theme for a ggplot histogram -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for vertical bar charts. -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_hist <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_blank(), - strip.background = ggplot2::element_blank(), - panel.border = ggplot2::element_blank() - ) -} - - -#' @title Some reach more minimal theme for a ggplot flipped histogram -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for horizontal bar charts. -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_flip_hist <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_blank(), - strip.background = ggplot2::element_blank(), - panel.border = ggplot2::element_blank(), - axis.ticks.y = ggplot2::element_blank() - ) -} - - - +#' @title ggplot2 theme with REACH color palettes +#' +#' @param palette Palette name from 'pal_reach()'. +#' @param discrete Boolean indicating whether color aesthetic is discrete or not +#' @param reverse Boolean indicating whether the palette should be reversed +#' @param family The font family for all plot's texts. Default to "Leelawadee". +#' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. +#' @param title_size The size of the title text_family. Defaults to 14. +#' @param plot_background_pal The color for the plot background color. Default to white. +#' @param panel_background_pal The color for the panel background color. Default to white. +#' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". +#' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". +#' @param void Boolean to remove all elements from the plot. Default to FALSE. +#' @param ... Additional arguments passed to `ggblanket::gg_theme()`. +#' +#' +#' @description Give some reach colors and fonts to a ggplot. +#' +#' @return The base REACH theme +#' +#' @export +theme_reach <- function( + palette = "main", + discrete = TRUE, + reverse = FALSE, + family = "Leelawadee", + text_size = 10, + title_size = 14, + plot_background_pal = "#FFFFFF", + panel_background_pal = "#FFFFFF", + void = FALSE, + legend_position = "right", + legend_direction = "vertical", + ... + ) { + + # Basic simple theme + theme_reach <- ggblanket::gg_theme( + text_family = family, + text_size = text_size, + title_size = title_size, + plot_background_pal = plot_background_pal, + panel_background_pal = panel_background_pal, + void = void + ) + + + # Default legend to right position + theme_reach <- theme_reach + + ggplot2::theme(legend.position = legend_position) + + # Defaut legend to vertical direction + theme_reach <- theme_reach + + ggplot2::theme(legend.direction = legend_direction) + + # Add reach color palettes by default + theme_reach <- list( + theme_reach, + scale_color(palette = palette, discrete = discrete, reverse = reverse), + scale_fill(palette = palette, discrete = discrete, reverse = reverse) + ) + + + return(theme_reach) + +} + +#' @title Some REACH theme for ggplot +#' +#' @param family The font family. Default to "Leelawadee" +#' +#' @return A theme to be added to the "+" ggplot grammar +#' +#' @export +theme_reach_borders <- function(family = "Leelawadee") { + + theme_reach() + + ggplot2::theme( + panel.background = ggplot2::element_rect(colour = "white", fill = "white", size = 0.5), + strip.background = ggplot2::element_rect(linetype = "solid", colour = "#58585A", fill = "white") + ) +} + + + +#' @title Some reach more minimal theme for a ggplot histogram +#' @param family The font family. Default to "Leelawadee" +#' +#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for vertical bar charts. +#' +#' @return A theme to be added to the "+" ggplot grammar +#' +#' @export +theme_reach_hist <- function(family = "Leelawadee") { + + theme_reach() + + ggplot2::theme( + panel.background = ggplot2::element_blank(), + strip.background = ggplot2::element_blank(), + panel.border = ggplot2::element_blank() + ) +} + + +#' @title Some reach more minimal theme for a ggplot flipped histogram +#' +#' @param family The font family. Default to "Leelawadee" +#' +#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for horizontal bar charts. +#' +#' @return A theme to be added to the "+" ggplot grammar +#' +#' @export +theme_reach_flip_hist <- function(family = "Leelawadee") { + + theme_reach() + + ggplot2::theme( + panel.background = ggplot2::element_blank(), + strip.background = ggplot2::element_blank(), + panel.border = ggplot2::element_blank(), + axis.ticks.y = ggplot2::element_blank() + ) +} + + + From edbb9dd1f99f2358b6f9203887fc3081e8f3a20f Mon Sep 17 00:00:00 2001 From: gnoblet Date: Thu, 10 Nov 2022 18:09:55 +0100 Subject: [PATCH 02/12] Add ggblanket's minimal version --- DESCRIPTION | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 3f26708..0685c97 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -24,6 +24,6 @@ Imports: grDevices, glue, scales, - ggblanket + ggblanket >= 1.5.0 Suggests: knitr, sf VignetteBuilder: knitr From 5998a91891caac1d77993b23ea60b6827b3ca28d Mon Sep 17 00:00:00 2001 From: gnoblet Date: Thu, 10 Nov 2022 18:22:36 +0100 Subject: [PATCH 03/12] Remove unnecessary themes --- R/theme_reach.R | 60 ------------------------------------------------- 1 file changed, 60 deletions(-) diff --git a/R/theme_reach.R b/R/theme_reach.R index 93f2278..4658bfe 100644 --- a/R/theme_reach.R +++ b/R/theme_reach.R @@ -64,63 +64,3 @@ theme_reach <- function( return(theme_reach) } - -#' @title Some REACH theme for ggplot -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_borders <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_rect(colour = "white", fill = "white", size = 0.5), - strip.background = ggplot2::element_rect(linetype = "solid", colour = "#58585A", fill = "white") - ) -} - - - -#' @title Some reach more minimal theme for a ggplot histogram -#' @param family The font family. Default to "Leelawadee" -#' -#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for vertical bar charts. -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_hist <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_blank(), - strip.background = ggplot2::element_blank(), - panel.border = ggplot2::element_blank() - ) -} - - -#' @title Some reach more minimal theme for a ggplot flipped histogram -#' -#' @param family The font family. Default to "Leelawadee" -#' -#' @description Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for horizontal bar charts. -#' -#' @return A theme to be added to the "+" ggplot grammar -#' -#' @export -theme_reach_flip_hist <- function(family = "Leelawadee") { - - theme_reach() + - ggplot2::theme( - panel.background = ggplot2::element_blank(), - strip.background = ggplot2::element_blank(), - panel.border = ggplot2::element_blank(), - axis.ticks.y = ggplot2::element_blank() - ) -} - - - From d2ef1fdec4fe3211f2888b38235ea24ab12a12e6 Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 18:13:04 -0400 Subject: [PATCH 04/12] Correction to color palettes --- R/pal_reach.R | 133 +++++++++++++++++++++++++------------------------- 1 file changed, 66 insertions(+), 67 deletions(-) diff --git a/R/pal_reach.R b/R/pal_reach.R index 7482f7b..7472c08 100644 --- a/R/pal_reach.R +++ b/R/pal_reach.R @@ -1,67 +1,66 @@ -#' @title Return function to interpolate a REACH color palette -#' -#' @param palette Character name of a palette in REACH palettes -#' @param reverse Boolean indicating whether the palette should be reversed -#' @param color_ramp_palette Should the output be a `grDevices::colorRampPalette` function or a vector of hex codes? Default to the former with `TRUE` -#' @param show_palettes Should the ouput be the set of palettes names to pick from? Default to `FALSE` -#' @param ... Additional arguments to pass to colorRampPalette() -#' -#' @return A color palette -#' -#' @export -pal_reach <- function(palette = "main", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ...) { - - - palettes_reach <- list( - `main` = cols_reach("main_grey", "main_red", "main_lt_grey", "main_beige"), - `primary` = cols_reach("main_grey", "main_red"), - `secondary` = cols_reach("main_lt_grey", "main_beige"), - `two_dots` = cols_reach("two_dots_1", "two_dots_2"), - `two_dots_flashy` = cols_reach("two_dots_flashy_1", "two_dots_flashy_2"), - `red_main` = cols_reach("red_main_1", "red_main_2", "red_main_3", "red_main_4", "red_main_5"), - `red_main_5` = cols_reach("red_main_1", "red_main_2", "red_main_3", "red_main_4", "red_main_5"), - `red_alt` = cols_reach("red_alt_1", "red_alt_2", "red_alt_3", "red_alt_4", "red_alt_5"), - `red_alt_5` = cols_reach("red_alt_1", "red_alt_2", "red_alt_3", "red_alt_4", "red_alt_5"), - `iroise` = cols_reach("iroise_1", "iroise_2", "iroise_3", "iroise_4", "iroise_5"), - `iroise_5` = cols_reach("iroise_1", "iroise_2", "iroise_3", "iroise_4", "iroise_5"), - `discrete_6` = cols_reach("dk_grey", "red_main_1", "main_beige", "red_main_2", "lt_grey_2", "red_4"), - `red_2` = cols_reach("red_less_4_1", "red_less_4_3"), - `red_3` = cols_reach("red_less_4_1", "red_less_4_2", "red_less_4_3"), - `red_4` = cols_reach("red_less_4_1", "red_less_4_2", "red_less_4_3", "red_less_4_4"), - `red_5` = cols_reach("red_5_1", "red_5_2", "red_5_3", "red_5_4", "red_5_5"), - `red_6` = cols_reach("red_less_7_1", "red_less_2", "red_less_7_3", "red_less_7_4", "red_less_7_5", "red_less_7_6"), - `red_7` = cols_reach("red_less_7_1", "red_less_7_2", "red_less_7_3", "red_less_7_4", "red_less_7_5", "red_less_7_6", "red_less_7_7"), - `green_2` = cols_reach("green_2_1", "green_2_2"), - `green_3` = cols_reach("green_3_1", "green_3_2", "green_3_3"), - `green_4` = cols_reach("green_4_1", "green_4_2", "green_4_3", "green_4_4"), - `green_5` = cols_reach("green_5_1", "green_5_2", "green_5_3", "green_5_4", "green_5_5"), - `green_6` = cols_reach("green_6_1", "green_6_2", "green_6_3", "green_6_4", "green_6_5", "green_6_6"), - `green_7` = cols_reach("green_7_1", "green_7_2", "green_7_3", "green_7_4", "green_7_5", "green_7_6", "green_7_7"), - `artichoke_2` = cols_reach("artichoke_2_1", "artichoke_2_2"), - `artichoke_3` = cols_reach("artichoke_3_1", "artichoke_3_2", "artichoke_3_3"), - `artichoke_4` = cols_reach("artichoke_4_1", "artichoke_4_2", "artichoke_4_3", "artichoke_4_4"), - `artichoke_5` = cols_reach("artichoke_5_1", "artichoke_5_2", "artichoke_5_3", "artichoke_5_4", "artichoke_5_5"), - `artichoke_6` = cols_reach("artichoke_6_1", "artichoke_6_2", "artichoke_6_3", "artichoke_6_4", "artichoke_6_5", "artichoke_6_6"), - `artichoke_7` = cols_reach("artichoke_7_1", "artichoke_7_2", "artichoke_7_3", "artichoke_7_4", "artichoke_7_5", "artichoke_7_6", "artichoke_7_7"), - `blue_2` = cols_reach("blue_2_1", "blue_2_2"), - `blue_3` = cols_reach("blue_3_1", "blue_3_2", "blue_3_3"), - `blue_4` = cols_reach("blue_4_1", "blue_4_2", "blue_4_3", "blue_4_4"), - `blue_5` = cols_reach("blue_5_1", "blue_5_2", "blue_5_3", "blue_5_4", "blue_5_5"), - `blue_6` = cols_reach("blue_6_1", "blue_6_2", "blue_6_3", "blue_6_4", "blue_6_5", "blue_6_6"), - `blue_7` = cols_reach("blue_7_1", "blue_7_2", "blue_7_3", "blue_7_4", "blue_7_5", "blue_7_6", "blue_7_7") - ) - - if (show_palettes) return(names(palettes_reach)) - - pal <- palettes_reach[[palette]] - - if (reverse) pal <- rev(pal) - - if (color_ramp_palette) { - rlang::check_installed("grDevices", reason = "Package \"grDevices\" needed for `pal_reach()` woth 'color_ramp_palette' set to `TRUE` to work. Please install it.") - - pal <- grDevices::colorRampPalette(pal, ...) - } - - return(pal) -} +#' @title Return function to interpolate a REACH color palette +#' +#' @param palette Character name of a palette in REACH palettes +#' @param reverse Boolean indicating whether the palette should be reversed +#' @param color_ramp_palette Should the output be a `grDevices::colorRampPalette` function or a vector of hex codes? Default to the former with `TRUE` +#' @param show_palettes Should the ouput be the set of palettes names to pick from? Default to `FALSE` +#' @param ... Additional arguments to pass to colorRampPalette() +#' +#' @return A color palette +#' +#' @export +pal_reach <- function(palette = "main", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ...) { + + palettes_reach <- list( + `main` = cols_reach("main_grey", "main_red", "main_lt_grey", "main_beige"), + `primary` = cols_reach("main_grey", "main_red"), + `secondary` = cols_reach("main_lt_grey", "main_beige"), + `two_dots` = cols_reach("two_dots_1", "two_dots_2"), + `two_dots_flashy` = cols_reach("two_dots_flashy_1", "two_dots_flashy_2"), + `red_main` = cols_reach("red_main_1", "red_main_2", "red_main_3", "red_main_4", "red_main_5"), + `red_main_5` = cols_reach("red_main_1", "red_main_2", "red_main_3", "red_main_4", "red_main_5"), + `red_alt` = cols_reach("red_alt_1", "red_alt_2", "red_alt_3", "red_alt_4", "red_alt_5"), + `red_alt_5` = cols_reach("red_alt_1", "red_alt_2", "red_alt_3", "red_alt_4", "red_alt_5"), + `iroise` = cols_reach("iroise_1", "iroise_2", "iroise_3", "iroise_4", "iroise_5"), + `iroise_5` = cols_reach("iroise_1", "iroise_2", "iroise_3", "iroise_4", "iroise_5"), + `discrete_6` = cols_reach("dk_grey", "red_main_1", "main_beige", "red_main_2", "lt_grey_2", "red_4"), + `red_2` = cols_reach("red_less_4_1", "red_less_4_3"), + `red_3` = cols_reach("red_less_4_1", "red_less_4_2", "red_less_4_3"), + `red_4` = cols_reach("red_less_4_1", "red_less_4_2", "red_less_4_3", "red_less_4_4"), + `red_5` = cols_reach("red_5_1", "red_5_2", "red_5_3", "red_5_4", "red_5_5"), + `red_6` = cols_reach("red_less_7_1", "red_less_2", "red_less_7_3", "red_less_7_4", "red_less_7_5", "red_less_7_6"), + `red_7` = cols_reach("red_less_7_1", "red_less_7_2", "red_less_7_3", "red_less_7_4", "red_less_7_5", "red_less_7_6", "red_less_7_7"), + `green_2` = cols_reach("green_2_1", "green_2_2"), + `green_3` = cols_reach("green_3_1", "green_3_2", "green_3_3"), + `green_4` = cols_reach("green_4_1", "green_4_2", "green_4_3", "green_4_4"), + `green_5` = cols_reach("green_5_1", "green_5_2", "green_5_3", "green_5_4", "green_5_5"), + `green_6` = cols_reach("green_6_1", "green_6_2", "green_6_3", "green_6_4", "green_6_5", "green_6_6"), + `green_7` = cols_reach("green_7_1", "green_7_2", "green_7_3", "green_7_4", "green_7_5", "green_7_6", "green_7_7"), + `artichoke_2` = cols_reach("artichoke_2_1", "artichoke_2_2"), + `artichoke_3` = cols_reach("artichoke_3_1", "artichoke_3_2", "artichoke_3_3"), + `artichoke_4` = cols_reach("artichoke_4_1", "artichoke_4_2", "artichoke_4_3", "artichoke_4_4"), + `artichoke_5` = cols_reach("artichoke_5_1", "artichoke_5_2", "artichoke_5_3", "artichoke_5_4", "artichoke_5_5"), + `artichoke_6` = cols_reach("artichoke_6_1", "artichoke_6_2", "artichoke_6_3", "artichoke_6_4", "artichoke_6_5", "artichoke_6_6"), + `artichoke_7` = cols_reach("artichoke_7_1", "artichoke_7_2", "artichoke_7_3", "artichoke_7_4", "artichoke_7_5", "artichoke_7_6", "artichoke_7_7"), + `blue_2` = cols_reach("blue_2_1", "blue_2_2"), + `blue_3` = cols_reach("blue_3_1", "blue_3_2", "blue_3_3"), + `blue_4` = cols_reach("blue_4_1", "blue_4_2", "blue_4_3", "blue_4_4"), + `blue_5` = cols_reach("blue_5_1", "blue_5_2", "blue_5_3", "blue_5_4", "blue_5_5"), + `blue_6` = cols_reach("blue_6_1", "blue_6_2", "blue_6_3", "blue_6_4", "blue_6_5", "blue_6_6"), + `blue_7` = cols_reach("blue_7_1", "blue_7_2", "blue_7_3", "blue_7_4", "blue_7_5", "blue_7_6", "blue_7_7") + ) + + if (show_palettes) return(names(palettes_reach)) + + pal <- palettes_reach[[palette]] + + if (reverse) pal <- rev(pal) + + if (color_ramp_palette) { + rlang::check_installed("grDevices", reason = "Package \"grDevices\" needed for `pal_reach()` with 'color_ramp_palette' set to `TRUE` to work. Please install it.") + + pal <- grDevices::colorRampPalette(pal, ...) + } + + return(pal) +} From efc9e0ffefd0340efa6dc0cdeb4bc70140c5b66e Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 18:54:18 -0400 Subject: [PATCH 05/12] `bar_reach()` added Replace hbar Follow REACH theme by default --- R/bar.R | 74 +++++++++++++++++++++++++++ R/hbar.R | 152 ------------------------------------------------------- 2 files changed, 74 insertions(+), 152 deletions(-) create mode 100644 R/bar.R delete mode 100644 R/hbar.R diff --git a/R/bar.R b/R/bar.R new file mode 100644 index 0000000..8614ffe --- /dev/null +++ b/R/bar.R @@ -0,0 +1,74 @@ +#' @title Simple bar chart +#' +#' @param df A data frame. +#' @param x A numeric column. +#' @param y A character column or coercible as a character column. +#' @param group Some grouping categorical column, e.g. administrative areas or population groups. +#' @param palette Palette name from 'pal_reach()'. +#' @param percent TRUE or FALSE. Should the x-labels be displayed as percentages? Default to TRUE. +#' @param reverse Boolean indicating whether the palette should be reversed. +#' @param family The font family for all plot's texts. Default to "Leelawadee". +#' @param alpha Transparency. +#' @param width Width. +#' @param x_title The x scale title. Default to NULL. +#' @param y_title The y scale title. Default to NULL. +#' @param group_title The group legend title. Default to NULL. +#' @param position Should the chart be stacked? Default to "dodge". Can take "dodge" and "stack". +#' @param title Plot title. Default to NULL. +#' @param subtitle Plot subtitle. Default to NULL. +#' @param caption Caption title string. Default to NULL. +#' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. +#' @param title_size The size of the title text. Defaults to 14. +#' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". +#' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". +#' @param void Boolean to remove all elements from the plot. Default to FALSE. +#' @param ... Other arguments to be passed to "ggblanket::gg_col" +#' +#' @description `ggblanket` as internals for deciding whether the bar chart is horizontally readable. +#' +#' @return A bar chart +#' +#' @export +bar_reach <- function(df, x, y, group = NULL, percent = TRUE, palette = "main", reverse = FALSE, family = "Leelawadee", alpha = 1, width = 0.5, x_title = NULL, y_title = NULL, group_title = NULL, position = "dodge", title = NULL, subtitle = NULL, caption = NULL, text_size = 10, title_size = 14, legend_position = "right", legend_rev = TRUE, void = FALSE, ...){ + + pal <- pal_reach(palette) + + if(is.null(pal)) rlang::warn( + c(paste0("There is no palette '", palette, "' for initiative 'reach'. Fallback to ggblanket's default color palette."), + "i" = paste0("Use `pal_reach(show_palettes = T)` to see the list of availabale palettes.") + ) + ) + + if (percent) x_labels <- scales::percent else x_labels <- NULL + + hbar <- df |> + ggblanket::gg_col(x = {{ x }}, + y = {{ y }}, + col = {{ group }}, + x_title = x_title, + x_labels = x_labels, + y_title = y_title, + col_title = group_title, + alpha = alpha, + width = width, + position = position, + title = title, + subtitle = subtitle, + caption = caption, + col_legend_place = legend_position, + theme = theme_reach( + palette = palette, + reverse = reverse, + family = family, + text_size = text_size, + title_size = title_size, + plot_background_pal = "#FFFFFF", + panel_background_pal = "#FFFFFF", + legend_reverse = legend_rev, + void = FALSE + ), + ... + ) + + return(hbar) +} diff --git a/R/hbar.R b/R/hbar.R deleted file mode 100644 index 71af205..0000000 --- a/R/hbar.R +++ /dev/null @@ -1,152 +0,0 @@ -#' @title Simple horizontal bar chart -#' -#' @param .tbl Some data -#' @param x Some numeric column on the x scale -#' @param y Some column on the y scale -#' @param group Some grouping categorical column, e.g. administrative areas -#' @param initiative Either "reach" or "agora" or "impact" for the color palette -#' @param palette The color palette from the initiative -#' @param width Width -#' @param x_title The x scale title. Default to empty string -#' @param y_title The y scale title. Default to empty string -#' @param group_title The group legend title. Defaut to NULL -#' @param font_family The font family. Default to "Leelawadee" -#' @param position Should the chart be stacked? Default to dodge -#' @param reverse Boolean indicating whether the color palette should be reversed -#' @param title Plot title. Default to empty string -#' @param subtitle Plot subtitle. Default to empty string -#' @param gg_theme Some ggplot2 theme -#' @param ... Other arguments to be passed to "ggblanket::gg_col" -#' -#' @return A horizontal bar chart -#' -#' @export -hbar <- function(.tbl, x, y, group = NULL, initiative = "reach", palette = "primary", width = 0.5, x_title = "", y_title = "", group_title = NULL, font_family = "Leelawadee", position = "dodge", reverse = FALSE, title = "", subtitle = "", gg_theme = NULL, ...){ - - - if (!(initiative %in% c("reach", "agora", "impact"))) rlang::abort(c("Wrong `initiative` arg", "*" = paste0("Arg `initiative` cannot be: ", initiative), "i" = "It must be one of 'reach' or 'agora' or 'impact'")) - - if (initiative == "reach") { - palette <- pal_reach(palette, reverse = reverse) - main_col <- cols_reach("main_grey") - - if(is.null(palette)) rlang::warn( - c(paste0("There is no palette '", palette, "' for initiative 'reach'. Fallback to ggblanket's default color palette."), - "i" = paste0("Use `pal_reach(show_palettes = T)` to see the list of availabale palettes.") - ) - ) - } - - if (initiative == "agora") { - palette <- pal_agora(palette, reverse = reverse) - main_col <- cols_agora("main_bordeaux") - - - if(is.null(palette)) rlang::warn( - c(paste0("There is no palette '", palette, "' for initiative 'agora'. Fallback to ggblanket's default color palette."), - "i" = paste0("Use `pal_agora(show_palettes = T)` to see the list of availabale palettes.") - ) - ) - } - - if (initiative == "impact") rlang::warn("IMPACT colors are under development. Fallback to ggblanket's default.") - - hbar <- .tbl |> - ggblanket::gg_col(x = {{ x }}, - y = {{ y }}, - col = {{ group }}, - x_title = x_title, - y_title = y_title, - col_title = group_title, - alpha_fill = 1, - pal = palette, - width = width, - position = position, - stat = "identity", - title = "", - subtitle = "", - theme = gg_theme, - ... - ) - - return(hbar) -} - - - -#' @title Simple horizontal bar chart which scales x_labels to percentages -#' -#' @param .tbl Some data -#' @param x Some numeric column on the x scale -#' @param y Some column on the y scale -#' @param group Some grouping categorical column, e.g. administrative areas -#' @param initiative Either "reach" or "agora" or "impact" for the color palette -#' @param palette The color palette from the initiative -#' @param width Width -#' @param x_title The x scale title. Default to empty string -#' @param y_title The y scale title. Default to empty string -#' @param group_title The group legend title. Defaut to NULL -#' @param font_family The font family. Default to "Leelawadee" -#' @param position Should the chart be stacked? Default to dodge -#' @param reverse Boolean indicating whether the color palette should be reversed -#' @param title Plot title. Default to empty string -#' @param subtitle Plot subtitle. Default to empty string -#' @param gg_theme Some ggplot2 theme -#' @param ... Other arguments to be passed to "ggblanket::gg_col" -#' -#' @return A horizontal bar chart -#' -#' @export -hbar_percent <- function(.tbl, x, y, group = NULL, initiative = "reach", palette = "primary", width = 0.5, x_title = "", y_title = "", group_title = NULL, font_family = "Leelawadee", position = "dodge", reverse = FALSE, title = "", subtitle = "", gg_theme = NULL, ...){ - - - if (!(initiative %in% c("reach", "agora", "impact"))) rlang::abort(c("Wrong `initiative` arg", "*" = paste0("Arg `initiative` cannot be: ", initiative), "i" = "It must be one of 'reach' or 'agora' or 'impact'")) - - if (initiative == "reach") { - palette <- pal_reach(palette, reverse = reverse) - main_col <- cols_reach("main_grey") - - if(is.null(palette)) rlang::warn( - c(paste0("There is no palette '", palette, "' for initiative 'reach'. Fallback to ggblanket's default color palette."), - "i" = paste0("Use `pal_reach(show_palettes = T)` to see the list of availabale palettes.") - ) - ) - } - - if (initiative == "agora") { - palette <- pal_agora(palette, reverse = reverse) - main_col <- cols_agora("main_bordeaux") - - - if(is.null(palette)) rlang::warn( - c(paste0("There is no palette '", palette, "' for initiative 'agora'. Fallback to ggblanket's default color palette."), - "i" = paste0("Use `pal_agora(show_palettes = T)` to see the list of availabale palettes.") - ) - ) - } - - if (initiative == "impact") rlang::warn("IMPACT colors are under development. Fallback to ggblanket's default.") - - hbar <- .tbl |> - ggblanket::gg_col(x = {{ x }}, - y = {{ y }}, - col = {{ group }}, - x_title = x_title, - y_title = y_title, - col_title = group_title, - alpha_fill = 1, - pal = palette, - width = width, - x_labels = scales::percent, - position = position, - stat = "identity", - title = "", - subtitle = "", - theme = gg_theme, - ... - ) - - return(hbar) -} - - From 8dbabe7303177dbf8211c3a2b5965218da12322a Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 18:55:03 -0400 Subject: [PATCH 06/12] `reach_theme()` with reversed legend guide --- R/theme_reach.R | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/R/theme_reach.R b/R/theme_reach.R index 4658bfe..f0980ec 100644 --- a/R/theme_reach.R +++ b/R/theme_reach.R @@ -31,6 +31,7 @@ theme_reach <- function( void = FALSE, legend_position = "right", legend_direction = "vertical", + legend_reverse = TRUE, ... ) { @@ -47,17 +48,18 @@ theme_reach <- function( # Default legend to right position theme_reach <- theme_reach + - ggplot2::theme(legend.position = legend_position) + ggplot2::theme(legend.position = legend_position) # Defaut legend to vertical direction theme_reach <- theme_reach + - ggplot2::theme(legend.direction = legend_direction) + ggplot2::theme(legend.direction = legend_direction) # Add reach color palettes by default + # (reversed guide is defaulted to TRUE for natural reading) theme_reach <- list( theme_reach, - scale_color(palette = palette, discrete = discrete, reverse = reverse), - scale_fill(palette = palette, discrete = discrete, reverse = reverse) + scale_color(palette = palette, discrete = discrete, reverse = reverse, reverse_guide = legend_reverse), + scale_fill(palette = palette, discrete = discrete, reverse = reverse, reverse_guide = legend_reverse) ) From 04936f2263fd5de2958599834c1386f765d2619e Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 18:55:50 -0400 Subject: [PATCH 07/12] Update `scale_*()` --- R/scale.R | 191 ++++++++++++++++++++++++++++++++---------------------- 1 file changed, 114 insertions(+), 77 deletions(-) diff --git a/R/scale.R b/R/scale.R index ca97358..c3a4719 100644 --- a/R/scale.R +++ b/R/scale.R @@ -1,77 +1,114 @@ -#' Color scale constructor for REACH or AGORA colors -#' -#' @param initiative Either "reach" or "agora -#' @param palette Palette name from `pal_reach()` or `pal_agora()` -#' @param discrete Boolean indicating whether color aesthetic is discrete or not -#' @param reverse Boolean indicating whether the palette should be reversed -#' @param ... Additional arguments passed to discrete_scale() or -#' scale_color_gradient(), used respectively when discrete is TRUE or FALSE -#' @return A color scale for ggplot -#' -#' @export -scale_color <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, ...) { - - if (initiative == "reach") { - pal <- pal_reach( - palette = palette, - reverse = reverse, - color_ramp_palette = TRUE, - show_palettes = FALSE - ) - } else if (initiative == "agora") { - pal <- pal_agora( - palette = palette, - reverse = reverse, - color_ramp_palette = TRUE, - show_palettes = FALSE - ) - } else { - rlang::abort(c("Wrong initiative parameter input", "*" = paste0(initiative, "is not an option"), "i" = "Parameter 'initiative' should be one of 'reach' or 'agora'")) - } - - if (discrete) { - ggplot2::discrete_scale("colour", paste0(initiative, "_", palette), palette = pal, ...) - } else { - ggplot2::scale_color_gradientn(colours = pal(256), ...) - } -} - - - -#' Fill scale constructor for REACH or AGORA colors -#' -#' @param initiative Either "reach" or "agora -#' @param palette Palette name from `pal_reach()` or `pal_agora()` -#' @param discrete Boolean indicating whether color aesthetic is discrete or not -#' @param reverse Boolean indicating whether the palette should be reversed -#' @param ... Additional arguments passed to discrete_scale() or -#' scale_fill_gradient(), used respectively when discrete is TRUE or FALSE -#' @return A fill scale for ggplot -#' -#' @export -scale_fill <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, ...) { - - if (initiative == "reach") { - pal <- pal_reach( - palette = palette, - reverse = reverse, - color_ramp_palette = TRUE, - show_palettes = FALSE - ) - } else if (initiative == "agora") { - pal <- pal_agora( - palette = palette, - reverse = reverse, - color_ramp_palette = TRUE, - show_palettes = FALSE - ) - } else { - rlang::abort(c("Wrong initiative parameter input", "*" = paste0(initiative, "is not an option"), "i" = "Parameter 'initiative' should be one of 'reach' or 'agora'")) - } - - if (discrete) { - ggplot2::discrete_scale("fill", paste0(initiative, "_", palette), palette = pal, ...) - } else { - ggplot2::scale_fill_gradientn(colours = pal(256), ...) - } -} +#' Color scale constructor for REACH or AGORA colors +#' +#' @param initiative Either "reach" or "agora +#' @param palette Palette name from `pal_reach()` or `pal_agora()` +#' @param discrete Boolean indicating whether color aesthetic is discrete or not +#' @param reverse Boolean indicating whether the palette should be reversed +#' @param ... Additional arguments passed to discrete_scale() or +#' scale_color_gradient(), used respectively when discrete is TRUE or FALSE +#' @return A color scale for ggplot +#' +#' @export +scale_color <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, reverse_guide = TRUE, ...) { + + if (initiative == "reach") { + pal <- pal_reach( + palette = palette, + reverse = reverse, + color_ramp_palette = TRUE, + show_palettes = FALSE + ) + } else if (initiative == "agora") { + pal <- pal_agora( + palette = palette, + reverse = reverse, + color_ramp_palette = TRUE, + show_palettes = FALSE + ) + } else { + rlang::abort(c("Wrong initiative parameter input", "*" = paste0(initiative, "is not an option"), "i" = "Parameter 'initiative' should be one of 'reach' or 'agora'")) + } + + if (discrete) { + ggplot2::discrete_scale( + "colour", + paste0(initiative, "_", palette), + palette = pal, + guide = ggplot2::guide_legend( + title.position = "top", + draw.ulim = TRUE, + draw.llim = TRUE, + ticks.colour = "#F1F3F5", + reverse = reverse_guide), + ...) + } else { + ggplot2::scale_color_gradientn( + colours = pal(256), + guide = ggplot2::guide_colorbar( + title.position = "top", + draw.ulim = TRUE, + draw.llim = TRUE, + ticks.colour = "#F1F3F5", + reverse = reverse_guide + ), + ...) + } +} + + + +#' Fill scale constructor for REACH or AGORA colors +#' +#' @param initiative Either "reach" or "agora +#' @param palette Palette name from `pal_reach()` or `pal_agora()` +#' @param discrete Boolean indicating whether color aesthetic is discrete or not +#' @param reverse Boolean indicating whether the palette should be reversed +#' @param ... Additional arguments passed to discrete_scale() or +#' scale_fill_gradient(), used respectively when discrete is TRUE or FALSE +#' @return A fill scale for ggplot +#' +#' @export +scale_fill <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, reverse_guide = TRUE, ...) { + + if (initiative == "reach") { + pal <- pal_reach( + palette = palette, + reverse = reverse, + color_ramp_palette = TRUE, + show_palettes = FALSE + ) + } else if (initiative == "agora") { + pal <- pal_agora( + palette = palette, + reverse = reverse, + color_ramp_palette = TRUE, + show_palettes = FALSE + ) + } else { + rlang::abort(c("Wrong initiative parameter input", "*" = paste0(initiative, "is not an option"), "i" = "Parameter 'initiative' should be one of 'reach' or 'agora'")) + } + + if (discrete) { + ggplot2::discrete_scale( + "fill", + paste0(initiative, "_", palette), + palette = pal, + guide = ggplot2::guide_legend( + title.position = "top", + draw.ulim = TRUE, + draw.llim = TRUE, + ticks.colour = "#F1F3F5", + reverse = reverse_guide), + ...) + } else { + ggplot2::scale_fill_gradientn( + colours = pal(256), + guide = ggplot2::guide_colorbar( + title.position = "top", + draw.ulim = TRUE, + draw.llim = TRUE, + ticks.colour = "#F1F3F5", + reverse = reverse_guide), + ...) + } +} From 0198ad53c39e48bf567cbbe96f3e9abf740e07f1 Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 18:56:00 -0400 Subject: [PATCH 08/12] Add `point_reach()` --- R/point.R | 68 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) create mode 100644 R/point.R diff --git a/R/point.R b/R/point.R new file mode 100644 index 0000000..b2ed023 --- /dev/null +++ b/R/point.R @@ -0,0 +1,68 @@ +#' @title Simple point chart +#' +#' @param df A data frame. +#' @param x A numeric column. +#' @param y A character column or coercible as a character column. +#' @param group Some grouping categorical column, e.g. administrative areas or population groups. +#' @param palette Palette name from 'pal_reach()'. +#' @param reverse Boolean indicating whether the palette should be reversed. +#' @param family The font family for all plot's texts. Default to "Leelawadee". +#' @param alpha Transparency. +#' @param size Dot size. Default to 1.5. +#' @param x_title The x scale title. Default to NULL. +#' @param y_title The y scale title. Default to NULL. +#' @param group_title The group legend title. Default to NULL. +#' @param position Should the chart be stacked? Default to "dodge". Can take "dodge" and "stack". +#' @param title Plot title. Default to NULL. +#' @param subtitle Plot subtitle. Default to NULL. +#' @param caption Caption title string. Default to NULL. +#' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. +#' @param title_size The size of the title text. Defaults to 14. +#' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". +#' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". +#' @param void Boolean to remove all elements from the plot. Default to FALSE. +#' @param ... Other arguments to be passed to "ggblanket::gg_col" +#' +#' @description `ggblanket` as internals for deciding whether the bar chart is horizontally readable. +#' +#' @return A bar chart +#' +#' @export +point_reach <- function(df, x, y, group = NULL, palette = "main", reverse = FALSE, family = "Leelawadee", alpha = 1, size = 1.5, x_title = NULL, y_title = NULL, group_title = NULL, title = NULL, subtitle = NULL, caption = NULL, text_size = 10, title_size = 14, legend_position = "right", void = FALSE, ...){ + + pal <- pal_reach(palette) + + if(is.null(pal)) rlang::warn( + c(paste0("There is no palette '", palette, "' for initiative 'reach'. Fallback to ggblanket's default color palette."), + "i" = paste0("Use `pal_reach(show_palettes = T)` to see the list of availabale palettes.") + ) + ) + + hbar <- df |> + ggblanket::gg_point(x = {{ x }}, + y = {{ y }}, + col = {{ group }}, + x_title = x_title, + y_title = y_title, + col_title = group_title, + alpha = alpha, + size = size, + title = title, + subtitle = subtitle, + caption = caption, + col_legend_place = legend_position, + theme = theme_reach( + palette = palette, + reverse = reverse, + family = family, + text_size = text_size, + title_size = title_size, + plot_background_pal = "#FFFFFF", + panel_background_pal = "#FFFFFF", + void = FALSE + ), + ... + ) + + return(hbar) +} From cb9a8bfcac535fcba0eeaa1e57295c61a6f3ea55 Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 19:02:03 -0400 Subject: [PATCH 09/12] Update documentation --- R/bar.R | 6 +-- R/point.R | 6 +-- R/scale.R | 26 ++++++----- R/theme_reach.R | 5 ++- man/bar_reach.Rd | 85 ++++++++++++++++++++++++++++++++++++ man/hbar.Rd | 67 ---------------------------- man/hbar_percent.Rd | 67 ---------------------------- man/point_reach.Rd | 76 ++++++++++++++++++++++++++++++++ man/scale_color.Rd | 13 +++--- man/scale_fill.Rd | 15 ++++--- man/theme_reach.Rd | 46 +++++++++++++++++-- man/theme_reach_borders.Rd | 17 -------- man/theme_reach_flip_hist.Rd | 17 -------- man/theme_reach_hist.Rd | 17 -------- 14 files changed, 243 insertions(+), 220 deletions(-) create mode 100644 man/bar_reach.Rd delete mode 100644 man/hbar.Rd delete mode 100644 man/hbar_percent.Rd create mode 100644 man/point_reach.Rd delete mode 100644 man/theme_reach_borders.Rd delete mode 100644 man/theme_reach_flip_hist.Rd delete mode 100644 man/theme_reach_hist.Rd diff --git a/R/bar.R b/R/bar.R index 8614ffe..6f7e77e 100644 --- a/R/bar.R +++ b/R/bar.R @@ -20,7 +20,7 @@ #' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. #' @param title_size The size of the title text. Defaults to 14. #' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". -#' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". +#' @param legend_rev Reverse the color in the guide? Default to TRUE. #' @param void Boolean to remove all elements from the plot. Default to FALSE. #' @param ... Other arguments to be passed to "ggblanket::gg_col" #' @@ -41,7 +41,7 @@ bar_reach <- function(df, x, y, group = NULL, percent = TRUE, palette = "main", if (percent) x_labels <- scales::percent else x_labels <- NULL - hbar <- df |> + pl <- df |> ggblanket::gg_col(x = {{ x }}, y = {{ y }}, col = {{ group }}, @@ -70,5 +70,5 @@ bar_reach <- function(df, x, y, group = NULL, percent = TRUE, palette = "main", ... ) - return(hbar) + return(pl) } diff --git a/R/point.R b/R/point.R index b2ed023..ed7c973 100644 --- a/R/point.R +++ b/R/point.R @@ -12,14 +12,12 @@ #' @param x_title The x scale title. Default to NULL. #' @param y_title The y scale title. Default to NULL. #' @param group_title The group legend title. Default to NULL. -#' @param position Should the chart be stacked? Default to "dodge". Can take "dodge" and "stack". #' @param title Plot title. Default to NULL. #' @param subtitle Plot subtitle. Default to NULL. #' @param caption Caption title string. Default to NULL. #' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. #' @param title_size The size of the title text. Defaults to 14. #' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". -#' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". #' @param void Boolean to remove all elements from the plot. Default to FALSE. #' @param ... Other arguments to be passed to "ggblanket::gg_col" #' @@ -38,7 +36,7 @@ point_reach <- function(df, x, y, group = NULL, palette = "main", reverse = FALS ) ) - hbar <- df |> + pl <- df |> ggblanket::gg_point(x = {{ x }}, y = {{ y }}, col = {{ group }}, @@ -64,5 +62,5 @@ point_reach <- function(df, x, y, group = NULL, palette = "main", reverse = FALS ... ) - return(hbar) + return(pl) } diff --git a/R/scale.R b/R/scale.R index c3a4719..8dec956 100644 --- a/R/scale.R +++ b/R/scale.R @@ -1,11 +1,13 @@ #' Color scale constructor for REACH or AGORA colors #' -#' @param initiative Either "reach" or "agora -#' @param palette Palette name from `pal_reach()` or `pal_agora()` -#' @param discrete Boolean indicating whether color aesthetic is discrete or not -#' @param reverse Boolean indicating whether the palette should be reversed +#' @param initiative Either "reach" or "agora. +#' @param palette Palette name from `pal_reach()` or `pal_agora()`. +#' @param discrete Boolean indicating whether color aesthetic is discrete or not. +#' @param reverse Boolean indicating whether the palette should be reversed. +#' @param reverse_guide Boolean indicating whether the guide should be reversed. #' @param ... Additional arguments passed to discrete_scale() or -#' scale_color_gradient(), used respectively when discrete is TRUE or FALSE +#' scale_fill_gradient(), used respectively when discrete is TRUE or FALSE. +#' #' @return A color scale for ggplot #' #' @export @@ -59,13 +61,15 @@ scale_color <- function(initiative = "reach", palette = "main", discrete = TRUE #' Fill scale constructor for REACH or AGORA colors #' -#' @param initiative Either "reach" or "agora -#' @param palette Palette name from `pal_reach()` or `pal_agora()` -#' @param discrete Boolean indicating whether color aesthetic is discrete or not -#' @param reverse Boolean indicating whether the palette should be reversed +#' @param initiative Either "reach" or "agora. +#' @param palette Palette name from `pal_reach()` or `pal_agora()`. +#' @param discrete Boolean indicating whether color aesthetic is discrete or not. +#' @param reverse Boolean indicating whether the palette should be reversed. +#' @param reverse_guide Boolean indicating whether the guide should be reversed. #' @param ... Additional arguments passed to discrete_scale() or -#' scale_fill_gradient(), used respectively when discrete is TRUE or FALSE -#' @return A fill scale for ggplot +#' scale_fill_gradient(), used respectively when discrete is TRUE or FALSE. +#' +#' @return A fill scale for ggplot. #' #' @export scale_fill <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, reverse_guide = TRUE, ...) { diff --git a/R/theme_reach.R b/R/theme_reach.R index f0980ec..755800c 100644 --- a/R/theme_reach.R +++ b/R/theme_reach.R @@ -1,8 +1,8 @@ #' @title ggplot2 theme with REACH color palettes #' #' @param palette Palette name from 'pal_reach()'. -#' @param discrete Boolean indicating whether color aesthetic is discrete or not -#' @param reverse Boolean indicating whether the palette should be reversed +#' @param discrete Boolean indicating whether color aesthetic is discrete or not. +#' @param reverse Boolean indicating whether the palette should be reversed. #' @param family The font family for all plot's texts. Default to "Leelawadee". #' @param text_size The size of all text other than the title, subtitle and caption. Defaults to 10. #' @param title_size The size of the title text_family. Defaults to 14. @@ -10,6 +10,7 @@ #' @param panel_background_pal The color for the panel background color. Default to white. #' @param legend_position Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none". #' @param legend_direction Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal". +#' @param legend_reverse Reverse the color in the guide? Default to TRUE. #' @param void Boolean to remove all elements from the plot. Default to FALSE. #' @param ... Additional arguments passed to `ggblanket::gg_theme()`. #' diff --git a/man/bar_reach.Rd b/man/bar_reach.Rd new file mode 100644 index 0000000..884952c --- /dev/null +++ b/man/bar_reach.Rd @@ -0,0 +1,85 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/bar.R +\name{bar_reach} +\alias{bar_reach} +\title{Simple bar chart} +\usage{ +bar_reach( + df, + x, + y, + group = NULL, + percent = TRUE, + palette = "main", + reverse = FALSE, + family = "Leelawadee", + alpha = 1, + width = 0.5, + x_title = NULL, + y_title = NULL, + group_title = NULL, + position = "dodge", + title = NULL, + subtitle = NULL, + caption = NULL, + text_size = 10, + title_size = 14, + legend_position = "right", + legend_rev = TRUE, + void = FALSE, + ... +) +} +\arguments{ +\item{df}{A data frame.} + +\item{x}{A numeric column.} + +\item{y}{A character column or coercible as a character column.} + +\item{group}{Some grouping categorical column, e.g. administrative areas or population groups.} + +\item{percent}{TRUE or FALSE. Should the x-labels be displayed as percentages? Default to TRUE.} + +\item{palette}{Palette name from 'pal_reach()'.} + +\item{reverse}{Boolean indicating whether the palette should be reversed.} + +\item{family}{The font family for all plot's texts. Default to "Leelawadee".} + +\item{alpha}{Transparency.} + +\item{width}{Width.} + +\item{x_title}{The x scale title. Default to NULL.} + +\item{y_title}{The y scale title. Default to NULL.} + +\item{group_title}{The group legend title. Default to NULL.} + +\item{position}{Should the chart be stacked? Default to "dodge". Can take "dodge" and "stack".} + +\item{title}{Plot title. Default to NULL.} + +\item{subtitle}{Plot subtitle. Default to NULL.} + +\item{caption}{Caption title string. Default to NULL.} + +\item{text_size}{The size of all text other than the title, subtitle and caption. Defaults to 10.} + +\item{title_size}{The size of the title text. Defaults to 14.} + +\item{legend_position}{Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none".} + +\item{legend_rev}{Reverse the color in the guide? Default to TRUE.} + +\item{void}{Boolean to remove all elements from the plot. Default to FALSE.} + +\item{...}{Other arguments to be passed to "ggblanket::gg_col"} +} +\value{ +A bar chart +} +\description{ +`ggblanket` as internals for deciding whether the bar chart is horizontally readable. +} diff --git a/man/hbar.Rd b/man/hbar.Rd deleted file mode 100644 index 9afca9f..0000000 --- a/man/hbar.Rd +++ /dev/null @@ -1,67 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/hbar.R -\name{hbar} -\alias{hbar} -\title{Simple horizontal bar chart} -\usage{ -hbar( - .tbl, - x, - y, - group = NULL, - initiative = "reach", - palette = "primary", - width = 0.5, - x_title = "", - y_title = "", - group_title = NULL, - font_family = "Leelawadee", - position = "dodge", - reverse = FALSE, - title = "", - subtitle = "", - gg_theme = NULL, - ... -) -} -\arguments{ -\item{.tbl}{Some data} - -\item{x}{Some numeric column on the x scale} - -\item{y}{Some column on the y scale} - -\item{group}{Some grouping categorical column, e.g. administrative areas} - -\item{initiative}{Either "reach" or "agora" or "impact" for the color palette} - -\item{palette}{The color palette from the initiative} - -\item{width}{Width} - -\item{x_title}{The x scale title. Default to empty string} - -\item{y_title}{The y scale title. Default to empty string} - -\item{group_title}{The group legend title. Defaut to NULL} - -\item{font_family}{The font family. Default to "Leelawadee"} - -\item{position}{Should the chart be stacked? Default to dodge} - -\item{reverse}{Boolean indicating whether the color palette should be reversed} - -\item{title}{Plot title. Default to empty string} - -\item{subtitle}{Plot subtitle. Default to empty string} - -\item{gg_theme}{Some ggplot2 theme} - -\item{...}{Other arguments to be passed to "ggblanket::gg_col"} -} -\value{ -A horizontal bar chart -} -\description{ -Simple horizontal bar chart -} diff --git a/man/hbar_percent.Rd b/man/hbar_percent.Rd deleted file mode 100644 index 07daebd..0000000 --- a/man/hbar_percent.Rd +++ /dev/null @@ -1,67 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/hbar.R -\name{hbar_percent} -\alias{hbar_percent} -\title{Simple horizontal bar chart which scales x_labels to percentages} -\usage{ -hbar_percent( - .tbl, - x, - y, - group = NULL, - initiative = "reach", - palette = "primary", - width = 0.5, - x_title = "", - y_title = "", - group_title = NULL, - font_family = "Leelawadee", - position = "dodge", - reverse = FALSE, - title = "", - subtitle = "", - gg_theme = NULL, - ... -) -} -\arguments{ -\item{.tbl}{Some data} - -\item{x}{Some numeric column on the x scale} - -\item{y}{Some column on the y scale} - -\item{group}{Some grouping categorical column, e.g. administrative areas} - -\item{initiative}{Either "reach" or "agora" or "impact" for the color palette} - -\item{palette}{The color palette from the initiative} - -\item{width}{Width} - -\item{x_title}{The x scale title. Default to empty string} - -\item{y_title}{The y scale title. Default to empty string} - -\item{group_title}{The group legend title. Defaut to NULL} - -\item{font_family}{The font family. Default to "Leelawadee"} - -\item{position}{Should the chart be stacked? Default to dodge} - -\item{reverse}{Boolean indicating whether the color palette should be reversed} - -\item{title}{Plot title. Default to empty string} - -\item{subtitle}{Plot subtitle. Default to empty string} - -\item{gg_theme}{Some ggplot2 theme} - -\item{...}{Other arguments to be passed to "ggblanket::gg_col"} -} -\value{ -A horizontal bar chart -} -\description{ -Simple horizontal bar chart which scales x_labels to percentages -} diff --git a/man/point_reach.Rd b/man/point_reach.Rd new file mode 100644 index 0000000..8dbd591 --- /dev/null +++ b/man/point_reach.Rd @@ -0,0 +1,76 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/point.R +\name{point_reach} +\alias{point_reach} +\title{Simple point chart} +\usage{ +point_reach( + df, + x, + y, + group = NULL, + palette = "main", + reverse = FALSE, + family = "Leelawadee", + alpha = 1, + size = 1.5, + x_title = NULL, + y_title = NULL, + group_title = NULL, + title = NULL, + subtitle = NULL, + caption = NULL, + text_size = 10, + title_size = 14, + legend_position = "right", + void = FALSE, + ... +) +} +\arguments{ +\item{df}{A data frame.} + +\item{x}{A numeric column.} + +\item{y}{A character column or coercible as a character column.} + +\item{group}{Some grouping categorical column, e.g. administrative areas or population groups.} + +\item{palette}{Palette name from 'pal_reach()'.} + +\item{reverse}{Boolean indicating whether the palette should be reversed.} + +\item{family}{The font family for all plot's texts. Default to "Leelawadee".} + +\item{alpha}{Transparency.} + +\item{size}{Dot size. Default to 1.5.} + +\item{x_title}{The x scale title. Default to NULL.} + +\item{y_title}{The y scale title. Default to NULL.} + +\item{group_title}{The group legend title. Default to NULL.} + +\item{title}{Plot title. Default to NULL.} + +\item{subtitle}{Plot subtitle. Default to NULL.} + +\item{caption}{Caption title string. Default to NULL.} + +\item{text_size}{The size of all text other than the title, subtitle and caption. Defaults to 10.} + +\item{title_size}{The size of the title text. Defaults to 14.} + +\item{legend_position}{Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none".} + +\item{void}{Boolean to remove all elements from the plot. Default to FALSE.} + +\item{...}{Other arguments to be passed to "ggblanket::gg_col"} +} +\value{ +A bar chart +} +\description{ +`ggblanket` as internals for deciding whether the bar chart is horizontally readable. +} diff --git a/man/scale_color.Rd b/man/scale_color.Rd index 5139b2a..c05dcf9 100644 --- a/man/scale_color.Rd +++ b/man/scale_color.Rd @@ -9,20 +9,23 @@ scale_color( palette = "main", discrete = TRUE, reverse = FALSE, + reverse_guide = TRUE, ... ) } \arguments{ -\item{initiative}{Either "reach" or "agora} +\item{initiative}{Either "reach" or "agora.} -\item{palette}{Palette name from `pal_reach()` or `pal_agora()`} +\item{palette}{Palette name from `pal_reach()` or `pal_agora()`.} -\item{discrete}{Boolean indicating whether color aesthetic is discrete or not} +\item{discrete}{Boolean indicating whether color aesthetic is discrete or not.} -\item{reverse}{Boolean indicating whether the palette should be reversed} +\item{reverse}{Boolean indicating whether the palette should be reversed.} + +\item{reverse_guide}{Boolean indicating whether the guide should be reversed.} \item{...}{Additional arguments passed to discrete_scale() or -scale_color_gradient(), used respectively when discrete is TRUE or FALSE} +scale_fill_gradient(), used respectively when discrete is TRUE or FALSE.} } \value{ A color scale for ggplot diff --git a/man/scale_fill.Rd b/man/scale_fill.Rd index 5601e54..b07d1a8 100644 --- a/man/scale_fill.Rd +++ b/man/scale_fill.Rd @@ -9,23 +9,26 @@ scale_fill( palette = "main", discrete = TRUE, reverse = FALSE, + reverse_guide = TRUE, ... ) } \arguments{ -\item{initiative}{Either "reach" or "agora} +\item{initiative}{Either "reach" or "agora.} -\item{palette}{Palette name from `pal_reach()` or `pal_agora()`} +\item{palette}{Palette name from `pal_reach()` or `pal_agora()`.} -\item{discrete}{Boolean indicating whether color aesthetic is discrete or not} +\item{discrete}{Boolean indicating whether color aesthetic is discrete or not.} -\item{reverse}{Boolean indicating whether the palette should be reversed} +\item{reverse}{Boolean indicating whether the palette should be reversed.} + +\item{reverse_guide}{Boolean indicating whether the guide should be reversed.} \item{...}{Additional arguments passed to discrete_scale() or -scale_fill_gradient(), used respectively when discrete is TRUE or FALSE} +scale_fill_gradient(), used respectively when discrete is TRUE or FALSE.} } \value{ -A fill scale for ggplot +A fill scale for ggplot. } \description{ Fill scale constructor for REACH or AGORA colors diff --git a/man/theme_reach.Rd b/man/theme_reach.Rd index 7c760db..aa3c2af 100644 --- a/man/theme_reach.Rd +++ b/man/theme_reach.Rd @@ -2,16 +2,54 @@ % Please edit documentation in R/theme_reach.R \name{theme_reach} \alias{theme_reach} -\title{Base REACH ggplot2 theme} +\title{ggplot2 theme with REACH color palettes} \usage{ -theme_reach(family = "Leelawadee") +theme_reach( + palette = "main", + discrete = TRUE, + reverse = FALSE, + family = "Leelawadee", + text_size = 10, + title_size = 14, + plot_background_pal = "#FFFFFF", + panel_background_pal = "#FFFFFF", + void = FALSE, + legend_position = "right", + legend_direction = "vertical", + legend_reverse = TRUE, + ... +) } \arguments{ -\item{family}{The font family. Default to "Leelawadee"} +\item{palette}{Palette name from 'pal_reach()'.} + +\item{discrete}{Boolean indicating whether color aesthetic is discrete or not.} + +\item{reverse}{Boolean indicating whether the palette should be reversed.} + +\item{family}{The font family for all plot's texts. Default to "Leelawadee".} + +\item{text_size}{The size of all text other than the title, subtitle and caption. Defaults to 10.} + +\item{title_size}{The size of the title text_family. Defaults to 14.} + +\item{plot_background_pal}{The color for the plot background color. Default to white.} + +\item{panel_background_pal}{The color for the panel background color. Default to white.} + +\item{void}{Boolean to remove all elements from the plot. Default to FALSE.} + +\item{legend_position}{Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none".} + +\item{legend_direction}{Direction of the legend. Default to "vertical". Can take "vertical" or "horizontal".} + +\item{legend_reverse}{Reverse the color in the guide? Default to TRUE.} + +\item{...}{Additional arguments passed to `ggblanket::gg_theme()`.} } \value{ The base REACH theme } \description{ -Give some reach colors and fonts to a ggplot. Based on theme_bw() +Give some reach colors and fonts to a ggplot. } diff --git a/man/theme_reach_borders.Rd b/man/theme_reach_borders.Rd deleted file mode 100644 index c6cc1b6..0000000 --- a/man/theme_reach_borders.Rd +++ /dev/null @@ -1,17 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/theme_reach.R -\name{theme_reach_borders} -\alias{theme_reach_borders} -\title{Some REACH theme for ggplot} -\usage{ -theme_reach_borders(family = "Leelawadee") -} -\arguments{ -\item{family}{The font family. Default to "Leelawadee"} -} -\value{ -A theme to be added to the "+" ggplot grammar -} -\description{ -Some REACH theme for ggplot -} diff --git a/man/theme_reach_flip_hist.Rd b/man/theme_reach_flip_hist.Rd deleted file mode 100644 index 10f1b7b..0000000 --- a/man/theme_reach_flip_hist.Rd +++ /dev/null @@ -1,17 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/theme_reach.R -\name{theme_reach_flip_hist} -\alias{theme_reach_flip_hist} -\title{Some reach more minimal theme for a ggplot flipped histogram} -\usage{ -theme_reach_flip_hist(family = "Leelawadee") -} -\arguments{ -\item{family}{The font family. Default to "Leelawadee"} -} -\value{ -A theme to be added to the "+" ggplot grammar -} -\description{ -Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for horizontal bar charts. -} diff --git a/man/theme_reach_hist.Rd b/man/theme_reach_hist.Rd deleted file mode 100644 index bf88010..0000000 --- a/man/theme_reach_hist.Rd +++ /dev/null @@ -1,17 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/theme_reach.R -\name{theme_reach_hist} -\alias{theme_reach_hist} -\title{Some reach more minimal theme for a ggplot histogram} -\usage{ -theme_reach_hist(family = "Leelawadee") -} -\arguments{ -\item{family}{The font family. Default to "Leelawadee"} -} -\value{ -A theme to be added to the "+" ggplot grammar -} -\description{ -Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for vertical bar charts. -} From 7c21338ec91314e17515b94e45c94eb0cd7c43b3 Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 19:05:53 -0400 Subject: [PATCH 10/12] New version and imports correction --- DESCRIPTION | 4 ++-- NEWS.md | 8 ++++++++ 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 0685c97..663ecb1 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: visualizeR Type: Package Title: What a color! What a viz! -Version: 0.1.7.9000 +Version: 0.2.9000 Authors@R: c( person( 'Noblet', 'Guillaume', @@ -24,6 +24,6 @@ Imports: grDevices, glue, scales, - ggblanket >= 1.5.0 + ggblanket (>= 1.5.0) Suggests: knitr, sf VignetteBuilder: knitr diff --git a/NEWS.md b/NEWS.md index f98cf81..b1a9f74 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,11 @@ +# visualizeR 0.2.9000 + +* Breaking changes: almost all functions got refinements, and there are new functions, typically `hbar()` becomes `bar_reach()` and `point_reach()` is added. +* Following `theme_reach()` is now used by all plotting functions. +* Add README.md. + +--- + # visualizeR 0.1.7.9000 * Fixed some color palettes. From 91d826bed199ce138d29e29f6008859a1d8a0352 Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 19:06:01 -0400 Subject: [PATCH 11/12] Update README.Rmd --- README.Rmd | 161 +++++++++++++++++++++++++++++++++-------------------- 1 file changed, 102 insertions(+), 59 deletions(-) diff --git a/README.Rmd b/README.Rmd index 0002369..75942a9 100644 --- a/README.Rmd +++ b/README.Rmd @@ -1,59 +1,102 @@ ---- -output: github_document ---- - - - -```{r, include = FALSE} -knitr::opts_chunk$set( - collapse = TRUE, - comment = "#>", - fig.path = "man/figures/README-", - out.width = "100%" -) - -desc = read.dcf('DESCRIPTION') -desc = setNames(as.list(desc), colnames(desc)) -``` - - -# `r desc$Package` - -> `r desc$Title` - -`visualizeR` proposes some utils to get REACH and AGORA colors, ready-to-go color palettes, and a few visualization functions (horizontal hist graph for instance). - -## Installation - -You can install the last version of visualizeR from -[GitHub](https://github.com/) with: - -```{r, eval = FALSE} -# install.packages("devtools") -devtools::install_github("gnoblet/visualizeR", build_vignettes = TRUE) -``` - -## Roadmap - -Roadmap is as follows: - -- [X] Add IMPACT's colors -- [X] Add all color palettes from the internal documentation -- [ ] There remains to be added more-than-7-color palettes and black color palettes -- [ ] Add new types of visualization (e.g. dumbbell plot) -- [ ] Use examples -- [ ] Add some ease-map functions -- [ ] Add some interactive functions (maps and graphs) - -## Request - -Please, do not hesitate to pull request any new viz or colors or color palettes, or to email request any change (guillaume.noblet@reach-initiative.org or gnoblet@zaclys.net). - - -## Example - -```{r example, eval = FALSE} -library(visualizeR) -# Get all saved REACH colors, named -cols_reach(unnamed = F) -``` +--- +output: github_document +--- + + + +```{r, include = FALSE} +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + fig.path = "man/figures/README-", + out.width = "100%" +) + +desc = read.dcf('DESCRIPTION') +desc = setNames(as.list(desc), colnames(desc)) +``` + + +# `r desc$Package` + +> `r desc$Title` + +`visualizeR` proposes some utils to get REACH and AGORA colors, ready-to-go color palettes, and a few visualization functions (horizontal hist graph for instance). + +## Installation + +You can install the last version of visualizeR from +[GitHub](https://github.com/) with: + +```{r, eval = FALSE} +# install.packages("devtools") +devtools::install_github("gnoblet/visualizeR", build_vignettes = TRUE) +``` + +## Roadmap + +Roadmap is as follows: + +- [X] Add IMPACT's colors +- [X] Add all color palettes from the internal documentation +- [ ] There remains to be added more-than-7-color palettes and black color palettes +- [ ] Add new types of visualization (e.g. dumbbell plot) +- [ ] Use examples +- [ ] Add some ease-map functions +- [ ] Add some interactive functions (maps and graphs) + +## Request + +Please, do not hesitate to pull request any new viz or colors or color palettes, or to email request any change (guillaume.noblet@reach-initiative.org or gnoblet@zaclys.net). + + +## Example 1: extracting colors + +Color palettes for REACH, AGORA and IMPACT are available. Functions to access colors and palettes are `cols_initiative()` or `pal_initiative()`. For now, the initiative with the most colors and color palettes is REACH. Feel free to pull requests new AGORA and IMPACT colors. + +```{r example-colors, eval = FALSE} +library(visualizeR) + +# Get all saved REACH colors, named +cols_reach(unnamed = F)[1:10] + +# Extract a color palette as hexadecimal codes and reversed +pal_reach(palette = "main", reversed = TRUE, color_ramp_palette = FALSE) + +# Get all color palettes names +pal_reach(show_palettes = T) +``` +## Example 2: Bar chart, already REACH themed + +```{r example-bar-chart, eval = TRUE} +library(visualizeR) +library(palmerpenguins) +library(dplyr) + +df <- penguins |> + group_by(island, species) |> + summarize( + mean_bl = mean(bill_length_mm, na.rm = T), + mean_fl = mean(flipper_length_mm, na.rm = T)) |> + ungroup() + +# Simple bar chart by group +bar_reach(df, mean_bl, island, species, percent = FALSE, x_title = "Mean of bill length") + +# Using another color palette +bar_reach(df, mean_bl, island, species, percent = FALSE, palette = "artichoke_3", legend_rev = TRUE) +``` + +## Example 3: Point chart, already REACH themed +```{r example-point-chart, eval = TRUE} + +# Simple point chart +point_reach(penguins, bill_length_mm, flipper_length_mm) + +# Point chart with grouping colors, greater dot size, some transparency, reversed color palette +point_reach(penguins, bill_length_mm, flipper_length_mm, island, alpha = 0.5, size = 2, reverse = TRUE) + +# Using another color palettes +point_reach(penguins, bill_length_mm, flipper_length_mm, island, palette = "artichoke_3") +``` + From e2fd769c3bc63552af9faae404b2f64fe728fecb Mon Sep 17 00:00:00 2001 From: gnoblet Date: Sun, 20 Nov 2022 19:28:48 -0400 Subject: [PATCH 12/12] Update to v0.2.9000 --- README.Rmd | 12 +- README.md | 104 +++++++++- docs/404.html | 2 +- docs/LICENSE.html | 38 ++-- docs/authors.html | 2 +- docs/index.html | 23 +-- docs/news/index.html | 14 +- docs/pkgdown.yml | 4 +- docs/reference/abort_bad_argument.html | 2 +- docs/reference/bar_reach.html | 201 +++++++++++++++++++ docs/reference/buffer_bbox.html | 2 +- docs/reference/cols_agora.html | 2 +- docs/reference/cols_impact.html | 2 +- docs/reference/cols_reach.html | 2 +- docs/reference/hbar.html | 171 ---------------- docs/reference/hbar_percent.html | 171 ---------------- docs/reference/if_not_in_stop.html | 2 +- docs/reference/if_vec_not_in_stop.html | 2 +- docs/reference/index.html | 39 ++-- docs/reference/pal_agora.html | 2 +- docs/reference/pal_impact.html | 2 +- docs/reference/pal_reach.html | 2 +- docs/reference/point_reach.html | 186 +++++++++++++++++ docs/reference/scale_color.html | 17 +- docs/reference/scale_fill.html | 19 +- docs/reference/subvec_not_in.html | 2 +- docs/reference/theme_reach.html | 76 ++++++- docs/reference/theme_reach_borders.html | 89 -------- docs/reference/theme_reach_flip_hist.html | 89 -------- docs/reference/theme_reach_hist.html | 89 -------- docs/search.json | 2 +- docs/sitemap.xml | 27 +-- man/figures/README-example-bar-chart-1.png | Bin 0 -> 14921 bytes man/figures/README-example-bar-chart-2.png | Bin 0 -> 13916 bytes man/figures/README-example-point-chart-1.png | Bin 0 -> 43515 bytes man/figures/README-example-point-chart-2.png | Bin 0 -> 72965 bytes man/figures/README-example-point-chart-3.png | Bin 0 -> 45065 bytes 37 files changed, 655 insertions(+), 742 deletions(-) create mode 100644 docs/reference/bar_reach.html delete mode 100644 docs/reference/hbar.html delete mode 100644 docs/reference/hbar_percent.html create mode 100644 docs/reference/point_reach.html delete mode 100644 docs/reference/theme_reach_borders.html delete mode 100644 docs/reference/theme_reach_flip_hist.html delete mode 100644 docs/reference/theme_reach_hist.html create mode 100644 man/figures/README-example-bar-chart-1.png create mode 100644 man/figures/README-example-bar-chart-2.png create mode 100644 man/figures/README-example-point-chart-1.png create mode 100644 man/figures/README-example-point-chart-2.png create mode 100644 man/figures/README-example-point-chart-3.png diff --git a/README.Rmd b/README.Rmd index 75942a9..62c10c6 100644 --- a/README.Rmd +++ b/README.Rmd @@ -9,14 +9,15 @@ knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", - out.width = "100%" + out.width = "100%", + warning = FALSE, + message = FALSE ) desc = read.dcf('DESCRIPTION') desc = setNames(as.list(desc), colnames(desc)) ``` - # `r desc$Package` > `r desc$Title` @@ -54,7 +55,7 @@ Please, do not hesitate to pull request any new viz or colors or color palettes, Color palettes for REACH, AGORA and IMPACT are available. Functions to access colors and palettes are `cols_initiative()` or `pal_initiative()`. For now, the initiative with the most colors and color palettes is REACH. Feel free to pull requests new AGORA and IMPACT colors. -```{r example-colors, eval = FALSE} +```{r example-colors, eval = TRUE} library(visualizeR) # Get all saved REACH colors, named @@ -88,13 +89,16 @@ bar_reach(df, mean_bl, island, species, percent = FALSE, palette = "artichoke_3" ``` ## Example 3: Point chart, already REACH themed + +At this stage, `point_reach()` only supports categorical grouping colors with the `group` arg. + ```{r example-point-chart, eval = TRUE} # Simple point chart point_reach(penguins, bill_length_mm, flipper_length_mm) # Point chart with grouping colors, greater dot size, some transparency, reversed color palette -point_reach(penguins, bill_length_mm, flipper_length_mm, island, alpha = 0.5, size = 2, reverse = TRUE) +point_reach(penguins, bill_length_mm, flipper_length_mm, island, alpha = 0.6, size = 3, reverse = TRUE) # Using another color palettes point_reach(penguins, bill_length_mm, flipper_length_mm, island, palette = "artichoke_3") diff --git a/README.md b/README.md index 6693b4d..331fdc7 100644 --- a/README.md +++ b/README.md @@ -23,14 +23,14 @@ devtools::install_github("gnoblet/visualizeR", build_vignettes = TRUE) Roadmap is as follows: -- [x] Add IMPACT’s colors -- [x] Add all color palettes from the internal documentation -- [ ] There remains to be added more-than-7-color palettes and black - color palettes -- [ ] Add new types of visualization (e.g. dumbbell plot) -- [ ] Use examples -- [ ] Add some ease-map functions -- [ ] Add some interactive functions (maps and graphs) +- [x] Add IMPACT’s colors +- [x] Add all color palettes from the internal documentation +- [ ] There remains to be added more-than-7-color palettes and black + color palettes +- [ ] Add new types of visualization (e.g. dumbbell plot) +- [ ] Use examples +- [ ] Add some ease-map functions +- [ ] Add some interactive functions (maps and graphs) ## Request @@ -38,10 +38,94 @@ Please, do not hesitate to pull request any new viz or colors or color palettes, or to email request any change ( or ). -## Example +## Example 1: extracting colors + +Color palettes for REACH, AGORA and IMPACT are available. Functions to +access colors and palettes are `cols_initiative()` or +`pal_initiative()`. For now, the initiative with the most colors and +color palettes is REACH. Feel free to pull requests new AGORA and IMPACT +colors. ``` r library(visualizeR) + # Get all saved REACH colors, named -cols_reach(unnamed = F) +cols_reach(unnamed = F)[1:10] +#> white black main_grey main_red main_lt_grey main_beige +#> "#FFFFFF" "#000000" "#58585A" "#EE5859" "#C7C8CA" "#D2CBB8" +#> iroise_1 iroise_2 iroise_3 iroise_4 +#> "#DFECEF" "#B1D7E0" "#699DA3" "#236A7A" + +# Extract a color palette as hexadecimal codes and reversed +pal_reach(palette = "main", reversed = TRUE, color_ramp_palette = FALSE) +#> [1] "#58585A" "#EE5859" "#C7C8CA" "#D2CBB8" + +# Get all color palettes names +pal_reach(show_palettes = T) +#> [1] "main" "primary" "secondary" "two_dots" +#> [5] "two_dots_flashy" "red_main" "red_main_5" "red_alt" +#> [9] "red_alt_5" "iroise" "iroise_5" "discrete_6" +#> [13] "red_2" "red_3" "red_4" "red_5" +#> [17] "red_6" "red_7" "green_2" "green_3" +#> [21] "green_4" "green_5" "green_6" "green_7" +#> [25] "artichoke_2" "artichoke_3" "artichoke_4" "artichoke_5" +#> [29] "artichoke_6" "artichoke_7" "blue_2" "blue_3" +#> [33] "blue_4" "blue_5" "blue_6" "blue_7" ``` + +## Example 2: Bar chart, already REACH themed + +``` r +library(visualizeR) +library(palmerpenguins) +library(dplyr) + +df <- penguins |> + group_by(island, species) |> + summarize( + mean_bl = mean(bill_length_mm, na.rm = T), + mean_fl = mean(flipper_length_mm, na.rm = T)) |> + ungroup() + +# Simple bar chart by group +bar_reach(df, mean_bl, island, species, percent = FALSE, x_title = "Mean of bill length") +``` + + + +``` r + +# Using another color palette +bar_reach(df, mean_bl, island, species, percent = FALSE, palette = "artichoke_3", legend_rev = TRUE) +``` + + + +## Example 3: Point chart, already REACH themed + +At this stage, `point_reach()` only supports categorical grouping colors +with the `group` arg. + +``` r + +# Simple point chart +point_reach(penguins, bill_length_mm, flipper_length_mm) +``` + + + +``` r + +# Point chart with grouping colors, greater dot size, some transparency, reversed color palette +point_reach(penguins, bill_length_mm, flipper_length_mm, island, alpha = 0.6, size = 3, reverse = TRUE) +``` + + + +``` r + +# Using another color palettes +point_reach(penguins, bill_length_mm, flipper_length_mm, island, palette = "artichoke_3") +``` + + diff --git a/docs/404.html b/docs/404.html index 568d780..85d1af1 100644 --- a/docs/404.html +++ b/docs/404.html @@ -31,7 +31,7 @@ visualizeR - 0.1.7.9000 + 0.2.9000 + + + + + +
+
+
+ +
+

`ggblanket` as internals for deciding whether the bar chart is horizontally readable.

+
+ +
+

Usage

+
bar_reach(
+  df,
+  x,
+  y,
+  group = NULL,
+  percent = TRUE,
+  palette = "main",
+  reverse = FALSE,
+  family = "Leelawadee",
+  alpha = 1,
+  width = 0.5,
+  x_title = NULL,
+  y_title = NULL,
+  group_title = NULL,
+  position = "dodge",
+  title = NULL,
+  subtitle = NULL,
+  caption = NULL,
+  text_size = 10,
+  title_size = 14,
+  legend_position = "right",
+  legend_rev = TRUE,
+  void = FALSE,
+  ...
+)
+
+ +
+

Arguments

+
df
+

A data frame.

+ + +
x
+

A numeric column.

+ + +
y
+

A character column or coercible as a character column.

+ + +
group
+

Some grouping categorical column, e.g. administrative areas or population groups.

+ + +
percent
+

TRUE or FALSE. Should the x-labels be displayed as percentages? Default to TRUE.

+ + +
palette
+

Palette name from 'pal_reach()'.

+ + +
reverse
+

Boolean indicating whether the palette should be reversed.

+ + +
family
+

The font family for all plot's texts. Default to "Leelawadee".

+ + +
alpha
+

Transparency.

+ + +
width
+

Width.

+ + +
x_title
+

The x scale title. Default to NULL.

+ + +
y_title
+

The y scale title. Default to NULL.

+ + +
group_title
+

The group legend title. Default to NULL.

+ + +
position
+

Should the chart be stacked? Default to "dodge". Can take "dodge" and "stack".

+ + +
title
+

Plot title. Default to NULL.

+ + +
subtitle
+

Plot subtitle. Default to NULL.

+ + +
caption
+

Caption title string. Default to NULL.

+ + +
text_size
+

The size of all text other than the title, subtitle and caption. Defaults to 10.

+ + +
title_size
+

The size of the title text. Defaults to 14.

+ + +
legend_position
+

Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none".

+ + +
legend_rev
+

Reverse the color in the guide? Default to TRUE.

+ + +
void
+

Boolean to remove all elements from the plot. Default to FALSE.

+ + +
...
+

Other arguments to be passed to "ggblanket::gg_col"

+ +
+
+

Value

+ + +

A bar chart

+
+ +
+ + +
+ + + +
+ + + + + + + diff --git a/docs/reference/buffer_bbox.html b/docs/reference/buffer_bbox.html index f6ec98f..730871e 100644 --- a/docs/reference/buffer_bbox.html +++ b/docs/reference/buffer_bbox.html @@ -10,7 +10,7 @@ visualizeR - 0.1.7.9000 + 0.2.9000 - - - - - -
-
-
- -
-

Simple horizontal bar chart

-
- -
-

Usage

-
hbar(
-  .tbl,
-  x,
-  y,
-  group = NULL,
-  initiative = "reach",
-  palette = "primary",
-  width = 0.5,
-  x_title = "",
-  y_title = "",
-  group_title = NULL,
-  font_family = "Leelawadee",
-  position = "dodge",
-  reverse = FALSE,
-  title = "",
-  subtitle = "",
-  gg_theme = NULL,
-  ...
-)
-
- -
-

Arguments

-
.tbl
-

Some data

- - -
x
-

Some numeric column on the x scale

- - -
y
-

Some column on the y scale

- - -
group
-

Some grouping categorical column, e.g. administrative areas

- - -
initiative
-

Either "reach" or "agora" or "impact" for the color palette

- - -
palette
-

The color palette from the initiative

- - -
width
-

Width

- - -
x_title
-

The x scale title. Default to empty string

- - -
y_title
-

The y scale title. Default to empty string

- - -
group_title
-

The group legend title. Defaut to NULL

- - -
font_family
-

The font family. Default to "Leelawadee"

- - -
position
-

Should the chart be stacked? Default to dodge

- - -
reverse
-

Boolean indicating whether the color palette should be reversed

- - -
title
-

Plot title. Default to empty string

- - -
subtitle
-

Plot subtitle. Default to empty string

- - -
gg_theme
-

Some ggplot2 theme

- - -
...
-

Other arguments to be passed to "ggblanket::gg_col"

- -
-
-

Value

- - -

A horizontal bar chart

-
- -
- - -
- - - -
- - - - - - - diff --git a/docs/reference/hbar_percent.html b/docs/reference/hbar_percent.html deleted file mode 100644 index 31f50cf..0000000 --- a/docs/reference/hbar_percent.html +++ /dev/null @@ -1,171 +0,0 @@ - -Simple horizontal bar chart which scales x_labels to percentages — hbar_percent • visualizeR - Skip to contents - - -
-
-
- -
-

Simple horizontal bar chart which scales x_labels to percentages

-
- -
-

Usage

-
hbar_percent(
-  .tbl,
-  x,
-  y,
-  group = NULL,
-  initiative = "reach",
-  palette = "primary",
-  width = 0.5,
-  x_title = "",
-  y_title = "",
-  group_title = NULL,
-  font_family = "Leelawadee",
-  position = "dodge",
-  reverse = FALSE,
-  title = "",
-  subtitle = "",
-  gg_theme = NULL,
-  ...
-)
-
- -
-

Arguments

-
.tbl
-

Some data

- - -
x
-

Some numeric column on the x scale

- - -
y
-

Some column on the y scale

- - -
group
-

Some grouping categorical column, e.g. administrative areas

- - -
initiative
-

Either "reach" or "agora" or "impact" for the color palette

- - -
palette
-

The color palette from the initiative

- - -
width
-

Width

- - -
x_title
-

The x scale title. Default to empty string

- - -
y_title
-

The y scale title. Default to empty string

- - -
group_title
-

The group legend title. Defaut to NULL

- - -
font_family
-

The font family. Default to "Leelawadee"

- - -
position
-

Should the chart be stacked? Default to dodge

- - -
reverse
-

Boolean indicating whether the color palette should be reversed

- - -
title
-

Plot title. Default to empty string

- - -
subtitle
-

Plot subtitle. Default to empty string

- - -
gg_theme
-

Some ggplot2 theme

- - -
...
-

Other arguments to be passed to "ggblanket::gg_col"

- -
-
-

Value

- - -

A horizontal bar chart

-
- -
- - -
- - - -
- - - - - - - diff --git a/docs/reference/if_not_in_stop.html b/docs/reference/if_not_in_stop.html index 5ae751d..c7ad676 100644 --- a/docs/reference/if_not_in_stop.html +++ b/docs/reference/if_not_in_stop.html @@ -10,7 +10,7 @@ visualizeR - 0.1.7.9000 + 0.2.9000 + + + + + +
+
+
+ +
+

`ggblanket` as internals for deciding whether the bar chart is horizontally readable.

+
+ +
+

Usage

+
point_reach(
+  df,
+  x,
+  y,
+  group = NULL,
+  palette = "main",
+  reverse = FALSE,
+  family = "Leelawadee",
+  alpha = 1,
+  size = 1.5,
+  x_title = NULL,
+  y_title = NULL,
+  group_title = NULL,
+  title = NULL,
+  subtitle = NULL,
+  caption = NULL,
+  text_size = 10,
+  title_size = 14,
+  legend_position = "right",
+  void = FALSE,
+  ...
+)
+
+ +
+

Arguments

+
df
+

A data frame.

+ + +
x
+

A numeric column.

+ + +
y
+

A character column or coercible as a character column.

+ + +
group
+

Some grouping categorical column, e.g. administrative areas or population groups.

+ + +
palette
+

Palette name from 'pal_reach()'.

+ + +
reverse
+

Boolean indicating whether the palette should be reversed.

+ + +
family
+

The font family for all plot's texts. Default to "Leelawadee".

+ + +
alpha
+

Transparency.

+ + +
size
+

Dot size. Default to 1.5.

+ + +
x_title
+

The x scale title. Default to NULL.

+ + +
y_title
+

The y scale title. Default to NULL.

+ + +
group_title
+

The group legend title. Default to NULL.

+ + +
title
+

Plot title. Default to NULL.

+ + +
subtitle
+

Plot subtitle. Default to NULL.

+ + +
caption
+

Caption title string. Default to NULL.

+ + +
text_size
+

The size of all text other than the title, subtitle and caption. Defaults to 10.

+ + +
title_size
+

The size of the title text. Defaults to 14.

+ + +
legend_position
+

Position of the legend; Default to "right". Can take "right", "left", "top", "bottom" or "none".

+ + +
void
+

Boolean to remove all elements from the plot. Default to FALSE.

+ + +
...
+

Other arguments to be passed to "ggblanket::gg_col"

+ +
+
+

Value

+ + +

A bar chart

+
+ +
+ + +
+ + + +
+ + + + + + + diff --git a/docs/reference/scale_color.html b/docs/reference/scale_color.html index 917a737..8071345 100644 --- a/docs/reference/scale_color.html +++ b/docs/reference/scale_color.html @@ -10,7 +10,7 @@ visualizeR - 0.1.7.9000 + 0.2.9000 - - - - - -
-
-
- -
-

Some REACH theme for ggplot

-
- -
-

Usage

-
theme_reach_borders(family = "Leelawadee")
-
- -
-

Arguments

-
family
-

The font family. Default to "Leelawadee"

- -
-
-

Value

- - -

A theme to be added to the "+" ggplot grammar

-
- -
- - -
- - - -
- - - - - - - diff --git a/docs/reference/theme_reach_flip_hist.html b/docs/reference/theme_reach_flip_hist.html deleted file mode 100644 index 1d47350..0000000 --- a/docs/reference/theme_reach_flip_hist.html +++ /dev/null @@ -1,89 +0,0 @@ - -Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist • visualizeR - Skip to contents - - -
-
-
- -
-

Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for horizontal bar charts.

-
- -
-

Usage

-
theme_reach_flip_hist(family = "Leelawadee")
-
- -
-

Arguments

-
family
-

The font family. Default to "Leelawadee"

- -
-
-

Value

- - -

A theme to be added to the "+" ggplot grammar

-
- -
- - -
- - - -
- - - - - - - diff --git a/docs/reference/theme_reach_hist.html b/docs/reference/theme_reach_hist.html deleted file mode 100644 index 40b9e8f..0000000 --- a/docs/reference/theme_reach_hist.html +++ /dev/null @@ -1,89 +0,0 @@ - -Some reach more minimal theme for a ggplot histogram — theme_reach_hist • visualizeR - Skip to contents - - -
-
-
- -
-

Give some REACH colors and fonts to a ggplot. Based on theme_bw(). To be used for vertical bar charts.

-
- -
-

Usage

-
theme_reach_hist(family = "Leelawadee")
-
- -
-

Arguments

-
family
-

The font family. Default to "Leelawadee"

- -
-
-

Value

- - -

A theme to be added to the "+" ggplot grammar

-
- -
- - -
- - - -
- - - - - - - diff --git a/docs/search.json b/docs/search.json index 604241b..1a72d85 100644 --- a/docs/search.json +++ b/docs/search.json @@ -1 +1 @@ -[{"path":"https://gnoblet.github.io/visualizeR/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Noblet Guillaume. Author, maintainer.","code":""},{"path":"https://gnoblet.github.io/visualizeR/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"Guillaume N (2022). visualizeR: color! viz!. https://github.com/gnoblet/visualizeR, https://gnoblet.github.io/visualizeR/.","code":"@Manual{, title = {visualizeR: What a color! What a viz!}, author = {Noblet Guillaume}, year = {2022}, note = {https://github.com/gnoblet/visualizeR, https://gnoblet.github.io/visualizeR/}, }"},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"visualizer-","dir":"","previous_headings":"","what":"What a color! What a viz!","title":"What a color! What a viz!","text":"color! viz! visualizeR proposes utils get REACH AGORA colors, ready--go color palettes, visualization functions (horizontal hist graph instance).","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"What a color! What a viz!","text":"can install last version visualizeR GitHub :","code":"# install.packages(\"devtools\") devtools::install_github(\"gnoblet/visualizeR\", build_vignettes = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"roadmap","dir":"","previous_headings":"","what":"Roadmap","title":"What a color! What a viz!","text":"Roadmap follows: Add IMPACT’s colors Add color palettes internal documentation remains added --7-color palettes black color palettes Add new types visualization (e.g. dumbbell plot) Use examples Add ease-map functions Add interactive functions (maps graphs)","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"request","dir":"","previous_headings":"","what":"Request","title":"What a color! What a viz!","text":"Please, hesitate pull request new viz colors color palettes, email request change (guillaume.noblet@reach-initiative.org gnoblet@zaclys.net).","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"example","dir":"","previous_headings":"","what":"Example","title":"What a color! What a viz!","text":"","code":"library(visualizeR) # Get all saved REACH colors, named cols_reach(unnamed = F)"},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"GNU General Public License","title":"GNU General Public License","text":"Version 3, 29 June 2007Copyright © 2007 Free Software Foundation, Inc.  Everyone permitted copy distribute verbatim copies license document, changing allowed.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"preamble","dir":"","previous_headings":"","what":"Preamble","title":"GNU General Public License","text":"GNU General Public License free, copyleft license software kinds works. licenses software practical works designed take away freedom share change works. contrast, GNU General Public License intended guarantee freedom share change versions program–make sure remains free software users. , Free Software Foundation, use GNU General Public License software; applies also work released way authors. can apply programs, . speak free software, referring freedom, price. General Public Licenses designed make sure freedom distribute copies free software (charge wish), receive source code can get want , can change software use pieces new free programs, know can things. protect rights, need prevent others denying rights asking surrender rights. Therefore, certain responsibilities distribute copies software, modify : responsibilities respect freedom others. example, distribute copies program, whether gratis fee, must pass recipients freedoms received. must make sure , , receive can get source code. must show terms know rights. Developers use GNU GPL protect rights two steps: (1) assert copyright software, (2) offer License giving legal permission copy, distribute /modify . developers’ authors’ protection, GPL clearly explains warranty free software. users’ authors’ sake, GPL requires modified versions marked changed, problems attributed erroneously authors previous versions. devices designed deny users access install run modified versions software inside , although manufacturer can . fundamentally incompatible aim protecting users’ freedom change software. systematic pattern abuse occurs area products individuals use, precisely unacceptable. Therefore, designed version GPL prohibit practice products. problems arise substantially domains, stand ready extend provision domains future versions GPL, needed protect freedom users. Finally, every program threatened constantly software patents. States allow patents restrict development use software general-purpose computers, , wish avoid special danger patents applied free program make effectively proprietary. prevent , GPL assures patents used render program non-free. precise terms conditions copying, distribution modification follow.","code":""},{"path":[]},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"0-definitions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"0. Definitions","title":"GNU General Public License","text":"“License” refers version 3 GNU General Public License. “Copyright” also means copyright-like laws apply kinds works, semiconductor masks. “Program” refers copyrightable work licensed License. licensee addressed “”. “Licensees” “recipients” may individuals organizations. “modify” work means copy adapt part work fashion requiring copyright permission, making exact copy. resulting work called “modified version” earlier work work “based ” earlier work. “covered work” means either unmodified Program work based Program. “propagate” work means anything , without permission, make directly secondarily liable infringement applicable copyright law, except executing computer modifying private copy. Propagation includes copying, distribution (without modification), making available public, countries activities well. “convey” work means kind propagation enables parties make receive copies. Mere interaction user computer network, transfer copy, conveying. interactive user interface displays “Appropriate Legal Notices” extent includes convenient prominently visible feature (1) displays appropriate copyright notice, (2) tells user warranty work (except extent warranties provided), licensees may convey work License, view copy License. interface presents list user commands options, menu, prominent item list meets criterion.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"1-source-code","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"1. Source Code","title":"GNU General Public License","text":"“source code” work means preferred form work making modifications . “Object code” means non-source form work. “Standard Interface” means interface either official standard defined recognized standards body, , case interfaces specified particular programming language, one widely used among developers working language. “System Libraries” executable work include anything, work whole, () included normal form packaging Major Component, part Major Component, (b) serves enable use work Major Component, implement Standard Interface implementation available public source code form. “Major Component”, context, means major essential component (kernel, window system, ) specific operating system () executable work runs, compiler used produce work, object code interpreter used run . “Corresponding Source” work object code form means source code needed generate, install, (executable work) run object code modify work, including scripts control activities. However, include work’s System Libraries, general-purpose tools generally available free programs used unmodified performing activities part work. example, Corresponding Source includes interface definition files associated source files work, source code shared libraries dynamically linked subprograms work specifically designed require, intimate data communication control flow subprograms parts work. Corresponding Source need include anything users can regenerate automatically parts Corresponding Source. Corresponding Source work source code form work.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"2-basic-permissions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"2. Basic Permissions","title":"GNU General Public License","text":"rights granted License granted term copyright Program, irrevocable provided stated conditions met. License explicitly affirms unlimited permission run unmodified Program. output running covered work covered License output, given content, constitutes covered work. License acknowledges rights fair use equivalent, provided copyright law. may make, run propagate covered works convey, without conditions long license otherwise remains force. may convey covered works others sole purpose make modifications exclusively , provide facilities running works, provided comply terms License conveying material control copyright. thus making running covered works must exclusively behalf, direction control, terms prohibit making copies copyrighted material outside relationship . Conveying circumstances permitted solely conditions stated . Sublicensing allowed; section 10 makes unnecessary.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"3-protecting-users-legal-rights-from-anti-circumvention-law","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"3. Protecting Users’ Legal Rights From Anti-Circumvention Law","title":"GNU General Public License","text":"covered work shall deemed part effective technological measure applicable law fulfilling obligations article 11 WIPO copyright treaty adopted 20 December 1996, similar laws prohibiting restricting circumvention measures. convey covered work, waive legal power forbid circumvention technological measures extent circumvention effected exercising rights License respect covered work, disclaim intention limit operation modification work means enforcing, work’s users, third parties’ legal rights forbid circumvention technological measures.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"4-conveying-verbatim-copies","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"4. Conveying Verbatim Copies","title":"GNU General Public License","text":"may convey verbatim copies Program’s source code receive , medium, provided conspicuously appropriately publish copy appropriate copyright notice; keep intact notices stating License non-permissive terms added accord section 7 apply code; keep intact notices absence warranty; give recipients copy License along Program. may charge price price copy convey, may offer support warranty protection fee.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"5-conveying-modified-source-versions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"5. Conveying Modified Source Versions","title":"GNU General Public License","text":"may convey work based Program, modifications produce Program, form source code terms section 4, provided also meet conditions: ) work must carry prominent notices stating modified , giving relevant date. b) work must carry prominent notices stating released License conditions added section 7. requirement modifies requirement section 4 “keep intact notices”. c) must license entire work, whole, License anyone comes possession copy. License therefore apply, along applicable section 7 additional terms, whole work, parts, regardless packaged. License gives permission license work way, invalidate permission separately received . d) work interactive user interfaces, must display Appropriate Legal Notices; however, Program interactive interfaces display Appropriate Legal Notices, work need make . compilation covered work separate independent works, nature extensions covered work, combined form larger program, volume storage distribution medium, called “aggregate” compilation resulting copyright used limit access legal rights compilation’s users beyond individual works permit. Inclusion covered work aggregate cause License apply parts aggregate.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"6-conveying-non-source-forms","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"6. Conveying Non-Source Forms","title":"GNU General Public License","text":"may convey covered work object code form terms sections 4 5, provided also convey machine-readable Corresponding Source terms License, one ways: ) Convey object code , embodied , physical product (including physical distribution medium), accompanied Corresponding Source fixed durable physical medium customarily used software interchange. b) Convey object code , embodied , physical product (including physical distribution medium), accompanied written offer, valid least three years valid long offer spare parts customer support product model, give anyone possesses object code either (1) copy Corresponding Source software product covered License, durable physical medium customarily used software interchange, price reasonable cost physically performing conveying source, (2) access copy Corresponding Source network server charge. c) Convey individual copies object code copy written offer provide Corresponding Source. alternative allowed occasionally noncommercially, received object code offer, accord subsection 6b. d) Convey object code offering access designated place (gratis charge), offer equivalent access Corresponding Source way place charge. need require recipients copy Corresponding Source along object code. place copy object code network server, Corresponding Source may different server (operated third party) supports equivalent copying facilities, provided maintain clear directions next object code saying find Corresponding Source. Regardless server hosts Corresponding Source, remain obligated ensure available long needed satisfy requirements. e) Convey object code using peer--peer transmission, provided inform peers object code Corresponding Source work offered general public charge subsection 6d. separable portion object code, whose source code excluded Corresponding Source System Library, need included conveying object code work. “User Product” either (1) “consumer product”, means tangible personal property normally used personal, family, household purposes, (2) anything designed sold incorporation dwelling. determining whether product consumer product, doubtful cases shall resolved favor coverage. particular product received particular user, “normally used” refers typical common use class product, regardless status particular user way particular user actually uses, expects expected use, product. product consumer product regardless whether product substantial commercial, industrial non-consumer uses, unless uses represent significant mode use product. “Installation Information” User Product means methods, procedures, authorization keys, information required install execute modified versions covered work User Product modified version Corresponding Source. information must suffice ensure continued functioning modified object code case prevented interfered solely modification made. convey object code work section , , specifically use , User Product, conveying occurs part transaction right possession use User Product transferred recipient perpetuity fixed term (regardless transaction characterized), Corresponding Source conveyed section must accompanied Installation Information. requirement apply neither third party retains ability install modified object code User Product (example, work installed ROM). requirement provide Installation Information include requirement continue provide support service, warranty, updates work modified installed recipient, User Product modified installed. Access network may denied modification materially adversely affects operation network violates rules protocols communication across network. Corresponding Source conveyed, Installation Information provided, accord section must format publicly documented (implementation available public source code form), must require special password key unpacking, reading copying.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"7-additional-terms","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"7. Additional Terms","title":"GNU General Public License","text":"“Additional permissions” terms supplement terms License making exceptions one conditions. Additional permissions applicable entire Program shall treated though included License, extent valid applicable law. additional permissions apply part Program, part may used separately permissions, entire Program remains governed License without regard additional permissions. convey copy covered work, may option remove additional permissions copy, part . (Additional permissions may written require removal certain cases modify work.) may place additional permissions material, added covered work, can give appropriate copyright permission. Notwithstanding provision License, material add covered work, may (authorized copyright holders material) supplement terms License terms: ) Disclaiming warranty limiting liability differently terms sections 15 16 License; b) Requiring preservation specified reasonable legal notices author attributions material Appropriate Legal Notices displayed works containing ; c) Prohibiting misrepresentation origin material, requiring modified versions material marked reasonable ways different original version; d) Limiting use publicity purposes names licensors authors material; e) Declining grant rights trademark law use trade names, trademarks, service marks; f) Requiring indemnification licensors authors material anyone conveys material (modified versions ) contractual assumptions liability recipient, liability contractual assumptions directly impose licensors authors. non-permissive additional terms considered “restrictions” within meaning section 10. Program received , part , contains notice stating governed License along term restriction, may remove term. license document contains restriction permits relicensing conveying License, may add covered work material governed terms license document, provided restriction survive relicensing conveying. add terms covered work accord section, must place, relevant source files, statement additional terms apply files, notice indicating find applicable terms. Additional terms, permissive non-permissive, may stated form separately written license, stated exceptions; requirements apply either way.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"8-termination","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"8. Termination","title":"GNU General Public License","text":"may propagate modify covered work except expressly provided License. attempt otherwise propagate modify void, automatically terminate rights License (including patent licenses granted third paragraph section 11). However, cease violation License, license particular copyright holder reinstated () provisionally, unless copyright holder explicitly finally terminates license, (b) permanently, copyright holder fails notify violation reasonable means prior 60 days cessation. Moreover, license particular copyright holder reinstated permanently copyright holder notifies violation reasonable means, first time received notice violation License (work) copyright holder, cure violation prior 30 days receipt notice. Termination rights section terminate licenses parties received copies rights License. rights terminated permanently reinstated, qualify receive new licenses material section 10.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"9-acceptance-not-required-for-having-copies","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"9. Acceptance Not Required for Having Copies","title":"GNU General Public License","text":"required accept License order receive run copy Program. Ancillary propagation covered work occurring solely consequence using peer--peer transmission receive copy likewise require acceptance. However, nothing License grants permission propagate modify covered work. actions infringe copyright accept License. Therefore, modifying propagating covered work, indicate acceptance License .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"10-automatic-licensing-of-downstream-recipients","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"10. Automatic Licensing of Downstream Recipients","title":"GNU General Public License","text":"time convey covered work, recipient automatically receives license original licensors, run, modify propagate work, subject License. responsible enforcing compliance third parties License. “entity transaction” transaction transferring control organization, substantially assets one, subdividing organization, merging organizations. propagation covered work results entity transaction, party transaction receives copy work also receives whatever licenses work party’s predecessor interest give previous paragraph, plus right possession Corresponding Source work predecessor interest, predecessor can get reasonable efforts. may impose restrictions exercise rights granted affirmed License. example, may impose license fee, royalty, charge exercise rights granted License, may initiate litigation (including cross-claim counterclaim lawsuit) alleging patent claim infringed making, using, selling, offering sale, importing Program portion .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"11-patents","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"11. Patents","title":"GNU General Public License","text":"“contributor” copyright holder authorizes use License Program work Program based. work thus licensed called contributor’s “contributor version”. contributor’s “essential patent claims” patent claims owned controlled contributor, whether already acquired hereafter acquired, infringed manner, permitted License, making, using, selling contributor version, include claims infringed consequence modification contributor version. purposes definition, “control” includes right grant patent sublicenses manner consistent requirements License. contributor grants non-exclusive, worldwide, royalty-free patent license contributor’s essential patent claims, make, use, sell, offer sale, import otherwise run, modify propagate contents contributor version. following three paragraphs, “patent license” express agreement commitment, however denominated, enforce patent (express permission practice patent covenant sue patent infringement). “grant” patent license party means make agreement commitment enforce patent party. convey covered work, knowingly relying patent license, Corresponding Source work available anyone copy, free charge terms License, publicly available network server readily accessible means, must either (1) cause Corresponding Source available, (2) arrange deprive benefit patent license particular work, (3) arrange, manner consistent requirements License, extend patent license downstream recipients. “Knowingly relying” means actual knowledge , patent license, conveying covered work country, recipient’s use covered work country, infringe one identifiable patents country reason believe valid. , pursuant connection single transaction arrangement, convey, propagate procuring conveyance , covered work, grant patent license parties receiving covered work authorizing use, propagate, modify convey specific copy covered work, patent license grant automatically extended recipients covered work works based . patent license “discriminatory” include within scope coverage, prohibits exercise , conditioned non-exercise one rights specifically granted License. may convey covered work party arrangement third party business distributing software, make payment third party based extent activity conveying work, third party grants, parties receive covered work , discriminatory patent license () connection copies covered work conveyed (copies made copies), (b) primarily connection specific products compilations contain covered work, unless entered arrangement, patent license granted, prior 28 March 2007. Nothing License shall construed excluding limiting implied license defenses infringement may otherwise available applicable patent law.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"12-no-surrender-of-others-freedom","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"12. No Surrender of Others’ Freedom","title":"GNU General Public License","text":"conditions imposed (whether court order, agreement otherwise) contradict conditions License, excuse conditions License. convey covered work satisfy simultaneously obligations License pertinent obligations, consequence may convey . example, agree terms obligate collect royalty conveying convey Program, way satisfy terms License refrain entirely conveying Program.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"13-use-with-the-gnu-affero-general-public-license","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"13. Use with the GNU Affero General Public License","title":"GNU General Public License","text":"Notwithstanding provision License, permission link combine covered work work licensed version 3 GNU Affero General Public License single combined work, convey resulting work. terms License continue apply part covered work, special requirements GNU Affero General Public License, section 13, concerning interaction network apply combination .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"14-revised-versions-of-this-license","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"14. Revised Versions of this License","title":"GNU General Public License","text":"Free Software Foundation may publish revised /new versions GNU General Public License time time. new versions similar spirit present version, may differ detail address new problems concerns. version given distinguishing version number. Program specifies certain numbered version GNU General Public License “later version” applies , option following terms conditions either numbered version later version published Free Software Foundation. Program specify version number GNU General Public License, may choose version ever published Free Software Foundation. Program specifies proxy can decide future versions GNU General Public License can used, proxy’s public statement acceptance version permanently authorizes choose version Program. Later license versions may give additional different permissions. However, additional obligations imposed author copyright holder result choosing follow later version.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"15-disclaimer-of-warranty","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"15. Disclaimer of Warranty","title":"GNU General Public License","text":"WARRANTY PROGRAM, EXTENT PERMITTED APPLICABLE LAW. EXCEPT OTHERWISE STATED WRITING COPYRIGHT HOLDERS /PARTIES PROVIDE PROGRAM “” WITHOUT WARRANTY KIND, EITHER EXPRESSED IMPLIED, INCLUDING, LIMITED , IMPLIED WARRANTIES MERCHANTABILITY FITNESS PARTICULAR PURPOSE. ENTIRE RISK QUALITY PERFORMANCE PROGRAM . PROGRAM PROVE DEFECTIVE, ASSUME COST NECESSARY SERVICING, REPAIR CORRECTION.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"16-limitation-of-liability","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"16. Limitation of Liability","title":"GNU General Public License","text":"EVENT UNLESS REQUIRED APPLICABLE LAW AGREED WRITING COPYRIGHT HOLDER, PARTY MODIFIES /CONVEYS PROGRAM PERMITTED , LIABLE DAMAGES, INCLUDING GENERAL, SPECIAL, INCIDENTAL CONSEQUENTIAL DAMAGES ARISING USE INABILITY USE PROGRAM (INCLUDING LIMITED LOSS DATA DATA RENDERED INACCURATE LOSSES SUSTAINED THIRD PARTIES FAILURE PROGRAM OPERATE PROGRAMS), EVEN HOLDER PARTY ADVISED POSSIBILITY DAMAGES.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"17-interpretation-of-sections-15-and-16","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"17. Interpretation of Sections 15 and 16","title":"GNU General Public License","text":"disclaimer warranty limitation liability provided given local legal effect according terms, reviewing courts shall apply local law closely approximates absolute waiver civil liability connection Program, unless warranty assumption liability accompanies copy Program return fee. END TERMS CONDITIONS","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"how-to-apply-these-terms-to-your-new-programs","dir":"","previous_headings":"","what":"How to Apply These Terms to Your New Programs","title":"GNU General Public License","text":"develop new program, want greatest possible use public, best way achieve make free software everyone can redistribute change terms. , attach following notices program. safest attach start source file effectively state exclusion warranty; file least “copyright” line pointer full notice found. Also add information contact electronic paper mail. program terminal interaction, make output short notice like starts interactive mode: hypothetical commands show w show c show appropriate parts General Public License. course, program’s commands might different; GUI interface, use “box”. also get employer (work programmer) school, , sign “copyright disclaimer” program, necessary. information , apply follow GNU GPL, see . GNU General Public License permit incorporating program proprietary programs. program subroutine library, may consider useful permit linking proprietary applications library. want , use GNU Lesser General Public License instead License. first, please read .","code":" Copyright (C) This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . Copyright (C) This program comes with ABSOLUTELY NO WARRANTY; for details type 'show w'. This is free software, and you are welcome to redistribute it under certain conditions; type 'show c' for details."},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":null,"dir":"Reference","previous_headings":"","what":"Abord bad argument — abort_bad_argument","title":"Abord bad argument — abort_bad_argument","text":"Abord bad argument","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Abord bad argument — abort_bad_argument","text":"","code":"abort_bad_argument(arg, must, not = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Abord bad argument — abort_bad_argument","text":"arg argument must arg must Optional. arg must .","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Abord bad argument — abort_bad_argument","text":"stop statement","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":null,"dir":"Reference","previous_headings":"","what":"Bbbox buffer — buffer_bbox","title":"Bbbox buffer — buffer_bbox","text":"Bbbox buffer","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bbbox buffer — buffer_bbox","text":"","code":"buffer_bbox(sf_obj, buffer = 0)"},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bbbox buffer — buffer_bbox","text":"sf_obj `sf` object buffer buffer, either one value vector 4 values (left, bottom, right, top). Default 0.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Bbbox buffer — buffer_bbox","text":"bbox buffer","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract AGORA colors as hex codes — cols_agora","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"Function extract AGORA colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"","code":"cols_agora(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract IMPACT colors as hex codes — cols_impact","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"Function extract IMPACT colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"","code":"cols_impact(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract REACH colors as hex codes — cols_reach","title":"Function to extract REACH colors as hex codes — cols_reach","text":"Function extract REACH colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract REACH colors as hex codes — cols_reach","text":"","code":"cols_reach(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract REACH colors as hex codes — cols_reach","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract REACH colors as hex codes — cols_reach","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract REACH colors as hex codes — cols_reach","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar.html","id":null,"dir":"Reference","previous_headings":"","what":"Simple horizontal bar chart — hbar","title":"Simple horizontal bar chart — hbar","text":"Simple horizontal bar chart","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Simple horizontal bar chart — hbar","text":"","code":"hbar( .tbl, x, y, group = NULL, initiative = \"reach\", palette = \"primary\", width = 0.5, x_title = \"\", y_title = \"\", group_title = NULL, font_family = \"Leelawadee\", position = \"dodge\", reverse = FALSE, title = \"\", subtitle = \"\", gg_theme = NULL, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Simple horizontal bar chart — hbar","text":".tbl data x numeric column x scale y column y scale group grouping categorical column, e.g. administrative areas initiative Either \"reach\" \"agora\" \"impact\" color palette palette color palette initiative width Width x_title x scale title. Default empty string y_title y scale title. Default empty string group_title group legend title. Defaut NULL font_family font family. Default \"Leelawadee\" position chart stacked? Default dodge reverse Boolean indicating whether color palette reversed title Plot title. Default empty string subtitle Plot subtitle. Default empty string gg_theme ggplot2 theme ... arguments passed \"ggblanket::gg_col\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Simple horizontal bar chart — hbar","text":"horizontal bar chart","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar_percent.html","id":null,"dir":"Reference","previous_headings":"","what":"Simple horizontal bar chart which scales x_labels to percentages — hbar_percent","title":"Simple horizontal bar chart which scales x_labels to percentages — hbar_percent","text":"Simple horizontal bar chart scales x_labels percentages","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar_percent.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Simple horizontal bar chart which scales x_labels to percentages — hbar_percent","text":"","code":"hbar_percent( .tbl, x, y, group = NULL, initiative = \"reach\", palette = \"primary\", width = 0.5, x_title = \"\", y_title = \"\", group_title = NULL, font_family = \"Leelawadee\", position = \"dodge\", reverse = FALSE, title = \"\", subtitle = \"\", gg_theme = NULL, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar_percent.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Simple horizontal bar chart which scales x_labels to percentages — hbar_percent","text":".tbl data x numeric column x scale y column y scale group grouping categorical column, e.g. administrative areas initiative Either \"reach\" \"agora\" \"impact\" color palette palette color palette initiative width Width x_title x scale title. Default empty string y_title y scale title. Default empty string group_title group legend title. Defaut NULL font_family font family. Default \"Leelawadee\" position chart stacked? Default dodge reverse Boolean indicating whether color palette reversed title Plot title. Default empty string subtitle Plot subtitle. Default empty string gg_theme ggplot2 theme ... arguments passed \"ggblanket::gg_col\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/hbar_percent.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Simple horizontal bar chart which scales x_labels to percentages — hbar_percent","text":"horizontal bar chart","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":null,"dir":"Reference","previous_headings":"","what":"Stop statement ","title":"Stop statement ","text":"Stop statement \"colnames\" colnames","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Stop statement ","text":"","code":"if_not_in_stop(.tbl, cols, df, arg = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Stop statement ","text":".tbl tibble cols vector column names (quoted) df Provide tibble name character string arg Default NULL.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Stop statement ","text":"stop statement","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":null,"dir":"Reference","previous_headings":"","what":"Stop statement ","title":"Stop statement ","text":"Stop statement \"vector\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Stop statement ","text":"","code":"if_vec_not_in_stop(vec, cols, vec_name, arg = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Stop statement ","text":"vec vector character strings cols set character strings vec_name Provide vector name character string arg Default NULL.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Stop statement ","text":"stop statement elements vec cols","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate an AGORA color palette — pal_agora","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"Return function interpolate AGORA color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"","code":"pal_agora( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"palette Character name palette AGORA palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate an IMPACT color palette — pal_impact","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"Return function interpolate IMPACT color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"","code":"pal_impact( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"palette Character name palette IMPACT palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate a REACH color palette — pal_reach","title":"Return function to interpolate a REACH color palette — pal_reach","text":"Return function interpolate REACH color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate a REACH color palette — pal_reach","text":"","code":"pal_reach( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate a REACH color palette — pal_reach","text":"palette Character name palette REACH palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate a REACH color palette — pal_reach","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":null,"dir":"Reference","previous_headings":"","what":"Color scale constructor for REACH or AGORA colors — scale_color","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"Color scale constructor REACH AGORA colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"","code":"scale_color( initiative = \"reach\", palette = \"main\", discrete = TRUE, reverse = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"initiative Either \"reach\" \"agora palette Palette name `pal_reach()` `pal_agora()` discrete Boolean indicating whether color aesthetic discrete reverse Boolean indicating whether palette reversed ... Additional arguments passed discrete_scale() scale_color_gradient(), used respectively discrete TRUE FALSE","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"color scale ggplot","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":null,"dir":"Reference","previous_headings":"","what":"Fill scale constructor for REACH or AGORA colors — scale_fill","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"Fill scale constructor REACH AGORA colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"","code":"scale_fill( initiative = \"reach\", palette = \"main\", discrete = TRUE, reverse = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"initiative Either \"reach\" \"agora palette Palette name `pal_reach()` `pal_agora()` discrete Boolean indicating whether color aesthetic discrete reverse Boolean indicating whether palette reversed ... Additional arguments passed discrete_scale() scale_fill_gradient(), used respectively discrete TRUE FALSE","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"fill scale ggplot","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":null,"dir":"Reference","previous_headings":"","what":"Subvec not in — subvec_not_in","title":"Subvec not in — subvec_not_in","text":"Subvec ","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Subvec not in — subvec_not_in","text":"","code":"subvec_not_in(vector, set)"},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Subvec not in — subvec_not_in","text":"vector vector subset set set-vector","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Subvec not in — subvec_not_in","text":"subset vector set","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Base REACH ggplot2 theme — theme_reach","title":"Base REACH ggplot2 theme — theme_reach","text":"Give reach colors fonts ggplot. Based theme_bw()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Base REACH ggplot2 theme — theme_reach","text":"","code":"theme_reach(family = \"Leelawadee\")"},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Base REACH ggplot2 theme — theme_reach","text":"family font family. Default \"Leelawadee\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Base REACH ggplot2 theme — theme_reach","text":"base REACH theme","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_borders.html","id":null,"dir":"Reference","previous_headings":"","what":"Some REACH theme for ggplot — theme_reach_borders","title":"Some REACH theme for ggplot — theme_reach_borders","text":"REACH theme ggplot","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_borders.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Some REACH theme for ggplot — theme_reach_borders","text":"","code":"theme_reach_borders(family = \"Leelawadee\")"},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_borders.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Some REACH theme for ggplot — theme_reach_borders","text":"family font family. Default \"Leelawadee\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_borders.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Some REACH theme for ggplot — theme_reach_borders","text":"theme added \"+\" ggplot grammar","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_flip_hist.html","id":null,"dir":"Reference","previous_headings":"","what":"Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist","title":"Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist","text":"Give REACH colors fonts ggplot. Based theme_bw(). used horizontal bar charts.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_flip_hist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist","text":"","code":"theme_reach_flip_hist(family = \"Leelawadee\")"},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_flip_hist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist","text":"family font family. Default \"Leelawadee\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_flip_hist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Some reach more minimal theme for a ggplot flipped histogram — theme_reach_flip_hist","text":"theme added \"+\" ggplot grammar","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_hist.html","id":null,"dir":"Reference","previous_headings":"","what":"Some reach more minimal theme for a ggplot histogram — theme_reach_hist","title":"Some reach more minimal theme for a ggplot histogram — theme_reach_hist","text":"Give REACH colors fonts ggplot. Based theme_bw(). used vertical bar charts.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_hist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Some reach more minimal theme for a ggplot histogram — theme_reach_hist","text":"","code":"theme_reach_hist(family = \"Leelawadee\")"},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_hist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Some reach more minimal theme for a ggplot histogram — theme_reach_hist","text":"family font family. Default \"Leelawadee\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach_hist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Some reach more minimal theme for a ggplot histogram — theme_reach_hist","text":"theme added \"+\" ggplot grammar","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0179000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.7.9000","title":"visualizeR 0.1.7.9000","text":"Fixed color palettes.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0169000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.6.9000","title":"visualizeR 0.1.6.9000","text":"IMPACT colors palettes added: function cols_impact() pal_impact(). Color palettes REACH added (2 7 continuous palettes) ; see updated cols_reach() pal_reach().","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0159000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.5.9000","title":"visualizeR 0.1.5.9000","text":"Move simplevis successor ggblanket.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0149000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.4.9000","title":"visualizeR 0.1.4.9000","text":"hbar() gains new boolean argument reverse pass pal_reach() pal_agora(), indicating color palette reversed .","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0139000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.3.9000","title":"visualizeR 0.1.3.9000","text":"Small change hbar(): removes error arg within simplevis::gg_hbar() call.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0129000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.2.9000","title":"visualizeR 0.1.2.9000","text":"duplicate scale_color() function, now scale_fill()","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0119000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.1.9000","title":"visualizeR 0.1.1.9000","text":"Added two horizontal bar functions: hbar(), hbar_percent() (#3) Added internals check missing columns bad arguments (#3) Modified theme_reach() documentation Add buffer_bbox() function produce buffered bbox, e.g. use tmap","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-010","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.0","title":"visualizeR 0.1.0","text":"Added NEWS.md file track changes package Initiate repo","code":""}] +[{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"GNU General Public License","title":"GNU General Public License","text":"Version 3, 29 June 2007Copyright © 2007 Free Software Foundation, Inc.  Everyone permitted copy distribute verbatim copies license document, changing allowed.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"preamble","dir":"","previous_headings":"","what":"Preamble","title":"GNU General Public License","text":"GNU General Public License free, copyleft license software kinds works. licenses software practical works designed take away freedom share change works. contrast, GNU General Public License intended guarantee freedom share change versions program–make sure remains free software users. , Free Software Foundation, use GNU General Public License software; applies also work released way authors. can apply programs, . speak free software, referring freedom, price. General Public Licenses designed make sure freedom distribute copies free software (charge wish), receive source code can get want , can change software use pieces new free programs, know can things. protect rights, need prevent others denying rights asking surrender rights. Therefore, certain responsibilities distribute copies software, modify : responsibilities respect freedom others. example, distribute copies program, whether gratis fee, must pass recipients freedoms received. must make sure , , receive can get source code. must show terms know rights. Developers use GNU GPL protect rights two steps: (1) assert copyright software, (2) offer License giving legal permission copy, distribute /modify . developers’ authors’ protection, GPL clearly explains warranty free software. users’ authors’ sake, GPL requires modified versions marked changed, problems attributed erroneously authors previous versions. devices designed deny users access install run modified versions software inside , although manufacturer can . fundamentally incompatible aim protecting users’ freedom change software. systematic pattern abuse occurs area products individuals use, precisely unacceptable. Therefore, designed version GPL prohibit practice products. problems arise substantially domains, stand ready extend provision domains future versions GPL, needed protect freedom users. Finally, every program threatened constantly software patents. States allow patents restrict development use software general-purpose computers, , wish avoid special danger patents applied free program make effectively proprietary. prevent , GPL assures patents used render program non-free. precise terms conditions copying, distribution modification follow.","code":""},{"path":[]},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_0-definitions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"0. Definitions","title":"GNU General Public License","text":"“License” refers version 3 GNU General Public License. “Copyright” also means copyright-like laws apply kinds works, semiconductor masks. “Program” refers copyrightable work licensed License. licensee addressed “”. “Licensees” “recipients” may individuals organizations. “modify” work means copy adapt part work fashion requiring copyright permission, making exact copy. resulting work called “modified version” earlier work work “based ” earlier work. “covered work” means either unmodified Program work based Program. “propagate” work means anything , without permission, make directly secondarily liable infringement applicable copyright law, except executing computer modifying private copy. Propagation includes copying, distribution (without modification), making available public, countries activities well. “convey” work means kind propagation enables parties make receive copies. Mere interaction user computer network, transfer copy, conveying. interactive user interface displays “Appropriate Legal Notices” extent includes convenient prominently visible feature (1) displays appropriate copyright notice, (2) tells user warranty work (except extent warranties provided), licensees may convey work License, view copy License. interface presents list user commands options, menu, prominent item list meets criterion.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_1-source-code","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"1. Source Code","title":"GNU General Public License","text":"“source code” work means preferred form work making modifications . “Object code” means non-source form work. “Standard Interface” means interface either official standard defined recognized standards body, , case interfaces specified particular programming language, one widely used among developers working language. “System Libraries” executable work include anything, work whole, () included normal form packaging Major Component, part Major Component, (b) serves enable use work Major Component, implement Standard Interface implementation available public source code form. “Major Component”, context, means major essential component (kernel, window system, ) specific operating system () executable work runs, compiler used produce work, object code interpreter used run . “Corresponding Source” work object code form means source code needed generate, install, (executable work) run object code modify work, including scripts control activities. However, include work’s System Libraries, general-purpose tools generally available free programs used unmodified performing activities part work. example, Corresponding Source includes interface definition files associated source files work, source code shared libraries dynamically linked subprograms work specifically designed require, intimate data communication control flow subprograms parts work. Corresponding Source need include anything users can regenerate automatically parts Corresponding Source. Corresponding Source work source code form work.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_2-basic-permissions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"2. Basic Permissions","title":"GNU General Public License","text":"rights granted License granted term copyright Program, irrevocable provided stated conditions met. License explicitly affirms unlimited permission run unmodified Program. output running covered work covered License output, given content, constitutes covered work. License acknowledges rights fair use equivalent, provided copyright law. may make, run propagate covered works convey, without conditions long license otherwise remains force. may convey covered works others sole purpose make modifications exclusively , provide facilities running works, provided comply terms License conveying material control copyright. thus making running covered works must exclusively behalf, direction control, terms prohibit making copies copyrighted material outside relationship . Conveying circumstances permitted solely conditions stated . Sublicensing allowed; section 10 makes unnecessary.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_3-protecting-users-legal-rights-from-anti-circumvention-law","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"3. Protecting Users’ Legal Rights From Anti-Circumvention Law","title":"GNU General Public License","text":"covered work shall deemed part effective technological measure applicable law fulfilling obligations article 11 WIPO copyright treaty adopted 20 December 1996, similar laws prohibiting restricting circumvention measures. convey covered work, waive legal power forbid circumvention technological measures extent circumvention effected exercising rights License respect covered work, disclaim intention limit operation modification work means enforcing, work’s users, third parties’ legal rights forbid circumvention technological measures.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_4-conveying-verbatim-copies","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"4. Conveying Verbatim Copies","title":"GNU General Public License","text":"may convey verbatim copies Program’s source code receive , medium, provided conspicuously appropriately publish copy appropriate copyright notice; keep intact notices stating License non-permissive terms added accord section 7 apply code; keep intact notices absence warranty; give recipients copy License along Program. may charge price price copy convey, may offer support warranty protection fee.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_5-conveying-modified-source-versions","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"5. Conveying Modified Source Versions","title":"GNU General Public License","text":"may convey work based Program, modifications produce Program, form source code terms section 4, provided also meet conditions: ) work must carry prominent notices stating modified , giving relevant date. b) work must carry prominent notices stating released License conditions added section 7. requirement modifies requirement section 4 “keep intact notices”. c) must license entire work, whole, License anyone comes possession copy. License therefore apply, along applicable section 7 additional terms, whole work, parts, regardless packaged. License gives permission license work way, invalidate permission separately received . d) work interactive user interfaces, must display Appropriate Legal Notices; however, Program interactive interfaces display Appropriate Legal Notices, work need make . compilation covered work separate independent works, nature extensions covered work, combined form larger program, volume storage distribution medium, called “aggregate” compilation resulting copyright used limit access legal rights compilation’s users beyond individual works permit. Inclusion covered work aggregate cause License apply parts aggregate.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_6-conveying-non-source-forms","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"6. Conveying Non-Source Forms","title":"GNU General Public License","text":"may convey covered work object code form terms sections 4 5, provided also convey machine-readable Corresponding Source terms License, one ways: ) Convey object code , embodied , physical product (including physical distribution medium), accompanied Corresponding Source fixed durable physical medium customarily used software interchange. b) Convey object code , embodied , physical product (including physical distribution medium), accompanied written offer, valid least three years valid long offer spare parts customer support product model, give anyone possesses object code either (1) copy Corresponding Source software product covered License, durable physical medium customarily used software interchange, price reasonable cost physically performing conveying source, (2) access copy Corresponding Source network server charge. c) Convey individual copies object code copy written offer provide Corresponding Source. alternative allowed occasionally noncommercially, received object code offer, accord subsection 6b. d) Convey object code offering access designated place (gratis charge), offer equivalent access Corresponding Source way place charge. need require recipients copy Corresponding Source along object code. place copy object code network server, Corresponding Source may different server (operated third party) supports equivalent copying facilities, provided maintain clear directions next object code saying find Corresponding Source. Regardless server hosts Corresponding Source, remain obligated ensure available long needed satisfy requirements. e) Convey object code using peer--peer transmission, provided inform peers object code Corresponding Source work offered general public charge subsection 6d. separable portion object code, whose source code excluded Corresponding Source System Library, need included conveying object code work. “User Product” either (1) “consumer product”, means tangible personal property normally used personal, family, household purposes, (2) anything designed sold incorporation dwelling. determining whether product consumer product, doubtful cases shall resolved favor coverage. particular product received particular user, “normally used” refers typical common use class product, regardless status particular user way particular user actually uses, expects expected use, product. product consumer product regardless whether product substantial commercial, industrial non-consumer uses, unless uses represent significant mode use product. “Installation Information” User Product means methods, procedures, authorization keys, information required install execute modified versions covered work User Product modified version Corresponding Source. information must suffice ensure continued functioning modified object code case prevented interfered solely modification made. convey object code work section , , specifically use , User Product, conveying occurs part transaction right possession use User Product transferred recipient perpetuity fixed term (regardless transaction characterized), Corresponding Source conveyed section must accompanied Installation Information. requirement apply neither third party retains ability install modified object code User Product (example, work installed ROM). requirement provide Installation Information include requirement continue provide support service, warranty, updates work modified installed recipient, User Product modified installed. Access network may denied modification materially adversely affects operation network violates rules protocols communication across network. Corresponding Source conveyed, Installation Information provided, accord section must format publicly documented (implementation available public source code form), must require special password key unpacking, reading copying.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_7-additional-terms","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"7. Additional Terms","title":"GNU General Public License","text":"“Additional permissions” terms supplement terms License making exceptions one conditions. Additional permissions applicable entire Program shall treated though included License, extent valid applicable law. additional permissions apply part Program, part may used separately permissions, entire Program remains governed License without regard additional permissions. convey copy covered work, may option remove additional permissions copy, part . (Additional permissions may written require removal certain cases modify work.) may place additional permissions material, added covered work, can give appropriate copyright permission. Notwithstanding provision License, material add covered work, may (authorized copyright holders material) supplement terms License terms: ) Disclaiming warranty limiting liability differently terms sections 15 16 License; b) Requiring preservation specified reasonable legal notices author attributions material Appropriate Legal Notices displayed works containing ; c) Prohibiting misrepresentation origin material, requiring modified versions material marked reasonable ways different original version; d) Limiting use publicity purposes names licensors authors material; e) Declining grant rights trademark law use trade names, trademarks, service marks; f) Requiring indemnification licensors authors material anyone conveys material (modified versions ) contractual assumptions liability recipient, liability contractual assumptions directly impose licensors authors. non-permissive additional terms considered “restrictions” within meaning section 10. Program received , part , contains notice stating governed License along term restriction, may remove term. license document contains restriction permits relicensing conveying License, may add covered work material governed terms license document, provided restriction survive relicensing conveying. add terms covered work accord section, must place, relevant source files, statement additional terms apply files, notice indicating find applicable terms. Additional terms, permissive non-permissive, may stated form separately written license, stated exceptions; requirements apply either way.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_8-termination","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"8. Termination","title":"GNU General Public License","text":"may propagate modify covered work except expressly provided License. attempt otherwise propagate modify void, automatically terminate rights License (including patent licenses granted third paragraph section 11). However, cease violation License, license particular copyright holder reinstated () provisionally, unless copyright holder explicitly finally terminates license, (b) permanently, copyright holder fails notify violation reasonable means prior 60 days cessation. Moreover, license particular copyright holder reinstated permanently copyright holder notifies violation reasonable means, first time received notice violation License (work) copyright holder, cure violation prior 30 days receipt notice. Termination rights section terminate licenses parties received copies rights License. rights terminated permanently reinstated, qualify receive new licenses material section 10.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_9-acceptance-not-required-for-having-copies","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"9. Acceptance Not Required for Having Copies","title":"GNU General Public License","text":"required accept License order receive run copy Program. Ancillary propagation covered work occurring solely consequence using peer--peer transmission receive copy likewise require acceptance. However, nothing License grants permission propagate modify covered work. actions infringe copyright accept License. Therefore, modifying propagating covered work, indicate acceptance License .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_10-automatic-licensing-of-downstream-recipients","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"10. Automatic Licensing of Downstream Recipients","title":"GNU General Public License","text":"time convey covered work, recipient automatically receives license original licensors, run, modify propagate work, subject License. responsible enforcing compliance third parties License. “entity transaction” transaction transferring control organization, substantially assets one, subdividing organization, merging organizations. propagation covered work results entity transaction, party transaction receives copy work also receives whatever licenses work party’s predecessor interest give previous paragraph, plus right possession Corresponding Source work predecessor interest, predecessor can get reasonable efforts. may impose restrictions exercise rights granted affirmed License. example, may impose license fee, royalty, charge exercise rights granted License, may initiate litigation (including cross-claim counterclaim lawsuit) alleging patent claim infringed making, using, selling, offering sale, importing Program portion .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_11-patents","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"11. Patents","title":"GNU General Public License","text":"“contributor” copyright holder authorizes use License Program work Program based. work thus licensed called contributor’s “contributor version”. contributor’s “essential patent claims” patent claims owned controlled contributor, whether already acquired hereafter acquired, infringed manner, permitted License, making, using, selling contributor version, include claims infringed consequence modification contributor version. purposes definition, “control” includes right grant patent sublicenses manner consistent requirements License. contributor grants non-exclusive, worldwide, royalty-free patent license contributor’s essential patent claims, make, use, sell, offer sale, import otherwise run, modify propagate contents contributor version. following three paragraphs, “patent license” express agreement commitment, however denominated, enforce patent (express permission practice patent covenant sue patent infringement). “grant” patent license party means make agreement commitment enforce patent party. convey covered work, knowingly relying patent license, Corresponding Source work available anyone copy, free charge terms License, publicly available network server readily accessible means, must either (1) cause Corresponding Source available, (2) arrange deprive benefit patent license particular work, (3) arrange, manner consistent requirements License, extend patent license downstream recipients. “Knowingly relying” means actual knowledge , patent license, conveying covered work country, recipient’s use covered work country, infringe one identifiable patents country reason believe valid. , pursuant connection single transaction arrangement, convey, propagate procuring conveyance , covered work, grant patent license parties receiving covered work authorizing use, propagate, modify convey specific copy covered work, patent license grant automatically extended recipients covered work works based . patent license “discriminatory” include within scope coverage, prohibits exercise , conditioned non-exercise one rights specifically granted License. may convey covered work party arrangement third party business distributing software, make payment third party based extent activity conveying work, third party grants, parties receive covered work , discriminatory patent license () connection copies covered work conveyed (copies made copies), (b) primarily connection specific products compilations contain covered work, unless entered arrangement, patent license granted, prior 28 March 2007. Nothing License shall construed excluding limiting implied license defenses infringement may otherwise available applicable patent law.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_12-no-surrender-of-others-freedom","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"12. No Surrender of Others’ Freedom","title":"GNU General Public License","text":"conditions imposed (whether court order, agreement otherwise) contradict conditions License, excuse conditions License. convey covered work satisfy simultaneously obligations License pertinent obligations, consequence may convey . example, agree terms obligate collect royalty conveying convey Program, way satisfy terms License refrain entirely conveying Program.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_13-use-with-the-gnu-affero-general-public-license","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"13. Use with the GNU Affero General Public License","title":"GNU General Public License","text":"Notwithstanding provision License, permission link combine covered work work licensed version 3 GNU Affero General Public License single combined work, convey resulting work. terms License continue apply part covered work, special requirements GNU Affero General Public License, section 13, concerning interaction network apply combination .","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_14-revised-versions-of-this-license","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"14. Revised Versions of this License","title":"GNU General Public License","text":"Free Software Foundation may publish revised /new versions GNU General Public License time time. new versions similar spirit present version, may differ detail address new problems concerns. version given distinguishing version number. Program specifies certain numbered version GNU General Public License “later version” applies , option following terms conditions either numbered version later version published Free Software Foundation. Program specify version number GNU General Public License, may choose version ever published Free Software Foundation. Program specifies proxy can decide future versions GNU General Public License can used, proxy’s public statement acceptance version permanently authorizes choose version Program. Later license versions may give additional different permissions. However, additional obligations imposed author copyright holder result choosing follow later version.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_15-disclaimer-of-warranty","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"15. Disclaimer of Warranty","title":"GNU General Public License","text":"WARRANTY PROGRAM, EXTENT PERMITTED APPLICABLE LAW. EXCEPT OTHERWISE STATED WRITING COPYRIGHT HOLDERS /PARTIES PROVIDE PROGRAM “” WITHOUT WARRANTY KIND, EITHER EXPRESSED IMPLIED, INCLUDING, LIMITED , IMPLIED WARRANTIES MERCHANTABILITY FITNESS PARTICULAR PURPOSE. ENTIRE RISK QUALITY PERFORMANCE PROGRAM . PROGRAM PROVE DEFECTIVE, ASSUME COST NECESSARY SERVICING, REPAIR CORRECTION.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_16-limitation-of-liability","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"16. Limitation of Liability","title":"GNU General Public License","text":"EVENT UNLESS REQUIRED APPLICABLE LAW AGREED WRITING COPYRIGHT HOLDER, PARTY MODIFIES /CONVEYS PROGRAM PERMITTED , LIABLE DAMAGES, INCLUDING GENERAL, SPECIAL, INCIDENTAL CONSEQUENTIAL DAMAGES ARISING USE INABILITY USE PROGRAM (INCLUDING LIMITED LOSS DATA DATA RENDERED INACCURATE LOSSES SUSTAINED THIRD PARTIES FAILURE PROGRAM OPERATE PROGRAMS), EVEN HOLDER PARTY ADVISED POSSIBILITY DAMAGES.","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"id_17-interpretation-of-sections-15-and-16","dir":"","previous_headings":"TERMS AND CONDITIONS","what":"17. Interpretation of Sections 15 and 16","title":"GNU General Public License","text":"disclaimer warranty limitation liability provided given local legal effect according terms, reviewing courts shall apply local law closely approximates absolute waiver civil liability connection Program, unless warranty assumption liability accompanies copy Program return fee. END TERMS CONDITIONS","code":""},{"path":"https://gnoblet.github.io/visualizeR/LICENSE.html","id":"how-to-apply-these-terms-to-your-new-programs","dir":"","previous_headings":"","what":"How to Apply These Terms to Your New Programs","title":"GNU General Public License","text":"develop new program, want greatest possible use public, best way achieve make free software everyone can redistribute change terms. , attach following notices program. safest attach start source file effectively state exclusion warranty; file least “copyright” line pointer full notice found. Also add information contact electronic paper mail. program terminal interaction, make output short notice like starts interactive mode: hypothetical commands show w show c show appropriate parts General Public License. course, program’s commands might different; GUI interface, use “box”. also get employer (work programmer) school, , sign “copyright disclaimer” program, necessary. information , apply follow GNU GPL, see . GNU General Public License permit incorporating program proprietary programs. program subroutine library, may consider useful permit linking proprietary applications library. want , use GNU Lesser General Public License instead License. first, please read .","code":" Copyright (C) This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . Copyright (C) This program comes with ABSOLUTELY NO WARRANTY; for details type 'show w'. This is free software, and you are welcome to redistribute it under certain conditions; type 'show c' for details."},{"path":"https://gnoblet.github.io/visualizeR/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Noblet Guillaume. Author, maintainer.","code":""},{"path":"https://gnoblet.github.io/visualizeR/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"Guillaume N (2022). visualizeR: color! viz!. https://github.com/gnoblet/visualizeR, https://gnoblet.github.io/visualizeR/.","code":"@Manual{, title = {visualizeR: What a color! What a viz!}, author = {Noblet Guillaume}, year = {2022}, note = {https://github.com/gnoblet/visualizeR, https://gnoblet.github.io/visualizeR/}, }"},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"visualizer-","dir":"","previous_headings":"","what":"What a color! What a viz!","title":"What a color! What a viz!","text":"color! viz! visualizeR proposes utils get REACH AGORA colors, ready--go color palettes, visualization functions (horizontal hist graph instance).","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"What a color! What a viz!","text":"can install last version visualizeR GitHub :","code":"# install.packages(\"devtools\") devtools::install_github(\"gnoblet/visualizeR\", build_vignettes = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"roadmap","dir":"","previous_headings":"","what":"Roadmap","title":"What a color! What a viz!","text":"Roadmap follows: Add IMPACT’s colors Add color palettes internal documentation remains added --7-color palettes black color palettes Add new types visualization (e.g. dumbbell plot) Use examples Add ease-map functions Add interactive functions (maps graphs)","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"request","dir":"","previous_headings":"","what":"Request","title":"What a color! What a viz!","text":"Please, hesitate pull request new viz colors color palettes, email request change (guillaume.noblet@reach-initiative.org gnoblet@zaclys.net).","code":""},{"path":"https://gnoblet.github.io/visualizeR/index.html","id":"example","dir":"","previous_headings":"","what":"Example","title":"What a color! What a viz!","text":"","code":"library(visualizeR) # Get all saved REACH colors, named cols_reach(unnamed = F)"},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":null,"dir":"Reference","previous_headings":"","what":"Abord bad argument — abort_bad_argument","title":"Abord bad argument — abort_bad_argument","text":"Abord bad argument","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Abord bad argument — abort_bad_argument","text":"","code":"abort_bad_argument(arg, must, not = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Abord bad argument — abort_bad_argument","text":"arg argument must arg must Optional. arg must .","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Abord bad argument — abort_bad_argument","text":"stop statement","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/bar_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Simple bar chart — bar_reach","title":"Simple bar chart — bar_reach","text":"`ggblanket` internals deciding whether bar chart horizontally readable.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/bar_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Simple bar chart — bar_reach","text":"","code":"bar_reach( df, x, y, group = NULL, percent = TRUE, palette = \"main\", reverse = FALSE, family = \"Leelawadee\", alpha = 1, width = 0.5, x_title = NULL, y_title = NULL, group_title = NULL, position = \"dodge\", title = NULL, subtitle = NULL, caption = NULL, text_size = 10, title_size = 14, legend_position = \"right\", legend_rev = TRUE, void = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/bar_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Simple bar chart — bar_reach","text":"df data frame. x numeric column. y character column coercible character column. group grouping categorical column, e.g. administrative areas population groups. percent TRUE FALSE. x-labels displayed percentages? Default TRUE. palette Palette name 'pal_reach()'. reverse Boolean indicating whether palette reversed. family font family plot's texts. Default \"Leelawadee\". alpha Transparency. width Width. x_title x scale title. Default NULL. y_title y scale title. Default NULL. group_title group legend title. Default NULL. position chart stacked? Default \"dodge\". Can take \"dodge\" \"stack\". title Plot title. Default NULL. subtitle Plot subtitle. Default NULL. caption Caption title string. Default NULL. text_size size text title, subtitle caption. Defaults 10. title_size size title text. Defaults 14. legend_position Position legend; Default \"right\". Can take \"right\", \"left\", \"top\", \"bottom\" \"none\". legend_rev Reverse color guide? Default TRUE. void Boolean remove elements plot. Default FALSE. ... arguments passed \"ggblanket::gg_col\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/bar_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Simple bar chart — bar_reach","text":"bar chart","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":null,"dir":"Reference","previous_headings":"","what":"Bbbox buffer — buffer_bbox","title":"Bbbox buffer — buffer_bbox","text":"Bbbox buffer","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bbbox buffer — buffer_bbox","text":"","code":"buffer_bbox(sf_obj, buffer = 0)"},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bbbox buffer — buffer_bbox","text":"sf_obj `sf` object buffer buffer, either one value vector 4 values (left, bottom, right, top). Default 0.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Bbbox buffer — buffer_bbox","text":"bbox buffer","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract AGORA colors as hex codes — cols_agora","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"Function extract AGORA colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"","code":"cols_agora(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_agora.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract AGORA colors as hex codes — cols_agora","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract IMPACT colors as hex codes — cols_impact","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"Function extract IMPACT colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"","code":"cols_impact(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_impact.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract IMPACT colors as hex codes — cols_impact","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Function to extract REACH colors as hex codes — cols_reach","title":"Function to extract REACH colors as hex codes — cols_reach","text":"Function extract REACH colors hex codes","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Function to extract REACH colors as hex codes — cols_reach","text":"","code":"cols_reach(..., unnamed = TRUE)"},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Function to extract REACH colors as hex codes — cols_reach","text":"... Character names reach colors. NULL returns colors unnamed output vector unnamed? Default `TRUE`","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Function to extract REACH colors as hex codes — cols_reach","text":"hex code hex codes named unnamed","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/cols_reach.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Function to extract REACH colors as hex codes — cols_reach","text":"function needs modified add colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":null,"dir":"Reference","previous_headings":"","what":"Stop statement ","title":"Stop statement ","text":"Stop statement \"colnames\" colnames","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Stop statement ","text":"","code":"if_not_in_stop(.tbl, cols, df, arg = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Stop statement ","text":".tbl tibble cols vector column names (quoted) df Provide tibble name character string arg Default NULL.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Stop statement ","text":"stop statement","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":null,"dir":"Reference","previous_headings":"","what":"Stop statement ","title":"Stop statement ","text":"Stop statement \"vector\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Stop statement ","text":"","code":"if_vec_not_in_stop(vec, cols, vec_name, arg = NULL)"},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Stop statement ","text":"vec vector character strings cols set character strings vec_name Provide vector name character string arg Default NULL.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/if_vec_not_in_stop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Stop statement ","text":"stop statement elements vec cols","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate an AGORA color palette — pal_agora","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"Return function interpolate AGORA color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"","code":"pal_agora( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"palette Character name palette AGORA palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_agora.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate an AGORA color palette — pal_agora","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate an IMPACT color palette — pal_impact","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"Return function interpolate IMPACT color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"","code":"pal_impact( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"palette Character name palette IMPACT palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_impact.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate an IMPACT color palette — pal_impact","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Return function to interpolate a REACH color palette — pal_reach","title":"Return function to interpolate a REACH color palette — pal_reach","text":"Return function interpolate REACH color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Return function to interpolate a REACH color palette — pal_reach","text":"","code":"pal_reach( palette = \"main\", reverse = FALSE, color_ramp_palette = FALSE, show_palettes = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Return function to interpolate a REACH color palette — pal_reach","text":"palette Character name palette REACH palettes reverse Boolean indicating whether palette reversed color_ramp_palette output `grDevices::colorRampPalette` function vector hex codes? Default former `TRUE` show_palettes ouput set palettes names pick ? Default `FALSE` ... Additional arguments pass colorRampPalette()","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/pal_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Return function to interpolate a REACH color palette — pal_reach","text":"color palette","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/point_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"Simple point chart — point_reach","title":"Simple point chart — point_reach","text":"`ggblanket` internals deciding whether bar chart horizontally readable.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/point_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Simple point chart — point_reach","text":"","code":"point_reach( df, x, y, group = NULL, palette = \"main\", reverse = FALSE, family = \"Leelawadee\", alpha = 1, size = 1.5, x_title = NULL, y_title = NULL, group_title = NULL, title = NULL, subtitle = NULL, caption = NULL, text_size = 10, title_size = 14, legend_position = \"right\", void = FALSE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/point_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Simple point chart — point_reach","text":"df data frame. x numeric column. y character column coercible character column. group grouping categorical column, e.g. administrative areas population groups. palette Palette name 'pal_reach()'. reverse Boolean indicating whether palette reversed. family font family plot's texts. Default \"Leelawadee\". alpha Transparency. size Dot size. Default 1.5. x_title x scale title. Default NULL. y_title y scale title. Default NULL. group_title group legend title. Default NULL. title Plot title. Default NULL. subtitle Plot subtitle. Default NULL. caption Caption title string. Default NULL. text_size size text title, subtitle caption. Defaults 10. title_size size title text. Defaults 14. legend_position Position legend; Default \"right\". Can take \"right\", \"left\", \"top\", \"bottom\" \"none\". void Boolean remove elements plot. Default FALSE. ... arguments passed \"ggblanket::gg_col\"","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/point_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Simple point chart — point_reach","text":"bar chart","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":null,"dir":"Reference","previous_headings":"","what":"Color scale constructor for REACH or AGORA colors — scale_color","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"Color scale constructor REACH AGORA colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"","code":"scale_color( initiative = \"reach\", palette = \"main\", discrete = TRUE, reverse = FALSE, reverse_guide = TRUE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"initiative Either \"reach\" \"agora. palette Palette name `pal_reach()` `pal_agora()`. discrete Boolean indicating whether color aesthetic discrete . reverse Boolean indicating whether palette reversed. reverse_guide Boolean indicating whether guide reversed. ... Additional arguments passed discrete_scale() scale_fill_gradient(), used respectively discrete TRUE FALSE.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_color.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Color scale constructor for REACH or AGORA colors — scale_color","text":"color scale ggplot","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":null,"dir":"Reference","previous_headings":"","what":"Fill scale constructor for REACH or AGORA colors — scale_fill","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"Fill scale constructor REACH AGORA colors","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"","code":"scale_fill( initiative = \"reach\", palette = \"main\", discrete = TRUE, reverse = FALSE, reverse_guide = TRUE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"initiative Either \"reach\" \"agora. palette Palette name `pal_reach()` `pal_agora()`. discrete Boolean indicating whether color aesthetic discrete . reverse Boolean indicating whether palette reversed. reverse_guide Boolean indicating whether guide reversed. ... Additional arguments passed discrete_scale() scale_fill_gradient(), used respectively discrete TRUE FALSE.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/scale_fill.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Fill scale constructor for REACH or AGORA colors — scale_fill","text":"fill scale ggplot.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":null,"dir":"Reference","previous_headings":"","what":"Subvec not in — subvec_not_in","title":"Subvec not in — subvec_not_in","text":"Subvec ","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Subvec not in — subvec_not_in","text":"","code":"subvec_not_in(vector, set)"},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Subvec not in — subvec_not_in","text":"vector vector subset set set-vector","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/subvec_not_in.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Subvec not in — subvec_not_in","text":"subset vector set","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":null,"dir":"Reference","previous_headings":"","what":"ggplot2 theme with REACH color palettes — theme_reach","title":"ggplot2 theme with REACH color palettes — theme_reach","text":"Give reach colors fonts ggplot.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"ggplot2 theme with REACH color palettes — theme_reach","text":"","code":"theme_reach( palette = \"main\", discrete = TRUE, reverse = FALSE, family = \"Leelawadee\", text_size = 10, title_size = 14, plot_background_pal = \"#FFFFFF\", panel_background_pal = \"#FFFFFF\", void = FALSE, legend_position = \"right\", legend_direction = \"vertical\", legend_reverse = TRUE, ... )"},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"ggplot2 theme with REACH color palettes — theme_reach","text":"palette Palette name 'pal_reach()'. discrete Boolean indicating whether color aesthetic discrete . reverse Boolean indicating whether palette reversed. family font family plot's texts. Default \"Leelawadee\". text_size size text title, subtitle caption. Defaults 10. title_size size title text_family. Defaults 14. plot_background_pal color plot background color. Default white. panel_background_pal color panel background color. Default white. void Boolean remove elements plot. Default FALSE. legend_position Position legend; Default \"right\". Can take \"right\", \"left\", \"top\", \"bottom\" \"none\". legend_direction Direction legend. Default \"vertical\". Can take \"vertical\" \"horizontal\". legend_reverse Reverse color guide? Default TRUE. ... Additional arguments passed `ggblanket::gg_theme()`.","code":""},{"path":"https://gnoblet.github.io/visualizeR/reference/theme_reach.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"ggplot2 theme with REACH color palettes — theme_reach","text":"base REACH theme","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-029000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.2.9000","title":"visualizeR 0.2.9000","text":"Breaking changes: almost functions got refinements, new functions, typically hbar() becomes bar_reach() point_reach() added. Following theme_reach() now used plotting functions. Add README.md.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0179000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.7.9000","title":"visualizeR 0.1.7.9000","text":"Fixed color palettes.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0169000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.6.9000","title":"visualizeR 0.1.6.9000","text":"IMPACT colors palettes added: function cols_impact() pal_impact(). Color palettes REACH added (2 7 continuous palettes) ; see updated cols_reach() pal_reach().","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0159000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.5.9000","title":"visualizeR 0.1.5.9000","text":"Move simplevis successor ggblanket.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0149000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.4.9000","title":"visualizeR 0.1.4.9000","text":"hbar() gains new boolean argument reverse pass pal_reach() pal_agora(), indicating color palette reversed .","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0139000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.3.9000","title":"visualizeR 0.1.3.9000","text":"Small change hbar(): removes error arg within simplevis::gg_hbar() call.","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0129000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.2.9000","title":"visualizeR 0.1.2.9000","text":"duplicate scale_color() function, now scale_fill()","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-0119000","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.1.9000","title":"visualizeR 0.1.1.9000","text":"Added two horizontal bar functions: hbar(), hbar_percent() (#3) Added internals check missing columns bad arguments (#3) Modified theme_reach() documentation Add buffer_bbox() function produce buffered bbox, e.g. use tmap","code":""},{"path":"https://gnoblet.github.io/visualizeR/news/index.html","id":"visualizer-010","dir":"Changelog","previous_headings":"","what":"visualizeR 0.1.0","title":"visualizeR 0.1.0","text":"Added NEWS.md file track changes package Initiate repo","code":""}] diff --git a/docs/sitemap.xml b/docs/sitemap.xml index 856078f..c0b12e3 100644 --- a/docs/sitemap.xml +++ b/docs/sitemap.xml @@ -3,21 +3,24 @@ https://gnoblet.github.io/visualizeR/404.html + + https://gnoblet.github.io/visualizeR/LICENSE.html + https://gnoblet.github.io/visualizeR/authors.html https://gnoblet.github.io/visualizeR/index.html - - https://gnoblet.github.io/visualizeR/LICENSE.html - https://gnoblet.github.io/visualizeR/news/index.html https://gnoblet.github.io/visualizeR/reference/abort_bad_argument.html + + https://gnoblet.github.io/visualizeR/reference/bar_reach.html + https://gnoblet.github.io/visualizeR/reference/buffer_bbox.html @@ -30,12 +33,6 @@ https://gnoblet.github.io/visualizeR/reference/cols_reach.html - - https://gnoblet.github.io/visualizeR/reference/hbar.html - - - https://gnoblet.github.io/visualizeR/reference/hbar_percent.html - https://gnoblet.github.io/visualizeR/reference/if_not_in_stop.html @@ -54,6 +51,9 @@ https://gnoblet.github.io/visualizeR/reference/pal_reach.html + + https://gnoblet.github.io/visualizeR/reference/point_reach.html + https://gnoblet.github.io/visualizeR/reference/scale_color.html @@ -66,13 +66,4 @@ https://gnoblet.github.io/visualizeR/reference/theme_reach.html - - https://gnoblet.github.io/visualizeR/reference/theme_reach_borders.html - - - https://gnoblet.github.io/visualizeR/reference/theme_reach_flip_hist.html - - - https://gnoblet.github.io/visualizeR/reference/theme_reach_hist.html - diff --git a/man/figures/README-example-bar-chart-1.png b/man/figures/README-example-bar-chart-1.png new file mode 100644 index 0000000000000000000000000000000000000000..a14d122732825e80065755dd436b7728a215b38f GIT binary patch literal 14921 zcmd6u2Q=I9-|y3{cB`s(by148_AZK|D76Vyd(Vg+tJoo?Hb90X4ASXWG@%w&0pZELqefLaXi;13#9smF^X+L>v z1OS}=4gj2*p*v0c4Qca*}h-bD@oz;%H3V^!mzj16q?3&v&s z&TVHWus`my_TxVqmsLMB;7d!^Tr%^EtV~RFOQ54ex}@)dN-id=IUzZs(0n11|CbJS zfyB2{euC-PZ#aHm8B6W9j$|?({x$R4Nq>?xwHiUJb4>=0q{uetRet#`NqsCzz5b-EP%*px*!1H*5iNoTbncJ85rW@<2`{I z`QKgB%5;ma1OO4Bi=WTw<(}1>yO9>H$GWvB={?=3moANIh|>{}lf$5I8`H0@t~ym= z&?d(8lJ73Ny1HJCZ~w;+7t^o*UkCM{Gt__Hr@pThn=y41>+b1S4BgwkWX16^^dLCc zxlFDW*1AVePan5q#B@HYjG>|lioRv76qW&0^aP&skviR+ac}AM)cVLsRi`KLN&W}h zn226qAk;Yde%kuQAY(Pg!T-di{&$X_(-ZjU0OU5@hR_E+w{vUNR$BUqa3V8Quzdl- z_ab)J)k|!V!+I5f3AOPD97e_F!w+k3q`Vn;S$LF_4j zNyb_AU1;bFJ(fH-Ry8`qfK88=ZZNTERyC0)2D1BOzt}jJbS3ah@7XTwb@J);kM$c2 z(i_d$liNFN(~Md_g|E#}#zn542h5oIGLUCTx&F?H{D=jY<&y@s~rFL@=Hft6=FYtZm0N)wCW+TV+ zsj|!4qOrN9{(*+!jR}YB@Jt}Ni=~+b9#)oKGSIj5GMRN^m0iMi0(V>k@6bXDw_2JP z#qZyiz-i-2(_`vt8!=f;#2Q0`ek%^5pA5pj$4T_hCY53qrM}*~&7Y9DH66Pr9_VKh z&H9pZd?2Ww!K!v#;ig?HIcHCeE~idvb-3nmf1~1y*sB(5;Eifv(Cpxu3(*5%QM{%b zDoz_$Jg=y|-NYg}u3VuL*xQ&iv-Y?v{PHY+jl zb&hNSJ}La>y}R?t&W8!`>^5y4;fq<*+7=~M>6z6!C zLi}(Ss{O(La8Pn~^0&I7BH`M^{IFnQ%lhsM0$u0G8Lf>;@~Uh#xo|iuWYkeD=}G4< zZ+24+vg-`X`I5My9Pi1brQRS^gah)CddEi<=7uRHXma-1F>U|=%B(R)f@GH%r9BMv zNMvoDnPEdWpvog2D4!RI&Vp>=Wv+VFy89b!)MX>G{+KqYS?<-h7~B*$q04bRKG^sK zm*($#81e?p^$=?HHSf#8Sa-gyr+i95aCG&G(hqM5+^0*S{&R$Eaf^DqF{}%zUzHVg zC`pn6k~W({$!N*hxjDaN1Q)>Tp^OZIjI-UcMSn<1Ss)N>4M{Wde>a)cS;a`<*O4t6 z54ITp<7w#Mc{cr@@}NUC=oA9__3PI=dTG_3lW26zxQ(A*B^(YfD=BY!|DMsz%q+Rf z0k7tfbjR?9k`k8oa%o(III(L~fG!FpSv4dxk6pcNC1?DjA!GpEiXaJ_c_UN0O$D==S}F zq)JAOJj8^{X{+j7^Ywryn$b&CmqSFtKvJjaaf&GV$ldHWc0qVOa1_m4KZsO79w@zwb>{*GB3*53uA&TZ++z>O`!_Qq$tatC%8~hgr0)#9NFOgw*%Lv_Pn-g^?1HeR|pbg+wbY1 zxIcUIxidU21B@Vdi5Dn03p=bSh!E%`3wV`tif?QjPsHnfYw5%!IfXltx3t{lgV-|^ z(^l{G5E`z8-UR@Hi>Av2MXk4godG2_tH7xHF`=|4C7Lx3#Y>*H7}lq=W2~z(h#x7N z?05MRE@H+JkbXb+U8*6d1VX@q_B^MPz2BV#YWNj)-T^}we+UICUjl`RYXXajBAR(Q z*B5_(yBEJ^RO0nr@{|D!AK=+)(dI{`!h0(No`W}8l!&Uy>`79rY9Mmsz&8$PRh7Dp zewLTMp1$tHgZ!hU+c~A|@qcQAHJtSe&s8%^f3BP`S~got2yq=kdiP%2`fTv#Qqt3P zE1X{9TR~dA`Z;;d2yQ?Q$vzIdXXSl8`b+X>tD#hmkU+IoIYOc`^zLw5Q~%bvc&+oc z(tN^qr>(n`^mcVfcCM>eZa|WU73S>GSpVgw=P>e!C(0z3|NO8d4C< z1jOKVWz$piUdp0daL5)QQs=R+pDbd#?;Rnlzf#_`Wb`|6#7uKkBJQOCqaCleZg{Bq zn7YOJmVz_RDx-Z?ms;x=Z~DhJ$~(VI3O*N?X@*Ul&+-z9wokt3&mZdC&p;Ma63l4i zW`?YO{?pNPgj7<_vF$G@p(?k0Aui7q7U-iM$Ogv*hV2wHi`7!-gx}`k8_L}4Zufmv z&i68Zkr(^1R_tsflQqg>x45`CD=SO$=84e9f20&@wy9yG{hktGzlFHHb^Ux6oFn_n ze{XW^wP=GujqG-fW{)?#wPIBI7yXVetcuiX*Y-CmZ4EF>fpEu%GPJ(2K7 ze@^Yips8{w^z5-o_th=ktG%eEj&NVbQyU$mL}+9j0PquHT5G@M* zdK3%*d{^xDzuH9F&oU?6Nf1}MKQ=Q~TYQj&WjDVH0I+N5nk$y-^)RzQvLnh0;Vy#8 zoP#Ir8)NeI1`4$lmWl{qVSxl{1S!U|An9Fi3mI>le8@;&H(oPZndD{DvJuoA z>X5$GbF>%Y)ruxr%~kS7S%SQ{mjW%!%u!QBY})bC8LP2pRM%Ra9BY!0{vb=(7N#UB zFT)R&)ivNA7`ir3=68AWj|bSCx%6msqSimftfc?JMR$lCD2D}p8=m>V;kZ@F0{!}C zPj)z^bAc%CQrw~}lHwwHlEkb0_R$y~N z0}fXds)0TYcyvyJU{&>NV6**6-b)uuJw}B8BrNRD$}A}k4q!G)onhpp;`)Cg6F z6%_B(-WK=4Ml3=JvEFr6EN&XHH-F|!Dfe_K3TJji#uU`9fU9IS`9I6d)HMDcZ+g@3 zkX{zj1xv6Lg<26O*v+odrp{t8tA@LBitzR%uw7MvJ|U}ftSp}Uf%4S%%tN9$(R1G0 z-;mbdY@@3GVf1FS{zxr#^Q{?;N68YqAM6(8}{^G=s@$si-ayPnHN}o1UVLB0IiCmo z)ZD3sW9A0&na&-fQYlY`rl6#6RZi41B<@kVvP>$5GHm(ugK%_&*dF}3sklINj??2J z*L3f6RdsdU(?(+f8ly>faQSeAvjR$*MY;l+xl;IgtNEDYqoec$J=Sxulm z>7-ghESH$RpUY6a$u`k_@2SUBBewih4`1loxuZ+GCzW6r=EGcR$VGu@fBYpfM9yv~ zdcg*90lKOccxyEKLFkJ}@QZ|2b_QF9%Tey5l5q1~w}G#QZ3J-0N*rd1vDCFnPc*@9 zsrQ>BP;+~0Ogf?#o3EPEl3WI(|N1a+eXPW^jIz3nql|+UdlvYOhc}iseLVIZfl}gN z728eR1!Ik@=~IDwRKL|{5fROKd3jLN+W10`>oPK9qoX8wXMF=XyP7Wt)64o|e6Y=F zGrf`F{#&7v_zC6xp#)5HMaUyi*+5R9LnPAs=~(Tl;ESD~dX+slxu;quyTmK)JZ0Kv zM$2^(=le0m-!zz|(n$P6Qsagu>rwVE8~f__YF^5N-4}rw?)=xV$BBGq{Y%ffC?)Jb zabnTyMHKjr0Wd;R$reNk0L!-6JH%y`?=14M1E-}xo5U&g=g33Xm~YO^o>nKM*bFqP zQ6VoG*LM`){50E0=3cpB+n@BkM1XM8hpmEsmSXemtM_oa~$mml`3l-EK z7DO%ZQ`GC9MASlFJhn*vWEE_gm9zPiV;PKeqw4rJ7KdAm<~y}H^+lNoJVttvcfGbp z{$SuR*Bwi+_@XVxIl!ZcMfvlD6`;cI+DBHahx;Jj;pO2=?hw>k;L&t2ir@1=t9#EJ z(_WKp#t2%^p%Z3(+#Y+=LSJCxe8T$hPxVW=Gb03CnK|MpD0XRhW%Fa(#M!UWS@ph~ zM6Gn@l3M?Rj{6P_j6Y-j{K!`( zPI?~fw;mrqz3@iZk8v7iDK)mWMQ>r!_x*gDlc@hGYM{28Sy-P%rf~ozfJD=9+fj=T-HJTZu5}0cTe*U&D6eRQLDR zxM~BIb8>&ZN>rn(u>RMUAcs5!e<(W{`Qv+n5hCSkv$3h5cVYlV`} z{A$+J1Xty`T<~*3N@wqD&F{QUhT%_3debFz0=vi0gNxnbOh&rLNsFy0G(qXhCvPd| zs~Q~HE!6T%GpVspR$OxONMrvkY1)CYwy^$#tKlUzMt)S>mCKNGGsCMUPQyaY9PkuU<%ihmqw@AJVCqbeZmL@ryu*J%b< zzBWj@%dbJ_>-y+v1-KmieqA}lxQ&=zd`-!n^HWQ@+(u!!b5>}Jh9@F}AUIt`nsZBW zuPM?2ADsq#xaO>D_I8Jd=iym|>qn&1;_Qv*QKlb5r$c9>45q_My158?L)Azl+XI>Wn>I^b8Y80!}ItwGhKswL(t;b zA>1jzbp~ChsXZK+SFg(~qvTCTwJWEa;(lA)!g+NCbaSPBk#i>uYd-!%>nZ4Bf5JUf zf)@ogle((Z;$2HALsE~RUhEQDNr_v#?~6HI@M?gcd)BS3$ApHZGrxNR^3tP|I5?bB z4=`(d3ET(Oo>ptRG26J7-32QJ-n44BD>LRFE|Z;oQxC)u6wM;EBOVMr19t6IK8 zm*aTOHe6`wXCkQuaodv$*TTxz6al*e>ATTUkQXzN?~V2@+{0)WN3_M7KGUYn8KV*r zA(tffrx8qvQ=Qen-MI(SW1HhjmF2#n8L{R14fk^Xm;=1)iOUVVjkMFjoQ{~=U2TW3 z1Zg~|N0+i0mF2pf27JHavMn-=<2fAQ;1~wdKGkEteTGU#EfHI4sLg zdQdWgX~_{byAf*Ug_knb>FpurA9+S4u19Rt=4zfH#06A4@J-h`qP7FD3JvOo9T9>l>ZCl@5Qm)ecD1gR($tWFZqeM0I)Umcg<3&$3(~V@sJ{o1 zweN)1m*aURQ)w4H z5aT$O&bE}9;Ke@st>Wcc;bit9+G zj6sBVPWo#2CHau8L*9BY$p`uJd$4y>f-gFSu=_iSG({EB|+Y&ZnSk;nvj(%M><1nEs%X8fyPdJL7#Ccs& zGw%fv!rcO@Gg&v%Lh>0i$a>bP+q3MUL*U>&j#6J0aqQ=1FTv;olm@D7Kq0AN@}N+z zhuO@<4gffoiHph$w+qzwEf$~9!lM6Z(+P~MslM8)$JCqgzp7=3XOyNFh@RVAcJJ=* z9*kat9A%QoO_ZNiv=VlIN{UeE&T)y?6_RuIXzqDSMDxt3g~8L1O(fgF!NEj+a6f+) zxQN?AWYzrjfr^Jqaks+t7m{4;O78O<_>(sV&E!PnrdKhqym3y|PKLqi(FtU*k!G7g8w91TC< zmf-Ol(a%gY5av2f?rBn9c>WGCwmW9QB}R+X+@^wtOw zi&_>_oGjh=AZBOQ>sIUR<<9 z^w-$*_4R>3pr(G4%t@q~h_JBxDP~GUe~oUFeZw!M(i3cx<=Ja-^u4WJ2%AoUD20&# zNxJq0Hrm9iUs4lNE80{YoNeBV3xC$@Io)2r_lkr!2E!-_P9Ezsr!#gWD(T-#O)x?n zd~SkG=?Xq+O)vWr?GT6(;8)gcD0<^Twbk2raHeLCjgHMa3(l3? zLVdBZ@Z2Jibfo;S7@Wz?n&XH}2HJQf1}0$G^P=MOieJVxu=@xq0P2b!;<{ivgP&59 z#5a^f*h@WV(wTg(_cA)Ns{J1-SN8YvrV{C#Z6sIN~|e(snft3|3)S&MC9qS>HDkEaiVd^I(lEK(az z_Rv@)F8JnJJ%}b3N9rsrbUiOF9t#?utkHNJjeGmj%k}g6Y7MPhzrp$sTU8(g5V>B8 z=>&UWgKypKTzgg)*i_KRjrRFO-7egvi9`=2viG+Sa>4~0kMJL>GuBhoTOwpPwhaB9va^iO3nY3E0dqMNgN}s#!|B!eOnq z;Zf{#7)j`9Z8?E>Jnl8NCIL>c+ zYmC4a7}!>zj)8sTZIEX1VYS@hw~c6)8_d`x=91Z3T^_Jzh`G-FU+J|Q2K?>KL@l>k8RA(mqosD3ouRMa z@IxR0#=U+qW=*?*0ACPDaE+Wdl(c08ey! zo+>P_Y|IzY{WU9g5jCO1rE1sQBsT`TA%xsuq<5$nCRx<_N|X0S=Y@L~GL07e0?{T3 zoO0nob%ra3n8_nJHfu5;37*etnui=3PbvG*b`vo%RdC(oq5o>KD3Dzs7R$af@ZlVe zd@!S&4UAu+gdesZou=gf;f|&Gf^FZP_>pe^~%iRRZ7JDwmjieU4VAQz%v?z#}8KzC%O(Bg95OhZotew+n~Ep-skZEG^U0)6+AtW&R)6nbeboKBlFut**LC4kZa&B?s-#YISdy ze^Vf=OM8qDREph32v@jY1UxcP{~vUOuMZtfEtGUeODZTJOLb#nW2gTf2sEhT`(@6D z3(8ih*DuDd{NKVA{|{W0e;Nq#ACFbjio>TwSon{Qf<O%AUVon<4Gh&uL|57wS|c zr_fgfU6(YgzcXtq(mMT%#*6^WZqD>{x!n~L?(OQ*r@027U)KwD{-sJZYQ?_q6dCE| zHsp_^Zv*nbBToH)WGaqwiv#bgSdAG`$bEMPYYnQ_pmSHl$unrmx(`hoKIL(BOT9xy zDB3amU@SZrb%sT{+JctI{uCLVDJm)Ce9YA(J9H;;SWW9F^Q^W@(9szOm0=EjOT$!#lYR7 z;KD%AREoQ}NsGZahAExd5vdutGNJhM7n+|D0B|%8j{VKR5+QH5mEu?-r-qt3nT?7n zfGK*ihj^_++v9B^p4+G5o3vNd6p%}+Ic!%qyN2lJo5Kz(QkC}uhFwco)pSot^>+3g z>$1*$Nx2hUFfX5>x2M2ahyFZ=ks zadzj@p{$OSo7m$+FI=u+6Z0%rli;8_$yLsn*#dE1m2sny2+GOM6iK(v6W7LquJ z3#Wc0od-l#mfTa{O)GGX^DE}kFpSQHs?ph%OJrul(&OXa-x+TIR%%-2&@h?{OoJU( zH+nxta+!&WFsh#5teamLXI9xN%fIMtJvm1$Pk{=jc0UWqq-Fb`Wd)VHGaEO#qWLBp z<$@onKuqWi_s94{dAX)c=DSZ=YBZm0G`3UYC2*!FeL7Ls<^Hp}djG4=TdVa~=S_x3 zu#HOnzHJe*o=Rq)UniJ@y^!fJ8Xd3zH8X{tCU%N9@nk=H+JllDqS8&h8 zLC{D%Tie$iLj8`qqaSfU&mcW=swFUUq%k3mRZSMb=SxjxyQBAH6BPPAEy6*|=!CQC z0=jOFsd_(uc={=w+vSCn`tbN1%)CG>-hv(wX_Y)Xr|QUUXzhlE+YW0Ot{;2hr=_|D zMC7Xeoqe?>ZQ)4#u&`qY6(vqdc&1JlQ zmCAj<=l7{#y=35Bv*D%XWd(V8sGFnQWjFQu`g$5HKvm`!9uW)AxrL6I?bI=C;YJ|IHP%cjOeR$@%f)76byZGBaG9vJ^Ei zpi+vpWa_1pptD~?cM;ivX50!b38F*1wCZ*fO&`==GWnwuTYCb!kyjK#+$I)EGXy$r z(OjYyWX)+Cp}l4%`6=vAv?J}P>KZ(C{+|aC{@Zg$UKvB3$=x_8R5Nd|pOz`I3S6Px zS-As}dWKgt3_XBvH%w~oK`v88~j~?rsJI+Uiko*>Bf2*5mAwnlENwB)JUZq{e@nf z`ZI!2O612{T9dR06oPja@bDHdyfE~}|5Pr?p10N4(9k#^_38|)0Y>A(WNFZ71M8&7 zy?c^e36dA}hH22L>*d$>TO0$oJYxRAv;I%$qX}s~W-)iU6Ao;2!2a@2w9AZ5T)#96 z9dF1@e=71sxh~uwA}F3^Ma1yp#BEQstkaeZ z5hvd-HLca(RihKd!wD*fVe=KIQAL|=Z@~1QsG1i;rUyyckQxE$2c0wA;bY|jyl$x; z{_Gx?mo4VZdP6*|#?}2dlODziV{Z9DAnt2|6<P$RH;LA-EO2JX#Kmb@_r1kE+sG(ff|iv&_q?Ii;cCjWhm& z&6RRil;_sF3pX$B>4mUBUIaNOQJW-ZNuCF}Zqo0F)eEEE;+PN@+`D_gw@}Qj$G&dI zc1Nap9SPhrUQ=}s$d8dFCJox-9}+7oc!CP4Soo&!5C}L{iPqbY+?}5{wc-E~%?&7o z<;;tm7jWDo{{8)P#9@7LZmj2_I3^8-51HM=C=s%di19BP(^oWtgE^#)dMu@iPi~e} zR=1X+!2Ff>r=j=;FTF!Q>!WwL0(a@sZ6}e5hgHN68rx{$iCY1{v6@o7sza6iy{SQ< z^NAN4)TASQQFMOtU1m1cI^duhI(f_E9bXuyYgg!=gR~15jpbpD({20uA-UoWy(e(A zFYmnc#+B!jeLe?_R-RVi13>}e@mw!~2t4B+>i6;w9dAx$VJ1W$36{g#F ze6>G&UY6GQnfmd|rBN5R zP2(els?E-udK1_s7d^T3rA53yMK?dhjNIMx=l*1EUHY%f$bgA9mc(_HmG+TW{``p* z@Jc;3g^IbdKEwGpkH>*ujZD&`2N-I_g93)^QH{+3#4fd8@aP1ePe9JU)b)x}!}u$y zYYAzl`9$E#QtQh+Y<|*j7fG6kCQKX^l|NqXz5Q~064;dTvI_IEVORTFf~Mh)_LGRK z1v!ClF3odg=*9tCcB7m*&NUJrwb3^B?ka z(x6^;(|xzj{dQuAY1bV)|FdD7cbS=)V}j339QYoA%wY+exVFGousW!lHjm<)fDI z1|%2TbLr6=+ow`L3S9rALR@%v{0V4)U!8wvlk>}DQ@&oLXw?0}O5tTAoo1wE$Gc?o z%rmO+KxK7GLX{xIgGYw2J=t`HR$iVT*)!0Q1yNW_78kaE{4Ae=R#-v=^_M8S0 z=5iZ#zwB1iKdcf0M*sfn+3_muHJeIhv=Mkl3$<%zgvW11f62_Us5HoP^Z=e9`LI7~ zbJnEZbw`E{re?}*_H^={$kv+z$EpNJHc@@N?7*1Vm9h&ep&=CXdgJgB3&#a1`oJo8 z#kJ3d38TNWvod7~k>F@lee~-kgT@E-HK_~y+S`ekraPq-NsMqW+lRldNo@A{KIoWI zQOS_pQ1Evt3K6cD_+VzU$?rr)i8L%)u!!?WN5n{#!r)KhbeVXLTZv>1IgwV&#kAj! z)m65N_mBTjwV$c+HeW;5 zT`FyqB&!?jN8R#5_TGj2x~9U2hKg!jF(I@n+Fw&`>e~&}cX=sj>qjXi1v^{oL&q_N zyIBGWYKkT_i3B3OY2E-#kpE>fME#Un?jYD9_=6pDboR}tPt$srt4WErb$^E6{+C;#VFNana)Hlw$86A% zZMTuyME;7%I~t{lATN$O328`$g?F0KXFJXh)cc3|O=L&M+q zhjvjcR^lhV?H>7hr9xv+rk@Ek0%{D8I+;`sr@mQ;uW-{dub7GFg|y#U!u=MMwqS`+ z1a0P&znVWU-MsFa-axa*vo9`Fn)7Hn9|&Aw79;djet)dk`lM1t%xvxVj)?3QNu+1b zl9DeCkhyY-#adk59N$rxDu#J3M1x&W)5qIpO9i4(Zi-_?oJrVPkY8q^Qo6<{lg|NJ zi@k)x%O6%f))#TQJ}dOa3Cq#Y+kl@1v>O$GI?&fOmTM`*kyeu^ZZgY2qL^*9M92!; z=rrW0wI?KSy}RAkL-y0+l_9TzKgvvsR|M$wPbkqgas6q^>JS{9F?f=;$17DA12=SWjtD!*ENw=yK>e}Y2jsH-H?M2n zH`$6)+NQ9CmNXMqZLCdBC9^ZU5T(g>7xBt>`{Q`@gP1fZ8 z^n*4_c8Cn<(5z5OAnw1C3F#4eu{gWqMT~{5pxbSA^khp0)kHu2O;);;unTIvP(@)6 z(eGuqeu3@IJ#FZ)|H%F<(48kNbczjk#|>)GW5-5-+Vc;2wx(P_p0_1!NOeZ+bfES; z3EWC`F^ipog5j+0R~`97#XUt}7Cy7h2P}F(laYXd6+2#QnPv&d#x$E;8rML?NS%Jo zI({$Ap*ydsRrio}Nk!#bOIu;jfE_Qdbj$wkr<*cME-H~dgHac{ANjf{20SU7%?^9f zi{+Q_3n|*(Kj7HSzd+HskREM@iPr+ zB={K3OavQd9l#NUy0$*hBym^&}@nm0i_jOQyoZC0&(TkKcQEqfju zE6mTt7)t=Rs+86Ic=c(-oOW@a(%0nu2DUx z>E{CW-PKD6EEkS9)*i=x)uBk9i#fOCp)HjPnuk@e*XW9lr(H{(xi*SeI(T)~9;D(; z+O2V8pxuV~>oZ#S^-Nm_jqaVUJ4F}t{rx&ObFf2cl79vd$8`~q1cM^c}%uf3nBPD-%h_`8@jfxr7KjsU8++YvR1+UAPP;dv3 zoIm5%_eHeC)2d?4p@NlWh##54dOQYUzf=fG92>Y=5iOejPOQj=Xg8OE!t+?6st-7> zxTzIEUy3!(C5cRzJG?Bm@-54%wG?S+_MPmu{ZvNN+Cs_Qw))nx)m{&|NR3l*$aUsN zax_0fI2yS7M-cfm>w(XVGs*4RLxcSDiNLKe#8y8Lm=$E_W=M2feWzh5MQVT-NoX== zOYN){=N+D0<6QgdyPMLJiR$+vil?@Jv%Z{a@NLIE8bYCX3f?Gao}Sjbl&d*k;Ki>Z zW1KEq2xd!7%I0=!+U?{q$dV9Zm3sna_@U8 z;pVIn9ZYIZZ}WoM%Y5-~5!2x=t#Hpxh-cU^9_s>N*BJ!uRldSk5`6p~*Adt`s#k*x zS#AmaBAwPbtPinUtJs$a)+Br%03bd!IqU9q-Mm=eU$b`B+~61lvut~2Fq#pv@B-%D z_5!Rym*bp0p1t5h3TZ!ZWSeIjl1j47sZkVbEOq=%=-F~%HQngWjQIqT-V%AQl9n6% zW@NiXHVeKi$SY?v^IYb4p6uPtZk0wc?zXWVasA^-)8psA(Cfp#f|Wd{*G3dcn~`#f z;*i5fK$=zZRbnnF<5C1jt!V=u8hXn3)@i;+a_r6p3w6fihZhA(yWF!mPhOE3vQ@bB z{LXwnqrMC1)lrsM&wBG__59PpTm+{t7CsCJahf)NIg=^(D)Bumdv4^Szb;z V4h+JV-6uXisL=!bXROHN;_VLaPSFG7HE6Z1d8 zxSc)^2LS$fFwF$`!2X6Aa2N6qDcrv$Atoj!A#n@A!TC1JP92yA>GPag7Bb*?6!QF0 zh~$?G@2+fGm%&N1{K{UJK%r-ZZr`|STO z#`)i*&ktkEOa?}n-ZmSPQXSED9uWK7!s230O$`s|%-q7#lG$~x&p%%7+zmG#%6dSJ z<>yg!bleep4ZgZ*?Lnw?@8?bjCXU+f+yz|9PcW807Io(R{T%?{&-abT0at{M0RgWA zSyTXk3s*P){}-0_9~Y}lPNGmpiU^NC`0Xa*w&=#(lNKXa9hoio_8Z%L6&pNCgP-s0 z0{}O4gxTuEUvA2Fb_8XcjxScXSelmlPtWo5bxCCvnP7aMcmwWoiZ%%$hDyDpWJ>KX zKv?v?xZYH~qrnYfNn5}qgXo>4D!H|x7*7Y&$)b+*=NGoiw6w|&zm8^S=oK5sagF^J zJZ*h8b`QISh0(N-Q$fzCcirsGJu=Jk;jq=q3n?B&>A^uX&siCuS$`; z;9Tnon|CVS0M6jH=bGPDX-f+=8Oez$$hi)Ef>O%++QIti>>we@lniQ8%S(tLAS|uON?WJqBwvNvD!IbjF zaUAH6K|K~Bjwr4GszFML;?LpQ-6(KtkeA(4_U*MI$Sb;#4sT>q#a_4^tIz{1ing`A z9mEd9R(3rvzOAgxyFJfj@JB*nOqKZv`9hqrLR~@5lib!f*hijGm)soYI4uPp{%W>2 zw^;tQ*t8&%PklC2dJVr*XH6*Gn=+7+l^Q5dsGJ*`Sh-_T-IGjUGv=zQt~K4>_5>*^ z8`o~OP+|NHa+v!(if%P3^#K6^VMjA_bK8Po835p?&f7-Tv`i694nd%hv3_Fd@UXG< z5x?(Ui-M1jm>e)+I`7b@o znQ+HR9`_ryKM62+!dOw$o}dgcQM<&p4YfyKU2o|1*nJ%6vgg)GK~XD?SEOGP<-2Nn zqBg7jE6Wj=Md<9*3xgxzViyu;z1pbW^8?#{+lzk^IoJra0aMZ^%IH=-IaF0Y^0TlX z`u7dgRusN&*Rl%w54f7gjc1kVgZaIAKYc@&n?f#@2C<8XViEkz zQ4RH(DVi*4OZ-Q8$xd%mr713sdQWfj*j4>X+H@_m;&lhXy7mD7>z)p6W76TJM7&AtCka@s!- zP5gaEoLW|svBJRcWqkdM39lpsp0t%*=kFVg7#}Hh=HEkw8wq6O$ua&d0N}O5Jkjjd zi~fT*+i^Wn`O>#^1jFTz)}VTAd1R<8&CkKO0BOqjbF=TRFYO9`cf4~@SmAjc@}6e~ z>JZ(Ml#BW}b@+1zCBb>jQvGDm$;AP@+91K-rtwEX5$ zk;J3Zf-u3b07lJs&4Tkhjubaq&8XM?`$et-rc0mZ@%8~T=1;3i>b6O;{BIr3B`E33DbuShn&SnGCW=>+7`J<^EaiK~xjY#~;ns zZi7oF_Xt_ess~HYe?hIslwzJso&;P04pq*DFF4?n&B2QWn)fl+!HJoyLV=GD5tFX& zQeo`PeDLjQuOGF0hgoBhh4?Rc@9|MCRhyv<5`Vy|;FOP8FBiFOyfqovy>8N>rgt3` zu}Zbngodn1+LVfe#R-*<(5pt6dro%8dIeMfsm*$z7H6c3No9j10lODcX_k-74q?y5 z>@6huq}9|YE!Zrr4$rqn2O@#H)SBBrO+T`%C7SI|1VuMS3JE7kOS&S3{SMt_aqtC_ zRmy=UukX>0Py}fHPZb70Hh2_jwm*%UA;LgOnTqEjojqORxHxXa@L1{PhAEmsu!l@9 zRYqV?30r9btkMT@Gfbg)ng?Dngs#BD3r9%6de zPR+1`0IA1{JDmNN=8{A|Z#h=f1tL?NluSxBtKzN(_FYsc*qWMqL=nD(sb6MhN2|Wf`c9Ba5xU!9de&3E?i>=-&uwcd0bAi>_&CO$_M9>7<9u=6f7!e|zm$b$TF zBG*(tL^*k+T#V1+DF~K z@BAKi=?3i%l|9JQ?Kk&90?A&!yJ5UXbq%q|mkSxCi#BL;KS*t_PZ=8BFLUpXo(EJB zaW>{j%A0!Da!43&O31O?bpI`B%KZFG7z|b#PZRt2;R8E6`(_a#{T2T0gar^ztH0UA z2d87;nSj5aU-*=d0Sw@51xt>8_~m;Bw|-CUe+I#`e2gt}%;aFjH{K*Zv)(XFL`tcA zTh~ZtIfs(}{ zpY$+WlJV-;MFmyzyCEX@65|La7FJRhhC?krj)sLT8e?ya7-YCRtm!g$x;|xqMDC6C zpZ!VW-nB63D!Bov7Ut{kh_&70f)YD0#^F4h%}nTTDRA%E>^QF_y74tBUF*|zrl7vP zd7$#ALcfgUWLFow3G6|N?svL3eA>b+`l{)WK-7o4Ps}zoL4i5m4)#61Po00NE zSknTC*Z`a(?)wjz|NiWImbk<)Z01TiMU{dx`;0DOW`t%JN38Qf53brcP&e2@s@Ivm zd$@pvOSx{(U1NlhXuDo8dF8XNe-eC!*>uZWHzK*p(efQg#(n`gXGsxXOW0joVFn*9 zcbq8rI^?`BOXanu^VPLsO|Z3SvSe>D0PwgcUqjJJ(bGqvEC0**p8a-ntyyn)B75!` zE6^rxtz*3B$i^q`iu1DSij(7f;qaKPQ5PgwtLwoDYd`HMa# zkiGc=-=_+vZIUmKf>CI`8kZ<04>KpTQLyTTw()YQDl;HE_>YWIH=Vm{X3F{LC~E-V?5A4q0qG*9BJj}m z7u;pBO}Xp{^+B1X4OIw>et~)#oA06W)E$Yk+aGGOBy&-wdUCZ{tZ8DQQ_dq=rroJa za42Kb&dxunw`c*ZvH`Lick-vuyKqm`wLuT-kNRO2{GrJ>k5`E83aC2JY`ZU`_jcrl z#WjbctPRb=+$eTPl^37yp6GzhBP~7`eJ6SHU_)Sgl*}c8WwTnFrtt-tlVRsQ?M+4s z;Wzh_NiPUq)qCD~QhXMj-!P`1ZXq8@f3@sAtOTnV_&(USS4Wz32V4}jVNLszG?{mD z7}j6zkFR)B7bXaBIR~1^A${?!9ae;vcIC7s0ndU`U)nVnky;h;k&`uZ4;&vBSO9y8 z6>I2xQxT!SOdPbR(3#S*8?fZg522{YWg(>uS)v4@t{3|w@46QZBZn_cj8NsdN5BO( zg9CK}Y9m@mgC?)}h?}LV5t`llQ}v)E>3SEoj|0PCJhm>_8(Mz~>`Ba5l`ng{gV$Lf z+sAH<@u$G&NXhcflNfgD*>z|(r|IPFNG1a{8P(k}LeGdJ3&gBUecD(6l zglcx`ou1WdbV$Kn^~2&Q2V(xd`T)SZahCgLPs6>mh6UB=64{|;_ugq>yEFY}DN#F^ z8_Yl8oZnj*Gr`ZSs+>_8{5{kZyEV6gxdmPIs&=287O@CrKUnfVblZpxu>B>6wFzjC zAaE>S+1Vj-gZKv!9_6$Yl>e|r?ZlT5PN@hhfieKY&4vtf1=HsW-#9nZVGl+U4F z?@8?9j}XzuVsw6H370O8<9(1%rKm-gMOgN}wOs-(#}a!u?>7R()m?l1l+m2F{AxP! zpfqK;0<27vhut!7wF1AI>{K}u2uhRX}Qh0wjDoo_7)v!bMR&P-Vk-uNJ-B`nv zP~}+gt=p}CJQyvzRw*@wAnX=5Nr_5b$8q%g!4B}>Utk=)Pb37f+qW>iK%DRuOUFBH z;Ni`xj*wu0=nObjw|dI*@MKo_TVCt5+qTMQEpPyZVRyC+MK2 z^5%~%U?sn5QnYPl7PmSVw1)nz4U^zY5{^iOPUYS?P+}1ZT%BD_=jPy8X*M|z3BN3x z1z-4*)2~R;Ja(6pJ)=2>1u)HLZ?^ck9eO##>?FS@Sguj`s{-A4uh$XG(R^1IK z)OXO0qTmlr9Cm7L&Yn4JDb+h}Cg&ZcnrxJz2mgI#m=5{XnU@91a!;bYVS?)`S4!B3 zQ57+Ml>mT&jWyzP(*4%5AxY0P3Hv>bqExD@J&L?W4XtdXlJ{ky(tf-6L zCaDS46Me|!iRQ$>J`^@q*ljWqCo3qZdf2j=khQb@qg+(lw+7Z?ft(cZu`#lmu+Jd{ znaU3tY+VBYURr5I;iz+OzI;__D@VNQ)Y-V--GMblkG?e6OT`l}t(xeeu`;jvvDTia zal9t6tW$?3^h$Rabi`&NFMv*i8gjkBM3V9eP3U#NU6%eU*)yqyl~5ukv!<`x?8waM zo%?1%vza$+Dx+19v$fFIxhIdBWa{yXYdJB61Nk+3@7IztO3|~m_&i=^YGE(sO$7tw z{4BM5f%D4_SOfbzn*A&$K373hu;xDFJ()QXkfP%E)b#Yk@rwMwd7cc7n1K%rWF?58 z09gf}#-ciYm3u3Ah@(q*#xjp?fAgdk%Pmoos2(hCdVzia z3~!hY^ehXs9aXAuZ5zruFROz+*9H{&a`tzFxPin`vXxH}froc!G~yh{Ft*LHHVO$+R_dqrl-Wa(O8yup-WiCOQW{B_83_20UeyS@=D z7%39^+6d$;w<~p|#S=#mxOVkualDhUS2)JokiK)gz*X~tuf2bc&8emwB^tZDyt|bp zio+i?Cd5&wc?e2VFZf}BY}t#5#O!mDs?@C!5k=26^MTzV_r3M_-KMv=q3HC_k{Fe5 zV@Hb?t5hTtYQv zyP7-=``gPneV$k%x}meA{#g{RhH|$MqsFrKkyE!|$Tvc8p3>bcFWTw(j1do%LqC_k zxM$?07XtPOe>K#l#v(Mh+EmW(UgAcFpBjH6bG?-jY(s6&`3L8BIcjG!DNar9FL!=U z@$+8$ah6IJ82%-8tBbV7&KK6>zt>;Fy#&5Bmm@Q`wY622w`Q(nOB}qCuhYCzI_yt+ zpk*+8{FqItNxv-i2yWK+CEk0d%KEYIMr(*0|0Mw6DAH6?rHeG0eBVcyzWGz}Kq53Z z+C@{=(6BH+)tu55FAiV+q#GAe@nHwfeAJsXX7oxbD(*XBpQc<1i@5_s7^YSCjM#gJT(2F(3IOa8^%okQx!iC50W$ z+Ww9sqbeK3vt3&fD~Dkm5M;Q^@)9ptu zcB74B(LRHAziPB!zOM{mhkWtlDRVZ>v)^bcqONL*8f$pNyfc`O0owBx7be7RuOq@#)ZK9WsQ)&DsOI6Qd~c>fJr#FU zzJ?-V8~g!)hgN?^O>FG0VY_Kc=85KXRAwl|HDcM{yVak5gP~kLej~<(PLJD9{uoK7vU=$cQT`YK>oqmhGY-Vj%zqKQw;uojACf?8UGyoc zuJFr=q}-E1mCh4oSz(8k{y!O<(p{V3s-hGD`IqCo_@swFdLAl~rj$zsQAdNG*wX}r zqj*QfA&2p*_a1Ku2o88%wiC|JO7xYo8(nkIkgKa3u=w&ZEyjyzq&|Cbc z?;M-8xPJ#~&dy{Xn}yR_1ql_<-YHp_R<3m5kN%rP`O~jo`nM91v_wv!z`pJ0s8PS$ZPI}`HfwbLV{AqL z?lBs|QakQ8IeGJ3Hzex&xU$DKE)hrbL*tch?4p6K+ASJ8Wl#4&U?=}DpS-0qZ{xsA zNUbSf4QVsQ{f*i~w*03%OADREGl%GVbX$hrdG|?fUai(Wh|x!O2Jvo23DU>(EF{rf z(Rup4UTVQnHdTr$q_)*pLV>Y~wxMC5q7YNa)77A$FN{P$%AX;Ah>0&az2^|=<**dR zS6ZHo`&qxA{n|7G8a%Ctim0$VDJ;$1{H@Xby#U~fc)8IWOWX@zw#CyzfwTRH`D^Y= zllY=ShNv>(lrT246_=QY+92{wWM)YOvgaZWUN@wR`O|egrj{WumFnX5M%Cl;riPn`=IRuO)<)I5{Avs1FkAp$BvZzqgYWQMUrwCD#I)`%K~TWFPs=JXWRdaU|%XLdp`>{U{Y z_BHfhO7r}DRdqFkBA#1d98Z*#5*}q?Ee*XGT8590kB*K`uBk9vw9)pKJc317HYn13 zv$ZXFamv+pu5g2AKYNTjl6Gmqb0EoPX54jsD&-OSrj%==cKOhtKJ@|*xZxSRdu=M} zUj@$hr}yL&wwCAf&3qNyG(r1hFKRY7m6``Bld(I9@GJ4>+fIp8ofb6t_Us;7!3nXm zY{ihi*86LAU*Kq3zS>&-L~7-8Q=!4;6)_7h7XyI&CJe zTO{jndR%J}GkiX90q{Ea-M@(8x9^-_5dVqYg$Wj`#J8?DE+Y&_&xA1QCD?J2#umS$ z!GED*{$H!t|3{ww-EjvXk(VJF+1{$*Pu(`kV18cL+zips(8$oRQpp>#S3n!aL@Y`u z3X4P~n~Hvm?9Twu-#5nTnX21EOlJ-T-PM67UN^b9l|~30dwgtH;h)Lde~9@6{+~6p z*klO6$t9U4HL*L}OUe(Hnw)a;LN(@7&+{K2ody6>`7Uwof7H)9W2J0QBV=Dv@v+x$ zX=ehw4wo=^x^WqUIz-`D&Q3{|LH8obDh6pw>d111o3q1>qust|(C4tiT_&&M`<1b@ zl}E|8@R5pG+C+&NeoXu^CuI4Ktv76fGiiZuGR=7D6U+=w+Khx^Te+)FRBnuAHUzuT z%;W{kiL<->q9v0pHDo*9<(E6G#{qZ64HNIrp6mdBQJ8I#*BgWAg7rLT*0skfrLb@{HVSV-+fM|96wb2+rtS)yiVKgGKV; ze30I?Q{J#;Yf7Hk5G(6VhN?Ad(t;O~lr_6Zh-35YLMs;S3nEYLN)Mia_2vC-q3-V_ zWZ8wfdCG;Rv#1#cu{XbTttvCGNZqFgTAO8JZy0a`Zvg& zZaMkTFeb0%u}2ca>ht<%R{DCAvV#2u1Y)VD)vA&?8}k0GB}!?1a6UExi>E(!7(VwC zdf;AGZdj$pB4u?%FRd{B*WB#>!E!=jHeyy#@WJ1Z`0h+>+ID3k-@sQoxRw(Dh|yJJ zC<|*9mn>dF%Fgvx#9brBd433n>Bf;jXKnilCaLWyD^Rpiasic_$Z4W1=Nn;(%W_ z!#DB2p=T|&y@9E1g~|2vjxJ%(;&$q5A2|sWI#5I_j{#EMZb9$lII_1D7|pepPja+9 z$uPvKp4W*FSqXAJN6|$-gI@%yv8eqM+T|3KQ#6M4V>FJt+aS^$MpIprwiSrC_V|V? zYV5b{#%p00NAl-)AeaQFcaiHCXY=XwicsHYsah7MHVxG_n45c1uNHI8kbus@fvcDK z#`^Gj2Q5{`{)ca%mFVkPytKDW+0Q6mwPQu5WUx$cXQ#WDm(ftDo5wJ%QBO_CjP98qE}CaVVl3hHk+Zow;jY)Ma@AcV)J>^Yh>G)ncey>fqhe zr%y96F{wwT|I9I$)zyXWEgx5&oKPS1=m|NPK?e+pNN>D+FvSGOo|Z74=1ggj71$l! z)-pG>B3J0g_Sj#X?P+2-Rp|L{CoRMx>Do2t?4R%4V4&yeQKnP>C_CSOIHJZ!2;8-{ zc6E`<6EOxFGxCCp_JBc*lvdZdfjErJ#HXbRzY{iH2~cvh}_!ZL|Og z@w-m=k3UYFIB|&qMKZsBWsqS{uXFwGBkRQD^9E@JjsQR|+kYfK{de%a{U45#13D5R za6hx`Re!oRT7j{p81j9-j_fWDHJ|n34kd4b63u}A*m9F=wwvFaCJVFQ(k5-Uw-XBesi?ieaQlKV4b0%$LY$zx&P!AZN0+J3trQd1ip6=a3wv?ayFo;_sgX|imOzH#O+TPa`qKbuPp z$=gBJ=}T?S7S;Bhq_ay1kVeEB{yX$0;(_9q*c7-QF|F=hy&1DP4pL?@T8vnD*P@v< z&L12lI6jFv<9NqZhG4e0(w>s8FIRL5O5{_%GI{?z}G3alPAAqUj}{U{f^q2Gr0y^ zk$pLvXk2;Zbr7-^ubh%X|C!TwZ%)Hg%v5nLO&+uHj%`c5uLoJPS)ktlRezKK_nn(J z+yhq-(nSJ6Uflsvjs{8*0^l3VBWeSdqw&H=X68Gs`nLRLXZd7(9?2A?q@Z`Vl2!EN zF|ER;v+W~B8>+5y()!%#_ByBaqWOG(6}RkbeiqSAkXuQfxC$DQ012P{n&IJyZBX^- z3u8Xx2^}f#k}5?+B8cHr%lD>k@4ACwQ~nAY`)F@mjf;POrZxBQqh;m2iR;=Up7qa& zZ_Svcl+0hwUxB@Eo}BE|ebPC3BV&!md#n8Ilr{>vvLE0$mFPeqc{ zB`4*JM!s_v?@A~Md;ESL|8}qr(y2dCb=$vewZ=ji6BxVOwqv17xL)UFGL&>d{W-89 zx~%nn@Go>(lBVNQP!-T%Sjku*+F7 zL?qk);QpL+m|JT>`D{ZXZ-0NJS#+#JNM-;vu|>||f|}l$_$-~ZzfXlyGM^yxsPkEw zCK3FT5zoR*LDYtvxp%k&$E{7Zy>gHI5`9RR8FjViz4$d=6KR>8Tz$y$fo~k>#$1}H zg+=|g`J3sYz-79(J^7Lf=~L*E+-nIIYdPp1LgXd;9pDEM#&voE!bH(cCU-^Vs)x=ytP)qYk9Wo&|BL>`RBuu*LmRwM_3*YebE%qT7&j5Lp<;* zJjy}zI+t4?aSlAuQHNev&C3@ij(Rj^_=F|c51}vEms_~wkuT^wAs0n;5^s|V+2oRJ=^Bn?oB+J~G~?U2yd4*hY-@|4fP0&tmPo#T69uJ%|A zS431kBzSqF1MKIxLdc(F?a<*msmMzDCMS5*yuWCFsHm%Bd6);gh7B)0a1!*fw$Tv$ zVfiT?$$IM1#QdebjxxL-YH!`=t4sn07~adO$#59xj^wV8RCY)T7WD z1g2G9B%uOQOm7rt8Z*}Yl+dPiI`%CKRr7-e$uc-sQ8@HgPe-zrRG9%QTfxSPi>D7G zY_(tc%S2xw_Mbguo)E~sR2J>TiqSz@tz{N5Cc0UjS?nDYTH zL4*k^VZ2Dj+;cis!&KSY*?&)#+IZlE8mnB}>MbCFQDyd1Z}964A1fpIr^+kTSbR+f zvlx`DO7e#}zF!-Krvt94a9Dwh7mH<72+Oet-Q3^~2YDEey!BIk-ORv_0XH2Kc|6!m z*Sc15`HtJV)VZmLrl;>Nv#(>g_67Afly3MkzUt9S98Vz@8$qasS09r9{yDbmr$_MpMky9a4w zl+vtgQ-640=d|ch`B&|tLY0wceSyU^ha|rjltb+w{z}(?sawy10@;rTc`6?*moDZk zXhp5dpYtim!<5YY0x}5MB9%eEMccXBYRUBKBN#Xmx4#`;0i`i_`DDR^-p}x>n(S)T z4J#P12$_#ZB@W7ezxtrk3WQ5`ztWB?9~1PSAiqs*au?YnJqdiDo#g4UOc8uSnIw45 zB}=?M;&{U>aS8MNV}=9JpYROBy*MZz65bics@st$8BU!qreZlDEFgL55#gKq7sunJ zB=JF|!Wz?pcm5<;~X9%a#_%Bk8upa5=o&_^6l&j{OMm`Y`giMWV zhy0NZe$-~kJjsz{9hrmsu$sQ2!@CTNqvy8w5}(QyU{BL=&M0BW@AK#Y)DgkQ9lj>= zL(f(!ZRW2ltpR6&Tby*a9e_BmPL1MCq(YTl{-`z(#0>P%54TU&vO|_vlok2&`_rJW zB?8mMf=&kcu?b}Fj0P}EFqc!LWHGdz#(5!p(8yj_7#K!8SPu=c+HhXkB&^9UCE0&% z!*Eo?W9`GBq~SdkMUX^U@^(-?GkK;roW(HchNAtH93duWZ@$ad!Ht!!3W)iVzUG*F zob!!5X+GrbYms{bSY;h&tq8hshUw?WDYG;mv*DmGvN>LRjWtaTJ-LkGoz%S9AA%tF zA)M_x<_14}OOU=wos=QPQX=ecLyu78Sx-pP=k&P}sQnOdx7eJnr#Bw29}+vQ{-%(x pm|5cHU$Fl+!@c%@O(4>N^;cbDs^*w07<4c|Q%&bVA>`TH{{a9H9{d0R literal 0 HcmV?d00001 diff --git a/man/figures/README-example-point-chart-1.png b/man/figures/README-example-point-chart-1.png new file mode 100644 index 0000000000000000000000000000000000000000..36e0d8a27ec71dd70d287acf7193233dbb4e30de GIT binary patch literal 43515 zcmeFZWmHsO*f%_Y3eqJVB1m^iBaL)7BOx8q9ZE?{$B@!3-5>%YjdXW+cf6bb{od>S z{I2zUd{~PGGt8VhXP>?I^{a~zB?T!oWFlk;1cD|bEv^EAz-K}ra7#$=;F+Tw~rGw+@~zww;ORs%Er{pQ*J`}%9Phn z!_^X!hb%z-;T!WyFSEzoS=Vw>9rLTno0cfpgQvX4RktFBuJxG?Y@iTPcvh3c<}!CS z(M1yZqJ%${`Jd9r)8*M^6~ZgBMY(NOX(DP7z7Ea0ueT7RBi!~P6h)$tb8|lAJ)JbG zufx0AxH?Tl%_~h>GZFvf*4+B8`QWBTt}v+b1vrYw%hGzpMK$g5PLpI+OwodejzsB;vN#!pO$}hbwqqF;*BTi6WqpSpDc<`aHIFAIVG^ zOT&9JF*a_xNh(DdX;(@9mT)q}^0A3}krul~i*-OpIPksyiyr)RK~K|9|(m6O-_I_IK z3uBU)L;){<%ddZvu&jm>I0(dVK}7Yrfr^{YeZJ;=+f)tvu$s?r1-6W<`SXy+mW9vf z*~gmQsdGaAo)xEY8f`|kEfC*M7x)DFk~SQ&p5vR9ZV@4Yb1`Q@d*x=aah>go9A;Ad zJE{+%`hAAM)Gbj{M6Wy>X@!g9!sKFq*i=sU3G8M%NRwA-@#(`Om09KR$#`cgjHRTd z|Nf1pkf0`|$tQXv9cUjgOC~48j-0w&vkHjj4=E z;n~)|#WHBy7tG44D%~2(Ko|^`7YlC*F*^cdov+{QCSx#GmwwvVacAR_tOyRnDkL@t8K!>+r62Y8*^fP35RW5$G)rb`kQ+~r?r7_U?*r} z)bUw62tTAr3boyzN#MQcj_qqk-AT9B{b{(^VMr`RU`1;O@vB`vzIyxit#xgDRaMmp zKOG|@Jp)5kU0qd8%|L&DQE{=Ov-2l*rm^@OX{z3y9yV6ivx^HA0b@xdLxP0(czs<4 z2NxH^3dV8gxj_OB({Qc1&+EPMK|zv=ibH`Yo4ecF&doCR_G}r@-sP#8+1X3E7@g-G zKl}Sj8XI*qH8rVY3%8wSa-X))mnoRzjn+%JTXqhK(2y*jyvKXrAKKa+7S}f(xN47A z9wny?hwemg0_48thjVy8`h=Q@)9Q)9LtZG|>P8`5~xta~iAd@84fk=aBitM%gpg6qLtJP+lYKTO({_57-%d|=~S^s3^bp^;k9 ztF_*qs<6C@aYD4IpJ2k-So@HwH?0=%y*iIpkn8wguD34p7K?$vZvvSH-oQU)ws{xU{-GpFz%^Yinz}IZGjRb#^W^xwaMaheSsHDdrdbcEx!0aF1wZX{jcs zLLdKdvs>;K+qX_8?DMsHQ20@=6TD_?IE(Vtt5@`7b+FDZ!LFxgZqA8ALPCi8^EcD@ zUCGK1kg^aE(Jl9{;8J|i4K(aMhk9-b7f}sg2Phf;S@-Y8VYvFlUQTC=#~EPqBZbcx zCHB!LW|tT?Ow?(FN`WkDK3i*ZeSM9TRawc7kB?6lm0wW@2idYeK7N@aZDbS^9PF9s z5|flP)?RFHujuX7+>}cA9$e9AinC6v+~&3e>2=gMc=>% zCZySkq7xDnLOZ*=Jw1!h-bQnPFK&&^doy`_H~XDvMc0I(sn&&V2t~km`>jxNQ7qAw zlEsPEd%91H<&Jc?$kegR#L~I!-ZQ?FoA^vRV{>!in0#JWtg$_7pWg{Sfa*%Ly0s+| zIyF1%e17PcmZpzb-q_Ssd==c)-ye=^SfQ2Ut)p8NVs?Z?!Na4uf9JokB=XQtNd?YRCj%21Dn#;)^_IlrTH1Qx8nkNhObZGWmu`>Jeo8Mn?Rnz$zX(RQI?igin^v+ zjfR^XRY{JPwr+Kv&8JVF%$~mT7odU=KLZL{+N6$(E*N9NdVw-!Q)4U^rDXMF;lSde z;xUi7CLu9#6bbKFg5-Dh0v2h1|4JK;&d&CYkE?gBy2NIQ1#4+*FUxboNb&HB+Pyps z)YNb*wl_EPYcNQ+Z072fIizft4Hm8*WHx5>$x)4Kk2w%lh54KtET+Cz_*9;a`f6f$ zIDdcjDywk|2QiSMkLH%BZ7PDAnmVXs`5iCsxzY&)!X%Qt9UO$7&|~uA1*h+$U#@JT zmaeX=sn~VI+Sjk5y1K-Uj;DTpem{N~1$=L6y1lyww;(h*c^cF-d}ck7?7}QDJ0+#e zkdT)_hJ%BHryB#L?>@h_cuqa~hL*OVu&}4UWbtUZ1E0mf|(ttMp<$)q;?fx$ZVKJGFa=S8jg0qLF=nY<)Heut7 zhN=r$}!F*t0zV%Vw1ksPrqTrXR zzM1XAr#vICrMajVgX(&)SL~ak-+2YU<3mL1j<3B`#A$J3-W&;_52MW-kpNVEhN-LT zU}x4P)qJzDWi4_k@&yrcM#0TJ(P=Quh-Yh#Qv0*t#R*87V8dt98;{S8`0ef!Xm>&aSAP>{|{V(V$A(QzQk zqlu~M#jY8*;cquPI~IAfv0(E8{FcV|EFKU@&;D%P<)QF5p6*D}D(h(#t^+6)cByV% zR&%r7f=PuIjN3c6m&5q@_;|MV-jB!M-(UD<3qieVj5b-W*8Mc$>Wze@mDPB?ZxF+vRcLKcYZsg9>)*w`Nl&Nu7SEJ@ zB0o-}zXMNsNg|sQqrqegebv{*r|#AL0(DE+=k65!8VhUntH1h=kFeFmE;I9>o8$h> zB`O-4`gGQxRA4^K~d7`M9r^%>W24>}~XN=HWrU>z9jEg9JX>WgfC^!Clu zYp>Rb2qya(;#^Rw)6$sm!sh4ZC+d{hbEFh(SI#rQyUu_?d|VV27j=8l|2Kf#1H)|{1eLGdQA(a(f>Z|EiNwZ z8yF}pE*^Dy1Nr`*226LQkwstVJLjEhFZYdpLJm{8NoyepW;-F6v$T|gf(TEAN%-OF z6hIub4Ft%`Clsb6siQL^O9?T@{O?gvMFkt(h`jMOB$MRn<1)hmNvPCH=#}=zxHX2B}Ke*Pdut*Z# z(4jW4Co~&&cu-POx>r?KTlXc{1&C%fH&{=PR2X-^4k*)W@HpGDJ9!PWsqwk@prOf+ z61u@$G*ed}*M!;tWEIP^IRN9g80jQ)=YdqiG5WI|VEcxY%Rth|*kqWurUC0c6M%UZKae%Jv`nY{Z3)0)x+LONjOZ9+KZ2Z4bS89q0J z4)$iZ=miLRJf$UWuAfuckac|Sui;WE$v=TEee z%$qAKUs?Ehc^S&er+gQtlbeYkI!~HMCI*;nse+z(3jmOG3Z0JTE3SUFKHdPhK1q%` z{)6}Byz4j5Bw=6MArllodRl@Y3qC}yssF7{|8d0@8E5D7?NKv!cJ}ZHd1^TVVe2U+ zu#1Wzql5uS2B7-auV1A#m)>H_czJ!5raCz}p-MkMdA2^3F37>jiHeSH#7ZDQb~siz z8WB-5_-xRLH-(Kcv%9@&&UHH4t;o-=x zH(&#uviA^kgnDrd5ps2v-)}X*44rRs<%*X(1f)r{1T17k3^Gf4LdXolb22}n4~%6r z5?~2(#>kYbLRqLKI*lBjK_b9n5+PsT+q1T?kO{xKy|toGUg+xXhT*IvnHujfC`Lo+_XsTe0J(uD zzxw;D`yiHrig>wq%}Yar7!?p4CHVQHue*Cg?%OJ8o6im(CdBd?SZZe$oJ0dXJr(># z0F)02KgNKSt@QqVdzA14ZEO$Nwq5pT-ahSuFdn<;7hm^__V)GwQpZ-D3;Z2wGwY*7 zQmtUoFq_-WER;d^_Z1iE^AdnbnrTm-FH>W?g}gGc9g z-d4Vk^tosvuKpZg18^l|H$ke{-q`3ht=ivvmjk!l@%y(LZ||=!6ru0&`c(7&vN}mVbG&);vpPlEZEj)yQOij|n>lM${{Y1p9X+*T`Ux-`?K-^a&ntiFJit zL{x&;xEg928b$;$Jtq1ebR~=`-Z3$i{`m3x_ixdzvTvE?U$QLWAo>?;GIJOE{A+!n z;<+K#EiGkUE<$HXox%B7T^?iv{6-G=9uaXKOz!j1%xp3l4Fx64=gP3Dxg#w;etf3J z%Hv;BCHP>^i#t7KWgtJ))ZAaKMp;{zaHZjHaV=pBLNcwWuwOnQk0UM=2NHiy(pfKu9pmHzn>#KujF_=BQtA3p*mMeNy}>2lcUKCw#IIh-SWAkB?|wzAf~}1WlYcv?jHFzaCf(%O(o~JUkMC`4 zO6%%0KYskEd0J9f*Z`jK_HK!aQha=X)1OZjr;lH#w?Ew;bt97Z?fkZU^pR`}yL3x} zC1jS*o5gIX{duHX;L?|#alDvi{NK-+5uGM{fTARVdZU88o$%}LM z>KG@H`Cc~s=k#8A+k(02#qSpX@bLcf)*B)_W}WKqPTb|vuW1*nEpQfKEcEma|9%9f zDTWVi+D)G@Eil=htjRcT4sPFVKnfDMohq#cLuEL($jxPK7{0j$3OIW5Q@Y1l+L$rD ziqq)fjHZDI?wqVMbW-RW87)S?rb6}h?Ru^-%4blebN*JD(E&W4Hb-)1Z)$29 zD#)OowG7WfcXQk4e0k&h;28I+X8&VYYpa25)mqyvl9sAt7*@-<7uo%x?_(^>-c*Hu zk4ek{HT-aKLt`TqO&e=OXhuePDAWP9L%O9Gu(=~FV*x?I!-WBQfho!}C@Q5krS$HfVkR{Eu0Kh-Tx`sIHiPp!;IdzNModiH zOo)fKv%OuoB1DJVOKjIqEx9r1jQ}NMGpa8xW>^4~cQ3Q9IZsPRMAQXxAiIUBb7`19lWa&eOIc zy-Q0waOFOT_{lEg!6D$K#2>*LONklc{8lpgM!A=1dwvR*=H|`5k3OG1lgLQD+xrti z4DS2G!vhYD0w*V@n+5vw=g&`OhX6cL%~xRK;@ZE{J;(vI8GOgZjosYvad4ahJbH6= zMO#LViS#4eI0Xjt{|Y}p&+lB=TwANL5Vp|QhjQpM<<7;$g+V4zQe1p`e*O|ksRq9V zn-w)IGSdBM$xv2SR$BU~-hNqUN*?w*N4z-wkKR%g z?|Oy`P9`+%e1=fcgnkPg_HrHfrwPlsQu#u&ej)f_Vuy(DPTFB2=}4J=`hThSUk*^I zW^28pc*I1%3f~?1NAl1yGhbh=Djwy<#;)ecLr2Xm$#nBT`RWLY=* zV8!R^2&mNFi_b0=bReI;2@Un&Yf67-h zB0$!RjE(=}Jjj9cF8*yE=kyiVXBGlNWuBh4^NkYLczAfZxw(ZgVlZ}&Drug+a%fxO zMfRCwj&CJ{X4wZSY*64hWyR9=3MR6u66qG^tT?`5{$Tg+9vUYZe7#NBpdD>aUo0Bt>;&&`9{~pS+jqrqs*W^e8ROA{?j#^EArhy>h>gMM5 z{SEy^AEn@mMAmC5so+Fg(H;7wgM+*e=r#_{Zx2<^$-Xsy0XKod#Ml^Zyk!UwWxoR? zR1y)A5+(sJYia49^!$JeBve&#Ea+8j%wMFdbO7}MTgoksV>3cQVQ%3qkZn-#`nzHG zw}|27^U3bPT$f7p)_5^$% z1fYxDjo<2m0js_CA|}@L^yE_0NR|Uq{S*J6pXU>XX#*ihLLv~HL0H$0+W-KZ*-}wJ z6Vr zqsIy|WG8f2VAQ{tdZvT&^kOM{B8Q0ZkO_plyT4IwFAxzesBjuGGhLz%*4IB7jZ7!| z(Bg)Iv0=l;T(UDU8C$r4I3WUzW=;x)X1tZf>q$(O3v*rc4p!iyXJqseiZ-J8CjR5@ z?k*@O$W{g`3vij=zu&CX^8sNHm==2@cSRZ+8i4u23EkbM^4d8;za)Oh?dp09raq~Y zKxk-aDyw0$S8~Vlk~gupmzPGl!FX;5lR-14Z$SIvqTTw3tpRioBA|_k$O3R2Ep1|L z-Ryce#OAxpOa8xE0JaJw3cNmtdmZSDB+Y_ODqRdPZxhg;ac)Z^H@l=ijeus($qfbswx;7ii z$uT~mVQ|lx>FHIBjZ_MqfRl68;OTHu1*Ae8{uiJcJ{)(G>(AsjG`QCdhMbHldN$~_ zdhzn}-~NrxCM_u`FOL$&G&eUd_~6dX&i-`=o%8wAU5w!T?g^F~xQIj`dF1Bj7qjKY zV3#S;Qb{^EI?C))QJE{(`9@2t>FLRlKv@I@#T>UG!(u?S%N*ZwI=LqIKaM$8!Br%L zHp(Qj5;&=dLo)<|ON?fSOw6SZ<|XrE7vUj|h)*A7Ggg4_kpQ$me*QKSl`*iaFk#@1 ze(1MafWr%0-`tc67Z(puEo8Z4OJ@I6NfcG^Moi4#u)~1hb<|lQd}iz!x9wcPHp$rQ z{}lRP*25x~pWl&qdN%d;en3E&`Sk?>>;?}bo{eBMfG!dk_?$g?Y+&GgzizR%(xb<% zLSHmX2~brcVpyjU8*IR5zlJb9-GDt=?lo;+PMg zu5I<%txg~adP_w`O+zD_JCYb_KUjq655N52R0^wsh&VPjHaXcn zI@-}2s;{JkiH{H1rj3n_{LPn<+-kUCh2bzVh(2YsbnErTYx&yFBxuo^7obZJYbo**O|fN>Jh(O5`XKv5!p z_gRT7XLS3DBcLd!R4)i}1_7FcUs;3qExG|UmZs!exC9A`ug&?{z9|Y^@na4 zI7uA-3Y2GGNArhX2OP{P>&}=BrcwxH`hxmYp*05xDL@gJ_5l#}kryIXK-LwR#KpyJ z<@~`M7|0^v7i?JY^XP3iJ>7E5o0GG#q}r7rFlGW|P z78VwSgoM+_)N<60XIsjhf5!?z9AtUfI7D3|zIvU%GlG!g4gqd<3|s zRi*>zsC$dK)nKjtUOxfqC@6&lsExoRQ&R&Qd|bH;0Ee+Oid@{>yzkz5T};zlWp9EV z6&wWq%kVEhQyUvnGNFm~b^}H{Xp2W_W~LGqHn;+AE-qayEjJGjAdIM&Re2~Y{{tFI zmr+GV#v-taz*c#uzu5Npnu}}v?_YC3VL+Jx{vx>Toz?t)hEwxRmm?!11gOUDGasm4 zh(vt>Wz_WUe6pd+EF)_3X2H`+R1EQQ>R*We_$t`>1ih|?xhK1$N2qTWA6q-D7JzRR zN&ZOc+XK|!ztJ5?S>V2>3P19YJ#J-V00V)Dn0T^u_SbrhodadS&E?_ac0Rf4x9nj! z2p=L4Wi!F-j#HxsRH&Sc-vcbm|HME(=gL*ISEJN7z%)KuuQG$W@q_dLh`uCBQ$0zD zz?yBt6a_972M6GcyL4*<`ur5@Km+C%g+yprnCIS>sG$VxI8nhkJBeG_{rZ$< zlnVQ#zqX-aIzB!g8HR)ctu{UvF+a4qI;(x`|^(s1>GvFHg1J>~J<;F9#pu9KvR&rk=fcp;9>Jy5LTX0RZkG zj0b~)(|kDd3xe3p+m){V1ERQj{-3 z!=L#kTH0x&pL~1U!ikR(@IY{*1wRi1adK_VjFX7z-Mha}mD^K6ap;}vL8^$-!PXWl za6MdHY{sO8GBQ$9{;Vgcsi^^T!?fRRyt9*vhvyI|XG^EDK#qEN@By2am8E!kI$4!z zOXMX75KIzXbMTP^f#&w_pZyZhsVLexi6ZJBQ&LjAZ!gp}CQymF_u@6Fd;QVSB7ofl zU~|sDGhph=rwb4sE~dxC^sYMqYbGknRa8_|T|K_3DHsMTCKASj+~DRSd&xdbUuy2l zvHh&$;K`|d_%L~?e{|oyj7PMyi~O9d0KVgAdFxDE^0im$Slyz5e2Q-gK7h&(04g8n z0f{Jq2?h)pXrrOF_O$0=3k&oQtGK{(*Uz7)DnH>E{N}NH2znQ}ce391C!BCTdCp~T z>iX)~xS7{(VNNEN+Qn21BBDum>Q~5lx*|NavRK~lFgEs*A7a_HnTY-5`VXe@x77U- z_PY8u#mK^)-rm+Wy{-;lR2tZak|Ax5o3>`i&038AX^WtO zgDN*HAJ>4W$Y%6YZ;s1_mki>J6V}txy}R2*)FaM>%iqD!+Rh!)McQKJMH5P{kbk+D ziMidC!2!`xNQPH*PR7;t^_nGTo7Q{ZoWpz!Bw|$4f9WO%WdfbkLA{#4D zdE@c?tYe;H+FeFr2DD^2knLCm3Nmazy{;Xa%>m0ANMZxF*VxF2il*jdt~{9W(o{Pm z)P{zJox2ON35*U-UJoQXs;a7DV#YAyi$ii&$Bk2-Na2h>ChU`C-he~+oaD8(KJ1L! zEe|yVV%wi`p5moVh3!07x(Q0^Z}Jf!j;9Fw8YC_dDFaCrfEtfeZn|R&gv^?_Z4;V- znYyjMPzl{d(tVR3lcX}vqyT#r0l`R*d2(v1o`1t2_Cqe%om<>bsYU-zPrHv7z3Tii zn+}wa3|>b(3KJWf`wdta0z5pQuQ)&;2Fzd>+R0_gi;HK03aFvY zXKx(kMx*zh4eye%v9Xb$BfjW_6b+A#a`5o*aC09-rey#mKawkZvJOOfz-zyKvnNf= zO-f1vkghLrcX#)2(HE0UDB&vHts6L*$#N(w*;cm~q~9VU;#ojZ20AQ|XJ~EBKYsjW z!j6WDiYe;EHxHy)Xj=sIq%*3xzTV_?gXshX0SLQ*ivj`@dRpA8T&U*g$bo}{vtHy0 zVhMTjx>sJU&B?K`V)>)$8AUYI)Ee=M#1N*O{viXwsF##G<@y7~!LS2h!h`Hdg|?2) z%}9mC>MD+O^x2tHF3vAj#3K@G7{RQH%6|S-dX0%m8A=`p z>g?Dxxa(+fyf5wCFNVnL9tIyyqYnEABF=Sv{YPJv2;J?Q$R?e>^sC+4j#m5%{`gDJd_BLN_cRC}^R<5#O#-t0dC1p=}Ic!1Xl9+6xRaaUxFzi!WckAl*xb zqY`mSGkI#PZEcyGnMtL3Gcz*EozDjap|=8zw4ioB`a)#&X_;rS^)rQkQWvnbkccSI zC?n&jso@@1%iym^#HdbfY9bC41>rC-;^44$Ej2s2#-o5D{?sb@@#9T}*52}Rg~NL2 z1$D?am9TJIN(#}JOgSjjcR2ICY$7wri2=n~K~@&bUSsy;6V^uVut99LbaZ=oBDv#aalUX`NHvO|N76r)2CjgQWUYs39n$XkJOaBiqy#hi$sesX>3=okhG+eKjeXc(}mgx)A zPdbzPEg%IIJxkrzOoMTeLBZbxPd;+6mesxt&0QYXP%O5LLOp}N_yJ%@&x$(Rc-{ms#YvvO zf5#-$j+32TMeh{I@QCOnov_^r?|(fsD-ehvDi|%4I)Gd8C4wxA|gN*g}dy~gB75puC5LyDO(H-HW^_72T{vx$g<3hA7V}udVJkd z{cp;BtG}x}@TbmUWY11R&%f=sr3!?k(n)+)`-5@HHhtOhyrw8vn@MFI-Ca0Dq}1BR zMh1(&iCc0+eQ)Ieh%WlP;Go%Kjz>-jvBb#?`B2Tq@{e4JzE=+w%bCf28iQz74QJbk z-43}( zQ9S$m``wW?#?^%M@i!YV*>BO)Rc5Z94iHGLc~J&Qm&xAdEe$d8n*b$0Guf3fX!bSA z9OHm@zORpy>Z;wT%d*u6jz@t6o}JOr(XVL39~0|V%t)H_I4z>9JgD2@MFXNr>4#W#@xb!fncl*m>+GA24E{NW+lMF!b&?loB(U-e5WQS z$AoX*{O|XlcX#lGYCux8Fr84ODw6o-0OFj5s!-sX%gM;J*slg@FaMm{QmmGg|cXpQOUb+vVdbV0k+IoGSo|@{; z@H(;oxa2oz?Y8u*9XK(4iR8jQKk7wIO(j)SM)s!54`+M~`4=9m5e!*;U6tO=xg;HGK1 zil%1cQ2_A<43Y!?F8nYTk#Af}?%MB-`L5Vj?Zc@HJG7F92JJR-v^Ko_{BoAqdsmzX zKuAxpN`d-ucYpuN6CNScg&-(8h!d19%2G;9B#)(8EhQz9(6~g`o%-C|HKRE)l?-=O zF9xd~@WHy~c34=LO!)+WLIW2g8qq8EvL8M)-uS$l zWMO1n`8>0=jO3IKoYM+6_j+@6THU2jKYpyOm5k_wlsIRS6y+`^DdjUqBGBP1+%Dcq znKSt4>`eaoMubEWKnnts5$9-?6JcmTVC$S3%c)uLJ^Lqh5(wN=)?~RWD4a(S@D3#< zsX^YvS_Y@?>iYWPSDo@PdR@6)ex#L+&47sx@WNZ1b69X6TWTkwI9Fk8WiAa<0m z8$xS(T9u8ua+X%BorR20;`RpoP!C*$$LRpiv~{gla#tmgFS?4<8IFOZqz}}Ze+U-C z+h;&RMYQANl_b}rg8y(ecJdfahPuZ5#R6T%fSy+Z5X-Ms?tp)5?T-_&Y0Raa=DB1kcW6jZ# zktlNE^bF`nJG;j}#8p7)n_a{aMH(L)1KS}x0V*JX^ff5L(^ghiRaK4vcQ?1RfLsMo z6M*gttN`Fm0=UIXqI*qOsYXB0+lw7WJU2golmQPUXsJk&fxmxq{+R>qDPPeyUNq~- zO@KL(Cbp+Qttc&xG+4~1wpD(5nir7hzQMue&(>!BNo-DAm?I!eKR~0H9v&Il&f4GA z&E@HcKGxJ$F0ezdNKp@=P-;ZCA0k*P|*7DX?X7AJka-gag(` zpG~K{k#qf&8oPr#;~Fv{7u0K^vzAS-Di_ZC?FYpuDxR>nD7a_0-P=5K*ch%o39-gZlcs z^*UN=x0)29hxumM167oM-GD&SIL%@BRt`)F6St@Lz2&Y#V5Rr)*cwyg_ zXNFeSHrQ$DE)xM3rehv5Kdp@asfO?0iSFU9%GG@|h3yh+H(WDt1U!T2NK(g!h`;H| zZ2nbO{r!)hE#(h;CZ@H6E$omOnc8z7=oD{|;Sf3OI!cW`5FX=~taIrvyM=pI&&Q}H z0X#v7cMK>aKxyfW90f$dtpQ}M{HlGFl$3_vPV$nVcTY?t4Ea7RiG2PUBXe^T6TCpV zA1ay!qF-1UESIOJyOCs$kS(&72x1-=9~(#0CPq0lu6O1Na&oA_9bXpmMRF6KVo1o!qDUL0WoEXuv=l`G{TZ~JoN?6+BCmnw z#>UP4hgDABf`^OCzCi%_xpSV23N0@1WJ*e`uT@X7B_mS#T_f+1|BK)A^Ya5*(U;-m zyBaYKTruj>)y>Vmb%*Oam4NT%dc- zwhg(P|KUT7kB)o0@8!+E6e1BkzG=8zp!Gjl>^?#}tE;CVvXGpV= z3xEE2bcL=jEDRm;08MlWNWPujqhL8Hc&(H*HhO^I8tBcz5(WMiZD(i4YfdKvd!n7?<#(Hc=&Z}&&(~I zi1Am#o*?vUX~@gM@UZQ>^21KgS4C~~^?n`++?ImyeKlg+ zOlo?1BnJB;sn6{`fsm+zg~jw2gtirym(RWe!b6QFbP6Oq{DN5KT=J zcC_J!XPqnXTR3+!NN=$%dyB0`eD4k}e1%WWxAy$T55qN1&fp*eSjY_0{=>OBIWCLK zDypO3t5eHP~(L@DYx`0rc6sFHecP=xJ$Ll$e+= z3BtpkPNlz8`+o}ylP#Q_-A?4lK;O9&8>eJS*%BXRzFQQiocv!UGwy_q` zf&-nCQwJZ1Kjh2LwS_i~;F7wb0H^O0-=FPZuPa25KEMf&h>+bVSAH9v78p@E6q}NfBw2H1oNqauSSxx!+XE4&l4=hm zQ!tLGC(`rqDlm?3#RWICH7mKs^XQ0TAt7a}9T{X6MnJM2#DS@(sDLXINyKG&cU7R^ z!lnuzWcUSL8EIqD|2 z;}L&E462xf%*(XYh0nfv*uP2`eb zjMECv?`oT!LTmPt7&T=I?s2pcbCs7ZN>%ATZ^(dsrVqA4e?d>51ePkT5|-Aheh}lY zqJtv^YS}#4(EAbrX$4Pz9SBdJS@_2mp z$nSB&aCqCKuvs7|3-KcYG131VN73aFoHi>~@=Q;FjGq!jAY%<;TemGr z;$LCk-EpQJ2#yplZLIQzx^Hz-oNw>DoIQt_`;UyUt56BIiQt4l(z;fUrK7)oz2lyI zHZKK~&`*wxRR_Y1-H6{3aA~MCiTaQI@{$rQqMm14^w%93;u;#C zy<79?xL~OR3=A~)x65B8E`JBtvni`jbXY|da=4-yXD0M_zYIz*|DOwBBM1jT9@^^l zJW3A6E$@E~nI8rEB~aZa%Z14~Eq2BVLF1R5N?t6fC{or&W#_KuL4JZ-9f7td8jO{# z|4Za|HML%=1G6C`AksssiGmD);|xdzHzy~Fphq^K^f2?+qm- zF8S8sI4f$C?_)d2B{?=n^X~B%TtGd6oZaYO z5f0g+|HS-{GT?hjIxHor9fwO+*Y~v&)BT?SzIIp8vdOpF?vL1M7y}S8$iGNNk&U-g zL!3fXp0~a|Jo7BRSkv}ss@(D@)m%Ln90)>nVGp2NhJ$3{Jp1aPlGB_@0w?mS7Z)_; z=7yQ~gtVFQ{;KW+T>`iO0|tJJm1Ku&{80GCHk`oPl|{GU0Q{u{#LdqR$^D+vEQUzl znFb#OsW;i}^*SCFaY#0vY14aRkVE#>b#y>0z%&pc@xsn`ibuV?nz_=jhM!ssK*C%` zMFsn*rSbF4CB|02H9VkBAf1hje3C4;QEj0LqSZ5c@^7N`>W_wEY3y;4-!d|SCPf+W z<{ckIky$#`Ox^T*=as?IRAH6}BTGZmv76j1G%fF|*`9>Y7-VM-AVvf_64OLpiy$3e z-G40G|00?N%$XN2TwLyhg8taG%>#cX6m#YH3T&b<9^d_qjlB8|FtLFf zC*P_E$}kivY&J-2*-Lar1cpg)NL%+J($1YtI!iZMEGxLa{eQCn&WJ6GRc1qLSsK0kZ z=SV{iDOH0)A4iZNM9P{{5A>m3HeS4Mu|q&7jU;HT$Wfuw%RRJ;V;E3*NZaqDj(`bR z9sE8#95;@j>uwW#C{Z3Lgv)$sV6eu20FWVAAP{T-VpVbmJdeN?r>C=&5MnN2jJIH@ zYz zY+8)E9GZDe`;#tS{L!v3YG`Rm^O^=u(e?3I|F8qGA~guFvvk3I+(&)b)HBv}Av7pBo*rMZwtJmRib*P`KH&Tq)=$0V(TgrR_dQctABq9iUk7!Y7o%e@~R-2Xs9nb z=I_^`3iR?z z?v@xLm}j+k;wtp0_d{!m4mYK+C72;x7Q>?jB;TJBbgd+qOOOAg$Vbdsi(@9-ua5pH z3hzg=c)Gbg+0IUUEvxdN`{8nLni5yzbpYt&P!zgO8Za%6>1c4=1idi~P;?X&-3Ev2 zi+y2`T4cA=ljs`&ikgANbV(V zQF(dyQ!gF}kbsna3Xh#_w=T$ayC$BqDOc^pUqSI4K5B2W&DSykQ!(; zmHxN{dF3kx$$aDX4%<%ybRp$PYiQJht%sDBk@1a0Wo0GbLQZ32V|8^nLC?T|`rF{W zJrWfv5CFyP=~3RsgcP8Il2>|jzAF`)1cQNO(J)+>FEvM1;vENQ3XOe}mq)!b(B2u~ zg+%b?r8x;`&e3UTYKo@bAmU-xQ|Q(Lsbf7

7bg-%*?n{Hr3l^gH%5v`VW;tf}n=_cPs|YNot3)V{N_=|Mu@6a>4t` zTezR{4r$k{K!yQmF*YGVGM^Z0=r7m@#l#SKcw|8w6!2Hga-TlXTnLnPql%>VkEn#$ zwV+`Tv}36+P(zBcKWY&VwK$i&wdhWbeQ2|Z7*0Pt1kxL@ask9D+!n7MTxbyn7+a*( z+SvFM^kmT+=szPZE-bu0=_~K;)v;TNBohpMw=8v82wbS`d2za( z%WTm6lrI?uChO@bipNqtz-NR{T^~|WWG&S^gi6^UV}T6=YMsW46A}bXW#g-j>`qq| z207l{{UIEsBZsl~wKMaK-*|9an)ORf%$k=`-INmbdJfN;<5q(ItUKs~N^Gx3W|3|; z?CszP-6DVjt5aQlzWtdk#GDwwne@$)fu`=dW`dmI(vPV+HrZ}Z(s{P?f8z4julm`Ki*I>-~;my z^h+xUC)r5O);BbO#4_kkp0!-*dSB9!P(G$Z=sdicSQo`0P(f+`YsMXpXxAArZEwck zP|ModT0wz1wugkvGG_&$J(B|nC7^*d5e5Uu-_XQlYju^w@b@#Z4%-Y0ZAQGs7SD3v zEe;GYF*4#J%VDe@y8%-aI|Lx+&W?_jh6d0W%K#!bs6kJWH^2!&st)`gfn|pVlF0cu zx>#@s3k-swd9cA8uf78be8Y|)Y~RnT^?C=u@&KKGRaH;Ya8gRj#b20}ItaXMkF)`K z6*P;NH?t?Ve>_|J_rC7GVudf9>f7#lI&odSih|KZc4x@G|Dbt#5Ps`@&nhqf65~0U zQys`s4ZzykVSq-H``%Hg%?Ygsle>U?`SJjl)q*?>wa?CERuoDQ9uLg{t{O z8Et;P@_5X8tUh-rQA>#l38nhCLJLlxe=at=$9{Q_aZd-X{pM_R=qL{?TTQ5UVLqa! zv2y@G%()WD&>7$zeRw-Y0bOcv{3`L+y^ohE?-5h5G})F(iD2XYZSbllx}D*%go z0G$DV-D$dk%#{7}WVs8Fj{YVL&jM|go7o3b``f_EN(|r*mLIOyZRhIWTW_qbnVSBN zC2AA{n7GEdvL`AMuUF@B&XB3g{^c76ZaI7uCoOgLSKCf4MMWRLKiohArXjV&|HIaI z2V(h#Z9h#Tg%VOoDk>`p*~w@bMTpGok&!(sN|LOQgb+ePW@fTUl9j!)viJUu=l6c^ z_t)ni5uS11*L9ueu}*lpu2KJ1mE@oeR-q!Ty+$W@xI|iXwde$+ujFIPZ24Qs-!v4| zHlONpLZ^>QQ#pui@Ri%wg_h^%S!JbvZjD}*^xL@6``Tly zQy|gHpW%XaY32MSzmJ>838J;#-H|lb_Rj(jty8(UxZEypZx5$oS$x8G{(QfcmSYgC zY2LOPRo$CU8w05&nV5zw)t7H=s07QH?Jat1bHB04jc)SNY&VCtOYg1A=B#aF8m}g! zCR*c7GSA@xXFvaFk>8S;^e@dgaLe?iQL(h}jqkfoa%QfdoW1Q?$FRy?c^VB)Uf z^*QQa^v|0-h4mDA)c*P-7ZT2GJs1@uLY?#T6%jDsXJ=$g>A3wWU~lu)sy}J1kvN^x z?&c^zmfN({F?H!n`O_DQ^TDZ2CGnP`1<4Om^sM~0eTyXC2QwNgxVmm6DH(wz15^mp z>frEj{K98_-n&p60vanQhOu@tpcTGVjkM8X6o7 zeS!$=u3C>;%v&>H(P({msL*BF&S}}BumUM*d6YvJ`_TF*wgM!$&s!Z67H~Q z?R1My%DG|iwth!Tpl?ka$h;XT6@MFgTAD#9Sm8HUynXu#6{>^n$=v(4LX4H1ZSt@M ztxtP^LL!X;^8#x;j8BwD`4{4kf^wQJ>D5wGdroDF7j8Gs=Xu%x`Ex6)bO)>B+C^-5 zlgb}1@S~>6|N7N_*zM!~r;?>?cXkTNB<#ZgoNJGIBl%dKq1rO@)|A^C%Y<9#~B_z+jM9Doy{kNg=Mw6t>M6T zG}$3T3i|zj{@-e4rr-1@<$^9BgPgW@szvaiQHGhknk}GeY~(-IjOz z&hIZfQ6M6Pf9Y{{QL4lb@UA!~)Ij|wlm_~h5;QNjw&0C+RCBt&j_Yk@&u zFJydQ#&ER8jTa`h<}J}%8wTxNpSI!%*~aE4x9?v&Ss%Gtb^G7J-Y$;E9tQ7aOqm}` zU?aJBA(w~u_(@6K^!CcDrzgf=rRRUxWH#q~lVu?*==*}ou%jVQUU^+R`jJfF$BHK= zJ!vxMja$`cv|T1Iu6{>3fRY>3%Rx($(RA?MZD}PlAEw`5-qo@tIy*mqKQk4L<@Z~A zOLK1tLk5(-)zITc!e?DfN$@zdbbxB7*QqN@R8*<#eNw3@Q;QEZmj5l7nWbbmalx6N z+G*OInq%jC=oWS08J9Ey%kHbkC)_>WiTd9l-LaEw#&xT<=xc${3w4;z@;`ilSq!)3 z+#Jrf7fT@)|NYzMfOlL^vI4jfm{0osk5E*Ox1>D(DNp~*S}+6%=$9Oii}5@>JZhPS z`x{wIVeRJm>k$Ew|6y9%*0#3XEI>@h4kQ*977luFAh@F?MU^_+9Dpg4sE~Tdet?c` zsTxRKdBlByk>MiN|AD=`Boa*(4i^no^hihiG*E55UrBM}{-@$+Z6D2k@(Fy4ZrP{q zHa0PvI(g;Z%*bCqx<3)_9Xx%DCvDZbi!3tj#|ulQJ#PKolPLaY#cFg*Q)%)j4d0hD z+Be_7D4rmD>L*BMju0|#B(gl&cZrnb?Df!fb9X(CCU9v}1>^EuXmfxuTgWMHoePdD@DGka{m*wu|YEGcWWR%QO4_2oNrlUn~9H$i(5y`Ra zZIzzg@hdWWgh{0S`Pe|u&sQ>Oqbq48E4D>X*f^fhxqH~N3@_4L+$jeP&}1wL$t_sg zhxf_s-nrva0jn2!G9HSFW~Y02muq~X;l;(*6!E2#AT4rT4f;*=hRe^;KQk~i3{*CW;%9q-JfxNIAW1iZpus2( zE}A3ldX(tP%kDJ%0_Fnkc>VIR#^1H$2dNu5R`C7)%C9njQPS1wWfX#$9~xE%lnzzI zT#0M$RHc6ub=_#9HPxb9Cdhs3>SUH>o2-zUx|&+XJGV0L_S2L3u>wxYot1H_aS-?O zM@$a-^hnQFoTA9Cp4I3L9`}_OJ z$QsU_yTs4WU;fmYqAVyFtj_HZx5Klu4?C$oeoRy!H>72!>p&uII5(6lv~GdKkFkk~ zdE$*Vi08RAz5O?b+Xxk-h#Q0Uy?f9sv>QBhOi{gdtp*^@*>fps94c)JyFaI;F;h`} z8&(1R0ktr<#!^mhu7Cj}qEbMrGWi?n>4~_m%%B>d7*D<=Pf-RSJt#Q1LXRwXHD4^N zxL6Dy0s;+PU4@JSdr)l;3`T>_fVR6@I|X?m*@@NiDpm`d7mBrum}Oj}u4!!uE`Mk! zwXA%TEFcuJ*mt5}euNtg3zNscfq{)0HjS5l+4&KDV0$PTgnlDop;25}n_yhIZ)P@u-!L}KYP2t~86HQ$Gh1bzv&j~1KK7Kc zApZ8)E5=^v@%w#or6DhnAjK+iU7uV=E$+AuLrP-pBL^>>^2{Dx(&k$w+ZN;$6pChj zge*zV&A!VMwRPv7|3kyZ&R%Fc_GRy&$(<`#b_JsIhYSJ4^JOCS7BJBP^I2q6)MuUb z2TwQTVSj;_H@Q@&BL>?@HF`NH%<$HqyIYb72k#Ezuft#LF*~qFa&)wDP|8_`lu^hw zPfpw$Q6e%u8@N5kNogPP8@DND*CbN*x(B$ejZ@o*uaqBArIJiu@+3KnG`9CyL&L)+ zCl4MzOc$o8j?R)=(#dJg@}zcuIcK-DrY57)sF0T;gyu$c+bL**&c~k;*G_5pEFTn| z);B~!P9Ez@0*Te%S;w=lemzoXlzGr^br#|)Ik}5=A%_-ZCa=v1MO_f@y^wHM+%f6n ztz=J1?Hd=Kkdd^=xaYmGZ}4ipIJ7G#L-&MN_3}k)^(`5710Z=19sm~hp%oS`c<>sp z^YwL7FU9G1oLTX~O^uC#yxsv{oy=HWH@s!yZdGPqM4Nd2amu^*H?l_#ivG9BP!x== ztht%AK7jalD%Ia+monCh%va0A;rs7-!&_hPTqHYm`ncCKO6F%C#sh7F>kDItj&&&< z+L659PbTi>nwZm^##{0PH?YXPj)VJc>Q-ipW;-Cao zRh_K@Bh@&Htp^QNRQNr0&pX>@MMg#@u$n$qK3fFcGzcUgpBe~9o`2qd?*XhUst}F) z`qlvxfBDi`^42W+`Dih}ww4w$F#4o3RYxP0kbQr47e-F=KF46dsx1wE61O`M2ox zD$Bb}jE!fOmyhxpEBgPqjew8w7Bd5bVMsRaSG{5xR|5!u2n{t&O}V&6C<*uOXBe8C zj9+^IFJJ9s=Xu_6J`oXDyg{6)l_T@u5N_SML)7pN4!YsMdn$WW{2KOmP<1jd>3f8^ zb06`WXgpEKi}*)F{f&kuaah^MXVREYR7seP?dU@{zs0`sQZgo6?t?!16Rj4PE`42z zO--GAdod-)eD$>&3&*Ez7-ZQ^Y!JH$jn5G6>EN#xorx+c%_*ar9Kym8q)cUswhPr2 zzH}!1AGl#`)pk_ETIVZcG7;P`^ zys&n1b*YolG+biGf{w+F8kSo-_-&;w*e&cEUshKP(AfHXW?FNg^s2!7HjwMbzX(fy zjE#MATXTEC#P#y!%;e9A`?_u~OA6Rivnbi|Zq|pxlj4qMT+JNwrX6tP}GN@ebWo=}U^yKvp>miKW%+8zP{r(PnIk$=*NAB%O z{OF~vVj|!XWkOkK3;bX4`UJHkD)qSu0CTc6r%72Tu8@l_7pNJW^8S7MR_WLi7ZUZ@ zq$HoYk(5uLlntWxP?W*nUd`z$RuU6)x%fp?Sqzgd?|^aLHp^>EQi7@36YT=0Of|96 zCSzyAS8m;(bQi7?-bF^9;aplW=gO6-5h9;THgvx1|5!&5;Gr*G-WaN#ns}g#tofrw*l2`iIGbkd^25xj z&^X(j?;q^gvDM$7Cabi(uz=2WPelD`^&V%lAjC~M9fHSum7D{pEh9;c8{NB!g?;rS4?MU8AkjlMimkQ{4&{(Jyg z=vkSa&Z#+v+uhchBKMnltN*5wysARI?T}pYvEMCQw^fGy%fu|qOGLj;aG-4l2g7;O+CO*PXE(dsi`>w04pcw zQ$PTfP$btupMk+ar^1e6H_^HId9e4~fzP4LH|A5neLLv$=Lb^dR1OaQXhrk$g?8<_ zA}rjwwRz>vYCJ+XJf^xybe zWD7F)fiL3j?c#N>UQtO7tfVC}*=$=h*oM;naNkK*Yy@O=yLVgc1nuNM^OBW;hd^?% zjcFEd2sDb>|9gX0p~h04YmY3VqL#E>XTQpv-d+Lkukda~vtJ2TvUdo}j97Z6`)6rV zJAmY#MuGi)C*H-J0jslZX}uC0*w~RGnfc|m$-kT^mhmj`sUC7v&t6 z=2}D{dq^#0p3K=KdnJUkGI-=W{wQjz%3dL5@sZ#N=A-uI)4XzsRrF&VNn}h+%;Vp; zwR@qWfOMnA&s9vDgSJkgGui54Hc1lsskC!6(fDm_c9hYW>llZ%&v90r{*1@B!!ayc9L?x68$r>-ObUAq%26zIp`yF>9Yzu zg)lF#9?V&zC5_+1xHMn3#iLT>Z}hK*EPHh>_wdw1{3jH><$vqKxXa8I*wfAhULDGn zMhL9TMmp}h)U9S((%qaPIX|Ms8_LRdd6*j*NGqG;oz7M^NcDRBcS5fh}BtXWgZ;!R3L~lrt0#W18-pUz2WMp^ukH^+3w1$zX zoMw%&(vE*fS;B9sC@a6D0*)z_n7hI_pH{-Pxw$NkN*<9rusN`7^9)-Ft}kyt>HYEQ zwe@oKR*Cl1?#W(&Yi2f zn`w9}fn)qRwy#sV;_e$mHZ}BEv z;zXbfp+-yxj`BDE`GZYkxvHvaaN;$fppX!|!m^N#vPzG~7x@Yg9A%M;Yow>xx7Rb~ zGzR1)wq^jmMn>Z+C;1pA@v?nTT@sE^wuQF)eHJ$&d%ru$gsamu);oPog|U0s&1r&#(gjalzB z*u;|u>^@X;$YwCph>TM+ZR+GCsm5ZY5S@uwi^o zXrhmmdf}KA|1#gr(@ovoeqFp)eG&uK5b@84q;76*8uKxnU!vs_aSg~9)4kLDD*aCH z*RH=eW7Rrfgsw|zr|7+|751{;P-!m%9C{zRJQxKPFJ~O~lVK$%wes9s)L0>_ad_8W zzI{;@dejbFR-8{obqI^b=f;E|?K^NFAq%FeESA>LGvXbWFK@C>96D?dPq`IkF$tQ) zv#^wMa|>L!;QNZ{qD6=DfP+ser*DluEzQur-QUIB*088^;^J6|$vFO1gLhOPVsC)y zB;9fLgw5lKaWBdKy09az?ud9Yp74*c_ewp1yKk@OE$l-yl#aUd}^ zE9=LPALh7giHa>Pc=S8k+YulP?W2%jI_@SX5#o^_9gQmg9B7^Dv{-QOV`Fy}6;bHV zYsbGC@F~L^hOFr4aYe?Bl241)`F!OQZ=Af%71jxhyZ=XKYHD~FHSgX<^nrKuN%Atl z0l8WFLnG(JI>;evDERsn?LFF-_Rdaj?2E1r+4l4EX7&$){d15e2N~b|{QT+$RAil} zZiG@9Fh{R_RQ`_&X*6n`JaMs{Da!lh5@!K1>AIr2?^lQOY-v>SRhNz zGimZBCz(?D%&41UFv7_g04)~^CAnxZ3)Fe3mGAWe7)3fFWlskq=rZh$o9oiQyU5Z( zLx1=%0!S$F35gZHi$8^r)^wNAOeLmzd^)h@7NY2$B|L36j7ohFS=cLsunYk($Vz%k zNoXlOwZ?Q~l|)Qmg$L68{@s|-93I!y4uY&NFT4b0(2=gRY-PExI z|NW$w*9c7E6K})z7Ezsae9sgTatGVo5N)BXOKxcRHMf0poTC1*4w0tFp1n(y=d%(R_2amKlg7N{=8UeDhj z(|V&M{dzt*MBS25I$pYKkq6n3FU?hy_?;Kn<@UsJy-q#=J?pCTbd=HPFZQ`uPtPlm ztV$XK%^g|-lW97_xz_>)&}&J1Dyww%zP})GxJadM)-l(z>Lgp@==k{U1j<{eCAm)j z{pm}0jgR5>I(;}0Mfwwq*GBO|t=^sdW6IEqkhA7uc5w}x{V&>B>-5E0-Xp`jE= zI=Nr=mPfa1Wp;4*P@&Wb1SIu0B{s*UKINgfan+FtsW@6%jpJYC5PRZ_Ln-w2>o4s~ z*ViImhpCpAcR8)j#Umxs{qhZ2S)*@{czmSb^brve!Aku*HTC(Kz^+Fp6s6Og&@LdI zMO@GN=eu?=U#bRWxS=LHOOB6soK|o*t9&^&{$l)3#-Qrwd#7>{l-3~DnLMELu4L1G zv^7;@h!)hIMQ09_n@Q&+zvEtljv`F$UY4=0?Lvw#$%#N?w9t@}tmwfMi@-rBWuf@b zwcLL9M;{*G*L9Td6A}#ZGsk|W3%y9-Gl4(CJXnnKMdB2XJ%R?9yV%y%T-7B!SqodrWcoe!dy?B;rPvnMN^g6q_ zvOyUjJgRnN&Z7H8(`rhVgvL1teJ)tYIY08lbaYC@Zu;ZL6;wW^Wd1i#2SWi8-DNZ0 z%v?TL;4pn~buSA-RbNtmaE1u3_O$3=#Ak-h#WsTzSV>@tZ{5Bf>w2iRQC?oYGLieY zB-j}#bmAeQp-HX}!iW!zTLWcW(D#ej1U>{w6Y>cs9qZ3=CAdEb4GYV)EQ9Sk+e`U& ztd2N+LY`(tec;-6RtE8DdFhbXCgf`XgOH=LNTPtP_pY2>QhzRl70`}z}A z+pHwv#)ET-#wpVWRMoF*ratwceaV{(l)uR-xPRw+EaLj$=;5ZHKUG5ZPfjKs%@NX9 zE4U&_+GtF!b!)LcB+Fs9L7|#g0Eqh_RsGCKAY$QKM9qPg!DRgqWn__PL25*Ld#ZWt znHN2g*SCdV@GGx0NItZ+J)Vnf+&5+iY|mevc`N(XS`1OThb@&MLk%w!M9*da@>n8O zgoVGtOSwwD3~0PlYyTn>`pPqk1U?)N)VY-{S5;LV`o0-@Mk|ERInyr1T=5PPH!3O= zfybL#l6a6<^5TzLaFH}UM}`1zcv|h@^AyrDGJ=<~c|~T@b+6Q1A$4(bGM)T21;ZW- zOPY6q>Sh-ZMJC>%#e0i46BfP54$*wR^ziSGzrGjxj_uN z;I*i$Sx-EpDtkgpM^{xT7IZzHg@r{+D{4p%vQ=))d?+8Q_0?gJc{SGwvBn2shbhD@ z!RA!^dWI3gHLKORUaYRxR+YiZqOrcdUu*o4J`E!q0s2)J-4{RY9yB^|nHm>-MI@ z%Kkl*Y*eITYsUL-34hn;1=?7t!^6&26TossC2fj~jf~K}^Iq(9C>Go`tsj7se*7>s z8J3?zi&X84v#)P{RrA;tqpR}rCy2{AIeBeql3s5%+T(4}1Oi4F_ zE7q-i?RxM~WSDYiSlyjJJs0E;67u)poeA zRVejaS}uO8uMZ*aez{-G&WRs8%2c>;_8;0_bzhz;!adv4I*01=?~m|`k+zHc z8Y?Umad23^^w4m9ZSCVh8K`@-q)|q;uXQk1_A4`qI#Y;W!&W0||Bt>7k}(k}6#_sC@9~MDLlQVFzI2k003qx|L@_S|uu~$xZ{#E!iRcacu0sV3j{$ zL}1w1d%o+G5fmk!Oot)`t^ef9xl1-^56$QAVcT7smI$jy9$EvuDJ zu@PA16CPHq$eLqLT0X@tjCJ+-(pmX^kB)r3_=1U_u7hk_}0)llmB!_jcwD*lqLw5r|h8zk!nEajAPidi8 zio7#qckgd`p`*ihcs}`R(LH(~b)SssP$*mP+Wlp=b4H&Uv8Z_Tjk`5f;70 zXPrTmb91M)wgtQF6A}_aUQfL$sj2qzvW$BKW6XId>DDJSZ2rPhFuadnRXK@a)n$f4;Lr=xvbkmv$e=8EBAtMx(R{N?5C9VGV-7cmQSRf&IjNS z`-C;{c}mJxsXz43(1X#@(DcoJb#in>ISxJTaW4^(uK3%CdpRU&Jk@mxZ`a|&$1>EU z%%?_1BBG=HwNEU~SVfDv*lWlRR`I+n>&FJMI6?O&Fz~Lbsy7vb5T9x7>oe%00Q^9^ zJ=1*yQ(bUPRyq$tC8=4;b$I?ZMAIER#!=#9 zI5s}+?3h>L8veM!hF`CICj5fYuQ6K^5)z@vsL;@7R1iF?LtUR}q}}}enx47&KVpca z!81j6DN?y`-n)~-@5qre>+I;LuU|+*>O~rZ&Ee(IGbD_5?r z&5g8A&-84X&42q_(v*1w1CW64a7li0eX&x@TYAp?}6G;)q(jlavJ@!xIie7y!XHl?apv#qST50S<}={9Amc5Zf=`DBgNwr5>9v>J9Z51%9W^c zZs3RIKEW&f48rz53Z1sw3^J2-=pj7@jM>t;{uxJKV)T-T#};M_8X4u9w$wi0JH3Oj zTW<4-hqTICpY6NZH>xFl6G~js+~dM_9}0GW#G!Q=w@sQpw)`p1L5_`s-dsVJw9zkR z@PPQm=!Jwd>r4fz)XhEG@Ram>Z|Qwy&=b5{YP!9)+H3_wTcceK&?isPJh++6@Jd_JpZ6oKth6 zO)IXLF2UR{K1PKB0IQ&LA+)KU=+gyr1(@WJ#_$LoL=x%A$#*lf0LS@P6~Gw$_11AJ zl(YbXlqyG|$sMpU+k4>H`|C3Z$h~iG&%gDiZWwSXY8N0 zQ_ug-Lc{NlE=cN+v~&gbK8P*ga?se=g46EA-#(VU(!uHFzS1kRvuU+^C&tIMie24; ztOP?qqOcuM#X}&z^~<&tgP$P+=9i`wV7mV9-62id($)shMMl>D_f`ojfu?!eR4%sQ zCH=_O`cx`O#@JT=B~^vqp}NA8dhQlQKJjB7(aHIz6PzU<6RtdeMkVC3#1U148wSD9 zvyJDouRE{7CN3%Yy|1*NvCBg8`@_}lf#u_fBXV-uvzmnbHmTeZ9yNbA1`O)Zo6pukolf>T1iRYb>E5yKA)&*wA#_#!$_a@j|F{lq zKbopTyjC}>6Z;1_GNwjNL-&HJq0yuiwx%DhGW8xQjxIjoOnx$DS2d%du;H@4__M8z zu0&Z4@mV-`LF5PKh3N2b@K6MLEQY^*YcC?dD#}A2>KNyGZQj)~9{uBY zkhAwr@xQ5+zclF?7+9LkgXqClY@EzUfA3DGTzBO2-MNvH?Cd)Z9!e7HNt^1gRZcm2 z8UGbK)auT^gT+hAU#xfXU!!aTZ~YThE!HbnNm#sQQ}XzZYSgK=)jpr)L+%MMYv7I= zf6^)uxd?DB$mOW4w6vYb&+6*uKsXNin&%V&moL^hdNcwf*lenXtE&-hym{HPN6=;I zn1MJ)sGOtYO0>t8bk@RjZ^>Yp-|C8EX1jUeXDR{bg^$p<-d4GvIqCW22}aahch|<8 zmDkr=h+&6~h%}4g!|jWN5yjK3S4a`Bn(XN1z5l2T6PwXYpA}?q;8bbro|QRi?ta89 zacbQfCISrY2wN61&)x{hmQ_|Bf_d(F1wb92;FIj^zgk;!Vh0wb<5VcamV95lIIewj zZgG*tUx7lxA?D6<-!-0|$W0e=l27jrm(wOjZ~4;kU;6RvmEvYxuSW{GCVx-cht)N8 z7fLNzSvEmIuc{P?B+_$pBZM86j#?Hrwnow%K8zUn!i0op6?**wI}t~K{af(eb&9f` zyNIEx@>?v2j~(m!^-EDz)yTjA0>+cz+{(-8c*AX1W^|DUg@WDLIbTMm5+Q`3#9Rjb z9^*L0RvHu2AHd=X`saPR))}Hc;mp^JTUW=_TILF-RF#wvCj!k19mgB=ln@u)y;W*r zZeDKL3FQC<(=jnet2|6o&`J?OTn$VIUQeH*j)xq6%r-wNsyH*VDOP$P3MLc*aMn}1 zT3O9tdKBR1N4jdzE8cttiP-t@R&=zNFf`+^W!T#KIucwvI@B**XaYn8m{m?zRu-?N zx3?rc9Wj6i5vC? z+ao-m7{$@i(L78_#LcvE2GXq!Cp{IF(Bk4KKsSHCTM~oe(7WI#VVZcniv)y}RMDn3 zVU&R(1!E^@KhVupj8%zml)08A2EU{Dq*?Sw$V7GfbJk)8_3*v*#kTTa+{ zJ#Vy%Q@9&x^0BTrI~Z~F2ygTduDiF5pItkU?>O54fMdWP@}PO-M4w|m88U#QmX3SN zN1Xrs`O*RqZ_g->6q>eNKb#V|JlW|1EMdbMBUlTjAN;#oddtFM62KTYCubQQbd7?h zukGuTZ5Bo|QdG4=cH@F#^cl;|z~3rZT-bHFx!mn0O?wKrUFPdE-tH%R)FX4>E+#f? z`(Jm_`bdNbone1P5k|_qI1|K@AH_a0-XBf*&P7*f(>q#qH$4Q?QEjoz#q{mA^L<;H z;Za8&ECTALMAf9F_YlQmIC_Sn3{%f?aj~HNeolm(v2<%y$IrZev+{)arI*+4x$ejI z#1%{Y1vqO;U82o=&><6XH0UoOCyFn1%uo7Xybd#>9`F^35=1>Kr%I0=xVJbj@l~b4 zhuK~9*5{C)6p@){Y~@wG;tkk$ePH#f7I4-$<#C~4_4C}&h>=p>Th|-1hEqWv`>@vC z-8o-{v{nq21&i-|f9J(k?H(1C$#<4igkJ}KWh$jW!=$AC=BDY52!6}rbA~SW6-~-Q z9j-E(|Ex^7BCO1vUDDe_c7T<@KtiUK0!|pR>Hv+(R~BV{H{tJOX108)07=0vl3H!a zTRIR+A_lDd1WvcUtV|%QRm^?E%;0fiti)X8Ktdi@@c5~(erUdOXNw=R_yLbc+aYM4 zPen@;9&r)oOV0&_hp&#_dZ&E$s36a$eTF$I^2nwwac8}7q3(AOlw7tN1rvN1eE=6=ePHX5p^sgl@)cv8b4d@ja_BJ-H2yI>6<_7+I9ErSq@?du{qmrWHH@yt}So`dQ-inF}h$aBZKoG(z`znB$ zgOczo>3FG9MP((?@uYSy&#H8^v5~QtQ*i(pN{C@$qXi7GTzNG0o+hLZ8-F7#eJWrH zQHa{0b=s4mR%lR{C`G+1!lJ}&-6(m;F-bY!ZJn38v%V`PqePuk?+X$;WoQ43#JuY# z0OhO05yb+mw~h|OviJB4IcxDRM7oc?;@uMQE{pkeyf;=+T3T4(Uu%b39)X~~@1W}i z#Jbv)h1BSOe_AUKaj{HN9@2@->~=H3_dRz4gM?^I>J*%BMD;6^8I9OK_>-EwZncAu zMSIdQdC$JT!F0qeI_au2W$k&yUTUR8{D>58!vv8mL2uqXEo0-W5FeDsVhY>~w`I6N zs?A{7FzJ+ViDcp7(fReh&69n3a^gJ3jP9@8MHm%i|DyD$F7?{gtKWFQ#s%zkvAW2| z2idFG#f$aL%_oI~)SbG+5wu`G3BO1NZ@BrlN9opsJ?191EpRCN(rqIE-^R`k-Tsg2 z>hC;1y1M>B-i^%C&CE9qBVbgxE?g+<>eB1V%OJ07?mT(!-17Ti6tc0XuX(0wH{Px7zA!UJIFWCj%H+jZRQLu}tH%*{7O-3#ANHGgi0*oXPT}(&B6D>T1Ar*skY% zN&frhjqp$f5>%@dDEz62BYkeT!0HNv#CK*S;09-6ix){X6&7**W4_{iz&rTON-V3e zxj^mX?^r%*acJtnRC^#;FUcU$U%&$vUrEZ@OX#!@7S4vlCUtg_;}B%!g)bKLB+pPii7>*P8bb` z>rl;Ul_$~mXm?sX1qDSYm!_mXqlZTcrVXCG>(T%Hsg%#VqM}V)5Sq`(1HFVaVpZ?XQwQHu|j_}1Z{ICRK3|_#eiJ@-n@4RsMjPV})3)QIXmjbd z-g#bLNwbMRsJ&4#;zSxWLTvOhDknb1*GsWYV~8d?nQy%`*@>3FM^NDOsI#JeVhfVT zaUMXL_Q%}*#>DfA0o2w5%hlao_Y!Z0BWCS`e%Ex0Y8tdk8Hm?!ZMClnl18Nn*a^qL z>*#+s*kM7ZRafJ|8+CZ7&NODj;oK{e7&`|@1R~Wa!(sNSFWtdmWm)G-TL(_)w05a(zS#Kn*5YKp$*lrIRc4V2AO4QYB1pL^JTM zf2ZcIgRZ$41DjMAwtbqGSfWASpOrNS1*pTnl~-L~9Ht)(pGjogy|dJtc?!-4v(>2m;*KN26`Sm^G_G^!`Jg&F~CK|^cx z5@L-{-I-*8c_|QUi(O2tI92$XynIYnK(7gM?KVz}Xvy8b@7snTi1(_GclS;<8aIod za5pM?8j{3$U1f?eE;j6G?nY;09ms8-W9t{p8^wshy6Q6~eVX`a<_fv+hbkM)UKd!661M7Lw#o~cOz>8(TBaQbUO);n644+ByV3` z-ajxf@W-6rAnMJ79cAel*a#pH{45$I`+udKow%~0VXDC6fLfp^S2Pp_Yld9>6M=ue zfA4B-ZSClQ97UU*CLb1hjhvSvBAl0xQ=x~&`qNP7tuBc`G#&ol;=+RZ+5vzIaB9My z38@^UH08rKaCsq`q-M|_022HWxTLlIe`O5y^f0V8JTg*ARn^kMBHM8`HXxv_Y#1Yn zn%e}d1dqiQi2E84%j<|YZ$4W6kWfXWHI!$=!|;MZivY1E9pODW`%aK>oezAf`9G%Ct{u#$7`8U3@#UXMo~r_Y@|E9AZ*IDCiLE9=AdZ&||lI=VFy znC}(hmnfQ;#a_mLx)Rq2y(f&m`VJQMzzd1G63igOeV*3tNEkhJywvQrq2cNHQvw1C ze(McCeNn~Zd=-L$`o3vtv!1^r&2(9YaEw{Q~E^7*Ny(2 z-8+XxIL@6LoTZ^?-A7R52F-j@yl0=MZcOWDgp&G?dX4syuU|J#|0Q>*(BXMoLThI# z`0(L)fl}5y?cgnghrc-AyuH1T^}X^=6xU>0!N^hY**bcLmIXe7Vd%pvH=$>`B_qvv zJ~pIL0XUfCl`GYpD^!`-hgby0M@MgBc2}34zP{9v+S4$ietB5?C&g`TVRqqP=k1f= zY+qj*M5oD4$z+^}4)vn;F&|1sQo^V*Bo^0la*$%*fV4H#(IDecE}tMDgT`yRyC5tq zjJU?EI_U496{Vo3I(^WGDi)y_MAeeFtZ#)JHqGBxa{XBh3a3J(w<4JBwvrN@(P|tK z_O{omtE=-+1)u;)P35%BRbquNN_Y3k--b__we(JT&gPBxc1S@dS- z8*&Q@loB13xK~-st+5ASnT(G9;mB0MYVFL4%o`N@AGp`S)Ug(Y1JS2AL<@* za8CXH;WsDz#X8I}gZ?Kwwm!4cW#d#tm(&pT9GKDl)4g%9%0u;!mZm1I%8~1Xz`<)4 zZNs>?Q$NrbXX?@~RWT=?@gpx&dD1X)2*0F^JY=oim^?~)u&^~yAr!?{3{bR5D1a`@zX4Zr`Rw!!eRUzF2-${P>Zec=5sA` zZJ#Iq2?o3&BF_MAyf?*> z?}iQ)(}P`IT>wn===pIm^M%}PY+gWqps)YoJM%K0J&tV5v7TRAI8?{w<^h)F=Sc4om|%v+8(b;acF1SrPrc=`EJ)$hp|9U2n6FO%r7 z!`K^_pNjRLI>zW~ z`(Rc{OS2SS`n3lpTKj)1LY$nMCjv3f`ORDY2=eLvGH)CK)TFzeo!4MZ3KuP?5c9$- z$Ua``*@jT`fPfj(&}H%MjeTY5cQZSJJE4dr+5da#fgxIP&|GtqIN!y$3$;%Nvw+!X zgn#4B&A%USvF3|N;N?(Z29Opt`B8M7zJ6{Wl63e+$6F>G?b*8W?Ua;C2?U9P%TGws zo>!dsN}C~bqLCx;W8m-K!v4Dm?+ZM4Q)(e>-r=Dc{}~G%oks~z8sD>A`B-*pahf?H z@G71pEAdGJ6GP!j;?V`Z8&-&HJ4)VgMB&FKJnJ~h1d14FwerSgj=-zvuyD3gNdhCp z;*gVTHlv7SIsR?BUZCptSlZrR+=Y`mfr$1}+|=AfXqG+;om1%IUly+S)dvbsht!@7 zQr(q*?WA69>Zl6NSaka&(Z&~fc&s+pvcWi%XJQ>7SVqAs0BjTysAFY){cju&5)_Cw zU+;MZBqpjF8t&~WHg5b5d5y)3WX8Ys>m?xRAizZYPGGO3@H-JF%+xHQmc&CtHE~2l z@SfcHorKpIUny?YNAOnip<)mbbVbZfetr>GZz;FqOh=Tc3o6%{Dg=$e=xx^Ym#ERg zRbdo&f8vP8cO;%)An#D|rs;pTd+mbj{p@WR~Qz>%FeFH zZay@>ik925_|j5p?&-!cixu)eY1)c_6f_xoo0~a~f9vh(DSrPxpkV})gw*cdU4#HQ zHdgX%h_jOurgQ&j4Q=`Do}7|`X;nv$KE0g;?Y2L|#oMQYUsN2Vq+BMlZw*FGDspnM zkaLXu{rmO}y~7Nb%MC<;1P28HFF{~)%E!KHeO?ra!*yYue|UrkhY19ITOm;*-aiNi z43GTd?L}7JppMOKfnUmZSn5r`)0HSl!1ZKVTzuG(ShG6$cCfGy%d9h5~$L0Fes- zr$2p;97H~-En=lMtaWtyax9`vM;>hu7IXlpqxEUErC~?_=`kiBcY6KQ)|Yuhcc<}i zMk9uvw?`guaMp0~SU=1ycR4j7Sa9hg4PA>~>OV5$=Mu+P7TbE+{UC7zN}*!#P%K&j zrKh5`bq%7Bn~yL{;_xHNyo{%NqNPvR*{5L!EgQaOKXYabSqP?G;snCSs|9O&elwnS zTPq2(ED@M|SFZPM&8_ZU4NERc zN+Crk64;-8w)FmDgMHenNb0t1iMuJo_QbMTYpke?VWTnMOTNAr%4eHe)~DAtNSIxZ z2VSL;L%t+zuf?pfgQ6;So4=&zD|+2|!~}IlJA2*v^T$V%5)a-m+oxq$ zpVHv=QoAC){f~MvIqt7NC?POSTY++_#%#~&;A>oriJK0?2LJw?Pd5K)*y)X?F_)-n zSc|4dF?8m;3}Yv#lB zP!T#k`7N=mqh#$t0dQuy<3r+J)Q8zVuIsI-9inaX1WkAuT> zv&UsR$5It)cGLs6X6ZcE!Cm6RzGn+3CtAG@r*#qn;m$9fn->m``T2XekLbjDJ@=%} zo=y4M!#Cx-Pqv|}Avs1P-`g)*)PhQb8T+jBQk7*QbBNB8t`coMlRme{rL8Jv4`iQD zMv5|KmnPpatG-a3p~ep&wpm96MHXLZU(3FOg?r)0!Qg7I-;M+2=SMg869^2u=?X5( zVuwb1Koo1sRui*B??RW)z@e7@s8G;j%T-PqPR9sfFxfp{=eh2*%@J5nbaF%BKd zk^fs@K~KaND{zt^5h3wJH3Enb;{A_#yn`$3R_Wa$=Xk>_<0pyv2uq#QvsKWd!)=Xg zsApy-Z1`i8%Qt5En1#i|(O>q{1M15oIDeV38j z)070+JxiFOp^*_L>ex9^6b&1j9S*!IrSEWTm~sc<7gIoA3ua?I{{8!xgvHnqRPSf# z44_EJ7kt+9Ff027V#&;?O>x{xq#Q3z@e5PU%uoX3k>971C9|^PsHBc%QXsh3(vo{l zk5a5d{b{LAdb_#Jjl=^-b`wTPug;ieTJ`UQf^g+NZCwIM@4+ZINr}cTqWjP9XdB{z z?5!yP9Dz3W6rXCB)#&`BRTKpB)?f49J)+mo)s65d;hTiOxRur<~czVQ=X~7CFeWER`#g+yQRZHJNQ9SKmyHE<_v-9z*Gx#JyiADjRM<1j9 zw0!{($78!FC?up_hX-WX;Ly;=vFCUa4v%+JHY=PCCJscxB={A*n>T+T?s<4%;8XiY z{J$zdIf+f^HBf?Mb-hh^f|u1pc2Go7oGa{xNz&(p9O8p0V*#x#jtyQnnVqp}yLu8& z#|%$ryh^YA2V}Ntwhj)&46*;-6fIJ`!o)YopjK1c2HXjT4h=YiU&8-;LPEZ{i1;90 zq(@rhnB0iR`2Ss{k%PV!xECaK;}UiepVuDzWj1FRLu!H(QL<7=2D6o1ykBW6C%c2f388;}MmX%GaYLApcf?%Jd@n=RdN z#_xQ8&UJpCUvte|vu3SXYt1uH-Ot^E2`*E{x8`PV@aK34uGHT^GYFfr5(0<2Edd$> z!=ICq)U01CDUJW%8{mU)knyX%J$s50>^}p8OnjRY1jd6nh(&%dr2p@!!1{X?)SEym zT?Z*Ce=rQ%)U*KNQ@0L?w1&ZDpbFsd91R02DhoR<cPAfxO!GlNJD4mZAG9Ef2S&iaO$M?C?MPL}sjz~6ZqUg+ z4x@)E(UY|Is40VJT+nX^b6toxpyGnQu%CY+h?N_KYn*yILUAy9js=GLNmO-p6&T6x zbwff0!=>XDvJc6qnBWrTab2-CzVK6c_`~8n3d21`f9;5nx~T9v-9(w zYd^#Oo`Ehb5C*sPmr)t){cq+bs1S#i591-1S{6n|9Kix@sYDnIrOmQDN{!w|Vm5}c zlF~Q~jioJwb=A_5FWHJYi+N#A7FK4n;7s{bj3ykFPx$rGu*eV zB|=C(CrZ?h;6~t#&RD_!-aDOZ_T{VEc7}So*L93n@Ygj68!dHAmSp?hx=5AJ>>*jicf^6`zq9zu(l&R3??%yEqqe2}xH-t45IVaxTRGEcV01HZ(Nl(MSf zRnhx#4AfiKIf}D)@5?9<5u0`@kbz?y#fxJ3D~y|t$9F-yBA{v*w{=$9p^G=6O%i%0N^YgZ=(^~v{g!&Yr-U(v*wU$>GdROMl$9^#uuyUQs(fy#KQvOjHu^vb0I3m;=+r@0&YnR9d1l|a+a;Hdh>$G zVFTtw-VKeNe+CtTBID}$*}CX&27=KVaTrp+=gOgO9$v+itf3G+Z%yz{ZTP@6?9H3I zgHX4dnKJ0x1lV?34TQjVnapg-tN4Ifw7~5)F4l2(+#ghvBa^cjiDnyF7cm&%1V}rt zy*P~%b@4j^iK{+SNo^#}xW%M%tlqxoZ><=eFtIA5< z&mgy`(VZ4@Tl+X^AuPPem6sqVpXy~fB1!NFA;%Y0mN+JAdo|K z2oh-=Ob_l)P0cS`42625LP*9d&v1wcgNK7~%x*%l)xvXoyl#v_Nu&#R`o6zR&EGc` z?v9EM6xJ2b^Z`-w437Gzk1QRo)}@j*^-rr#^_(Et_+M(}CTWcaO> zMA2GUcspJdG^QxK#s=Y9Gp|!U?Wt`LV_XX@-R^-Jl+SZ;*}D=38lwFsfJ3PI2Jg^t zpntZ5`^1;qLbe1_n7f)$j++^MgDDvWEbCtlxLv0eA?2eLPFSd8n0p1O#zq10Exmy| z?21GZ4NbYKz)sA=wtJk!^6U$SIvEKi?Vv9#&I9T@`$NLtcUph3_Ki0dc5Q8 zZL}s8Y7fEy=;d;5Gmd_Hge={_TRu5lnW0GS2XCHvsT}uYx27cWMB)5k007Rw&g<#- z%Q|Z^yrbxoGb4scky%e>Pbae&uGt!n+npG2f%YRj{LRh&h$sop6`o%wEj;Arv2-4; zBj-~T@8;V*3`}qx>5g**XWY1qygSF3UU(`E@)CDvTI7en^t)Cv?GFGP$TBx z%JOnZ#p7yvgiMdn^oGfumCRZUJ6&E|Z!eQqXqpj*}L?7vFDx<4!Pf z3?rd6*`9kjDPj^GJIxb>Xl>6m=ouI67PCs85GEP zr5*qzV)T(F5%!FD(S;Lt%d35C0@MWQ|l^Qyf^GXAjgz^A@ z>-;wtz`mzews;C^`<`aA<~aZ;&$K(~0{)``ul6q|+Ahk>E<~;!A_i@t7-@2kZVJlP z!Z*nQhUswj;*tLM1Mb!Gx!(em0ie`+40`PKe!=Xmxe#_|dR7IDEZfnOd=b4~CHWfg?B1du1YCO2G8Re1H z;`e%J%ue4K*WZDos4%at{5NZf>J|3=(sUO^II>2Y8p{E4zGo#1pPfi-%`40gX^aCB zit2xE3r?n_pe={NNFo$fBhFf1RX9Ybyb^0@(%ZG?oNpB!=om9L$*cQ#?(|G6L6fBS z0bn2Yb=uqswP=#z0h$kAZCo5_njd7;0|`e*bDRrz@kWZ-)V4GwPoB;K3A@*k#jsuu zb*#IDP*|kzhLlxLnJQA3#w9|5O%3k@?D!F@p7#;WM)nw^wCl!z?OL2;lR$YqD}v2I z{L$3i;5((mlr^LEpFb=4pIen_J3qxV1R5_byM?u1eYp8D#{ir8PeqkfcJX)& zxrx(PM&k7erX596M0JHese@V8i3rEZ@Fh{dj=?j#)b07_G+LB2KDW&O#1+7@8dkGj zJpoiVX|(E++^@s8kJ9|H{qN+bVJtCqxV(`(Oj~=PCp87r zvS1$nptM^(x#27j?O~ux@#55=$~7|96f&&*w93iI?yY~Cj>dDN3fJliHz?&TcP z>H)lmf@1h_$>sQMxvy%blPMD>ck82lycdyQJlOZpPo^3~skcl=&P?32cKe$^D5+nT4Aw03R09JL?OpqAJjst^BssN1VSw&_bb<0H?!Z_VQ@yMWONbnvP1W12}uc2t7Gd}fW7wB;5hm%u!08giK@52P?XDo7*Xg@-ihK>yLJx>-+c27!^RK_dY_;8+I9pV3Fiu9geDPIhr3ocY&fk z)7F?yZX%|@WGh>!uxdxR=^iwE#|C&G`c~VGb@cm(g&mqNIv{c$xFK0p>HWcXbh-2UpdV z*epR*h%}#MOkq3F&BRTGiE#RE5x3Qos|y_e!PKaa_~v2+eh5`Ak9+zhAkN3OR2 z*(em;dm9=Y5|!QtD_Pxt+yGkA52IB+MZhX+j-OHqC>|^8JjNXLT>qhNBj48eu^TL} z%)s}3pa&8U0EPjflPT)Z*UjHFg`3U-qziP#dDiHa;wvfh{i=dr!oAn z4Q9;Z3 z*)!y^rDB=CO?=GQE^1Mn4JG))(V+cy3*=z5sA~0rKk)KZe~QL{gXi2B=Uk*n3}iQa z*e$tPBHo#MqNDs_z~qdOR2t-6|NEsC&X)_b^p!?&CE_JotX&C*>Y@4DE9RkUPwJCt zgoo%>TDW`;1_)^&tj2!k`3X~Jnw{MBx%HAMEr!m!e$^m!30}fzYdmnx_o>~DjgHE?O;m4aPmSk zxzAD82F)K7y~n4NhX;gawuzURuHJMnao=oFOfG!PSaH?&ul-S|OR<$W9e;KpN&A2s zO=^l_v80mtvse|HzfSTys(|Fd8stNfZ)Jl#g=V6cXBvK=E3)6NQWax?tj3XqzeHJ} zIWbv3!+m=PAdBaejYa7YXfnOJ!2^E>&N~y#k!6!S-)(~18y3G)YWd!DQ&3jY20E0K zRgy$-0{%s9ciqjWyUEdIe)$FHzHm_9fuFE6v044C?^>!Yk>r6l0+vqyXTxoSJNzv}xeK0NNd=pa1{> literal 0 HcmV?d00001 diff --git a/man/figures/README-example-point-chart-2.png b/man/figures/README-example-point-chart-2.png new file mode 100644 index 0000000000000000000000000000000000000000..255e4bd4f7a5976911e395d82f7ec9791b5dab60 GIT binary patch literal 72965 zcmd4&XHb*f8$OB#QQ!rnh)QTu?0{71O+bpEAV>|}AORvZw9u6*QUyd>P(p{$BfU#N zN{|+MFQNA$E$qkN{_oje&&-)Kb3QO(lBcY7-)r6Fx~}!S0mO2#p_|IA07y$y&wf*}e>u}1m27$OhFP05GtMIA9?$} z{Dai$bzF;?4nVPYsIn_jdzPPF1?0_jg5`P^oQllro@`IE%XINEpXl1 z`Xuw`=kv^g;gJkVRNOEcg-wco|13_ULE2Q@!D)&&XaD04juj2RBFi1j;7Xwr_%N73 z3C~5n1AKI{JSRf|mrDgbYG(R(JHs`ve>c-+{(p3{n?2dI!^LjX=~2^JO$O<))7fHG zz?{NKvchJ}HpIkthf@CXNycBXON;XT_2J`-?aM(}!1%*}E|~wS=Xn?6B)>8Vcsuf2 znn7SkO9qM5D?wV|4482uT{e;4Tq^Hq&YZRd7)|>3nECY4lZuUR$}|@?2!&Kx)SErc~Lx0Z~yA; z&9MhUxX~5*fcf0I?Z0788B=!2b%${=1CM#BP)U9bEiPK zp^D4CCco1s7JIL*TfX!=u(6s#5C~^UOgcF^;i3XVw*xNEh|A0JtMT%y@)8+<&*yMWEx#|^ z3drun)1Utx@gMn|ak%wR!Qrdu#swjUBE z`R}K8bISj1p+9ZpRO!EXFAvOiuUWbslo7Bob3W*FCg?;W&Rlw$a|q)~FMYNzgQh!3 zi+l=aFfjC+=ir8R<4QpNiJ7*%Kk|TvbILiuDp@oK<#*ctxx|l0zQN$%8l(>zq~19l zFY#TMsJ|?8A}NqaZ18ts94Q$mf&mMnP70`o%ZzjEaX?pJz&6al<*%{R1!?>2_Y7&s z>3s1NYjK)<={tw;KVW3t{^txjcMY;>{{ur($xN-s)J2f?SJ8cQ;L zl%aHT3RJDs%`c>H;H45D;vV6e>3RBMa3-1h#Su6AUFJe`5)m#Rt0aGMGe^BivEP5c zQe@Q}#C3H3*z7Va8X?|y111KYr7Yuoo;$_k`abve?69c9rFPRQ(XmoMa2^9A2%b-E zpKS^HPD*h8Z4o>>n)!t98&Bn|!R~lAp8XaK@ay?za@o6my5@P|;#*U8Qr7a&_k!O4 zY$C~a_Cu_X_ANWlbpw$}fsr6%SmCe-!sanmVOUdXXZ+St*Q3=dfjS}mHL)LvVYI@< z;%uAQkBT`9@2}=5tYC6q#2}(Oi^QS`zVM^^ghp&moqNTI@vVUc5WyIB&{|_S!dmgL zX|JI=HW4xbZn#{gi2EUm;+!PiifB~mX{kWlI$6HnBe3$1VQ}rM7|h4HO0yo?lERgID9iO*0U2I*IZ(R_l|c}Ec7?L zk0gemtzb_#CJS+s+To6)GqfMqeocKkICmS;rkKbb7IM8p-)dAf;k||QTkVpCMUIgU za}~~EO~;L#XUyA)7NjL7jF8WI4Lp%A=4V%vn9FWgNPjQe#TyoPuEic#{E;+Ynl_96 z?SXZ71Nw+`LW;kqK2?mc4QBZqZ%FNIzW5m0S))$Dp>M5b_lb9)zqC8|)r6*?x|&~& zMD2Dxb0C9%Tuk)dZM7Du472K|bza6A3T%fJZd}{KEeB|f& z-!xR@HNwnh-^d4OQ=GIRbxMqK6*L!r2JDCV`yWWnoO}|7MlSW8*Jb>zQJ63{^DH54 zsF~b>I{wk-#jI@xa2w})8>jFRUdV0Flon&ZWptUIilt@yrO7YH| z4omn(7bf*B#GM(IC@k>m4es?VmW>7#XMB|EU65mxxrNEC!P}@;Leip;+;3Wbdhh(0 zhCjUel#gHQjS>^Ah6(#qmZ(HgE4!ISx=KJAM8Eym`!Fy*n*T~AJIdqDmdYJxNK~b; zc)F`j_&4URQfNRgzNhDEOWUzd8d)yK>>&MRkA&~#GSP3lsxjw$E3bZO+po_A3|;N; zKT5w`VVmvn-*X}dNmrd+fu|oh5|O@RNq)(?5yD4<3KxT$9zICqNuvdb8}>n%mvb_5 z{`X^|E@~`0JNr{{1w#Clw@S_pXWc*sR2Pd-2MA2wa*bT5r`_cmXm7GtkpHUHyS0v za0TPe0sSZ(8ib+ic~a>?Y5?k}E>7OWB+@)rF#B_=65x$oPLulfo1eCP;$mt|Br4n< z1ur)5zn_g%1QAVjs+!A!d{x+F)L?3mL=|aD;q2kI@!#?7vx2Ipxsg>? zusY_-iMZ;W+L30;%f*^KL4lLzjK;qy5)IL7&zM}b$(~__O%~Cg-id`9-89Y~A5VR4 zW*RWpSIK+Mbz^|3RTL-09a!dCd0mnSQsv{m3c9Hx9k93o=U&`6zmGYlXGC`m9!*N2 zBQD?pk@)pqmAH(Y1^?YtyU0Z&r~^uOcSgO7v_DfIrQh48%LHt&C?9SZ80 z-u62-Y&u&rX0y-2 zoAtdeWu)E}PNbv7`pI80MVuXqI#YD#6rhv=a0u3ilz9-Cn z^8+MZno2rUtPhWN7+S}$Fpb+=@up$Q8GNW{#@k>$b7N4(?M1*Fb|n;@<($s z`FbWxeT4CTXSiqRv@uir;S?T@q7#%m`j6hp;%jW!xE-vYN$HMP__t{9u{4L&1*hWqp+-GRIk)CkD_Z44f4ca#7=sPsU*3=&ZZ%K&C>WDya8PrWW-(YxbM!Ql|JC{PLlq)6{;~ z3-6qWqB=jg1aUf7C|HB=$va= z2_yt!7@%J`9q*0Ff9vg+>h}u5b|eur@#+eQyWvr>Lva&ewBw__ZB&1I*I_QYT0pL; z=ntjoU#kRI8=ep~=*S_}{XY{drcD_6S-ss!Lzox#s`m+sc7vMtl`*>9e%!%gkbHja zGfigHsDh27TmMAk{iVesU*wlL%XO+(<*Dn2x!H&y&gb-&We3)!nhzK!vUrcHc3+#X=<| zmT#`H{pfHF+m%b`fkpnueU^@`X{Usm7Pyz21)TdTC&dGiX*2GwV8hAHkEI}m$6nd~!@6rNh;Pz_Jd!n=zoG`F`> z=ZD~fG?_T<3?Bz*kk*NS(M+?iPENOSMepxF2y030Iq65a5P_^HC@N`V+}B=6zBp)910 zup*GCmkFZ-wc)(I=mcrXKvkczPNqq=1dV78Q!wn1~X!#OqD-e|{CLxA|kzr|LJF zKU18#xkT8gx$CITq>9~7GM`y5jt(`$Un5_REUvn(HJO!k3)CYZJCIman<^2q^FfqY zRAIAw&Q$41gEamJ`_u;u6#r# z=fRRhC3QDCNd@D)3A=%|w*8M`eoU-;&i_nTGqd-8bi3$&8y%6I1p>7p3IYY;Q2zbJ zJO6N|nv!xi=k<2_5FN34Ga{WIVY?V^*7L;N|Ih6j#=V`)%lk^57eOnh>BC&bEk-bo zK%~DUtH&2b;>`)wP8MYVz;eC3iImpx_Jv4H?SJIooVk3!=xXq9#*+$!N8EJZY$?qh zwbiI<9@^3Y7rPQt-Var&k`Ws@ujyb+3vJxuvXxE3`My`q99Mz$0Sr$X-Zv&(WXj;0~t5*cGn6*M4Dx}RgyLAC1H2NT^=W zXW=}Yc8Q2te2P$UQiu&%^M0G66S_1045<^GCj1XB?8u2opm7QismF#Qgd5ZOcy9BO zgYZZsyCnUBH-kaej$52GESp)cz+qZvTd8RAJ@30#MY(mRMTNBc-wSay&xm?)#&8f=h{2pI zyCYEMIbH=t2NnWxXIV!|!P6_!_GQ_qSA9@@U?E)W52)nflRr`|t27a@@#srVrOqbDx3Pn?BxJ$O3oABY2 z$l*$(=-4_%1Q4MX`gtvCNH6v5L_(Xv2}~QUZ&XsEyqn1aXXLwBL_)&@!)dEQvr1mL zH6D)J$ng|8!+b0zy~qiQDb}0N$@b@ER_`2p_HQ-H{ssz?R<0s1e`|~)jD-iWYCkxDQYax{(hXcY`41!qyl z->3Pu9R}iRu=HQ;*BN-S7grHV!xB1NJ)X6q)oBLoxz5MWeuY&9cRQEfYL{_;AAHc& zz7CX$cPZ+7lH&)G2Gra_AJ0xg$kTlGw0_o$jgP0_LxRjPy?Sub<1-B^sX-tU0h`WP zg#EpHm7_4uzPCoGV3-x5Bx`*cdbnI~5TEQ)wQV@*)yEbn8X76=7QLUopvs5d=g}V2 zu_%;{T*u=0^|S8-@m*0!X)E3;U>`S3pM&<-v->ri(_c{4P+oI-u4uPNUnErY$^pTk zpN93_@K;gqlM174;94~0$?O_@y2*kDmug`1-TTMt%W6E_t0aJ6V)$=p3VA$JMo58z zq2Sneuqyt}g3s@L_9^BMu(R|z_E7OixZ^gVI6VAz2$6eyDoFRVkr}L?5VTKNPXXOqQ#4{@4d(3Dv z?NRq3L{&aaIX@eJn$N}n+G+2?Xz4DR21BEt6>Wt$N)uL*;-`-^DZCJ(``9)5-^CW; z33~Xk`Au$EpR)LgTBou`;raI(5AG}jV+I2Nz_8pqclJLi^M)(lN=6uX``_Gre~XD< z;cGTI#ufKkLm_fqNnJk+`PEI_={vJ}U&c2VN{~R7Zt}tTn_8~_8{eO#5AUSYNTu|U zP(BF9ue3@Lku6*2RfLcV2mrlpTd$tt9-(h3)0k=qe)IOcp^60}Is4VX>H$mWM7s#C zi^sD79AcH2s5$qr>IeDJ>)tmEd$a$u1Xq^DBDy?AhAf?F@1C6DbBUE=r(&~f0$?GS z1AIA+`T0qn0{eS%P-fvU4BlH)Js^8(xBo8%97)3okE~y+|5mKD>63tcm38VW77`p* ze;L2^y=r>ffiZV)H=a?(4jA(8zx%UZ#10o%yfwDGMq{cDz0Uj* z(W1!3L!4yYj1HD>PZ#dpcDXZdf(`iY1Jl!?`)We4$S>Y;2_pPkOtXmT3n z|I~8+={A%B7LrgUV{Q&1)Kqv93djNv>iIe97o`BqB6z!Kndz+Z%7Up8jItpLiWvvW ziB(GE*A2ZIve^M9Q%NEiicj`^y7TdGYof%}4$d~9yNwQA`L9MBr_9V1!PS+#8ewIOBN$bAA5|1isXLW7b<|^NNm^=P)eCcvf<_4t> zWe0hLv4B8XM4HvK!~wO?&9QyYeJKExS0Y2jo<$(a6!y;<3e*$3{&0i1pv|w<15Q(F z%NVzQ_d9+=wQi>Yu}dt1jQ-;{vhOmMSMPMa4@k=WB*t1z)wVX2*5c9$21WO2Z2Y8` zWNxj%PZ!1^;jiLi(uSK=7z`Fa?cM%QN)reNdw~PI+m2JL2NGA4Aj}Y=t~ZKVgwAC$ ze4av@1{#0-Q8S7~2+v@(T_6s}P9}jeXnztM{S!1}$YGIom;$Ug1PI;ktPhsA|46|j zc-l5ob=B9?#JnAMUC~(Q&Yw<=oDb--nYn5|@hI4G1UDDSjZuI6FK8Nv>#9&XO+&!a z-E-u88l@^;-rxGo#{w+nJI`@>n^EwB&epuIx#Ywm097q}q?%|y0ZxoM?c|PTtCO?j z_9OC(>;!#_xn|~uw-*yeDQq|um&h_lH<)@`p<>vT1!OU<0<&5(to>m9Xt`iuqgt?& zc}O@(!-3R6R~wNxFvQoVxq1sJZH~Ufm`(fvt)NNrl=vZ4<`3-B1&E&A#-y@Wq_Fsk zgAv?@`Oc3?xxEOL7aqZ~;S^I*vTXmYvY3I<9uJ1ds&^8)Kwf%qNoa(uBC#vUnNHE@ zTIj%x@$2Yt!ip@XfQ9#zS2ioW_Y@NoqT?X@mn?8QjJE$~@&P&QdL{t7AaIXDxf-~_ zak&)D^b2?bMtN<++q~3mZWssVmV>=Ao)49RMO_i#8@6e{Iwx@^2-`z9PlO7zA{o5= zC0Cqm&?GZdMr;`K;p~4%1_viozO%`9j^|r0pg+9yt<=O;`b=+l|Jqy0QERG1NTHmk zJQW;0XV6qZZ7R7Asp$UPYj~n4>%Ygt`QNJc=J=`A1~M+z+;cq?fgd$>R-i4Ua{v>L zVsJjFj3^2wBBvpy*R=Zl)ZY_b=Qjw6!n@9mq|#td-#3T_bncKCm&SI!Q%f}-RJaKV zyD4_^QT}tOBz{b0s{caYj76CUW(LX9@(rJSMtn|UbdgwkQal7(=2V2$Fub{&Cq_*N z22(Ob&P~oQjfJRrNbiCgHizAYQcrKpP8u~_{;e+0+&mw62d5Rmk(rCgY_Aj%*nuLJ zxwTPmf=a4QOSrkN|1j78>{y}PKu_R8BID?{cIB@Rlq@+Cq#Xs)(O|>hvZnLZ47VDM zH};F9XTN0G7LDhNZs}@0Y4E@KulgO~Mc|SC4DC^_*~!=kuWB`xn!gdlbh34p{mFNx zt~s5>kH>A={D!i)oir-#rXf6bCdHlQbxLqjCirXL5vE@0y=*Sn8lN&Hs!9Xn&9rOQ zrs}KLWU4sAnc`Rez2J>XD6O1eIB%3|gFHyVS}<9b!+PwGad${~CImb}@4Z|JcNyeV zu0LbEqIAc6UZ!zDMr$cbt!ZDd@gU=Z&ID3i7(?1SzUa)zIE!p@mD0%N2tFWJI6a;@ z`Mlb$_ABi2(DQQrP~!ZsieGD*blJjr-m&Ay|HrhA~}ka&5oFI06&gJ?If?l^U`RTMJiwM(udUe0UCs~ztM+s`4YDT2uZ zg}YX+1fnZ&E4#iDZaK6KkR?%IUyWyNIbYzrwmN_E4(JSs@=BW0{)yXdpymT(_TC#gQp5CgoSyvkuRMOsgr?3ef6C$};gqm`N~hsb zq3YyhIss|2aVvKJv6nSsB2i0)9@lZ5?XU57a#(xR&|d(cjfyOmO8C$>>n+`%Ep`_B zN;$B z2#3TD(1;sk+)}~~+hFBoRvc7autirpstq5+Nx|Bx=|B)-@6o{TwJINfJtu*j7uw#9 z21wL>P!IP4DEuXbyz-w~pi?2^inI^fs@?7gza1!Q*$igp;qX|n7cCIatadqjJD4iy z?<^}s(;_=FV;&HPaCt3!zS+ADP)v71Lk$jsbKSZTV zhO~6=$HrF74dF^YetyRVi&T8)FCZ{Lo6F(Wpl~`xRM>h$a%BTUeNP0N4(G!z|0=Il zLSC6aF4s|bA$^u)>jMNBhsD*Ma3af*#0A&%%z_#P{^nWL%fq&{(xy*9s~}vpqyCjH z9ifA@t1MSF!N@9nK>_uTq~lMUzKo4E(04f>`AB$ydPSCr<8f;&cjk_-B|9jXA$)Yb z=%}{P%Jg$4FLA*5P4wnn9&$&FT_0+uq1Gy(u!ofDB_S9YKX)|5b7U;7PBAgvNU9=U z`)w&B2cbLfnGE47vQ7L^0o2c0>#}{JM8T#HT~o1!<&@mNwfr{dNj(8=Fo9h=%CRnN z;_?YX#wtTF&7`!cj^O@2E{D+B{iyH8i5fA6J@K>;9lsl`cFeR!46zr&RT>G(Kco4MJQ{rdsN`ARW&)4`$`+|5O-j?0o1m zU6*wbA^Yigi%;Pq*<7f~?LNzUX5`x_3hklRF%5_1*vA1%=KpCaH0N@j=6hb?vP=Gc z8bQ9HuT{|6w-m4Cz$3xl8dF;>0T&|y7ovT#ZQwzOMWZkB-Mb~y&-657<8lXgGG7fk zamd8jH0wLcdmfv^+eMlIA_d%;%2(ZtzwY`uSz(P$OqM(y1+NBC#}}p9dqzrixarb< z8D20Oc&bW_{13-Y9@@DvdRq)Icc_dTK5O-_hUf110#FcQD2m$DZN;NBwc+Ko#Y2>FWoPj>jz1hsBu&U;b8;R4rn^@iD*UxyNG(mwu1{!CAL?L_f? z?;;XFIiaB*5@e00F-cJrs?4o4MT2cE%ZJSJLL1s1%8X@o?)wC6Oyrkh>^MY@)x**3 zOdYnrT;^dvQ`5ucfd?_;Sh5lDC}_0sb7EvaT~tLa1ipE@JGFWZK-G5LZ8vLZ9LH-B z&zbd8Q3~(6B^8RmqJH_c;%lgF?$0Yf2^OYJhwr6X6S~PlFEDI|m%gJj^;J&KJA-D2 zc4C(D32w{pEx*K+z4Y|{2Z_=h(8~5y3qL;DO`0bbBSE&b@G$zEs9GrHnlUb zcYr>qG8*PBksv-aXmfI!?%e;u`8@5jtFm4nO=h+K`ncM>{hR!rSH^jp)wCXWU3DTO z1%hM43CDLWO@a2$ex0xHHd2ICZe2PxX8s?#fT4VH{*}651iS%{u`czS?7kY=l@Ax>4a2m>`CY=Nk2FLksWS^0J_;K+nz6NG0l;c+Bkxmuuq?lp9Y=lL;b)6u zh0FJ+IPJ8l)BRkO_ga1~>HQP$d7X>t3rbE4qiT`;jhLo&IYFBS`iuFP`lO3ZCsIU= z)640kKhj>VP5^zZA0;rLlfkVVinq_+14d#)YW1qZcB+}I8y?fklY_{2>Md=KlsxxO zwah%-2w?rlWoAx?%B0$KlkiS<8@mkQt+Xh<>)Rgpk)TJ%ku2Izf$TnOxN4MaEc@1=h z`+`SKLxn-1Y`RIkZlN~)4gkOuvzcYRh*31oGv`Y*go^?t!S<%PGd{&cLjJ~8tlxDq z?yJ&jDh|I{5D>)9Uh72TU(M4kDoU1&lOd@AEEy~9i zK!nBOOylkoSh*X73bsnDbM-x5=d*Cj>1P3XHSr-yHzlEcDvcPTlWl(6vu^Ki>Y$Fo zD`_O^ucGOeN9{4Kt1llj+)ZTT<>tthXCkAh^nk_c`~}eLiB-0E5T51DcLc~(U0cIK zU3*=L*%;k$(~x!bA4BtxcL6fIU`7X+X5lpP;q;dWei)IkrFQY7l8+OJC?)(8^I{2` zec3V`)#J8O){QADBI-3Slc|;*A5piE{aF9ngT)^n8e}NJ`X!pC`6p*|+H#%Xh0PJt zu%Opw_cX845pPfi=dUom&j?4?-2Jkoit+_~O&$Suq@bu?Lio01nuR8j-G^IBjzVhp z&5ynx^JdgH+4Av7!vpt~z1x<`CFZXA3rW4glXY!XAAI~ob`s<)P#RIiY@=mG2?PB7pbAlVoTYwbJ|5-4I zOAgt|c~u60g^-7>Nz?iOvh=F^Ei{t*EgCCHdKv0ruU0V`=I;Bd#sJw=H9b+=4q`Av zV~sF*v~!{bPsM~z03s9y1CH^3n6NPZ0}UL@tNZvuD9^3R@l^wh zk{i%a2^GB9#;YEhhW}&N%%1G^Gfp^HtHR4VzkHGnfVwdZ+eg*-?A;EQl?0|y9wt^> z=Z>(yj+luV$f~>a!U#(=9oV9d^yBOk^JRN0tg!MDq5-Sn=*C2Q_-ZTDKW$l-evbav z>>v%SScS9Q+dJd*nV$`(SHfK4?iY0G#Vr}nQ|`9&aW=^Wp|abaZf<8ZQ-B1+RnG*- zKsL()PhnpNbxI!TVqEpJjKyvHEbMJU&tSM#v7Zzz#-!M({DGA7-14fT`d87{YwfRpqCH;(n+ji9-%_>qrGJ{mo8^SL-_fYV<7kt^YLD*vPE|HcfGHPrep!ZL{6VCez z2bQK;_`w=T?un}-n$Bz-#>k|Xfo!I8DQ2fL{xEm=e(mfXq2)gY z_M0~F)$lX?CM;^p-Jos)pwz%3P*-AFKQ(}9)0Oo@jHHiwYfA1boq9d1t#-GupF6%Q zqI&q#&?o&?%RA&xZ$#sm`B4y6Aixo-@_}a4&}BZ`iKb(@o_MWSS_NhN4RzB$lsI~fQ6vag9$l9%?}j3gI}llo|#_y>-u#qmc~c3t;=kUGFZ(hJVX$D_43#Y=!iK$?+jO z5&UE3P13s%yh;Q18}YYSxf~BrFqK5KIis-#+$|5gSUt%-1Hq1 zEbNde{8)OU9qSrxPBk{wXxE{nBfX~0fm}|D`7-Tdh~$2Yy6&lM8&$5ljZ=a3ZgB)L zh$Mftx?{*nQoj)5Ynth<#7YYlt$q8++9MxTu%h4c~{& zw>%AkxNMrc9OgYZr&eFEHKfAKAM|O<-6BrfwnxY3n{5ejP8CZ_2ut;T5Uo$g;*ekI z(hy848!S*Oz3XUuACi*sk$%^#BQMq%t=6XH^-K&r+X}v)McJIXnXL+MS-HX(a*!^z zRDY)9x))R`(sZ!WGpPa>10_wHVUuGGC4t@Yk}^&7S5T5#o7V;zK3OdCgV?xq8v|K& zg1j?+r}XA-kXEDMFuNnH>8|u5w2H0SlBc$ihi~tfaa#y2x`6W+VMS-)G1I|07j;Zc zqGsHEBnk}BRoxseX%z(9FgmdEawM;68=bU?;|=m=PtSmvsC9geESr6zur(k@tOm$> zBzMDZN?q{(Ncc`SrA~XO!TQHGQZj!eU+=EpgsehO#gBfCLUze8*N&Sov_>1mZ!(dP zwhuul<`?~6rJK}T0nblw*997@AkHtB~z@no^920q%M8f9y^SZX=0o5 zTpBB_YWNaG!F5&08UH*{wV_4`D=yEyi25$&r9=m)cf28+Zu*NZSYh+62hnUNww6&h z1{O>~%%FOvX8!jtK5K`3YyS=4J2gfD7J2gt`v|=LZa?nV0QNp>edyF(!o@7 zKnBa6F;n<|2TBD3KyT)+oX2e%(rei-1b5IU?P@UQJIUXU@B>z00&n7129(%1farxO z-j7_@J$*RJcMSxoASU6PQi7hj5%Rc-P8IosVHg(z)z*p5WJ*Kn#1|e-9PBz6N&r*T zzobrEDbZwE9NXCuzljvliMOEErpiEAhKF}bF%K{g0RAEpzNL#2Jx`bZC6ae*ZgmWA z|IC1!_PK&5m7h{-cUpnI>%tA~H-TzD>|Tx(92^*Heh(1;+%4awt&eXP0)-d$3Ke@R z{u)hZ`g->&=)1nWzYYBQ2IfxKO4r@y<~fv}F9^WVfN3f$W)_Jt9Set3r6s|syY8Lr zzWGXi3naARAb|22PB(Dz|5KN+aGs#6*4h2xiYzi4AhRFHVQ6rF_R-Y?X(@glUgJ{4 zR%t(&&sc-YZArCX{2Y;|6K!)}g{hx;De5`(RKf&b%KbnHupRF4|E~BTu-wu6(oV|X&WJx#k^v`&On2v0nI}>u z2CR}awQnUGP_1kD*wxrH z`-R4Q^ePJkPG^h)G$1K%OQS2b40kf2;b+H@itAZ|EKowhBNU6zr=nqELf28u02(oT z+B0-TF*vqP?HIq92-N=oYN3)?OT3mwgAXB6TA9uO8m-Hm)v!Xb<;t$(qyR$|anS&m zKNH|1@r17AHjzvAKyvkEA&x_XVmUd|jpvio^>Hv|g~)DKVcJ+1^I~T{nvHvH4(sfc zbX?!>Rb$7wd3gA=`@XYhsu_m91>vQf!zegJaDT>t?n1eCWcakm0AT)bM>Vl1PGjgf zSM+?XXzj+IB>0tV+CNfe)>z!eudp|ZtBn$^nd*gy#;R0E4b41_8^2&FHz1GB-aL^pdDS3!{u1r$b)5La*mTV2sI#AdSAYMUq*d>{jRaDPYwnF#J16x3Y(>_0$u z(iMfsaojebZe5$4Pkg$1`-BQO)}i7e7in)iE?9m~sLS}XZODOS5oxz8h7HU5Miz)TG9p6>Kgg;I*qb({VSm8aHy!$p zdU{l-x-OkICVT-6Fvp8pUC-8g##W!GS%>33F zeYJSUPBn0r<}0iXfSIOh+rfomfKQ}=2HrB~Q?8#^;x2_y@SbP3aH_QJDH%5(G7mV46@TaDYQEt%pOA``Rsx;cZh z1j&@}4^C$u&{ygVm^JKHZg-e^xnS)gx7-c)W$pURtGl{-E)O4H#CN~@a>ALJ!8Q5o8Vu{Yv^IfuGzSx^HvxV1>`k^W{g8o zV{?t0Bg`Dc$jAYbd``zD+hkf(td9?&LfgmD#|c07gFkhS29PQxKrrAu_hJTot(DEB zFqD=N)YVlE0+~v0Me1AWm4&huN-@*+Lzwha!oPoZvms@Ao=cwq{%rkprM~8r#$uno z@lu&|g6N$+ibeZwCN&h8u##8nJ_H;#%8x<{B#3{FW zV{_sPccg(%c5y^c^2ZOeN(uKZYhs(pIP4P@_WoKJHINQ$hbTc5fpjd0=4(XubSqFN zSel6ZVO{*FT&PI8Qk9vCpSB>fOqLDU?e>*PTg&A4f@M3kZp?0~1#BAbc3<{3U4HyL zWc5(+A;uM-d-;ial_g!&qbfBDmk1P0`)+ye_*kUkO;s$@kij6Yj4jcNTUOutpX`c& zFIOCx;Ej0tO4|SRZfl-86T5aZxsa+95e(t>6AYK6GFYA`69Tnli(ez|buk6ljZSR1 z6QZn5dPa{-rB5t}-&X(MPM|us&fT1BY`9IDUX8b9|^=7C3ghaF6UxtJl#U z^eMZxxnsB^58ozUxk|G<{;zLjWyEYhCi0P;Dt8p^Dj4Doly0hV9{hJLh|_2EPNrnTtCY zRr0$UGLy;mS4+l=DD@=5CY6=EY@fsrl8XMM^T*v`1WqPBU476d0Fs2IY%Zz7UF^H2 zAFV#Pz|2{)0k{|tS)B0NX3~OkGb>r_L{3;F?_U2Y1_m_Dh{W-i7`fbb0)9%c!V++;r{HT>E|rAm4qU#nv8`)wKCp4klEq9ws+OnP|Vz zRPH(L;;;XXq_BD98asPc+Lc zR*2JQRLKgBjtxFA&lz#Loc8Y8j@j<97THh#ZT%(oh3ibod0Y*muYovSb1YAkB_idu zk^b8?9E??0zgDSTfj>6(JiW1?!ueS6_k+~7IFszMNxlPyi{JitmtiMN{luuDo&OAAbY4Q9N+E17a>11YsHiQD0UUDIot!D+>$o%JQL8T zzdpspU1Z-9{S`B4)8O#!vYATtiKscRb$HfS6RH-?Z2o7@bPg_r-KYv7rMYlzvjyJ~ ztZCi7-_(buIMeXb*)*4<RX;ko{HY5JEVPD>&M$H5^0*MyK2$13ja9r!Tm4_EZi` z`|xhrxL+NCx8TEZ%&n_vROU71xiV^^_38L6V}(*nz65KG-pU(nv*hP3p*8nPM-CBy zzXx57%c1m^_OSErOsd}9MXo2uYMTWPvGDcnV(R*ID3rjOLmgko-yacnD13IW zrq=(c)b+u_FMgYM#w=3lD&aTxOP9V$|36v)yAff^DkB@MFMRweN&A0_bp3yM+|(8e zg${pBcHj82{w@3M?Yrz$xbUaGk3TT9V>Le&7UfaX7g!p`L6}J$Xath`=Vd*?HZ^vf-qWXq)+}c(R1_5Lc)7Kr{K51 zqtGgsWFXnT->^E~uh1mxUjBD#4T+R*zq$tNRhNOD@f3bdF8qV*=pa54jbo8TA$N^0 zk1t6->sIGiLz`B%5PBaNLZHJf>I3dC@!$tvifr#P5pn+=vQzOX>{D5-Nd=9$pooz_ z9ixPDhVs3FZR-Wt^IbVUBW%8wxBId#Q2%6N+CU0$yOw)Ho|>;CqZzJ1Tcwzk7y?74u#Z>+{3xkqzf4tZr`jd2D1^4svBK^uqWh<0S z3ez1Wqn^Wv-A~tFuYG6SrMzJNOm)aRDZt5@f$n`yD?7Eb(x!ds(y`4+GQamWmXu@x zaoZQ%Hexv*ne~gl@~-b_j+4msa}DHBU3L_VzS=_$VtBB$;{`Zr$WjWrR9=wx{#rg! z(xYEwKf>M_4?YBez;i#OrGhMZ5;?Y^SG%tN{K%kD&imWGhTP`yy5#NP*E+QNqN=~I zfDa)Q`!{X#7j4Rm^=H8^`b#q@v*TV|qL-httNsj%iRrTv`oVHuROop5TjiiR>b0h- z@A{T#4fmIMX@hp;6R2BW4jVW1JH6t?$=hlA>hIY;+$&6Ti7~Nx9416@g^KG`e~H_A z2wp|a0P0G9p0H;XWyyb|gd@M~?(elc#l5r;)!@>a=)^6DUYLwr-v`hYGDdEy%;);h zd*(83-?@IEi7NzUd<)BRzh$y27VVx^nXOCF{Yn$_;wXpXoY+H?`=l zUlqN=xLkAhcri_(fcvdLkNbC<(ZEm z%`QD(r`E$luOx6kr|Ym+EvBL3HXUL88m21uaB9$$H-`oNTsJ(6!8nvbcg^N({H!)L zY%B89%}>K3%Tcl-?)<$}u#w{K?f;9auMCUwi@ts7A%sytK&hbwX+fl8=nmXM!LK1{O-N~`#g6(&X<|HhreY)67d(_{aRsmyZSkMW}opYgdj7^0%0vbZMYGe`#Llw_@xQEQX3wkPIO z=89iF@v{4wEbfs9@(e|O!Kq5(ym3xy3X(BTcNaBL!4h~3QhJCe2C#9!GK-d z2Zw*TElO#QX@-kZx-SB#ATV-b4j=AWbIbxsb|+qA#WHh)hYr?s9AlVApn|+LKpWg59Pg)KPi;1BO{INfG%Xh5e-xsgE zIjyU-)&J$mHo%RAgaS&mP&}ZgL0NwLT`9;^g(V3!=cHeQV~RqNk3bQfAt}2wGZW!8 zuU)G-iW-xW@58Sz!j>ft%H4MCOTwdlvE>m3@~vj1csepl^!6xSZfIva!lB7>OR;ZNm#^MzMN-y z@lcI6a>KpysK_o*MKJEeD5zie+ylbjKS_S<5%XNmF4U)7{pdl1V?zwzoLZ`x(!FE{ ztv;PNEN$Zo6A4h~iHZGg`9y2=n<`^7;UkIi?=&jhO&ZpmWON{Ot6fLVozl z(+%9S_REnp%t!8ypG_x{3e?5P+0UaM=?*#Vjx>yRqt0_Ab*TTr-%HMFmsbhKfl$(4 zKY=Wnq!zzH$K{eSUiwBa8Mj^vIYOtyq%Bq3C4#v8oA&!J^YWv9A_1W;p}{NDA(8Sj zj&ZoXZgbO6Jh~Klq52QYyRu--aDo8%KuazSy7V|eMS0vrS}4>-q2mMdQ&qmWoP~HW zp>$HC9!VI6%UYfk2ui|n#U;H`%K@RR6B3L7198kn8-C*Nq3b^}UmspyUA4cx(r7>( z6D(z-7u}^B>6SWZi6kQ&1f$+qFgd`u+BCct#>EnKNgpPeSQaS4ZpBhTsMowbpXVvyNa@~;c2DZh6@xl~B|j!Jphn4K#XOKT9Foig|@M<-?@?F1Zji{D*0R1VhDIIw@n4S#{fP}@r zpFEFdDC;vs3=X=}4HZG*T7uDg71Ys8kT>SWM!k2(I_vb2iS28` ziJWGkrMq~j5fkk;VIkx8(4q3O)^%hTDv%j7nXMg<#v)#e95*d91|0*-LmObpSHDAT^7!{JZoh(i z4O76!_S*k_ zeSUnLp+qTErk}cUH0S(y)RU^RnC{nqTl4s1QmShJp0+U4)sB_x_fVkwsH2kJ_HeQG zC|t`}G1h#v@KSpm_of#Fe>$g~uQ}*bjYZ2KB?01=q3}ed=mIS0M+u{8`Y^EBY_*Y) z*B%Phk{9Z-iFzMoqx#voFE~jjQ!`kfzlk@3f$2aIz-FFzG#5axfopF}r= z2gPa6&qW?VThk9WeoKN_^?!i+(etl8? zo3y7kMxWO3c{(wa-)rd2DOe&71Wk80&1li!HcxS@{hcg1?Qi{icYnqDIS-5(48abu ze16lK`M!Z?RHL8o6gCLZC2q4wiWoRI1K=X#xEXsPdAV&*uKTqAfxY(MhR?PN}*ESHU9luht zlX6-vKfFKkezX~{`zK&>H~)_F#h)*AjUsMHqYC4td22;a>%g5wla6+I>=m&CpTmw} zPwNtRU{yo?l-S%C6)b>q0{SaPl3BO<}iZoeWNF&YhBitZSe1;i<55bHALt*^qlBzdc)Mg+vyp<3NrdwXL%fix| zc-oH|0+r9eT2Ae-+B8v%msBYM%in0(ZS1xI@3z`nVS?q7zRJz*?~ggp@vpb(%(eF& z{7Wu;$}A5+qo2-ryv^9tyAMmFsz476nqq2eGl-F*g;<^&RqndIoOj09+~ zBnGs+w>ho{1^R)dZHeAhMp=4Sjn{7g;KvUZ#gcc<3wB+b%jX%DAV|!$sPqA1e=EC1 zrOYsel=#mRO}Z%XaGn0(CDj83h52HWb4|Iz6V5S0Q!OpKUeE}##fxt_^dmvYw=v=V zWF#<5$o|Dj55um5zw)0b>4~j>I ztnhux(FqziTWYfG`iG~y`^p%~5g-W=WFeTRwwla)pL&rz0h?!RX-k=bzo#tzGYMWM zJA2{VuMtqwMLsivS=`9Y$gx7cGl8H`*oO*#6aV-E@!m=n9C9CWgNIJmR3?eyhEFmT za{lf**R>IzWX8V6q}U-!dbRCds~3R;KuR<#f zEVLgt&u{8=7+5bNyuHt4Dm3mDahWp}et4J^KVtlznwpyV@1y;iisAblQYyk-d-U=N zQ-Hfn_XFsyoQSm=)^p+^_o`kobEYrzoq_&+md?`ZGnIN9{5Z*h?nV`C(Iey-;83&_ z{b(+zns_u=282sHtp6q#iO#_*Vu48)WA;JGgTCAbJMnK~`5Q1~fCEBDmE_*z$p(9k zx#Ql?)e}dAIhRhDbZa64dP?(bHA-tb=X2<#n?Ql)#lE>Ts$Yf)t+j3(c-98bxLDAs2|x@u1^bvkgy=QRo?KDU1YWj@om~r2`~3aHF^nBqGzcOj zz$DQsMnSfvgK>xD-;trDwv1qMMUEZJKi}vq<1xRVtFE>*ZB8BrHRPY@N;X$3LT^XR zOriWVE)!x`YvKMEduV`%rzgAax4e#yd-i{|h_7MpJHEMGw_`7@sjVG;8L{&>DcS$J zll-UYCx?k7fCwv9R%J^NLa6!PA8v13#${Srh7Xh5+uBZ?-`lxX8@U*zz3CR%%*Iz3 ziHf{83d_cTz<@9f{oE;oMqE>008OL>wh1bVbH~HP2)IHgMfSL6d$iVAXc@LW3v&n7 z)s*!R+lSA{kM`1P64j$z`;BA)VgPV>$+g1SY|u$%wkFy}xW7F#6lItgc6sJkjnr=U zhl(pKtFM^NEbj~C>Xbn+dkTJEm^=ZYoon9X= z{sUs!dzC7-&+cA4>kHBNeDz&W_;9K98=NOUeclhhE$n*3MrN4WP!1vb==dD(I@h5U z167A4FzxmxzLwV>GegkW0+#7Y2cbfc9z1dN9!JS$bcMbegTO-$zwaP@!q z7a|E_9!g^9BQE>EFYuiw*B)8Fyq)_z8VnXDsUnR0VkvQ}0hw~TKwH;9prOmv#ndtk zy*U4D>6cV#*GdTFMUGPufzbhQwqjjD>AlXrI;Xb5yU<^JvPu4p&S|VGBEw%@nE8ge zsp9-E_flTJ{hRx0V59IYDj=-iuJ}YCj78ab9gp`g7p>fZJhns+S^sXf`R~HSB}NF5 z8#9_Ni?|KBlI;5S%ZJCn&5lPu8IsJb;M+lcBKSk9Q6IMj6nkZ{c4zD5;VM;*Pz4`9 zR})ix4{PdM>fxTq!7kTTU73HWB9It>GV$YJsW`ppu3yfs5`|graEp7 zz+8BZOLzLS>jitF+}AkKsDKgzf@0F5rZSWp$5(mp6_}@KzAeQm%!84ilb-^pV;s(x>s~$h z`rJ?ppHQUCJT23^=8L5fPtWFji#Zv7%YlXGd#-FYQl4Cco+SNhj1m44uaD}g+E2RY z@_tj{;pq7jC4*2-_Qo!oO7Q6SzgJQocAL7I6=lat#Ov$MB5z|uGn5P8#knp%&+dJ? zOR~h9B2fS87X@6NkhA@I&C%q}4Q;o!`1EnV@f011?mO)4xtbh1L<{hYvVB_k@q7_-odxyyN}zUfuz0D&8BtN$wJ0z$8N8C6wy$}?Bjh*+lIH;*)atO_#qVJeHsN9zU?}A{D8sI z;fg$8ecyReVep*5K%(XLpe>EV$nRp_TD4hBbbvG0{&4v^vK)JaFWfI)Z`ce*ft2Ag z=4;AD+URrX@pQC%p_taw>V|Ua7h6G>h69amGF%^jp)FFJlT6D^k24>xPE5EWL@uXi zXP!WY706jMhuEV~(0r@p1VOiM*=G*2I9DoSB0^cfVzgJ+EE_xA74{LS zpPG@z(6A)0U{s%uhWsNg64SBI%Ww8`ZNoi@Ctuh{ z1YBMLf65~4KAePzY)qQ(!4TuxNV=<2iHgleuaZvXHW}vX<>))sC~t zSc4`fEiGk`Y32+|37aqq-OHfPia0HKO*KYNmBCY{y7Kpk{NGqIl7635eN)hzqY0qpM~2kx6wf!N96GIjtc~M(_Wl`x+N6=VT7E>qhva#$yEvY> zvQNYh{Hub$t(OAWetkDMtZu0JXG-RNtN{Os_K+(DP0_2X3A%>K~9 z;pgP+hHnrM8rTbQkYhwQ{X2Q`bNuFqXDE zjQp!Kg1)BBz20O#C()wOdq3^I?^DiAzQTF@lic3f8DUWe?vbK1HZl@v##=L=(5()usnid0|2@t$#PhfV zrr@W!ixQ8p3TBa$U@sfKnG`htcyR6spU2Hj^F9FkE0>NLj^n(s;jZCk!*gZN+0xv! ziqd0OjUU>?*(xt?hY6Kqsb6@WrpqP7=oDELjT`9&E&DJ5vby+<-u+A0&EVzXdc*fH-s2-{XB*zv%?VDxbcBqcP2mZN4b749@1A#2pl48?@-=Dp;k#f(!&)MA1` zrVt-G>S~2PM!lD+^Q17BmYG;^m`0Q@2cVWTozJ*3BH@zFgUPBS4}qo2!Q>Kkmw%bn z(bqVCHxWns`8gK~ih70YMk%k}?0tlBheT#zO?bgKhkFXN`Z!Z%zN!E)p6|M~;!=^bDyq6^8Dj zD~}QGD#K8uIZ9HujM7>p7(&)Y6{p7uBEJOf^V7gLVkLQwJ}DRWH{V=Q>MeD8AXlk% z3b+|tR#}bbTE3(zOca$+tJD$?ytcYoC__FgNPfTi6sWd;j{=S(0+IkE4hTX0d;W7u zL@lHAyI8$t(4uyty1uc5ceVyC`DN+iO8b8rkwn9R(ZEuZeNMrSWcUh-mQ~2HIRD-~ z`34MCCbIN1VD$CL6D>04*XHq3_SPb@lZo~_7z}Yoc+wqb1~mHreSul%#INs|T4%K1 zrpeCr4+4gsdF@;N{>0S(Eano$>NqG#4aHZtAs1@I-fBJ@^*`-Q2)do8r$61_KrzMz z-yAER#r9$pX@33i%g*_w_5}reIp>G?a8&r?dIwM!X#w*V9`8G znAW+<3@IA3o=Pz8kZ+V@NPb38UOA4SK_lh&RC~VV{8B%?axX9)i#AId;(}lqrMbPO z|06h~7A#a$U9dB8CGo8DX-~dQgCl9=g)GR_pij3>G&S1{)2!M(q?D$py7EP+OI^L= zzz2)fA5%9f7#@jWq|r#(S9ZREOrXibUPo+i_Dx; z{|845eN00buvfViKqsJPn0w#PE{HfK%(a2XzafS zE)kduO1$EjnqO?Gp(Gf@itXQ}o3PVh@pB??eOe7~MXNA;sn5JP|EH8aPkdPnlj&YWd^tFKKnZOpw5chblAE5U;@qu=jthb}Iu)Y96 zt&#Q5bAtb&K(de1KGjbE+9csh;k&s~eYNSZV@-@g4yaVpWrZ{yjQ)7RrLr}^Lh0{` zNPe!6zO63|eBR$Gh!Wd|`tvD#$UE0YDme0-m#$Tb;3uoz?e$?cUlS0C0F+nep?KmK z7xyk9AP#;K%gvd^J8paZsCH&Qd1&(EIeN7QR{h&ll zu#40*MKqT+fjJ$2$#1G`YkUZ7%~JNAxyL^?U-A|u9n}FRM1z2Np2>odmZtd!pKfSk zxw(@Bqx|M51}X7BffU&?bR^GnD2eysc>BqVNi8XcZUJ}7j(kX+3!3O;MwF;%Z+dhn z(y>D4-qzgppEwP)09Ij@?Y9*p;A&z$j{Mf$N}b6w>tM^+kM>>(0!u^4su;alrzfV9 z-Dv0wSpAmb0Aqx4Cz395n6eSoK7?@>m$trg0JsuK7TJKgE&@*eG*T+asK66UvlxBf zkAm?1gZ-5X3JKV^-AoX12v=dXBd#)$1juM0lYo0C^XVIO?%B6dRahX1@GML0=`H26 zq7Hu^=Sp=Ad9Jl(NNC97Vp`zo*gxBnd`Zp$?`L!{8|TA+dwU*616=5zK0R4KYSz#Q zWJWwO3*fnHx4{(2(o)ST9#rfribFuiJ2$UpM zQgo-Ym1THDvDxd>I;6OPp91`lI=0S5hoBq^VNKAwyjru%#~?Be25c4jBK8y88y1~#Y_>s9{nL?e0NT> zGK#-)zd&EnJ+H&22qD+^xSn>d5zu>{#q?F02D-ghw(9e57kQz$sGH^C{-ghYyZ}LN zyXF0=L60*A#t-99F7LcHYeczE2QMa(444%PD407Mc$-~)Fu5WU627)1koZ20vNMLF zpFvNgD*doQ;X0sE7NGt#+h6g*lYW#!tKmc0FI3=l-J)Z|qAwHYqQ-mmlu4gfWAqZ0 zs<=}brClAr;7eFAmNJH||NZv%T!OMK`lF$7Wfa)X@0TZoj1i)KWYhBfTOMrtPAYc` zX*l1;cWCuuqe5Q*4M3NgtwELR$?pohVmB7VASKm|8T}Etb#Z~d`Xk{Za$MoDSx^Al`T9zm0SFRcrL z$R|;!8&*5h4Q-x>9UJB#$X#YB^bYd~e!>LC4VK^=@$3eTdvmoSDS{uAh#-|^Wxi(< z16v3aFkwOytUJiZb=4lx+1@aK&ztSHGJm@93@G@%T^rT5Wuo1*>&z(>Thr=M%`_TV zBYfS{m_2iL;jXbrv;6K<^3Z_}^~z)XP5e$GsC*rFC=U7kWk6asyB^gB_dWf52JqIq z9(SwAwSQI54Y>ltI9bu1I~{E?Vr0$=iUOJyOMhlSF# zQSvnwjC){aCm~RGlVO0D{mt+&8APMZqjaZ??(yvYvcc%A&}4;I6%8g14FgC z{ge&}`I2=J`gnKt3=3%72=#|&UT}6@U&fk&Lx?&9ZnaDXQFnv5tX|c$&1PRzncOdK zqcN|{`s}7Wp8oV4spijPcQ$J9L-gz(wpj*0zb>sJ*Z1p9tI1LhNrwlYV+3QY~-n+H9@bkwV!s4_A~kD+Z?=fIo(-2gGO2{T&0;86uPrLC2VX5OA=u? zN|IPbY$m)fUdC$;#FJU*S;ZwPM7$z5A5L#zWbO8w8*;1iLS*&`ewKRgzFOhjl{9EGH`T^Ur&rST+ zWGKsXHGI8k;9t^h+EaN@?t+mdbS`Wt*N*S+j5nU9edYV2y_3vSDX3t%rCy<8d&}%~DEN%b)67F+S(t+8EZ@02GukJb59tif3%M_}$6gf5q}%@qk(Mv3>K? zL(}kpHG`$8FFkp~D0(3WOitaC9{iI1Xa$KNr+;f+kwWEC+o2NiDw8RM(XJLl zW>wWQ2M4C9Slp>Skg95G`%b%G-5FxR5A+FlCbVF3tBv~kQ3~ryxgrhJGTxZ4@8v#T z-W?>2<+7jw|2k)lIY%Gmh_NLD@0mpdGaq(!W>Yx~O##}vny%I=Lu;&Agl&>>wcu{} zZ0g2-$QnA`#M?VIX8!wZqCnq1;cJZ50JB9;eCzm{X?0U5cJ9H$zO|U=`()j^TNnYpv<3HV_ zX`yPtZ{O)x8+H`M7KF}!m-%f?lO5F=lx!S-7qnAiR(4u655|6Xx09fwd|W~!>I@m> zRrJ4T-S)6u6)nt{i0?Zq`^2y|`%b7klpG%|1WX#fjcIA~Q@=88B*XvGx5comWj9>m+p@9sldi!}&T(MOoPrq;IG= zN+ZlKE3@5eCBg|SSLxb$trh_QCvhm5ttL(Q@yy=;#Al`9(e?DC3=J~`G}^V-`>_mT z>$6hFiJ117-_EwDQR%@>O_z7C<2#2Z9{}L9wV^wr{C%#!m9nCI=0!E9VN(J16Z_Z~ z9GwRz$QfSb#2IU_OYfp}v_g41yhdX3{T|g{&Az&93#p0y6C^GifL^%87;|C@1RH$iXIRNbz zXkrtf#%I^1y?#+D3WS8lya$dhq8_hXtvL-n5u{~9DZGLlOvy~|_LK0daDqC#hNl(( zd>QD!&HmwnV0Bnw>-%&2J__=)HQu6V_fU1F<1kS7yjM)c;>`Aay>sVB23*1+Dzfah z3=gyQyZo7)=dm3XaGhtk{H0vsU|j4aL(wKvNr!7UtHoti5%yO}(PxLi)1Jt6(wJ-I zEVGfcUiGiG0V*$+tPh(XF89u)pGY)a7j<)^wM|vU2NxcJ)WwD zPkdW=d?Od@^sq_Ay7BO$9ijeX`=GI{_3P0QmV+GE#FMs;<#f^gbdOPFRVca4IU^Yv zpL4B{U|xYZkdAa6QONd8)%O44Ry@5RgC3eF^MW;Ie)2`Oz|`1Q^i%Th2jR5xbqhk- z2h6HY!FbHlhhd8as=)@xCx|ZCzfL#P{tM;3i8enINFPSJ+v_V?iTW*Z$z+P!Knc%3`|y;dIR-h zcUMJZ)$Kc(2}>=l411p{4s;v3MSF}+k0}8A7c`8d3O>{`_iNVhpwH!aJ6d-sc_j8P zW;7*O#S}+R@5KG!#2-JB`y@W>=7`O;?zIK`-IP3PMgbu^aWa=g!9Kkre>zT&(EuP% zv#8lNRDpt~(tKpt#X@U#MC!tVflt%~(|~t&c=sJtJ25Qej)U za(Xh-!OF?@$YwLLYkxY#h$c2Tjx2qe&W#~oH$Um%?LikOV7}zJ!K(7E`1<%%6bG!| z4A|OToWIMfq>Upl@-uR@S-z1q@#{Xr@k6k=pm36<8<_JeRhR`%oR@r&sE~=A>Xwz&Adzt8K(xO}zy~ zw@t`({cg{_MsD`*Z>N1`d`4Xkr-yqIE%~XNfR&JLVv&o_WGeZwz?KW5u!YiHq_Rwd zpFkD_$5rTXh;QN0CKY&w7L^ybbvh#v+jkfF$;#lR1}TiIBspdD*PU*!G!(#)+BcsjEB+iaJT3z z?CjK|6LloeigLKPJJO=fgGPp3)Op~&5+IbVbf*P?N>4EOdZ;#lH!XO&v2e-Vcm+e< z_E7u#6succ;w{Uw;}c(fHVI65F6IcR?AK1ABnAO)Z5Cs>=N~U)Jy4ZH*OC z3FXsCf-)@8V3=d2dmNA04^*u`I? zjcF#jZ6&G<&vU%jlk6w}^@X#!UZd01skyt~inl)ZG2S^m;omzh{<<5S{NM7$;srlt zW@y)OIqMXu@D1 z_4c#Pfwlq}%#SwSo~C-H)vOV{x>EqCwIgu;-7Jbsfyyu=ZnGVlw?}Of&}K9_b27xM zSS-62pP%3~HcYl;Q3oC&5}Yft-d-jPh)3V;UIy%paB7;|RSO)@o3tKe7z91!co%~M zH)P+fF1P%P6PP&bH3|4Py%==*$-TFrd3yr>xRpp{ZQ}Ppx8L{JzCBSg9z9=%&zaNr z;C4Ikcsy?se0w*LCwfBkl2&~Y3lQ9)&UMPAs_R$&5?2)=YAhP1qLh6yg((OSpYTb3j@JmBSY-6v9ws2ZM)DBl z4idi5rybC<;0YKK4JI?;gB1<7qEZ^sh@M>O2mpSpikq4MyI3VBQ}9p3dW4Ig-?B%hKXno# zWA5jTTKZ=jBJv?%!ptL-+8F|buRM+BUMt-F?k-v8%BaL&Cq2oJIDPdEa6Y)ZZwfx!Dr*V| z;y@FTY%H9s)N>`vK6$WDOYKk#!;hX@NHc~U-W{+X!V^N9j<*jsYE(j<*AiZ$YKAV~ z`sIlTO)Ti3NJ7VjpU-i@uO)$3NkbIaOm$D=GARrdw{mnCTG4k4Y~(26Sk}Ao@S_8r z;8S8DB}Ebc+0MIS?*-*Y*Tpss5T#93ku=TSRh;UIm-+fK*{G(w|IA)#%QmXKb2Q{? zyZTYSI_j@eaDM&D*!73&D;TWn_>(iG-OJpSi(zdcJ>pE^!f+j9-=fCGMwBg4*ZZ$c zH(T4rgqTG1H&a?DEkrI={s)(V{%5wKV`9D>GU%WH=U)_=itX5LDS+s@vU7G8%qXAq zkW6J%o+_9a+#1Wmg*)a`u!{zC4tE%>kg6+_sqkYQU9^#Uqd~VC`c6};zAcXcKMXWUw(3%AJP-XJ2YcpT5kR9oR2BJ_ zA*`>VQlQ#{G37^}z`*iy1@%v+{s$`^w~dRPl>8p6%UpZ$@ttHQNw157S~@yVd4k^* zTPypt^B@q_9PzajoK&Zuhg>Mj+|C~ig?K_q8XZTf4LBpv<+P>r*sIk*n7*l48?EWN&qS|;Q znchs&p4MEc9g%efd9J@5DJOlT3Q%;JvMtrdQ;!4>m1oIUOiw%emaNdx!fOALjDa%x z*v=^daXx1zjovDMUxYaAubCM>l!>laxGYO0;W=?U@3L}H`qMYPVeTDt zz=PfavoJ=mM_7_Pn@3ijVYHD?pBX?))>SfUm#ZqHXe`W9p|6^}qJcgmjMzeKR3kUt z#G}_L_2lSA3zzBuOoi8^M%oo|W#UK_+o^)G=5H5^Js$LtT|OLhK9iGe6Ee8t zs_C?Cg_y|>3;N4`mj1HUH?qh#3=9*V)Aw9;QsU4Mq9sdD5f#;t7{;UCmun&zQ)G5D+Keo0m7`1uz z6;22$5GM!j%Eo^ZyORtU3^@&pV+ zO&C^@{AOmw8J@zoy$L3M>%$e**Mm6~iajgMJMmgC<3mh-Tl1dvmwnd-(<`NAjY+E- z#3X-FObA@>iP-jFGMjhpSAvnl&;c~@nYy^0*Y@`^B_+r;SqkE+R{e?^^BI@KC)%$m zl&6Sx3Pp#wU%X6~3gFsA@dYY^pR}HEaSRYU)&8U+dWoh#Sg(O=7UyXsU+kwN=G@SD zQE6Pokfb{c=?6m?`sNnZ#m%e2Uh;-2)5Y&ARb%oY_TO-&JJ3JGz!Z`B?w8+I6WFr5kq^@C)m(RLw zk~?nxJ!M2fyT#c{^Y*VUZ(~5l)byrReHeG8t({g12_emH5Y$LJ)abIf3SjNIX%QvI0wFQI6%}EN>`K#`2Mn5Rq;)Apcu#{|FsTF#p$rXf;t zEll0V7)cVbb&}WE_{TXgfaxVM_fctatsi29^Rl}A+g*Jgdri&QtF)_4vjjf5r0+L= zRho1?7qX#mmr5B#x}3eEX=zGsrjvN@#z38;<@|qoP7}jpS!< zls`4IELA*L$7gUyr}4-B6N9Ft6FE(gga9V0r31hO!~ra1xW-EMF*h~9A7h0B`%Lrk zN9>#INw?M4*&vC7Sy7)6)bs#6idk*}YjWZ-knN4nE57#47OmiAJKX5#+;ra?EbDO) z1PB>)zFDllC}T}4R@npUa4D|J6`g|)S4G|TJykg|w>$iU@6Kg&{iR#CUX2j4{7Am+ ze5mjbz8O?(yD=>DnxB5WNl9SCl?1Xy67G+L#Qfc?C2WO}#3r|sn>?Ca!!mGU%(jY= zrM8-8_g7N7TrZ40Vz>hZ1#}HjRMPsVld?_2vWhV)LCQAG(MwzqbX}8{d=?{d!mj9w z@(omXf8WYo(e}~_l&Ecj^2y3fc~lYx3nbEE^oM}I>waLI8Y9CjidL7C)2s60nlt8# zx5#)OBU8Sfsw$vh!e8`vu%+%>Imp;IKgZwUFV+pE7G+!Vwj+vbhdc{WbIFx&is~uz zDK{0y@SZtYl1%uX<2_&S!F9l-^RgZXetQrcyjcnQyI&)E(&q6mtf-709>SfGK6fOY z<-L60b+e*%x`WKAXDCwX`g0L=&{4eo`AvgV(EdnOth4W0t#z*dA2J$s>g$~Z6L-Mn z-TmEaP-@%V%0RB~p6uaX=Ob&^(w|Rt6Ud)=&Fm)S#{i~YIFLQ*_`>Hb2 zts|7`f{By~6#3h3*8S2d)9xgiJ%@RSfjyHnig=WbMfN~S6emKx#`01Sfs%nG(`iw* z1I@Q;ufOtiRBZ@@6xbivN}O6ZO*(xa_tU~((U|O_0Y}*{seS(8TW8PBP*KXX=n6Fa zo7@#WEvgCFRD`!UZ6=jVDicK{dM}+g9~vbmqiODNw%-vndn)31&)%(bU!SNNFO<>+ zZl%ncsNLNXFY5MvBHnL6SoDlpym|C7lK&Ys!`a=+(f21}%-|<^!w3L?v8~2DCMhI{ zd|ou0^F$okgvbr&6_TQc350s6##&O>rYwA+XsclDvMqeJ`WO`sP70B5Z&~VBCRHkA z@QpyH#S{lU76r|rH0nmeml=l=Dv)rUo&CuO`KJ#aB8trr4mk&z3#lC zBz=QIWdXBYZ8zbE$9exlW`XM4@yjg*qnuY~e*pq)3fgD#YD##7B$n!pUtf*Xu`gCk zS5M71+1Ieuz&#zhF53qXBh!M^2KrbEs)TixBh=y}w*Suykd#VCN-hz`&_jy=c+x2a zqlPb6E@d&oGjgdvSOK3u|AP05MemgF7`&Z6Z@VPx6m#Ew-qn1ko;W$ON#EwR(xAub zjJv6ks%E*VkfX+!mT}Q>lVhPH*_>~5Qg0@dhZUzpY zkkyE`2Hl+1KOX%?b{)N26%^GOqxLRdxtduGTz5CQT6Ct$a;?dEpE_WCSHc|%iV7@*n4HR4w2gZPEU(2{wAjl89urcm6dHy$VTVi&S#sv#wtom z8()+AY0s_0Cxr&673*)ls^tvhEa}|7EG8<3UfD2^;oiUD}AbvNC0-$*#?8TidhC z<=t__?R9_}2ToCekXVhkm(=B+QHD=2kCfLQ7Y{`p6!L~OIdw#= zPOe4zR7=a{Ow+?YgSX~9vqe~+woIu$_Ub%t)dyc?1vec1biQ9|EDsIdpy@jK69+t8 zBOcpKu4+~@j(yhmrdDYP0if<`0e*+NiC{$R)7)fM(0Udp0=M>PdG#^Fi41W`C?S>%a1O8y}_67tcmVNU(vfUCxY0?VlxC^ zDn65<1=jve6h=VN04@=c4tJ!Azx1?QxDdrFcp3=je6oI<;=xi@$xbX zornG84P-O5YJU(w^VoCSfVB8#2N-`a6s!4^r@%ClD#wa9P^P5xOA7tfpI-!Mt2ltT z0ve>})Q7L;iG$hL*c`725aNgd{B|_3wU$+5Q{ebqoMc0yp?{AW=U)7C&{~tLmhuMx}6oSiR#?v=Aad;Aj15~@w!ZfPK z(stS6jG90AWN3K(?K`CQcR)z8$Ci+|%feqSUr&hLPkXa-;NHE5-*$D)AH#ER!o8WQ z_qM3+dmk?rMBq1*&db(NAn2mD)8sm%>k4^!KOL22{J8hUdGE1<^KqsF!W>+8`%d(z zuO#?%1-|gZaz&KytF)Ng-=3AnD{HY}T?`;(eEeZwh`t5>aP#!`sBNb*t2$w{<81X| zq|58>#zcfNG~2!NjJwoI>Z9PxnsNI6{(dWKYcycqp;4cpBXp$2em&dz4aI;fNwJg` zmOCL=f4*8yQL8tpNDYNALku0A&z#p5zB2~fY>3@F12Oy)TaeKL@F~`ry1PUgL>lh*y)!?C z;ZI=psdGMcHkEwiKtYQ<{JMOplX2u;h$v@{*n^IwA}RN#YOyzeHWD6Yx&G48#&A7; zmb|zN^giiX6R%(o_}86qbbU?}c<=d2@_g#V*G-uSmB;(<<#5N-zx@7&H{JbF`Rm=) z$3o=^&+Iy`9`htc`6$76*F)_sJIiyO{MaA}7D=byN7Oklg9UXGe+CMTg=C%Q)7jZ^ zGXZCF(&=jVGlBPgHG_}8hnimDgC?a8@jnwYZ$DJw0COJnaFJ zrD=EZNpM0X4$DrdMu}Q3g^1@dtgd$v{|`@JmMK{)ryrNc`@pYVPa+a()YmtMZk*y; zqaGwV3T7M=vM-Sb%G~J_Uo}{&HHlbAVg_1nNZ)?uq@zR&-kMhvJL`XZxI3j-{#F&D zd}FJv#%BnwvdeGVgMPHKV$0xMNYO}yur!~xU+0JBcS;07JXa=LE|3}}`MtD=-iz4B z09R)$oQOFWEBqKOcWa%1Z47cpJ2Pd+TK-Xj#MH@FM(p_1iQV1S61!hgGe2E;>L$CD zF+#dEbOgoPIl0?C*LH{3608O` z$IG^ZgKUOgfT1vmA~m@7db^O z*760e8&418PlIge0VfF(wa8Yl?%Zr&Hqx9m=1HPWD>o`WcrVqo;+(7M;%=UL4_2 z{wb5D`k#xDsD9ZD*DP!7u1iZ2Rv-D;XrrdRJ;1K}nwYFLbv^v88xOGNczvqEgU$E- zfSAoUuhQs9;Yub!fT!iOb-Xh?4s`JYIODA3PjI>!2l9&k_ zOIE6 z@;RBLZj)WnBmysE#)V~>-y)2yl~b>{%5rmg&_IYpS55$N&h-E9@_o9;TTQ#kC>cj@ zb{!=7`1kHr)sFY(Sgyg2{djJBtsHy1kA;i#IBgGA=tF8#`;iPyOK-%Q=WnL!tMoc3 z>BFzJfMZdv*!!aS|e=bilCDc94~iQi_R!|l=2 z*_rt6=Jb!|lbR;~+pfTWEee4L`KLR9_xBgMl4lv>KWxhCKB5*nI){A_ylbd_a5XXE zdO^E!M~pxNfkV`PkkQcKMbPUr=u?wx8yNf%JY^=?r7D+Qs2vdbKJCid^3zSj{$x?1 zfL|c2$%!LZQmrqktS`t_LXdZ|;((NFXU=8)owD))U}*nls}TsS(&ab?G?sDk6=$wR zStFTnBK$UwDyoqpzpda+>}mU7*KrnA)sbaxaE(oo-*Nk2aZistM26)MRL-j zI3q%0U5m3;f3Nfk%^3)ce@3B0*>ddTkeT^0C>9RK+b;L_GE zl)D74PXg|?1_sx7zFMzdfA_pmc>KM>0S@Y;d1&c+*fDw9X}J>n6~#*$KX!PX`*hnQ zsvL&x_=Q(@asO<;*Usmyy8R#fwxq&@&$oZo{Qt&m&E?$w?S9qyxOd_d9%gQG-SKoV z;$-pBZ#4pe)CtibRn;X#CLYs+!N-O8|PeM|@WX}rnP;)F@{ zg|x*9pu<{w@*BOHS(<-en5rZv_YMTo1hw3AB=D5&eu2V5cN%_Zq2X!cpP_+(K}>k< zm*igHxK-+owiq2&I&k<{?#nkN=9lLm$;<~DUMHe}R3@_Y@63j9sl6a(!$i&coX2?d z%Z=qLhT0+AwWPfKhJn#9FgDUVm{1cETfFNQ)=n~%;NS||IiVRv(+#Sn(H@R~7HpL6 z@QKr(Lb{@5j%7ZD?@n45)H5kTV>{Lo7uIUxu72&^m&K!Zfrs=oPp2ExJ_C-&E|h~U zem5?h8L!Y@r3{UYjWsYNt%!k5S)PNWU@X;2Av#F}^NoCxl6Z{2iXt&kpl(OCK*X|Q zFOl4YV?EmH4+3&JO@}%hVoQMx0>pcct5=`L6B5*P(+B=DMFAe=g>ElLdbrO``{(f( zTH3PVtSrYt0us9V)~W;d4l?+&`n)b$SWGWhva6>llsN+>Xd1i5g23$1(lr3e6#`-_ zo18`nG%&%slDli$-NM^&dl3WX`~)pS#nLzw%MHsY?x&uN*5i41o1|S3%rJ6uxYAPN z3v_gvfa`pr9$H2MjHO1^DK{w7q-XWxsNvkmo@*B1LmOad7ZdzvCs^k@$Q1S_76Swa z_q0^oKv^t}*r3l#4vP(~XKH31e$-ZMySIIF9W(JeLplXq7$hlvg0P}-r72yl`koXf zNEB3-yg2;V<50rQZxI(~CYJ(HI>s7_q7s2D*6+^-;Pa?%%#gb6=9Lt~V{n%35`z^S zzly8lc?NX4na<~ChXO`!l&LlE$CDU@N-ri!hn6L(#yf9(pKsZ-RWpdRb^Co;<) zi2;EL$JdlfwwwF*rL2AFdEr%luzsQx9-+{Azr*F}d6j6-wJ?8wf1jcja7+04dh~Z( zy0Fljz(5l01I>4$i@xW;?)d!GY0!btN@4i1bc zb;YP9{cmIUyidHxx18cVw?!1kum%&__OX@OGmAfM+}CV@x_=eVjIQ3AMj>WbclR#7 z79W*Dq+5vA0%-#`uZOEDq)RDR8|*D-HgV2s7h0_Iw30D=E+^8mtkhI*k;xNNbzU&L zted$6X>gntFQYPPc#MpUo$EydV;gy`b+O#~ARc9NgT6bkBXB-^RXNt4=~+utWHIqQ zYG`Z}to6e{+Ujd)oW}{puNmb z5-IIYE%5EhlO%+J$mNMNc3X)*Hf*I6^}4c)6D9OJHCD2Izut(TdCQbtyRclKtBQoT z_<7&U(A=&i58dVh6>X-=8yMW+s!y0Il~T`_ubBeo5BR0c+s0$GheZ@Y+wU?&-+eoeP563w&R=vv+NwqSxHLTm!Z+GjB@ zYq7hVg1>ph8w=Pm@X7tZ3w3*cSZfe{8-OuXD1S@O({s-0{(InJhcD@L{fXM!F**y^ zRZ=wuZca15w_3Gm7u^w%FxdCQ!`?}AC@lHHLW5Mptvsh`_<7maq1n9R**t^fAG6cb zf3LSrIy=){=gFlpDUJKl>A1qYM)-rVydVTi;6?*$Rk1It=njf3!jZ^dm` z`lgAPqw2{O!_WZl@b_l*%8Ff@imc|3YoCa*QDCXOU;MX*>vh-?rIRYRPXjiWq_n^!jqm zoV{$gr1!(Gp{cNLr2Z7zoJmg`u59@|Cm0_mbN&U+?6^F(81?l!&Ha7?XL;yeUf;(V z2fPOPuI+;!vYqw-ei@~qmalEiUHOj z1&)Wv46wpET63I;pw=XY)KPmQ@c4)jAf-=E}fg?0AF#*e01lu|~Qd2GyEUFJ19O;;p zw15yonT5DKC~QV=!9%n`5EK^Vi7&Di`xzL;Ld69|G1o?fu3mq+ha+1wej7y=%oC1- z3hw+%uzd5}I>1;M*VCx`HJnHh9EWIV6s$OqQWDDjxVP8hAQSsWxWco3ZkLYV#@W-^ z{?9s~48FORq`Ci7vi8!UXksnWqIT%x2WbEBF;?S|*!B9-svl4K?k>|(6;*NpMexZ& z{L*B{p%Vvko9_K^ZkpP{mR>zg1SnDZ1QB_v0Y}-u3cw?A}5OVT;Sao|xBG zoVoQ_jz4hZ;ic2S;pw~{;G$?%;+7)wH9mdVGZt}sKlgC8_EN2$ZE=)BpCYcg&Q-X6 zlk^p16BVW4XYbw2y*ytibpp?K1Vlzg#^m9Tq~D==mz&I4XA{YX-*yVV>NURz>f*?@ z(owmkQWrI*BH@uqsRXHP%Z*_ggGSPY_@)b0TQ87w3_y56Q7V$4O7mL*ng0U_M2;4g zpMM^P|A9;zdAM^9ffkhVQ#QVmKAtIzY7$?!c161G)tJ&oBNOk>cb3@{vewStB3o)s zZJg(7B<7aKyAI|aZQq_weSWw`m;8pf5?g}1$s!8z!B!OVE#yGB@7=PFR+0qtL2 zK0ID&TfK*}M4#tfiAhLGcDX60mUf<4)!p>;*ki0}jn3`P1|W_rQg`Fy<2!s$O5gQH zeX`Rq+ zduC4H?gG#wv*QnDVPeR|zMHa$+P>!-N81tEyuqQkcMg@jELE%YKdGvUr!p|WDQs~X z?Cf)D8xF;Lnnw@Vkiqk?z2>MpRfwmwwYNVwJ`N~<@r@H+O0;+1AC*E@Xg3}TFBKLS zzstw-x4GDDlFw?ZtQ@`S$j{dx+xn9@yrU$N8#q{qF1n~si;#NOgF4qxaHh#W;Zb7S z2?L9Yh>(y>78VxHL<_H7nd6sz)i*FudPlV6!D&P><4y&lZSF@)W2FYn!n~rQq5=W~ zWW=4JJbHg>XZbJZqxjITPN1KbixNo+G?kIjCE-PhT2O$Z3#j?(?oq4y@cHKR=aa+3 zpoZR%PY`VApChA)-luFloCqFdnsUbbnGG()sTjn0WAPIU2u6z}g565+$SComV4#G| zxruVm% z7$9!!Env;sJRO?Y995+#0IjA{zAjInJHmGkOPOgY@ch-$5DQmEN)El2R(AIE?CeAh zPv5VD)fx34IhmO)H`SdTQe=y~U+VdnG^V6muT@wf zR0bEbYQw5m#aC&G!0Z!P=nGHE1HMz5r*-sNcf010&7ZJ?@qnU@0uxfB|NnBjWUfMi z9v&YX??2b`ohxplj6DP5#DMP?Am`lk?H#@tGt`_5B#EYC5G|1u5I+NhW3pJTxbej% z(VWikUe98|i3+=_i@yM97M$y(LZp%K)my*oK1qM&&WA==;k#DZ!XYEw?$`=eAH3jg zzfzAlupbB?k@(w3RXm>vhSrJgr(QX?Uf{ut2Dr*GQ6LD)>Fpy_V3pG*YWh(loX#m; z@?ZCu`M-G7k-T{mhzyQM%%aM^BWR+XY3{+3Sgx%cF?VFr0GdcQ&l;~BcefnCRj@gr zT;1v8HW+_&=H++y@2I0gd@dfpH|tZqwbd{^y^r-P9_-2vBL|0;Of;uhmPEfH$u|OT z+Au?CKa{mbZ@u&P5p;z|Z)|LQDTOiVC&T^V%1Qo zs@zaz|MTD9dU1i#-QCqvo7ZbxQkt}0`&{hc5dXVly**^tK(njsEI>PqityDfUqlus zsoU&3B*Dw5av@M(ms)QA?Hw#*rjY{EW1mQt$jas!=^$ca9&O?yX|J%!&QyqLBsURU z8+mO%MvIsTRET&Dlyy`U7xD^R9p}U4lIQd%Vt&`$2z8e{->pyX-Z|kgeOAWMZX?~VhV3?vYt##! z4t;{ugjS!Tx?O2|K|$(2PQ|+P@fBEH{3nv9#S_MVT2c+Jb~boAN|dlp16b%sepMlC zDk(BFX%nXs^2zBPy}!v9K<%Ga!((SmUf1+Zy~S;4S%hq%#$44roj1_stKZ`@9vKmH zYr|K=HY(@!5RFuJj~h0U7$CNBexAw;E3ww=pW(;fL>SqTJR~tLbM9=!j!W#BhV^Z| zjWg-H_h%`9dG@QmBLyy&30hjTK!BdTQ{RX$y7Q7%6k6P1i@64Qcx+PQSjYP_1TWZG zIF^{{Szso?=_WaA`s$2#TXm;&sA$}!<;2tR)3x#OpJ~0H9se#*u)8jw(cv7ESwK?9 z@{ng}Jh5`QDTI7eDcTEels+>w<+eULI(t)Ufp?n&F`%IHFjH%n=z)S5s<-&&?3wJj zuYLKRAtAla^#dPSXTn6yE6U5KYCj;plf4_dXwGlNJp2_<&GBa$` z<+U}F3SDCGR*sMn4!Umo%ECg6=Lz1=ip9J7OE6yZi)tg*ApaE0IMa=u~an zuRS1MXI}M%9gHbM-km1wOYvLjBg9%-GSEKmdIcJZq5~x+jlW`Q&Ur%?ub7Hy{IAz% zdn%)LkCB$a$rsB9)l<&7MLrZ!^MonoO?F0NVf9R}-dyX`Ps`FxtgINZ5@Y3+&wKEE z{+yMigw$U>i*I`Q9WVApz4&XnbnpwpK6Qhv7IRe4a@g}O!+$QXDKLNpvji=91$^Xt z?;1w4SR2-+4^AF=OM=z9j!cyR?&x_^hPi^cy`yjQ6uEHaT~}hK&?Po51;y4Bd*3|c z8EyRRrM9^a^$d_;CJu8zCmtEu)n%txXsF9~pIYZE!WVLK9ywK(`^uiO!KO=`27pLX zy4NF0Lt0w?H#_u_kH10_CtD>P6rFb_ZSK2+4=`$0!1P21RKhj}1Kpk|Adb?<#;Tr{ zebZtD0#bF5wM#5Yg%R=ZaB*=p{qv_WZY8m~n{M<#)-*ev27Q?^Hey+Anv0#08q~Y$ zwG>saP63JhM)vYWJ3A%$!X$Vp!+F?s`Y3<`RaI3rwPUO7*HA@H?^*>VnlM9K&q<{Fi73GY2^1aTiRvUVwf)JsGLS4(R3C+iwr|}Iuh<#a zDGBKCi#EPZPNVTyoi#7cYHQV^lGP}tG7_>Cp8wadS6s{ts zYwapDXel16T)z=gVK@f^dv%i{55pjNdnh0xxfT~{aQWrbaw8Ph&z+v7HHJ!k4S_o_{6aB$=w%R^L%fNBDIw&w{`cn@0|sMr21J}bp}i~|c4`0wkZlIomAx&7k?OLtELwBNrex;UhDL~%hP1tL?`a5|CTsrF$pQC z-Ak`flAU6P37kC8f;~=FRdI}NJ5TOhT`#7lG{75nTAH4oo*KNRjg3TVpILInQF+qf zc1I3&2E)IPF8!Mlvso;xIhJ0ExNpq=daX4TWw z&iMwF=Bm%*P4_?A(r;cnJqKdhZhu-!EG=eDRtpMWi2+M680wYJ$(QY!dSy_pM(^{%?vQ<{r_+QZ~ zh3)N_1omZSzsfIv#AXR~k#n$(KW?*LScVPXpAqgTliCWq3@C6gdggr5wedf!xqN$9 zQ8SWB4`64lpLCf0*2Z@ls&K7cvc4BU%q2}uFT8_loQ*0u!m88ju*M5(bT?OJVyxNn zB*dQ{_V%N_!-?paGkgOct%U@i+y45}1E*j+7R`bOhkhvrHvHiERr!0U&*2852NiU32aLguC@4Ne8x3 z?7|`>E>0CCE4&8-vI>jYGC%O7l&h$!3JM9)h`5bXRQ50PuJ5?|c_-+YE-7jB{x;EY z`t++>=4Yji3WEzE@e3BYBF7U z$=}S#kA0sTlRDWLlUmw91BMP-i7{^{lTva>&DW>Qg6t+crAnI}9n7ci$q zUmlKB=ghccZ6-p>60?YkQ!QhOlrFR@rPv3PUux>VZ86Igc0XRkMuj1q*L?x;DzEq9 ze3X}14g5ZhN0677SM>8xdJu%xf|<&JqefSl8YeDpwA14dNPF2f#Km>Qi0FIo9%)-l z9oUqt*o=iGoxi?^b-dgTyqa;z6+6^ss&U5)g^i8PShnCVr-qJ8itlLUXAb!yKdQ50 zJq@=zZQCo^+IMGfZW;>hYa6S!t8E1!Eh#{YJQqdXf4 zPjy}@eI%qSVo2`iMgRy?a`q7LyD4HCfx?G_xCQ9G5c;c^oURweUko?XFq_zoInA|{ zDLc7*#_>LVQv=#c_Bi%iQBoGU(r;g0PAnc(;c5^lw{BlNQ-n)_VU0! zKL$sPw*r)+C}xsI*!kh2|%| z7IrS=$_U7Zq>jL!nT6}tdkimqkq&MB?>u55e#A2PugM8CroZbBOC1rhlY$i;z+!9i zXST~-#~J5{l{dtGSQoqQzfmCrNnut+6j&84a36R!#mE=No1?1V$Gu zK4MQgMFxV>S?!Lx(D1$>^e>Jklq`%_8CGS4eWxTO?>n+-#c8S)BqPY6$3AQgW)LI_ z9;EVuA}OznH^LG1`o{0<@U^esGhR%T?JE1fZV^om9UIg60Q(R}_TPu1E>sY_HyscJ zIkYu@#${wdC_~!G010JU%(|=wh3E+EZ($ah>6o z)(AIGPp8HDQvJHlRCVTU;j!UAykp+^iRDXwjHiGm$-n3u9rYnhcz6DcxW|f8N=zq_ z@PeY-*Qbq58iWxXi!p*fzzf9&efyTU+7)QRl%l5x-E2MX?v_$e7zBO_W)l~9ps!u| z`ri4hvg=KqBb8V0#b9VGm_^tun3}2GweKK6UlChcfPm#IA#1rMpuMJ%A3v-;e$h1c zF8iVxf3(!auTs^};EkLd77sfh>kxMnN7~qxr5U89m1ZewA@=4J2T?&55N3|i7_F0+ zOw4Ikk6ljJH)4Q7Mp&h{crx{`OUphWg!y8)$HZ^*>pcq&YM_F-d~&|?q6zC@z?qyP5`X) zr&V1{$!5;@=%{_R(4eSj=x~EZRM1@u`1~PTW#nR7j^YQMa zyzOt-j`Px3$9dV}qLMlOMyu9dJE3zhEeZkby$qNZ0mumQ&X)5RUW0-r)=G-?AI#45 zS&^v#He0N3PjEfcsOfd^C1aFR;OBBJ&=DD1lhRb!4x!Whog}ZZ&>j@$VkR+1$MtHt zH{+#EgbP+x$BvIUV9CfQhSZ>r|CONY|%nqOMI zsY0g~j^#N%JhX9gVoMtadJGPdm`oL)r^knrz$dka`g+Z-rrYk+k)5fMaiW+36{b4R zljG0#Lstz=P1R3$4fx9oudPj~%UNgLWWR1ptCwC^h0>m*xByBJ3)muAF@}+PYN1p6 z*$?`J_ps?%ZN(^OLu;#W9aeT~As=75rKW2BuXe6{JgSZhGZ75TB%?h&r~jxda&Lk_ zAPNk72bSaJf7fVDM_)8~MMTZf|3wHoz_XK=KOPR1FZudzT~S*IQSCzVGQ5wyDKM&Y zVrZ3E3kx?K3|>;y<4_nzg#Q}F!;T{VI9OJI_)ty1-`Sp}y*1v9S_x@HE!)fIxfghMe@kasO3oPZY9* z+YK(av;0uud~eb4T2)IB_Zc(jt1xc(kJ#`OJTY}w{gGO+aXxHwOCuBFrADK<8U9K~ z#m9f|D5yDeMb-Y=H_o!^aOQ|shq*Ba$4y{E3A#bXL(VU$sP6h-1-QNwqfsQE7X$^d z;|)*CHCJH^!_!_yE>@vz+)ZBK7dqcO5aqpk0P*@>RIgigCZ+zJ^^@jJ*7 z-Kc`-uu17@VQ7sU93$P4m_ztP1YQkk;1HlraU-2H=42D2DaTZ1=%IL#P$fYigjYbs z&a)xiayT~bIucHn;GWfF??<4@CIR|Xd#hIg5+}t|y&oA#dtDE#iJpOq z+HZycXhCurc)E{v{_gVu(_oN_3^^MV-%*Eub>tJel>TW;ehL*wQ@9=;1i9jx$-tMDjhF3(=jiq+YePn--jv527#4c zMbxhzZ&!8fxbEea+7^8UNs~J}YB_sm6VgYPf$1<9uEhId2eaFlwQLxEQYB1};HBg# z_cJ1oID931M?{N;KdG0Ob$s^-5SpcE3pxq8MW`}H4 z)TCTd$Kt)!a26vnKzu_nfzuyJB-LCsIZ3(N*iaQ{>|#tNq9x)CU0ZOM#Dl{w=pBN6vXYN89t!8Ke*h0{~Nd+x~SY`u~E||CE-r zwzjJ9^^<83S&@a?hJW@wz6lNF;{sH7Ou zkNfMylH%gW+iFQy6JK9ZD6Tw#xgxm0O)#5}7SULVgwI?vGVy2RF(9Cz`;CzT^-ZE@ zFcjD)o(lUf7Wh(_1r~?`_pLJ_+0*y`ZccnN*#&VFSs2LR(L}q*y4l~1%pe|BSr$4p zp6@))R>c?^wqoJH6b`~+zwt9813bB?GR(P4*On}y&h6e2%Pn-gdr-pzQ`T#mctI){>BWRVrmAMSEUR4u)XTi-ai;b_LpA8Gx&^mpQOR zs-OMLJijqbkEEB!hepB?HJ`_oJ`>8Aw8me#-kdf%@cS6FG7H$8%E-{m?FgPP+EVkhb7k7&3Z4f z(XS&6(kuL9dw`(F2-<9)@sXLxFb8c+0O_gnRclN~={3mIYtSQI#Vai2FQC>Z3Nc8} z&U5nloloLm&!@%a@JVt(`^kKcx8tgwWv=)nuX?z24SuVG={b(TlNA_XPGmpn0*cWx< z3ig#u?p+Z}5J-FGx+k=z!`GG_6Qd`~>hERo>VxCa=x{(+*!#ZsHO$IP5Oa{UEH{oq zLAH?l->WQB4LSmyR1Sj|0cWI=KvtyFMcwO)8BZm1)sBXv7mkqt+V}mBJYZb5<~C-E z;YU6`W*uAA8Vf4_VI=&ftD@XMTl`+G2XhKuS{y+W4d_j)c)MQU9KWUDxn2r$ShBeM z#tiNMn1gIFYCM9#C2hgx_qPX5ey5={hFdyqRmxy#cl&u1DX zaUTU2bTcDroh7(iOWkWg*g%KhrA{g4_Wt80oqu3MJ#S>xUqRlhMegNG?a_}iKPYIb z7no3KW)B{5K|x^UwY@y_cO4OEun!2uABxMKYpQY0(xGh$;lW)-%+UmBJ$9d8pi~bn zYZJ+tHnUW*VbdeTKI?p_HatV7=3MyBPMImcOQl_>lwvrr3B!W&gh2Ao2b2Q@+5GU# zdXq7L(EMl9Y}rJH@0EgxY|=dcUIxc1QFo_Jkw$_@mF2u>gKAk_xhzzb+98xux~%N; z+HWv%@!<`L_|fJt@AV92y*Ucg?=w%TAnq9Xzhh(WrL9$@ z9VG_Mjw_d6iP{(SjxotDqKVOhfjS1lqt8Kr#Y${kGpz11_|Cuppwxv--DAj&MEDFO z99t#>aaq#Zj}e55)KW?iq<}^%qbPe99u5V+?#uu7G`FfNP;LUnq$P1CFmed@u$%>w z5I*zJ=8HlXJdT3E?5p{j&Nc74uf(ad*y?_;*roq26~LRVUX}QiRlZ4YKMsSOd0`7z zwS9Z9_Lj~_=9A)B?ml@1Yx{?HMucKtYaqX_f~&HUWOD}|D1H%){u_ArjaOfqXFbGb z&TgI?s&kK<7xB~5O5oIpGzb8BF;F3ISSnn`%7}hC7ij(z*2dR({)}1t9j8^Li^S^k zoBi9`3IOIzplV`bipr-~LPC!3{T|~0C_&8c4nD6drrjy5ui!1Ow9(4$A$Mxxa=ceN zb}yzqW9MP9E_{6d3^yWacpKC)C6#-1{CxY}WFv=#u2_b|-L&6HNxtEJ5#&`nR{ zrdP*=qG3ef=L6UT7$Y05gaO)3)>+DAr?wPjp4rAXmCqJ(p$A3&y{y}1s$sA_{!@w) zFPGk!A|1(Hd;x!cRWE(ChzPp)!fN05=>>i`gbu+nB{rUwOYzSzn-@n~b7hQZ)SY$V zCQ8eUs2nclzL=X`UhEA7tbgz4*5z$E%{^I>*m3PBiO5izLG&PjUj6=8j~q|tWEhsQ z;5Yz{@HPGk%u$9i?6FgP&k83F8z7wBIXe&ASmIxlqlKQypm+E=SbfG0`J&6K9eFcl zGYw#+)xW-z#+NtN+fg0$^V5qqp%1|0@ZNY)+uKcwiaK5r^V^*EsTHam3j!*`t+Q(^ zu68g8FdqN}CyBMSwdDQAXKFHCZFG|#V_<5;Pi_!x?ihgfpygnVcr59gCv;xa?Cvfy zPFzOG)0b-g$>wS&Gvi13lGuB7-|g;`Wnjj^vFxt>XATA{+WM8q!XbKUNE?RTT>s%y z;R#%mOp(Ttqw~YXN>Tg^-9p9LKcf3bDqHG<6CWX1tTD$peOqjk__%2DlN2kjo5K$G?|*^?2ufVW(?B2$ zZgVC31GBT|+Pan&{gjmLD=}UqG13S&QZB707QfF1#DJR#m)g)xjD1NmGcn#=?d>yA zP-^d02wcwAHu`W;uhIsHR^0HO?PrkH3E-A)sbEL}YPTQm$Y=_F8}*Fvn8$y$*5k*k zt9gKaAxl~Qc&TFAD>cY3E_E1Iy^R1SYJ+rzQX4fb=H9;QSWk_9hDs3iwUVP1pHYYu zO{-vHOd*g#(qm$X9X!WaR@Ky)l`9ScF_L&%?cMtszd(U&Axopa7gQO1tRUEvKDaIXjueXs2oEDOiDPHx5>C*sWs$Fq z$efnfjtdZT3f%Hi?RuqhYFS&iHE|!$jJCwx_)szcB3oRn{e(clh&o=V^mK2q1j&4Tpb!CuTFIul&>UuOP()6Y5VxQ2Sjc z&o&E~D}$#?jeA=68m*d|6G^nGWJv)`+vyI=QmW+HJ`|2mg==Z8UHMD?a_0a)Te~8b z>tR!fRBtZfnp`qTd3=E}A+p#IZz<vP>V4Jw7>D3+DjZ8H&B-9CEYwLUlqD3_5 zy@!F<6jEnTDhHnBotiZ99;QXRlUE!ZJQORGc(vQRaQ>g(#fMR#?qDwvjW*1gEq zSS0ila4kB^u~X)!RT|9+2rBMV+%^AFL{v?_`o_tg*}nP{6_&2}t^ab7=0E5u4(Nsq zfcVH*{^!A12S{0P4@Q2wSsIrSYmOKO1P%5d*X`Lf*^Xbrqxosu(92kzo#VT@9>0=` zhD#^OjoR4FP|BqODoDMjs;%;l1ifoTep(%CBYTw-6PuZJGi{`+tuwz5kQ0^x_(j}32Rd0%w6q5`rgJ^Om1qd4 zNbpe6F8|?@ButG7j&STurT~gPIpK6ng)B|~%mnmO%qG^}i+eK^DMdG`QdZo3DG)6q zMwlHX9uPO}Gq`K%nl>>p*-{6BcFTDU#;XUe;eGP>kJU{771^_fj}~m5=1MlV`&AjL zIr{61ATZf=m?~Soke`SyAHtP}xi^NdYJKKDH~{@VkRk&_T82rfNT<>Pte*D*HiWm; z`fB)CU?hUV@4#Tq=eT7LD%*Lo=h8w8rW|BRQ-WiH7|bgGWvY+Qe>(dPK*p!4G3i>k zWA*~3n5mRW;oS8JsBJ3-0t4=^qe}8_lh-G)Yit-O!{gb5c2|0tF z$BJj3eO};xU2Sch=eT)D+I9v3Pl;r{U0?8arGD2P(R53pX) zqoSgAo{W!=8>ELp(4>PPf0*{f#|?D97ESGMY~<5C{GM6dRQcT&T~>`tO@nI`vKXzbV8X<5K0tXrp!`=hKO2c#})^XhdY`) zHJ6c#fzyp2gW=5YAF`Ne>|5c?>>c;0_{N0)%;i|xug&TW(QDrNjvK1cP;xu!4N%P- zjC!ulM2FcMY2)|nZmKAaY46Nvy-@jTT1>JxJ~$CQVX9jxm_RvmdnZTKH`5AIA;!>k zj%U`p`$R{c@W=g*sZi8)WwE^4ZeVj!3$@_DE`R>Dt9HNV4D1yYy5W(8c769u#U`KM zPB*jLbCWr;fEL@R>}x2!Z<^w@>xH<_2l}ESjq>#KrB@Z~tT#DX<59GbcMMy)viMj2 z0vS5zH}CUZavhMVdtho*Ye?LnL zv&;AJVP$s0LYSu|fc}C=o86v&WzsFCPLW%l`{$_6-YzNsN-f-5OW?J2jw@7-$fs(G zok)TACiu7qKGK^l=E2Q4&Hr!{*1(lzUKqBQhm)SZX%*w1)4UR2CgAGD?D_jw z%j+zq>bSPpf!HwJcU}!BWBMk>vc#kA6gomVI+HARS>M+|1)7NbSaWiPZnF0uuyN!r zU)X!<4n|Sn*k$_D++lP)?b>mMggrM~$R=IEXPlUXf4fHUg)lHMEE^;XT;Dw}vl)1d zQmLYRk(Ua42S`5fdyS7=5`F`D2D<{!B%cmD)3+nU zY3(Y3N>t+YYYdPnnR}XB>{(Tq1T50^ElYkX!u0DwDx+5sl``XfJKeoS@_b5-9{*(l03cOWyk=KG^cCwBr7u4obY>?GlIKV_i5=8?XK*1((Tj7!Z{aq4ZC-Frl0)%2dF8|9fBYQ(X410aJbyj;!hAAeBTqX7K#ye!T!ekS~|d8H0!b zPu%90w!F%(;j!kk`~B}gtZ@)+B32~!Gs$Q=KrxMmvhK(UhC(PAdV<&yKZTF`c@j36 zqcydNW6zi|`xM_7eJ!gx07F@J+>1OEPl;%?BFXY0P|z1Ldqn}ToTjvW{{@+8g$)Rz zAi-4R`{~lBL#sTPhD>wcT`rMGJjeN4!S9`O9L^bZso^}qZV(7O8;5Y+zomoxw42gY ziY5+gCxXf1(<0nEUY^U5(V^LKmaG;`WG5P!pf>AueIYKgi0|{KdAI0*e%}+3k(hWI z+-!|ve4Dma{csuq&<9(8_?~V@y2QdzKo(o0Tu*U~Xdsxf}*h)dYnivjAJ)f`H8cd*(blt5eVE#yXv`}}q-V=Ivb+T5h z)E)zA*D}#HZk=@4VnS0x#w_%{M^i6nH`1$e59QfwudY_pn#s&0N6mjeCwf-tr23B- zk0i!irf>P`Td_O6^zqQELn=|hz4TJsXyN0^bZasA&gT8=aa%J)%eoTt^@p&7RB|)~ z8Zc+m`ucjGEp5PuC@hE1Kudsyo|70msOIneBN6$qIB)1a8P% zB2m*I5DN6hjK}0~=?~GH?;_UYs#@vMA7#-7K{&8yv8qsBLvHnEN8PvGr1nLcy4hE| zAsS_)V`H6H3%yh zMFl0c!{gLUlF_iVDk;USW3f^8=&-#Zhz5#YGSC~AQisw^>;yU&QOfs`mM-6Is&Czg z%n3n#yjrm zd&bian{U9yc)(>TfBo8{=hN@C`wfMs!_N}CUH3ErcRvRMuhgE-{*SG*ii)xixA+jk zfFL2IbPwI#-5}j9-Q5xb(%mUT58d4*EiGLF0@5XY-tVk+?#|qB#hQ0!{`ow6|F+|T z&tuE$w#e&qkKeYj|L>QXo9_Gl?9GQoFC?TfN^K9FDy_$3c^&}ya9?eX;6e&z7<+~IS;mZd7L;D8cxgR$mqO$j8QY4&umz+fUF&zCAn z+Nw&!qjBzR;+AzdW_}k&YD`Tru#&}WJbqLx#P&gWfERTaMbd$%T06~(9I&*`qk}-? zRBw#}Zj@+ZM*z~u?ja`hV&k#zDM$6R$NR{g-U2~1En0(UiOq#=N4)v@dlBR!lL3>B zy`FtLEkxhbu}<&xdGl3e9fnFTwSrM+%E+kE&q_p0Z0J*zkknS~LTh=X4@iNhmffg& zq=%$&fqCA4kEX0oX5sG>H_ftb5Pqf8;1)_>x%)3QD#lDSf?(M8jO@eE#zah)`B8I5 z2cENYSKHYc{$1+7?7}YTThwY-cEG#-z6L$A75JbWK#B9KAgv0&^gc& z{}VQTb-qfePDwX}~(N|tAhp0k45syV(RqJZU4^h=(dkN`opkP8I1w6wDO zBO|P7uRGrVv%n&Fso89TFVJWle{t_OmRkLXyB+GlmlCc56ciNFj7P{4x-1W8iz(<)AoA=4#sYEqFwFdhG9%;XnNm;s zztq9aG{ey>U9wC9m5Wecp~}TFha+UKV>`5?wzIELSu|OAkSwB`!a|CLNeo>-swOz; zgA$WRNAa@4tVoVzPr$KL{)*7UzZhZc`qRx#so-(@^7Jn$r$8;X?fP z)`fdH!U2{J$UPSF%w@I_&Z?RNdwaEdlxdp&7jNubU9+_hJQMl6$?gUVOkCJtOfomV ztr}bp^3VA%DO&XRMgV{W^$lexI!9MC7|`x$ahd6_-Fah1u>S5=abG9+5Sd-oT35F| zjy$l@)^NVoFvwY$st=W)^V}Q}wzao?@(uX!3(@dB5-D>Ci&ki{Xas(y)$K3X%iDD- zPZRT`ffvS4!B0{2TS^g@v7<$;mI5O;$V%D`%~V=uvH|c) zG$T&Vw{`SgErqObM5p)xjtR&Ox2of(jS2*vVwR&r(4topnR&8Rw$O^2I5V7CtPk z`S5~Ub;b`TEV{4L`ClGYluK@3=0%?Fmjn6I)iCvFJ@*ZMF6dhT5^cc#2dH~$O$fpr z?*4EG$gnAW#hks`C{D@RzX`_)-@d+9tXSwLFdvo2BR>u-@2Ed^)gD|nF`hyVRK{0IblDKb-(a&|3>{pTKcBQ{It*XgZ9^2N{&SHI@Jm0CM^9ijP z`)(ErXP$r!mjuQH4Ux4;iUa4(egaA;B!?}gPF`-2)k7*#7Ilhl7z;R)i2_i_;nq1% zFf?Vh`j--!B5NI^-GFWst`w+pJo*#72AsGz4x$*Q4A$^qy`te#SV~r|vW1rYKI1qA z;$0_&qP!!)VRj`}59Rfd?>jB}D1r^nJ6yzQ0!XojrfJtZW@%ADpoWM=ZYwO~s35gj zbwb5jm4Ur-{G`wq30r>_nGN-uLav~fZ}m8>0AU2p0&ugQ7t;JUpa`Q^ZDXQ!w(8%? zmRYIc0LhAMwTb`ec)AL)|M~IG>-7R?C929VFs(SNWM;5S8x@B3WW+L@@-tP*fW%+ZT{e76J-JM8srI<3dwpix0*`RU<p`*WURyEPsWEOm7Oy(+EF(Q%F_sAor$o0SuO`qja7 z;E7$JAUC%bb9%$FJ##uC$%kq!yTI#(*EL-ydUkI9E#Ci{-rNEL$Go}j{7l6Opc2?h zR`XAL=GGTA94vAsLk`w%Egov>^FT?UyrxiM$ z+;LwQpjKx3>@g9d*dQq)sCUuY(gpl5A0~WC5a|VLFYKcWcZPEOXLeBtG?WbIZ7{VY z_$>&-Je&R_%~hP8uGZ4Z8_;JWwlHNSrP%m*Cti`^b4)w0#j%kx(|%i?kqo27nk}J3%hA8=goN6F zQ{9FSGwrUIYl?eo*_(V5o+p!GN{+Z{JHK0AFF(t)&pG*@w0t@HtI+dOkq==g>Jj;O z9QbNAS6p{}8UMPAZ@hjb@_M9#UO}kga0gqCfzhk0tF!bxAxNoeXrA!5xbx@ATWse) zCBK%})X22((CvBkJPJvvE^uv_61)$i58*&@{p<~#s&HIz(B8ePkbby6oXb1l`RJiE zSG1MGMqXS1BM>ccZ<|X@fv71Lsp-*F?Og?7#zR{-eh59MoClnZaT*$*$6`{1PZ^95 zeAMHD422%GuN&kIgqkSULP1GuSA0^KY!pG*>pgM(g2emH8cF zpK>!v{cu|^zK@bBk7ttsgD`{O*~4byk78d&M;CI*LXnV=@bK~R@$fj61_%`BzLI6+ z=f5uJKTiZBJUVR-^-P**YH}>!W^!cA+F_#t%<*Kurvx6MSlnWL8D=PJhVl3E6s;e| zSLssV3ccD-s&9RKG3K_w<;(W-*7aJ1>MKl9yQTz7g!fi?+~G)P%e~mxB*LezDi< zYq~GKzMr9d-F0hN=xwrTWtw=YZ; z3$}sJOPga(NANObP(o?UP>DS>s{+%a*-W)=&U*8aDYf#~`EvE~@f%2#;v8h317Q!_ zWX)b6#^p_6r2T2+$UB0en6%NM1$s9kJ9|dIKM8z-YkYo4MSo2>;y&qAeMCU8%T?2u ztety9E>+rwGg6Srlw~R1rGYycMY&>tfTs`&g{#d-oFXA6`KN^9L_> z4jg%TfZt?+SfyRovD~!4`l0v0*FphL;RbV=U)DJpxo$dwo#rDi67hjA_^+$8c*IUk zW~yh$$u575+WHM!5S*JAV87BppFr&5*5dPJ>{av*C?z)4N(k0j&E_NTG&TJ<&+=Mi zNcjF8ssui4^&yaMJ!~kYC=L^lB*pNhGovi2zx6SP@3s*wOQI1SXbL-xHA=k)OZd<3DmY?>{7Q^yJ&*h@*a4KRXPc zrp}(G-U9@`Sp}B$Ra18%-I~`-2JMob%hVb)G_-5~yZ*4ZJr{(p26OWZ8lLF@@wUR0 zK%TC!cTX_9!jVaQ%(LS8J*ki5!ITT0Or}8~jkY|GRS-?@yzNSNi7Yn*qEbZo51$z7tz5wNm=;HEJWEU zYSD>|X5nprp`sM=&da0t&A?aZr3=6*?nMqq4g$jmy1E{55sT5(sj`(^gSYu z>cpFI&`}>u-M^i>zZ(2AbEh&`r^UFR=fC5K=0Yetytoky97w&A9~D1)v0%CoF)|Lu zS}yf!GT~jnykOiWHxk1o!sv7ExbM=`T$wqQR*4cgm2Lv^G2!i=SF!rRE_Ar5@Ii=? zD9f0*6LmAy!T0+$5^6h20UKHy;^2bRWpZfaW2~Xo(`hu*bcc>^7z$O74goG8?!0|^QHxBll z_lW*CTTqNdKD}+}?#UtD%4B2#MGQ{>i1Hs)$2Jvkq!vsD0%V_@&$9?=NCCN`|P* zw&`b{=;&xdJQ>~t;4knEjb;#oK<`KdKUHacFxOB;(bT4OzL7p|D1XzK})ma6RTReJvRp% z+e?+x^JL_E+9l$|1C}ob0uwIQ^s!v%45(~qO$lBs#GCj)RJZZ_e0n-&yJOd2p{C|k+=&03$UX@zarTln;*{3|dgfB@E*#%GwVbxPpQGt4eaF*ANgfo6jW#_rD7!_qd zxR`3*SXoXcZfCo0ZwT+XX1aa({eunAQ2-eM{K~~@_m6?EKm_UO-?m7btoQGC|J#^j z5~0>PBi#oJ$5mY&wE15y$;=CEETW6qI^{g1+zpw23(%@ih=M5-$ef?mpCu{Wh@Rd|={bOPc47)`6fXR9}OL9Wwp8~(V}dw@?e z!n)mWFUlNsQqdvff-)3D9$IHw-4KF;Ak!x{a)F13*O3{|YkA^Xx@PRV^Yhfc`nxSp z-oFi6#J6vA=Sq3ruGc{UAHN>sh7Lfv(}N72cxqHt8;DJ19>dxU_P2s3@7#bg(ZHxg zE;ODnwu&7pxm4&Y(Z;c?EdGO5_#%>6z|*MJxnSAeL@{b;r#ry!>i)^2IV≻l}vY zidH30Pfsrj`bm9Mw2hZtgC@$BfNpNe@#kKZ8E_DJ>FPO{oE)y=c2;IoXGp!yW^-4M z9x5>Y_r}R{(GW%gv;_%1QiY2x@{ks$_=nOWdg}RB{mt7*#g2cGQ(90Y$N9+9c%yfK2!wf;fz?DQ#0OSF>)_2tr-muOOGu2jjkuS z^LIVtHQJG+zsBY z&U0Kpcq0SGlJ`2z_|;}^cA}rtFqz+z-!^3<_K)V2UowJ^-)!SEM+VSz`1b7^f3LY_ z7}NZZq^pxkl|a`1UXPV=)jxc>d+yCegohd>zpCUqxIuL5%Ij{~RnkMsxMfgXPsgTo zySw)rYX+=6y#awQW7li_PyQo(?X|1`dtGaqB4fl`?o4F}{A*lFx^_0hNI~W?e5k2XG^CM!i z^JT!qCUV{|;Iod3)z|L>daSZ@#dNC#ByEc(!sO(pgo5*S=j@gndkjKX z#V!r0fDa^B)|>xi<>{J^oB*Vznd`RCe*?L8r)+8uVg9ecY%_0JoC33yr`!GE#6=JK zo_*-}n7f!rSyebfZFLY&nxCJ)R7Au+*;p{$qIbYz%>TUMcN2G&dltYGXAYtYwdTw^ z0}K|&?a9gSg{t~_D2m-~*DmdxWT!yn)T!8CFefI^e%EuHaId>t_Os?>W%)l{jA$Eg z2a`@r?oLvlsa<*|r?P7-@CZUegWt~|TU*M_XN5w3{Op&e>~zm$S$LB~l^mWC3216b z>d}fIAWSK-X4dazJX#8p3r9O%J!jKXUvVUt61P+fmxWzW8DPSnkU;xBlK@Db*(gbk z{;=`4pd+Uqtuo}WF{#U?t&clVocDm`+JG)zzv?>pxx%SQCC|R|Ce8$nyr@WR!mVpu zyY=Akx%ec4R=6_);s|^?w_76F^3Sts5oHU&>Z`=*Q1Mq4SPCpje&n5o+rECqHy+*6^NWmFQQ@`6`w<7JVGQ zax8rZIvt8W4O6fc*3QhY;rjSd6S4mU@{w&4OCXiIDy(>=gXPuP+FEBR))8}o)4|#K z{Cs=htn+HhGyEeXGxvswf7KZg2r4;hIhK`Y>&5-+jAMBJ06)+FvK;7{7Mkmo$0Hv* zj26dyoP2t(a))t-HsCS*=z`vi$VFP&(>upR}lEngaSF1t@H!2 zF&O(_5OV6!W-wp++F+M-y$RkU+hIf!W)WeVg z&#va#@V_;s$N{-aqn?K5*Fy;c8TGNdT8Ed7HZI!6U;E>Kkxd7r>QbYYUCYZrZNJ5i z^^O);enW<+sk6o0_g-jWCHM)$f?EHl1&EII+B`EV2Nr~r^H0d$y}XaV07U>16AQ=E zUiUN+t${(k=b8LwW;K;^M|Iio{u6hxd_^5j7)hn#Cd*AqSVh*hdz#poNx^Kc`l8+V znC6I+=#N<4{Avo2A^C!GHZtMy)xfvKjhcv!NGqkDrTCaf)5c{(=y{8`#uwQIvwvBnJh^7tW}gs8lHz{ zGY+_SAto+^JCJJu&Xlq}XvI53_J|5kTTm$yyBA8b=ab-F-LM}f_HCd@J6hX_7)B2BwBm$oyv5%dZ! zH-EtZlUEpoDkE2YPG}ZMo_@jq^?3m{gp6^DT(vt=-c>$EN=}`8Yh~%@kOCwseEsH& zP6CRkKFIT(&B}@Rh(5}@s8OX;)KXmI$+E*srtj^CC0_VLn~Nh(JXB5v{o`=a91M3B zVPh?4V~Mudo-eMB2ALTo-(K*&dAd#9`L}ynLCq$Du-m?U!!o0R$O4_k!QbVo-)mVG zf&2FdR;%$##~ySR+}YV#S@V8X?w?kf1s@f8xp29%$q*O0x@sh=J-bJLk7?1LbvR5> zCSW2}(EOm_;A*05J*{~J>ayxd?lJzSWabfx30 zT;{6uFFavI`&yIwoj>kpqDP%S6$(F6VC9NfAl_&@1?_~0p^xd^9=X_`mZH;PfHlQj zG_pOQkIc%x!aY?KgiUpz=ICO>3h(l07(ef?ygu*t=O|;)VE;V#p83*{i-u&8AzaKOw1zmst2~(#% z(F(vZg^R#eR0x~@rL!3 zf*P!pOA!9ME8maG+?()SeG8UkIUhSk$oEncqhWi2xMotd2-6>}cd6Jp`pNI*+*M?M z(O}$td@_{bnPYs%-NRhWSyfr04>}(vbb8&AIRnIyeSJWQfrp=+SD@$Lg2?@N+dXQu zgi=c#tihSW>Tq+auvws{t+WeVWS1e=z43~*N}Znao3 zllbg?3w+!?3$Wt64cFlMxge`e6q3fEP(?Yi|K<8}B_bM=K1DjS018RdE*+QE4CbJF zGpxbxS+yYs-o9Tcx#eE!%ge!ux%)fQ|MllbV$Ca`E(5$u8S6-aIHUFsbR8_U=r_%B zFDM{Ew5n0L%dM3Ky2C~`_W3ys(bhcAbQVeR{%@K84Gl&CtI}xIKQ$gi_-cq>Xj7R? z6@d(f9$;6Gi;XvB)GACY0Gg*4&jYlq3$x2W21iKdF^Fc*-$Q#G%e^EAh| z@Y%;(a`}_d(bn!xQ<7VO`7uWwBgQ~qQHkY2e4 z#2i$Yrao3(WHW>*$$Dq_lmWzAVKDiCJY|rlo1A=~F40JE_3F@z%lH&rZ^v2ps$+}C z`X^08*}fgjq7=2Dl!d*;jjs6X)CcN=1=4OP#yfdD1rb?7Bs?{^443ufo4u^FyFE9N z*L!2{!@2w;cm5Gz1BL$Z$klW30g9}~|N2>Qqr29{L2*#U zaX@bhR8OZx9%I@!)LP~Y%v>6M)=h27vuLO~)=&=HTQJ34aE{ZccUd_+faq~^Xf|DS zqNp?k&7y*mLK;ksO&(L{7y+@YF5J7y{E9r8%?X6rnmdE+Y}f4TJQdh!3S~pZe5W^N zN4`My)l}5!s%n1lE7vws?dTxF*)`8T-dVi+E7PT=c?!u;tEy26Ef5f5GN*wiG!dJB z&j~zTM(#EyVpB4APT{B7MaG~q>I7PSw7Oq=R!tOLhqm3TiNf-5 zLOw|?Ola2W6wdq|n_(*m&s^kG2g89fFyT((cHuyG0g`lDI8_>IS3UstEod(;TfbV^ z=tu$UssHtST%P|8NaW5fKj2~rKRrDi?lW^b0}kqvYBASGbcZfqKBNrw6nae^B2q{y zOOT)c)|Ian@hz|0I8|s+##}#XF`JWH(B_n+%ROZ zHEa3d+LH47HJB3vxx2(bBQqg9D~)^CSEgFt>nCmwa9@&qDCA^uJr%7%;|L+BR&OW; z6m;yHIwp>Z7;Xv_;t0awV%pMc22Z$4qWFK-)EEzxAX=!km)OOih(u`PV^JUyBT_ho zXAC(iEGWq@O+t$hsi?^kR2hjeT0voCt9s@5t<@B;1B7o-YkBFf6YcFtRqpQ@PM5x_ z*_rM5lJ@FM?wP#xd0hXdvu|svzC*GftzpQ5-Ar&}N+J8DTfZ`&Ih+98U)b%v9~ zcCgmA@As{)0IomD4J$nCAirgJq?!_8%CZ4)9jYzPht%vm3Wscs-QTg6h-t-Ylz=Ox zW%uk#eyDwv`1&1E({;PT(|w_|+Kkc{!#3^KbKW2AGZOpJqn7~gM@FW(d04tI)N(eY zK{}wjN7N&UI)yC8kOjsQFcJ$Qv#<%X?_1Pua#fYbWSqkN))3aWAkM3~5KxMeD&=X4 zR}m!|)SAMmoLUbzl<}5~koH0xHAa+>(6^RJ`|MrcQ;6RMw5K)*@`l_8=kx7}%E@~2 z=Z5##B(6!Iz*1{sfqjGa%G4U4AzAVxrylAzEu|&RE4Fv1hJlYQf!Xp7_9-NYeLqFn z>?*Px$wEKTkn-q@_r;N`!KwWk`=(o({Bh&)tM-@chvOO*C8g@qB9W+hw*$j<*2;EUUNyxwk!pLud&pp-|#5LySIGzdUm3`y7lN z?H$lEg69HYPnhW>AVtM->KIBieJS z_7@H2bnQX`B!b^LSbx3W8K*{2#&8M2mMYG=_W04IX3z&Ra&nxBzPXVXT_dDTf1uOX z)w8|6xvBE#RMlAb_~>ZmV-cz(V}m4KXy;&4lwxvBN#4oRLtvuV_Qx~+y@B(vJKXRu zS;wVreW4i)9^gVeOI@5`jQ<0RB8_-rnzp(c1qFj|6zwGrlUWnjE;*AMh&@xHgf0GA zq&Nrg@ztLoL_)s5pYJfWlKf_0cGZntStvkn&81Y@sEhJo_?86m%E#)mXevl z_*W=ng2gG(y6u!j!*^vHYaF#glY@?4LDoA$4*rQa7#VJ*|DH&74B_=5`wZ|o0pm~P zibLc*Vu3|wRteKY4xU*T^4no~?uyTFkB*La&h5NE4Ohm)YN53&cQii{`$!nG$0##iUV%e{xE zPACL$!kd{vOWl}286|D}9@1brIzRk2Q%ST!!u4XDaB2BBtE}$S5k>f8vcJ^Kf~qY7 zyf9*}l($A=$U*jHhpeoNEl~w2YVyV47GA)*RME^Gfl2rIjvUUk(=kHav-GgpK|c-m zA92l`{e*FnX%Xf^ZG&E0{#xxjrLkJQSVAQd86Z2^j7?RmCMa@kjLKL(he{TBTF3vM z_7nSuK+o`M`~d|zd^~!`VpsTJnR3iEmrfx+&%mc$($z74OI%Hk!dmG+(uR#GNgRtO zOoTFGUEImj3BP8pl*V=7(Hys+O?tO$^Y!RJ4?{1BxznMcp@$u)RTfotlY>C+6i{Q-piljec>NMvU+&qCDb=TktB*enwKo-2 zb)Q;x_25TaQ!GjFqS!$!kpD0oRUm74fdv846qB3JEx@X5vY?PqozMt_>Ur&dfv?A# z8g@4xesNz7Od;9?Q9NOobQVO&TDDTnRT$_lEe&m{(O_{qcS$CkqLij$2FHfs3Up{$ zC1bm!Fgvp-YY z6VNE7Cz-ckcY@;y4n4H?{Q#K-r8Vnc>|*)IfMO>e(7nS&=mKQfXmNoj)4hwS0;&kwZ;s%yOs*I1VxB+ZD+^| z3jpg5avaV3-!$XKW_b{J)5Pd!i)}i45_lvzb5U$N*KF2!Q2@}k$p<&O{Azk6lz2|u zm)4XhLUA;we?K&Y6`W#!si=cc%Yd(nkt7pMbqUB(0Ax|07JVu)5jI=46E|xykr?u} z?trt>dq7Lo?wH3PaJpTIeRfKMZ(mf8OLj`552tY=csfowkZa0hZC;SMTtIDt&1=Egly{^DWsa#+2tT z+$Xsm@|G-TV-;0=-iqTb|j$owI`bo@|uLAuqig!Z7}gJp(&^?@aDppzmqLhz@q50EI(gT zX6p}`$Eas^J4&s2==jwVCWI)Eo6IGngUINpO%%Zx1C!Nf>~UD9T|eXK5?$P%$%UxM z#496R?985wFsT09A1P4Iy-*C7?jMAUDx9Zcvk(1O-p53yz>`y;NE4TG zZu;PpXZ+s2RQozaE-pKRHa_LG=hq_4EeigOF`9=cN*1=I(^f)?Bi@?pyX6JnGS$Vs z;12ua-Bn)o8U7~e257oaQMt=4Zk=I&{fZE`>!>vfC)%<8fv9uAb2rP<1rGrvpUJMX zB&#n!!_^`dgDX7(g=}>CU?S!}jK*u=v$QHx#tlGFS7M6~-=2BtHR%%(fXdpb5lasn z*Qmzv37miYy|`Ei^BjgA^@pwOP;c5PNSJq%h8vX{o{+2`kppcp-(m`2jA3K91Cxw7 zQMvR#pgc2^CePqMGBDsv==+N70n2Svm=Nw{C+=T4>{qNLO zH0W{by1ld9s_8m=SgMY>$pN4`U<3?goj2Qg;$^~}XVGiW? zrK>7~c_;=><8cTXIsp>C#`(UK#^3*Y zuuz~5;1CYHnzAB4}mW=XcC0!P^aMkr}_qbn(OGY)?cxNl%_rO#VW(4L^ zpIE5s!9Nr;UBXRKS-Ik`_xH#4c6!Ufi9#Bx1HF-jWN}ZuUhW*4kXUSA?ezA!<(KZu z)`O;jpV7NyQBS>Rq2sx=i-?_voMN?nLB*0s)}iPkBpy6HGEJc*b@iD-c|Wk+APlvt>+^KnB|!XSqX7H#1`NfM`gO zM)6pQBOAjeWA>zF$2v_YLHKq%GYALujh!36sUM~|(_@xuE|8?vak&^9XU8On<};G0 zhCN7@M%JUELQc=0fTbubIaei2GCLcw?syuEX8IJwzyA{r;wr(ig^AdrouBt{MTVg>?rQL<23D~08!UfaT7%x~YO zE*bfq0I?{vq1@S%S{1qw901l#5DvKeR0Ln2-j=7VU-`AfCys_fy$EDN7*>DvfCr{B zIZk$I6JQ`RESd7$4mCf|nt&8J*?*Xn#UdQXN-6+WSQO&yh=%^LuyEgl!TNs>ysulL zN^`&Xbj`;#)WT{6+urwL;WEZOJo>FZ$&qKBk$RSv-n_glkisw8YIZ*wKK$MQX8@Lt zKvMY4HrMU*U-RY_Y+oE5PZf+GE`h5S@VdT63u44UH6{3fL`X_1^5x09aOUZ+Rp2dx z%3cTB>FPoEs}ULE3MXZOK@8Eaz~@OR9IlN3mdb@j;C=81hNMUkmq$pH%>4Tig4|yG z0S|<{aEmPhu3sLY)2HxV+o;>!h-2C|N~Cfofk@KD!Xw30sTRD&Vaw$9Y4(!l&&a=H zHrC?EY>K~^RW%_y;H-#(Rs}rJ0xGu!oxHOnV6=<8Tx_DFqkjmmYi<4GlLv)>$qko2 z#!5FVPkgSQo8xfmd7fe-(e7SzBH=Fz!#cOSc}P+ix&t(*^1HiBn`>R(bd_3%58u!# zk1H3Ba`^nB%@t%@4{DW5U#0})$$M^52;M{SP;Xi`Oyk@zM$()yfZNYkgy?~|xmp?N zNE_EpeAC{6phw}!qFDbK48PYzBc=G@i~l6ps~6yliM!-*Sda zdWJIn~(cb*v)=88ANrSsmF|Osn&b$zMrdyY*PYb&J zDHRF$%2bS2q0qR*W@hL$m9r=2{J#&{f*7qZ-{?!AMqZ?&Rhu!NC|pEE_kfH%Od$@2 zYB1m}7$^_2iG%6n?+P|-Sl;%rZInR|x?9@n+7ZF!-_hOP zJ+m6*&L4W*!rL4g>Ic3PEV^a3I@#Fv@)1P2L%A~zivOrRHO>3*GcGcu`9X9{!0n)> z@p?Pge0ea)|1G9?g`S%vcv%N)slyble`#V90I&?15`>!e#x_QnPyE~0mkjyiyI~p= z29nTLBvy$_hm$SbbKiZ?3r+A|wKbx%_~QkIfIz?{G0~`lslV09-95WQZ@B=IJ!;33 z5ROcWy1m(xOxP;;)YUUz#e_=?(u-cgR{#h%I4nRP7etx#QqvI`wApvQ_zP6RT+*uZNwdh61 zS=9_qJzkEcbyEZi#fqS<98$s7%{3z>JsjVgmC9pIa7j=C=0szCrol4n9O>U2#8j!f zH9k7;HEU4N?;M@9tZ`G#Hz2y=nB6=E9Kd`+fg`XNinZuV1(n26d(=v{LLpT<)htSh zJqx^OdAXu1sPkp$e)vsS5qMQB67$j_@)Z4geD|_7-F@A#@OmBi`U_#%_g>`bHZ%V9 zH2={tBW?RKQPo2Hy`o$v!C0*wcF8TGl!}u2nt&;lumrkS}xIonr5sr z*p;{P=H@1ZtSpN@s&mHLqrCx+4BI~bg50=d)1LcnhzYAR<9H+#2OP?=*4)`C7`OY8 zkZ^o#OkQ68A^HB(_td=@s^tppNHV!8YZOmzT0bqdEWC2q=N#n_sC9H$-KqxLI~XdJ zRDC55SibK&`MA>u4&PpFY3qyv-YFitv|k$qgTCRbTuSO@Y;|1&Uc(!l^BKVqT4vkS&q zQ}wduj3*!89H`@P{J)5o*bh-v9otx?HhXEE?eDX zq9+8ElpCJhaOQ4hM^KeJml>uF!FA!XPhTxGtyj5)kny&xCJ;y}U4cME+H#U&8rzh- z(vcT1Am}KetM!+U{|D~PL}BM{wAVE^rM9-Z5}JZyU28|~y}gHNf%I{L_5tWmXO2#q z<;3NK&DX2krA?vNv-*G|hiPVJu3#Kg=?UfWZcAZ@W>&VmGhs|367Q{G7>phS4ikU# z<_%Np$Iql8E;_lMAW%qzr=a*q&kEC%_Oqy{ z;YZiMAz*QRzqF)P*sFHK8Rsv`I^wW zN~s<`$5vlny6UFEZM7Zbx$zQpf4!xXc*d`;z|%*#6-|j8;X)wfaXk{7a~x2OBrA)F ziILba(nKqR%?FfvfTMo0`y*t3D22%vxy8?9Y*BfGFhy^D1JDG5KrA0(nQ$g)I!qwH zudHZRJMhUv-A#A{`fN@rUY}G}o19Yek0}eTmu`QCT;gs{^vpV7aC()4a6r}tx61v; zZnrUvfAg~^O=ON$XFl__`Y06D%WIk;k)>GYM9SxolXzrNha-WaD9l5CT=`q>7x1X$ z^x>d1sR!^caG~Q!SuPJIa(zfDs(hCZIscsh;;%F}foE0k=9py4h$o>{LNWMQow`Id zs-_b$Lrh-eG+={f6pb{{$TP5!OH0GC%5=rXs;jbTHu#A|)&Mq6W z+I+>;R5{|{+zN>!=hK49>1nOs${hNnE5CPTl+_poVS{gjcTHtinYrRDiyv_F3W z5GejL-;3!;_x(2KAoq|2knwJb*WH|TrpjP2In6iZ%yQUriFjfu>-$bEryhRwmXlcv zJl*vLxQo+q5<4GTNrQiM(KF^79 zvmEai_mM*F7)pMIjhAEnd`-{9sSvsY=8Qlyytg3R$6=nA>wRtXtiZ8OQWoBs%@&7N z|NG1O`g(O>)Iy>YPR%?#atXQFn-M7Y>KUV;n7cl@5mz|4=e`Z~t|PI8ei>Mpa#2^? z%BnFoF!`Cv8GD{Adjv-ZQpuQ+f3oS2VbMA3a1LD}q}{uf5()b=%&hD^SwwJ1-Ez#b zZsQ50Wl{`Wz?oDJ5@}`aB@O$t(bYGpk4=&WE2np0Z!68`ylw+v3!D(=yqTb()m3v3 z4>brHh-%~m2S;ohpQK2dF9v=Vo}D#jR#w;|cU_?bF5=i{sIL=s1sy7%?6}@wHFI~f zGAh#jik^ZPT>3WG-rn}n6{VUPys;ti*`KXDt!(Mo-)qcs5m*|po=;L>@?Mb0r^KaC#C)_LB8lePY32J1JEC0^IuO1yI z)I*y+__;L|rB&R28qjjtGy63)UH@56#q;3}>g(-JR!QdH<(vHR*01=4dtu2hf2M+A)-XkXRc_DQnD5Jt}>1FomvnJhIi2d9`7#K;d^+>9{%<896# zN4Hsrs7ac?^J<}nxp4c5yYebhJ!iP6K{yBR#lXdM_I-ERB^MqZqc5_z8=t(q)o`U0 za9ZWU3#zontXbnfj#_vlQ@0}ol|bZJq!O~AXk!(B;!7Z-iyyENgU<-X%ko)!?+C>* zWa8#i22~9-spv6_N6%|Y0<6%*`hPO$Pm2;WxmE@tbD9ZJOpd?eG;^YA!2fg|1J6a_YqHH}I z&j_%|AMj;O&VC~?Z?MSoQ??#a?rsk^`G75oC8c0maMSAYRd`S|p~%gZ&Vd`5+o^;X zA>q4xJ)OX~k%9e>38J;7*$>AVY*gc({`a_}b%;{IQ2L8jyA=($FJE8{K&B31tLDkf zCvPLvFwq4_a$?=;9Q5Q1n2tchn*?NC!L{w!^i>uMk&i&bB9lFnpd-K;8Qxtn*`ki& zdlbbed*#54*EW$jm>8*fD_(lD%W&?Uc?*Z<F{?~m_!?%#Xw>bf*Tdgpva+&tY-vH-aCpRL#cAofj}_|v87~$Q=sZ3JTX{6V;qXjN zyY^5B#Ca}dYlb&a)4L6b)LyIK@o<{bS=^MBkIvmpN%@O5^XFp;%eiL>CIFGLEogP? z=<9>26R1sQD7<*QZUuMwW*~#qO`2T+>zmP(ZMWv6BdrrPDK)Y|o>WGKy%gPc5JEAPttH1tdTa&#ckFYmp_7ORkJ^EjdtifzO1GH# z9Sv9sgMu=TXmfU)OKl1@t0|bT$8m+c9=CNH=70bLGP|YlhlyPg&q4b)$|KPmqHPbJ z4LoPvJK}|ml9H35T5b}YFLIwJO1NC=a4G1&4th)o2yMFz_dqzim^RqbfMJ+}W;dS| z8qJqUcb{9AIWZUBZ~kM#nCzXRBqeX04Y)Sxl0xP8>?aF~;(eE%sJs;9bX?~%c{NX& zq~2i8#Tz)d8z>|;s;IkKg7tVHTY22FlM}o+XWtbSt=clH-3(&}Lpa`IkLL z;4n?Jw0&7i<2PmS!*7DNl)QnL>2M}m^zU!Xu)nRaD+RH8nKNKjxrRo9?B?W$a z1v02evn>o|GQ+pF9BC>cQMaHBfkmC_8b3$A1X*x{08@ehhY5yl3yrz(I*3lzX;|5k zWM!&D8D&w?Y|B>_1WXnLy+>8^ze7Jk?UJ@5Ftc{SpW9pCm8>z_(0~*VFb`0o01E;Q z>Gg;j&&%JZL67NuUqX6-4CB9Gm=5&jCq?>X$$$)IC}->68=#PSgW@Yf7JX=7@P07H zNiUK?!LFud2jK=lEBGs@Z&-w*ds$eai?^gf=;=Y|Nywfg^m=G9oDpE*)XysL3yGc} z&4R@)ge6(5?WJd!3zB$RR#^BeD8GHJd`e6^83Hm5|MAboI#0ZP`DmZ1iVt6-`biQn zmbUoX8t(YY5ycm%dHsT-AVJ13Ra1?Idc45GFR+5Tic$gHZqmdgo4C!}&tw6HV3Z)e z$1X+RZq^(1#+Usr&jwHGj(AFEuZmtv^Zk9O#p0+;M@zE}B8<|;(h854_-*c`3(M>r zO3M4?@eUO^*$;G-`VM!#27KFHA#*3AkS7m!k9b%_kPb}pD~X`K1P(thG~7)ZtjTM0 z-Ev2lMK)B3eD0MzDs0cgp11m=9Ie|^Dh^;(i?ez9XU=}^lW<{$)NMoGqjY_d6FfP$ zV>=&+Z&ywsxyFRLffu@JU5&$9t;QvZ<=k<#?p(5>0w%QE$6DVpATbFAfJFEGyKko- zIks<)GJt~9c0KJwk;8PyKh@7u#6}bYrVK_lI=ddZ5#JqJL9cqN7o+ zs$6V#G&g6DPJ77*=%leqM7qp>rnDCo&8jISH#0Rwxvr}N=4>{gk&BeY8ic-)NnnOX z-|8|K{U*hyxR`LSNU*0|kViU5mpN#ek<<8_e21ZhuC6uwCsCsoOhCw0OUAZYQ{5Kh zByG?>B{WHE)cX`t0Rb8IDl9pEBfFI~0vzEu6fcke`QE72-bWoRt-XHfof&^3zM#KT zbE3?mZENg17^IZ66;2aW+C=c)o~l}1UA=gDa(*y?E;aLCPxZ_NfwAaIdI;9>By?#Y zV=e~M%b$ZHw3VCuO2z%zU^H!;u(!)W_gFW(t4f_S11x=hdUE2XJ5kLE;c(w-T_V`x zCz#`yX<>B&RYBtG(+vjXY>hSMFD1S`-@~XOP$70e#v?xh{7>8qe!2`-kjV^EELW4_ z54{F?;wsl;A>-qrM+j4Vs~e{M#caHbZNGerhC>VS{BKP4ou!VYDN5tHsq z4F*T)U*${mu%Q0iPXI<-k>o= zAOAmJg%NrsUVHs{XsX$!DE5jTo|JSA{^!q4xGBC2W1FhY{BS*m!mVO{i?Ux?lYzLO zw9bT6XER7Xs*BasryYjml;nyKZO%&>FaMsD>`Q1p*jUpbo^%Qc1y^Hahsd<2F*`M} z+;EBL%Rp<4CAvqS9IXG9Ox!=LH@be1`+#v$4}z;OAn*dE7U(M%&Ihu`H1s5fhTBC`@h0MHHqhPxyBdUgKiTUB}1 zQJTi6<3C1(y`!Vs@>2XPgm0{=mE4E#N@sMeh3*L~3Cqwl1U8|i6lY%SjDarG6Ucg|A&v(ccMqaKxbwT1 zCU<_03BZH{w3S&QBb(}T*ewyli8bQI2T{V=o%r~pLpS>$?gMi!)6$p*n60r4F-|7+ zDW%Z)5w(bt@L8Xr{s?6Du7i8EfJ-LsH zk=XU>O1ZuLRhMY<4SY~GyNa%ktWFW;8<9ejf>ISbu{SA-vg&?{jqfo%-(9*Rawv*& z>A(R1KbQREl$3M3lDlgudo;%7aWQfI1rO`o$@-pPK&42uXo5s0d;;zIeXqeBYc$-L z54%DQ)D^*%bxK?{Mr`{oMU}KZU3^^Nk95(@#B_{8-Le1u=AtGGS#rWzvU0KPGWSY_lhc8-pa3h52 zn=lKWx;L!^q9lIQ(HYkbwc04R@v)R;r^~#Z%O!bVHaf8u{%ok#-Je%Wy;^bRpCs3V z6xuQOd*OM&vU0 zyZu<(uQ|jTx0qIKkbnV!=>{K!5iF0x+}uKC<(-f_%kfmP9fKiEBRrew1U_Q$@pxq+ zz%YNXIrV!lw&QxJx-{(k#OzPo^?>0ThgIy-uEQub2MgO!Lu;h z2-o79s^^fW)yoaFsgSJ`D8ek59<~K=I!u_%a<4aJU#Tdo?GlDZUr>&*I^j{~yjnJcmUNqFivxWwgCc>Q+A zr=iK8crJC7e5AfwXAFcN9YNb}afMU{{H60vv931f*@d$rVOs#57cW;U0B$BJH^K85 z=(vsl$&+_^}+VBFwqAJ zMpOU}v$#mv-Lpp|qrd67;dM*WtIhNjstFPXl_d|G8V}m9oKn<+nMLy8nsF0r*c3^$ zu%TC1Z&9KAy!QY{)ja@ks+Z?M0d7mPQ?^y>WGu)_IG-rp^W}DZgOpm z#Jx;7f?@cs%o=^>FJ)Ery;1vY<%BKglbs`@d)A$nFk)}=4gjzX?-oLT`X3T(aNGJc zt6?_-hq*wU=`@^(B@eX4oj7R$hh>T;?|WWDiqy}JahryA)Ab^adz&R0cZo{WC8?01 zCw3-?G_U-vz(3`X##(RNK|}H5I;hye1O~k|a~S!RfIT&x(-OB;ABPYr(}|s{Gt&Und{E*bB{^drludvz~eA<@!Q3!FUit0mi?w~c=&0sqG=_fkBMGat#+z$vH0Pb z3MM=#Y`_Zq@wuui{eC>F7A=yL*u%L=@;9T=pE8rVMc6x#@x>o~5wo+3dS}zJ4c%#{ zp>?SY2 zNKii=kv6c??vprjw25q6-CBVyp`w7lC}uKGsLn!<8?x3gy;En2nZOvm`LR?w;Jcja zH#R0ln~vXS71@z;t2ARW@+>ymTk05pEAO*`jh!O6;oKpF%s0cId*X$EmDwXiTZAYiJus~!N>h%f>&9MLECMwv zb+PA<&?mLFEPA?s!;k-vP-a#Jn;cT!el|s&Hz4QAOl8}b=+Iy@)PrC-U*qg)7S4R6 zvwdwUIexx21OPslhW(5#z7h_Yi~06r>Jj}8mO%*_?}jzuPMrQ)>H}(!)aXs#Ke5IM zeO!sqO8|pSbr=)*6Ve-We&Ic{ejgvR^|4g9v;jaAe+7(*Z1WTSV6)c-`BjBYa!}or z6s)bhzm#6ON_&}YfvUfmJyLqT4%#kDv?JT@&E~xXJl)wXAYr%#{j_(2>UU9Fu!McQ zM7iHQ5`xLQH785Uq@_hg;9j}{U zGmDHu$X%a#Lc4pq>zjO3u!!-=MirAC(0MQQC9da#enGXI2f?bxjJrWaa<^>cjYT9(yq9Nu1C5iZYFZx{p<@3L~+Z6*ad+I@M|kd3nNckMY=pT(LV*N%wq+3oq$pj8>2DI4De~&3@LJ5-Yzk{fsnV;wM7sm%dE5IuO88I5}*^ z1{p`=uc+js%K7a&xl>;pAKs2+_dn|XYzf}@|8PAndDh8kvam>ZeCS7q3}-2xH&u*~ z67G2l*Uf069`@YN5>JVF67{Fm=KAhmKvZ?*kc?=j*6HX~!}ROJHBq z=m-X>dlS&eLD9^;dBLXr>Mx1p@L*+kYx9+B^u!{zY-xoJI}7UnHN+{<{|__$Ul#t5 ZSc#zIUExHSfsGXa7*zdfiGun2{{T5%dzt_M literal 0 HcmV?d00001 diff --git a/man/figures/README-example-point-chart-3.png b/man/figures/README-example-point-chart-3.png new file mode 100644 index 0000000000000000000000000000000000000000..5f115a635efe7f636202f5e1edebfe682e166ab5 GIT binary patch literal 45065 zcmeFYWl)^W7d<#g0>LGC@DPG0IKdKv1a}=Y1a}7agb6Oe9fCWA;5sF(S2o^$T$P!%N^Tr5f~5D0`T`$y8q5_{> z9)B_g-kv#r(uIIPcwPT~Q2HE-zJNevsXF3bkw8TVrTR@%+E<8u>}BW<1^$xQ#_m3KNAZ6hdpVi**(VL;)O!CS%ovzmom=+a!r7-{Nxo~{g_NmV3c3o|~ z&sNPwBB$`yH(If~Vy#3Z1C&5wL$(oBB;3}+^}4h47>qbPSAIMlJY!sWoc3zH7HTpb z7Ucq8`ivG-onEip+TC0<&x$o)jSycgB3i|Lza$n<0<#?RP^|zdw`4W$3tO-k#RU8z zjuL;s{Joc}1?*MXd9l&Mr1zCBj~8mo=~b>x{v@o)=Xa-&d8Y50QkBl8Y=JBj6QXB@!)))$pv zUMFrW+ zRvhi_f+B$l%U_>LV1oAMipt9q%qT#aUi-zVsi}<7BF^#6(F77jzlIzfc~b`{ zS9K4U5N(&$M}rPvSA9MV_KQUanwLfm-m)b9fOX2-}in>>pvY6|VtTKo930Yx-j?3-1JMs*l>jfesKa)Co@o~L-6lsnXbxj9^ z%##F`_JuUs2mjHdzp`B7_O8~!9)B($k<&Xih>*o@--~JSrMrzZ*hNa#$@IAxB7-)4 zJmi!bm+|7%v?~5!Y8ij!rWcu99?Mg)<5JI6Rc1~a>DPm953Qi)r7aGC-dra1#rCO!i5x79m=>pQNF!|NR$b{`_a z@Awiui>U3E?>mBpCAN#)iRf!88Q!0{Z5@5EEMr}GcxgHr_~_oXZ_rkJS>~yZ=nnVy zM39-w%`{(^wVX1!O4PO@y0)9n9gJMpka(bZIFHgy2ox{b{T`9PB<&&fHj-;eNdW+l~W8 z48wFi_Z~*GToL`pf0~-@7km!6Xj{J2J@?+I!}dE_NQ%B+8z14mq{EF^0?;X@-wDs)nQlfBP_8jD0gRC zu(d`7jXv|M{jk2(k#6}{&;9ps0VxPX07|s(D4k;cmJ7{%IjrOUo8wYvGcTYz6#h`& zPJWn$B>o?I~}!L0gc>DOhh1vG;#l#cvb?ce=6BMRcMqzo(E zc%6Fg=RcZu=-goBW@OpFWmYcT0=478?=3fkE6W~^6dy@BTTU#Q{|;vzJ1V6e%lqoz z$WFcjG6+_6CkF#mj(Fmo+Bh}H*7|!*$980JthZOLa9)nLGIqZxlS?3qyo@{OO)=qK zE?mIv>K^rqkDM9w!$ob37djA^+dgyp7kGgFd)@S(5 z{Xha6ZWky({9#Yo4+g8Ma++EJNs#1oG%cBXR|W}n3h?sdZgTKt-cYDRmT-S4zEk^ zyKf==JP!WW)co3@kk)1s#G=$W#2=3i8Waq^I!*teWedobcHmImPqrb5{5)Vt6mKDK_s5f-n_2nEs5B%5^N4e3ATiQT34{lXz> zn2f>bFCyPETK=U}Mo-!#8N9YJCBK~xN+z5*dMP8Aq`_pu@F1vB02-C3Ttp5p)N!z6wgM`av0@^4&SaK6sbr=>mb0NQ}$QPY7prh||DQ7(;C!(oV@btidkXWVw82Kary_?DDr z1erD7_j~ast`UezSb~ZNuZKjd4u?PMPW|a`;;Q@5YpL|MncmGRuV=XIIHk^BXQMft zgA(y?)=z&J1=hhzY68DZX7gL_xU*Cazct%+pveAg0@O_00OoJ)X60id-JS5;+T}1i zmDTQavsES&1+MPQ$ESljhGa*K{|&RPZZnCZxtd4+sviP9x0uR~^XTEgzuJCS=46>O zi0yM(Zj--arI3AUm>)EX9EOhl>Ut>*%>JcexvLVl9WG{!huQ9&Ny)A~!Hb}BCn%Sl z$a~TkwIi}YetProzjSA`y<@%_QCG8B~& zG}CG3oscvnMUmMaf89av1z@=%)PED9hq4j?tNni-6EM)s=bIFVo!!y12cWWUnAzN8 zWs;v3Ox3Z0+PCLE6@AL<0qv!3`6h!I$=_@F4nPy;J-J@)p3P8|tquUgQQEzlo*WmI zs*l~;$B{_DLKBg&tcht!P!syLB87>|bFV@Vl}`I3D>Qx3dnQ+j8L6K9C76JcD2_5H z;U!f433Gn~fq?DOFTTu^uw4bFvALm{azWFdm{9?_^f~T(iM@m)OrDzK`MS@-DN> zE7x5xBX$2#tNd`PwI4GvUN6?VDP>HpaT7w8Ge**gU5b0>zNqFhE~ksVUA4Smt=${0 zkSsOtQI96+pm5}kn4o%J8qE}E*wai{w6Ki;ezzLr3|1h8y2 z(N?7;rz0u|)6*s!OL9mknc3$ZB$K)EXw|v|6PFrTdzDa+PT~BLAyNA|d=LZIP8r%k zY%9%NQfpt9-ywkkDs#TT6D8-6W5T_+5(uLEln4UW7+G9Yx>GCy2B+U2&qC7CK|$rG z>2#;uC`y|oNt^W0>LMm=yxyWep<%lt3JJ{6QYWPlsx=MLR`n7FK@OU1`YvFnSihSb zP@fuzQsJP>ev)z@mUCg!n+OhVQNWxfT(P_4WbGm^SF?fWZD8(e9Pl!|ivIB!T z`n5g5r{r-B%+X?2S{{jKjGxWeDJ;~`;x-8>pZvEKe~h;IG!4ZH|A<^95M}w}NLc>; z7i`t5#5n*Of^Vf(9Df)ac}}7Hl5yWeH-)01BX^f+U!?JDR#}+ z7!a#tS4GI6hp;xCT|=OQS${Iytd)~vRGgLftIVJr3q@}Hk(T1X-v0}jT%a8D2yj@F zCu&uU#LF-KxntaQn;00J{rJCql~!)LyIU6h(OkIx_7~)O^FfzD;$tuhP4+nB&Q_d! zi&|o4e9VxA*%fkB62^W-@&n3B4w_5gX4K%&c-Y!#`H$#7WN{(kyofK?cwB0gp~9i zPol>xH$v&o&c#IEzPp-GMvLt?33v`@1J0=jAmXiX{MoJnfpEJ=V%KK^}soLU&{`(A4K1J*2 z3$3WsW98^*T6%$)*&Xem=rNB(0h}L?F`RBiKVhZ&v6XefrbVdq8oa=PiZm_xp=lw# zPNG>dAS6wgE>+8dZSChP8k59>JxR(`7$+($MHV&6$eRPCU*3YZ#!U%RW$0#8zxam3 zEDHLX&9cB(=aQ?Kl~_tJJuYXp_VHx75Ms~9`Eeb=Hw#k}Weq0q^7<~~j>?(BZ8#wv z)G=%orwF&$g2UQUYmwEw!Ekd6DCxVylF{1z21I_l?AF#=Eq~L|psXb3pG#Zdj1?0YU)#Nypi-brZ zPwC4U?V;+?8EOgI#T1)Vs_2F5toC%-I;yS06V1!0q zQN;$?6zLno$T_FtI&pq@A+Ghb>)c!Irj@RS>-7eKXe8X{;JdcC?PNwAzNr1)3)&U9 zl5wcP!Q*wO41Hfjt{7xfgDk2!+ZSE=28q>=+lp@J_ljBu%a?wWYyTa)*-g-s(XFez z6Ymd}Mk;k|H#hPEMvlV|4(>ce-j7HJpWD8JCS7r1`qN_v&gR2Rfll6wd4nWFuTkM1 z#eFHud*}XTvFpKatY>EgR7oB}g+y&UTxjBPA6?EVZoNd9uNt*%b^m;0EF8;JKZ`Hr z!Hgs{L&UHtytA0zPlkZyebQxb>&2)7e;4TP(HR@R|S=7J?_2~&t|^iYF&+1 z&hp;boAw}ymVSbk_$D{eF05sfz<_DTZf;60S@kJ^GKpaB{S@JpvOK*YjgA!BYU-R| zP|}-Roa8^U{ME0knG9X!eKC*>F~A<0qvOhN2pW=3<&lK%f5!@>^i!^gw;ZU=;aO)k%ISLk%hSDxO`;AJ!J?8u+PoBamHNKF4Q6C3K&rQ$wSQJs8^=BIZ; zodK@BX_M~58`636a~if0JD5iK8f30m5(#$fFXt#|VOLQu?VV36Dl^7@=k^F^7w<3x zl-iV3U)MZwy0qk_Br<==lcZQ5CtDrga$2;U&`2@ftj6|Jre>th~qPzcF;Qbnx8Sjvbe4q z z6u7Szc&=|seD>tTFtaD(At9M{kMIJA2i?Z?C>S| zqpgHsubS|&nIywS$e%`p{6lTnm?HypN|5=&+#UailyVC7^v8m7rx);8AGKaCw9upj z19i3jld#oK7(7yrQ;n~fh6T|Iu#~9B;<-8Yr>%B;rtr4c zI64aWdu{+Zi7$DcU5OyZjP!?AIkWdGq|N#q$-BGJx?TNdDK;J!pmtsEU+$|MSZMUg zoM=6kF=}izJ57=Ct{1y?S%Z-)< zR^p|d!^cy}v1)n9b@gS&00R_#=x&je%k@>UJgVD1?W*hxqvPjD2!jl(V@;XxT;iQw z{JQo*-w4zX8l>7-vHCq!egvVGjQ5$@@vEuBz3D@f#SGkB9(LYrdRBO&$HUH1 zsAs*1<9*9OsvutuO`QHlxX;yYF$2X2NG7E53IO1Zi;MC#v;X|EhfGQa#S#jgIrL3? zZrDF=Jk5dZWC}lbyKW=~2|oJuWmT_)Tw`UcZIQ*-S~-PxT#QSIOIcI=N-um}P4SB! z&t?av@2~0HS35-emWAY&pYU7NTYRAQbNTc7{UBMqs%zgWNW7RuMPV?5rT-cH2(!v~ zbna>U?(|`mNvv7HSE@}B3IZ5Im&9uK5V!U3)!oVnAAiiXduv}W^-VM7$J}GX{KOqe zV-Svq(glmuBKB_dM;8mcKh0)FQqp3m-KEDFgmlia7zZoaSei%)0nA86{%U|oTFcd| zpEa2Iua$mD+SGiKB{eibce=tX7hpbyxl>HYqx#lm-+`}|e`jBiE# z4~p-`$b8{%VGyKRRL2D~LgPI1H!q(MP;LN_WUAgc$DrODt4{Kg4#eUpo6!l8@F$ta z2xauyK0HUoT-*G1-u$|{Ij+1IJVMGB*zXo~f~NG0*i#ltKm0LrzoUrea4&EP;tdvv zTdJv@5vqc%Ftqv>81(a}rGkvrd6E}-Zp1&SN*C!ud!N6^ktxEDpWEBbjE(aWz1q{_ zX3n;CS?*lc?oaTf09JFi zt$i?w(of$+oimsty{4{aYn@Uj7LkaY%0!RS-)t;TW+7%6e1|SJ`NO}p&6=N32Bv@BJXp!SU8z9U?F^zEk^6SZK zvkujrRD~2pOo1GdJ;D+X03xfjn_{=;i==xyLh1Z@#8NC#*}N%#3Oh*I{Sw>DTD@F3J4|CK4gF>d|Z?_Frxv; zOb@g}#y~Yg`HRoU>w52=EeJ906j$A4x40~;_{{uh;H&ACkK<`*6kv>3Bd zHZ}O4farXU^tYAIXx6Q5zgtAc`8B=GIcwHvh{Mcw?ofUufd({5Jq?xmCs%f>J`S)p zzdHT>2fx@df(MZgVQ3mkqVHNv$++AmU#ndplwkU&L_A$hd_Zr=BQe9#7~e|teV{JJ zQp(aJn{H;wC93qAPNiSIcas$Z#lFdncq`?2A{mnQA#MJBNT={a)E!c3svIh-7!x-^ zJj!mptHrH3RPoow{;5JWQM?{QWrLYG{Y#VHe;T_QdZCo-(u80q%QwhR30F63S$$o{ zi?^KL2q?8~C_Y+(&_lpiBq0Y@@pG!J3puYqmRjsq1DsZ?)mRW&!=%mpq2myN!ksW?N+gtaVj_U2qcO#Ve2>p10iJSJx!A1F*jRF6lfo}^hfW{%Devh040BK@wXNVIJ zKTv_w5v1rh(qe^Q!aoua(c-2s?~di`N9&RbCMhghM2bW6YyZ#&vs$z13^3n2d z1Czsc0c+D;si$^Xy7z6#?mpK*NschjOYHQ`=b}QTCHSwh=!RJ|&Flxhb+Kq}kwwz} zGE=@%ulRfyK){OfYK|T~HDRob9Hjb0+dtdpjig}(L@|ttaKJWH8}h0V!eRa$eY$!X>l=S4)L_(#iWd8@CvbdP{2fi8L}DOHz3bmiL$6^X_w3|q z`%$Eq^Zp=iN1+qjjrWYmoEI{gQ((_DL1?28N~Ozk8dRQEr@E@;J^~&TRIM(ecT`*a z^N!A{w@3nkaOxr-mYo71U5@oU9h6m;CFz5tlZJA}*RE4b7ZvHRTSpXeI);5%?g?*a zR@94$u1s;{5FUN?rS^sq6tL)4S92#kCeQfI}imM5o6g>yFCpHV*h{d4LLQ0jYMXK)IYc5fzR@ZtC)b#Wj8|P-ub!!46i|bNXN9 zE(o4P*a8*Yg{gds+Xnh$>WS#+GqHTm1X=BT4e%7NEiMRM>7vvX^qztVdZBAMQ#s?x zyr3pOBiEvK7!iQVK{hw?6R8jMlQkzqZAqjrN)n6go4@$+j@mMa$cEgY%+zX0s?DLIaR*?cCUKXBN1_-&53l&X_17VfzaO}9=eeqwqXj6I1EJ`@Wy+KP^shR~M2~#s-y-zG({CRYkU-4h;pcT59Wo@J9*3YV6bd$3Y@IN&9 z`!0ll)sO`xGs|^E5hliB!Ge=B<8j&*(Tk?(Xl59Koj$d~x?Qq5q?@J4!p$Z6=%LB( zMD3DE%w(vv6aYV3K6#F|D)eDJ;etRE6t89ee#F1JYw9CZ18IL^a3qvLWO%BC>njd|ctL_wmXQNyN=hZU*=(FjOf*&&`bJDDe z%IhRuGc47ThTEa-0ThW(f#waxo38dserOHea2N#YE|=LUWvj-aZjD0U>VAq{qi@u( zRaa4GDYAa8_0fIfT`4@ zxz6VvX3xaF00O1yrIJLatzATVMjy&2S51}iXA%P}X^rSqgcZlI@Xc&b4tDVymB z9Vy2<>dS|Rc$Tr>b_>yE;OcTSu=V*W8tF)ykO06v&+DVui)uT&J1z+5c_)5pa7Zxz z`Bm#u>-nctk*eQgpg;@2wIh61I)(yyt~zsrtu|UB_E3Y^`o9Isce}$t&m=%##k;Vo z&2Y6lAlHffT^Ir7Tb&ZpY{Ga?Q*S^VR#QI%y}0#vpAk!U05odoPrfVK$#}j z_-&_vQ=A@ozA%%VCGL}IwAXl~B$+hJxN&xdX~tUjbHTAZmf0~!O3_&N*{KN2*7>mp z1g`QrEaLk<0VU$UFZ+owU9<{tM+h>g)VZT#jfT4QzHgF0OAra=3|23}vdIvN6v|Ue z>^68~vnHG-kSBmMuRMx>`4(Ui;U&}uu`Msw;>^4AUV;9!?8mlzmgT!YxOXKh(`iHo z&UT#|*K#?wFW&lD4FA=yAft~j&SUdn*9;%~c`A9r%9rAOZ!L;81N2$0mirSumQ#E^ zhyQO`tzlj$yNDc4u!J`*TGMu2gg=#4cTwFn@m#`k%D7k$IzVS4ITRtn*QNAoxU8u< zm11-#l*d-oOo>Hk6I9Hop@DYVk$yCS>eVAp?Y2%_ryKCEn8aRxP)!+Tsit z)XnWHJZbD-XFsm$n4N2myDt~O;xpT0B-EIu*&4Xc&Bjxz5)x!2lZ6{w%$!<_U0d)^M zh!vl)>jVdV{rZP&FwBYZ{`N}!z)_5ba`r_mv%NI;aR-~6Tcnq!OHZVuSG?h-Sun4N zz!V{+fX+?EwD@CBm%|~>TwDGM@+exVWC@|~e9l#*6_Apr}Z`|fI zNZ~%nmgFK{@8=E%JKrVw-RD+Yuz^6mBNoR^Tg%L1IH#_`neOb=69kVps%o)IZ|Eva z9U2_I1Ksz({)v|(7LO;^2Tvx^mLEo1)*c@u5$8$AaEd7idwjOSxj{Lhcz0r(M4_uF^KLe=hWnrbUsPJh3a>!Wd9 zoajm<70Y}}$tMw%v57fK{FSlgPd|D9iX&8>Ts3$%ih_Pg$r0)vrU@jYJPJO$kE=|< zyRY7p1K3W#ufj_kt`9 z=$E)B@&Ws}`F#Cdo$2Kk*>dewa`R}())2n`;}KX~?06;^Zn!&t-kCA$%XKW+pzmPK zo50qN26rrgC1MgVgfRrXdk8TF4GHi>tnE|)}2QxQYx_6D{^Vv zewKby=9*7qqs1`rWb(Q(&b(}X{3UkRiw*zlSp>4mO>zIU)S;Cq3aTWWty1Et{hQC< z^X7TnH*==X(pp()QPRP?Un8>bfYx8r-*US^E2`9lB3C7HM?h@-RUs+w^#ib^0G<;j zL-Po??lf85it zhz0FBxyt|EVYuQdqj)&F&iA4xZq%W~j`Fj`*k4KXugb@B<3x2O4{_#ZqeCx|Jr)_y zv~nQs)mx>+hD&ow9cZAuy_@Q!=~K{~)03V^e}qRcZtcZGt+F-qqsP`)Ka`(NduB%O zT#m#C&w`{E$QuaEJIHAKA)T>ZHg|{EOOx|^rKLx=^qsfXrLyjT4agsso15GC?^K1v;%WTTOC+0EVVV)Xe%6Gx##D44=m8O@+A{5G%o-y z0kf{{4;dl7jDE1n#rw$O1DOAn1y`HZFh)$7lPhF4?w@aYvdv|f<687gtJ!QpRP`&Q z$-DBxOzJl~HYh^WF1vsw&a2YGEUC0XioUP>w?W7CZ?{K8p*vj9@BEti@&O!35k&9N zeKCf^g&BV}GTQuzMAX|YJOv#c9i8utI#^jze5c8M8~Qd$bJa>wxegk14wHFF+CN7e z1;u*6fByQp(64d|J*_Oyr@oON(7QT}WqEeV9kzIrr`G$8u|r6|l%1tcK?X3u)eVJtwdT!Nc1&Ts9GhaT+4NnT8a7Db?b4PZ~IaeU)6r029$sdT%)E#uI1l`3pa z`!F86{3F3*O`zW2@nk7lUrZb2JTfc8NhaGIJxM+a+KF?I4oW7)J3#a*-l(C8L>~IU zTcdeq1M!Ezbso+!k3lu(-@%oQM)&)oWTOZ0=IGa9IX!VT7QZ^=UMdtWOcTQ^n~$5O z0yRsuZXb}n(k)c=@cj@t=da{2`Ad!4pk#{Fd_qd9gEYPQE6#3i@4G|PM>IS0TB&-n zOCqJ7qs!y+A6)^pGVXte28!Pp9hGvl{IP`@Fg!np54d=_SR=3_q>NUntd|IzB zf&H}n*6^GNIjoay=F-ZR!{zd}#%ju?*4dfPvXUeN&3 zU|D?vidL9y4U8RE*90K%>pJtti()}#yscB#T7!PA1^%yq?-FmEc)D3#Sr%yAJ#-<% zX8kVb!N-k_xus|z$^%MR-B}4L#<}E4Np1FK=9D?BDd#!L=rg5p;=QBlKZBWvV#IWY zwFPYBsT4~~zbk8YGrgoL)&4mp)3_^}zR+GE8z=l*zgOcO9)}%UE@jT^yZx#97;y~x z`DfrPSF6l-PrP`A_44aoE-4LgPz>;9LxZy}rb?9y_|vS@@Pt=S=-r-1>hj(lKdd}l z;i@jL0X7l$w&tNH?WCD*1?P8c;$+BiyQDjZrn7X5ed|;_Js0B#=I`_LnPw|@{WDpM zersgMrKNZZk3$n(23*lI-mlp@b;duET=h1O+vIR9f#&Z{63Fh|`)Q9w-D3&-53aENIUiTKw1-D2X!ZXeo0+q} z$`j)V%DUcvj$3GTirM@-nFdsr3t1l0@n#O|Pc3Ts8ij#o0O5-Kp{S^9=^bGY1;!bThFu6a}+oH|GBLk4xEq zJmw?aw?BiRvH3Y7`R@IDSDM*h96ZGGy?Vl6OQNZo=4t%&AQ+IX!;6#Ih>^SKgS+zZky}M-7fovgC$BAjc)x&CNX>GqUs`-t(Dut*2$n4%iSjLP-=j@JI4<(K2!DH4LJ z3Jy)VLe-)SO3 zRT?nHh5cyuv&jNF39;q;wID$1e=|2iEcT$MDoQ@>t;f$UjMb42;&S}FT^Ss-zefAi zy|^NU*doy}XJO4vxw8a>iTg9}a<$OMZ7UD_xB?015-*Tt;TV7@vb8;y2J+Y^6J5V# zM)8|>+A(Udg#Y-aGue)E!ZX?k8Lk40+ga337S5IkibMy=PDGg5&reO1=Y4cxE-!l^ z<--LJhWh6+76vyZ{2Zd$)H`fS02&ZOGZS!z%B{^+ury{QcF&WWb7i5%YUca>m|!LU zzgv}RUYs^zrBcf2isz)4ZyUC={8X~)}f~2`4z&)8KJ$|&2`3LkoBsxC~vmnb>6ae?FG z^7c!|T5RiEQS?@pEfHqafRAV7iJ89`Ky;2d+QnPk_U#K(Iq#n+eTkT#A`-01lW-ma z1ZdqkBtQ%xN(kTMkT6677p;!b&gfw3N!KjAkXi~x9?2=i)#sKkbb z>|jqDWcK@Gy8B9Wl)MpLGJF{_2isYBcrg7Hz)oq{Jnt@woS1iHM+Z$ZD~Q|e?d7}? zkxdLL2XqlTYt#VtB9vNsl0rT$X=J`|HJ^ke z4!w+c=`h#2)q~6R!uyZYM~9UET;pTqUnJobY9%by%|zw8zCX3Jb80(86BvCY;Y#>R zg*n2Yze8BB7R(ISunog4_JIkMPVBpJm${O*@iIfH297FGbMJiXY*iVl|7&QzH0*D= z11yW!QidH1wBmL9^;DhI*(Wlv``hYPBit6f=EnqW>cB~@v6Foq*E|5GjMPzgP5d^a za&udAUy=g_nCv8)DZaH;BusBwa(L^xH1i@5`-H!io2?bCJ%DdtM%T~ZMffYwhjA)w z04bM5HJe;I&4BCuO@>h(;fchK?`a}mvsAi7uqSGazr#;*pB3Q~%Yum?%pu7v_Tk;g zRMwWlmb=|G9i0R$dW}3avHH#&n^|KQ8OG6_t1Wh7G5=m<*97-ysF3V7UO(DDqaay1 zu@Fmw6#T~>O+JyJD$Rx0`HMAY)@eb6Rh>Q%;gII+A{;d67`dukEVZ4V$t6rY#7rrd zN%BYOzWEE6sWk|yjs+fW7EfZvZRf(MgTq|KpMg$Y?CUJ2cE{R7?E^-jxz2>Smi{?G z{Q|gdN94#WeZe^__r@4Kgh5cmnJyuFn?MwY&K}B=%fPH=zA%*N(Zh)G)RV+st?O58 z$tv)rs@I_e!Mjef%WGchUEdgeYX8Y7DH>!UyNM6Q*0q+e-+iPW_DLV`^2L!5|;5OO;k@y-fP`E4m@ci`$4SeZ~iYe2tan|X?y@xowU*k}tf}F2&oXb{j z?jR0gX@`YXeNQb^*^GP3WoN?nUxZ0lq}%K;Uz%&CyZ zZEx>fCsjqWD##QuS}23Hy>-2~m6+l}9Ug8{mFxXe=S2`x5Kb|8>_l2_74<=ux2t;a zUaHI3Z>Dop22i+zesh8Ea|(-?wAqGQ3=;kzaY(RGdYwYQy}u)rmm?Ze@tmCrQY=$R8PhJsxLa&IlXA zMDL2mTjU_u-EEUr7oPvc#d(&_laafwO8>h_gn%qDWqFc)+h(vbewPuevTSMpbe7lL zSzl$V@fLO;wb&AVN3@Zjm*{n4bCgR!t>?p2&za(`WqD|?a7^6ujuhSXWu{x;atp6D zs^-_ZxEa);6ULN~9{@0giW*|fy;uyIyk=2=sibi=xDw4Z{E*YKC^GGXhM z{`;?LOpouaI^{timmOjF_r+>~2goHe=)Ew}eH2IYYlT08WDP;NN|}#I!ko=c*S9+v zo`<$vM!RJckV4=pYFQrrVvW7 zg?vq`8Db^t7QBDzoz>!PIlFF3%E9K4^fZ)lv2zZCGu_v?QJ9-E!*7D((Pus8V*8sX z_Rc6vInC2*yMdTPDT;*1D{1;;u(20S5j1T`-TeA!*J7 zeURV44*VXGL-u%Ck5M6p=-`1jT(3XeiH6J1hQ5OSAZ)BPuns6Z-HwFYT8EOmjdHki zzHyja?-v9ETDpXxFMMlg_>#88uNy^1jsXv<(GWBrgmH` z-8_R7gjdc``ySsG`v@Dy6Gm+@DL5Zn$-`W_))2B;kK>bR+Q;G$M~ldiSk#u<%WMZj zKln_0y45u6%6TxUxhA#W?iUJX;1-3nw4k>MDk!9zaoRB5TIY7Zyq z&F@Bjy8{mTbAI!x#ElivE0!6L58x52A+IM*W|x=l_F2wj&t*<7lWsm%ruE`)ml3K@ z@HP(HJfe|3Y#Hq+bmzEYW{<0Flty+}+iTt}CKrV~?VhG~8xd0JLkZyBz;;Jowv)}4 zuaK@?3qK}lb7rougOY8Qi^(*U_i%$d;NGTb*P;QrS+ikvi{_o=5n z&04f4_tg&YuyA$d7PqZ6;)Zlcqbzf!$ir>DyL5w<#fsZ_43FrSHx{SFNrsN|pIRWD zVOi7C_4jK{eWVZfY1n-u>{$R!=Kw5Y{jp42$Cwh9c|g&i@!QUJi4foVv(;70k0PN< z{(jVw*G~7mHer++c2~h;(`Rzq99z(@D7tmC>FdAr=ClP3&6K$}*Y|@((K!IET)w|+ zwTH)GN816%bw${~VU&uJ2WXcvv<-O!3E&g| z>&&If7KHOl(u&h*8s9M@Sf6;Tugpfs=^_UivP;ai<7Iu-c>=Sc`OdP_fJel!$~;NS z<#8(;?BQCunJ9fhJO5&nG7P)oev*R?)vO64TKfd?&4U}+zTrQjPmf&Z;p~B%#aGr= zZ+)%xS8})$MPh4}4Jq^;;JDtO8u@>6&}wWUE4%s4iti@-USn?Pc(}5)#ROdV>ZXw6 z-Cf8W^3;n7EC;*Q-C4XSjVn9MkSss_97Ihin{|BmGB(4!)@ngUhF$Qt{=)~;8H_By zAB{(A!OZ{13ou8$w>(#8+S}dAR3pB4XR?j5rekSyKI1vL9jW#>_V?AD1+DM?Vea5k zWHy^s6-6xo|E+)Ox!c$fpsJ^dY(OqhBY9G@aT_q`cM-5K!y6FwBUg5qx}IenI1ACk zG#G8+*cTp zx)?+Hj_pHF_J-r4MS2cKuUdViXEQ8{MZ+8V&DW;%BR>PKexOq}7k=p9X&S ztGeb-B*zS)_Wq1>??FWqnfGy z8knA8WxO-I3C(1dFC2vyIfI+WP)Y{#o21LdEic9mMl1b3s}o@|zqa?^7(&ArbvzS` z=hd3pbZ@#II-Xe3sS1Hh{iGu55M0v|K7lzpR4Fv98@;=4!P%()k4LpqRLnDDnuko^r zm*0MgTwao@go?XR81Jce^UdNQSLy%?=x;`4+1=gc?1R^tQKgupQ3IR$opV(!c4DRe zShc?GnZH2U&1|;Ku?TfxCnIo6U-}uxX;L38rgUKOFc3Q&;&)RMsq3ZD4g0AiT=y&D zhKT*nk9Fk+lVb3x0uJTY5-t&oTYZw6Z2`bfkCEXs+0n<9Hmknai)HV3nUA~Bq;vVr ztdCZQ3+2~MZ>`Pzj<4I<$Ybm8KqbNZ?tC8T_T{55GB?Eg_%|_`Kx95G9zd1{M}(T2 zqdVQT@@jLD-_B2IL?~4wfXmG&?}?tH-oWgVRi$yk8<@r(mmag21q6muz1v?Hv!87nB(0pNJ@hk=yrpUM+p5-nKo&AjInRLI4I4}B zItU>?OEzr}?FTEqC&7IhRRCi1`@g8V%BZ%wU>l^AmSP2pyB7#n+$rwvQrz9$3KT2F zogf8@7k78J;skg1;Jo|2wcd}Hl^^kY&&`=LGkfou^SVw6Vbu0NhQHZa)4y1F{dsOv zH^2-r6Y`&-cJRHb6yk9|*4zJtyI$G6fy6Git6wAEG%ARsXzw3&5r>%~E2)x-;>+_v zN1aClLg4a-pyRm6neFN?9npTno!1p7i#<83uaAutN}8wHjur<;O6LkG>2g%~p#60TNRes8SfAk*iy?c^@1=*oq;?QFsx_pNX&j;6uG%HuAp zHCH$PCFo#`3>hF3FDHSt~Q& z0!iF|sj(Q=6fRfmAfCLPdw2`P>-k`UG{BwS0bZTXFp1RN?1a8`d=hkhS|K*;%lsBJ zo%zPa32J*~#n~V0{ zJG}bsvdYskx};dLqj7JX$9&u^>XosWOY(=@vRsZ_6_LKHj%LVU# z0mt!_mJ1b@u*>+7m&zN~_$kwEQF?~wlh4jvRE5v)HuI?=Ts^<%#mAF2FR{jGjPbZ^ zR8eH?HqYfB-9~O-&@j54z88%uoNe$tRr1+#$NMa2Oe`l94$7z~?jF-0?hr*{<Y%I3Bg>C=ybaSdz*1U#PHC0X*wH^K9l&AR{!EsgtE#R!YE)ceQP@P3}7 zO=Yp<9|$NEuL+$2oZ7R)a{$bKTwl#rXC<#G%Dw(X%E4QIRf(|{w#f4q=Js)^h(6x= z+&?_g9SpsC2EKqvv=^&EEb19my*q=2Cs<;PaRe z#-O3k?{WFGSoNqO)VLNg+hXYZz(L#(l^1yl7kVwreHtzF^_ES=URUHL(+rWVdt>?!F$1W;TGzf9fNv3jR!S)2uev9E)n zlFX@fIUREtpFhEo<2_cn%lL`#+b3Sc}DbNB-cbLC;Jd_M*+!9>{Y3Av86W zgkg=&eeo2#!`RH^4(O103kUipdJ`SW zUOFIWNfnLbH__?sG3$js{(3bb$nG9C{r?)5P%;pq2;6NOs^0g59QU941{ifTR>4Wi z79In$Laohh`Al_QOYb1hOQD*mXR=!LHz~9l4Q_P>6bsv7LlyzMC`klc;rfi2&#%W> zZr_LoZtm7d*!NwFu-LUMWs{}dM?VB1t%T)TU5+u!t3GgsI?T}6B^27FH+OMPa-)5b ztKZ^wAFVd~#Z;YopK7!L8yG5`&2}}e-o2V1UtUaWXrXP(O5-{^S%f9e8lht2{@$xJ ztTysi7bV-pHgT%nGJ`s1Jl!o9wY0L2K-LfUwgI}x?QJ0YPLZAFi_f^o>istHQZquQ z#altU6H8R(fDehYNp6N!r=ZD|MZFmnfhv8yKJ1jNYBqleZpj2;`SG&?GNSP%-iR8! z!A0LAt-=?-W|$#GlFBg3)8p2j!1V*9-fD8eoQ+jyu|irRLz+AzzjTU;n8{Y!$Hi9d z7}1?|5TOBY)V=@5F4R4(8m{ za#!Ma`tCy6G%H#OQkSZ{MEZ!B$czPWFe!7jBBf+GvdyWjxy&GWnM z?d@L6x*rG>cE-;C-Bc3c#ZxnFlXpI`M%`b%Pjqp+Lj&1x{w5E zsWnSa&nR?o69^!j{|%gRNW0|M=Y3-Z>k0`R!I%d!440TH?nO9^tTjPcfMS4}5iL(> z#|o^$ZOkW|Y0T%kKGW)|IfGKc9klMsH*z$xLgG;-$jL)v);ybLUdDM8L}}=z-7NMo zS0jH!en>u2I(q@A7-lYIU|*Kwtpl^uNA-wQ~qtddZZQZh>D zB4wf!Wn(9}HQnm#TGSb_nFi^8;NzXuw-uc{?YP)i@^Mnw8<~?s28tB#9Sx=L(*W&K zgp>+PrQ{jSwp@MXZq@xbm&tAD#qa*|=D^ zeARs>);$vy@x-W!s`?=LBl)oKpB>i(`j(-#>z>V*r&W@-&Lxs^Oa_pKvfGcU&h?k0 zuJj?uV@)M4qZD?~$8n8p;u3QcpOC5Py^{sI!@_c(z^jyrZYrfkrLL7c<0{>f3}!_M zN#x#b)?`e6S~i0<&%;Ecwo6@Hp^Lln9u{!1Di@@)OT=>(&41#xR3=+@nd$g>B%Mbo3|i3-9F7V z@5=_9{fblShN=}}TH~Xy^Mo(nkNO?HTV=%ulPDc+uK}x@erG;W5*$K`1mmYKCw}vl zhJItisC)sp{cmi(-JRJzT`Iy(wOX8SlKDtpe^)SX^yP>m!mGWc{*m2_l%5HB8VCb`rpC zo(l>*=6;@f3_q%Ph*mdw^u@GTy?M$mau|vp(rXf?m1*8UZ}EVpkCMJL`_nCls@h$V z`tOYNNTRj67oF#?wL12rte4)wOqg{mmv449m?6uPS5K9Om6zz`Vq~De5GPJBR0_8z z(a7dgMVf>k2KhpxD^}aVS8{d6k)ySbA9JU0#|#y4qb?(_2?X?4RBF{3Kl}#4rHQp0 z9nd_eC30FzpH2?}U1P{8`FO&?yB6EDV$=!}l0V{vl^VxvzO?vc3NmmEN81rWH_rs` zgwS8NJtkf^c)1&2gGoV+_^{UM$D)zn3Hc|ZMx(4QZ<<@nJ$CGfk9Jb6pL=3&hzH7A z>=#j5N_dCf=tF$z8&B`cFDTG{ulmB4JYHRM9$rib$hy52EfrVQ#k8RXo7Jk|Sb*fN zq}MA|w~_R>bCw(K;Ul#=vcfvQW5uj;-Neeg))hb^-RNhjkjwedTOldONS$Ocu9_sCv@A){l9}cXZ&B5vCOjUl}%4MN^!;BKQ8?ylBY!{sjQ2@N-po9VR;rxz{?lR z-VJ$uy3d-o(`xfRnad!(J2|4|_3JVGLS>M!NcgEDZ;7FloRWbi2TO>FeMo8Tn+>7Z zkCpohio@kYSk{6~eOjBKqKn1MK)BHLLu~6$6$dodBwvqrN(9pb{Ev_{E zsBNvMV=JcjH?E(Bk&^<<0k)eQvvMw`U=kFNz-3?bf~&RG_x44qKAnl`v3REi0~xIB zP)e{iDWo%?`QCN4R0`f)X?j-%9FLC%1_`}R@zL^1pKEqptP3cT9$sV4l^{r3JAra+ zEj*w;N0mawE~@Q6w;mPT5=_rFXzg3}(t3!wcWqW5ANfw9ZsQ_wphcg3n8(ViaYU%2 zdh11x&#Mam*2_?|72+B1GfdKu<>YPy3!SQz&SoUEty1tp_|d`rwM2?Fxr5X2Bw(#v z$9I`INiC}@PpR~work4LWyoW}wqNAC`};&ZP-0@DR=Eafe}8{)XvnFh@_{<3^jGAA zv-y;9!!Kyxw7Mj*LIS+Of(sC@I5=SZ&pGGa;2~27Y+_LH#fMzA=7TBl|8}< zet2W=^T$Ppv7?*lEA@}-;X$MsR3dlC*H@`hzW%oz`VAI?xRT0=%Ofu@x8801r_n=Y z5vgD9d|y02@Ix4`*AZ@I&Ux}34|c^WnqRAYKJo}JDm-n}(;Dbh?>C5xKCE1hE&9AX zbUG~CzpkR%OsngWEz6Aaq&$5qD14>NxiQ8!xH}j1S~q+z*?)b~4$cf*R=)=LkgH8wpwphP`# zw}oTP!ZiU-!U{B1`m!!jv$dLzgTf5>w-bVoWnvV{pZDxn<`!kWMJ4M64$Wtkl`KgFz^mk@+#s)9s?)x7^dA#@X zv3MkD!aEmy`#d~p!hL)1zZ$a9r5cNflw3VaU}=j<3T@M@T(1P6{PcS`J(YCu-wW#y z3@|L5INCb*ioSpoU#IFfLT34}<;aqQoVk5bDTm@*E9=n4=k`HI{ecP*%i2Nrnvjc+cjwn+!i@C&vf|TszI1oirRke&?Asyl z25u%ur(#D=tSzk^n=`qCVCg>kB=dj31JVKK$BULj3PalQGq@Rw^s1|^FUf&!Fz+^0 zCRB|_t;-E#yiYVg*Y)p5Q^t*G`Gii-IADme*$4|n8VR#vD)}$mZv({_qpqfR-~Qx~ z8T*;UCyGA6#keTNmp35MYX>H%i2@tjcXe^=XxpZ0Rbq$Q6tK!nY3Wnw;iMdjS5;Y~ zfx?UsMU+4wBCqM;W&iu`1j1+t>7V|ls>K7-p}45$*Y{0TJXe2eB$;od2Upqq?C`JH zJy%krO$9NlHd`8CPDiLw13sl#W2uGvBdb2olNZgf+YWN&V(P>m+lzDTjRLMS1Q5u7 z^(#c6&aRR3X$%mm;2IV@9g?Dtrp!PjrVDg6`C%~4*a|P(g1q~DuAhAdk1FtzCB$Of zNadKef=iDZvMq*)ApP&|BL0FRn4n)NoB=)YF+C4pOl*5+w|iuC&^b>qOGGwTIw0wp z->&>Tth;g9ysgP!(k|e2mn6VUC)4BW&&C|3Va9<8)BS5o*&WSSd$A zSl=#2)#UZeL;?xVqw`)SglGN8(%Jj85nvJ`dYkFLCm#E;fisg|EA3o}8AlpKC$ATM z7NQA>u={1mZzVsf_$yVBbPxQX{SlXHr2Tbr51s$k@8~BgzVTNx&CA!vou7~XsTb>& zB!BG;Q^;Af*L+eNpVRCxi30Ol&V0{uB}ooftN4>m%IFV9U&dw{dOuW7VzVWivL`N2 zP8;=wb4NwgNh?Q^D;NaP1)TP`tl1ura-E|DTr8q+9k3jQzCOLg`iy5ZZfMWH+;ItM zmF$3&Lf*Y)^N1gl!%nJ85_;$$g%1>_Yc#(J+^e_02z!ctnoP;i%d+=YkA{a+{F9`h zMR9BY6?THYHk|l$_X4riY4gfkf>3G^C#MMcM$j+n)l$<^b2+xcdQ*1X%&v=B%ohCS zp+W@@$ToRaJp^mE|WIa(S0n4&k&dD_51mOd)y!Z=R7s9%sM)2Esdo^L2J?#{P=Q)KU)3xiV5cktv=gC<5Y zNef6ZU_Q{uo3H8;AH*{S4VX09skNoGuUU_nih2w4^!_0Csw2TJ21rRyI6P;=9kd*L zcjIjGW@XG$!C;rg!ymE}CtHRc{;n7Mw7)htH~;+kb9Z-Vbr=xs3Ukk*<5^u@EJT^V zxL18R|NZe`^NAW7W)GQQz@m@;7|()MsBHbooYB_C&gRTI7CCnP>JB8V{QIrPgEV@W z6SvmdsT7=Iv=N>NCQ&ry2163X7~;?Mdtd*JCvl0It{r#UUaF__Rmn@2Fm1MP&P^4E zqoM2?Elg|_&PdJkaa7uC8uLrg;Vy2K3o4|ZT_>-IDQWi<=o!pvb_rFMvyZ*|t+-8o zD12_u4#xSLv?1-IPvxYq$*$qc$}=h^f3JtBE<0nxsfL>Co9j^9^%6 zP_!gH4umx_cvjuiIlpt43O zLmGg?J$H1i_8AVCu%LDorI23B+Y_vdi@TolZr9+aGvVq-?JF zxcn45zm^6d_iCl~10x~`CbK+313|-1Q`Wrc#h&Rq_h157n=`IerA0?;J_c1@F{6&G z<{mIhRUUcjBn}+EIbskCU5DOnU)MyDIwfb(NR$=u1GF-+8McL1|198nl%8<>Y&{k` z1pRXErs@AfRH{%U%h6=_B|an@08fQes!D%vj(#tV6duJav>|=cE2=3nj-sr70s)c82>%!t2VHZ>0PiR~RduwE{FG;uRA- zvYvQ85F@d>{qATv?j@Gns2MBDMj{dh4dN8`5c5`TOAe6+7N}xUsOT^nW^N)X?iXWD zvUL<{ig)ZEfpFk``{Flgr8n-U+ymDhY|1nVI~) ziG+xOQgqEmBOa;ofVSVGIq@A?%1}e)T36!nN|h=N-g+1l4jrv^&7-MOY6BeyD=G+n z1i9G}I#l6MR*B+i&i2BnZn-mNN8KV3pFM`kwG>wUv|Mu&D!#}( zw5+>bz?6*REPIAy(yX+54B78L`}tjWF3MU^8xQTyX3Qk8gE}QW_52B?<0!JftQ&D9 zIQgtVj$a!qiWLCny5s)goP`PG>6r4?11V46Ik4euvOPV_I!33)?-?z|Tev+TZ1({{ z5}jLb?zk+|EL8TlFLergmymVMnD5IaPth`FK}<-)g?yRmc zg@wk#h*7a!aj{i#7mKZdvAMAt1t_(w5WpzhGMYicq@U6f(o0bY*&wzc$XWxe7Z=)Z zA0gFT@2H;$j#LlI`*Yb`UBAj%ER~m7+#Id%OCrR;lYv$ztE^^bVrHWmB}F$Zn^mdt zCxlmoY!@+~{d_Mrv9DtAokyMe9O2Wo8(x3Pfr&}o`>xuU6Z8BaNjX&a%Eeud>Ato{ zwD#Abw?QWQji;3ze#r(zJcjNsxB*W*`YuO>@>~W1`rjGt`HgNR`_=%dLtFUmbYH;B zMriHt+TsK6%WvL&2%Td`9yDUqAJo(G{-C41G*soYDyd1~tU+BF7}{5h*8EkVzC3qJ z8FOnN?@AT|oYxALqH3Rh+Ibv=XYdG$PtyjIz0LZ>u4dqhqCGZR=*Kt%uuR5gSRBc?K}gWzw^> z^a@&Zp;HST4-mK4h3AilleQB890g^}xYt*I*Up_^;rjz%rC0?62q`S(e4xMB!eqN> z`5FGc>&Y4NAzDsAJYCwc<&GaI6_jd(sItu(5ktaq2Ay5*$jW7~vx&uy$APi8S@7pu3agsa(!daSMg=@%f!q0XLD?p9WyC@&ZAmO%fiX~lUn+x zV)}nWO3Hlp`i+v7s8MQOIaxDz+@t>0etN3d4V0r?4J)z?*S(P>tI&|(5*PYrp3N!_ zN%}2PRfxfkRq*FkNHC@6$d-MwuXmyM%(f{G?EgA<#?G|_br~QQ4Uz(9Qs6Qb=y|=` z3FSm#>O5z0K?OMU6-o5aJY=Udn(0zLYv7cjDI4Mznlz7vm)4eP`Fw7&);2ICc(beZ z6&zQo(})D3qIg$>QXp4n{1SPw0uRsXgP)ZEb$Govi6t>8=m&uYPiqX-=;kY>%`9Hh z(S9XBqr1Pc616z~Gvz4RKFqrxxgls9Iazw%$k=1f!io^f&~$h={(Ly_Tm;UtwXEE8 zZqy#)L7B#t`-b71dF|tb3!>Sr)q1z^e_8-p9=wLu=GNxZY6aZ5tfW&~0g#rq_D(p& zFWM-R`d+rXryFWuvD-S@xX;aM_=zF{O<}#ytmshZh#N0CDKiVA%%YP;AIYn$tum`6 zt*j=acer^>J!UtS@|k(~_vKEg_@;Ko*E3`JgMuYl?jTwTTJQ){b<6Qsmb@=mhyxsx zG`%a=cd%J)+_6TRGTczU04xXafw$T9XkWwi@}y#9cbpr$PCN*BmwlF~D6ASkx0V;h z4D1y47es_UzeWP?pd4B*8brq=h$`MJKB_IjRqmhLIwC8wE<`freZEFY#jKt5IlJjG z4|684=j3iZ17?TD0KzNpf2ePMbnskvV1BN<^MzEZs@qYEd@LhAG|XBuTvWp3KKY|q}i2Z5@ZnHu1ZT7ibU+8~-4mqetTC*X9bW@j=sZsW09bJZUA<|8uU)Onqf3j$Tk6Zzg8zN$8ay8yJa4~)3ps6>2^Ift zfCAVc{2(_aO=@$p&a&{pAD1MH|9mlMp*`qy(|<)#7Y1UK+m%7VJst4t&cQgXiCQNO9N04&hs+=feJvUh z)V2l=7CVLS`C6dQRk_-ixYGEr*a_EhjtgmXOh6k$9`!P&T#$CSV%wFpyn#l`8#bkR zjlO4#kjwvvSN=>mXL4hkav2difaA!+AAAg}s4OXdN3^}Sjcx;l6K2G=nO!n)>6rJE z8`Rzrk&aZbwsZiDm*Cm9;S_{Hh^gC^+O0gKZhgQ0Gg7%3PuB!Tm5tfzVT*?XLlZTh zeeh9c998^6cCc9yjID&tG5Ex!u+Gg&c7raioFD*izUj!5T9H20oN9BaIn_taBdfBd z@(Rl}6tjHHi!dv)2zd2@)etN;8}r#A0f6N^SZ9F$=;{$EtA(bLAERL)X3Nv@4Je0h zc*FVccf4=b%80~a^;N|OJ&J;F0)bUX^3>-`?-<&o*S$OM2kY+=9riNAa=Lj-GhE*Wj`Mp8rs-eCH|mhjbrUv-Ng%?)tH@a_?JM{%F`Bi5Y02(R!u__N3H#221zfOK1>U zg5}Pd$HYWFZwSP0n~fDIzVq5d)_&^RGW4r{omqO&DVOj$^Eg|sclXJ8j>|!rf%=@l ze8vRyz?%6VNJEx8LJ50I0kqJRa)Uz>!gNn$1)*eVkec!?4APKi}`_%`OU$WF*_+a}xL>e?An zT-^D1KO8)pCY=U%zc?KKzbLsZwPv|t>&Dzz17W#@(CK_hEqUQrZlZB?d(WKwhMsQ+ z(m&)xBepPpM1(%xZN(}!pkWC+IXS7RsrmXoxiYZPYqcSzbU0KclR1%Y#J$G`o!?JQ zzymS5oJM}1eV5ad(hwJ1#K@NQsr9(RkWnFfnsBuFR!GNP5Y!0hyf*LBeynG#r=sVo z2Xt(n$bKq@8o|8z6^gF@H6^@hdZQEbb7UthJd|N)SOj&W67r(1JxdLlKZ4y8=n|Zu zJ;py#Q;D}<&60Q%w9ZTpZ8#d=I8lic=$!=d*9W{T*WAea)vVmey9q)n$r>CeZ{k$f zUbgD?S`C;%3&-_QNd-2^m1g!cygnDlSQCOqY#E@=9rvszNAsp~<83DitkJyK^IzB^zkr@> zk~4Eqon=m8V;3#JNzqD|%BtHIT?CdsEy_|e-XEY8edRK%(`B$h@|=1LX4Q$V%|gLw zG$Y-3#|R;mFHEkl|3(a-NwD6GE)bSoT>^);+PAl$Jj|SEh+KY1)#aU3wi8Ap;pq+{ zqpvP(N~bTjD<>X)Zf|!J-WIHZu9%$SXT+o0-Gs;-zWt020!C?a1Ro?UM`ju6pUid_ z$jYt#xX^D+8H9x$L^Y}D7~6B$Nxc2>0|+T?Xn-5^oNEC;8+ORhs6FR;@fWA?1LJ;Q zXbHdNaTd8bMzAi)m7?(xZII6C=+O>L<@z?QHHhWHf)?I0B$Yal2)Olv zfg*NlnY7P3BMLiHpig6lqb1t4f9YIR*@}HdZs7|}@AGhg_{+N1 znu-0Nv9~BM2)U7hBpe-Noy1Ge>J*3;RcXW_iiJrMmk`G%T-CiZng`ZPfv95W%t{B} zY^K^Hf`0Kj`jhnh9SvIDz52)=UR_+4%u(WaGP$wxHGwFhJN|d?Z;-Ig6X*t8Mf_>< zoe?H-Z(`8gx&@qQcIt1b;9mNiUf(nsBFsC7Y>cFJ$HfycU+ln$RAvK!#I;EJ!|PbTl)RYIIiUCnH^kLH&i<<;CgMykGR36-%ybu=a@^XVwq0Km}(bu9R3j zAf-;(1^2Lg=wTt(v~^i*M%CxJsy=bIu+S`0saUD^f6U@q6G#7Il5eaoqyE(;WaLCf zas2KeL?~)nlAUk%=-NB0y}fw+z?o)%R_NiGl(v@!tq}T~GG#Ce@YrSp@Aw7TjDV1| zVcxEq;0?csxysy<_>mT-?iM8$k$pJSZ0o}F;2r)EZYAmP4225e8<0e4SL`G3Zhgf9 zXCmL~U#UKoESkK5g_GN60P)?;D+d@lP)>YlBAZ!5@$wPuu$zLDX_<(EdUT=l9T1?6 z?bb^7O%G)xijq~ZN#I8L_p_y#Oubztv*FCh`=i|Cr;Kgo>gFBM{=>xD>HBwP(v3PQ zX|x9+54wB2^!M#qvURvH$Owy z%SV92XGR1cgpA~eGT{wRx%6%04?)%A=zqyhO$#6Q+_KUKGlGF{Y~jt{-T2T_vg!f( z$G<7h`uLMYuFvv?Q_X~oNdJKtZdW@|90dVh2Wh9P;K)3>oF!fzkG9*DoO!f|!*FAG z`7={s(;Sdn#yj77u{Xh0onD=B#}PZ0Br61&u495intEq) z&CSU^=6>f;OZ-tVlRw-T_hTV_q`N5|)x^$qj?AuW8F+7n5>~?B6A>E?)cE9OrX+hj?-HiQ6BD}2m8-Bvt^9-YAvHg1 zksvF?+ZGqX`O?5~BGlTESEyH@M8DlLu+^&Nb#avcmOz&<|5|w~`h0e3w*Bn9o!zWx z8TEt&LMvCifrL5-7dWti(qtS@!GovSndItvt=6Dd&n^Ek;@8NAGmYh!SggCyrTCIv znWE(iRmsVG708;VhM~s1PSjST4(2BeZ^xpMvrcItNRLH~Az(kT6Ud`8hdq>BOi*mc zz3do3W?Osb8r(@A86QbqTxDe)>b(=M?wq!A29rF>@9=moU!FhvCJ2|=$v`lSV5J4j z4wqlHy_G21~V#ke_`=%ZHx{Kg)5tq_RbiZ1f*& z0r-ys#^)w)>GAl`w9py<5#-)7kk^zV?|=fS-{x6IQIz7#8ELRbB)ivh+dQBsI_a#^ z$oJdj3W$ls+cLOyNf{TsEi&95orsu(*=fzwaWvR935X4|37rPmoSm*RbdBfT#4)5W zqNGSfcy47O!0!DVPW^gJ52EC7OJi4?HaI`@=#k84x3!GjwkKBe&^Kj7)u%$CK?{$d z&aLyh>C}ja!PGPWCV{p4r;L;6ehKhWUcD5td2o8o_G|Hx^JAvtp}7y^;8Mu%VgU2G zT|dQjR_Rf60JK7`{)&*`6DF}KmmZG)a`N(>gY;2oVt_#$@Tlrq3!IR+Tse;<6Pe~^&qUZn5ex|#$co@4Oi6pG~6e-5X%|NSZ+ zV;F!Gu`{^hxBPc%<{9^L_bg670au_zh9K0`2(2LL37lLjCoU&<4y>bUILT%S4?w)&zRCsXk`wSlFV8is7LqH-Z*1U81Hv|EGVY&|R~-B?)5o6j)I`)SmqXA2&yGJA`3Q)d zrpY;9b_&Mk=^hOwGX=psG+xe0galPetyC8Ds@1+P>lFxao0M1|^BzLrN^uU~93XV# zNm}JkZ?W$KfT~`qI=9F$fL@|)n{wf(&1*vFc*2Y_lVmk$`obSPj;U7^AhV{doL@LH zyvvW0D=p+f(aB-SVflTMdj2U2r7^M6gYrZ9&`V<){w!W0vTkOZ7Wky5U9h9F z>@4&LS3a!SVoxm06AlhQUe40irhmTSOn zXDuR6Ban(bcB|hsUGwHo>6wu+X~c`oIXAG-CHu+`I_HMZ`eLs3PRoie()+Blg-QQ8 zXxo0xo7QIH`OD?b1v8M$9Bkf{I)DOW(F4R}tK(}Lz-yeS07~#9?QMD?I({-vLdbP0V0!H*{MMY9I>zvq|3Z+a@t#H-sf~<2TV4z zl9#W(kcOyXeysKsq@>~$hV#86uicjp<^x2Z^T2#Y5D};J;dP#Qw8I#g<9T zPb}B#LQP2}iq#cAnmO?Cn28jh1gF@HnbcBkW>+m1;NY+aJ158z zDNtwf!Xs`>bfrk%Nl!_8SzR3%YdE{>_&!kGa3~{t8K>o}h0BhnyosL!=r>kFi4imS zq+eY93l`21zR*onS5`Lu$Q^3I7{{iS&ODz$fT}qRE!D&+Gv}Q(Y&d)n`HD%2@q-81 zp&3W`x~HpAN4pH&BLSO!J)&_TumK>d{9Sf40ANXuQ9rZh3m=b9CUi`8)b`AZOUt__ zDZT7>nX*2BC#-s&-Sp6+VE?!m$@mH$+S@91af2XeZOAG+m=adv%^P|qy%~ey4l5O-jUth;f z;xwZ|3wChf2M{CvvysLNW$s{NdXh=ahTKQrMK6%!&=ZnxFUb>hF;-TQF*0Z!3lG- zgfOM_5Dt3@vU=-r@df>TP?y5Fz_f)Tjg4juHY*ioo}cq|O;FuQ1_LIJIb*g?f7PY0 z=%*$A-YH==z-(a$?Eex$iQnPlF~LxI>~)6jRg~>j{_kz#&7@FvvB4G0!@zH&uHm(| z@pv&sF`D(q5Y?7*OS(?R%IO8Ly%`-5tzTK!A2mk(2Fnn&f50xJPPg&LiA3Qus|(W$ zCdXC059Vj@;#sslP`-1^o8RYRT9$h>EjO$VxNshU}-Rd24rfRLo{c`W~RV8>~RcNw@N2O}r!->(P~Dn78nMgPMcJ#aTK z9BbJsQrLndI0mlfB*El(HSnnmlMA7YpOx?(Y{{dHA6 z2X_^dGXuR7%-3L%DupYxwo!77^HLN|neDT#O)PSwDPFB4Aq6Qsfd<@_EJFEb`7%tJ z4*Km(+=EBl(m!PM>KxtHwP@n(bgM!RAVNsU!7N(d%In04#?7fH_kZm zdO2eDx`gF8-49w%YA^s-g30zr6Vb zU;Nu))UTp-`^Lktz~Ocb{YBOJ;zP;+P6VLQ-EicMISH3Vn_{9WqTv%5uT(gxtSAL{ zsO{c*!sEU?8wS`|S|R5y7gs010V#q;_)e+nqu=i{fS5UWKOh^+QOorW?~^SQN&+)9 z^rr#Nc6~V^eC_#|7%e>i*XP3d=C|ukUbSvT8_u41-*#?xT(7mmM=tuRCg8`DEIyB` z=|xc6x@f^5OJ^6Tr^?(4jYJiqC3r=w?mkdb|Er+q;mWGA+vz5JtP9+rRKC&Qe&?BY zb-D?#WA7*R!$Mnw=NA~-(xB^#Lk;h5>&2u1F8<=^Gxw%HfpMO%&#;!}W>8LRD?by{ zm?@il)F!R0LN&F8LNqyidJ0#kUpm<{O$}UrBV3VFdjDKMWzmAdF}O&Ug81)W{bjuj zf+S8IVqYTKqf%yi8jWEoQB`gAvF2XWFZAlU&OZ()+?zK=pHyi4qcw zM|)$R`XfE=R)n~5lwBtYPg1a*5-Xa|AT_3Je@+P2fc_n*(yemsZFD^Xr5g?ZDoY1N z$Apk2N0JJT=-1r96IR-UYM7}k^|XjCvT6;iapd>q!Gl-y`{L9Sf4Y=mGqyBtI-3&F ziqt9(DvzpHir&1cCjv~(w|d~n3T}Z>It27U`dzz#JJ>QD$hRna1t%rGQ&aOZlfL=K zKtNtT_N}`X^RS)OTtma~sV;$5@zRq&=vy^KL-=kwHG|<%MjaZXT+c9dX@5>McH$?+ z*GAP&oQTkmAgzG0FfO4xbSA?p%f9~E48g~Tn)Y#!m~oXJIqthYlFE#Vnf@O{m)TL${thnI(L6qrjr<3(W2kIM` z!$=}pnW3H@5e^OxDXCCsGmJ822*nwN*Qe#l-_Tp8pPA&v%y{L;E$$7Tw?Y=*;_7S# zphENVh0`4DYebAN!K2w7`e&?9_Q}s(;-@g#J_mj;#n4h-9m*aq!B{^vN^-ibdF*`o z)OThbHLb)BAWFXh$Bt}W{lPIR{Zuh7HTdl|6wA|3SHCFtYbS1Ga9GF}Jv7BZoHy0g z@4fOIt*9UjfBv+M?p;xdzI%h0@)3KNi8Djqe+3d3f3fu#5Fh^wD5H7$4vBJ_eSZ`A zlmyfcX&rwmnmKjl)g@g1w8zwR)ZcRNOQPB7)}*h8#^qqJnlE%GttR$I{X@A9K#7;5 z5vKG=$H+tVYSqC>17f}I*R_w&{snSw(8HtfrO*8vj-QydjO)`*&{_;|y(Y$e=F7E& z;2(-%Q|8%Q6Cyg2Pu`mMZxyzJ>+}Gx=|I-3gDSZHC zg^l;$BE?RW#-leau--UwXKtrbg)eX1cy(hNm7>fS_QiVFAp?JAf)$FotWHL$j_pec z^!2e~Q?jFtQ{#`cT1!UBarT_%>ukr1y3YAP3dv|(V8_F(4=GR8`hd_%PKnPR z^Q-#H^$i4Uya?0AFS)h6h@*x0P&g9h&I;X(6y@LaFc$0B%|V`Crjl>l-;C=zG?_uu zXF+5*bm|nhEa?$FJDz|#&RiD)TPZZla8bRIC@7ye^VutHIM}y>L%&t7V_mFQz20r|(bnW#4g*m`c*?nfsz>`c89@MGW@#qkswI^_QD0?>lTi{_OHn{B3 z_B$E!f5@BmfHDP-l$3Q4h}s;#0}kx(>$cz-o!{RH zwM@WV1Pr`KO|z_1`s1Uh|AV$>a1}`TZ{2=8XmSAphyPwF9H-e`5&VzZSte+;ym)Q> z%Po~&zZC#k!lc^yj_Z4d`(`cUeO+PXc(y|F_oi?B*j;Wq%gaeJ)Btm;_=9R65Jx5V zeq%+H96%9q+`h6`g<B3LOaPsfWNscU7Rwqpl49^xj~u10iYay7Z&?Okmu(So?L~@YX*QB#KL$}21G!fZ z3IFaugz@9r-+R7M$6CJ1=hMHM(8iP9cFOlaf1BVp-hPOn^CnTF!Tr;y>J*kJApFXg zN6=w$Ag{qA#TUAnGDu<8!6cnIlPsP;*gHNa2E`l4yBR&NalKDtLp{Tey<;x4|I;w{kUH~}dtm-m=F*#<-4k_h5a^%aan?hl`v>~+a5OBjA zxXA0?x#!7so>(B7n@(2&Vhk+Igrvl=$anxM^820<;#A=KhHIN25wt*D|LT8lZz5~r zYI-fN>k(EencnG-w0YyjtY*lvEVprZ4uI}=t;&+{7x!%z3={4d&9lxo-J_vwi7muI z!Ysl_B$@Vmx;|^Qyk$Ygwqh&eF>B&ZHD7yHfId{{D;Mji86E7F^7*rOhqSMGQTXq! z+{;>%!Rb&axFZXEXzJuU{;Q>cKF2%D&OeVC4L!DJUdF^ibbpa`{mN(U=~AdRKMySD zv7F53xq|;G1(;Q%=H@#>0}(r-H(vkEVH*!wRg0NgD|XohKwLDs*#c>0|Ch1}AZz9q z&ZI8oSuvHgbc2(ml?K1bHoTTy){#8K+gsmY%;%*R}bj*yyEa3qeto`&Ee27{D~- zCqqEjar@=q{tK}SvFGpgwrinS>C|+Ut+wT?t)$08&=rt*dHVmNy4Du72nO~A#n(|k zue3isMFtL>0LOOz3!;pXJ2lgnnYf~ChXKjpcYF*P-F#iSpH$)iST|LMf38kIY<($% z!~^bEMSk>{zT)<6V)@tajj8x~SNb3?kRch_yi`{kfO#?ne}W5p3xD?(D&!0PH~SEH z7J-bFN_$zw#AV6V2=gLN6?1Ymq=iV3UHT(@wiNiEW0lC$Eq%_hLCsqa<3Q;<=iI0xuqrVjmp)9e&pynCU-+LlxT}?#?56{-?69j%q9T{!A&9 zQlPjMDFi4*iWb+F;BG~V6nA&0XmEEcUMv)spvB$Y-5rX|JZj6Pd z?N#lv-~K%azz&9XuZ9wKd2Kkn<89%(tsgX9Kfms`OJp3->?i^}cje;9%=b-WLkt1D zLxLqXej_gXcS8+N=wOLL0F4L@x=LwPepMqZjQk`wX#?QAbgx(lN}b*|0<xL zR@yCW6m+_1o-(hE>7{@@k}$zGwUJfJ2d;_r$=*Aimg$+%OfQ@MGt1dt$~nmpA##LY zw6~@{n|FsajndmEAYAzpv!S0NA=!Y%Cn@H4((l%zW^F$poWncNKW})X`YI63qZ_3r zQ^SN29nD&M`P;S)uju4o6Wd$M#ik}Q%u*#VjKaN%_H!Oj%Ld|;)I3BfihpP%V` zbM01G<6r?)t>olPB|Kh0@UFm4MbCaN2>?47r=+(-0kZ`q04%(u5<#QS`p8=4PmYq< z-5CcUeQx-_a*F-3e{1VA6=Rh-J8ZSB8*b;KBuF#hirji+#dUOL`L%BvNHluAuiSZS z#toQwT>LVj_gBLGT*{<=;t!T)_6O`xBxI)#o}y@89ScAS%tn|fuh zbTlpq3d!C?P1Gl>VRjbsn2qaDE;Ml1p8`BQ2eQBBryU@&A;83oi9QIBN)<=5G0~<| z2T!591hz3ENUPQr200c0e0FYZ8||Do#*3zDUUX^tn9yPrgO!38$?_uZe)cTdNos<> zW78#b+dVxg-33$$(@s6@NAbfem}bM~4`Fm=2%u>3s`I(;2ty8njaOp9<-tFDE&*DR zp!>--rRvz>^CsDM@*)EvK)T-XW=fZ`8)=vy1QJmoE9;iK_S>dY`wh{k23wr^B51_K zrwtBhw|Mowx`l~Jg)uVHum>^H85SMVzhW?zg2b4sYKtN7$%V^k#o?u0*zBpnP0}Cx z@G$`XrekM~sj?B>s$CsmL>S``-~j(ixu0Ft^%EK(0a%+=KV!XOz}F;gzjQa2pVnHQ z9`5;z2jAh~osTR&m65ya+K?u8S3h+$H`Hi=#3N*|e)b&NmeOi;lNiKO&5n!-#TY1R zVn=dji~rUkxxX*Pa86~&{|)_(eC%Oz>f8A$6u|5Ms?3crF1*d`JYomJ@2#JxfGx?N z&_xuUT%W=LUf{Ojuss(kC@MLv+;q2QL|6U6fBNuT?T{k?k`+h$qIIikHjN`(krKaR zTTnD~P`A+9dZLJ(rJ+r1TcD-3dx0KL3Xo90@ba-kvH==@8hMr3p=PMze)mJumNtdX zFNMLi+?TIA9DbtROK;31>&x-o@izQMoj!CsbFGfCv=9)u(6u!84!OAS4+9#Ka|k9y z&v<{|o5@1`R=C7gQ0@G|L*B!&{xiF*UcyrZ7p z9li2VGL{n&-Fu!o?=-r1UOkH@D3&kU{eXWHO$JWfBBRUl{l*1a`-g1Oy}$H{FGUb( z1$mWPf#Xd(7!V#Z(}Njws?yZMUPtx}4(Ly=+He7!326yE<+ba|1^iD8dJ<}|YhjAD z-XsymAObZ%on{jeG1UTTux^G-aB9hk4KOKxzHarrKkY8~9)$7>*vZn-(Fu5cu*zl8 z2w%*%5=f+3iTr%6VWC_iS!iVfbFSB-4K5UPT`4G!ewfd@_a~t7BngWpj5lzebsKB~ zMa8EzS)IO0!1*TT+`W0*58(Vuq{h|iOp{twTqS<_9H%%-f0!LTq`%4thmUVcLuFhJ zR(0~IazP*oEP=nm3RH<~b(sVJwN;PLuX@^qCHNXUosZ|wAQLr3z%W5tiw)xkj=AkC z6eQo0jRAJl>ESWHBR2fn>BXh-qf2)~z1fp$081qSanH(taYZ~`?@@V{7W#ZufGti~ z5mH)fGC=ka&nX_4s{4u1N-kYOaBldMlaSA8`Et%a)BC}7j=69P)WLX*IO$8b=Bikko^=wLwYA712%L_Od2(a zOuMV;o?t7&SEICp4+Fp=$P;zxgEJ8Fg)k85`_;N}#5gcWo}qiTJmY8NSfJ%9NBBLO z3DL3j?7`8N&Fvf&?cal=d^uO!+C}5H->R$f;{b);=Jy7%UuSCrfx#lp%i3u`?E{(Y znh7}W8bEIWT_(Z@?VbwYZww_|R8Z$+55F3h$0X?x5E7B$ma;3qMUc{~xtce9KlCYng-WB5zc5H-2>5s?v9yI5>^o$tz0V{K`I0QQZ@{WoKkK|h`FB+F{ z36y@5E&+l?waT`(WaHa47MBnZs};i6?}Bp@m7YOBRJq?_Uy3Sa6x3={fkeibzp(oVd|)1 zyo$dom2}8G61|4_?2jYtAuwwOUI4rZFm^N*H%I6C zWM|jR!*=?(1>8SjseEpDW27h*)weTc*T)9h);I-IU+&sPe8_^h5k9mj{I^ zM3L&b5Y~9LZVPn)i9?t}{7Pl>pG-th8&Wx$+s1;^vQ;dC@Nq zF9#1l=|vm(+Zx*I|KvkWr zQXcR0K6FiXo$R-6`uvjzEnwW*umMqYpE3swew%({G=n; zpvA8N`5Tw;&nO|6Tbz~5W{iOA&x}Qh(nUUd@u1mf;^cz8l)d~PV49Q7Hb|bl1}VPa zP(tMo%UWV(07k)ljSna!vAHv%9 zzw3XR&@J8uX%-Q3P=#u=$>szltYQH}R1FxSir9KMQ#zFyjAra}-<=N9TK{b#IFiR% z*m?LWX8HS=lL#5OC~J7Q{dyayTf6Lnd|u@4w8Z=Tkp5*WEFO>UXo3HRA^;xtTX$VA z(J$mo?kn1W^1M!IoWM!_yxkE3#Imxm!bJJFSbuSUyRt5^s^y!ZGXYug5Sv>IssMf5 zmYTvL3r@gugS(eo^T=m#e{*uPU?_dVuC6$AimL0Mi!x1N}lnxG0Jx2;m>l4x$QvkOESi;SQHgRS?!`G14oU^cb-Oy_#yhw zf~egWjW7FsCA@p{Sf>%dSw#4DCyKwkFtn**q1+MaS#uFSxE2H2w&T~YXv}Pk81SsTKR+fZUWm*(X!kd|7 zJ3!(hV5PL#M^hNF1IqNttZ?`tIv<%J4Y#rBQUz8+dgu)+KT}(fJ98N2Mleg##o(zh z1wml&jh*1?s@?T~GH3TN*~7p4T7<0D?Nh*Qajs5p+`$wI)R>LLV5RJ9GuJyFNKpDzGk2}`@b(?ze@qT(|#I^Ww&JmP|^yhnphiJySqI70M_o^T+FKe3|F1F(WKVz{LDl_2cb>+h}>fHPZ8k($fCdFf@q-5nGHjG?Oq`oHmCe?E#xFU|14wvuT zg{R-YyirH8T|KQUlfwyT@HiZE%(3h^ssK>xVoD!M1gx<4SHzzJbz?t+0e6nxBRU8` z1l6eKh~oLy5qlCSH4XR)NgVOk*Jd}9fZ|v;0fQG{yaE9n{aE@A=4RF*ks$Ss)(b??s+fBE$OIml>OXDR?HMKfn5z5+Bwl zx4WF_{QyVGG3+r>z$arRl@0kNkm)wapZWg5B3lIrToqfB!2#GHS~-p1K0f_B;$;qD zeRz4zR>?nGCBs3%PbKvA4NEX)5g1G-lShD;3&F*NggvgvhLF|Z@QGLy1ii_2p+nxI z5W$o$G)C}G0HN$QS#!X7*;)iS{0%B8{5fWOug<3rQqz;S7iSOH&WG-rW535y0@el| zDwo1l7b$(G+M;bVOIUooclmDr-dvII7y_78V=pD)yG!L@SMWzR-pW5SvTHQiRh2Zn zvidH-4Rmz$p9$w54L~F!-_BRrAaS$Vh&=IclU8Il)e9mDv_6(vrx4cdEmYFT8LF%_ zD}E>Ja&mgN^)8~~tJPfzN8VQn$N{^BOsScp==XZfC04TX9>W^W+zq>hY=m9;j~3Ql z>QA9rGNsZ|zY&6WhrCLx9f9K$Y-igi`>-;~uVk9OQJnrerFpq~e)ReIT3r#NU| z-691BiF~H5voqo_SZSIj{AY;?7$PnVU2Oa-I!)1i*7txI2ufr8zk@zT3n5c{Z}zAs zyu<6OZK-iEPtFuGG^;s=vY_w;LjBiD`xEmc?=2o;dNBmY3e48~bS~GA(OC|>97maK zt-WjX=8_cnD+N3*e?3w9`B{1;VUY3dY;O~gkT8g9@sLz6sFOz!a1l|C)A4I6lUc&n zHjg&9*1jod^|DGw>BvLGuM5WuxFXIk&y0x@)<2=On`~%cgmaDq!8ZeMsTK;yT_>id zcudoT{r)0?IaO;%+sWKK7Ct9fUP(|forp@629z1A&$7!_xI3~3ri2}!8HZO64OZ5` zL<{9b0z}beNa)OMWiVFiCg>cYI^rUZ+}-xg+Rc>6;s2&wLrHO=5+(1sL^=1YiN&IC zcFf^0>B7>romE#-`Gv&F8rM8<4#ARmKkcVua= zA4M|?LSmy?M{SiqulTX!&qn9rtf*rgE#>w9R)ZhX>lVTownvyT_QN&R1l;0_{ zNs+y+G+{-B3!X09=vJ7ZRtkrb50X<)S%y!}M*r4qpK9tZ)la+>({PfD>CDsks}gz5 zdef^zc>KPQ>p@L!&NhjNh#<-;DtP$#-_+Dx;=|h~QPAWD-TMO&k#R=LC-kT8PMvJc z{07;!LnKiNWt|pv)jkj29@;nN{rc^L1*t5e>~*AIgu_UsGZM$d;0x+YkaO6h{AxCB3;^L+t^rMW@2Yo(Wys~jUjN| zy12O5T`O*wQfjqkgP{75rxZol`tU%|z5Pm;91s*?9lVev6-?nvyjec3EgG zhSss4`S+o|?IOp{D?|{FU&I82DemC^`a@(`C=uV?VEk30N6jv@vwgfYyQ*>3 zSmQSxt^S1o8M-bnH+Ox*^HoFg9^tT)l{IyKTkxTg^7F^fEX~I%Q+5jMaQ-p{6Kg8C z&g`#|YenZppoi2F4yTK~$74E@yr$oifPB_>#8pqeS{hbs9v>PFE`=~YW+Vvi`?v07 z3=BOPs@?vJ!N#Oi zeJ@!YXL>R8^OX`c(+ORD*KU{F3|4gP-+03f$1Ss;h~W$B_UQWeFe~{5tqiLSqS;;6 zWInpjJRM9MuQ*?WRxlw_Cmx1VyHYA!sD}AGQn$f4qVdMlCq6IyJULqGRk+`FWm8&MxAq=kWsFOGmghA$4mQZ#vyM7 z7b{UFRZJWU%r^=)rCq+>=eIkn^YW4euSrFCUJjQ%_27B9N4o0S2`(qdw3<(qNQjHq z?ZeCmB}P8BP(6jd7c|$vUS`uZ$-L_bK?Z@W-i*RlCWGb5q%71+LP@VI4!BakPSNZ3 zg`y}~Nol6bia3g-QiDJ%HX}2Ov%CC_7LtuD7-&Ez3Hu%&G%j3*V}#>F`4;)^AX=sK ze87pG{t*+QOSWmvE_9m~l1=pj9Zb32Wsi~peuJy6whOCO!n=t>LE+EANk1(wFHIoRu%r{o}tSJSJ4M6-OCzY`kBt&e#NIb?N=Qo%wb^uY; zNM3mv&wskKGplMya&Nn(Kltd9A!n)`FmW;Qy%s)kVRYBW)XT)sE?sWP>%6NueypNm zIk`J94(@shdW($GytucwKgY1!BW)Bb6I?ISD`Q}BV@rfyYvmj>dS=fyMJy7G2qMA7 z_JAYZB64`{t{v=c9*Hjw0dV)=xuWN#7x2p$gMy6Uy|qpEeJ2{C7XmLhsDFMEkO27< z3jvQ0Uq7~z)_@JcF#f$~jMaK-ABV7btcW`&26As)lHKYCw_7bXW9QrjA~{qt!nx|h zn(uTSD&Y7(1-`sIBAmIdkaN&85lVudf_&PsEI+_g_x}wWs46OGTC?sty5%iU7N+bN+!AD?a%?c(1frNacR$hQWRIgF~M|F1;;yoyFFGF$0kqRI()$)-w8~J{_;7YC=3UvW$>lzJLebudjsg-wutCBA&sRL$ zbsfk;ti2l>e*G5eZ~=ToUZ9Xc5}Y^&^Eaeleb7P%)hURdkh5|UsLo@nIxBzy+yk4+ z1#{MK@VGAMRgg%KSSTJaq78n1_B>`01!nUz~PPy$AKR~)rrJ*uR`Tz<7{aTD#$s&rV z#U-}mUiu0Fg!rgtvGZF4LeYadAlGvQf-y)qpfYt}Ww<2+K1vO4%C zS+b3;GXj|GFl21LnXI@%+ts(Al@Z{-0QCHe_z4IE!uAL5`%hwoE~55x`o$|C!qsb@ z*`K5&*0ja+%(kLn#l8t183LlvvNs?f$~HW{83ikb3L|GQt8JH^esmpBQ6YDVHos3l z{oO*dOeLB+$)m`>0Skf+Y1B#^zHrzerJlNI7be+9WYCH@@YUP!ukP`Q&rguGjXSfN z|4$EESUG{o@~*zJxKHUnjph0Lvp_=5>O^AKVA9thkS5LNQ6M;$I3_kwun%JJB7`Za z?~IP!%k3)Uzz_fzy(J)Dl+lGdwh!j7$4!M}SJf(f;Q0|dg%oX3o-S9-<9M=*ua-D} z72`kD1KkCat)h1s&-2`0cJaFX?JmaGLOs2NX?`BCsB<4vAdf|)D44`%d>Ad+ytcwC zAz`kB=Cp(kG?xt25s8WLoH5RAk=;DSZZe_Y(4ti=`Iu{L+a_Y#n6x7$`%aP+ptUSG-zHxm;24BK9SPj z5@p?Z8puVlBw1Kk_`SwLy~ZMW=I6p&u}HGTa{cZYYN?L58%|s6C(JqYZOZasj3yB}(OTLf) zJo1<=)Nvvk!t%fgd>eeK2*qRs#=bDtC*VX`P;2S<>Ct~apzlN5H+YD$IP|CUt^eh2 ze(U$p6XSc_;cqhoXKmFw#|TPQsx5<2No&EbNwxk%UH*N`Q;&{0x)*)hL2l&`gTC2X z-G`buu=7^v zAD5kpoA3B@(oWwoKLpS=r9tb~a&)|J2ir84Xda`9lEe>A~FK?YR(_rlZM zeJwgpMyjj#Zlrk(L8`$0b-DcRMUI8GdM}x}`(?~t^d>#4T#9}IaGI(#B==~oz3SUX zB#%+prd+d<>(h87|7>TR799>^_U(k@xoR$k=TUH0{=+eoj{M~o!Ei_Rv{tttP)81j z>jQZ(IOLG!aHR%Amf+;!D-k%x)hSd8ShJ#pj@GuEF}nCz|Ev*WVV$}PdOeD5G!DkT zs$<42Kbg2zeX_SZt1QR9F`H9PfabazSngAAQua4EHc<++#hb!MMkgOnR|Us{N;Cv% zL}egNP^f<&zmCPZhhBSF+Y-a2WV4ISQ7y7@_tGNmt4A*UU`>8;KMH>8c503(ojK$H zrrYDW(pw_7HO5GMHWI;v(I&aZ1PZXC2+c(amt%t(SdQ34VOCb8PpoE~ndH_qb9kp* zL8hfGK}l@f!=1*Z90I9;owD>*nyPEk6N9iM)(qxG)yFvQH`|v(&+Nk$Dpi>zOiXsM z_ue)=9r%9A_~N|4>9z2SJlNoM*6m7n=5*M@oxIi~mN|-!rhLhiJ1?i^zmH89uz2cC zgqsk8jlr>siYYxH@O;8$%t(dsw8A>0-N*LN^QLcrQm$0z{0}bdK&F7RF_U8_VB1fv&-x>_v}mPf zp~*cB`M zO*w_~CjB^j8qW&*dw8S^tq1t%f&$#IKID>^&64V57@2{8u;c18eB*U^WMwZ9u85t? zM8IlB6JOryQos3)nJ{dqSwpPMj6R+k3{1NU)v{>6JXeEYHLY4iQY;0Fzv%+;>pD-T z6FI2vy@&WA#5>{o8?0T}0;Z;8o{VS;CH7m_dGq6Bp~|R^j-o%~(6CS(t3{0oBuLbH zZLg0rbN`TOd2Fz&R3o@*nJ((5U1-aS`i-8-MGba0t7V#|F z<>RTnw;3ilp7$DHXIzS;ZZ4`?;K@y5x_by(_Mf@_(f#xkeUqR?!9f{*1gOdv2vq0mWFu^^r_y7 zuLMPp-a75u)(6Gc|CND_Iv;Ko8=Ces2DA+6aBU91_7pMFT0^z|E{4rp^Np^5;xJ|< znmXH!cUevJQzxaA0r&avu2kfW{~c|}u$KH%Z^kBX*EV{B9mBQm~~5EK=4n)AukRRQ$&d>O;!UDr!8ip2*i7q&8W!#p>G@5PC@ zktKON$6t*UNcYKR_|*ywV2U5nzk2Qlgz;6n+cT68}rz{Qpb*ShkmVzT^a&Y<5$;3ldHtkPhRg>)SJ?@vx5V zhbpt){K|#+fcyjeC5EpzOSSl(F=qAD#K@psAz$P_$1W1BP$IShIl{HX)7^W5=7tU& ztX_6TD-Ap;g8@NLR=B81#Yo)Z-+fi*y?IWK{Li@#ZORUe?3KPP>OdjEfAt?h2l~}7 znr^9_3=1QzkIE|La=(8R@4bENdaDl3o=?#ZNKt}&@g3FJ>>V!9g17*ytWWVeFuPfRv*CKlf)O~)Fd@$R(CbZi)t0nT=LGM*Y2G2_ z21rB(yS;eSSVLJwob|M~{YrKlzg@@c7Ru#sf>mZAd+?S=%kkufqR6ceo{1+Lf?FL} zSSXjX?t)8ohc1N;-F|Gwf|x}$v!*volT5}JUJK_tTTRKDEBxcJN2-tIkLQO4^jcuC z;S6pn`OzujIL^a!;0%yo!DOuh0><4b)J%+CZf67NFjVb#+r!w^Er(44hdHjH9Mc^# zDGx5*=Ls9s%Nr+DNg+d|w{DA^lYU#Jnk;M^!>Uhbn@AaeAoo~o+_1cCq8WC(CrfNH zpMFS-Q5md!^fMOV{wzMJKk;`vgOt>YpPDnztL6ymHKQMip>X^(uOlF6>|U$GjF-+^ zwHv$0sITqes{6F&&6vi%oqoZ)RiehiwlhnlDr-gRU z;~jpt#~j;wS{nMpG`l~mIR(qaYkTi_?xVfFip=<{KX__6D&!m=Cq%pDKc*~!KyT4y zE1gp|ju!-{80< z0kWw|^Z3x>F*RdcXur(x1SA~Ygljj!-T73{USswTD|1IAHCQi=-;pkM^dlxq&GD$K z#xN#fc;%GRVIDbHFFh?CF=upPix_ci1~6`tpknh0eK%Orx>$IR$Bt0V*2YFxEjey~ zU6S1N?s1f`UMwoj3<@>P5I_P4#$)HuTz2oL(~rr>WR>v=L-swONT3& ztH+~Pq&NF37|Y?nq1*)ZQW+AIvKW=XB|_ zxq&3)PG_yva_067RFN?b2WFBo;b z_EH8eLZS-G8fQ>vNkK3I*nc;_H2pvA82^WT=D%1t{x3N@PcL=`8|_0WbrykD9V8(l L3xR$8;rrhJpC528 literal 0 HcmV?d00001