From 78eea83e93258afb292494dadfcc4517a6c1cc2d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Laura=20B=C4=85ka=C5=82a?= Date: Thu, 8 Sep 2022 16:25:31 +0200 Subject: [PATCH 01/24] Increment version number to 0.1.0.9000 --- DESCRIPTION | 2 +- NEWS.md | 2 ++ 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index daa5837..cb387bd 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: gglgbtq Type: Package Title: Show Pride on 'ggplot2' Plots -Version: 0.1.0 +Version: 0.1.0.9000 Date: 2022-08-06 Authors@R: c(person("Laura", "Bakala", email = "erdaradun.gaztea@gmail.com", diff --git a/NEWS.md b/NEWS.md index 288c6e2..2848720 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,5 @@ +# gglgbtq (development version) + # gglgbtq 0.1.0 * Initial version of the package. From 21c1e043c8a755f2287cd71cce23a83b47b1a73c Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 16:31:24 +0200 Subject: [PATCH 02/24] changed "gay_man" to simply "gay" --- NEWS.md | 2 ++ R/zzz_data.R | 4 ++-- README.Rmd | 5 +++-- 3 files changed, 7 insertions(+), 4 deletions(-) diff --git a/NEWS.md b/NEWS.md index 2848720..fcb3deb 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,7 @@ # gglgbtq (development version) +* Changed `gay_man` to `gay`. + # gglgbtq 0.1.0 * Initial version of the package. diff --git a/R/zzz_data.R b/R/zzz_data.R index 91213d2..4117d77 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -31,7 +31,7 @@ pride_data <- list( lesbian = list( colors = c("#D62900", "#FF9B55", "#FFFFFF", "#D461A6", "#A50062") ), - gay_man = list( + gay = list( colors = c("#078D70", "#98E8C1", "#FFFFFF", "#7BADE2", "#3D1A78") ), intersex = list( @@ -50,7 +50,7 @@ pride_data <- list( lesbian_7 = list( colors = c("#A60061", "#B95594", "#D162A8", "#FFFFFF", "#E5ADD1", "#C64D53", "#8C1801") ), - gay_man_7 = list( + gay_7 = list( colors = c("#078D70", "#26CEAA", "#98E8C1", "#FFFFFF", "#7BADE2", "#5049CC", "#3D1A78") ) ) diff --git a/README.Rmd b/README.Rmd index 31cd020..3e6e7bc 100644 --- a/README.Rmd +++ b/README.Rmd @@ -81,7 +81,8 @@ palette_lgbtq("rainbow") palette_lgbtq("philadelphia") palette_lgbtq("progress") palette_lgbtq("lesbian") -palette_lgbtq("gay_man") +# In its original meaning of "gay men" +palette_lgbtq("gay") palette_lgbtq("bisexual") # Background added to avoid the "disappearance" of the white stripe print(palette_lgbtq("transgender"), background = "gray92") @@ -95,7 +96,7 @@ palette_lgbtq("genderqueer") # Alternative version of 5-stripes lesbian flag palette_lgbtq("lesbian_7") # Alternative version of 5-stripes gay men flag -palette_lgbtq("gay_man_7") +palette_lgbtq("gay_7") ``` ## End notes From 59b3d6d6d6b34f4905b489c2103e234ed46357d2 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 16:59:41 +0200 Subject: [PATCH 03/24] update docs --- man/palette_lgbtq.Rd | 4 ++-- man/theme_lgbtq.Rd | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index a14568d..416ae6e 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -31,13 +31,13 @@ Currently available palettes are: \item \code{pansexual} (3 colors) \item \code{nonbinary} (4 colors) \item \code{lesbian} (5 colors) -\item \code{gay_man} (5 colors) +\item \code{gay} (5 colors) \item \code{intersex} (2 colors) \item \code{aromantic} (5 colors) \item \code{genderfluid} (5 colors) \item \code{genderqueer} (3 colors) \item \code{lesbian_7} (7 colors) -\item \code{gay_man_7} (7 colors) +\item \code{gay_7} (7 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index 73cc0e2..f73df63 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -35,13 +35,13 @@ Currently available palettes are: \item \code{pansexual} (3 colors) \item \code{nonbinary} (4 colors) \item \code{lesbian} (5 colors) -\item \code{gay_man} (5 colors) +\item \code{gay} (5 colors) \item \code{intersex} (2 colors) \item \code{aromantic} (5 colors) \item \code{genderfluid} (5 colors) \item \code{genderqueer} (3 colors) \item \code{lesbian_7} (7 colors) -\item \code{gay_man_7} (7 colors) +\item \code{gay_7} (7 colors) } } From 9a296487a01c59d085a92f3e9ea11529ca2fac39 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 17:00:27 +0200 Subject: [PATCH 04/24] implement agender palette with custom theme --- R/themes.R | 9 +++++++++ R/zzz_data.R | 4 ++++ README.Rmd | 1 + man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 5 files changed, 16 insertions(+) diff --git a/R/themes.R b/R/themes.R index c7cd97e..510a62b 100644 --- a/R/themes.R +++ b/R/themes.R @@ -53,5 +53,14 @@ theme_lgbtq_white <- function(...) { ) } +theme_lgbtq_agender <- function(...) { + ggplot2::theme( + panel.background = element_rect(fill = "#D1D0C5", color = NA), + panel.grid.minor = element_line(size = rel(0.5)), + legend.key = element_rect(fill = "#D1D0C5", color = NA), + ... + ) +} + # Default settings are fine theme_bisexual <- ggplot2::theme diff --git a/R/zzz_data.R b/R/zzz_data.R index 4117d77..6b1b0a4 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -52,5 +52,9 @@ pride_data <- list( ), gay_7 = list( colors = c("#078D70", "#26CEAA", "#98E8C1", "#FFFFFF", "#7BADE2", "#5049CC", "#3D1A78") + ), + agender = list( + colors = c("#000000", "#BCC4C7", "#FFFFFF", "#B7F684"), + theme = theme_lgbtq_agender ) ) diff --git a/README.Rmd b/README.Rmd index 3e6e7bc..0dbaa8f 100644 --- a/README.Rmd +++ b/README.Rmd @@ -97,6 +97,7 @@ palette_lgbtq("genderqueer") palette_lgbtq("lesbian_7") # Alternative version of 5-stripes gay men flag palette_lgbtq("gay_7") +palette_lgbtq("agender") ``` ## End notes diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index 416ae6e..c14d448 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -38,6 +38,7 @@ Currently available palettes are: \item \code{genderqueer} (3 colors) \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) +\item \code{agender} (4 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index f73df63..1f718a1 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -42,6 +42,7 @@ Currently available palettes are: \item \code{genderqueer} (3 colors) \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) +\item \code{agender} (4 colors) } } From 8d3867c6174f1bb84caa3b382846b0e32e34aee9 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 17:19:28 +0200 Subject: [PATCH 05/24] implement demigirl --- R/themes.R | 9 +++++++++ R/zzz_data.R | 4 ++++ man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 4 files changed, 15 insertions(+) diff --git a/R/themes.R b/R/themes.R index 510a62b..b6efab0 100644 --- a/R/themes.R +++ b/R/themes.R @@ -62,5 +62,14 @@ theme_lgbtq_agender <- function(...) { ) } +theme_lgbtq_demigirl <- function(...) { + ggplot2::theme( + panel.background = element_rect(fill = "#E3DADD", color = NA), + panel.grid.minor = element_line(size = rel(0.5)), + legend.key = element_rect(fill = "#E3DADD", color = NA), + ... + ) +} + # Default settings are fine theme_bisexual <- ggplot2::theme diff --git a/R/zzz_data.R b/R/zzz_data.R index 6b1b0a4..6d1e3f4 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -56,5 +56,9 @@ pride_data <- list( agender = list( colors = c("#000000", "#BCC4C7", "#FFFFFF", "#B7F684"), theme = theme_lgbtq_agender + ), + demigirl = list( + colors = c("#7F7F7F", "#C4C4C4", "#FDADC8", "#FFFFFF"), + theme = theme_lgbtq_demigirl ) ) diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index c14d448..d3aac80 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -39,6 +39,7 @@ Currently available palettes are: \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) \item \code{agender} (4 colors) +\item \code{demigirl} (4 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index 1f718a1..681050f 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -43,6 +43,7 @@ Currently available palettes are: \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) \item \code{agender} (4 colors) +\item \code{demigirl} (4 colors) } } From 4222cdba8b250387933bdd0b9e0f94ffdb409a5f Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 17:21:45 +0200 Subject: [PATCH 06/24] update agender theme --- R/themes.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/themes.R b/R/themes.R index b6efab0..38c4b2f 100644 --- a/R/themes.R +++ b/R/themes.R @@ -55,9 +55,9 @@ theme_lgbtq_white <- function(...) { theme_lgbtq_agender <- function(...) { ggplot2::theme( - panel.background = element_rect(fill = "#D1D0C5", color = NA), + panel.background = element_rect(fill = "#DDE3D8", color = NA), panel.grid.minor = element_line(size = rel(0.5)), - legend.key = element_rect(fill = "#D1D0C5", color = NA), + legend.key = element_rect(fill = "#DDE3D8", color = NA), ... ) } From 84c4b51880098235c634be99199ec90c17b5b93b Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 17:26:56 +0200 Subject: [PATCH 07/24] implement demiboy --- R/themes.R | 9 +++++++++ R/zzz_data.R | 4 ++++ man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 4 files changed, 15 insertions(+) diff --git a/R/themes.R b/R/themes.R index 38c4b2f..6b9d182 100644 --- a/R/themes.R +++ b/R/themes.R @@ -62,6 +62,15 @@ theme_lgbtq_agender <- function(...) { ) } +theme_lgbtq_demiboy <- function(...) { + ggplot2::theme( + panel.background = element_rect(fill = "#D8E0E3", color = NA), + panel.grid.minor = element_line(size = rel(0.5)), + legend.key = element_rect(fill = "#D8E0E3", color = NA), + ... + ) +} + theme_lgbtq_demigirl <- function(...) { ggplot2::theme( panel.background = element_rect(fill = "#E3DADD", color = NA), diff --git a/R/zzz_data.R b/R/zzz_data.R index 6d1e3f4..0943370 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -57,6 +57,10 @@ pride_data <- list( colors = c("#000000", "#BCC4C7", "#FFFFFF", "#B7F684"), theme = theme_lgbtq_agender ), + demiboy = list( + colors = c("#7F7F7F", "#C4C4C4", "#9DD7EA", "#FFFFFF"), + theme = theme_lgbtq_demiboy + ), demigirl = list( colors = c("#7F7F7F", "#C4C4C4", "#FDADC8", "#FFFFFF"), theme = theme_lgbtq_demigirl diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index d3aac80..03582f1 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -39,6 +39,7 @@ Currently available palettes are: \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) \item \code{agender} (4 colors) +\item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index 681050f..4a38649 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -43,6 +43,7 @@ Currently available palettes are: \item \code{lesbian_7} (7 colors) \item \code{gay_7} (7 colors) \item \code{agender} (4 colors) +\item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) } } From 5a9a20608401c4d2d52b998fa06c44230e979781 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 17:27:23 +0200 Subject: [PATCH 08/24] update readme --- README.Rmd | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/README.Rmd b/README.Rmd index 0dbaa8f..99979ba 100644 --- a/README.Rmd +++ b/README.Rmd @@ -93,11 +93,13 @@ palette_lgbtq("intersex") palette_lgbtq("aromantic") palette_lgbtq("genderfluid") palette_lgbtq("genderqueer") +palette_lgbtq("agender") +palette_lgbtq("demiboy") +palette_lgbtq("demigirl") # Alternative version of 5-stripes lesbian flag palette_lgbtq("lesbian_7") # Alternative version of 5-stripes gay men flag palette_lgbtq("gay_7") -palette_lgbtq("agender") ``` ## End notes From b11b41fdfc12e76cf1da61ae523cbb8d655373e6 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 18:05:41 +0200 Subject: [PATCH 09/24] change internal naming convention --- R/themes.R | 10 +++++----- R/zzz_data.R | 8 ++++---- 2 files changed, 9 insertions(+), 9 deletions(-) diff --git a/R/themes.R b/R/themes.R index 6b9d182..8ff0146 100644 --- a/R/themes.R +++ b/R/themes.R @@ -53,7 +53,7 @@ theme_lgbtq_white <- function(...) { ) } -theme_lgbtq_agender <- function(...) { +theme_agender <- function(...) { ggplot2::theme( panel.background = element_rect(fill = "#DDE3D8", color = NA), panel.grid.minor = element_line(size = rel(0.5)), @@ -62,7 +62,7 @@ theme_lgbtq_agender <- function(...) { ) } -theme_lgbtq_demiboy <- function(...) { +theme_demiboy <- function(...) { ggplot2::theme( panel.background = element_rect(fill = "#D8E0E3", color = NA), panel.grid.minor = element_line(size = rel(0.5)), @@ -71,7 +71,7 @@ theme_lgbtq_demiboy <- function(...) { ) } -theme_lgbtq_demigirl <- function(...) { +theme_demigirl <- function(...) { ggplot2::theme( panel.background = element_rect(fill = "#E3DADD", color = NA), panel.grid.minor = element_line(size = rel(0.5)), @@ -80,5 +80,5 @@ theme_lgbtq_demigirl <- function(...) { ) } -# Default settings are fine -theme_bisexual <- ggplot2::theme +# Default settings are fine too +theme_ggplot2 <- ggplot2::theme diff --git a/R/zzz_data.R b/R/zzz_data.R index 0943370..5307f61 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -13,7 +13,7 @@ pride_data <- list( ), bisexual = list( colors = c("#D00070", "#8C4799", "#0032A0"), - theme = theme_bisexual + theme = theme_ggplot2 ), asexual = list( colors = c("#000000", "#A4A4A4", "#FFFFFF", "#810081") @@ -55,14 +55,14 @@ pride_data <- list( ), agender = list( colors = c("#000000", "#BCC4C7", "#FFFFFF", "#B7F684"), - theme = theme_lgbtq_agender + theme = theme_agender ), demiboy = list( colors = c("#7F7F7F", "#C4C4C4", "#9DD7EA", "#FFFFFF"), - theme = theme_lgbtq_demiboy + theme = theme_demiboy ), demigirl = list( colors = c("#7F7F7F", "#C4C4C4", "#FDADC8", "#FFFFFF"), - theme = theme_lgbtq_demigirl + theme = theme_demigirl ) ) From 20be915a7ad018f9e98e329300d34bd6ca51d0ad Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 18:05:59 +0200 Subject: [PATCH 10/24] implement bigender --- R/zzz_data.R | 4 ++++ man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 3 files changed, 6 insertions(+) diff --git a/R/zzz_data.R b/R/zzz_data.R index 5307f61..e35f63f 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -64,5 +64,9 @@ pride_data <- list( demigirl = list( colors = c("#7F7F7F", "#C4C4C4", "#FDADC8", "#FFFFFF"), theme = theme_demigirl + ), + bigender = list( + colors = c("#C479A2", "#EDA5CD", "#D6C7E8", "#FFFFFF", "#9AC7E8", "#6D82D1"), + theme = theme_ggplot2 ) ) diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index 03582f1..b3078ba 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -41,6 +41,7 @@ Currently available palettes are: \item \code{agender} (4 colors) \item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) +\item \code{bigender} (6 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index 4a38649..8afd6b2 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -45,6 +45,7 @@ Currently available palettes are: \item \code{agender} (4 colors) \item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) +\item \code{bigender} (6 colors) } } From 9f3d4477b7cc030bfdc804fd8f256b59fba16be4 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 18:06:16 +0200 Subject: [PATCH 11/24] update NEWS --- NEWS.md | 1 + 1 file changed, 1 insertion(+) diff --git a/NEWS.md b/NEWS.md index fcb3deb..8ce48f3 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,6 @@ # gglgbtq (development version) +* Implemented the following palettes: `agender`, `bigender`, `demiboy`, `demigirl`. * Changed `gay_man` to `gay`. # gglgbtq 0.1.0 From 8a9d92ea59aad60d23aa2a28203f328c546ba4ca Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 18:06:34 +0200 Subject: [PATCH 12/24] update README --- README.Rmd | 1 + 1 file changed, 1 insertion(+) diff --git a/README.Rmd b/README.Rmd index 99979ba..f1c97a5 100644 --- a/README.Rmd +++ b/README.Rmd @@ -96,6 +96,7 @@ palette_lgbtq("genderqueer") palette_lgbtq("agender") palette_lgbtq("demiboy") palette_lgbtq("demigirl") +palette_lgbtq("bigender") # Alternative version of 5-stripes lesbian flag palette_lgbtq("lesbian_7") # Alternative version of 5-stripes gay men flag From 8f72916f76495623d1537b47c4141377c88925e0 Mon Sep 17 00:00:00 2001 From: Laura Date: Thu, 8 Sep 2022 18:11:31 +0200 Subject: [PATCH 13/24] add borders to some palettes in README --- README.Rmd | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/README.Rmd b/README.Rmd index f1c97a5..9782d33 100644 --- a/README.Rmd +++ b/README.Rmd @@ -94,8 +94,8 @@ palette_lgbtq("aromantic") palette_lgbtq("genderfluid") palette_lgbtq("genderqueer") palette_lgbtq("agender") -palette_lgbtq("demiboy") -palette_lgbtq("demigirl") +print(palette_lgbtq("demiboy"), background = "gray92") +print(palette_lgbtq("demigirl"), background = "gray92") palette_lgbtq("bigender") # Alternative version of 5-stripes lesbian flag palette_lgbtq("lesbian_7") From fc42166b9ce24ceefe5d9912585179bfe8ae9756 Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 00:33:49 +0200 Subject: [PATCH 14/24] implement alloace --- NEWS.md | 2 +- R/zzz_data.R | 3 +++ README.Rmd | 1 + man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 5 files changed, 7 insertions(+), 1 deletion(-) diff --git a/NEWS.md b/NEWS.md index 8ce48f3..ba5c3a2 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,6 +1,6 @@ # gglgbtq (development version) -* Implemented the following palettes: `agender`, `bigender`, `demiboy`, `demigirl`. +* Implemented the following palettes: `agender`, `alloace`, `bigender`, `demiboy`, `demigirl`. * Changed `gay_man` to `gay`. # gglgbtq 0.1.0 diff --git a/R/zzz_data.R b/R/zzz_data.R index e35f63f..a2cc94b 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -68,5 +68,8 @@ pride_data <- list( bigender = list( colors = c("#C479A2", "#EDA5CD", "#D6C7E8", "#FFFFFF", "#9AC7E8", "#6D82D1"), theme = theme_ggplot2 + ), + alloace = list( + colors = c("#D50100", "#F85858", "#FFFFFF", "#81007F") ) ) diff --git a/README.Rmd b/README.Rmd index 9782d33..6d297ce 100644 --- a/README.Rmd +++ b/README.Rmd @@ -91,6 +91,7 @@ palette_lgbtq("pansexual") palette_lgbtq("nonbinary") palette_lgbtq("intersex") palette_lgbtq("aromantic") +palette_lgbtq("alloace") palette_lgbtq("genderfluid") palette_lgbtq("genderqueer") palette_lgbtq("agender") diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index b3078ba..c9c178a 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -42,6 +42,7 @@ Currently available palettes are: \item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) \item \code{bigender} (6 colors) +\item \code{alloace} (4 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index 8afd6b2..bf2bdd6 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -46,6 +46,7 @@ Currently available palettes are: \item \code{demiboy} (4 colors) \item \code{demigirl} (4 colors) \item \code{bigender} (6 colors) +\item \code{alloace} (4 colors) } } From 62ba2d5367587274c7a0707cbb6668d02e79fde4 Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 00:38:59 +0200 Subject: [PATCH 15/24] implement aroallo --- NEWS.md | 2 +- R/zzz_data.R | 3 +++ README.Rmd | 1 + man/palette_lgbtq.Rd | 1 + man/theme_lgbtq.Rd | 1 + 5 files changed, 7 insertions(+), 1 deletion(-) diff --git a/NEWS.md b/NEWS.md index ba5c3a2..2906eea 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,6 +1,6 @@ # gglgbtq (development version) -* Implemented the following palettes: `agender`, `alloace`, `bigender`, `demiboy`, `demigirl`. +* Implemented the following palettes: `agender`, `alloace`, `aroallo`, `bigender`, `demiboy`, `demigirl`. * Changed `gay_man` to `gay`. # gglgbtq 0.1.0 diff --git a/R/zzz_data.R b/R/zzz_data.R index a2cc94b..6a2c477 100644 --- a/R/zzz_data.R +++ b/R/zzz_data.R @@ -71,5 +71,8 @@ pride_data <- list( ), alloace = list( colors = c("#D50100", "#F85858", "#FFFFFF", "#81007F") + ), + aroallo = list( + colors = c("#3DA542", "#A8D379", "#FFFFFF", "#FBE34B", "#E8BB00") ) ) diff --git a/README.Rmd b/README.Rmd index 6d297ce..3f08ed3 100644 --- a/README.Rmd +++ b/README.Rmd @@ -92,6 +92,7 @@ palette_lgbtq("nonbinary") palette_lgbtq("intersex") palette_lgbtq("aromantic") palette_lgbtq("alloace") +palette_lgbtq("aroallo") palette_lgbtq("genderfluid") palette_lgbtq("genderqueer") palette_lgbtq("agender") diff --git a/man/palette_lgbtq.Rd b/man/palette_lgbtq.Rd index c9c178a..54c1caa 100644 --- a/man/palette_lgbtq.Rd +++ b/man/palette_lgbtq.Rd @@ -43,6 +43,7 @@ Currently available palettes are: \item \code{demigirl} (4 colors) \item \code{bigender} (6 colors) \item \code{alloace} (4 colors) +\item \code{aroallo} (5 colors) } } diff --git a/man/theme_lgbtq.Rd b/man/theme_lgbtq.Rd index bf2bdd6..67bd29e 100644 --- a/man/theme_lgbtq.Rd +++ b/man/theme_lgbtq.Rd @@ -47,6 +47,7 @@ Currently available palettes are: \item \code{demigirl} (4 colors) \item \code{bigender} (6 colors) \item \code{alloace} (4 colors) +\item \code{aroallo} (5 colors) } } From d141410664bd5a1bbfb537c685b00c6cbad9df8d Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 19:14:03 +0200 Subject: [PATCH 16/24] initialize gallery vignette --- .gitignore | 2 ++ DESCRIPTION | 3 +++ vignettes/.gitignore | 2 ++ vignettes/gallery.Rmd | 16 ++++++++++++++++ 4 files changed, 23 insertions(+) create mode 100644 vignettes/.gitignore create mode 100644 vignettes/gallery.Rmd diff --git a/.gitignore b/.gitignore index 55dc55f..cfa036b 100644 --- a/.gitignore +++ b/.gitignore @@ -42,3 +42,5 @@ vignettes/*.pdf *.Rproj .Rproj.user + +inst/doc diff --git a/DESCRIPTION b/DESCRIPTION index cb387bd..2e2b9ba 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -12,6 +12,8 @@ Imports: graphics, grDevices Suggests: + knitr, + rmarkdown, spelling, testthat (>= 3.0.0) License: GPL (>= 3) @@ -21,3 +23,4 @@ RoxygenNote: 7.1.2 Config/testthat/edition: 3 URL: https://github.com/turtletopia/gglgbtq Language: en-US +VignetteBuilder: knitr diff --git a/vignettes/.gitignore b/vignettes/.gitignore new file mode 100644 index 0000000..097b241 --- /dev/null +++ b/vignettes/.gitignore @@ -0,0 +1,2 @@ +*.html +*.R diff --git a/vignettes/gallery.Rmd b/vignettes/gallery.Rmd new file mode 100644 index 0000000..e17b1a5 --- /dev/null +++ b/vignettes/gallery.Rmd @@ -0,0 +1,16 @@ +--- +title: "Palette gallery" +output: rmarkdown::html_vignette +vignette: > + %\VignetteIndexEntry{Palette gallery} + %\VignetteEngine{knitr::rmarkdown} + %\VignetteEncoding{UTF-8} +--- + +```{r, include = FALSE} +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>" +) +library(gglgbtq) +``` From f53df3481195cafa01fcb0d58b8249da89e782a1 Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 19:22:40 +0200 Subject: [PATCH 17/24] add pkgdown for vignettes --- .github/workflows/pkgdown.yaml | 35 ++++++++++++++++++++++++++++++++++ .gitignore | 1 + DESCRIPTION | 3 ++- _pkgdown.yml | 4 ++++ 4 files changed, 42 insertions(+), 1 deletion(-) create mode 100644 .github/workflows/pkgdown.yaml create mode 100644 _pkgdown.yml diff --git a/.github/workflows/pkgdown.yaml b/.github/workflows/pkgdown.yaml new file mode 100644 index 0000000..63cbb18 --- /dev/null +++ b/.github/workflows/pkgdown.yaml @@ -0,0 +1,35 @@ +# Workflow derived from https://github.com/r-lib/actions/tree/master/examples +# Need help debugging build failures? Start at https://github.com/r-lib/actions#where-to-find-help +on: + push: + branches: [main, master] + release: + types: [published] + workflow_dispatch: + +name: pkgdown + +jobs: + pkgdown: + runs-on: ubuntu-latest + env: + GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }} + steps: + - uses: actions/checkout@v2 + + - uses: r-lib/actions/setup-pandoc@v1 + + - uses: r-lib/actions/setup-r@v1 + with: + use-public-rspm: true + + - uses: r-lib/actions/setup-r-dependencies@v1 + with: + extra-packages: pkgdown + needs: website + + - name: Deploy package + run: | + git config --local user.name "$GITHUB_ACTOR" + git config --local user.email "$GITHUB_ACTOR@users.noreply.github.com" + Rscript -e 'pkgdown::deploy_to_branch(new_process = FALSE)' diff --git a/.gitignore b/.gitignore index cfa036b..fb5c598 100644 --- a/.gitignore +++ b/.gitignore @@ -44,3 +44,4 @@ vignettes/*.pdf .Rproj.user inst/doc +docs diff --git a/DESCRIPTION b/DESCRIPTION index 2e2b9ba..de4f7b7 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -21,6 +21,7 @@ Encoding: UTF-8 Roxygen: list(markdown = TRUE) RoxygenNote: 7.1.2 Config/testthat/edition: 3 -URL: https://github.com/turtletopia/gglgbtq +URL: https://github.com/turtletopia/gglgbtq, + https://turtletopia.github.io/gglgbtq/ Language: en-US VignetteBuilder: knitr diff --git a/_pkgdown.yml b/_pkgdown.yml new file mode 100644 index 0000000..d465862 --- /dev/null +++ b/_pkgdown.yml @@ -0,0 +1,4 @@ +url: https://turtletopia.github.io/gglgbtq/ +template: + bootstrap: 5 + From 3e9049b0cec855cb4b1fca2c327a4b136a6743d5 Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 21:00:16 +0200 Subject: [PATCH 18/24] move most palettes to vignette --- README.Rmd | 16 ++-------------- README_files/figure-gfm/unnamed-chunk-3-1.png | Bin 3440 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-10.png | Bin 3451 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-11.png | Bin 3420 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-12.png | Bin 3268 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-13.png | Bin 3269 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-14.png | Bin 2733 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-15.png | Bin 3582 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-16.png | Bin 3930 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-2.png | Bin 4204 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-3.png | Bin 4104 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-4.png | Bin 3151 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-5.png | Bin 3274 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-6.png | Bin 2630 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-7.png | Bin 2825 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-8.png | Bin 3093 -> 0 bytes README_files/figure-gfm/unnamed-chunk-3-9.png | Bin 2711 -> 0 bytes README_files/figure-gfm/unnamed-chunk-4-1.png | Bin 5266 -> 0 bytes README_files/figure-gfm/unnamed-chunk-5-1.png | Bin 5445 -> 0 bytes README_files/figure-gfm/unnamed-chunk-6-1.png | Bin 5093 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-1.png | Bin 3440 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-10.png | Bin 3451 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-11.png | Bin 3420 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-12.png | Bin 3268 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-13.png | Bin 3269 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-14.png | Bin 2733 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-15.png | Bin 3582 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-16.png | Bin 3930 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-2.png | Bin 4204 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-3.png | Bin 4104 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-4.png | Bin 3151 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-5.png | Bin 3274 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-6.png | Bin 2630 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-7.png | Bin 2825 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-8.png | Bin 3093 -> 0 bytes README_files/figure-gfm/unnamed-chunk-7-9.png | Bin 2711 -> 0 bytes 36 files changed, 2 insertions(+), 14 deletions(-) delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-1.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-10.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-11.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-12.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-13.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-14.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-15.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-16.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-2.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-3.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-4.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-5.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-6.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-7.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-8.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-3-9.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-4-1.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-5-1.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-6-1.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-1.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-10.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-11.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-12.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-13.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-14.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-15.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-16.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-2.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-3.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-4.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-5.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-6.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-7.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-8.png delete mode 100644 README_files/figure-gfm/unnamed-chunk-7-9.png diff --git a/README.Rmd b/README.Rmd index 3f08ed3..25ead97 100644 --- a/README.Rmd +++ b/README.Rmd @@ -76,6 +76,8 @@ ggplot(data, aes(x = x, y = y, fill = as.factor(group))) + ## Gallery +Only a few most common palettes are included below. For the complete list, see [palette gallery vignette](https://turtletopia.github.io/gglgbtq/articles/gallery.html). + ```{r} palette_lgbtq("rainbow") palette_lgbtq("philadelphia") @@ -87,22 +89,8 @@ palette_lgbtq("bisexual") # Background added to avoid the "disappearance" of the white stripe print(palette_lgbtq("transgender"), background = "gray92") palette_lgbtq("asexual") -palette_lgbtq("pansexual") palette_lgbtq("nonbinary") palette_lgbtq("intersex") -palette_lgbtq("aromantic") -palette_lgbtq("alloace") -palette_lgbtq("aroallo") -palette_lgbtq("genderfluid") -palette_lgbtq("genderqueer") -palette_lgbtq("agender") -print(palette_lgbtq("demiboy"), background = "gray92") -print(palette_lgbtq("demigirl"), background = "gray92") -palette_lgbtq("bigender") -# Alternative version of 5-stripes lesbian flag -palette_lgbtq("lesbian_7") -# Alternative version of 5-stripes gay men flag -palette_lgbtq("gay_7") ``` ## End notes diff --git a/README_files/figure-gfm/unnamed-chunk-3-1.png b/README_files/figure-gfm/unnamed-chunk-3-1.png deleted file mode 100644 index a162dbcdb53cd13eaa191ba458e67f8159733135..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3440 zcmd^?doADpY#5_-{<{)zuxheZOmo2 zDQ^P+K-S_S)D{3F--yqzwn&QC$Wm3hc-!iC(cwM-$Tj?$5?_(IZen3|3#i#uRL1N` z=+$R|Lh=HIO!l+8YzA#2pS@c1(8(ZP%NkKKGF%o=!I)SdvPpkF4VkWZG5ey5hBSbf zwhmE);AM9lS)T59tGq7!6k3{{Q`*$H9iyQU4BDaO<}O0r3{v)%e|Cz-s&R=t!_D-- zvou*Kx-lcf{kY*iISBx$MunioS~7ngmef$BPZvLd3zlUkB{D2VPAnlZ$lSog?CqV>^25~Z6Fi?>{9>dGZ?ZI@McGp z3~*LWQXY7CZqt4Mh}rUgA(+zo!%xXEh*--fOHev5D7?NR2Zx&_-ooP_s`JYt#OB-o zV)C;1Dn7-A_{*kNwxu|G-UlQ5|J-`yiVNSd3Q_g1#3OF|x4P!GOPAnxnzP)SvtI1l z?TgP_C~x3)X(gW;+0@K{w<7 z^3ZXnrRC8l>0>{q)8+OZ`&PsEczeKID|9`CC8r1}C)_AmAnJ0GF&RdvDQgh+zDGNn z8KY=G^UfrEWrwFC92`FA*dj){x`$SX*9s4P*zg#@4E{L4YR}kUW_N@VPN}9^C{HU> zMd;Zt>64U@IPfpY2UeTV6^NuJ4jqlE1V>eps@~ zS5^VHQRv0<3)$IwKzHx@=t{R~ew^%dv<)Qu0bSqFdiz$btV}UL{`vU+ql0T4`fqa{ zn^z+z7^uMgRn^(Tw=wtR6raf|@A6#W`gqs8Om)mib#y}X6uB*&tFS-WOEu+pjg_(P zNlHqsuWKnn^d@FZQ%XeS#cS{mgkSpoiWi9;$s@cLY*;>Kll11NPZMee9u)W9aPrck zuTYIdytTRax8GT7*mcVuQT1UUp4p@N&jb_kAAYY87{q=VZm_f4nK_oJ@0eG19cqiT z5-6Km0pX3ijgK?K!m1-v>GR!tA|u=GPw(g7q*V(znaICshd)5{RSlUvlB}q!t)3j_ zB#h1VWiq(!-(czihYQ^hF9gqvHA@C*1FNs^OdENZhYvzBO^ICZ2^ksFkVE1~!4cu(Vu6NW4Oa0W!( z+FHvz0bX7Eu`WBJLv#8o9DmdJNv2Z8Xq5*vtM=1u!z}SheS#~PH~Vc57Dl>m>>>Q* zOdkO!z+W!qmubSrAB0Q@5vqw711_XtoIE{^?VQ=huv@-$m@I}~I0}kd_;CP%Ky>Cj z;Yp4vfMqsGFY(Q{ykTrH_M2@_dv)4(Sg9YIl42If;$M`jv&qjIM&&NNo$zVrmOik4DzJ_mc0V^(j3u|}4q zDsbRzaFWt*YU;1uMI_AQn7E`W6H92p>)oe$I#kw}f`;`=Wd@xZRIr-M&HHjb4tDUQ zZY@Nl4Y;U8$q+J2OD$?;!o%7@ptojb99&71nNYnuG-@Luqn~4=R&UmPA=ELBW|x|p zy<+lZpi&8BXy-qKLKRe6LEqhOUXyY9aoWhYdlSgee+k7K%*jb;0ritvX3_j zPcq+s!Yze{$@5sQ<9+{f;7h3LEzhaTpu5#wZpHV9A=-^F}CNN(!QO>+9m{&=mM~D zjv00DYsj@(FZO$fNHiY-(s^Z7T#Qu!Lj`;X=(zVaYX^rrs>$9bUagtPk^m9?kx5;h z`t9kWz4AswG+1N*XlT;`rLoSksK(NRNaP%(6QBQyAiG^&m&#J;&W>-XjQ1BxNWfk@ z%mxv0INZWj%L{2-jszg}Sma7B>oIC@ERXQ+-C&4(IK|ysn?oW8H~JOJeGo*S=^+`8 z%ki^4Q>BPogQOmJ1(0cE;zAdNfqFy^4`FnDr>m(8&yWsp+9cfww%LPyS0f2B%t(c( zZ_Vq0Hn!0;P5f=!nkExmC%U=PVV2UWDN@q=qGXI)SGCgyUbe`RBE5TCAfMt4^z>xA zEL6}hsECtPgM^DMT^yt3a}DQVSt~UHS#<1L+6|C@tsR6NyNk^)%JAP_%PpC+L;t~s zxYRk>`az+#zT>juKn0=5sV1VD8_;ZP6-H<)nipp%^`QInyKefU-Cx^ajg>fOwD0?T zmGkGr(>ml(#IEKTFL7f;+|AL;YvToVm{7Wh%$?M4nAtqDokH0pcuVAk={YAX)s?* zd@Nu^-HRbh;h*76ETAj16pEn8jC9Tn`c@#r$9&jT4V_HZoPl;km}|J}ihvjcCrkBj3;r&JU*gKlp}C(B z%gffLHLea1dRrczB_$+$TnVBL^@%o8V@gW!q4~?Uf@mYv#H6I*&+I`YiqM85l59AN zlw+ciF%thubItdDSejKfMUyf>oN=Z*w+VSTvqz!@f8qyCTwg|^wph91@pz`1+WCgq zYxd#(dCPxd8m%yhDq)2$QZvgfD`N4xP@EYj+U)0lec^5Ijj+)vf0x92T#i;np=_2_)(dY=g7~5h?{{_(1mZmERx2D87t}*=_-?H3 z#B+Dm*N=PeUb5E~j8XfC>$bz8f93=;R7`I_Xq<;c_C|PFMi=WGGOQo<;Kzz~0O7X+ z2sMMVE0a<(#zrdEVHcJKL`%Or4aR3AV2k%ii}F2hNyj=kq*3PdR(5Hq7;763!i;d# z%IJSjuT!e8A1Pvw>biIb_dU7MH^DyQ>7SefeuH7h`2PYu9l;(kLR$_ykBqX9Ocj?e zS+Ml~3(Wfml>blDv_@RR54IryJj{Qh`L9jH)ZBA^+D5!np0v1y0xV!QP{O&J(SHXH CJ5=ES diff --git a/README_files/figure-gfm/unnamed-chunk-3-10.png b/README_files/figure-gfm/unnamed-chunk-3-10.png deleted file mode 100644 index d6dba62738fb51678e9621f62f1175658153693b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3451 zcmd^C2UAnq8a;prB7#U$qM$)R5TuBpgrW!{ir}RRDk!3%g@9-z2_zJ`#2W-7f?`NO z0YQ3@rc~*@*MvX}C3LtTYG`@K``)~HbLahoyXWkE&i-c4KJ%?_uQh8wy=G;;M?_8p z0DwIfmrQK{fIk`hP7vk?M|`2eDEQjtcgZOL0K{s4b-qSqhC8@e-NN*|U0~t@6KnVK zo_zJ63K^Q3hY3&@O;HWfyVUpT(5v;?YRAgMmEII*`42e6Fr#lEvJWA0dLzc=AYL>w zTiR}*?@_Ipq{9xgNu{Z{^E;(?2nv#hja?{aJCWy3!4;~Ksz%Wq3Y_Z5`?+FN-ZqqA zsl*2WUbK?69RP4{RdE>rjuWZ{faK)(62r`Cc#3EB#cx6gLxJo4f8^H|Q~9&K2HpTS ztoa=5e^lz{viN{&dqahQbLV%+1Aw4JAOJ|2{?micDb4OZ#a`atdG_*!3qH3I-(wh< zo%xx&mGkHrk^IcwW5d6IRMph%8r_~sgE{^e^uzq(KuDOd0RV_V{}WVg>gX7lTft z`uh6n8XBVI4e5=IjZ7w!!N5*;y-mWcd!o^3Npl$q7_5xVW()3?`L@Vp)Yhh4d3Ey0 zkt5B`&5vSe<;^E~uM7~K+}-ukani2puKLh3T}#a;D|T|DDEg{L{KF?9w<>MqrMJ+2 z)0cSZLBSgsuJI&9dou0y(BxpA;}}YYJ4|mnmL}V)ZPRFp+oti2Drh*J@m${zCZD4G z%wt*2D#yPH;6sB`*P>-W&< zpuh%$f}EU&OZ~@fY-~*H`umG+l=!BlrFs6Dub5_ej%Jc)DeRo96zTH*Y2; zCSJaL8MQd_DS*>4Jw5%wHhq+<_K@BHrniLqwo&U839dSH=+Uc|%e~?Y*2aar&3d+8 z&6th?ezvW-`BYfvf!$`NoQ&0F4=ioMcq+VdALdQ!~AC7cS}E$r>%xIYO5!poOZ6f0Rt$-A2SdwP4V6VH%d zzU%|jsi~>S&(EKooo#rQ?NsXbHZro2YKV=xnDXWJPzf>#wYg(6as_G_FDQELxu%&Zf zHdc-Ik-`&%;`4segWR)jz-hBf`2LxPM5F8LwIvW&vccWHCM`?_k>E3Q5PmkPZebU6 zg-viwq$Do=sQ|FVgblimPHFh+W4?K~xv{H51&ShrH@-iMijpD~6ci|$M|;3N78J0@ z$IXsvYisN16xQcti^=I6S5mrYy0WseZ{I#Stpcate*4YD!~~>KQ6wK9-x!`(K>+cp zt3UnR<{2~RM~h+n>V>ujT(FRbIF`$;(p$P90oEg)^4N~ycM>lJvDYC*db3tj z6El)$(N0ip-?miP)&13m5`oF+ClL`v$g#>rDsF4t6S6b>JY%TPGnO#@@bmKWGDbr| z+no>-6GQM}6z51Nk|Ulxc?hy_ks1;LAcl=qRA#7fEmT__3Sl_6IMaLL9OJmQj2FZ= zhq>C*xyYNDZX3Kmh~@T%Q>95CfA5V~G?qP6&PXwwT};@&PZe6vd4|PRBHW%b#?4Yw z9F-9|z_Sai(5X9>HM#+h9}nv0-YR>KIA{=f&2)2f6FlQ;=3NDpgoI%Nshx_RI?zhm z+S)QZYHZAt=N#_I>kPqQoy$HuRXVoD=akbQcMS~9JwOc*FEQ(bKJr=j852Xdk}!RZ zj-~_3BgKW!OM^cWos?b**I!L=^J6%;z z6eU_1QWwhA9!KL(Kb&z)nzy7o;67PySg`9pjDO+|*Q^_Kx$ltoke`|!HM@5&?HBGl zllpzhRhTs|#f!QDC|_2tj*yU$1g%^#kMGA17x0KH>-whY>W$?xu_(MHXZk2K!tD1= z*A=;-r(|#MR?2vT<+_2F|D#81@e1SVR*5H}H}Fxiq{@n<=|#pW?mj=u>N=l5wt3#* zl?%HDJ-k_Tt!D$QmD1wg=H?G7iev;+KCeHxChM(AnKqvOreLuwht@skmNIxXX{F(i z>p)kG*r5vjJvdAT!G~U8#fUAv`_YdprX$2Je%-n;`jA;F$mlQdP6|x9L}nJ!?xEwn zXn@}?Cj??J&PM&hbk68c)WUa8Q=UGC`F-y9o-4=1_32NZUz2EVvOJ-tJu%5S2%|Cz z?qzAEH0ZY4g+?9-70Nc>m@66?8EJi`F^Fw(*G@}Mze0gcK$Jn5eE@fGh$p-@Hc5Xf z$`LV5&BGhFl36caJT{#6&=AEB=MQPlzir*NBr z5+5=%or}EeE7FURW4T-HWRzt}eSQ6{PY==-si64I&-+O15)tugX}YgZi3PQ+uj-!0 z5&sM8Z^>g9$5==axd|3)uYp%KVe@WdygGv&v4&1g*c(`l!F-=TASb5^C6P!FJzt$M zG`O7syyKw6E>Y2gTJOHbz^lsWbZ110eU^i5y47ioK3OTLw#2ixru0J3Q~vC__eo&{ zgJI-z!e-)|a%^Y&+*(UkT&rWy*7wK&j(K_3g4U~ToTczCNm5i>A;>V0dEr#-Tc@dA z1{0-3`TR_cs?DC;nn#tDt;xEG(Q>qliwnFXu{-zE#M9lcjo>SaqedN8 z>$Y$!JA23A&29GcZplig1NP{m2My%6l`$ySPd;l~qC+J=BxBYB4K$3+OPSTu6MIP1JZ18w&}Jq@XQE#>VhVqZMDj zezmu^Pq(5x2nc|j_UZ$bAuK$cJSU}Jxb!+7W4@e0Lm1MfWu)WdT;=wi@ma`J|9a;m zs0P8s$1|_Mlion|a$T!NGyAvRV@&)qiobx&yE)%Rd{R_YG^i?0N9pG4ZZ!U7G$Uf$ z{RDa5KN)m;{LfxS<*hR1WAEvhlb6rldV!czsm|mV5NOW|x%ovPpGK$CrD?5Z?k#oe z3fH?jUCJVZ&kd~jM1OLYZ^ENV^B}jiL1xuXX=1p_`*paP&chV&@ zU@m|8vcJ2(e|QiU+w4Af763x-H%R}lDF&}6JbsB|+o`q;`$q6K1z4C_ndX|@4*M4a C)-L`4 diff --git a/README_files/figure-gfm/unnamed-chunk-3-11.png b/README_files/figure-gfm/unnamed-chunk-3-11.png deleted file mode 100644 index 8e6983df15bbb4f50a9882ebfd0a9ac8e18bf94b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3420 zcmd^CXHe5y7XJ%RP!KfwkQFd!@S##gBmqJ|A%H0DiHd}#^b$ZI5FkK66p$h!iqfNi zbV5&%5kIm`IOVVoQrWw81ur+hp%}fxIJ|wJL3`(1e^?o zj#vn6KnS6{gmErAiKNrdASdMMY8FXo6|2j)7Ux(y&OX!TsR^EnBU>rH_FBf~=F$Lg zQyR)d9034B)-e?T;DM|Fz?GI|W4!IcyrU4X{6cBy(>#s`nE$D6R5S&(|LZusjuRkU z;5Z2cJ^SaI|7T@OhesP4YKa{&k1;x8*e5RToz1ukWNX-!4m3?S<-q?NuiYF{e&gQR z+B4GHqqhHZbvKnaNDcH4UmKDJ{VE=j#4$sOKlztX`?b=GI;xYC^M@U4R41$z&~1mE z(FEv6?Po&k(>a#yc&|EYJ2_tm4pbCFxRj zGtw#?sqS^yvyD+wOWp*J_q0-&xn6Dg4=MM&r)0(ayw=BTJ4vCdO{$Zs}Ky}*FI`l11hq8OFt)=WHnP1`%1KNRl;Fw3ov5O0-u|KCE0au#yV{`EF7&DKAaNo z;Os1@ikqt^FPi_EgQKXDB_)`0hs}DQb4l?(Bx+Dj1Nz&n_3=0>CjV}uXZ-mncxsV5 z_2c##Q7P2Ia5sXrQS9iM^(a31)SguuSXJPifam-6;uCguqC0yF2AVd@QJRAvfuJuM zqrtd#HmDBGr+>-QYEjcPQqrcq0pr!W`sK*mIyxp=y*Y`nH*vTp%s~f`ul;H_CC1kb z?(lOC^A#*wbdX*NDUqD3OP$mhY>3y0`1baET4A`~W{!KHDkl!Jd==stb`P0hNet6E z8ePHKQ6#+6UdX)2Ky=gGf~a+S4UvPRmAq=`C<|H0MI*r|f0h2;UVWN%T~OVWr5t#XBiK0S5s9U4Ke%4A@lEXONu*$ur`qQ-6 z))Mt}EO@9|%6~;S--qpN}C~CHW4!OpJm2_%m zL>e0}(T5_i?=2u68_3@Fkckk>*{-iyge&;rHQ0#Bc^SyMT__ypdT(8W(@>J!!k-P3 zk%`XN!l+UFh$)Zy2!x_X$jwWl7!M|8=(?cHS(9io%!?#+PIWS;ECdI0VW}t}loSw^ zAC1xjYrty^wJR&J7hvx#rOob}U4b}q8!7LQYKOqBC!D1smQ!Z`Cx60S@Ama{C(SzTZ-Z+e_4I;tYMH#cuFNRnT z3jfUzI|_!Z)QR5HxU3DDo1yK~92TgFeUs3z-vg=xSUxPF=%)QJqqt7*#-%~;;!$;7 z`t*+pZ7bCX&m!!pSgu$4kj^~Zh(Ub7Dh*5iW3z4J2WJJeLcH`U+IAMOJk-+f4Lc9a zb1>>T@wcT-$uCUMQIR;I;oQMj%#RX$HTWv(byo%XP&S&#tdX~f#dJGuj_v>C2Ztk_E3zCMe-$Bg)%#GM8{N9dZ1YRa9;%eTBn%)Yj}9gVxO zGF6j<-F}zYaQCP|lrY`dVW!L8VA#*i_r)fZlD;`p6f~xsQka`NpDqh2h|jl3gJuTqGQ*v!dpZ^-X34c1ZRM+2svVV%=9; zk~bwDSGni+BD{>b;S<;p2Pv`H3AJUoc5`V?&K4(w>gDxQRk2cVQWs~cg4@7Qc|!f; zYYDmH)Wp|o`-f7ZFJxsZML?A+{jE|d`ml}ICxeeAW1!Zl{`yE&dXZCm(-zU#tgp#n z(#9Zh6}?<3&nCQzt&L7DURiSusOI)N`>|A z=iaAkc7BUN1Pk|ka>8(tZ#v(MziESvcN50G?}(ygicXqb&&w#waBf~cqfK!z8T$3} z0tVI3ra-H4(un}fBX$`?1*8IdJi+YmhNqqWl`B%OMpFHjP`-Kb?Wl_C)m4mkh^o`q zh7ScgX#t?EfZgKKnKhBcB|prTpA_NnZ7bD*qU)(`;R1JM*=S?vpPy$i0)N1HLj496xvcD5FV$~VlLx^wODo!f0W!zSO0AR^0WYvQh3(3kX5|FqBnbnStW$9@Ob z%@pOdo{zOz0D<3^&*8~VIqz@?H*oXTZ(sm83i1Jf-;tw70K-$k|Ek<*n;F$amf#PG zMx5ls_PMhUMvMT%u(OHJq)AHuiGhD>^?zFVWqy8sH)PA3>PXjOH(UPZfP5exq`W%jXIipYS!3*8#)!aBbpUuV`k?xjyq~W ziDKs37*c8aMh648L=#V`fQq8B)VRdM&b9U001<+Jl)O$03fomU9762tb0{cJCp+`KkqOm?c29Q zAP`km)g3!_K%r1IH8pj0bqx&-O-)T047PLU&Rx59?cTjxOG`^zTU$p*M^{&O@7}$7 zdV2c$`uq3qH#9UfGBP@F;K0Fy2M--OWNd7F`0!y96BAQYQ!_I&b8~YG3yUL1j#ye+ zT3J~gJ$m%mv17-NA3t&8#L1H<;c&RMwY80n4FZ9%wY5EU>Xehte%o%TQZyz5YUteE8KR?B9U(2 zzMYqsm!F?sP*8CH{{6zj!lI(0;^N|xl9IBrvhwosii(QL%1SbsTvb(7U0q#MQ}gK2 zBMOB=Rca`$uC9(wr#Cb-JbU)6v9YnKsj0cSxvj0Oy}kX#ix(Xo9SjDev$K=QWWIX! z>hgww5?(XgF?d$7fu~-92O}|r$&1Q2roWa4tp`oGS;o;HI(Xp|y@$vDA ziHQ#%K1@zd@_4+dsi}`2KYsf3X<8}K_{_}A?CdO`&ld;;LZNVOZf<^leqmujBoZwx zEs4eA<>lp-m6g@iRf$9*l}cqY+2-b^LZOJnUZg1*+VP8L*i`^PvumpWdy}4A0sx>E zUT!Xdsb!0k>urJHeLX8h6FII2Lh|oo%+72NGjsoWPw4$3KT&lg`K~#JQe3p#QbYky zTK-`E{E&J_?fwTl$K(w*V#$)->VR`sT+6vk0qOI)3Ou8d`zrlQ9UM+-8f_$ojHqIz zQRLczU|_w+AE0yjc+eWpU)WKzbMxItCubu%4dXTu*z7a=-Te3D{1V8jb^b?yr(43Pl# zJ7f6`?ua0wSrU46qoTh@_dM}J9&OWKD}`R+kkqxrBt^anf{>zsf z(D>8rLs~BYX1^FGGT5n1TD~gcAJqeLPny5TS+=_LRl_|aD zW;EvRJ$%EG(|qv}+}CQu{`C?*PX@=mU6Y~LPz5+dsa+x>BME4rjD6midr871*4kw? zaCOtsq`z7jE3XO6xRTO@0b5@LE1-XIkcaI>%2m&&v=_H?6W04G5vE2J6cQ|AGGn;M z1}SFXqJCDp_xYY~Z$PG+G&sEdvzufgACdJWTQd;l(Bg5vEH-6sfFydrYap@s1__l5 z%v#AhOD^2V3)$F5pm2w>*7Q1(`)IlwTo^N2e%FNzk?Gs8kbJHI7*AHFK(SBSU1@?} z*C{pVP8|Fw!1bX=NaK7^t3PNj}e6W*W!O58hZ4A&{ik6 zMUI-bQg61mY<{68R1GNn&`C}2gmTSryV;Q+g`ykWnq1U-t_+M1ReCY{a}hIiH0?8= zMT0j6$qVJcN*Pwn`wR4qAGVLE901c_-Yh#~EGDjda!)KBG}V>A8%@*_yPi84(xT zy2~|+$8>RW|4BQ>hp9apKzq^r)9j_^VJi;Kzf2E+?EQd?!+J0J5Oc{XV%)$A{Ip;Rg|ZozOWooBM^@jVW(nS73x2+>JeY- zhkTk8nG>mTX6%b0ZK(HSBU+|WbBZ4a5&9XzRLO)7LLLD$c(N6jBePrN6W>F1S{~F- zSQ-~ZLF_N*b072ziX$&S+6TptjaaeEF+*6#afm%9!{9i9&K;|ueB(t{xbc-Q!CEPn z3raC!_voU{*=uChpJ*QQ693cZOrI&LwW#0Qm7bVmIN2E^f4gqVES;Ol6`!+?=gP6` zL_Dy3D|sFV{yE%t{wMdv2;>}cHu||@mU?A_Swnn90%cLqw%;GO?=S!V;alXPxEeUZ nwIGjphM;JL^z2~cNg|-C)8zLY{$;-MD+%y&_jRM6zHt5D^DjGM diff --git a/README_files/figure-gfm/unnamed-chunk-3-13.png b/README_files/figure-gfm/unnamed-chunk-3-13.png deleted file mode 100644 index d1ef860d180d3f9ee1a08156de2dc69769b84aa8..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3269 zcmeH}`#+QYAICRZG^b<;NexMox-o_w>L%oPBT8wcBALTIr zIG~}Uqj6Ao-=RZVdV2d0>zTbctbOE{1N!(R89dmFrclyo3+3C28 zi>2#HD_2)*H@6d~PuaM;+nzn==!tRk@^td{a`ry&e8Jo0;)Ro!F1q?$ITH}z5fpeX zI0*B5uqWfe?~NjJS6npOO@r zni8Fs8k3$D`!M}_#)BJ~88@>sZ)IoRCOwMF$%@M*5%P2H6yzopGU{NK{Y_sX8!CzmEYdzxHcmQq1Zsd$!JS^fv5JgurCt(x-SdDX+(>I`a42JLxf zUG1ZKYSs%{Rs$`&p^ns8pYyUIx4BVvpfQjBGQXv%ptY%~iC*}srKr87_;qXXo3@gU z_9vZhO1s~5aXX$eI?H;x$;|F&eT?$Ay%ht@%6D(82K%d7?`nnzpR)&RM_9F^L)7=f zG!DCN?EQ<6oQ8?9#)G000~(o$h0T72-l8`jh^vPaelTCkX&24bOlm%F|$9!#*W0Dt_;BVAGnvc!C$#u=$>XHc4B# zC>LwODr7=I1{UKk6g$hI5cmApLf_1U>M7q0`$Px>LUitdsbZOz?~6Rl4L-ms%)^@K zI-#8n>@9{uD0W2_VBdt+65ouw)l(EJpk0r#JeJu5d-QYjpJn-*7AUD(5Vdo;?QmZl z2_yY$gHl|U9?3cHug_Ew)}2j$z`k0WJnE1hZ6a6}8@5TEFmUSjeUlw?#KGO8(SvoB zsNruGX1!N^1L@w*W#$_&x}i-U$&ywukaBLn$TI4$WjH<45|6T#`1%0<8SakuDUJ;@ zQAY>fv0>Swi)wdl(CPu42{|4+0!dS3C^`XW`dHUhy0UAg|7gZW59=I}8zOrk`NKy3 zQT9gBvcVq)9qRmE<_?Uq`4qwOd>1unUM?BUT>|P_mXM0DGrbm&h4-PaCgSUblRo0smUIyjn4R<( zQ7?9UpaVX+j$}kGqUl)$vPL8DZ(mLs!@>qi(PHGk(+2}z!X0~?;U?i#OzXB&9BOvZ3v<^$3sUd$8e*|Jt;9`MWBcOl#Z=9 z7do}H2F);C99yh2L_p^1N9tv51f+~1^=JmGD>>f5Kb`aE*cyA1#1ye}`>q_qi~@)k zwK^tm!oqzHs?4H>&MKbq{|piSLmCF9j8<`0L%68P2DNCeJXH2Vk!i=(Y_ zD`hc$GrbXb!JjXcq+^yse%SlUc^u}1Am(m=%Z-!C9sxKRNq~pk>}NHkSu@9@NW#G5 z&W5@P(V}XMq&4h+Q7dHt;x4z7@nV+{W}*yHQ8Y94yP|=8i-^IYnAe9gXot?hB^Y+e z-MbnPJdWg74xue-Ht)y4&fsXw>lqloJstlgZ`U{zP=EDH6<@V-cNbbMG2$IRKo#(B zt)n;^+08copBYw>^q{+Br6D$usyl{cFY~yi@%juc_3G*VayLo9zg1qR81(P>!rm*XnmxOaw8TTMcR0)PZQjz|%1$H0IdL)wcqfk0A05el(?xwBhpD+;j-6Wv{yp5a%lLwf7T5A;?6qCAz=0)-gww0>FMk18yFZE8X6iI8Npz%0|yQm8yg=yc+kYe#LUdh z+}zy4!ot$h^6=rqR#sL=j~<1?;m403x3;#nv9YnWwM8Hhc6N65_Vx}A4oD=@+1c6E z)zwW%L|u1xcMlH_Pft%TFRzm)PkMWM`}p|y`ud_!C_g_xe}Dher%$8N=)k~03SJ6B82~8ygoF7at#=n3zZ)5Qs$L z?c2ALl9EzVQtsZpo0^)MmX<~$kuoweva_>ub93|Z^78ZZ3knJf3k#n~1ii(OCFJ4quR#sJ2RaaNn)YR10*4EY4Q79BDm0Dk4-*A1hp`oF% zv9YPC>E+9p&CSg%EiE(}t+ln4PN%*(m{?Ck97 z>gw+9?&<02?d|RB>+A3DXR%nn32Bl!FfcGUI5;#kG%_+WIyyQwHa0#!J~1&dIXO8s zH8njwJu@@&;lqd7+1a_dInKl?hr^klpI=y5SX^9OUS3{VSy^3OU0Yk@a=Gj4>l+&z zo12?kTU&fSUmy^u?N2lo&W%*G3mOjqfEl|i(iv5T0|0>9u1Gsn{F4?rEjkSCSoguP@xq|DmgtDkm%Cc8OjMAJ3k*!DPuu zg2p1L=>9K|wHf;S!pEJ1Y0)Ng*pB4rpZGH8Drd& zgU;}w39P!W*df9PsKn`LZkG$7+EnxTp>G z)4)BSY?2mu4+Wf~sji&GA<@cb_L^Q-geR=OSH0tiA2CSzVp4GE$^eCrCbPk7N^tte zEfxt(Cr^+g{%tPEo>%Y$UXO<{rI^PfV_s9Czd(N^85VYy+9XU~b zmdDDe;#OGFT4c3nZ&gOmbeOE>V}q{N-eJ4UmRy?s*eMhJQp=Q5X8W4`Q7)@!3al-M zMr|*3(j2ZecuZ=x)kzvUZ#M6y+ZLwtuJ@U>`EPugQC=j?<7}$-w3fN10*t4WqmHCY z|A?QTp*Fx$QnzO)<~*Fncxd~1I0C=wb`3~WFiP;~C`dQcB0Va|sas*HAEsDbLCe>G zJ8UZh+_<(}iq70;K6gn9=Jrd~A}H+Fpm13oZ&Ak$+@Y`zUl>T zD%QAeOrMBZo}aqOnf!hjlu6Hh2vY#B$ZYGrFzRS}#taZ>BCD4oTdHwsIWeT^Z`HRr zJ=8O!6e>nFe`aftEvbcSXTDlv9@~rzXof}3hq5lk72C`{`*W12!_14!)Q-F1Pcdxc z9Pu#1wymk{%0~37Ue^=rcGiuja8a$3O2pkFGEzf!$F8r@$ZxC-1N@W{#Z+02@Ek zIV_GomTUW}pOJgMc*5SfXL4zF37l zt7w725(^tUX8$>#XO1@Gql1f!swj3umkgH@3lv0$xz@ehVUCRSoXj<|h9bj1Q?P}2_i z;xbHDhqAsok%NNi@z+arpCmfX&eo)ICwWE<&FAzvn_1eH6HcMXBcMuKeF*Jy!*M#Yc&i95dvy;NMt z^xYT9{cLU-LiM79-)?oVKMzr08h=#q1kmSuuwak{FG`{{z6)(F<8^ If9}@*0Ly>|f&c&j diff --git a/README_files/figure-gfm/unnamed-chunk-3-15.png b/README_files/figure-gfm/unnamed-chunk-3-15.png deleted file mode 100644 index f0a2b8e6b9aeeda64cb3452044edb8493d42f900..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3582 zcmeHKdpy&7AD<8kwK}C-Pt?&(3Q@VNoJmeIMG|sLC7jG{w%KN)6VdX}iDV{pOzs*& zE<++R$#I)8_uDqN7-92#cm8-@ujl;n{Pq0zJnz?Qx9{(_&-eRze?Fi0=kt4f1!<|U zO?evx0#UHK1h<7iw!8x0lV!JncT$PQAo!5;zvLJMfhabJUlL8I?AzexA}jcXYgh_@ zfOxG7O=T>!k54c5NMt9A=i1B1Zok zJDOi*kd@WrvY>#4DWo*RFaWbV{8VY+cuO^YcU&?R&8G(3GO50bTWt}n@%GH5Z1l$>t8CY6cGTXD; z-gTkPF5bq;)8PCODRst+K#Ukl@hSpI$y#C$b1?>0Z%%8fop<(qvi0z979os#(_F4` z@RC0Qf$;Y)qR}SDK0VVQE_I|DV?xkqg7IKQKGmx-LOpo z>ELv5rOsRp3SePWa#X=FO88G^e>$(j%|8 zlw(m%O-(N+9{g(gf9vE=B zdGmx@4duBQrM^7{z%n#zP0)|h($WHVl)NDj2+GRJF@Hf%Pftt)?NN=kSvc4~QTVq&8HFH}}mI=JE*Bj$Q%NRAlc+Ok_?{tJEIGU*-LpEy(MBr`|a ztW`vm=fK3XXV0vE>P*)6n&EO`-^X^tV6|Vre%*8I`im8WjZHg~8RGBXTk4zi>9(FS zS?R>hlgeZpm@pWFS;?`_1yswZZjg-z=LG_@fDyQhi;K0jHK6m-rReB9*Xl~Z?ZY>_ zcJ1=<@i8$m0fz^>96NSQMMcHPk9}B^hD>Eu;pjLUnJ5j>9Er~=O-)U$sHphq*&E=( zt5@go`Itc*jZW`0pG#CdN5L6P>QcA18*MIgj-wIo6p)?c_AVP?7*>}xtYIyf9obCKm+XewGAWjP?Hm)9OXe5g&u zn#0Y6OLpIw6S}XD>gbqa=Z7d~gMfk0FN!@Hwn8gFvGvitP@~psDYLV)q|Je?P{;Kd zADc*;#Z$R(hGgOj$Bi)9**SV=o?sR_)V2Km+aw1+SFO4DeKO70xuoz{KOY~UApBau z!8av0LNRGmgrBYOVqD0`%oGZR>!{?jL0M(aNF>wW4i_3~XlO`luEFmHLK;~kkAU-6$ za~55saVz;U7F!+-9J;uU9~HH)mc*_ z)ZF#`#_M6lhU}W1CkJ<88H?mke4@r{hpApIFnmA z$bvBwKprc4sX^nXXc-?xT@s}WMqtA&8yglMuDPvvrcHskHEYEkJah=?O!cN{{ak86 zUf%K3r_l^QH2P=NiuCjgZ~~DSWn3n4uw2De(Es*efSrd00JuEaW`sS+0{4)1>U0etTv!hoJTlx}7i;at`1)EsBE-49SWd0l` z$?I_=>1akKu~S^Cuvg)C+g{$Ok!JFm#WNxTFkU2h=+)N8T zH$a}9ReKLpoxcKvl-Ebs2wNTA*dRbpB_n`x1DzQkACHU+;96vi8@`8_1-_ywBv0Fx^z<#K} zA(vyfM&Y-)bMH`nZ^ze`HEQg~*%d)ouU_4=XV1mVh1vIWd!Zx}$-$uq)bb=1f5OP9 zhj5HwXJ>co)-BLzku>~7vR4Ut!V*-%=*Y-trJ3B^TsQ2nG<0EcF@{W5^UJ9SnvA*R z=jV6*dSclh)z!pr6K%RRtKk0`Wq)L6Hz%MzM2F(>t+hv#;?p)7Y(DZV9xOzHmYLnV z+KzI~F;e^V35h@u*7@%wB_%Bb}x!Nw-8x?1>D%~<}CM^8qfQ>o9UNC;#c z^whe#x`KiNkT1Zax$2d{Z|$(!JFSTVf#A^PL?D5xXZ+oRIciX-_kCaf6z>NpN_XxQ z_N;r=u)O-dJ)j^+>>B(^w@Z9{yt=x&y}doK0|Y}(PR@&U8O%@_p=?Wt=)W zM%i0u?Ze~UK|w*Do}NS^5wPy;L%rAZnrasG~V*O-E5sV)h5Y!!jN2D zPex=#L_|1qI0PG5c*n=1YtD^F*Pul)VN!V+8j877mW+S>1cn3tHcEft?CpEpES}Uy x4jcOYe^USNJZ6X|b-F+v0%6pj`CB-bU}H+c;)q7|K=8x_v9dtI3(Vak{t2jhgW>=H diff --git a/README_files/figure-gfm/unnamed-chunk-3-16.png b/README_files/figure-gfm/unnamed-chunk-3-16.png deleted file mode 100644 index 15e79ed5b99f9c5c9674c762e1541daaf0cf9894..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3930 zcmeHK_g7QfwoXJ2N{i8h9J&YfU;{)Dq@xguNGQicHGp&l5^5-+2^J90hfb^qbb(M*AVBD$B?JhB5(0N~f4O(u@$O&n-W+4^wdY=Y?77CA-}>ga;>_R%0=%NU zAP`8v$WYG$1UmK+cz%E47;uloOHqK~q>rJEKL{lF_2>e3pgy~RKoEW-z1#PLGwBnU z`ze9Mj&+8?8NB>`Gd2`%^D{YxT%%+{ zGNXR!6EQJ^`n9aTxnK{E8nS++`su;bIl1;WK40xfjVfpFk*MfZI%#{Q#9f<&I{d&u z$y#GMnBuzjc6~4i^th}74GbTd&@~X~Qfw3tNar>pBf`g8%C$(%3rl)?`=?wpT6T&4 zkbc^0m`}19aP^B~8(ogv(V~k-vj|lQ_anD#|3{vy+rR#ETmuB+m7W5F%uazJps45* z!64ADdQDuQkLQj_fI8t0E=6aN40f@MxdyxNfAOC;NoSBuUFbE_Y>^k~sLSf7n zr8tvh;H<6b6SNFoRqdGqkK+Q=vMP;1Uc!pOpem2H4BR0zMH^pJKqN*`OLQx4$nCSA z#s$@0nUcKI#8nEL$jYo!SFNmBB1s|px@)d?qB#V5)Sdb;gJYkj^u z9y$bX?#}l^OJp&%pG(d3ehJyzR1Ce)&hRGhJa(PWt7K>@y6yK9iCp8M5c-PP>C@$p zhVs(Wu^-6F5&OY1GWi492GunL8qG`Q$nr-p+{d6%UgL|HyXPL5n6Bzjsc1=Lkj!b^SFh)H7j1R+Q`DK<8Cw&OKcEpU0f)<1>^qC7VHK@+3bIy$PV zq_k;?`?0b`zJo-r0<#qr6`0LMa|9ym?OWyno8j)_(%Ra3FH7yFs_LkR($C@Hw6wHH z)~LG-JacCmSE8Y*X~J=Fbv1c+{da9`2R(5K2@H!Cvb!-)<$6@tF*7s6&386aEwH<- z4OTLomXea2cVv$n6_J7Gih{#;-xL-WmcA$L@+8n&k>IWCF+A4_aX7pE{r$qiD-cuC zjxKv}(DZQfeI!kL{aLez^+rp)t(f|R>7m|H*-Jk*jke9tBCz|oshLR<)=0i5oK3HW z&CPYaT^TMJPB;0WF*-VGqgRERq=e<$Hkqa?b#=9Xmn{S6p-dUJv3!G)V^b7!f#gsZ zQ1JP)M|*;Zba~|AL1$+tjYiAK$pKa}I5@bt=#d4tvb3xUT=|*D(SyO}7ZwOLHLV>T zY01eh?(S)+smfA@Lz;4SRbT4r)Kpb#KYzX?FE4-bV%zYrmEO-UHh&@z;W)0cIVKnT zm4wla-x9vrhcr~|9lsB2;yNp#8gOgd=~Zlf#Y1nMsove0soxCy0~Cd6v6 zX%*GxrArsjaC393qiJg_)>){#`$D3a%3~vOF)>0on`NG@A7_{*hj8mn&&|4QXk?@i zXkl+30YCt1Qy;uu<2#Gj+6oP4K2e&Ot)7g?c=v9n^ZaWMsTTrbRetk#p+L&|^}qXW z1qOOrHC&cv9yk{?JJOQ1z|Wv-QLv8J;zCeoh;!#ietPlt@&snD;-OojfWC9+L%8kU zk}4CcGWM&u_%-R;+Su`z`kWEp1_K?P2SzBx-DItf;8y5Vqc?%;R)gQj&tRD#`PdjM#bTeOvwe zq%USR2+`B+!ablQSkC!wMI>VbL|fB=6WC4oOrhHW}_qgXbdrH-oGjw1nfD_KMCn!2Mwb*Ymd{JJ$WVgs;dV2b* zRq>bNVoC#M8=wc+1vxpm-mzoHB*WI41ucfkWBxVVTG zoP(?T(&EWvQFV2K`Rl+%vhEbIg#by>%)4+EVOj`hI;FR77%Wa(}M| zpxmmFNDq(C10G&pUiS#^U-M2}L1C%(f>k3S>}wGpe21c)d+*ZPQ1q@nSPW zgM)s4ehK=sPfwm%9q}L=WBB2Iej9)5zQErcE^%;Zj0j)hs`VEY6}=&!6K{A3CI)%u zM;$v6+$1e*HJsvUwGvSGg-_)7^D)sJt{4ti$1C3AA{@qZLbRgY|7`tQ)EE~)W)+bV zk~FDXT8nW}2Qh~`RCSzXQMz^{5&eUMe>4;w9nH(jdvB8W#ECT~b0{_6B*QHfPY{xQ zP}ASrTLgfyJNdHibN-Y3{G03RAplJ5fE@d8J!#(ccuHP{tJyV ze}_9RE;-GPJ5wB_UE5NMRwJBg#JI)oy0m8U^zhyN>^8xqFawoP!Q?cx2y8< zQh@V>i-#=UDdAUCZedrt$+8B?4!-|zd!WC6%@z4P5Lf0JD$L9eZO%z+Xs9%<86$q{ z5@11oO+rMnm98&N+CExBPPRMr8AyfWgV&t^c%q2Ad5XsP5bpV#-YRttf2I7iAsiq3 zD=53?NX|_^;kuXBaU+I@Y-Vn6|EISkY=JaUkEak!v9AIs{r#mOOgHFzMR&Nt9vGwu zu;ak|%$ug$U!QMdd={!qdz9%E$@9|MD`Oo55=pH*9@q>$J@>K)ZUOE7)g~9n?WnQ< zsd0D&PbJ-q4E8*9I8({A87@KCZTF??vRUz+%>vI9ReBidnZ5HobP~chm{UFHyyv)7&671b? zsymiGKpYcNGxM|U$D1GQ?c)p}C=O#WhYP#l=CDuPe3^kE{eAE?|HUD7$^8zBA#fFq zMhgiERaRDNX=zos_1e}2Jc@5T{qp5YfN;r^^trC8jM!?m)b++tYM&6-xXioeYGK74 z%S#$Dj2h*VPmL&Fq42A~%V?3Xt2HkH8Qu239zgm{tGfWHqM5SxM98?zSIhL5qxx0m zRKKV+E=9=y77Zx>vR)fYgys}U+&kIH&AfA*hlY9krn^WP=<|DS{Yr?{+afP51K gih{TQXPyorf7qpd$*^aTfWtD#2nN?HzT+7E4^;_C8UO$Q diff --git a/README_files/figure-gfm/unnamed-chunk-3-2.png b/README_files/figure-gfm/unnamed-chunk-3-2.png deleted file mode 100644 index 35fcca7b0b9a66c6b184990f8933ae03db6233af..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4204 zcmd^?`8S)}`oM#pqot*(qNwPN8d_5wQ_WR#V?HfnJUvPTF{Q*zsZur6P-6`(HMW9? zp~e-{{nvM@f!CCmi? z0M4137}x*+>?N%GywmKgb9AHFBI|O--vo*T0C;+S9c=x6l@9=b^B_|Ly}KbVHx@$e z?-6JFx5LHj@;HBEGqpOkVy3jBm8WlE{O&UDmD0^DQJISJO#Q+J7egFw$KK1bal%9#64UuV3Qrd@HgCVfA4llj6v?{HANm_S`Y_hF_TMj{ucvB#}bQTww`aJV~c z0DxEhSQ~3TRwt)J0Dy}I-5h|DE0ne9OJ{%YSR0*wR@%NRuP3&&BtmhH)rl>4ooqW5 zd8z*enH32~jyg~;>;gml%N8Y8-R_e3J0PRRCLd#~5w+jg09NPOcmXl7|7Tcs5CHHS za0>vCPK@CM+|oOx1psh?|L0y6x-KI#}irzY|X+|oy*u$&U!Qdm5T zW)H5zhQ)T9QiI}Wp27yj>y1+<{qE<@w33vl2T>=~n_AxuGD^c0jOi|l3DK7KtKd*l z4~p9Hw5j*x??v^^&rb=8f`D`XT0$tr88G_ofbbo&UpQ@WwVTS*;mzRNrqdW9Lp9(F zqZv(ry_gtICc5?g%`_oJ6Y6#5Lnr6LPda9fF=0J&VgIf(tme=00NPID?%+#S%cJEq zcG30Hnj#$^ivHn&o3G3j$AaA5-KC{v9U9kr zd=6Un3^bh3eNBfM=cILbaKO8E(%ndu>8!KAKH44d3{+W|GK6)Nz8OSXUqYT_7Uj7$ zV(T#&{E*Vd*|b^FQ2)M+P(EYc>C5-5t<{&)$;PRL4}$}hg%RdCJEcoMSWT%RusBcS zdp4KJ9Sb2~u5kVm!>rVC0^&~O=qb|L88?N& zj7tmO4P-@2OERs@B8-fNl`I!354u0nJn{QKukeFEY%*Op+q+M>(7yH0_S-v*&A$|~acnSp?DV?X!H+`6J2+A{yx z!3ugLnyjb0;dSiourO#SV`-$*!ODJ_vheUktr$dT-ut{bib+7775j>sYL`$M`8gI# zbd8Un6GG@Z)n8fqxLC}a;PEC(>=0UKH!j(qTFg9}h*ulWhK|VX?eBjT>r~ZL0dLH2 zRwkx#II5s4D|6MQZpuLBvQMB55<0LW?qw2B~AIGdd*P`~;@2z&u~@YT@|-S(mW7Kd>+2Uh7)EuswOkxe}e6)+%YO zJ&??m+ApQi+k1{4;8~ zvj_YKg?uKC)7dZfi^u+;sXk~`99+=6*;2Nxu2pbXj2w!Rq8SCJ;EzT8kwL>6z`PLux#WQ~FPF7BnlI3_^SP}`13keL z7!Vv7QQ}Hn3wMA*j}h}GL*H3h$RMtV4uv!ii>ip%%3F}mjT2>>mC-3!Y+6o2W@((q{J;kn zgQOZcMa`hYmx+z%yx^U=wYAf7^FK!_%nRSI+7E!_ua&U+s@V!f&d>3%;!`Ujg^^y~S{>^@26K*m$hHN#_m(l8t{KYKXa_O_v6$F_neEoq?+J~wjaDO6pMW|l+I&=2-4N>twS zbfUeeW=O}n)4F-#yOm=Fukp}bZ2ZKOC@-I-xaZ-RePbwDMH|4N~ zmBSRDQ$%07!5ZgL)W%#>BStOBGx~x&$C|%!AVQkz+|#|blu0nS%H4{mF1_2cH@U| z{3iuel8IFbAv&k43~@Wfk`3Tl_nD{e%BJV-p$|(H7SBv5w#;VuSXQGMkUU#eDEZak z0W2iTqb#UK0366-NF?&-=e&+io=%=eqQZfu8U=sF#j4<;!+N{Xw=Oi@c7Bbb!q9hIvLMHNC#C);K1nO&1Sfbred|Zh z0?67OlDi_xd)=>!QC2=(*_JO@WdL70$(p&MxR8w6R##)KwspOYUuH~EnU zYbX7tIyIH1y=UVQT+0|)=7#_2(IE?#AGY8Ffx-$THzu)}i3XPw7x)84wQQ`cT6~D_ zg%o7-)x7gVuO9Z7l2ZP0Ox@ewIiEhm9mm`25-uEJ6NoEK(}lq%T@3nhBUu~V z-PM|SRl-$T0bS=i;px5=AqcCOQzj=5EUEc0RnLegG~pnv1meEi)gEH z`q_~!oh2py>l3Z4?eeN-(TB9bVE$k%l@FVb3<~}H{17H(>`gHWEyuIq+@~yV(7!zZ zRxybUeSU*xkP&8ZKa+uOKRNs{+1Y7MGh?*2N&*7{0}s|S)qLx^J8=}WjtV_qEp9gL z?CBPLgNzIt9A4(_JCVpOW`tl4t4798!XEal5J;qakg#TjJGUz*XIoiW*6SY`&n1wb z(nK283-?$AjCFT>tez9f6>blDa|7;v=K|H07}7kf=cdd-Csw9#G9yb_O)!VGEDNmx z#KaHBzJ#)&cI}?#S|QCJY$KAJRq(uW2;=x@|6r5GZ}}7Pw&ocP_l?0EDtPhYMNU>$ zUi7j1Xe6sclyacIZrUf`zCH<_;9yog2rwp%oi(v2|2o0+*FSz#XU@$D>FaX4oNQC{ zIq3nx0cJYIE_dzc>-E2_=VeAEE!-@LPAjOYi;u>{9qAPAq$S*e;D(DWQAnhaM$1U8 zpIz!tO61l2 z{{LUIIyreKY9lGO4AX?&+8>q`k!>+Gp`3fQ>@n_6AAXtOe=1v-PPMJU+27+*->k0o zS-Y@=C2e~^{HOR@KzadJHf%v@oc>{a5Ti0b3HtbN~PV diff --git a/README_files/figure-gfm/unnamed-chunk-3-3.png b/README_files/figure-gfm/unnamed-chunk-3-3.png deleted file mode 100644 index 9e8e7c5be663d4e3d139be457e49bc556ace6713..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4104 zcmd^Cc{r49`<_y%q-iRY2^p{6UzS9c24gDYlZ4(ZBg-g+EJFr^X;6yEG$cvhu@#~) zvW{KFkSt}%WSg;M8O&hp+syZP|M~v>egA*=aXioc9LIAV&v8BHbzj$co=8;c*5 zJ_rJV#7(ZEZh}C&Gl1vh{kwsCc&Qu<*bewzy@dmT4ma#vyPAD-T|ppll?m#yRd5P- zD8#`!P|&>aeeZ9~Er%EF#D>Qx+(|8Fy4|aT?<;TgX-x22oh&K0v?-N>cbaDI--=D5 zZ{jji+E6$K%BoTEl+kgcBS$pnADxaWc6^OItPy63G< zeXjauB6xb}3MIst(o_AU|3u;fnWftEtE(HggneV9Ez?^aDNW_zgv6sVtc9OI#M)_1 z!#PRM{LvcSmH&Kxe=rDi9Q8>AlyQ2uEC{q0G7kd%A1Oi% zGWNA=*NVeqdg)ZV^HoVxLsxu$X`KU5lqPFa0eqXDg@`X>-)Kuq4227Ss_JS1uk2b{ zx&h2hFARmJqZ$~NJEh{ljeyN%dttOF19=+8`uS(Q#bhd8D=Z5?gc@0b^N4dTq;Qt zBITZ>tvc}gHwFPAjG|_r`qqi9^SjGfKDDiMg8s@{BN|f?A8v@!A4H)3a5bFgkv^&= z6}G5-m4YM`&F(wfM1`7}o29Kx2q#!oop0a1)tRg*!hJvN6F*^Q@1X5|N)JMuMJ+}B z@MVUT)9z%;;F6WbaLEg5u zzhsnm{W=&uwF`>-sJ6-48hKlZ#qzuiwT)4!{k3yzXnCrAxu@mLo5gF}aCEUoYmCgd z7-n?7mb97g_l?#+(+jERd2k=Ul`prN%~4Ppis^(Jg731_yQ~MJ8y5)uBa@=hQSh;4 ziSVOGO)<*@;nr@FONdAukZEH zY!`Mv`k78sWlxR9NpS~D8m2t9ZnIvv5G-alu&eb7&VsstZ2M!YB?sKy+R`wBBy3+% zNO+F{fv{M# zpG1gyx8Hb`>4s}69=~i*7Zwz>0_*Bz&TWHVk*{99EC5q=JhWDH>cvsAze+~sKD#s{ znR)nnbAzy*vl%oQr-%AofOe0SR_|wZVDe_CnSm{jvSBY?r{r?o$zNF_BT`-GNM9e} zSu?$rRPCwm&pICK)4zLM^Y*psRIOfGL#G!If@X0Gb@1(@2<;ZG0a3^t~+ zO_NGL6E|0$UKI+q)58Vp(>sOU1@1{~j@qcM46!=JnVMnJh@z0E0?u>m1qI^1@_XHN zqhD9#=wwo7=S8e*hV}h9**Hz#{wt`JS>a#Mr~3YvP}15Snn07rBw}PSF1wppv<3lj zUukt<=D?S7yK5@qP|XiDR^PD*z0#S}usb7qWe~23WFNdwQIS5V&vw=DVb>upUaZ*q zU1gJ;m>Af64OD*RlSp88YXd?F9EzWZ#EYFZ!K)Yqp0PpI420;x;ntYA^ulyfBcu7A zTEfj2sK(XHZ2si+m(U;X!(822R$pjlvx`s_CZiY7vocf=5SB|Or5F(G2z_+469kSs z$IC{C%gM@Oi)^v6k$BGd^8N^V_#P77>zX>%>P$0%{At0{8WPs zAp~9am~=G??zpKq{4_o~6C4iRC^SSG?cKAdqN?ifiSxq?&2n;Do-d=DRin@C77{%)@);%H^%p~V~ZB(@JwwjMz42WZ+<`e$bTh2o20 zJ=DYwilG`iJB$3Yan_qaPEybZe%n>zBo!0T{-wHyCJG9Dv@j8EkMZk|Rg|@=R z=XW|fI+!%afpVXLB~Ev3ZEcQu>ffo`Y&G?Lk#`s|64m%QSwv{SKMjEh&Y&HakhD^_ zwfe)FQ9d%!Q{!*GJhRgb63P$=_nS@*l`a3RPUkp!Va=0EzLNOiS8hTADS$iZ(;icZ zrN2z%fmf#le&D#nW-tW>Jh#8>{#a9KY3cLl&s~~hW%PqTZoSZlaJq9W(hZ0Q#l+@p z4-7M1z_Pi@Xqu~yY+Fmm(RfiM8E9c!L%XHYDKOo?@4+q9ps)F;*Hr%v6wTG?y+iU# ze*socav@;#XngC$vuY>Q*woa;;Q3)AvScb8=hjzzcVFa4Tk-{9z}LS!`l;|TaM;F| z-oO49dEkJ%QPy$+j+vKbmT7wR+M42=R305*UyHO@2m~pI^vMcr?S=WDQ?KKPuE_O= zuOjfA9wXGvuABaajs;uT@s|606Ju|lI23iS``t2c$R6eF;?ml@s4R1}!ch@KJw5!e zsu(vg0o9?QPnldNS?J?!P@#yfxmdCnJyBIfWlMX>$;OvUIb>0vg25=j>SuZ_Q5tP0 z`+erV-Fln_-+Af|wosr{G74CQMwx=QV&YWqweg2s&!VXnaQ1xm-y zv39!RNWyGH6~BK8sb;T_9A2nXwJ(#5?-4tzs3-|cdbrrD3ae1_>xmP!wWkpZ+kQ)L zI3*b0!Q3K%8BCE*ZPjUi!VF{{Ann%fuUpRnx&!ClL50s106N0r8MOcHEis5m?dyJ; z*=C5Z+Wz36#v%H42ed?^jYC+OTc1x*OwYIDaYhmeT+bl$a?(XTxSCVV=))$kN1~~u z3UNW0R{uQc&Zr#bK}b|*dwaphj~}M_?prFxyQe0Ydex}Q3^fy`;&k0NN@(c3E)H?f2m7CcIdB>8G zL<4x|PevJf71JQMD2G(~G5r~9aTq#2!mIRbpH$DW`1?Y;DwY1=E4_$~c_D$bK+$RtuKkaw%*5nS93P)yq*uFy* z$`9PD*4<0`yxrZIz@%W+5-gH6jPxpLoL@y_otegwk&%XmhJYsc@E#bTQT(wmfMffR zMrfyPsB3^)C9cyq&T;G}U=oTvN=yLF-}ah0&+^q&mk;~0b_d31pxNs~HL4FNno7mv z;epePp5`=Z6`0UrJrE!cpNfeXyMPa)G=tTLDf+c~xkZ}Y+p8v;4*J=6v9kCyOGaQ$ z{e3{vDkDEO!-Fr$R5EFjl6LGXIS)LExI(wp8U;|5{O~RbSGVNNxT%4~PFbjSxYu$o z-d>w@b@83*-&#I2V=vGWFbS0Wyhd5&f%cH~`EG{Z>g*5m+HuG4n`?{p+}Qoc;*-*- zSvWF?r+TJuSB&k3Fq|0lts6j(u$_vYp-xvqP%QHYh`g5mke!bLF~<68kylxq|9v)~II>89S1HMOhB8 zWzvhW((eJ()Ro4hcFK{RGYNQ!0&m@Xyr`CT_oQI+58axvJRoA>vPTr)-)tGz|2vcL wKWf>YzbP%Xngd)^1f@uH#~%O3zh($Qhqlfc46^Sy0u~x%Vq}h@UAg_}-~I=G&Hw-a diff --git a/README_files/figure-gfm/unnamed-chunk-3-4.png b/README_files/figure-gfm/unnamed-chunk-3-4.png deleted file mode 100644 index 237fe72e93e94f0776d1478cbbb6ebed6f807634..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3151 zcmeHJX*Ap077tO>5S>h=rdG8m*Q}*P4W-7mR8_Ltt2Na##PCcpq&lSfNC&PtqLi|_ zV(djov_$eyW7HH$uOam}i^MC@$cwJ~;eEVs-LL(y&pKzHeb)J%z4zI_{nX3jvaHl` zDG&%G>*DNi4FnR!3FifpVBtuWOlT7-pk8j?j>4sgh={1DC>RVD6B9dd;DETexP*j+ zq@?7*g9oLgq@<;#Wn^SzWo01{h@70@~E32re zsH&=}si|pbXlQC`YH4YmJbCiesZ-k8+NV#S*3r>9bLPz1vuAa6b@lZ0^!4@6ojYe> zU|?uyXk=t$Y;0_5YHDU?W^Qh7VPRouX?gzqc`GX`YisL^7cbh_*x1_ILZMJQJ3D)O zdj|&xM@L5|CnslTXBQWjD_5?#y1Kf#xw*T$dw6(wdU|?!d3k$#`}p|WxN*bR*Z0<~ zTQC?54u{{lb0;7m;NHD^K|w(wAt9lmq4)3KkBEqfii$!Y5Yf@madB~piHS%gG9@J? zH8nLYEe(Z2Wn^SLeE9J3l%D=RNAuc)Ya0}80DtgNc4s;;iCsj0!^@wK(Jb#-+O4GoQr zjZIBW@87>~ZfCc{ukX{RPyPM<0|NsiBO^2#ZS>d5(b3Vdv!JoDvGMWoiHV8H$;qjyDLS1#Jw44} zFqll{moHytW@ct*XXiS{=I7^GEY{brUl$e@003BATwGdOT3%jW`8>C>va;ISxw^W# zwzjsuzP_=s!Dh2JH#a#P4wuW_nxSoNZSnbhL6MI@Ah`amzebot2cw+*Vn85B*S?5Q zBj4T=>fXCJ*m)-uuQC>2O$W+9o-uK|q#^xKTS-Lwxg=WB$-&Po;;P>?=;~Fms~-;J zwv^#CWJ94ieC9e_hlW~Nno~X9emt+r>6;=6Q7o_CfC!>SoeN|ZLKjearsQ{ zC@z|Lum`qmzA3&GbO9V^Qj)$Gq`+IycSy5rxIK93cG06~S#Ws0soqrO>+l*_7t~+B zKlAtMkRsjjUxpN18()X(PF41r$uxD3ybCE3?))_W>6yQk1Se58oNs=BdgD-tIFGK+ zrTPKNV1~u8A`?60D#3kp`On*BVl}5K zjfd=L+*RVQeFWAM;vOxT3tTU?zmzVO|Z|sq?qP;K^o-=Xks63w;n z$q>MB9P?!k&DZkaFK@?2lHoekLVHR)-gu~58Ni)|8fJn?8}lLS78tY%waSpvu#8p8 zO8u67lk*m@8Z$dFU!oH5IXf7Il@E(RCN=H$qA}T?9T>~iZ7Ygr1Ue&L1!xjJau&K? zf*D*&@F&M#E|;E@DN#$C8*7UT+yW=IUpK@Y;JyfC8!-}NRIT>nlF1*fHWTd07@62x z;uk^?xKgw|_8q6PCBc-S;ejN;TkDupN((l-Qam!hjXR-p*HMJ%Ol7++j?4aeA~K7n zIG{)lEg#-G97$kR3tBc?la}EK?jI^!<4(thcuTn&aBXD(<0r&(S)&i24)=7!xVE1k=wiezFDmPQb84A zGlTHG?E5lO1d!1Bnw`=$85~&*;{S%)8x(pmv=$e`sWz7GJNueT)UOITYAJ(*{!%ymN{Eqnp!qS?Sm7F+RqJsp~tkAmD%1pvNLJnQZpZLywLHVn)sbjMTDP`1d>Py7T^ zo*$VPqo$g*7j;dwAx4z@GQT6#l-DP(XFv;nD^92o0y~Dog!iO9v(*pSYNl2tXQOY{ z?``n44Ae_gk0a&?JF?V%Dl%1$l+LsuC3D#l18`!D&pYcy8!-HuFvLKma<*bZ%7xU`(g!M*3)YBDZ9JbFa)5$fNh)8YMC+Hn_H1>;ikOatGkg&|Ayw} zpdd*$rh>sA6d@CPD9faLpE!iEG9CEWKAi~v+_0s|KFR2UPdLnd`U{3N2fYM2nBZhh z+uXS~*?S`DnL_zleE(MQ{mJkDZ!7a)FY14~ClsMz?Tc>s=okyk@e_7+AQwju2mGZw G5B>|XA~FpC diff --git a/README_files/figure-gfm/unnamed-chunk-3-5.png b/README_files/figure-gfm/unnamed-chunk-3-5.png deleted file mode 100644 index 4f0bc4ef43a621664e59eef5f8c6d0452751a6c5..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3274 zcmeHJX;2dC8WxFE+$uwjR4TVp$xOv91ar@=n-!(0XIhj@Q4@DTPPVv&=y=PN%q{h} zTUeBcrrmp}1VOEfifC2}qPZ`X+ePQxGxx`xJNMuH(>wEh^L^hu-!tz#^UV9c=_kEi zmBCQ3jEs!3yPMM~85!AP={a8>DBW4|@eJvM=Sk1g&eAIY0FafH1pgwtm8XB6K zntS%_fkL5s_wLow($dkhBhv9Ymn zadGkS@d*hDiHV6xb)S-xlL-U@kw{EQNgR>^70;t+w=4D3knJf3kx4TdQ?(UQdU;>`0?ZN^74v` zipt8$s;a8$>gt-Bn%dghy1Kgh`uc{3hQ`K58jaS})b#AxGdi9A^5shggVEB`!elaA zTU*=O+FreS)!yFT(b4f*8bf_77VFKMH=UiGY&M(2;dHSEy1Ke}JYIKqcTZ1GZ*TAW z_wV_9eqUc-e}DhLz<@v+qtkNjXlQ77c=+SY_{hk}r%#{0eEBjuIyyEsCK8Fn zV)6L+xI`kEn3$NHoSd4Pnx3AXnVFfLot>MTo1dRwSXfwGTwGgQ+t}Ff`Sm10>L-Or zxAW05GAge(7l0M<+hrLUu%5eV`^!umjvSbMl2S`UCH+!JXmxb~{$pjeaTvu; zcx0~1y+{~)7Hn-^Yq>OB4IR0=u6X*xTchF+ZWwe;jyF2!D41|*cPUD1sM4jxihR7) z1>p6>LU*8|G~6htj8t*1U}v~*H{xEyU(miLoV4dvSn50e!Qw;rgPjDYo4iJ^?dI+F zFqeV{D&{P~*o^W$-3Umy?{_H3;_p3ovDA#`Rmo)8f{RyOn!KC^r+?D_6z4xVM@t;t zw&&KmJvc^}7vxehOg_$q@Y=BtbvDg+1`u8vmAK^}P*eKv<691c@C=}puA3e_gQos> zV1?clZj6W<_%tEN3TL;r@Ubq!dbu{*RJb%fGz*EHeeX=kCnRO}=?1SX4>x`(@5CJ& z)c($v%%<1C(&H9}k7Kk4nnSw=7wy1e9vJJ3`m3Di0o?CmW-L|s!H$4`(*Mmkzp#@`&KTj-Ap_Ah<&OKVKv(u z6+ugiNC}Ol6bVB!DaydaT$RI({PCzvX2msJH$&pcLX8mVB$X->V$mj{hN-VY)I?M0 zLN@Gh)AG01&=u_G-f@Df+{7d^v8Dh1QX5M8%P3GA8M9hU8j}iIl*=Eeu#U%r#Y}$f z93QEUj-d6+HBYGqx52;*EZcY{;T)x?Nk1Su^KF$+hp=RoEVEgms$~b>i!R>^fXS@@ z#lf^E_wphJUl@_RyBfa+&=>zkr*0<=*@5sLC|+{r&>56bv0=?-iZ9>PlT(?p&ApR^ zT%zrweyadG!N5HujNbxkzi-$nYSXah#&KHIE7pGPhqE1&aC}#;mN~$YkR*$L7D2R0c~)-WWjmiLNQZ z5wq4GV?dt=LZMw!SZ@MNJt!uH|J5&cNn*IVMyDcYF8&FJ{vO`Yzvie-Wvn`{FA!am=*$`1}|OvY<_>}I$m;_G3q_5X8cD@u(kB7H2lK`PM;UHdJPz>M(+Jr z!WQ0?&3;u)LUdar{|BJNn)d?^GyIW4G-i!wt%G10()F|3{Tv1U4};9@Zdg{e?RiiW kbR3Me?1At?AFsfK;J6+0CiGG15GmvC?Cn&4{FfX51Q)?LVgLXD diff --git a/README_files/figure-gfm/unnamed-chunk-3-6.png b/README_files/figure-gfm/unnamed-chunk-3-6.png deleted file mode 100644 index c9766b073663bd8d98455fb0042c776b355ed6a2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2630 zcmeHJc{CL48lNSZnJi<8v5YKXY*Y3S#@3KsB-zH7BFQ=-WbI3ts4U6Y2Fa2&`w-I< zW7LcxWNC2IElO@egAA9>y?@=mzH|Tmo^yWhd7t;Z&wHNp`#tA*pF2(tSbmr!3;+P| z+gMw=001D;-aa1!-dkyqn6ABpL?=5}t34N>MFIkWAP@))0)xQ^_Kb&z=itGEyu7>+ zUI-Kdg+XC3*r7e+JH*G&$1lJyASfUR7laE53JJl5MTA8}MMMva9u^Z76F)4D5JMou zB_t4%k_bsD2`OnwX`~cVMp{M&dE^LER#rw%?ufj+th|Dp!cn=Sit>tz3Q9^xm6a7y zC?ypYB^6a=RW+2Fx~hhTDjKbJ?3nuT;~JWpXiY7&mew(C?c+MST6%ig`uf@@PUxI4 z&^0j7Gc?pUGSWYJ@`SOmfr*Kssi_eLa}r}_Y;JC1VPR@%iLtW6oH}KO#hPQW7S`65 zHnyki?6CIs)(-YIj*h3DoNS$)?Oa^!&$v3cxjLS8cRA;A=Deqym)BVzpL4#x9yr{2 zzdyYEFL+<{_qlkYD#LKlIm(p>ubvz>dG4H%NrXjo;5vbe)gp0S!HW;Ra;AS zds|IM`_s;jT5@MyS7&`Ux#4+tWAF2(-kxWa-sTsSW-6uSCAF=O`sTyS_Wr&OT7Tz2 zKbcPJ8XV|;P49j)_?+>km&u?EF<%T1QAb#SFxJbr!>>k1`o`Y&jgR(^kJ8?a4NQ#F zC*RShCI+V`U%#Jv!=7faraf5CENTVc}H&=g!3xL(pK7XWc|dYkxn!2htM24b&Ad!kzwd#=3xChWxdi~L@2 zmxgnPm9?IIPwnfq;c0rycNzTW?p3wZaeUQW`QECPKH}g{Y@ueHr*xuQ=H*4^7R*b6 z`iqi|Ckw|YPlk{=qamFkm8LCqVb_4%-2*yZ)(aJ?_(dQt0R>`TmvfqF7e>|Djt3V2 z@Jq8$1X+%GsVv^@8Ar@DI8Xq8(ameR3wiuYgDgn`8W{D!Y1eP~nX>t)EVRAA|PoyZPP&>SS~v#4`X8%?o5$W10y!1$^`P z9)g?GF`<;}i!U@j+uhdR95Xoi&|wxllTpxM^kI?}2CKLEsS6}GiE+QO_Q z`BK_y`BPQ{WbN|Y`#+5cw&)j+sDZ*vJG~Vp(a zEmCNDzfQjz4>4TV(9`OT()k{rFeE5fy_-@FCI#S&xc^rq?SqUO1T~gkUIP;@iBz!W2S^xTD=s)^a%2{5a0s&%gC`+Y}z~%-lOrtdolQH z(%Tt9I&A~#o)#vxHAK=&WHl^4a1&Pw(9TVC;_>N?}$>HF7|4*6UMp!lV@HX-y!no#S|Ly-g3n6twUo*4ji2Sv>Q_ z7wD5&5O6wa`FYq~Fk|9ebPw`#U}J!;v?VDjqQ!WpG9d7-cnfw(e>XEy1?hzj-@`vT~|DMr%KEv#9mF-Tv45J z_ule>3?bk74Ge*%{`kuc)rz#0E7;(--4RC@CqaD5JAa-J4Cd$K6X4?)FFEm8<-jznHd?I^&Ql-^8aa~RLZd`K@uB8|Mv9Gyx;A7ihYunJL_Rnn{ z!|k2Jq}|bu?$OSkv98{Up8m<+fvLWM>Ha~&z|hRV=eePg`Ol-ok@3aRiKVg0DhI{9BF2rL?Ug>E^KUUe4Qh1&J(xh7q=Idc8JU07FWJ6t?upZ z?HARaoSY1a_M%VUC7q{^r4InW)cSh>J3NY<003HET}?I9z^tz`$H>up;EtVr2by*{ zuDI^L^8#PS#$Z)3Q7>41V^h=9sguz}gMA+16lXLV4!TyMdSJLH_usDniJP8r}H|Mc_w6zfo|;4tL~@}WinUD3%zj6R#u zNd;qu2!`y)D`oI+!+%j)j==4W57}^y9=plxr=sfrnWc9~1kK#4N%?Q0OO(~#6jp|^U)ZDyQe74%u{l?_o;+n~?jNg2$mIPo^C5Iskq+38ZZ3QbuaY7T@ zBL#Q+wM@)uk*-i_bOX;Ka*X#t&Y}Fe^fxbuN8KF^mx2Ugu>jj@QPrOvRFKmgX{`F|HPr0{^PuNaG$x>s>UQQ|jSzlW5Ri9e zIoREgDLFnR+1}$|uEU`!88d$Hp~#I$XHvd9#QAgPp#okwTZNL4LnJ*6Wy5NfnZwV$d)Tzo*9WfmTXqIcEB7@O3xc2?(9J+!pu`_dYj9KHSXNlcV! zU$J@8BFFp3Aw*=tlrdCnF7^o)JI~j6ANZ&KaHCo9!9$qce2Ae!Xr z&U)w}dZBSWL{qZXPGie}vXh%Oncdf=t?l#z*&`&h^%{39&6!-`b0yqIGErI<939qh zA5J1jxUa1w{(G((|J&N1wr#&HghS@smrxrXLveAsU7gO{CeeMvLKET_^a#O#D?}h6 zL=Vs;gycjz{*k82e!6uIV2R3KbM(e1bH7KG|3h{}S+pnTb|7MKCLKMU)G|Jt zq;e%YksUZgOUUH~XV`jGoFY&ID;y41w1Qxz8hxoOWG|DijLle~doB)}7rG#*V&FFjmRJ zJP99?8)Ff)DkQFQwGdR(XVL*6c_;Bob@paNj)8{=3(Iw7<4KV8pP5ESYx4`@-gCW% z!BXM*rp|v3R%R!c@4tyvgOMw}*C$pOu#l~;!UVTDdDBTUzr;fxd2+Rxt=A4VA2L#d zB-Mm9uMo<&(sHxqunx0(S7TXWt;3u-%B4Z0xf&q3R6B7Dh2qgyYHZ@t-ftTobl89y z9+cAsdPS9{xBq6&WF6u%4_Rwjl?>68NdMzIU>t|z$FhTuymOS{%2J#ge;4arKzq_s z&E1P9Av={hiEY2GF|`J&iY0v8R6rfUedp%~EyyNB;p_24&*_ diff --git a/README_files/figure-gfm/unnamed-chunk-3-8.png b/README_files/figure-gfm/unnamed-chunk-3-8.png deleted file mode 100644 index 62b0c92a153b0b59bd5844a9cb5ed32f36d94a80..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3093 zcmeHJeK-^B8mHCdJKsh_!tq^{gvQ=XQH~Mvk?)e_D-veR+AEC3Ufz(DmSl%9^|l%* z3uEsgHWl)}Stm`^|pFhs|^K@U&@4kM|ecjJKOP_x1Jl^Yiof z_YVjN2n-B7d-iNlP*8Aia7ai0FI~D6A0MBT zl$4yDoRX4~mX>z)>ecl0^o)#*%*@QJtSl4?m6MZ$Mx%3cb1@hURt77zyu7^Y*RSX2 z=NA+d6c!fZaJZtPqT=FWJRVi%PT4>Dl03is;X|?x>a3WT~kw2 zTU&eo{{6bTx(5#))YsQPeE6`Tp@BpqH8wUjH8qjRTOXzJ2@d-Mf*IkysqQJMO;1mAI2gw9s+Sb;VL?Yow~Tu6;>#F~-vnGFrh{D;8XceD*^ZX4)S>LIR#A`|0L zVLuc9FR#bqTIYANg`b_NB?(5qr~WdL_)S_X(g8vM{zoG6T!$^im(DEszn!yZ19@e- z2$~WVi!=dF*Z`7@42rNB15kb3$r$3az3(4+_p+Evwc}OXta{g%DI3Mu^*d!XnBjJ( z?df6c`c!7FtfS#dNr}U?xja$VA34@BaCD9>FRrZ<3l#?eOznLs zm@kC~J1NiC3CZ8m(Fr1}?I3Oz@?<*=)%EqhN}fE_@MY@k)Q|?q zybOB*_$Qi|Kt`q5bJuuW3kNo@;OKGh|T=>=$sHl9i zAKKUne*E#$vG-Th5q^8e*F{f^3smPWv-z#tf-f9F(UXWA2R7P)-J<3QAv~Zn(m>`T z2y4L$%ja8eP;#FmjYsxK4d3eD)+!k++SF$L-68L;8hlLEpcP9goz++qr2$XH5(9L4 z*Y3)lc7`&G{h87yDnJ+t_QE@F(QP^BT*oyC*SeN*cb^t^#1pF+C18UAr5^{g#gl~z zYhNHLIxH1hW;zFxIu)u3f699%zKZPPfp=|#=qu0=jE6Whb(gaX3#tP;Q* zLGZ8T*bEl5ar7h$;34WzKIEz;^7RYTo0ky9<@A+G1SE8ND}}mzG(gj(%0t4bLuUBo zG>X4V_*21ha*8|~LIt0r6*LNUQ-ioQEhjBc>x%pVpK7sZK2__da=NQq2IEDPtY?`#N#WQSs}SAzk=|kKX#>J13pAVN;LvF z0hRjynvkxEX*nkA^zTC@5{!_`?fNN1Kjrs7b|(d5LVx?)SYq;-xPN2ga&0r?L#TUz Rw9l83@$&G2QI1Fb`Y(^j@~;2@ diff --git a/README_files/figure-gfm/unnamed-chunk-3-9.png b/README_files/figure-gfm/unnamed-chunk-3-9.png deleted file mode 100644 index 96946f0e389d112829fe4a6a01e1ce2b3a435b30..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2711 zcmeH|c{mhY7r>l4FsW`=5NT;Z=z&d$cc!M<-F2PY>7m~$T&n3J0e z%)<@d&%?EUKQ}Kg4+O%)$G88$0bYK7h=2g(;6Xk?!2?1<{K7)~BEkZqA_v7p1;xdL zpyEPM8cPByd`Ln>@{p*Mq^Pu%*kNgLnZr<78R!vN2|3wAaz`ZP!kYZ;;T@3Pf4i0b$x#dC*x)c_2IXskjhwK({ z+no}2g%W-x@{UIg#q)0Dwb-cZ_wU|_kG=UI&imngpTv0Iqy)d@1X9XF|J1~Qv_}CM z$$^m9GCovqpL+H<;I=k|2u^>jY&?ac3cThRZmV4$n;eRt7dPw`N1 z@t=Jq!vjx8-aj23EFBvv8~?L>;={Aa;pZPmXrIO^rpGI1CSEZ9s+ygwn)_HiH&rwL zsdizy_VY~LBBOqZ(eP!qVR^1`Wxna_0)6!}eQmLMy?uOr=_QlNWI>BU4s~q$T+VmS_ zFvFP0?s3MsVA4}sx4~*l^Tb_OT_TH9bh`@t&=mo4O;H0dX-b>;gr(7Z3G%ST$bBNa zJNoL09R5OP1#c9Ny3wz5MEoDc|C^F^4C`Bi5+l`{0Gr;Cwp?|C3dCX-3$B{LK$Tf9 z4)=lwf`=opvXYr}N)n;LC;lGE0qw#dS2a?em^p(GU(M(&^n6^C zEjd2e7JtWTXZf5~{l^Cw=+ddZ`=cx#ug4L~C6nhyGmj$$2g^=eV|~$~s$5)n1eDVE zgW|#yD5ZrP@b9X6NN9cud6PMrCQ$!rUad_xi9NMSeJ^D=^0?%^t#CM9R=X+U!<1q) z*&JfcvYnq0QOF4yD@rnm_BCE0Amk8l4ciHsI7(Ko*N#51C5Q{gPtIo)Aw}-BWiPlb ztO7+s+boQm!kcCO>PT##R~L(!RKOk7fFZu6{RsCZX{*RdJ`n%>E9~h-5=`iEuhaCm z4lSMo)1V&s%QsAV%uW##(sUj%Q*?dEFU+gh)2Vghlh>(wdk`_~r#~I;wJ?%5q58Wy zh&zB_;BMoJ>VaFZ&5sVx+h(3!8l2S`=Txm5fFB#r@FPuEbYWbtu0aqo*JvECC)0zRNCLA}K;rmMlm1m3;r86L-u@bmSuylJ zRG+Bj#EL%$sjUX;<;dre+`)!&8D!=0s&{oQ(Rf~al?UB z{i8ha)-v(X?Tit-P|lZ6c7dv`wk6)=5_5BtI&}eE1f0P!AijLRJP#}ObPX+eFKq`C zr_iYJnDh`2^f4L{_st`96M_JXJo)N3Kh|%x97U+-;h;gbR3oz2)fm1NtO`fyBRq!jaYVl!r?2kUO0}yl>s2+D|;V?SIQYd)jDZHPo{h5RFKLvq?q? z^TkE&2!A2;ZmEg{sUoCD=Lwt_Rw;5Em=7tsAS8B9q93ncC)}9Fe z;>~ntTv!^;=`Q`zO|83(_wleAWe$F`^9!7tg}k$0PrERcljgV7PpT9b>aDWuq$CRa zq&@E!ax(hQiBdM+eS6f+H>Qe3Vftlz?(Q}!KM}VJ0WeIKpBTWN8vnll`Hd_koE?Pk z3%k=iS} QzdFFw$Q)aG-0}9m05zZWa{vGU diff --git a/README_files/figure-gfm/unnamed-chunk-4-1.png b/README_files/figure-gfm/unnamed-chunk-4-1.png deleted file mode 100644 index 0eb4f835d01cfefbf84b1d49ea5b26b86068b12b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5266 zcmd5=c{tSVyZ_FNA*1Y)!thGjMV6w`h_Z#jh$P;~780V2Z788ai(UAVW$a5LV@ruB zjD4r<+nBOOmh+|e_xqjqz0Nt;dw$pX?lEK>|IzT+<9&qE{(27|-l2n2$Tjt+@L($mv3Ffi=fw~vvL z5rslAF){7mzyH921I*0KEG#UntgLKoZ0zjp92^{+oSa--Tn7&xSXEWkbLY;fsi~=}tDirA{=$U|8X6j!nwnZ#TH4y$IyyQRFJ9Eu)z#C} z)7RI>;cx~928M=)Mn*<>Jl@#Y_|m0ICMG7Prlw|QW>>CUF*i5AdiAP>g@vW1)~#EvuC8uw zZtm{xw{PF}@bK{T^t^ND&fU9ry}Y~#1cJA>w~vpHudlD4pP#?KKaofb2nYxa47_*m z-u?UcgMxw{Ja`Zs92^o75*ix%@ZrNpj~+dK{5UKuEId3sA|m3+lP6D~K7ID=+4JYm zqoSgsqoZSDVq#-s@~E32xis;jGOYHHrTeOp^w`|jPly1Kd#A3oIA*EcjYG&VLiH8p+u z^y%~G&&|!vEiEmrt*sOarLC>4y}iAoqocF4v#YDCySuxmr>D2Kx390SzrTNAU|?`? zaA;^~czAeZWaP`2FJHfY9UUDV8yg!RAD@_*n4FxPnwpxPo}QVRnVp@To12@TpQlo( z3kwT08tvP+Z{NRvUtC;VT3T9OUS3&QSzTRSTU-0_|W19fj6y3);pU~(VuQydJi^lSQmVI@3K%MlGo17h_QfKTRs%w& zV&aM#I@yNrk+IyB>UjARvpxd-Ls>?dnG-d#J#nA>PxBdlhvltAEyJ37ui5-Y4>CE& zAyQiyQtfZvTxdaL8AtMdiJ1G0)#>f0BORM|AJ@N(d#L~@ketn7Z*X^$_>D95 z>lKHIy3mtNAGe--T=D@pu^u)H3@hYTUhHW&&j0_#Q)!h*h#o^ZD^Du92Q+XGcz%}W zLR0Fv-Cx0n_+ql|sZ&iB;e^AtGDc@L=pNhKVaB3~{)lH2Nc_1nl zh0WSIG?MP;pYL%^<7Mk1G<9WC__g$|xIX&Z)*~HyJPcwK6tT48R4 zQGDT56xyl)_C9#Z7U9@G&s(sl_bNHdumYL$LzT^ycbFD2L24Ceeoblps zL-)f;@3M*yOb1t)m7J32%sJdqIJev^k4^lfOd!XboeS_S#qw2n!!=k%ZugGi?YF%$tAI+D5}Y%y6oJ(`rgDGT$t!_8?^wb z83y+hoj~!>gNmh6P9*`=s*M#n0XK^S%nFJ+Ck0cHK(<@91cIDaE12r7RusGSy!93f zH_5xt&o^zbT!FHZA|0ZgAVr!qwef#s$+l6jvM~*K&{QIqq}sd{C~@jfGo(#NMx_B< zkdX}!r7Iyh_;&(CM=bSDG#ZBVscW}t4GRxM;20J3zPzm#T*&H z6g``MWO-KB%NBNRz*XBE>*x!Wy_24%aU?ykaiacGg-e+QVXYdSQZu5v;xbUA!r1GX zTcZ?^A*JZ&QSDxIxA5n&+NEgWUYhDXxSWixLN!BFmL9m^Hb(7!G+m;f$CP7RKQolI zF!T$Ua>)Ll$0Zc`tE24aO}Y!lS|1$O9hexN`&HMP0@0m_={9RP;e_wI)mS(V7-~St zQSAY-yHHhUBW`r;R`|P$y?=$NuCiEW%^g6*I8Hf7pB4+fMQ~vID9uTc>`F7VEernB`7e zNJiLe15HUu=#yL)g=$YsbfE%ij153tOh-;Xr*bpSYHQ7uTKn2b6~0w0r<#u7VMCr0 zvRt1^$2N9M5;t0S3qV3p$XZxF*zPoxdFQ;!V9%lwOJp;9B~Dx{M5bqT;fffE;l z(49IEL977+i1EBtye^1_eA5yy z#}DnHQm|1#>1(3r%gaKci~6kBC-!iO^4<^JQ7L#aX({=!3H`p*`cAX!BAlrG*yA%I zy?iLY+%rckSz;hOQNCe#r2!B-)m_Ad*WbU#Xk_wmQD*)ar)*R{5Wb?zMR9I`8_75; zGasbHJ2$k%kBtYB%lH_^Kc7@E#x^{Qo7F@z**BM3+d(SM4Gn}N+$Q^~siwb+WjHs~ z!sE%*H-zS*HTdv7RCo~7KFByJdv^0yaI?cmU!b;xdp!1D8>kdpn*m=?)N;e3FZMXl{X~QX>lXnHA!|kogi(YlTvB%Q# z%hZvs>GZoWZ=b^nhECMCTp9~fWW^*)hlu||=qu@fu7sjz>0z3^@_1iWVCk7XwC@*N z!Pu|3S>MTV-R$^z#zglI@#3w?qtre5c~#`K$`m}S z$&J03mTDujA%mp%`Tu~5FS=nNbMDqmFc-kcDcVR$zy2J*__9L+T()zT3^O7${Tjvh1eH*mSS%D$;JIhy%(NkHqRas3V8;$_0FzhjyGS7-J&Jlc!IpW3;9a}#8KtoHR>LM63V^DYu<@e2Njmhs=z z@i&7SVKY$Vo-+xDk-q(L$EGedBb9$0kX5he{Ghf4)a}Lfwh-4Bl;^$fr%)hQ+v`j8D1Dup4c}M^okEj1ch_S;LS5 zQw?lbqI_7yEO)2OuJ>!8JXBAvECi_!KZoNcfyiA&3zAc6ztOZ{BJNNjZbx^D@5A;X zC_>{HQNV^7yZ+~4^PiKc0Z1my2z79z&E@&WCJ9_cOUq$Y=~0I%f)NQ2$w7lia?)n{ z45KXTe;Qg<5#-E|%XBmSH6zfcQend~9gm1TmTi#^6rn&x3!2q3G&FmP898VJ&V-PD zlL(TXWPIH!e}-+d%4dxBTZSElpIBVtvZxH{G1*KH){Ou$fX#G8 zk)v+J7ndp9xtdcw2}$R?0m5>swPGB4%A+ZUYbDe8f~N1LV=4NDY_TEbox~!&ZdH^ZT(phfh5| zm{`=a%-P37lr5QJC`ei%&j=RF0X7bL73r6y&Z9Y_oN! zU3Y*?vx*ti&xv7`R9HQ{0~JBpKbsE diff --git a/README_files/figure-gfm/unnamed-chunk-5-1.png b/README_files/figure-gfm/unnamed-chunk-5-1.png deleted file mode 100644 index 983448e4ab18481ae771cb28dfd6c6a50d4b47ba..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5445 zcmb_g2{@E(+h)v|G4?&%ASsbuX6$1Ng{JINwAcnAh3pKKC|d2}K{Tnc4nl(xN?~M@ zDC=v@B(g>LA9|Pn|Bm%8y#y3Xf1@8?OtS(|YpMUhNQOq>?x zCdZkWAOI5+vlM~_964F1S^*BM;4E!T!N1JR%n%5Kg@pwQg~DJkR#sLx9F9OB*x1;R zNF+NuI|l~`CnqNt7Z*1-HxCaFFE1}2A0IzIzkq;%prD|TkdUyj@UC6EL_|cyz)$6t zxVX54gaitOl9ZH`l9G~^mX?u`*|TSltgP(by?giV+b1U{w}1bBd3kvS1%(3#4k#)r zDk&)`D=Vw0sHm!{s;Q}|tE+2hXdFCvP*YPAjYeZI7%eR=ZEbBG9UWa=T|GTLeSLic z0|P7;YiMX_WMpJ)Y;0m;Vrpu7=+GfEGc$8@a|;WL!-o$aIda6(($dPx%G%oc=+UD% z9PZe$W5gwv6nwqCi zpVrpa*45S3*VjLL_KZrUHZ(LeHa0djH9dd+{KbnGFJHcFX=!O~ZEb67d-dwo>({T_ z+uPr~dGq$|+m4Qo&d$!Rt}Ysl*4^Fx?%lhdo*p`#{{H>@-rn91A3pT;^?m&KvA@56 zU|`_Wr%#_he;ynh92y!L9v&VU85tcN9UB|_?YG~?$HyloCMG8*r>3T+r>AFTX1;v+ zGCMoVU@*RZ{W>={_wC!a`T6;Ug@y0mzb`H>E-fuBFE6jGtgNoC{`m1@ZEbCRef{Up zpBoz+o12?kVo6*5Oj}!9iW+taAobbKn>$@(V&ZDv{xY}uliZk?co!{93~fWQ8TUg^ z3yh1z3m@a^E~eMx$+l&V*JJDqv4*;d;t=_e7(1vF^w`WXfn!>9d8w-YL?n{XJqil} zTI zH710LbR&$3#0Et|I3X}1D=`)uhcyHY0Vx`SC2}dzZEcbILP2Sc@i9-AGQ+rUH>95< zQM@t^8vhwI=EK0NKps}@`MBTAT6noFM+Ih=XK{t@;8oJAO5+s9{4A~omLnm5Jo_hM zKBSB52`9vknYhOK&uv~EHu|~rCLgq&g;*Sejr?0X91a)+@Q6zii(|1pvDgeL+Aahg zgRq4`XT<)yeSwwCu2D~rxS~TnyUx|cWrrL7m=|p8+JdB4U*KAjf!hPI{$(oTVkgfx z*4&fy7>A=4pFgcjIC@2NFix9j9i2nUH_M1Lrqo(xX>Pa-6tVks zRdsp1OcW-hY=?yN5AHgFo__@JOx+-4e10=4_9e~M#bxj_`-*J2&z!#g6Fp(^=u`8k z9{Xq5v3-4&1NwJsv9O`#LFd;u2cygUMr{nGX*HLpe4ybpwH;W<%Hv@&Tpht5mqVyvo*tF29JD0?_^hs#yB;p=3B*-X;is29CzGEXSg2) zgdE@Qsr0NP1qu=~l6`xIoHp|u?z;LZ)dDWfy_CYCfTV#)liM@{Yn1t=>dJG zCMcFDZieEdySRv~B~RT&7Z9WP)|9(*_NtSj z7Pl;aHaT3==OW8y3USi$0XZccfp>zMa`mhh(0qVoIJHcQh`t7p%3An8s~wJy4GCV=80n~mCTtT2CvH$gE1#Tlq1o0ANy(-tKK zB^7$OCKSowl*tzk&^|7$@O~DNSH2mwAo6wBiAqRNYQYDy_AF7(#U7flyy~U|~$7H(qjU``6t-!9d$$sMA9KT?ll#@c7 zlyT3(m4khU0wp%h7v9OYK?;wVX;AZkjuD@)I_1v;J_x_Fa~_>DWQ@<%EbFe4vJ$;6 zjPVm9y9#dpZ1zr^3^5D;VxW(qz7AzKKGo`w{cz~V(tgHde1klpvU;WPj$TJySP1<U?Uba|D(RvbQ*YrM@GmS0^6#h zz0>oCO@TK9gT19oZ?pQ3K1k%944kP*(0*pAG2ZX47=LngK-T1F(6h2P-VGw4ZvAEj zD2Pqil==`{ZRA5#j4pjLy;#S0zbep)nxav!sOWEF{k?NCOBx3~jDq#wAbfL^=RVfb z>>QpQ#bRo`_BE@QGHa6mlU0yg;=?1G_?}e{Q1kAX5jATd_d$l|dd?LFpn0sGhA;L| zX5I1?Ij83z!|<0uDdq5IiJTRcKNqgpz1$P!VDyG-HPb~q%N|8dNv+!|?7+`!(69`! zi4Xe%SAs^L@6xN?wI=h(cakf2zGJ7oZj`s)%s^T@E1$Q3flU>r zfg`5e#!7l=*(_W<($eGAHnDtCr3tOd=*t#Vh7Gj;q_`4O`YB@+?}g=iO@g+~iD^ck z_Qsb0IXIE2mFzTWoEH*t&&(ZIQc6FT|5FVr56b-li6e0O+88%=UZ!QoBSV}dxu+5S zd257LU@ehby70T7`G$TY=H>X0wGyUc26PR)=!nP!3iTIAbEPSe>Xl*oI&Qhnk zP5j{vgG0b^@+>Ev1KE?zP;E=NGV@RZ?$+h2;MrfU1%gRf>IgYLveK~**PP3;+=kNw z;cy$2v6$J=`%W<1BW=a4UTt1o9&(oOD_(8O>0>XAmU@y|Dkf|78IGq5H5nMjM~*Ag zfCdAjIe~F!o--`Ohj6zW??ClAT_a)(@rZlzpj3OlEvNFZ5D!I!$Bp#Ly*Ry{ym2jDzPo_;ALE`UEf(J%aykhzVLPSEtfG>B=Z+q98G6=r_k_D|VeHPlAH@g}Ps`Qc zV;1K1+Q@wO>;(TPmuqtp<56pAgH_=Bz&}xh;G$wXC>IUmtsR6O8gQ`x;ZNP=Hw)R> zXayQ~^r~3>t6SSgnKp`R_0BB;zg6=PS^^#>_{g)=*i7afSCD=?@kW5|FaF$RSz`Gg zBkaV5?GwmfY5doa|EL34Qq>Mg&7UP533+YcdEFL7$E6293m#U=RDUiKCJqN{3$6g9 z3GWx}x)6%`;;x?LC5l>Tf4Sr~A>|};COPz4DPv7O(~j>kj6QCGA_;!q`XHCHQ>sN0 zU%cEGD6R&$jNqTmw*;5Z9xF{;m3RhE@gC9J0d+UFHxr)CYYX^m>N0Hnt04 zTMY6B?DJqf|L?^4|5NYp5Q-#xwkf`yhGFFP4gW&$pECOIVE@@Y@$Vpzz#`4rDM{gK z!4&4HF!~xCYPVYp7`t7+IawhUhNBsKPx4=XF~fLm`wXy_4QY;~sQz;JtlYvZu9M=* z-B;UFX)FttwbCcvGroNaY#!7H^KI{`@THj8&p8t9q1-dfrlwWVNxKtPfHeW(kYEx= z1UFs_#F{+t5(^yv#idTY^}Vc+lvr$N$eJM)E`oU&HcoBLMOCQv3TKq`h_q(?3UkE=~zL6g%=M?k^rwFicw=Ky8EcX zbWLnPte_lB4R`(BNNAM8)6kJ(gS0iqX>n-ri|P}TKghR|UwvoJT=Paii<`KO?N`ae z9?j@p0}OSeT7?TjzF#5zczeD(St~Rh8F0)Rfb2X6at-Dv&x&!yoBi+|IcvX~s-wB8 zcqSVQLt^cC+>ake z+8Rb{Op;@mta+D&p6g5?-B5FQ{n&NaI zJ=8oDX=tU!6jfu5U!v!(`~7k5J!{>&zO0pG?Cz=h zNl7UwDQRix%a={DJv^qxpGBCMMYIrRZUGzU0q#6 zLqk(j69$86X=!O|YwPIf=<4d~>FMd~>l+vt7#bQH85tQH8=IJzT)leL)YKFXhntz1 zArJ_2b8`y|3rkB&Bob+5Wp(Y^HEV0@>({T_*x1?pvx|$1tE;PCcvmzTGLPJBt!otGC!y_UhA|oTCqN1Xsqhn%XP$<;Bd-q~vW8>oDe*5jW z`1tty_wOepBqSy#K6vmTDJdyAIXNXI1&v0hrlzK)r9FK3@X@13>FMbi85xgww2>l+#x8XFs%nwpxMn_s?s+0xR| z+S=OI*4EzM-qF#4!{ItRJOB9Ok5{i=y?*`r?c29qU0vPX-FQ6y&p-d{>FMe1?S23L zeP3T+e}DhLz`)?(;Ly;}@bK`+$jIpE=-AlU`1tsT4<9BbCMG8*r>3R|1j5IUABjZb z^z`)1%*>}xpFV&7JUcr}B9Xp)`7$>*H$OkWu&}VWxVW^mw7k4bCX>H@{kpQUvbwsu zwzl@|+qd=g_3z)mZ)|LAZf8|08003ZnLw$qrzU6lSfFsvPR|^@Mzd{U)&YlREf@^>Ay{8z#ySTSB z0ZXnZKP^tUfp1sc{U@sB0b;VeF2(sBr-^71!H7DZnGe_F_453V09Yh z4@QXo^RRqzAz1cU8mPDc@PNvzLFJ6FAXbaj zA@{eq{X70z$gnWF`aK!zDeQMqcqZ5JOG!*oz>VhP#tcbJrGw)pZ;N`R@9!b^W(ARt z->a4fz^-(@Mn*8uAvjUXHp?`PdLZi7ASA^%utv83*ML~<=Hft}#yg2$y?AOS@eUBQ zR}3ykt1)h3gQDK6PQKY#T$wE5Kd~j5hsPFX4S~i82(-$mFkm(+u0Pc;*CsqtgtZYQ4jZ*i$DhR|EuFhjM^uRL3>tATwTMeOinNFsAUg(E?Ll&WB0@kRJdfEvA+J z{|+_nZgR5aE%1w;rhHpY(s*E|*hjwU~yI8#=AXmZ=EQi@`Zg!#ZDnS}6zs^NR!pe8Y8eEoeq zSLD1I1E!ddA<(s%rN1qReTdvgR^XGwkp(@*d>#s_97N5~qxE@%;4cVCsi!>bI*Db- z`F%Xko2B*OZnoH-hdHES zdqqC&I(q_&K2kDm(9_k0i>Qv0i@pj#EBs&^DW0ug-+!0XAQ=Sbgh?=tsmM*{1Y(hUM>Pj1Js}274EOj9wAl?% zINwNOr0fts>rXRt=>yG(?p>SJ(y&dUL)(XFTLC%LeKu)Rxf!cBuspM3o8CB>5{G1k zr@#b+wl)7XI}4_bqSelI50!W~4U})%TUL-D_n(I8Bw$yn_JbP*OszHZ%~o0$gv>f$BJP%Cbq}l#vy7NUhdrZ{ zKe#($P+soJ;g&p*Tv(lFbuy+wwm@M7y#G4~<*3#@V(u{Fes|B-6EF54M#>|Lyogw(b};+Q8dsza2Y2 zV(vw|58dv;X)c>n3p+wDi=W>a%`}Kh&}Mfe_(@P1!ii8JCP(eK%|UUL+r^*4r#QVn^R3r3lbAF9&B;m`1B-u zpM!oi@-0UPvRq}EMw|!Dr~rMTmMD*nPy0+LSHWhE-z`##?B1>7EeQ&djCNJdb;s?T zM(<7SwtnR~erc3Yd145KTPTGizj`zP0B!DM ztQ;bpdNhF^#|(i+^<_~$J{#XK*I3SaX~y;7iGx`3x#il&Zrj8hNqyq?JhX02aQkzz zRKHg~mEVS7&0~F~IGu|x&dr%hKEpr7h!PX4XCCJ?p?_&E>Z<}be0TW^%7aoA<-3wh zqXCU6vR(7kN8HHp4QVcZ-}|7R{8)45rDYkLb$|c+ z*pI7wQDfPcF7V0Tb0Y;UsoOfA=``{fdH!Z0e^S{BgnW_AhEepNPs{mUt?~y%Uz@t@ zmetcuGs$24T^@0wk~V33o6q=dHg|d3RqG5YS^|A^Vg5Sr_+yoPe z_PD9CTWoP5h~SyYP$`uEML?php`YdSQ4ItnksaH7uXU=_FZ*f0aoGcPURVn^ApZbf zW7fG?;XcWv#zhgdvm(cL?%y0|Ss24A743DNp+QK|0dv;v^5r&Dreyp zgmD!z!*0G@1afzg!18N7hQYUG=`?`>c?N6l9jR{Htj!^Z_kT690D20b@%MaGH-tNe z@?>Lf=(1EyNR(Xy=HQtJ6RgGZ zxyInJonQJqv8Pm2oQm0lxx@DfJ~O?UnW3M(@kI*w&tO{20oLM7`IHDDwMqfcGkz8< z5dsA=k#`7njq}R>m}PH#u3ccjlW$EePqLS4)3|^E8?s~N zdPZ_8cEZx?_Z8(;^2H#CRQ<|?O@P1^#8#7&sZ==YOz`_B&>?TUpMx2;_wEoOwJVpz z%znHyzeb`9Io*-fMW5yM)9<;x=&Gu2hTN@~ zISGRGFlGA+Zh8+XB{pvbsr|2icB?8kmC#~7Vl5!$*L}Ra6{2@^ireM`qC^EL>KQv@ zZnxAmj)nRzuobMTy&4fc_cK65TOR=~D!>sVC8d;l5~9n90t?*A#JC>5$!Qxo=B1h% z!Q8cdnt6@#^lxmGd+QvW4rBb&Ez3Co#a$>Ubs>nFUjL~{C52(F(UASOpT7+|{S1K- zg^btuqf@f3vP-Hff+=AFpxAf*Bw43j)(mZvG$ul7Ms5#*kg5Q!|2R<|>ZR|tBts!> zsF_t?lM_1Wl9E^tq*Jzi^GWTBG8WrT$(U!wS^P1Y9?3zqwZ1K3424=PmY?OyODKtG zVz9z2RGTG~M~yp>X%$LXp8`d9#)!mc2_^sM%>HMO5>i_%!y*WEuCG-onzhIM=R@%~ zI`vSirIq&zK&e~+Y4OM#Ki=^UM1wdw2}zR^+5QXVmMSj8(*jE5LqJ#E1&P7;&)6+FEq1s;77!|+CrB|i6sipygjYhZQd^R4b9F7Kd+8t!GeNBIqwXnv6u zCg|CNXckZW@G+10RM`H7EwAzcGr-4%5)(qTa-4i3?3)N& zZ^;wvK4u&>#g!v$oivoz6pSbd0&H4}bE1es=io28Q=(>T2|CE?gDM%4_-e?u0?^=Z zRz)UlGuEw~qL+3dy=vUAw(!I!Q#Fh{#gzB?02^#%Ot^IC8(w0xC&TXH(E}ed&JmGgoixF~ZPCB_ z>=R>>8rWcu#{azuALZ)PJZ2n{JR}Oei3djcw}f>%{tFhj8!G?+ diff --git a/README_files/figure-gfm/unnamed-chunk-7-1.png b/README_files/figure-gfm/unnamed-chunk-7-1.png deleted file mode 100644 index a162dbcdb53cd13eaa191ba458e67f8159733135..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3440 zcmd^?doADpY#5_-{<{)zuxheZOmo2 zDQ^P+K-S_S)D{3F--yqzwn&QC$Wm3hc-!iC(cwM-$Tj?$5?_(IZen3|3#i#uRL1N` z=+$R|Lh=HIO!l+8YzA#2pS@c1(8(ZP%NkKKGF%o=!I)SdvPpkF4VkWZG5ey5hBSbf zwhmE);AM9lS)T59tGq7!6k3{{Q`*$H9iyQU4BDaO<}O0r3{v)%e|Cz-s&R=t!_D-- zvou*Kx-lcf{kY*iISBx$MunioS~7ngmef$BPZvLd3zlUkB{D2VPAnlZ$lSog?CqV>^25~Z6Fi?>{9>dGZ?ZI@McGp z3~*LWQXY7CZqt4Mh}rUgA(+zo!%xXEh*--fOHev5D7?NR2Zx&_-ooP_s`JYt#OB-o zV)C;1Dn7-A_{*kNwxu|G-UlQ5|J-`yiVNSd3Q_g1#3OF|x4P!GOPAnxnzP)SvtI1l z?TgP_C~x3)X(gW;+0@K{w<7 z^3ZXnrRC8l>0>{q)8+OZ`&PsEczeKID|9`CC8r1}C)_AmAnJ0GF&RdvDQgh+zDGNn z8KY=G^UfrEWrwFC92`FA*dj){x`$SX*9s4P*zg#@4E{L4YR}kUW_N@VPN}9^C{HU> zMd;Zt>64U@IPfpY2UeTV6^NuJ4jqlE1V>eps@~ zS5^VHQRv0<3)$IwKzHx@=t{R~ew^%dv<)Qu0bSqFdiz$btV}UL{`vU+ql0T4`fqa{ zn^z+z7^uMgRn^(Tw=wtR6raf|@A6#W`gqs8Om)mib#y}X6uB*&tFS-WOEu+pjg_(P zNlHqsuWKnn^d@FZQ%XeS#cS{mgkSpoiWi9;$s@cLY*;>Kll11NPZMee9u)W9aPrck zuTYIdytTRax8GT7*mcVuQT1UUp4p@N&jb_kAAYY87{q=VZm_f4nK_oJ@0eG19cqiT z5-6Km0pX3ijgK?K!m1-v>GR!tA|u=GPw(g7q*V(znaICshd)5{RSlUvlB}q!t)3j_ zB#h1VWiq(!-(czihYQ^hF9gqvHA@C*1FNs^OdENZhYvzBO^ICZ2^ksFkVE1~!4cu(Vu6NW4Oa0W!( z+FHvz0bX7Eu`WBJLv#8o9DmdJNv2Z8Xq5*vtM=1u!z}SheS#~PH~Vc57Dl>m>>>Q* zOdkO!z+W!qmubSrAB0Q@5vqw711_XtoIE{^?VQ=huv@-$m@I}~I0}kd_;CP%Ky>Cj z;Yp4vfMqsGFY(Q{ykTrH_M2@_dv)4(Sg9YIl42If;$M`jv&qjIM&&NNo$zVrmOik4DzJ_mc0V^(j3u|}4q zDsbRzaFWt*YU;1uMI_AQn7E`W6H92p>)oe$I#kw}f`;`=Wd@xZRIr-M&HHjb4tDUQ zZY@Nl4Y;U8$q+J2OD$?;!o%7@ptojb99&71nNYnuG-@Luqn~4=R&UmPA=ELBW|x|p zy<+lZpi&8BXy-qKLKRe6LEqhOUXyY9aoWhYdlSgee+k7K%*jb;0ritvX3_j zPcq+s!Yze{$@5sQ<9+{f;7h3LEzhaTpu5#wZpHV9A=-^F}CNN(!QO>+9m{&=mM~D zjv00DYsj@(FZO$fNHiY-(s^Z7T#Qu!Lj`;X=(zVaYX^rrs>$9bUagtPk^m9?kx5;h z`t9kWz4AswG+1N*XlT;`rLoSksK(NRNaP%(6QBQyAiG^&m&#J;&W>-XjQ1BxNWfk@ z%mxv0INZWj%L{2-jszg}Sma7B>oIC@ERXQ+-C&4(IK|ysn?oW8H~JOJeGo*S=^+`8 z%ki^4Q>BPogQOmJ1(0cE;zAdNfqFy^4`FnDr>m(8&yWsp+9cfww%LPyS0f2B%t(c( zZ_Vq0Hn!0;P5f=!nkExmC%U=PVV2UWDN@q=qGXI)SGCgyUbe`RBE5TCAfMt4^z>xA zEL6}hsECtPgM^DMT^yt3a}DQVSt~UHS#<1L+6|C@tsR6NyNk^)%JAP_%PpC+L;t~s zxYRk>`az+#zT>juKn0=5sV1VD8_;ZP6-H<)nipp%^`QInyKefU-Cx^ajg>fOwD0?T zmGkGr(>ml(#IEKTFL7f;+|AL;YvToVm{7Wh%$?M4nAtqDokH0pcuVAk={YAX)s?* zd@Nu^-HRbh;h*76ETAj16pEn8jC9Tn`c@#r$9&jT4V_HZoPl;km}|J}ihvjcCrkBj3;r&JU*gKlp}C(B z%gffLHLea1dRrczB_$+$TnVBL^@%o8V@gW!q4~?Uf@mYv#H6I*&+I`YiqM85l59AN zlw+ciF%thubItdDSejKfMUyf>oN=Z*w+VSTvqz!@f8qyCTwg|^wph91@pz`1+WCgq zYxd#(dCPxd8m%yhDq)2$QZvgfD`N4xP@EYj+U)0lec^5Ijj+)vf0x92T#i;np=_2_)(dY=g7~5h?{{_(1mZmERx2D87t}*=_-?H3 z#B+Dm*N=PeUb5E~j8XfC>$bz8f93=;R7`I_Xq<;c_C|PFMi=WGGOQo<;Kzz~0O7X+ z2sMMVE0a<(#zrdEVHcJKL`%Or4aR3AV2k%ii}F2hNyj=kq*3PdR(5Hq7;763!i;d# z%IJSjuT!e8A1Pvw>biIb_dU7MH^DyQ>7SefeuH7h`2PYu9l;(kLR$_ykBqX9Ocj?e zS+Ml~3(Wfml>blDv_@RR54IryJj{Qh`L9jH)ZBA^+D5!np0v1y0xV!QP{O&J(SHXH CJ5=ES diff --git a/README_files/figure-gfm/unnamed-chunk-7-10.png b/README_files/figure-gfm/unnamed-chunk-7-10.png deleted file mode 100644 index d6dba62738fb51678e9621f62f1175658153693b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3451 zcmd^C2UAnq8a;prB7#U$qM$)R5TuBpgrW!{ir}RRDk!3%g@9-z2_zJ`#2W-7f?`NO z0YQ3@rc~*@*MvX}C3LtTYG`@K``)~HbLahoyXWkE&i-c4KJ%?_uQh8wy=G;;M?_8p z0DwIfmrQK{fIk`hP7vk?M|`2eDEQjtcgZOL0K{s4b-qSqhC8@e-NN*|U0~t@6KnVK zo_zJ63K^Q3hY3&@O;HWfyVUpT(5v;?YRAgMmEII*`42e6Fr#lEvJWA0dLzc=AYL>w zTiR}*?@_Ipq{9xgNu{Z{^E;(?2nv#hja?{aJCWy3!4;~Ksz%Wq3Y_Z5`?+FN-ZqqA zsl*2WUbK?69RP4{RdE>rjuWZ{faK)(62r`Cc#3EB#cx6gLxJo4f8^H|Q~9&K2HpTS ztoa=5e^lz{viN{&dqahQbLV%+1Aw4JAOJ|2{?micDb4OZ#a`atdG_*!3qH3I-(wh< zo%xx&mGkHrk^IcwW5d6IRMph%8r_~sgE{^e^uzq(KuDOd0RV_V{}WVg>gX7lTft z`uh6n8XBVI4e5=IjZ7w!!N5*;y-mWcd!o^3Npl$q7_5xVW()3?`L@Vp)Yhh4d3Ey0 zkt5B`&5vSe<;^E~uM7~K+}-ukani2puKLh3T}#a;D|T|DDEg{L{KF?9w<>MqrMJ+2 z)0cSZLBSgsuJI&9dou0y(BxpA;}}YYJ4|mnmL}V)ZPRFp+oti2Drh*J@m${zCZD4G z%wt*2D#yPH;6sB`*P>-W&< zpuh%$f}EU&OZ~@fY-~*H`umG+l=!BlrFs6Dub5_ej%Jc)DeRo96zTH*Y2; zCSJaL8MQd_DS*>4Jw5%wHhq+<_K@BHrniLqwo&U839dSH=+Uc|%e~?Y*2aar&3d+8 z&6th?ezvW-`BYfvf!$`NoQ&0F4=ioMcq+VdALdQ!~AC7cS}E$r>%xIYO5!poOZ6f0Rt$-A2SdwP4V6VH%d zzU%|jsi~>S&(EKooo#rQ?NsXbHZro2YKV=xnDXWJPzf>#wYg(6as_G_FDQELxu%&Zf zHdc-Ik-`&%;`4segWR)jz-hBf`2LxPM5F8LwIvW&vccWHCM`?_k>E3Q5PmkPZebU6 zg-viwq$Do=sQ|FVgblimPHFh+W4?K~xv{H51&ShrH@-iMijpD~6ci|$M|;3N78J0@ z$IXsvYisN16xQcti^=I6S5mrYy0WseZ{I#Stpcate*4YD!~~>KQ6wK9-x!`(K>+cp zt3UnR<{2~RM~h+n>V>ujT(FRbIF`$;(p$P90oEg)^4N~ycM>lJvDYC*db3tj z6El)$(N0ip-?miP)&13m5`oF+ClL`v$g#>rDsF4t6S6b>JY%TPGnO#@@bmKWGDbr| z+no>-6GQM}6z51Nk|Ulxc?hy_ks1;LAcl=qRA#7fEmT__3Sl_6IMaLL9OJmQj2FZ= zhq>C*xyYNDZX3Kmh~@T%Q>95CfA5V~G?qP6&PXwwT};@&PZe6vd4|PRBHW%b#?4Yw z9F-9|z_Sai(5X9>HM#+h9}nv0-YR>KIA{=f&2)2f6FlQ;=3NDpgoI%Nshx_RI?zhm z+S)QZYHZAt=N#_I>kPqQoy$HuRXVoD=akbQcMS~9JwOc*FEQ(bKJr=j852Xdk}!RZ zj-~_3BgKW!OM^cWos?b**I!L=^J6%;z z6eU_1QWwhA9!KL(Kb&z)nzy7o;67PySg`9pjDO+|*Q^_Kx$ltoke`|!HM@5&?HBGl zllpzhRhTs|#f!QDC|_2tj*yU$1g%^#kMGA17x0KH>-whY>W$?xu_(MHXZk2K!tD1= z*A=;-r(|#MR?2vT<+_2F|D#81@e1SVR*5H}H}Fxiq{@n<=|#pW?mj=u>N=l5wt3#* zl?%HDJ-k_Tt!D$QmD1wg=H?G7iev;+KCeHxChM(AnKqvOreLuwht@skmNIxXX{F(i z>p)kG*r5vjJvdAT!G~U8#fUAv`_YdprX$2Je%-n;`jA;F$mlQdP6|x9L}nJ!?xEwn zXn@}?Cj??J&PM&hbk68c)WUa8Q=UGC`F-y9o-4=1_32NZUz2EVvOJ-tJu%5S2%|Cz z?qzAEH0ZY4g+?9-70Nc>m@66?8EJi`F^Fw(*G@}Mze0gcK$Jn5eE@fGh$p-@Hc5Xf z$`LV5&BGhFl36caJT{#6&=AEB=MQPlzir*NBr z5+5=%or}EeE7FURW4T-HWRzt}eSQ6{PY==-si64I&-+O15)tugX}YgZi3PQ+uj-!0 z5&sM8Z^>g9$5==axd|3)uYp%KVe@WdygGv&v4&1g*c(`l!F-=TASb5^C6P!FJzt$M zG`O7syyKw6E>Y2gTJOHbz^lsWbZ110eU^i5y47ioK3OTLw#2ixru0J3Q~vC__eo&{ zgJI-z!e-)|a%^Y&+*(UkT&rWy*7wK&j(K_3g4U~ToTczCNm5i>A;>V0dEr#-Tc@dA z1{0-3`TR_cs?DC;nn#tDt;xEG(Q>qliwnFXu{-zE#M9lcjo>SaqedN8 z>$Y$!JA23A&29GcZplig1NP{m2My%6l`$ySPd;l~qC+J=BxBYB4K$3+OPSTu6MIP1JZ18w&}Jq@XQE#>VhVqZMDj zezmu^Pq(5x2nc|j_UZ$bAuK$cJSU}Jxb!+7W4@e0Lm1MfWu)WdT;=wi@ma`J|9a;m zs0P8s$1|_Mlion|a$T!NGyAvRV@&)qiobx&yE)%Rd{R_YG^i?0N9pG4ZZ!U7G$Uf$ z{RDa5KN)m;{LfxS<*hR1WAEvhlb6rldV!czsm|mV5NOW|x%ovPpGK$CrD?5Z?k#oe z3fH?jUCJVZ&kd~jM1OLYZ^ENV^B}jiL1xuXX=1p_`*paP&chV&@ zU@m|8vcJ2(e|QiU+w4Af763x-H%R}lDF&}6JbsB|+o`q;`$q6K1z4C_ndX|@4*M4a C)-L`4 diff --git a/README_files/figure-gfm/unnamed-chunk-7-11.png b/README_files/figure-gfm/unnamed-chunk-7-11.png deleted file mode 100644 index 8e6983df15bbb4f50a9882ebfd0a9ac8e18bf94b..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3420 zcmd^CXHe5y7XJ%RP!KfwkQFd!@S##gBmqJ|A%H0DiHd}#^b$ZI5FkK66p$h!iqfNi zbV5&%5kIm`IOVVoQrWw81ur+hp%}fxIJ|wJL3`(1e^?o zj#vn6KnS6{gmErAiKNrdASdMMY8FXo6|2j)7Ux(y&OX!TsR^EnBU>rH_FBf~=F$Lg zQyR)d9034B)-e?T;DM|Fz?GI|W4!IcyrU4X{6cBy(>#s`nE$D6R5S&(|LZusjuRkU z;5Z2cJ^SaI|7T@OhesP4YKa{&k1;x8*e5RToz1ukWNX-!4m3?S<-q?NuiYF{e&gQR z+B4GHqqhHZbvKnaNDcH4UmKDJ{VE=j#4$sOKlztX`?b=GI;xYC^M@U4R41$z&~1mE z(FEv6?Po&k(>a#yc&|EYJ2_tm4pbCFxRj zGtw#?sqS^yvyD+wOWp*J_q0-&xn6Dg4=MM&r)0(ayw=BTJ4vCdO{$Zs}Ky}*FI`l11hq8OFt)=WHnP1`%1KNRl;Fw3ov5O0-u|KCE0au#yV{`EF7&DKAaNo z;Os1@ikqt^FPi_EgQKXDB_)`0hs}DQb4l?(Bx+Dj1Nz&n_3=0>CjV}uXZ-mncxsV5 z_2c##Q7P2Ia5sXrQS9iM^(a31)SguuSXJPifam-6;uCguqC0yF2AVd@QJRAvfuJuM zqrtd#HmDBGr+>-QYEjcPQqrcq0pr!W`sK*mIyxp=y*Y`nH*vTp%s~f`ul;H_CC1kb z?(lOC^A#*wbdX*NDUqD3OP$mhY>3y0`1baET4A`~W{!KHDkl!Jd==stb`P0hNet6E z8ePHKQ6#+6UdX)2Ky=gGf~a+S4UvPRmAq=`C<|H0MI*r|f0h2;UVWN%T~OVWr5t#XBiK0S5s9U4Ke%4A@lEXONu*$ur`qQ-6 z))Mt}EO@9|%6~;S--qpN}C~CHW4!OpJm2_%m zL>e0}(T5_i?=2u68_3@Fkckk>*{-iyge&;rHQ0#Bc^SyMT__ypdT(8W(@>J!!k-P3 zk%`XN!l+UFh$)Zy2!x_X$jwWl7!M|8=(?cHS(9io%!?#+PIWS;ECdI0VW}t}loSw^ zAC1xjYrty^wJR&J7hvx#rOob}U4b}q8!7LQYKOqBC!D1smQ!Z`Cx60S@Ama{C(SzTZ-Z+e_4I;tYMH#cuFNRnT z3jfUzI|_!Z)QR5HxU3DDo1yK~92TgFeUs3z-vg=xSUxPF=%)QJqqt7*#-%~;;!$;7 z`t*+pZ7bCX&m!!pSgu$4kj^~Zh(Ub7Dh*5iW3z4J2WJJeLcH`U+IAMOJk-+f4Lc9a zb1>>T@wcT-$uCUMQIR;I;oQMj%#RX$HTWv(byo%XP&S&#tdX~f#dJGuj_v>C2Ztk_E3zCMe-$Bg)%#GM8{N9dZ1YRa9;%eTBn%)Yj}9gVxO zGF6j<-F}zYaQCP|lrY`dVW!L8VA#*i_r)fZlD;`p6f~xsQka`NpDqh2h|jl3gJuTqGQ*v!dpZ^-X34c1ZRM+2svVV%=9; zk~bwDSGni+BD{>b;S<;p2Pv`H3AJUoc5`V?&K4(w>gDxQRk2cVQWs~cg4@7Qc|!f; zYYDmH)Wp|o`-f7ZFJxsZML?A+{jE|d`ml}ICxeeAW1!Zl{`yE&dXZCm(-zU#tgp#n z(#9Zh6}?<3&nCQzt&L7DURiSusOI)N`>|A z=iaAkc7BUN1Pk|ka>8(tZ#v(MziESvcN50G?}(ygicXqb&&w#waBf~cqfK!z8T$3} z0tVI3ra-H4(un}fBX$`?1*8IdJi+YmhNqqWl`B%OMpFHjP`-Kb?Wl_C)m4mkh^o`q zh7ScgX#t?EfZgKKnKhBcB|prTpA_NnZ7bD*qU)(`;R1JM*=S?vpPy$i0)N1HLj496xvcD5FV$~VlLx^wODo!f0W!zSO0AR^0WYvQh3(3kX5|FqBnbnStW$9@Ob z%@pOdo{zOz0D<3^&*8~VIqz@?H*oXTZ(sm83i1Jf-;tw70K-$k|Ek<*n;F$amf#PG zMx5ls_PMhUMvMT%u(OHJq)AHuiGhD>^?zFVWqy8sH)PA3>PXjOH(UPZfP5exq`W%jXIipYS!3*8#)!aBbpUuV`k?xjyq~W ziDKs37*c8aMh648L=#V`fQq8B)VRdM&b9U001<+Jl)O$03fomU9762tb0{cJCp+`KkqOm?c29Q zAP`km)g3!_K%r1IH8pj0bqx&-O-)T047PLU&Rx59?cTjxOG`^zTU$p*M^{&O@7}$7 zdV2c$`uq3qH#9UfGBP@F;K0Fy2M--OWNd7F`0!y96BAQYQ!_I&b8~YG3yUL1j#ye+ zT3J~gJ$m%mv17-NA3t&8#L1H<;c&RMwY80n4FZ9%wY5EU>Xehte%o%TQZyz5YUteE8KR?B9U(2 zzMYqsm!F?sP*8CH{{6zj!lI(0;^N|xl9IBrvhwosii(QL%1SbsTvb(7U0q#MQ}gK2 zBMOB=Rca`$uC9(wr#Cb-JbU)6v9YnKsj0cSxvj0Oy}kX#ix(Xo9SjDev$K=QWWIX! z>hgww5?(XgF?d$7fu~-92O}|r$&1Q2roWa4tp`oGS;o;HI(Xp|y@$vDA ziHQ#%K1@zd@_4+dsi}`2KYsf3X<8}K_{_}A?CdO`&ld;;LZNVOZf<^leqmujBoZwx zEs4eA<>lp-m6g@iRf$9*l}cqY+2-b^LZOJnUZg1*+VP8L*i`^PvumpWdy}4A0sx>E zUT!Xdsb!0k>urJHeLX8h6FII2Lh|oo%+72NGjsoWPw4$3KT&lg`K~#JQe3p#QbYky zTK-`E{E&J_?fwTl$K(w*V#$)->VR`sT+6vk0qOI)3Ou8d`zrlQ9UM+-8f_$ojHqIz zQRLczU|_w+AE0yjc+eWpU)WKzbMxItCubu%4dXTu*z7a=-Te3D{1V8jb^b?yr(43Pl# zJ7f6`?ua0wSrU46qoTh@_dM}J9&OWKD}`R+kkqxrBt^anf{>zsf z(D>8rLs~BYX1^FGGT5n1TD~gcAJqeLPny5TS+=_LRl_|aD zW;EvRJ$%EG(|qv}+}CQu{`C?*PX@=mU6Y~LPz5+dsa+x>BME4rjD6midr871*4kw? zaCOtsq`z7jE3XO6xRTO@0b5@LE1-XIkcaI>%2m&&v=_H?6W04G5vE2J6cQ|AGGn;M z1}SFXqJCDp_xYY~Z$PG+G&sEdvzufgACdJWTQd;l(Bg5vEH-6sfFydrYap@s1__l5 z%v#AhOD^2V3)$F5pm2w>*7Q1(`)IlwTo^N2e%FNzk?Gs8kbJHI7*AHFK(SBSU1@?} z*C{pVP8|Fw!1bX=NaK7^t3PNj}e6W*W!O58hZ4A&{ik6 zMUI-bQg61mY<{68R1GNn&`C}2gmTSryV;Q+g`ykWnq1U-t_+M1ReCY{a}hIiH0?8= zMT0j6$qVJcN*Pwn`wR4qAGVLE901c_-Yh#~EGDjda!)KBG}V>A8%@*_yPi84(xT zy2~|+$8>RW|4BQ>hp9apKzq^r)9j_^VJi;Kzf2E+?EQd?!+J0J5Oc{XV%)$A{Ip;Rg|ZozOWooBM^@jVW(nS73x2+>JeY- zhkTk8nG>mTX6%b0ZK(HSBU+|WbBZ4a5&9XzRLO)7LLLD$c(N6jBePrN6W>F1S{~F- zSQ-~ZLF_N*b072ziX$&S+6TptjaaeEF+*6#afm%9!{9i9&K;|ueB(t{xbc-Q!CEPn z3raC!_voU{*=uChpJ*QQ693cZOrI&LwW#0Qm7bVmIN2E^f4gqVES;Ol6`!+?=gP6` zL_Dy3D|sFV{yE%t{wMdv2;>}cHu||@mU?A_Swnn90%cLqw%;GO?=S!V;alXPxEeUZ nwIGjphM;JL^z2~cNg|-C)8zLY{$;-MD+%y&_jRM6zHt5D^DjGM diff --git a/README_files/figure-gfm/unnamed-chunk-7-13.png b/README_files/figure-gfm/unnamed-chunk-7-13.png deleted file mode 100644 index d1ef860d180d3f9ee1a08156de2dc69769b84aa8..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3269 zcmeH}`#+QYAICRZG^b<;NexMox-o_w>L%oPBT8wcBALTIr zIG~}Uqj6Ao-=RZVdV2d0>zTbctbOE{1N!(R89dmFrclyo3+3C28 zi>2#HD_2)*H@6d~PuaM;+nzn==!tRk@^td{a`ry&e8Jo0;)Ro!F1q?$ITH}z5fpeX zI0*B5uqWfe?~NjJS6npOO@r zni8Fs8k3$D`!M}_#)BJ~88@>sZ)IoRCOwMF$%@M*5%P2H6yzopGU{NK{Y_sX8!CzmEYdzxHcmQq1Zsd$!JS^fv5JgurCt(x-SdDX+(>I`a42JLxf zUG1ZKYSs%{Rs$`&p^ns8pYyUIx4BVvpfQjBGQXv%ptY%~iC*}srKr87_;qXXo3@gU z_9vZhO1s~5aXX$eI?H;x$;|F&eT?$Ay%ht@%6D(82K%d7?`nnzpR)&RM_9F^L)7=f zG!DCN?EQ<6oQ8?9#)G000~(o$h0T72-l8`jh^vPaelTCkX&24bOlm%F|$9!#*W0Dt_;BVAGnvc!C$#u=$>XHc4B# zC>LwODr7=I1{UKk6g$hI5cmApLf_1U>M7q0`$Px>LUitdsbZOz?~6Rl4L-ms%)^@K zI-#8n>@9{uD0W2_VBdt+65ouw)l(EJpk0r#JeJu5d-QYjpJn-*7AUD(5Vdo;?QmZl z2_yY$gHl|U9?3cHug_Ew)}2j$z`k0WJnE1hZ6a6}8@5TEFmUSjeUlw?#KGO8(SvoB zsNruGX1!N^1L@w*W#$_&x}i-U$&ywukaBLn$TI4$WjH<45|6T#`1%0<8SakuDUJ;@ zQAY>fv0>Swi)wdl(CPu42{|4+0!dS3C^`XW`dHUhy0UAg|7gZW59=I}8zOrk`NKy3 zQT9gBvcVq)9qRmE<_?Uq`4qwOd>1unUM?BUT>|P_mXM0DGrbm&h4-PaCgSUblRo0smUIyjn4R<( zQ7?9UpaVX+j$}kGqUl)$vPL8DZ(mLs!@>qi(PHGk(+2}z!X0~?;U?i#OzXB&9BOvZ3v<^$3sUd$8e*|Jt;9`MWBcOl#Z=9 z7do}H2F);C99yh2L_p^1N9tv51f+~1^=JmGD>>f5Kb`aE*cyA1#1ye}`>q_qi~@)k zwK^tm!oqzHs?4H>&MKbq{|piSLmCF9j8<`0L%68P2DNCeJXH2Vk!i=(Y_ zD`hc$GrbXb!JjXcq+^yse%SlUc^u}1Am(m=%Z-!C9sxKRNq~pk>}NHkSu@9@NW#G5 z&W5@P(V}XMq&4h+Q7dHt;x4z7@nV+{W}*yHQ8Y94yP|=8i-^IYnAe9gXot?hB^Y+e z-MbnPJdWg74xue-Ht)y4&fsXw>lqloJstlgZ`U{zP=EDH6<@V-cNbbMG2$IRKo#(B zt)n;^+08copBYw>^q{+Br6D$usyl{cFY~yi@%juc_3G*VayLo9zg1qR81(P>!rm*XnmxOaw8TTMcR0)PZQjz|%1$H0IdL)wcqfk0A05el(?xwBhpD+;j-6Wv{yp5a%lLwf7T5A;?6qCAz=0)-gww0>FMk18yFZE8X6iI8Npz%0|yQm8yg=yc+kYe#LUdh z+}zy4!ot$h^6=rqR#sL=j~<1?;m403x3;#nv9YnWwM8Hhc6N65_Vx}A4oD=@+1c6E z)zwW%L|u1xcMlH_Pft%TFRzm)PkMWM`}p|y`ud_!C_g_xe}Dher%$8N=)k~03SJ6B82~8ygoF7at#=n3zZ)5Qs$L z?c2ALl9EzVQtsZpo0^)MmX<~$kuoweva_>ub93|Z^78ZZ3knJf3k#n~1ii(OCFJ4quR#sJ2RaaNn)YR10*4EY4Q79BDm0Dk4-*A1hp`oF% zv9YPC>E+9p&CSg%EiE(}t+ln4PN%*(m{?Ck97 z>gw+9?&<02?d|RB>+A3DXR%nn32Bl!FfcGUI5;#kG%_+WIyyQwHa0#!J~1&dIXO8s zH8njwJu@@&;lqd7+1a_dInKl?hr^klpI=y5SX^9OUS3{VSy^3OU0Yk@a=Gj4>l+&z zo12?kTU&fSUmy^u?N2lo&W%*G3mOjqfEl|i(iv5T0|0>9u1Gsn{F4?rEjkSCSoguP@xq|DmgtDkm%Cc8OjMAJ3k*!DPuu zg2p1L=>9K|wHf;S!pEJ1Y0)Ng*pB4rpZGH8Drd& zgU;}w39P!W*df9PsKn`LZkG$7+EnxTp>G z)4)BSY?2mu4+Wf~sji&GA<@cb_L^Q-geR=OSH0tiA2CSzVp4GE$^eCrCbPk7N^tte zEfxt(Cr^+g{%tPEo>%Y$UXO<{rI^PfV_s9Czd(N^85VYy+9XU~b zmdDDe;#OGFT4c3nZ&gOmbeOE>V}q{N-eJ4UmRy?s*eMhJQp=Q5X8W4`Q7)@!3al-M zMr|*3(j2ZecuZ=x)kzvUZ#M6y+ZLwtuJ@U>`EPugQC=j?<7}$-w3fN10*t4WqmHCY z|A?QTp*Fx$QnzO)<~*Fncxd~1I0C=wb`3~WFiP;~C`dQcB0Va|sas*HAEsDbLCe>G zJ8UZh+_<(}iq70;K6gn9=Jrd~A}H+Fpm13oZ&Ak$+@Y`zUl>T zD%QAeOrMBZo}aqOnf!hjlu6Hh2vY#B$ZYGrFzRS}#taZ>BCD4oTdHwsIWeT^Z`HRr zJ=8O!6e>nFe`aftEvbcSXTDlv9@~rzXof}3hq5lk72C`{`*W12!_14!)Q-F1Pcdxc z9Pu#1wymk{%0~37Ue^=rcGiuja8a$3O2pkFGEzf!$F8r@$ZxC-1N@W{#Z+02@Ek zIV_GomTUW}pOJgMc*5SfXL4zF37l zt7w725(^tUX8$>#XO1@Gql1f!swj3umkgH@3lv0$xz@ehVUCRSoXj<|h9bj1Q?P}2_i z;xbHDhqAsok%NNi@z+arpCmfX&eo)ICwWE<&FAzvn_1eH6HcMXBcMuKeF*Jy!*M#Yc&i95dvy;NMt z^xYT9{cLU-LiM79-)?oVKMzr08h=#q1kmSuuwak{FG`{{z6)(F<8^ If9}@*0Ly>|f&c&j diff --git a/README_files/figure-gfm/unnamed-chunk-7-15.png b/README_files/figure-gfm/unnamed-chunk-7-15.png deleted file mode 100644 index f0a2b8e6b9aeeda64cb3452044edb8493d42f900..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3582 zcmeHKdpy&7AD<8kwK}C-Pt?&(3Q@VNoJmeIMG|sLC7jG{w%KN)6VdX}iDV{pOzs*& zE<++R$#I)8_uDqN7-92#cm8-@ujl;n{Pq0zJnz?Qx9{(_&-eRze?Fi0=kt4f1!<|U zO?evx0#UHK1h<7iw!8x0lV!JncT$PQAo!5;zvLJMfhabJUlL8I?AzexA}jcXYgh_@ zfOxG7O=T>!k54c5NMt9A=i1B1Zok zJDOi*kd@WrvY>#4DWo*RFaWbV{8VY+cuO^YcU&?R&8G(3GO50bTWt}n@%GH5Z1l$>t8CY6cGTXD; z-gTkPF5bq;)8PCODRst+K#Ukl@hSpI$y#C$b1?>0Z%%8fop<(qvi0z979os#(_F4` z@RC0Qf$;Y)qR}SDK0VVQE_I|DV?xkqg7IKQKGmx-LOpo z>ELv5rOsRp3SePWa#X=FO88G^e>$(j%|8 zlw(m%O-(N+9{g(gf9vE=B zdGmx@4duBQrM^7{z%n#zP0)|h($WHVl)NDj2+GRJF@Hf%Pftt)?NN=kSvc4~QTVq&8HFH}}mI=JE*Bj$Q%NRAlc+Ok_?{tJEIGU*-LpEy(MBr`|a ztW`vm=fK3XXV0vE>P*)6n&EO`-^X^tV6|Vre%*8I`im8WjZHg~8RGBXTk4zi>9(FS zS?R>hlgeZpm@pWFS;?`_1yswZZjg-z=LG_@fDyQhi;K0jHK6m-rReB9*Xl~Z?ZY>_ zcJ1=<@i8$m0fz^>96NSQMMcHPk9}B^hD>Eu;pjLUnJ5j>9Er~=O-)U$sHphq*&E=( zt5@go`Itc*jZW`0pG#CdN5L6P>QcA18*MIgj-wIo6p)?c_AVP?7*>}xtYIyf9obCKm+XewGAWjP?Hm)9OXe5g&u zn#0Y6OLpIw6S}XD>gbqa=Z7d~gMfk0FN!@Hwn8gFvGvitP@~psDYLV)q|Je?P{;Kd zADc*;#Z$R(hGgOj$Bi)9**SV=o?sR_)V2Km+aw1+SFO4DeKO70xuoz{KOY~UApBau z!8av0LNRGmgrBYOVqD0`%oGZR>!{?jL0M(aNF>wW4i_3~XlO`luEFmHLK;~kkAU-6$ za~55saVz;U7F!+-9J;uU9~HH)mc*_ z)ZF#`#_M6lhU}W1CkJ<88H?mke4@r{hpApIFnmA z$bvBwKprc4sX^nXXc-?xT@s}WMqtA&8yglMuDPvvrcHskHEYEkJah=?O!cN{{ak86 zUf%K3r_l^QH2P=NiuCjgZ~~DSWn3n4uw2De(Es*efSrd00JuEaW`sS+0{4)1>U0etTv!hoJTlx}7i;at`1)EsBE-49SWd0l` z$?I_=>1akKu~S^Cuvg)C+g{$Ok!JFm#WNxTFkU2h=+)N8T zH$a}9ReKLpoxcKvl-Ebs2wNTA*dRbpB_n`x1DzQkACHU+;96vi8@`8_1-_ywBv0Fx^z<#K} zA(vyfM&Y-)bMH`nZ^ze`HEQg~*%d)ouU_4=XV1mVh1vIWd!Zx}$-$uq)bb=1f5OP9 zhj5HwXJ>co)-BLzku>~7vR4Ut!V*-%=*Y-trJ3B^TsQ2nG<0EcF@{W5^UJ9SnvA*R z=jV6*dSclh)z!pr6K%RRtKk0`Wq)L6Hz%MzM2F(>t+hv#;?p)7Y(DZV9xOzHmYLnV z+KzI~F;e^V35h@u*7@%wB_%Bb}x!Nw-8x?1>D%~<}CM^8qfQ>o9UNC;#c z^whe#x`KiNkT1Zax$2d{Z|$(!JFSTVf#A^PL?D5xXZ+oRIciX-_kCaf6z>NpN_XxQ z_N;r=u)O-dJ)j^+>>B(^w@Z9{yt=x&y}doK0|Y}(PR@&U8O%@_p=?Wt=)W zM%i0u?Ze~UK|w*Do}NS^5wPy;L%rAZnrasG~V*O-E5sV)h5Y!!jN2D zPex=#L_|1qI0PG5c*n=1YtD^F*Pul)VN!V+8j877mW+S>1cn3tHcEft?CpEpES}Uy x4jcOYe^USNJZ6X|b-F+v0%6pj`CB-bU}H+c;)q7|K=8x_v9dtI3(Vak{t2jhgW>=H diff --git a/README_files/figure-gfm/unnamed-chunk-7-16.png b/README_files/figure-gfm/unnamed-chunk-7-16.png deleted file mode 100644 index 15e79ed5b99f9c5c9674c762e1541daaf0cf9894..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3930 zcmeHK_g7QfwoXJ2N{i8h9J&YfU;{)Dq@xguNGQicHGp&l5^5-+2^J90hfb^qbb(M*AVBD$B?JhB5(0N~f4O(u@$O&n-W+4^wdY=Y?77CA-}>ga;>_R%0=%NU zAP`8v$WYG$1UmK+cz%E47;uloOHqK~q>rJEKL{lF_2>e3pgy~RKoEW-z1#PLGwBnU z`ze9Mj&+8?8NB>`Gd2`%^D{YxT%%+{ zGNXR!6EQJ^`n9aTxnK{E8nS++`su;bIl1;WK40xfjVfpFk*MfZI%#{Q#9f<&I{d&u z$y#GMnBuzjc6~4i^th}74GbTd&@~X~Qfw3tNar>pBf`g8%C$(%3rl)?`=?wpT6T&4 zkbc^0m`}19aP^B~8(ogv(V~k-vj|lQ_anD#|3{vy+rR#ETmuB+m7W5F%uazJps45* z!64ADdQDuQkLQj_fI8t0E=6aN40f@MxdyxNfAOC;NoSBuUFbE_Y>^k~sLSf7n zr8tvh;H<6b6SNFoRqdGqkK+Q=vMP;1Uc!pOpem2H4BR0zMH^pJKqN*`OLQx4$nCSA z#s$@0nUcKI#8nEL$jYo!SFNmBB1s|px@)d?qB#V5)Sdb;gJYkj^u z9y$bX?#}l^OJp&%pG(d3ehJyzR1Ce)&hRGhJa(PWt7K>@y6yK9iCp8M5c-PP>C@$p zhVs(Wu^-6F5&OY1GWi492GunL8qG`Q$nr-p+{d6%UgL|HyXPL5n6Bzjsc1=Lkj!b^SFh)H7j1R+Q`DK<8Cw&OKcEpU0f)<1>^qC7VHK@+3bIy$PV zq_k;?`?0b`zJo-r0<#qr6`0LMa|9ym?OWyno8j)_(%Ra3FH7yFs_LkR($C@Hw6wHH z)~LG-JacCmSE8Y*X~J=Fbv1c+{da9`2R(5K2@H!Cvb!-)<$6@tF*7s6&386aEwH<- z4OTLomXea2cVv$n6_J7Gih{#;-xL-WmcA$L@+8n&k>IWCF+A4_aX7pE{r$qiD-cuC zjxKv}(DZQfeI!kL{aLez^+rp)t(f|R>7m|H*-Jk*jke9tBCz|oshLR<)=0i5oK3HW z&CPYaT^TMJPB;0WF*-VGqgRERq=e<$Hkqa?b#=9Xmn{S6p-dUJv3!G)V^b7!f#gsZ zQ1JP)M|*;Zba~|AL1$+tjYiAK$pKa}I5@bt=#d4tvb3xUT=|*D(SyO}7ZwOLHLV>T zY01eh?(S)+smfA@Lz;4SRbT4r)Kpb#KYzX?FE4-bV%zYrmEO-UHh&@z;W)0cIVKnT zm4wla-x9vrhcr~|9lsB2;yNp#8gOgd=~Zlf#Y1nMsove0soxCy0~Cd6v6 zX%*GxrArsjaC393qiJg_)>){#`$D3a%3~vOF)>0on`NG@A7_{*hj8mn&&|4QXk?@i zXkl+30YCt1Qy;uu<2#Gj+6oP4K2e&Ot)7g?c=v9n^ZaWMsTTrbRetk#p+L&|^}qXW z1qOOrHC&cv9yk{?JJOQ1z|Wv-QLv8J;zCeoh;!#ietPlt@&snD;-OojfWC9+L%8kU zk}4CcGWM&u_%-R;+Su`z`kWEp1_K?P2SzBx-DItf;8y5Vqc?%;R)gQj&tRD#`PdjM#bTeOvwe zq%USR2+`B+!ablQSkC!wMI>VbL|fB=6WC4oOrhHW}_qgXbdrH-oGjw1nfD_KMCn!2Mwb*Ymd{JJ$WVgs;dV2b* zRq>bNVoC#M8=wc+1vxpm-mzoHB*WI41ucfkWBxVVTG zoP(?T(&EWvQFV2K`Rl+%vhEbIg#by>%)4+EVOj`hI;FR77%Wa(}M| zpxmmFNDq(C10G&pUiS#^U-M2}L1C%(f>k3S>}wGpe21c)d+*ZPQ1q@nSPW zgM)s4ehK=sPfwm%9q}L=WBB2Iej9)5zQErcE^%;Zj0j)hs`VEY6}=&!6K{A3CI)%u zM;$v6+$1e*HJsvUwGvSGg-_)7^D)sJt{4ti$1C3AA{@qZLbRgY|7`tQ)EE~)W)+bV zk~FDXT8nW}2Qh~`RCSzXQMz^{5&eUMe>4;w9nH(jdvB8W#ECT~b0{_6B*QHfPY{xQ zP}ASrTLgfyJNdHibN-Y3{G03RAplJ5fE@d8J!#(ccuHP{tJyV ze}_9RE;-GPJ5wB_UE5NMRwJBg#JI)oy0m8U^zhyN>^8xqFawoP!Q?cx2y8< zQh@V>i-#=UDdAUCZedrt$+8B?4!-|zd!WC6%@z4P5Lf0JD$L9eZO%z+Xs9%<86$q{ z5@11oO+rMnm98&N+CExBPPRMr8AyfWgV&t^c%q2Ad5XsP5bpV#-YRttf2I7iAsiq3 zD=53?NX|_^;kuXBaU+I@Y-Vn6|EISkY=JaUkEak!v9AIs{r#mOOgHFzMR&Nt9vGwu zu;ak|%$ug$U!QMdd={!qdz9%E$@9|MD`Oo55=pH*9@q>$J@>K)ZUOE7)g~9n?WnQ< zsd0D&PbJ-q4E8*9I8({A87@KCZTF??vRUz+%>vI9ReBidnZ5HobP~chm{UFHyyv)7&671b? zsymiGKpYcNGxM|U$D1GQ?c)p}C=O#WhYP#l=CDuPe3^kE{eAE?|HUD7$^8zBA#fFq zMhgiERaRDNX=zos_1e}2Jc@5T{qp5YfN;r^^trC8jM!?m)b++tYM&6-xXioeYGK74 z%S#$Dj2h*VPmL&Fq42A~%V?3Xt2HkH8Qu239zgm{tGfWHqM5SxM98?zSIhL5qxx0m zRKKV+E=9=y77Zx>vR)fYgys}U+&kIH&AfA*hlY9krn^WP=<|DS{Yr?{+afP51K gih{TQXPyorf7qpd$*^aTfWtD#2nN?HzT+7E4^;_C8UO$Q diff --git a/README_files/figure-gfm/unnamed-chunk-7-2.png b/README_files/figure-gfm/unnamed-chunk-7-2.png deleted file mode 100644 index 35fcca7b0b9a66c6b184990f8933ae03db6233af..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4204 zcmd^?`8S)}`oM#pqot*(qNwPN8d_5wQ_WR#V?HfnJUvPTF{Q*zsZur6P-6`(HMW9? zp~e-{{nvM@f!CCmi? z0M4137}x*+>?N%GywmKgb9AHFBI|O--vo*T0C;+S9c=x6l@9=b^B_|Ly}KbVHx@$e z?-6JFx5LHj@;HBEGqpOkVy3jBm8WlE{O&UDmD0^DQJISJO#Q+J7egFw$KK1bal%9#64UuV3Qrd@HgCVfA4llj6v?{HANm_S`Y_hF_TMj{ucvB#}bQTww`aJV~c z0DxEhSQ~3TRwt)J0Dy}I-5h|DE0ne9OJ{%YSR0*wR@%NRuP3&&BtmhH)rl>4ooqW5 zd8z*enH32~jyg~;>;gml%N8Y8-R_e3J0PRRCLd#~5w+jg09NPOcmXl7|7Tcs5CHHS za0>vCPK@CM+|oOx1psh?|L0y6x-KI#}irzY|X+|oy*u$&U!Qdm5T zW)H5zhQ)T9QiI}Wp27yj>y1+<{qE<@w33vl2T>=~n_AxuGD^c0jOi|l3DK7KtKd*l z4~p9Hw5j*x??v^^&rb=8f`D`XT0$tr88G_ofbbo&UpQ@WwVTS*;mzRNrqdW9Lp9(F zqZv(ry_gtICc5?g%`_oJ6Y6#5Lnr6LPda9fF=0J&VgIf(tme=00NPID?%+#S%cJEq zcG30Hnj#$^ivHn&o3G3j$AaA5-KC{v9U9kr zd=6Un3^bh3eNBfM=cILbaKO8E(%ndu>8!KAKH44d3{+W|GK6)Nz8OSXUqYT_7Uj7$ zV(T#&{E*Vd*|b^FQ2)M+P(EYc>C5-5t<{&)$;PRL4}$}hg%RdCJEcoMSWT%RusBcS zdp4KJ9Sb2~u5kVm!>rVC0^&~O=qb|L88?N& zj7tmO4P-@2OERs@B8-fNl`I!354u0nJn{QKukeFEY%*Op+q+M>(7yH0_S-v*&A$|~acnSp?DV?X!H+`6J2+A{yx z!3ugLnyjb0;dSiourO#SV`-$*!ODJ_vheUktr$dT-ut{bib+7775j>sYL`$M`8gI# zbd8Un6GG@Z)n8fqxLC}a;PEC(>=0UKH!j(qTFg9}h*ulWhK|VX?eBjT>r~ZL0dLH2 zRwkx#II5s4D|6MQZpuLBvQMB55<0LW?qw2B~AIGdd*P`~;@2z&u~@YT@|-S(mW7Kd>+2Uh7)EuswOkxe}e6)+%YO zJ&??m+ApQi+k1{4;8~ zvj_YKg?uKC)7dZfi^u+;sXk~`99+=6*;2Nxu2pbXj2w!Rq8SCJ;EzT8kwL>6z`PLux#WQ~FPF7BnlI3_^SP}`13keL z7!Vv7QQ}Hn3wMA*j}h}GL*H3h$RMtV4uv!ii>ip%%3F}mjT2>>mC-3!Y+6o2W@((q{J;kn zgQOZcMa`hYmx+z%yx^U=wYAf7^FK!_%nRSI+7E!_ua&U+s@V!f&d>3%;!`Ujg^^y~S{>^@26K*m$hHN#_m(l8t{KYKXa_O_v6$F_neEoq?+J~wjaDO6pMW|l+I&=2-4N>twS zbfUeeW=O}n)4F-#yOm=Fukp}bZ2ZKOC@-I-xaZ-RePbwDMH|4N~ zmBSRDQ$%07!5ZgL)W%#>BStOBGx~x&$C|%!AVQkz+|#|blu0nS%H4{mF1_2cH@U| z{3iuel8IFbAv&k43~@Wfk`3Tl_nD{e%BJV-p$|(H7SBv5w#;VuSXQGMkUU#eDEZak z0W2iTqb#UK0366-NF?&-=e&+io=%=eqQZfu8U=sF#j4<;!+N{Xw=Oi@c7Bbb!q9hIvLMHNC#C);K1nO&1Sfbred|Zh z0?67OlDi_xd)=>!QC2=(*_JO@WdL70$(p&MxR8w6R##)KwspOYUuH~EnU zYbX7tIyIH1y=UVQT+0|)=7#_2(IE?#AGY8Ffx-$THzu)}i3XPw7x)84wQQ`cT6~D_ zg%o7-)x7gVuO9Z7l2ZP0Ox@ewIiEhm9mm`25-uEJ6NoEK(}lq%T@3nhBUu~V z-PM|SRl-$T0bS=i;px5=AqcCOQzj=5EUEc0RnLegG~pnv1meEi)gEH z`q_~!oh2py>l3Z4?eeN-(TB9bVE$k%l@FVb3<~}H{17H(>`gHWEyuIq+@~yV(7!zZ zRxybUeSU*xkP&8ZKa+uOKRNs{+1Y7MGh?*2N&*7{0}s|S)qLx^J8=}WjtV_qEp9gL z?CBPLgNzIt9A4(_JCVpOW`tl4t4798!XEal5J;qakg#TjJGUz*XIoiW*6SY`&n1wb z(nK283-?$AjCFT>tez9f6>blDa|7;v=K|H07}7kf=cdd-Csw9#G9yb_O)!VGEDNmx z#KaHBzJ#)&cI}?#S|QCJY$KAJRq(uW2;=x@|6r5GZ}}7Pw&ocP_l?0EDtPhYMNU>$ zUi7j1Xe6sclyacIZrUf`zCH<_;9yog2rwp%oi(v2|2o0+*FSz#XU@$D>FaX4oNQC{ zIq3nx0cJYIE_dzc>-E2_=VeAEE!-@LPAjOYi;u>{9qAPAq$S*e;D(DWQAnhaM$1U8 zpIz!tO61l2 z{{LUIIyreKY9lGO4AX?&+8>q`k!>+Gp`3fQ>@n_6AAXtOe=1v-PPMJU+27+*->k0o zS-Y@=C2e~^{HOR@KzadJHf%v@oc>{a5Ti0b3HtbN~PV diff --git a/README_files/figure-gfm/unnamed-chunk-7-3.png b/README_files/figure-gfm/unnamed-chunk-7-3.png deleted file mode 100644 index 9e8e7c5be663d4e3d139be457e49bc556ace6713..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4104 zcmd^Cc{r49`<_y%q-iRY2^p{6UzS9c24gDYlZ4(ZBg-g+EJFr^X;6yEG$cvhu@#~) zvW{KFkSt}%WSg;M8O&hp+syZP|M~v>egA*=aXioc9LIAV&v8BHbzj$co=8;c*5 zJ_rJV#7(ZEZh}C&Gl1vh{kwsCc&Qu<*bewzy@dmT4ma#vyPAD-T|ppll?m#yRd5P- zD8#`!P|&>aeeZ9~Er%EF#D>Qx+(|8Fy4|aT?<;TgX-x22oh&K0v?-N>cbaDI--=D5 zZ{jji+E6$K%BoTEl+kgcBS$pnADxaWc6^OItPy63G< zeXjauB6xb}3MIst(o_AU|3u;fnWftEtE(HggneV9Ez?^aDNW_zgv6sVtc9OI#M)_1 z!#PRM{LvcSmH&Kxe=rDi9Q8>AlyQ2uEC{q0G7kd%A1Oi% zGWNA=*NVeqdg)ZV^HoVxLsxu$X`KU5lqPFa0eqXDg@`X>-)Kuq4227Ss_JS1uk2b{ zx&h2hFARmJqZ$~NJEh{ljeyN%dttOF19=+8`uS(Q#bhd8D=Z5?gc@0b^N4dTq;Qt zBITZ>tvc}gHwFPAjG|_r`qqi9^SjGfKDDiMg8s@{BN|f?A8v@!A4H)3a5bFgkv^&= z6}G5-m4YM`&F(wfM1`7}o29Kx2q#!oop0a1)tRg*!hJvN6F*^Q@1X5|N)JMuMJ+}B z@MVUT)9z%;;F6WbaLEg5u zzhsnm{W=&uwF`>-sJ6-48hKlZ#qzuiwT)4!{k3yzXnCrAxu@mLo5gF}aCEUoYmCgd z7-n?7mb97g_l?#+(+jERd2k=Ul`prN%~4Ppis^(Jg731_yQ~MJ8y5)uBa@=hQSh;4 ziSVOGO)<*@;nr@FONdAukZEH zY!`Mv`k78sWlxR9NpS~D8m2t9ZnIvv5G-alu&eb7&VsstZ2M!YB?sKy+R`wBBy3+% zNO+F{fv{M# zpG1gyx8Hb`>4s}69=~i*7Zwz>0_*Bz&TWHVk*{99EC5q=JhWDH>cvsAze+~sKD#s{ znR)nnbAzy*vl%oQr-%AofOe0SR_|wZVDe_CnSm{jvSBY?r{r?o$zNF_BT`-GNM9e} zSu?$rRPCwm&pICK)4zLM^Y*psRIOfGL#G!If@X0Gb@1(@2<;ZG0a3^t~+ zO_NGL6E|0$UKI+q)58Vp(>sOU1@1{~j@qcM46!=JnVMnJh@z0E0?u>m1qI^1@_XHN zqhD9#=wwo7=S8e*hV}h9**Hz#{wt`JS>a#Mr~3YvP}15Snn07rBw}PSF1wppv<3lj zUukt<=D?S7yK5@qP|XiDR^PD*z0#S}usb7qWe~23WFNdwQIS5V&vw=DVb>upUaZ*q zU1gJ;m>Af64OD*RlSp88YXd?F9EzWZ#EYFZ!K)Yqp0PpI420;x;ntYA^ulyfBcu7A zTEfj2sK(XHZ2si+m(U;X!(822R$pjlvx`s_CZiY7vocf=5SB|Or5F(G2z_+469kSs z$IC{C%gM@Oi)^v6k$BGd^8N^V_#P77>zX>%>P$0%{At0{8WPs zAp~9am~=G??zpKq{4_o~6C4iRC^SSG?cKAdqN?ifiSxq?&2n;Do-d=DRin@C77{%)@);%H^%p~V~ZB(@JwwjMz42WZ+<`e$bTh2o20 zJ=DYwilG`iJB$3Yan_qaPEybZe%n>zBo!0T{-wHyCJG9Dv@j8EkMZk|Rg|@=R z=XW|fI+!%afpVXLB~Ev3ZEcQu>ffo`Y&G?Lk#`s|64m%QSwv{SKMjEh&Y&HakhD^_ zwfe)FQ9d%!Q{!*GJhRgb63P$=_nS@*l`a3RPUkp!Va=0EzLNOiS8hTADS$iZ(;icZ zrN2z%fmf#le&D#nW-tW>Jh#8>{#a9KY3cLl&s~~hW%PqTZoSZlaJq9W(hZ0Q#l+@p z4-7M1z_Pi@Xqu~yY+Fmm(RfiM8E9c!L%XHYDKOo?@4+q9ps)F;*Hr%v6wTG?y+iU# ze*socav@;#XngC$vuY>Q*woa;;Q3)AvScb8=hjzzcVFa4Tk-{9z}LS!`l;|TaM;F| z-oO49dEkJ%QPy$+j+vKbmT7wR+M42=R305*UyHO@2m~pI^vMcr?S=WDQ?KKPuE_O= zuOjfA9wXGvuABaajs;uT@s|606Ju|lI23iS``t2c$R6eF;?ml@s4R1}!ch@KJw5!e zsu(vg0o9?QPnldNS?J?!P@#yfxmdCnJyBIfWlMX>$;OvUIb>0vg25=j>SuZ_Q5tP0 z`+erV-Fln_-+Af|wosr{G74CQMwx=QV&YWqweg2s&!VXnaQ1xm-y zv39!RNWyGH6~BK8sb;T_9A2nXwJ(#5?-4tzs3-|cdbrrD3ae1_>xmP!wWkpZ+kQ)L zI3*b0!Q3K%8BCE*ZPjUi!VF{{Ann%fuUpRnx&!ClL50s106N0r8MOcHEis5m?dyJ; z*=C5Z+Wz36#v%H42ed?^jYC+OTc1x*OwYIDaYhmeT+bl$a?(XTxSCVV=))$kN1~~u z3UNW0R{uQc&Zr#bK}b|*dwaphj~}M_?prFxyQe0Ydex}Q3^fy`;&k0NN@(c3E)H?f2m7CcIdB>8G zL<4x|PevJf71JQMD2G(~G5r~9aTq#2!mIRbpH$DW`1?Y;DwY1=E4_$~c_D$bK+$RtuKkaw%*5nS93P)yq*uFy* z$`9PD*4<0`yxrZIz@%W+5-gH6jPxpLoL@y_otegwk&%XmhJYsc@E#bTQT(wmfMffR zMrfyPsB3^)C9cyq&T;G}U=oTvN=yLF-}ah0&+^q&mk;~0b_d31pxNs~HL4FNno7mv z;epePp5`=Z6`0UrJrE!cpNfeXyMPa)G=tTLDf+c~xkZ}Y+p8v;4*J=6v9kCyOGaQ$ z{e3{vDkDEO!-Fr$R5EFjl6LGXIS)LExI(wp8U;|5{O~RbSGVNNxT%4~PFbjSxYu$o z-d>w@b@83*-&#I2V=vGWFbS0Wyhd5&f%cH~`EG{Z>g*5m+HuG4n`?{p+}Qoc;*-*- zSvWF?r+TJuSB&k3Fq|0lts6j(u$_vYp-xvqP%QHYh`g5mke!bLF~<68kylxq|9v)~II>89S1HMOhB8 zWzvhW((eJ()Ro4hcFK{RGYNQ!0&m@Xyr`CT_oQI+58axvJRoA>vPTr)-)tGz|2vcL wKWf>YzbP%Xngd)^1f@uH#~%O3zh($Qhqlfc46^Sy0u~x%Vq}h@UAg_}-~I=G&Hw-a diff --git a/README_files/figure-gfm/unnamed-chunk-7-4.png b/README_files/figure-gfm/unnamed-chunk-7-4.png deleted file mode 100644 index 237fe72e93e94f0776d1478cbbb6ebed6f807634..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3151 zcmeHJX*Ap077tO>5S>h=rdG8m*Q}*P4W-7mR8_Ltt2Na##PCcpq&lSfNC&PtqLi|_ zV(djov_$eyW7HH$uOam}i^MC@$cwJ~;eEVs-LL(y&pKzHeb)J%z4zI_{nX3jvaHl` zDG&%G>*DNi4FnR!3FifpVBtuWOlT7-pk8j?j>4sgh={1DC>RVD6B9dd;DETexP*j+ zq@?7*g9oLgq@<;#Wn^SzWo01{h@70@~E32re zsH&=}si|pbXlQC`YH4YmJbCiesZ-k8+NV#S*3r>9bLPz1vuAa6b@lZ0^!4@6ojYe> zU|?uyXk=t$Y;0_5YHDU?W^Qh7VPRouX?gzqc`GX`YisL^7cbh_*x1_ILZMJQJ3D)O zdj|&xM@L5|CnslTXBQWjD_5?#y1Kf#xw*T$dw6(wdU|?!d3k$#`}p|WxN*bR*Z0<~ zTQC?54u{{lb0;7m;NHD^K|w(wAt9lmq4)3KkBEqfii$!Y5Yf@madB~piHS%gG9@J? zH8nLYEe(Z2Wn^SLeE9J3l%D=RNAuc)Ya0}80DtgNc4s;;iCsj0!^@wK(Jb#-+O4GoQr zjZIBW@87>~ZfCc{ukX{RPyPM<0|NsiBO^2#ZS>d5(b3Vdv!JoDvGMWoiHV8H$;qjyDLS1#Jw44} zFqll{moHytW@ct*XXiS{=I7^GEY{brUl$e@003BATwGdOT3%jW`8>C>va;ISxw^W# zwzjsuzP_=s!Dh2JH#a#P4wuW_nxSoNZSnbhL6MI@Ah`amzebot2cw+*Vn85B*S?5Q zBj4T=>fXCJ*m)-uuQC>2O$W+9o-uK|q#^xKTS-Lwxg=WB$-&Po;;P>?=;~Fms~-;J zwv^#CWJ94ieC9e_hlW~Nno~X9emt+r>6;=6Q7o_CfC!>SoeN|ZLKjearsQ{ zC@z|Lum`qmzA3&GbO9V^Qj)$Gq`+IycSy5rxIK93cG06~S#Ws0soqrO>+l*_7t~+B zKlAtMkRsjjUxpN18()X(PF41r$uxD3ybCE3?))_W>6yQk1Se58oNs=BdgD-tIFGK+ zrTPKNV1~u8A`?60D#3kp`On*BVl}5K zjfd=L+*RVQeFWAM;vOxT3tTU?zmzVO|Z|sq?qP;K^o-=Xks63w;n z$q>MB9P?!k&DZkaFK@?2lHoekLVHR)-gu~58Ni)|8fJn?8}lLS78tY%waSpvu#8p8 zO8u67lk*m@8Z$dFU!oH5IXf7Il@E(RCN=H$qA}T?9T>~iZ7Ygr1Ue&L1!xjJau&K? zf*D*&@F&M#E|;E@DN#$C8*7UT+yW=IUpK@Y;JyfC8!-}NRIT>nlF1*fHWTd07@62x z;uk^?xKgw|_8q6PCBc-S;ejN;TkDupN((l-Qam!hjXR-p*HMJ%Ol7++j?4aeA~K7n zIG{)lEg#-G97$kR3tBc?la}EK?jI^!<4(thcuTn&aBXD(<0r&(S)&i24)=7!xVE1k=wiezFDmPQb84A zGlTHG?E5lO1d!1Bnw`=$85~&*;{S%)8x(pmv=$e`sWz7GJNueT)UOITYAJ(*{!%ymN{Eqnp!qS?Sm7F+RqJsp~tkAmD%1pvNLJnQZpZLywLHVn)sbjMTDP`1d>Py7T^ zo*$VPqo$g*7j;dwAx4z@GQT6#l-DP(XFv;nD^92o0y~Dog!iO9v(*pSYNl2tXQOY{ z?``n44Ae_gk0a&?JF?V%Dl%1$l+LsuC3D#l18`!D&pYcy8!-HuFvLKma<*bZ%7xU`(g!M*3)YBDZ9JbFa)5$fNh)8YMC+Hn_H1>;ikOatGkg&|Ayw} zpdd*$rh>sA6d@CPD9faLpE!iEG9CEWKAi~v+_0s|KFR2UPdLnd`U{3N2fYM2nBZhh z+uXS~*?S`DnL_zleE(MQ{mJkDZ!7a)FY14~ClsMz?Tc>s=okyk@e_7+AQwju2mGZw G5B>|XA~FpC diff --git a/README_files/figure-gfm/unnamed-chunk-7-5.png b/README_files/figure-gfm/unnamed-chunk-7-5.png deleted file mode 100644 index 4f0bc4ef43a621664e59eef5f8c6d0452751a6c5..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3274 zcmeHJX;2dC8WxFE+$uwjR4TVp$xOv91ar@=n-!(0XIhj@Q4@DTPPVv&=y=PN%q{h} zTUeBcrrmp}1VOEfifC2}qPZ`X+ePQxGxx`xJNMuH(>wEh^L^hu-!tz#^UV9c=_kEi zmBCQ3jEs!3yPMM~85!AP={a8>DBW4|@eJvM=Sk1g&eAIY0FafH1pgwtm8XB6K zntS%_fkL5s_wLow($dkhBhv9Ymn zadGkS@d*hDiHV6xb)S-xlL-U@kw{EQNgR>^70;t+w=4D3knJf3kx4TdQ?(UQdU;>`0?ZN^74v` zipt8$s;a8$>gt-Bn%dghy1Kgh`uc{3hQ`K58jaS})b#AxGdi9A^5shggVEB`!elaA zTU*=O+FreS)!yFT(b4f*8bf_77VFKMH=UiGY&M(2;dHSEy1Ke}JYIKqcTZ1GZ*TAW z_wV_9eqUc-e}DhLz<@v+qtkNjXlQ77c=+SY_{hk}r%#{0eEBjuIyyEsCK8Fn zV)6L+xI`kEn3$NHoSd4Pnx3AXnVFfLot>MTo1dRwSXfwGTwGgQ+t}Ff`Sm10>L-Or zxAW05GAge(7l0M<+hrLUu%5eV`^!umjvSbMl2S`UCH+!JXmxb~{$pjeaTvu; zcx0~1y+{~)7Hn-^Yq>OB4IR0=u6X*xTchF+ZWwe;jyF2!D41|*cPUD1sM4jxihR7) z1>p6>LU*8|G~6htj8t*1U}v~*H{xEyU(miLoV4dvSn50e!Qw;rgPjDYo4iJ^?dI+F zFqeV{D&{P~*o^W$-3Umy?{_H3;_p3ovDA#`Rmo)8f{RyOn!KC^r+?D_6z4xVM@t;t zw&&KmJvc^}7vxehOg_$q@Y=BtbvDg+1`u8vmAK^}P*eKv<691c@C=}puA3e_gQos> zV1?clZj6W<_%tEN3TL;r@Ubq!dbu{*RJb%fGz*EHeeX=kCnRO}=?1SX4>x`(@5CJ& z)c($v%%<1C(&H9}k7Kk4nnSw=7wy1e9vJJ3`m3Di0o?CmW-L|s!H$4`(*Mmkzp#@`&KTj-Ap_Ah<&OKVKv(u z6+ugiNC}Ol6bVB!DaydaT$RI({PCzvX2msJH$&pcLX8mVB$X->V$mj{hN-VY)I?M0 zLN@Gh)AG01&=u_G-f@Df+{7d^v8Dh1QX5M8%P3GA8M9hU8j}iIl*=Eeu#U%r#Y}$f z93QEUj-d6+HBYGqx52;*EZcY{;T)x?Nk1Su^KF$+hp=RoEVEgms$~b>i!R>^fXS@@ z#lf^E_wphJUl@_RyBfa+&=>zkr*0<=*@5sLC|+{r&>56bv0=?-iZ9>PlT(?p&ApR^ zT%zrweyadG!N5HujNbxkzi-$nYSXah#&KHIE7pGPhqE1&aC}#;mN~$YkR*$L7D2R0c~)-WWjmiLNQZ z5wq4GV?dt=LZMw!SZ@MNJt!uH|J5&cNn*IVMyDcYF8&FJ{vO`Yzvie-Wvn`{FA!am=*$`1}|OvY<_>}I$m;_G3q_5X8cD@u(kB7H2lK`PM;UHdJPz>M(+Jr z!WQ0?&3;u)LUdar{|BJNn)d?^GyIW4G-i!wt%G10()F|3{Tv1U4};9@Zdg{e?RiiW kbR3Me?1At?AFsfK;J6+0CiGG15GmvC?Cn&4{FfX51Q)?LVgLXD diff --git a/README_files/figure-gfm/unnamed-chunk-7-6.png b/README_files/figure-gfm/unnamed-chunk-7-6.png deleted file mode 100644 index c9766b073663bd8d98455fb0042c776b355ed6a2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2630 zcmeHJc{CL48lNSZnJi<8v5YKXY*Y3S#@3KsB-zH7BFQ=-WbI3ts4U6Y2Fa2&`w-I< zW7LcxWNC2IElO@egAA9>y?@=mzH|Tmo^yWhd7t;Z&wHNp`#tA*pF2(tSbmr!3;+P| z+gMw=001D;-aa1!-dkyqn6ABpL?=5}t34N>MFIkWAP@))0)xQ^_Kb&z=itGEyu7>+ zUI-Kdg+XC3*r7e+JH*G&$1lJyASfUR7laE53JJl5MTA8}MMMva9u^Z76F)4D5JMou zB_t4%k_bsD2`OnwX`~cVMp{M&dE^LER#rw%?ufj+th|Dp!cn=Sit>tz3Q9^xm6a7y zC?ypYB^6a=RW+2Fx~hhTDjKbJ?3nuT;~JWpXiY7&mew(C?c+MST6%ig`uf@@PUxI4 z&^0j7Gc?pUGSWYJ@`SOmfr*Kssi_eLa}r}_Y;JC1VPR@%iLtW6oH}KO#hPQW7S`65 zHnyki?6CIs)(-YIj*h3DoNS$)?Oa^!&$v3cxjLS8cRA;A=Deqym)BVzpL4#x9yr{2 zzdyYEFL+<{_qlkYD#LKlIm(p>ubvz>dG4H%NrXjo;5vbe)gp0S!HW;Ra;AS zds|IM`_s;jT5@MyS7&`Ux#4+tWAF2(-kxWa-sTsSW-6uSCAF=O`sTyS_Wr&OT7Tz2 zKbcPJ8XV|;P49j)_?+>km&u?EF<%T1QAb#SFxJbr!>>k1`o`Y&jgR(^kJ8?a4NQ#F zC*RShCI+V`U%#Jv!=7faraf5CENTVc}H&=g!3xL(pK7XWc|dYkxn!2htM24b&Ad!kzwd#=3xChWxdi~L@2 zmxgnPm9?IIPwnfq;c0rycNzTW?p3wZaeUQW`QECPKH}g{Y@ueHr*xuQ=H*4^7R*b6 z`iqi|Ckw|YPlk{=qamFkm8LCqVb_4%-2*yZ)(aJ?_(dQt0R>`TmvfqF7e>|Djt3V2 z@Jq8$1X+%GsVv^@8Ar@DI8Xq8(ameR3wiuYgDgn`8W{D!Y1eP~nX>t)EVRAA|PoyZPP&>SS~v#4`X8%?o5$W10y!1$^`P z9)g?GF`<;}i!U@j+uhdR95Xoi&|wxllTpxM^kI?}2CKLEsS6}GiE+QO_Q z`BK_y`BPQ{WbN|Y`#+5cw&)j+sDZ*vJG~Vp(a zEmCNDzfQjz4>4TV(9`OT()k{rFeE5fy_-@FCI#S&xc^rq?SqUO1T~gkUIP;@iBz!W2S^xTD=s)^a%2{5a0s&%gC`+Y}z~%-lOrtdolQH z(%Tt9I&A~#o)#vxHAK=&WHl^4a1&Pw(9TVC;_>N?}$>HF7|4*6UMp!lV@HX-y!no#S|Ly-g3n6twUo*4ji2Sv>Q_ z7wD5&5O6wa`FYq~Fk|9ebPw`#U}J!;v?VDjqQ!WpG9d7-cnfw(e>XEy1?hzj-@`vT~|DMr%KEv#9mF-Tv45J z_ule>3?bk74Ge*%{`kuc)rz#0E7;(--4RC@CqaD5JAa-J4Cd$K6X4?)FFEm8<-jznHd?I^&Ql-^8aa~RLZd`K@uB8|Mv9Gyx;A7ihYunJL_Rnn{ z!|k2Jq}|bu?$OSkv98{Up8m<+fvLWM>Ha~&z|hRV=eePg`Ol-ok@3aRiKVg0DhI{9BF2rL?Ug>E^KUUe4Qh1&J(xh7q=Idc8JU07FWJ6t?upZ z?HARaoSY1a_M%VUC7q{^r4InW)cSh>J3NY<003HET}?I9z^tz`$H>up;EtVr2by*{ zuDI^L^8#PS#$Z)3Q7>41V^h=9sguz}gMA+16lXLV4!TyMdSJLH_usDniJP8r}H|Mc_w6zfo|;4tL~@}WinUD3%zj6R#u zNd;qu2!`y)D`oI+!+%j)j==4W57}^y9=plxr=sfrnWc9~1kK#4N%?Q0OO(~#6jp|^U)ZDyQe74%u{l?_o;+n~?jNg2$mIPo^C5Iskq+38ZZ3QbuaY7T@ zBL#Q+wM@)uk*-i_bOX;Ka*X#t&Y}Fe^fxbuN8KF^mx2Ugu>jj@QPrOvRFKmgX{`F|HPr0{^PuNaG$x>s>UQQ|jSzlW5Ri9e zIoREgDLFnR+1}$|uEU`!88d$Hp~#I$XHvd9#QAgPp#okwTZNL4LnJ*6Wy5NfnZwV$d)Tzo*9WfmTXqIcEB7@O3xc2?(9J+!pu`_dYj9KHSXNlcV! zU$J@8BFFp3Aw*=tlrdCnF7^o)JI~j6ANZ&KaHCo9!9$qce2Ae!Xr z&U)w}dZBSWL{qZXPGie}vXh%Oncdf=t?l#z*&`&h^%{39&6!-`b0yqIGErI<939qh zA5J1jxUa1w{(G((|J&N1wr#&HghS@smrxrXLveAsU7gO{CeeMvLKET_^a#O#D?}h6 zL=Vs;gycjz{*k82e!6uIV2R3KbM(e1bH7KG|3h{}S+pnTb|7MKCLKMU)G|Jt zq;e%YksUZgOUUH~XV`jGoFY&ID;y41w1Qxz8hxoOWG|DijLle~doB)}7rG#*V&FFjmRJ zJP99?8)Ff)DkQFQwGdR(XVL*6c_;Bob@paNj)8{=3(Iw7<4KV8pP5ESYx4`@-gCW% z!BXM*rp|v3R%R!c@4tyvgOMw}*C$pOu#l~;!UVTDdDBTUzr;fxd2+Rxt=A4VA2L#d zB-Mm9uMo<&(sHxqunx0(S7TXWt;3u-%B4Z0xf&q3R6B7Dh2qgyYHZ@t-ftTobl89y z9+cAsdPS9{xBq6&WF6u%4_Rwjl?>68NdMzIU>t|z$FhTuymOS{%2J#ge;4arKzq_s z&E1P9Av={hiEY2GF|`J&iY0v8R6rfUedp%~EyyNB;p_24&*_ diff --git a/README_files/figure-gfm/unnamed-chunk-7-8.png b/README_files/figure-gfm/unnamed-chunk-7-8.png deleted file mode 100644 index 62b0c92a153b0b59bd5844a9cb5ed32f36d94a80..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3093 zcmeHJeK-^B8mHCdJKsh_!tq^{gvQ=XQH~Mvk?)e_D-veR+AEC3Ufz(DmSl%9^|l%* z3uEsgHWl)}Stm`^|pFhs|^K@U&@4kM|ecjJKOP_x1Jl^Yiof z_YVjN2n-B7d-iNlP*8Aia7ai0FI~D6A0MBT zl$4yDoRX4~mX>z)>ecl0^o)#*%*@QJtSl4?m6MZ$Mx%3cb1@hURt77zyu7^Y*RSX2 z=NA+d6c!fZaJZtPqT=FWJRVi%PT4>Dl03is;X|?x>a3WT~kw2 zTU&eo{{6bTx(5#))YsQPeE6`Tp@BpqH8wUjH8qjRTOXzJ2@d-Mf*IkysqQJMO;1mAI2gw9s+Sb;VL?Yow~Tu6;>#F~-vnGFrh{D;8XceD*^ZX4)S>LIR#A`|0L zVLuc9FR#bqTIYANg`b_NB?(5qr~WdL_)S_X(g8vM{zoG6T!$^im(DEszn!yZ19@e- z2$~WVi!=dF*Z`7@42rNB15kb3$r$3az3(4+_p+Evwc}OXta{g%DI3Mu^*d!XnBjJ( z?df6c`c!7FtfS#dNr}U?xja$VA34@BaCD9>FRrZ<3l#?eOznLs zm@kC~J1NiC3CZ8m(Fr1}?I3Oz@?<*=)%EqhN}fE_@MY@k)Q|?q zybOB*_$Qi|Kt`q5bJuuW3kNo@;OKGh|T=>=$sHl9i zAKKUne*E#$vG-Th5q^8e*F{f^3smPWv-z#tf-f9F(UXWA2R7P)-J<3QAv~Zn(m>`T z2y4L$%ja8eP;#FmjYsxK4d3eD)+!k++SF$L-68L;8hlLEpcP9goz++qr2$XH5(9L4 z*Y3)lc7`&G{h87yDnJ+t_QE@F(QP^BT*oyC*SeN*cb^t^#1pF+C18UAr5^{g#gl~z zYhNHLIxH1hW;zFxIu)u3f699%zKZPPfp=|#=qu0=jE6Whb(gaX3#tP;Q* zLGZ8T*bEl5ar7h$;34WzKIEz;^7RYTo0ky9<@A+G1SE8ND}}mzG(gj(%0t4bLuUBo zG>X4V_*21ha*8|~LIt0r6*LNUQ-ioQEhjBc>x%pVpK7sZK2__da=NQq2IEDPtY?`#N#WQSs}SAzk=|kKX#>J13pAVN;LvF z0hRjynvkxEX*nkA^zTC@5{!_`?fNN1Kjrs7b|(d5LVx?)SYq;-xPN2ga&0r?L#TUz Rw9l83@$&G2QI1Fb`Y(^j@~;2@ diff --git a/README_files/figure-gfm/unnamed-chunk-7-9.png b/README_files/figure-gfm/unnamed-chunk-7-9.png deleted file mode 100644 index 96946f0e389d112829fe4a6a01e1ce2b3a435b30..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 2711 zcmeH|c{mhY7r>l4FsW`=5NT;Z=z&d$cc!M<-F2PY>7m~$T&n3J0e z%)<@d&%?EUKQ}Kg4+O%)$G88$0bYK7h=2g(;6Xk?!2?1<{K7)~BEkZqA_v7p1;xdL zpyEPM8cPByd`Ln>@{p*Mq^Pu%*kNgLnZr<78R!vN2|3wAaz`ZP!kYZ;;T@3Pf4i0b$x#dC*x)c_2IXskjhwK({ z+no}2g%W-x@{UIg#q)0Dwb-cZ_wU|_kG=UI&imngpTv0Iqy)d@1X9XF|J1~Qv_}CM z$$^m9GCovqpL+H<;I=k|2u^>jY&?ac3cThRZmV4$n;eRt7dPw`N1 z@t=Jq!vjx8-aj23EFBvv8~?L>;={Aa;pZPmXrIO^rpGI1CSEZ9s+ygwn)_HiH&rwL zsdizy_VY~LBBOqZ(eP!qVR^1`Wxna_0)6!}eQmLMy?uOr=_QlNWI>BU4s~q$T+VmS_ zFvFP0?s3MsVA4}sx4~*l^Tb_OT_TH9bh`@t&=mo4O;H0dX-b>;gr(7Z3G%ST$bBNa zJNoL09R5OP1#c9Ny3wz5MEoDc|C^F^4C`Bi5+l`{0Gr;Cwp?|C3dCX-3$B{LK$Tf9 z4)=lwf`=opvXYr}N)n;LC;lGE0qw#dS2a?em^p(GU(M(&^n6^C zEjd2e7JtWTXZf5~{l^Cw=+ddZ`=cx#ug4L~C6nhyGmj$$2g^=eV|~$~s$5)n1eDVE zgW|#yD5ZrP@b9X6NN9cud6PMrCQ$!rUad_xi9NMSeJ^D=^0?%^t#CM9R=X+U!<1q) z*&JfcvYnq0QOF4yD@rnm_BCE0Amk8l4ciHsI7(Ko*N#51C5Q{gPtIo)Aw}-BWiPlb ztO7+s+boQm!kcCO>PT##R~L(!RKOk7fFZu6{RsCZX{*RdJ`n%>E9~h-5=`iEuhaCm z4lSMo)1V&s%QsAV%uW##(sUj%Q*?dEFU+gh)2Vghlh>(wdk`_~r#~I;wJ?%5q58Wy zh&zB_;BMoJ>VaFZ&5sVx+h(3!8l2S`=Txm5fFB#r@FPuEbYWbtu0aqo*JvECC)0zRNCLA}K;rmMlm1m3;r86L-u@bmSuylJ zRG+Bj#EL%$sjUX;<;dre+`)!&8D!=0s&{oQ(Rf~al?UB z{i8ha)-v(X?Tit-P|lZ6c7dv`wk6)=5_5BtI&}eE1f0P!AijLRJP#}ObPX+eFKq`C zr_iYJnDh`2^f4L{_st`96M_JXJo)N3Kh|%x97U+-;h;gbR3oz2)fm1NtO`fyBRq!jaYVl!r?2kUO0}yl>s2+D|;V?SIQYd)jDZHPo{h5RFKLvq?q? z^TkE&2!A2;ZmEg{sUoCD=Lwt_Rw;5Em=7tsAS8B9q93ncC)}9Fe z;>~ntTv!^;=`Q`zO|83(_wleAWe$F`^9!7tg}k$0PrERcljgV7PpT9b>aDWuq$CRa zq&@E!ax(hQiBdM+eS6f+H>Qe3Vftlz?(Q}!KM}VJ0WeIKpBTWN8vnll`Hd_koE?Pk z3%k=iS} QzdFFw$Q)aG-0}9m05zZWa{vGU From ce6e0427f58de51b9cc6ca0b0a3937c9efc5f5a2 Mon Sep 17 00:00:00 2001 From: Laura Date: Fri, 9 Sep 2022 21:00:48 +0200 Subject: [PATCH 19/24] fill gallery vignette with current palettes --- vignettes/gallery.Rmd | 113 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 112 insertions(+), 1 deletion(-) diff --git a/vignettes/gallery.Rmd b/vignettes/gallery.Rmd index e17b1a5..d255709 100644 --- a/vignettes/gallery.Rmd +++ b/vignettes/gallery.Rmd @@ -10,7 +10,118 @@ vignette: > ```{r, include = FALSE} knitr::opts_chunk$set( collapse = TRUE, - comment = "#>" + comment = "#>", + fig.height = 1.6, + fig.width = 5 ) library(gglgbtq) +options(gglgbtq_font_size = 1.7) ``` + +## The most common flags + +```{r rainbow} +palette_lgbtq("rainbow") +``` + +The flag of LGBT+ community, sometimes incorrectly associated with gay men only. Adopted in 1979 after revisions made to the original design with eight stripes reduced the number of colors to six. The one you'll see most often, since it encompasses everyone in LGBT+ community, no exceptions. + +```{r lesbian} +palette_lgbtq("lesbian") +``` + +```{r gay} +palette_lgbtq("gay") +``` + +```{r bisexual} +palette_lgbtq("bisexual") +``` + +```{r transgender} +palette_lgbtq("transgender") +``` + +A transgender person is somebody whose gender doesn't match AGAB (assigned gender at birth). It encompasses both binary and nonbinary gender identities (in fact, currently all nonbinary people are technically transgender, since most coutries only allow one of the two binary genders to be assigned at birth). + +```{r asexual} +palette_lgbtq("asexual") +``` + +```{r intersex} +palette_lgbtq("intersex") +``` + +```{r nonbinary} +palette_lgbtq("nonbinary") +``` + +A nonbinary person is somebody whose gender is not one of the two binary genders, i.e. woman or man. Usually nonbinary identities fall inside the spectrum between masculinity and feminity, but this need not be true for any enby (nonbinary person). + +## Rainbow variants + +```{r philadelphia} +palette_lgbtq("philadelphia") +``` + +```{r progress} +palette_lgbtq("progress") +``` + +## Sexualities on A-spectrum + +```{r aromantic} +palette_lgbtq("aromantic") +``` + +```{r alloace} +palette_lgbtq("alloace") +``` + +```{r aroallo} +palette_lgbtq("aroallo") +``` + +## Other sexualities + +```{r lesbian_7} +palette_lgbtq("lesbian_7") +``` + +```{r gay_7} +palette_lgbtq("gay_7") +``` + +```{r pansexual} +palette_lgbtq("pansexual") +``` + +## Genders on fem-masc spectrum + +```{r demiboy} +palette_lgbtq("demiboy") +``` + +```{r demigirl} +palette_lgbtq("demigirl") +``` + +## Other genders + +```{r genderfluid} +palette_lgbtq("genderfluid") +``` + +```{r genderqueer} +palette_lgbtq("genderqueer") +``` + +```{r agender} +palette_lgbtq("agender") +``` + +```{r bigender} +palette_lgbtq("bigender") +``` + +## Uncategorized From 93c7a50df9e1885678ec125ac7b880d283cbc3bb Mon Sep 17 00:00:00 2001 From: Laura Date: Sat, 10 Sep 2022 15:42:00 +0200 Subject: [PATCH 20/24] added more descriptions to the vignette --- vignettes/gallery.Rmd | 36 ++++++++++++++++++++++++++++++++---- 1 file changed, 32 insertions(+), 4 deletions(-) diff --git a/vignettes/gallery.Rmd b/vignettes/gallery.Rmd index d255709..6f4bfa1 100644 --- a/vignettes/gallery.Rmd +++ b/vignettes/gallery.Rmd @@ -34,24 +34,32 @@ palette_lgbtq("lesbian") palette_lgbtq("gay") ``` +Sometimes "gay" is a synonym to "homosexual", which would include lesbians, but this palette is based on a flag for MLM, men loving men, which is the other meaning of "gay". The flag itself is inspired by the lesbian flag. + ```{r bisexual} palette_lgbtq("bisexual") ``` +Originally meant "attracted to both gender"; for gender is now known to be a spectrum (or perhaps multiple spectrums), the meaning was updated to say "attracted to *two or more* genders". "Bisexual" isn't synonymical to "attracted to all" anymore, for that there are "omnisexual" and "pansexual" terms. + ```{r transgender} palette_lgbtq("transgender") ``` -A transgender person is somebody whose gender doesn't match AGAB (assigned gender at birth). It encompasses both binary and nonbinary gender identities (in fact, currently all nonbinary people are technically transgender, since most coutries only allow one of the two binary genders to be assigned at birth). +A transgender person is somebody whose gender doesn't match AGAB (assigned gender at birth). It encompasses both binary and nonbinary gender identities (in fact, currently all nonbinary people are technically transgender, since most countries only allow one of the two binary genders to be assigned at birth). The opposite of "transgender" is "cisgender". ```{r asexual} palette_lgbtq("asexual") ``` +"Asexual" means "not experiencing sexual attraction". This does not imply anything about romantic or tertiary attraction, as asexual person may be aromantic or alloromantic (see "alloace"). Asexual people are often nicknamed "aces". The opposite of "asexual" is "allosexual", i.e. any orientation where a person experiences sexual attraction, whether bi-, homo-, hetero- or any other. + ```{r intersex} palette_lgbtq("intersex") ``` +A person whose sex characteristics (phenotype, chromosomes, hormonal profile, etc.) don't align, i.e. not all of them belong to the same binary sex (male or female). These characteristics don't have to be binary, for most sex characteristic are a spectrum. The opposite of "intersex" is "endosex"/"perisex"/"dyadic" (personally I prefer the first term). + ```{r nonbinary} palette_lgbtq("nonbinary") ``` @@ -74,27 +82,39 @@ palette_lgbtq("progress") palette_lgbtq("aromantic") ``` +An aromantic person does not experience romantic attraction towards anyone. + ```{r alloace} palette_lgbtq("alloace") ``` +"Alloace" means "experiencing romantic attraction and not experiencing sexual attraction", not specifying the type of romantic attraction. "Allo" is a shortening of "alloromantic" and "ace" is a nickname for "asexual". + ```{r aroallo} palette_lgbtq("aroallo") ``` +"Aroallo" means "experiencing sexual attraction and not experiencing romantic one", regardless of the type of sexual attraction. "Aro" is a shortening of "aromantic" and "allo" -- of "allosexual". + ## Other sexualities +```{r pansexual} +palette_lgbtq("pansexual") +``` + +A pansexual person may be attracted to any person regardless of target's gender. This sexuality differs from "omnisexual" in that this attraction is not influenced by gender, does not depend on gender. Also, pansexuality's flag is cooler. + ```{r lesbian_7} palette_lgbtq("lesbian_7") ``` +A 7-stripe variant of the lesbian flag. + ```{r gay_7} palette_lgbtq("gay_7") ``` -```{r pansexual} -palette_lgbtq("pansexual") -``` +A 7-stripe variant of the gay flag. ## Genders on fem-masc spectrum @@ -102,10 +122,14 @@ palette_lgbtq("pansexual") palette_lgbtq("demiboy") ``` +A person that is partially a man. The other part of their gender may or may not include other genders. + ```{r demigirl} palette_lgbtq("demigirl") ``` +A person that is partially a woman. The other part of their gender may or may not include other genders. + ## Other genders ```{r genderfluid} @@ -120,8 +144,12 @@ palette_lgbtq("genderqueer") palette_lgbtq("agender") ``` +An agender person is somebody who doesn't feel connection with any gender, who can be described as having no gender. + ```{r bigender} palette_lgbtq("bigender") ``` +"Bigender" means a gender identity composed of two genders a person feels strong connection with. They may exist simultaneously or fluctuate over time. One of the two genders is probably stolen from some agender person. + ## Uncategorized From 492adbb3f326847c9f9834b16247565769d502b4 Mon Sep 17 00:00:00 2001 From: Laura Date: Sun, 11 Sep 2022 15:15:07 +0200 Subject: [PATCH 21/24] add all the other descriptions in the gallery --- vignettes/gallery.Rmd | 26 +++++++++++++++++++++++++- 1 file changed, 25 insertions(+), 1 deletion(-) diff --git a/vignettes/gallery.Rmd b/vignettes/gallery.Rmd index 6f4bfa1..cdcbc8e 100644 --- a/vignettes/gallery.Rmd +++ b/vignettes/gallery.Rmd @@ -20,6 +20,8 @@ options(gglgbtq_font_size = 1.7) ## The most common flags +There are a few flags and related identities within LGBT+ community that are more recognizable than the others. Here are the selected ones that are the most well-known. For other flags, check the other sections. + ```{r rainbow} palette_lgbtq("rainbow") ``` @@ -30,6 +32,8 @@ The flag of LGBT+ community, sometimes incorrectly associated with gay men only. palette_lgbtq("lesbian") ``` +Colors derived from the 2018 design with seven stripes, the third widespread design. "Lesbian" means "homosexual woman" and is one of the most known terms from the LGBT+ community. Me and my girlfriend can never remember which side goes on the top when positioning our pins. + ```{r gay} palette_lgbtq("gay") ``` @@ -40,7 +44,7 @@ Sometimes "gay" is a synonym to "homosexual", which would include lesbians, but palette_lgbtq("bisexual") ``` -Originally meant "attracted to both gender"; for gender is now known to be a spectrum (or perhaps multiple spectrums), the meaning was updated to say "attracted to *two or more* genders". "Bisexual" isn't synonymical to "attracted to all" anymore, for that there are "omnisexual" and "pansexual" terms. +Originally meant "attracted to both gender"; for gender is now known to be a spectrum (or perhaps multiple spectra), the meaning was updated to say "attracted to *two or more* genders". "Bisexual" isn't synonymical to "attracted to all" anymore, for that there are "omnisexual" and "pansexual" terms. ```{r transgender} palette_lgbtq("transgender") @@ -68,16 +72,24 @@ A nonbinary person is somebody whose gender is not one of the two binary genders ## Rainbow variants +Although the six-stripe rainbow flag is the most recognizable, there are other variants, both older and newer. Some try to be more inclusive, others raise an awareness of some issue. Below are the implemented ones: + ```{r philadelphia} palette_lgbtq("philadelphia") ``` +A 2017 redesign of the 6-stripe rainbow flag adopted first by the city of Philadelphia that draws attention to the struggles of people of color within the LGBT+ community. + ```{r progress} palette_lgbtq("progress") ``` +A 2018 flag that adds a chevron to the 6-stripe rainbow flag. The chevron contains both black and brown colors added to Philadelphia rainbow flag, and transgender flag colors (light blue, pink, white). + ## Sexualities on A-spectrum +A lot of orientations in LGBT+ community belong to the A-spectrum, whether sexual, romantic or tertiary. Thus, enough flags were spawned to justify separating these into their own section. + ```{r aromantic} palette_lgbtq("aromantic") ``` @@ -98,6 +110,8 @@ palette_lgbtq("aroallo") ## Other sexualities +Even though the chapter says "sexualities", romantic and tertiary orientations belong there as well. Since these sexualities don't belong to A-spectrum, their umbrella term would be "allosexual" (and, analogously, "alloromantic"). + ```{r pansexual} palette_lgbtq("pansexual") ``` @@ -118,6 +132,8 @@ A 7-stripe variant of the gay flag. ## Genders on fem-masc spectrum +We've come to allow a lot of freedom when describing gender, but most people can describe their gender using terms of "feminity" and "masculinity". These are the identities that fit in this space: + ```{r demiboy} palette_lgbtq("demiboy") ``` @@ -132,14 +148,20 @@ A person that is partially a woman. The other part of their gender may or may no ## Other genders +...and all the other terms related to gender that do not fit in the fem-masc spectrum: + ```{r genderfluid} palette_lgbtq("genderfluid") ``` +A gender identity which fluctuates over time between feeling masculine, feminine, androgynous, and other gender descriptors. Fluctuations may be random or regular. + ```{r genderqueer} palette_lgbtq("genderqueer") ``` +"Genderqueer" is an umbrella for all gender identites that are queer in one way or another. + ```{r agender} palette_lgbtq("agender") ``` @@ -153,3 +175,5 @@ palette_lgbtq("bigender") "Bigender" means a gender identity composed of two genders a person feels strong connection with. They may exist simultaneously or fluctuate over time. One of the two genders is probably stolen from some agender person. ## Uncategorized + +All the terms that do not fit elsewhere. Currently empty. From 8bfc54c40ea48de8484f73cace09370619a54250 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Laura=20B=C4=85ka=C5=82a?= Date: Sun, 11 Sep 2022 15:18:15 +0200 Subject: [PATCH 22/24] Increment version number to 0.1.1 --- DESCRIPTION | 2 +- NEWS.md | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index de4f7b7..74ed411 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: gglgbtq Type: Package Title: Show Pride on 'ggplot2' Plots -Version: 0.1.0.9000 +Version: 0.1.1 Date: 2022-08-06 Authors@R: c(person("Laura", "Bakala", email = "erdaradun.gaztea@gmail.com", diff --git a/NEWS.md b/NEWS.md index 2906eea..5b1a48b 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,4 +1,4 @@ -# gglgbtq (development version) +# gglgbtq 0.1.1 * Implemented the following palettes: `agender`, `alloace`, `aroallo`, `bigender`, `demiboy`, `demigirl`. * Changed `gay_man` to `gay`. From fd295def1fc93aab789605cff5ffec4d252dca6c Mon Sep 17 00:00:00 2001 From: Laura Date: Sun, 11 Sep 2022 15:20:01 +0200 Subject: [PATCH 23/24] update news --- NEWS.md | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/NEWS.md b/NEWS.md index 5b1a48b..8842351 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,7 +1,8 @@ # gglgbtq 0.1.1 * Implemented the following palettes: `agender`, `alloace`, `aroallo`, `bigender`, `demiboy`, `demigirl`. -* Changed `gay_man` to `gay`. +* Changed `gay_man` to `gay` (and, analogously, `gay_7`). +* Moved palettes to the "Gallery" vignette. # gglgbtq 0.1.0 From fb5d5917655139782dd7c31823b14b01811741a2 Mon Sep 17 00:00:00 2001 From: Laura Date: Sun, 11 Sep 2022 15:25:37 +0200 Subject: [PATCH 24/24] fix typos --- vignettes/gallery.Rmd | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/vignettes/gallery.Rmd b/vignettes/gallery.Rmd index cdcbc8e..dfedce7 100644 --- a/vignettes/gallery.Rmd +++ b/vignettes/gallery.Rmd @@ -68,7 +68,7 @@ A person whose sex characteristics (phenotype, chromosomes, hormonal profile, et palette_lgbtq("nonbinary") ``` -A nonbinary person is somebody whose gender is not one of the two binary genders, i.e. woman or man. Usually nonbinary identities fall inside the spectrum between masculinity and feminity, but this need not be true for any enby (nonbinary person). +A nonbinary person is somebody whose gender is not one of the two binary genders, i.e. woman or man. Usually nonbinary identities fall inside the spectrum between masculinity and femininity, but this need not be true for any enby (nonbinary person). ## Rainbow variants @@ -132,7 +132,7 @@ A 7-stripe variant of the gay flag. ## Genders on fem-masc spectrum -We've come to allow a lot of freedom when describing gender, but most people can describe their gender using terms of "feminity" and "masculinity". These are the identities that fit in this space: +We've come to allow a lot of freedom when describing gender, but most people can describe their gender using terms of "femininity" and "masculinity". These are the identities that fit in this space: ```{r demiboy} palette_lgbtq("demiboy")