From bfd3fbbfd5b3c76ccabc5064d4b124b3670ef90c Mon Sep 17 00:00:00 2001 From: yun Date: Wed, 17 Jul 2024 06:11:38 +0800 Subject: [PATCH] Add documents --- .Rbuildignore | 3 + .github/.gitignore | 1 + .github/workflows/R-CMD-check.yaml | 52 ++ README.Rmd | 351 ++++++++ README.html | 954 ++++++++++++++++++++++ README.md | 442 ++++++++++ man/figures/README-htanno_dendro-1.png | Bin 0 -> 10698 bytes man/figures/README-unnamed-chunk-10-1.png | Bin 0 -> 8168 bytes man/figures/README-unnamed-chunk-11-1.png | Bin 0 -> 14026 bytes man/figures/README-unnamed-chunk-12-1.png | Bin 0 -> 16361 bytes man/figures/README-unnamed-chunk-13-1.png | Bin 0 -> 18501 bytes man/figures/README-unnamed-chunk-14-1.png | Bin 0 -> 18518 bytes man/figures/README-unnamed-chunk-15-1.png | Bin 0 -> 21438 bytes man/figures/README-unnamed-chunk-16-1.png | Bin 0 -> 23152 bytes man/figures/README-unnamed-chunk-17-1.png | Bin 0 -> 15218 bytes man/figures/README-unnamed-chunk-18-1.png | Bin 0 -> 7814 bytes man/figures/README-unnamed-chunk-19-1.png | Bin 0 -> 21361 bytes man/figures/README-unnamed-chunk-21-1.png | Bin 0 -> 16027 bytes man/figures/README-unnamed-chunk-3-1.png | Bin 0 -> 7094 bytes man/figures/README-unnamed-chunk-4-1.png | Bin 0 -> 10453 bytes man/figures/README-unnamed-chunk-5-1.png | Bin 0 -> 7186 bytes man/figures/README-unnamed-chunk-6-1.png | Bin 0 -> 7327 bytes man/figures/README-unnamed-chunk-7-1.png | Bin 0 -> 33824 bytes man/figures/README-unnamed-chunk-8-1.png | Bin 0 -> 7100 bytes man/figures/README-unnamed-chunk-9-1.png | Bin 0 -> 7100 bytes 25 files changed, 1803 insertions(+) create mode 100644 .github/.gitignore create mode 100644 .github/workflows/R-CMD-check.yaml create mode 100644 README.Rmd create mode 100644 README.html create mode 100644 README.md create mode 100644 man/figures/README-htanno_dendro-1.png create mode 100644 man/figures/README-unnamed-chunk-10-1.png create mode 100644 man/figures/README-unnamed-chunk-11-1.png create mode 100644 man/figures/README-unnamed-chunk-12-1.png create mode 100644 man/figures/README-unnamed-chunk-13-1.png create mode 100644 man/figures/README-unnamed-chunk-14-1.png create mode 100644 man/figures/README-unnamed-chunk-15-1.png create mode 100644 man/figures/README-unnamed-chunk-16-1.png create mode 100644 man/figures/README-unnamed-chunk-17-1.png create mode 100644 man/figures/README-unnamed-chunk-18-1.png create mode 100644 man/figures/README-unnamed-chunk-19-1.png create mode 100644 man/figures/README-unnamed-chunk-21-1.png create mode 100644 man/figures/README-unnamed-chunk-3-1.png create mode 100644 man/figures/README-unnamed-chunk-4-1.png create mode 100644 man/figures/README-unnamed-chunk-5-1.png create mode 100644 man/figures/README-unnamed-chunk-6-1.png create mode 100644 man/figures/README-unnamed-chunk-7-1.png create mode 100644 man/figures/README-unnamed-chunk-8-1.png create mode 100644 man/figures/README-unnamed-chunk-9-1.png diff --git a/.Rbuildignore b/.Rbuildignore index 07426efc..833f8ee2 100644 --- a/.Rbuildignore +++ b/.Rbuildignore @@ -3,3 +3,6 @@ ^\.radian_history$ ^Scratch\.RConsole$ ^LICENSE\.md$ +^README\.Rmd$ +^README\.html$ +^\.github$ diff --git a/.github/.gitignore b/.github/.gitignore new file mode 100644 index 00000000..2d19fc76 --- /dev/null +++ b/.github/.gitignore @@ -0,0 +1 @@ +*.html diff --git a/.github/workflows/R-CMD-check.yaml b/.github/workflows/R-CMD-check.yaml new file mode 100644 index 00000000..0f2fe080 --- /dev/null +++ b/.github/workflows/R-CMD-check.yaml @@ -0,0 +1,52 @@ +# Workflow derived from https://github.com/r-lib/actions/tree/v2/examples +# Need help debugging build failures? Start at https://github.com/r-lib/actions#where-to-find-help +on: + push: + branches: [main, master] + pull_request: + branches: [main, master] + +name: R-CMD-check + +permissions: read-all + +jobs: + R-CMD-check: + runs-on: ${{ matrix.config.os }} + + name: ${{ matrix.config.os }} (${{ matrix.config.r }}) + + strategy: + fail-fast: false + matrix: + config: + - {os: macos-latest, r: 'release'} + - {os: windows-latest, r: 'release'} + - {os: ubuntu-latest, r: 'devel', http-user-agent: 'release'} + - {os: ubuntu-latest, r: 'release'} + - {os: ubuntu-latest, r: 'oldrel-1'} + + env: + GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }} + R_KEEP_PKG_SOURCE: yes + + steps: + - uses: actions/checkout@v4 + + - uses: r-lib/actions/setup-pandoc@v2 + + - uses: r-lib/actions/setup-r@v2 + with: + r-version: ${{ matrix.config.r }} + http-user-agent: ${{ matrix.config.http-user-agent }} + use-public-rspm: true + + - uses: r-lib/actions/setup-r-dependencies@v2 + with: + extra-packages: any::rcmdcheck + needs: check + + - uses: r-lib/actions/check-r-package@v2 + with: + upload-snapshots: true + build_args: 'c("--no-manual","--compact-vignettes=gs+qpdf")' diff --git a/README.Rmd b/README.Rmd new file mode 100644 index 00000000..cb2df65e --- /dev/null +++ b/README.Rmd @@ -0,0 +1,351 @@ +--- +output: github_document +--- + + + +```{r, include = FALSE} +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + fig.path = "man/figures/README-", + out.width = "100%" +) +``` + +# ggheat + + +[![R-CMD-check](https://github.com/Yunuuuu/ggheat/actions/workflows/R-CMD-check.yaml/badge.svg)](https://github.com/Yunuuuu/ggheat/actions/workflows/R-CMD-check.yaml) + + +This package is a `ggplot2` extension for heatmap. It utilizes the grammar of +graphics to construct the heatmap and heatmap annotations. + +## Installation + +You can install the development version of ggheat from [GitHub](https://github.com/) with: + +```{r, eval=FALSE} +# install.packages("devtools") +devtools::install_github("Yunuuuu/ggheat") +``` + + +```{r setup} +library(ggheat) +library(ggplot2) +``` + +Let's begin by creating some example data + +```{r setup_dat} +set.seed(123) +small_mat <- matrix(rnorm(81), nrow = 9) +``` + +## `ggheat` +The main function is `ggheat`, it's just like the ggplot function, which set the +default data and mapping. Using `ggheat`, it is effortless to create a simple +Heatmap. + +```{r} +ggheat(small_mat) +``` + +The data can be a numeric or character vector, a data frame, and any other data +which can be converted into a matrix. Simple vector will be converted into a one +column matrix. They will all converted into the long formated data frame when +drawing. The default mapping will use `aes(.data$.x, .data$.y)`, you can use +`mapping` argument to control it. The data contains following columns: + + - `.row_panel` or `.column_panl` instead of a column `.panel` since + annotation can only have one facet axiss: the row panel + + - `.column_panel`: the column panel + + - `.row_names` and `.column_names`: the row and column names of the original + matrix (only applicable when names exist). + + - `.row_index` and `.column_index`: the row and column index of the original + matrix. + + - `.x` and `.y`: the `x` and `y` coordinates + + - `value`: the actual matrix value. + +You can then add all other ggplot2 elements like `geoms`, `scales` and `facets`. + +```{r} +ggheat(letters) +``` + +```{r} +ggheat(1:10) +``` + +```{r} +ggheat(small_mat) + scale_fill_viridis_c() +``` + +You can turn off the default filling by setting `filling = FALSE` +```{r} +ggheat(small_mat, filling = FALSE) + + scale_fill_viridis_c() + + geom_text(aes(label = sprintf("%d * %d", .row_index, .column_index))) +``` + +The position scales and facets are partial support. + +For position scales, you cannot set `limits`, `breaks`, `labels`, and they are +just ignored. `limits` cannot be touched, and the internal will always reset it +as the default. This is required by heatmap annotations. But you can set +`labels` or `breaks` in `ggheat()` function. See `xlabels/ylabels` and +`xlabels_nudge/ylabels_nudge`. All of these arguments should be provided in the +original order of the raw matrix. Even if we'll use heatmap annotation to +reorder the heatmap rows/columns. +```{r} +ggheat(small_mat) + scale_x_continuous(limits = c(0, 0)) +``` + +```{r} +ggheat(small_mat) + scale_x_continuous(labels = "a") +``` + +```{r} +ggheat(small_mat, xlabels = rep_len("AA", ncol(small_mat))) +``` + +When working with facets, manual configuration of panels using the `facet_*` +function is not possible. However, the `facet_*` function can still be used to +control the `facet` looks. + +To move forward with the subsequent procedures, it is necessary to introduce the +heatmap annotation first. Heatmap annotations are essential components that +contribute to the usability of a heatmap. + + +## `htanno` + +`ggheat` offers two primary annotations: `htanno` and `gganno`. + +`htanno` is a special annotation that can interact with the main heatmap. It +particularly allows for controlling the order of the main heatmap or dividing +the heatmap into sections based on rows/columns. + +Heatmap annotations can be positioned at the `top`, `left`, `bottom`, or `right` +of the heatmap. This is referred to as the active component in `ggheat`. Each +annotation function provides a position argument to control the placement of the +annotation. + +Currently, there are only two classes available for `htanno`: `htanno_dendro` +and `htanno_group`. The `htanno_dendro` class allows the addition of a +dendrogram near the heatmap. This is primarily useful when working with heatmap +plots. The primary purpose of a dendrogram is to facilitate clustering and +it can also reorder the heatmap. + +```{r htanno_dendro} +ggheat(small_mat) + htanno_dendro(position = "top") +``` + +One another useful function of dendrogram is cut the columns/rows into groups. +You can specify `k` or `h`, which works the same with `cutree`. + +```{r} +ggheat(small_mat) + htanno_dendro(position = "top", k = 3) +``` + +`htanno_dendro` will create a default `node` and `edge` data for the ggplot. See +`?dendrogram_data` for details. `node` data have been set as the default data of +the ggplot object, and `edge` data has been added into the `geom_segment` layer +which drawing the dendrogram tree, so you cannot control the dendrogram by geom +function, but you can control all of the behaviour in `htanno_dendro`. The +default mapping can be controled via `mapping` argument, which is the same with +`ggheat` and all other annotation function. One useful variable in the data is +`branch` column, which corresponding to the `cutree` result. + +```{r} +ggheat(small_mat) + htanno_dendro(aes(color = branch), position = "top", k = 3) +``` + +All annotation functions include a `set_context` argument that determines +whether to set the active component when adding the annotation. This argument +requires a boolean value of length `2`. If a scalar value is provided, it will +be recycled. The first value determines whether the active component is set to +the annotation position. The second value will determine whether the active +component of annotation list in this position should be set as current +annotation. In the code mentioned above, the active component of the heatmap is +set to the `top` and the active component of the top annotation list will be set +to the dendrogram plot since `htanno_dendro` has a default `set_context` value +of `TRUE`. So you can easily add more `geoms` with the default `node` data. + +```{r} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + geom_point(aes(y = y)) +``` + +By default, all annotation functions automatically create a default mapping for +the axis parallel to the heatmap. Therefore, when utilizing these functions, you +only need to provide the mapping for the other axis. + +As mentioned above, `facet_*` function won't work, since the internal will +always use the row/column groups controlled by heatmap annotation, but you can +also provide `facet_grid` or `facet_null` (if no panels) to control the +non-layout arguments, like `labeller`. + +```{r} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + geom_point(aes(y = y)) + + facet_grid(labeller = labeller(.panel = function(x) letters[as.integer(x)])) +``` + +Each annotation function includes a `data` argument to specify the annotation +data. This argument can accept a matrix, a data frame, or even a simple vector +that will be converted into a one-column matrix. If the `data` argument is set to +`NULL`, the function will use the heatmap matrix, as shown in the previous +examples. Additionally, the data argument can also accept a function(purrr-like +lambda is also okay), to manipulate the heatmap matrix. It is important to note +that all annotations consider the rows as the observations. It means the `NROW` +function must return the same number as the heatmap parallel axis. So for column +annotation, the heatmap will be transposed before using (If `data` is a +function, it will be applied with the transposed matrix). + +Since `htanno_dendro` has set the active context for the `top` position, we can +add more annotations without specifying the position arguments. + +```{r} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + # since the heatmap matrix will be transposed before using, we should to + # rowSums to calculate the column sums of the original matrix + gganno(data = rowSums) + + # again: the default mapping will be made for the parallel axis of heatmap + geom_bar(aes(y = value, fill = .panel), stat = "identity") + + scale_fill_brewer(palette = "Dark2") +``` + +## `gganno` + +`gganno` is similar to `ggheat` and `ggplot` in that it initializes a `ggplot` +data and `mapping`. Before drawing, specific operations are performed to prepare +for the visualization. The matrix (including a simple vector) is converted into +a long-format data frame, similar to the process utilized in ggheat. However, +the data frame does not contain .row_panel or .column_panel columns, as +annotations can only have one facet axis. In the case where the input data is +already a data frame, three additional columns-`.row_names`, `.row_index`, and +`.panel`—are added to the data frame. + +Let's add more annotations to different position. Since we want to add +annotation into another position, we must specify the `position` argument or we +can add an `active` object (we also provide `activate` and `deactivate` +for function call foramt). + +```{r} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + gganno(data = rowSums) + + geom_bar(aes(y = value, fill = .panel), stat = "identity") + + scale_fill_brewer(palette = "Dark2") + + active("left") + + gganno(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + +For convenient, we also provide `gganno_*` function for 4 positions. +```{r} +ggheat(small_mat) + + gganno_top(aes(y = value), data = rowSums) + + geom_bar(stat = "identity", aes(fill = factor(.panel))) + + scale_fill_brewer(name = NULL, palette = "Dark2") + + gganno_left(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + +## `htanno_group` +Another `htanno_group` class provides convenient way to split heatmap +`rows/columns` into different panels with a group vairables. It won't draw +anything. + +```{r} +ggheat(small_mat) + + htanno_group( + sample(letters[1:3], nrow(small_mat), replace = TRUE), + position = "left" + ) +``` + +You can combine `htanno_dendro` and `htanno_group` in different axis. +```{r} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + htanno_group( + sample(letters[1:3], nrow(small_mat), replace = TRUE), + position = "left" + ) + + gganno_left(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + +But you cannot mix them in the same axis. +```{r error=TRUE} +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + htanno_group(sample(letters[1:3], ncol(small_mat), replace = TRUE)) +``` + +I'll add support of sub-clustering for `htanno_dendro`. + +## Control size +The different ggplot objects were combined using the `patchwork` package. +Internally, the `ggheat_build` function was used to construct and merge all the +`ggplot` objects into a single `patchwork` object. + +`ggheat` has `width` and `height` to control the relative (you can also provide +a unit object) width and height. All annotation function have a `size` argument +to control the relative width (left and right annotation) or height (top and +bottom annotation). + +```{r} +pp <- ggheat(small_mat) + + scale_fill_viridis_c() + + gganno_top(data = rowSums, size = unit(10, "mm")) + + geom_bar(aes(y = value, fill = .x), stat = "identity") + + gganno_left(aes(x = value), data = rowSums, size = 0.5) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +pp +``` + +Internally, the `ggheat_build` function was used to construct and merge all the +`ggplot` objects into a single `patchwork` object. But usually there is no need +to manually perform this combination since much of the arguments can be +controlled within the `ggheat` function and the annotation functions. +```{r} +class(ggheat_build(pp)) +``` + +## Session information +```{r} +sessionInfo() +``` diff --git a/README.html b/README.html new file mode 100644 index 00000000..43b403bc --- /dev/null +++ b/README.html @@ -0,0 +1,954 @@ + + + + + + + + + + + + + + + + + + + + + +

ggheat

+ + +

R-CMD-check

+ + +

This package is a ggplot2 extension for heatmap. It +utilizes the grammar of graphics to construct the heatmap and heatmap +annotations.

+

Installation

+

You can install the development version of ggheat from GitHub with:

+
# install.packages("devtools")
+devtools::install_github("Yunuuuu/ggheat")
+
library(ggheat)
+#> Loading required package: ggplot2
+
library(ggplot2)
+

Let’s begin by creating some example data

+
set.seed(123)
+small_mat <- matrix(rnorm(81), nrow = 9)
+

ggheat

+

The main function is ggheat, it’s just like the ggplot +function, which set the default data and mapping. Using +ggheat, it is effortless to create a simple Heatmap.

+
ggheat(small_mat)
+ + +

The data can be a numeric or character vector, a data frame, and any +other data which can be converted into a matrix. Simple vector will be +converted into a one column matrix. They will all converted into the +long formated data frame when drawing. The default mapping will use +aes(.data$.x, .data$.y), you can use mapping +argument to control it. The data contains following columns:

+ +

You can then add all other ggplot2 elements like geoms, +scales and facets.

+
ggheat(letters)
+ + +
ggheat(1:10)
+ + +
ggheat(small_mat) + scale_fill_viridis_c()
+ + +

You can turn off the default filling by setting +filling = FALSE

+
ggheat(small_mat, filling = FALSE) +
+  scale_fill_viridis_c() +
+  geom_text(aes(label = sprintf("%d * %d", .row_index, .column_index)))
+ + +

The position scales and facets are partial support.

+

For position scales, you cannot set limits, +breaks, labels, and they are just ignored. +limits cannot be touched, and the internal will always +reset it as the default. This is required by heatmap annotations. But +you can set labels or breaks in +ggheat() function. See xlabels/ylabels and +xlabels_nudge/ylabels_nudge. All of these arguments should +be provided in the original order of the raw matrix. Even if we’ll use +heatmap annotation to reorder the heatmap rows/columns.

+
ggheat(small_mat) + scale_x_continuous(limits = c(0, 0))
+#> Scale for x is already present.
+#> Adding another scale for x, which will replace the existing scale.
+ + +
ggheat(small_mat) + scale_x_continuous(labels = "a")
+#> Scale for x is already present.
+#> Adding another scale for x, which will replace the existing scale.
+ + +
ggheat(small_mat, xlabels = rep_len("AA", ncol(small_mat)))
+ + +

When working with facets, manual configuration of panels using the +facet_* function is not possible. However, the +facet_* function can still be used to control the +facet looks.

+

To move forward with the subsequent procedures, it is necessary to +introduce the heatmap annotation first. Heatmap annotations are +essential components that contribute to the usability of a heatmap.

+

htanno

+

ggheat offers two primary annotations: +htanno and gganno.

+

htanno is a special annotation that can interact with +the main heatmap. It particularly allows for controlling the order of +the main heatmap or dividing the heatmap into sections based on +rows/columns.

+

Heatmap annotations can be positioned at the top, +left, bottom, or right of the +heatmap. This is referred to as the active component in +ggheat. Each annotation function provides a position +argument to control the placement of the annotation.

+

Currently, there are only two classes available for +htanno: htanno_dendro and +htanno_group. The htanno_dendro class allows +the addition of a dendrogram near the heatmap. This is primarily useful +when working with heatmap plots. The primary purpose of a dendrogram is +to facilitate clustering and it can also reorder the heatmap.

+
ggheat(small_mat) + htanno_dendro(position = "top")
+ + +

One another useful function of dendrogram is cut the columns/rows +into groups. You can specify k or h, which +works the same with cutree.

+
ggheat(small_mat) + htanno_dendro(position = "top", k = 3)
+ + +

htanno_dendro will create a default node +and edge data for the ggplot. See +?dendrogram_data for details. node data have +been set as the default data of the ggplot object, and edge +data has been added into the geom_segment layer which +drawing the dendrogram tree, so you cannot control the dendrogram by +geom function, but you can control all of the behaviour in +htanno_dendro. The default mapping can be controled via +mapping argument, which is the same with +ggheat and all other annotation function. One useful +variable in the data is branch column, which corresponding +to the cutree result.

+
ggheat(small_mat) + htanno_dendro(aes(color = branch), position = "top", k = 3)
+ + +

All annotation functions include a set_context argument +that determines whether to set the active component when adding the +annotation. This argument requires a boolean value of length +2. If a scalar value is provided, it will be recycled. The +first value determines whether the active component is set to the +annotation position. The second value will determine whether the active +component of annotation list in this position should be set as current +annotation. In the code mentioned above, the active component of the +heatmap is set to the top and the active component of the +top annotation list will be set to the dendrogram plot since +htanno_dendro has a default set_context value +of TRUE. So you can easily add more geoms with +the default node data.

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  geom_point(aes(y = y))
+ + +

By default, all annotation functions automatically create a default +mapping for the axis parallel to the heatmap. Therefore, when utilizing +these functions, you only need to provide the mapping for the other +axis.

+

As mentioned above, facet_* function won’t work, since +the internal will always use the row/column groups controlled by heatmap +annotation, but you can also provide facet_grid or +facet_null (if no panels) to control the non-layout +arguments, like labeller.

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  geom_point(aes(y = y)) +
+  facet_grid(labeller = labeller(.panel = function(x) letters[as.integer(x)]))
+ + +

Each annotation function includes a data argument to +specify the annotation data. This argument can accept a matrix, a data +frame, or even a simple vector that will be converted into a one-column +matrix. If the data argument is set to NULL, +the function will use the heatmap matrix, as shown in the previous +examples. Additionally, the data argument can also accept a +function(purrr-like lambda is also okay), to manipulate the heatmap +matrix. It is important to note that all annotations consider the rows +as the observations. It means the NROW function must return +the same number as the heatmap parallel axis. So for column annotation, +the heatmap will be transposed before using (If data is a +function, it will be applied with the transposed matrix).

+

Since htanno_dendro has set the active context for the +top position, we can add more annotations without +specifying the position arguments.

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  # since the heatmap matrix will be transposed before using, we should to
+  # rowSums to calculate the column sums of the original matrix
+  gganno(data = rowSums) +
+  # again: the default mapping will be made for the parallel axis of heatmap
+  geom_bar(aes(y = value, fill = .panel), stat = "identity") +
+  scale_fill_brewer(palette = "Dark2")
+ + +

gganno

+

gganno is similar to ggheat and +ggplot in that it initializes a ggplot data +and mapping. Before drawing, specific operations are +performed to prepare for the visualization. The matrix (including a +simple vector) is converted into a long-format data frame, similar to +the process utilized in ggheat. However, the data frame does not contain +.row_panel or .column_panel columns, as annotations can only have one +facet axis. In the case where the input data is already a data frame, +three additional columns-.row_names, +.row_index, and .panel—are added to the data +frame.

+

Let’s add more annotations to different position. Since we want to +add annotation into another position, we must specify the +position argument or we can add an active +object (we also provide activate and +deactivate for function call foramt).

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  gganno(data = rowSums) +
+  geom_bar(aes(y = value, fill = .panel), stat = "identity") +
+  scale_fill_brewer(palette = "Dark2") +
+  active("left") +
+  gganno(aes(x = value), data = rowSums) +
+  geom_bar(
+    aes(y = .y, fill = factor(.y)),
+    stat = "identity",
+    orientation = "y"
+  ) +
+  scale_x_reverse()
+ + +

For convenient, we also provide gganno_* function for 4 +positions.

+
ggheat(small_mat) +
+  gganno_top(aes(y = value), data = rowSums) +
+  geom_bar(stat = "identity", aes(fill = factor(.panel))) +
+  scale_fill_brewer(name = NULL, palette = "Dark2") +
+  gganno_left(aes(x = value), data = rowSums) +
+  geom_bar(
+    aes(y = .y, fill = factor(.y)),
+    stat = "identity",
+    orientation = "y"
+  ) +
+  scale_x_reverse()
+ + +

htanno_group

+

Another htanno_group class provides convenient way to +split heatmap rows/columns into different panels with a +group vairables. It won’t draw anything.

+
ggheat(small_mat) +
+  htanno_group(
+    sample(letters[1:3], nrow(small_mat), replace = TRUE),
+    position = "left"
+  )
+ + +

You can combine htanno_dendro and +htanno_group in different axis.

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  htanno_group(
+    sample(letters[1:3], nrow(small_mat), replace = TRUE),
+    position = "left"
+  ) +
+  gganno_left(aes(x = value), data = rowSums) +
+  geom_bar(
+    aes(y = .y, fill = factor(.y)),
+    stat = "identity",
+    orientation = "y"
+  ) +
+  scale_x_reverse()
+ + +

But you cannot mix them in the same axis.

+
ggheat(small_mat) +
+  htanno_dendro(aes(color = branch), position = "top", k = 3) +
+  htanno_group(sample(letters[1:3], ncol(small_mat), replace = TRUE))
+#> Error in `htanno_group()`:
+#> ! `htanno_group()` cannot do sub-split
+#> ℹ group of heatmap column already exists
+

I’ll add support of sub-clustering for +htanno_dendro.

+

Control size

+

The different ggplot objects were combined using the +patchwork package. Internally, the +ggheat_build function was used to construct and merge all +the ggplot objects into a single patchwork +object.

+

ggheat has width and height to +control the relative (you can also provide a unit object) width and +height. All annotation function have a size argument to +control the relative width (left and right annotation) or height (top +and bottom annotation).

+
pp <- ggheat(small_mat) +
+  scale_fill_viridis_c() +
+  gganno_top(data = rowSums, size = unit(10, "mm")) +
+  geom_bar(aes(y = value, fill = .x), stat = "identity") +
+  gganno_left(aes(x = value), data = rowSums, size = 0.5) +
+  geom_bar(
+    aes(y = .y, fill = factor(.y)),
+    stat = "identity",
+    orientation = "y"
+  ) +
+  scale_x_reverse()
+pp
+ + +

Internally, the ggheat_build function was used to +construct and merge all the ggplot objects into a single +patchwork object. But usually there is no need to manually +perform this combination since much of the arguments can be controlled +within the ggheat function and the annotation +functions.

+
class(ggheat_build(pp))
+#> [1] "patchwork" "gg"        "ggplot"
+

Session information

+
sessionInfo()
+#> R version 4.4.0 (2024-04-24)
+#> Platform: x86_64-pc-linux-gnu
+#> Running under: Ubuntu 24.04 LTS
+#> 
+#> Matrix products: default
+#> BLAS/LAPACK: /usr/lib/x86_64-linux-gnu/libmkl_rt.so;  LAPACK version 3.8.0
+#> 
+#> locale:
+#>  [1] LC_CTYPE=C.UTF-8       LC_NUMERIC=C           LC_TIME=C.UTF-8       
+#>  [4] LC_COLLATE=C.UTF-8     LC_MONETARY=C.UTF-8    LC_MESSAGES=C.UTF-8   
+#>  [7] LC_PAPER=C.UTF-8       LC_NAME=C              LC_ADDRESS=C          
+#> [10] LC_TELEPHONE=C         LC_MEASUREMENT=C.UTF-8 LC_IDENTIFICATION=C   
+#> 
+#> time zone: Asia/Shanghai
+#> tzcode source: system (glibc)
+#> 
+#> attached base packages:
+#> [1] stats     graphics  grDevices utils     datasets  methods   base     
+#> 
+#> other attached packages:
+#> [1] ggheat_0.0.0.9000 ggplot2_3.5.1    
+#> 
+#> loaded via a namespace (and not attached):
+#>  [1] gtable_0.3.5       dplyr_1.1.4        compiler_4.4.0     highr_0.11        
+#>  [5] tidyselect_1.2.1   tidyr_1.3.1        scales_1.3.0       yaml_2.3.8        
+#>  [9] fastmap_1.2.0      ggh4x_0.2.8        R6_2.5.1           labeling_0.4.3    
+#> [13] generics_0.1.3     patchwork_1.2.0    knitr_1.47         tibble_3.2.1      
+#> [17] munsell_0.5.1      pillar_1.9.0       RColorBrewer_1.1-3 rlang_1.1.4       
+#> [21] utf8_1.2.4         xfun_0.45          viridisLite_0.4.2  cli_3.6.3         
+#> [25] withr_3.0.0        magrittr_2.0.3     digest_0.6.36      grid_4.4.0        
+#> [29] lifecycle_1.0.4    vctrs_0.6.5        evaluate_0.24.0    glue_1.7.0        
+#> [33] farver_2.1.2       fansi_1.0.6        colorspace_2.1-0   rmarkdown_2.27    
+#> [37] purrr_1.0.2        tools_4.4.0        pkgconfig_2.0.3    htmltools_0.5.8.1
+ + + diff --git a/README.md b/README.md new file mode 100644 index 00000000..c194add7 --- /dev/null +++ b/README.md @@ -0,0 +1,442 @@ + + + +# ggheat + + + +[![R-CMD-check](https://github.com/Yunuuuu/ggheat/actions/workflows/R-CMD-check.yaml/badge.svg)](https://github.com/Yunuuuu/ggheat/actions/workflows/R-CMD-check.yaml) + + +This package is a `ggplot2` extension for heatmap. It utilizes the +grammar of graphics to construct the heatmap and heatmap annotations. + +## Installation + +You can install the development version of ggheat from +[GitHub](https://github.com/) with: + +``` r +# install.packages("devtools") +devtools::install_github("Yunuuuu/ggheat") +``` + +``` r +library(ggheat) +#> Loading required package: ggplot2 +``` + +``` r +library(ggplot2) +``` + +Let’s begin by creating some example data + +``` r +set.seed(123) +small_mat <- matrix(rnorm(81), nrow = 9) +``` + +## `ggheat` + +The main function is `ggheat`, it’s just like the ggplot function, which +set the default data and mapping. Using `ggheat`, it is effortless to +create a simple Heatmap. + +``` r +ggheat(small_mat) +``` + + + +The data can be a numeric or character vector, a data frame, and any +other data which can be converted into a matrix. Simple vector will be +converted into a one column matrix. They will all converted into the +long formated data frame when drawing. The default mapping will use +`aes(.data$.x, .data$.y)`, you can use `mapping` argument to control it. +The data contains following columns: + +- `.row_panel` or `.column_panl` instead of a column `.panel` since + annotation can only have one facet axiss: the row panel + +- `.column_panel`: the column panel + +- `.row_names` and `.column_names`: the row and column names of the + original matrix (only applicable when names exist). + +- `.row_index` and `.column_index`: the row and column index of the + original matrix. + +- `.x` and `.y`: the `x` and `y` coordinates + +- `value`: the actual matrix value. + +You can then add all other ggplot2 elements like `geoms`, `scales` and +`facets`. + +``` r +ggheat(letters) +``` + + + +``` r +ggheat(1:10) +``` + + + +``` r +ggheat(small_mat) + scale_fill_viridis_c() +``` + + + +You can turn off the default filling by setting `filling = FALSE` + +``` r +ggheat(small_mat, filling = FALSE) + + scale_fill_viridis_c() + + geom_text(aes(label = sprintf("%d * %d", .row_index, .column_index))) +``` + + + +The position scales and facets are partial support. + +For position scales, you cannot set `limits`, `breaks`, `labels`, and +they are just ignored. `limits` cannot be touched, and the internal will +always reset it as the default. This is required by heatmap annotations. +But you can set `labels` or `breaks` in `ggheat()` function. See +`xlabels/ylabels` and `xlabels_nudge/ylabels_nudge`. All of these +arguments should be provided in the original order of the raw matrix. +Even if we’ll use heatmap annotation to reorder the heatmap +rows/columns. + +``` r +ggheat(small_mat) + scale_x_continuous(limits = c(0, 0)) +#> Scale for x is already present. +#> Adding another scale for x, which will replace the existing scale. +``` + + + +``` r +ggheat(small_mat) + scale_x_continuous(labels = "a") +#> Scale for x is already present. +#> Adding another scale for x, which will replace the existing scale. +``` + + + +``` r +ggheat(small_mat, xlabels = rep_len("AA", ncol(small_mat))) +``` + + + +When working with facets, manual configuration of panels using the +`facet_*` function is not possible. However, the `facet_*` function can +still be used to control the `facet` looks. + +To move forward with the subsequent procedures, it is necessary to +introduce the heatmap annotation first. Heatmap annotations are +essential components that contribute to the usability of a heatmap. + +## `htanno` + +`ggheat` offers two primary annotations: `htanno` and `gganno`. + +`htanno` is a special annotation that can interact with the main +heatmap. It particularly allows for controlling the order of the main +heatmap or dividing the heatmap into sections based on rows/columns. + +Heatmap annotations can be positioned at the `top`, `left`, `bottom`, or +`right` of the heatmap. This is referred to as the active component in +`ggheat`. Each annotation function provides a position argument to +control the placement of the annotation. + +Currently, there are only two classes available for `htanno`: +`htanno_dendro` and `htanno_group`. The `htanno_dendro` class allows the +addition of a dendrogram near the heatmap. This is primarily useful when +working with heatmap plots. The primary purpose of a dendrogram is to +facilitate clustering and it can also reorder the heatmap. + +``` r +ggheat(small_mat) + htanno_dendro(position = "top") +``` + + + +One another useful function of dendrogram is cut the columns/rows into +groups. You can specify `k` or `h`, which works the same with `cutree`. + +``` r +ggheat(small_mat) + htanno_dendro(position = "top", k = 3) +``` + + + +`htanno_dendro` will create a default `node` and `edge` data for the +ggplot. See `?dendrogram_data` for details. `node` data have been set as +the default data of the ggplot object, and `edge` data has been added +into the `geom_segment` layer which drawing the dendrogram tree, so you +cannot control the dendrogram by geom function, but you can control all +of the behaviour in `htanno_dendro`. The default mapping can be +controled via `mapping` argument, which is the same with `ggheat` and +all other annotation function. One useful variable in the data is +`branch` column, which corresponding to the `cutree` result. + +``` r +ggheat(small_mat) + htanno_dendro(aes(color = branch), position = "top", k = 3) +``` + + + +All annotation functions include a `set_context` argument that +determines whether to set the active component when adding the +annotation. This argument requires a boolean value of length `2`. If a +scalar value is provided, it will be recycled. The first value +determines whether the active component is set to the annotation +position. The second value will determine whether the active component +of annotation list in this position should be set as current annotation. +In the code mentioned above, the active component of the heatmap is set +to the `top` and the active component of the top annotation list will be +set to the dendrogram plot since `htanno_dendro` has a default +`set_context` value of `TRUE`. So you can easily add more `geoms` with +the default `node` data. + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + geom_point(aes(y = y)) +``` + + + +By default, all annotation functions automatically create a default +mapping for the axis parallel to the heatmap. Therefore, when utilizing +these functions, you only need to provide the mapping for the other +axis. + +As mentioned above, `facet_*` function won’t work, since the internal +will always use the row/column groups controlled by heatmap annotation, +but you can also provide `facet_grid` or `facet_null` (if no panels) to +control the non-layout arguments, like `labeller`. + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + geom_point(aes(y = y)) + + facet_grid(labeller = labeller(.panel = function(x) letters[as.integer(x)])) +``` + + + +Each annotation function includes a `data` argument to specify the +annotation data. This argument can accept a matrix, a data frame, or +even a simple vector that will be converted into a one-column matrix. If +the `data` argument is set to `NULL`, the function will use the heatmap +matrix, as shown in the previous examples. Additionally, the data +argument can also accept a function(purrr-like lambda is also okay), to +manipulate the heatmap matrix. It is important to note that all +annotations consider the rows as the observations. It means the `NROW` +function must return the same number as the heatmap parallel axis. So +for column annotation, the heatmap will be transposed before using (If +`data` is a function, it will be applied with the transposed matrix). + +Since `htanno_dendro` has set the active context for the `top` position, +we can add more annotations without specifying the position arguments. + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + # since the heatmap matrix will be transposed before using, we should to + # rowSums to calculate the column sums of the original matrix + gganno(data = rowSums) + + # again: the default mapping will be made for the parallel axis of heatmap + geom_bar(aes(y = value, fill = .panel), stat = "identity") + + scale_fill_brewer(palette = "Dark2") +``` + + + +## `gganno` + +`gganno` is similar to `ggheat` and `ggplot` in that it initializes a +`ggplot` data and `mapping`. Before drawing, specific operations are +performed to prepare for the visualization. The matrix (including a +simple vector) is converted into a long-format data frame, similar to +the process utilized in ggheat. However, the data frame does not contain +.row_panel or .column_panel columns, as annotations can only have one +facet axis. In the case where the input data is already a data frame, +three additional columns-`.row_names`, `.row_index`, and `.panel`—are +added to the data frame. + +Let’s add more annotations to different position. Since we want to add +annotation into another position, we must specify the `position` +argument or we can add an `active` object (we also provide `activate` +and `deactivate` for function call foramt). + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + gganno(data = rowSums) + + geom_bar(aes(y = value, fill = .panel), stat = "identity") + + scale_fill_brewer(palette = "Dark2") + + active("left") + + gganno(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + + + +For convenient, we also provide `gganno_*` function for 4 positions. + +``` r +ggheat(small_mat) + + gganno_top(aes(y = value), data = rowSums) + + geom_bar(stat = "identity", aes(fill = factor(.panel))) + + scale_fill_brewer(name = NULL, palette = "Dark2") + + gganno_left(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + + + +## `htanno_group` + +Another `htanno_group` class provides convenient way to split heatmap +`rows/columns` into different panels with a group vairables. It won’t +draw anything. + +``` r +ggheat(small_mat) + + htanno_group( + sample(letters[1:3], nrow(small_mat), replace = TRUE), + position = "left" + ) +``` + + + +You can combine `htanno_dendro` and `htanno_group` in different axis. + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + htanno_group( + sample(letters[1:3], nrow(small_mat), replace = TRUE), + position = "left" + ) + + gganno_left(aes(x = value), data = rowSums) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +``` + + + +But you cannot mix them in the same axis. + +``` r +ggheat(small_mat) + + htanno_dendro(aes(color = branch), position = "top", k = 3) + + htanno_group(sample(letters[1:3], ncol(small_mat), replace = TRUE)) +#> Error in `htanno_group()`: +#> ! `htanno_group()` cannot do sub-split +#> ℹ group of heatmap column already exists +``` + +I’ll add support of sub-clustering for `htanno_dendro`. + +## Control size + +The different ggplot objects were combined using the `patchwork` +package. Internally, the `ggheat_build` function was used to construct +and merge all the `ggplot` objects into a single `patchwork` object. + +`ggheat` has `width` and `height` to control the relative (you can also +provide a unit object) width and height. All annotation function have a +`size` argument to control the relative width (left and right +annotation) or height (top and bottom annotation). + +``` r +pp <- ggheat(small_mat) + + scale_fill_viridis_c() + + gganno_top(data = rowSums, size = unit(10, "mm")) + + geom_bar(aes(y = value, fill = .x), stat = "identity") + + gganno_left(aes(x = value), data = rowSums, size = 0.5) + + geom_bar( + aes(y = .y, fill = factor(.y)), + stat = "identity", + orientation = "y" + ) + + scale_x_reverse() +pp +``` + + + +Internally, the `ggheat_build` function was used to construct and merge +all the `ggplot` objects into a single `patchwork` object. But usually +there is no need to manually perform this combination since much of the +arguments can be controlled within the `ggheat` function and the +annotation functions. + +``` r +class(ggheat_build(pp)) +#> [1] "patchwork" "gg" "ggplot" +``` + +## Session information + +``` r +sessionInfo() +#> R version 4.4.0 (2024-04-24) +#> Platform: x86_64-pc-linux-gnu +#> Running under: Ubuntu 24.04 LTS +#> +#> Matrix products: default +#> BLAS/LAPACK: /usr/lib/x86_64-linux-gnu/libmkl_rt.so; LAPACK version 3.8.0 +#> +#> locale: +#> [1] LC_CTYPE=C.UTF-8 LC_NUMERIC=C LC_TIME=C.UTF-8 +#> [4] LC_COLLATE=C.UTF-8 LC_MONETARY=C.UTF-8 LC_MESSAGES=C.UTF-8 +#> [7] LC_PAPER=C.UTF-8 LC_NAME=C LC_ADDRESS=C +#> [10] LC_TELEPHONE=C LC_MEASUREMENT=C.UTF-8 LC_IDENTIFICATION=C +#> +#> time zone: Asia/Shanghai +#> tzcode source: system (glibc) +#> +#> attached base packages: +#> [1] stats graphics grDevices utils datasets methods base +#> +#> other attached packages: +#> [1] ggheat_0.0.0.9000 ggplot2_3.5.1 +#> +#> loaded via a namespace (and not attached): +#> [1] gtable_0.3.5 dplyr_1.1.4 compiler_4.4.0 highr_0.11 +#> [5] tidyselect_1.2.1 tidyr_1.3.1 scales_1.3.0 yaml_2.3.8 +#> [9] fastmap_1.2.0 ggh4x_0.2.8 R6_2.5.1 labeling_0.4.3 +#> [13] generics_0.1.3 patchwork_1.2.0 knitr_1.47 tibble_3.2.1 +#> [17] munsell_0.5.1 pillar_1.9.0 RColorBrewer_1.1-3 rlang_1.1.4 +#> [21] utf8_1.2.4 xfun_0.45 viridisLite_0.4.2 cli_3.6.3 +#> [25] withr_3.0.0 magrittr_2.0.3 digest_0.6.36 grid_4.4.0 +#> [29] lifecycle_1.0.4 vctrs_0.6.5 evaluate_0.24.0 glue_1.7.0 +#> [33] farver_2.1.2 fansi_1.0.6 colorspace_2.1-0 rmarkdown_2.27 +#> [37] purrr_1.0.2 tools_4.4.0 pkgconfig_2.0.3 htmltools_0.5.8.1 +``` diff --git a/man/figures/README-htanno_dendro-1.png b/man/figures/README-htanno_dendro-1.png new file mode 100644 index 0000000000000000000000000000000000000000..2f4bdafaaf6b6630fd3fba56146811bebf17ee39 GIT binary patch literal 10698 zcmcI~2UL^I*6wSeNR6TbDqTdSN=K?lQ4tUoP+CNqfPl166a46kfWQaRL6jn0dQAjG zKzi>rbOND=8vY6AoV(7w|5^Vz-@WT*Ei&ZIn|Wu?Jp0+t-ZSqWX{gdtU7~^@i1z+H zrNY&FORx;o}Za) zShFyfXu8J1!=Z5Xg;MUN@(UL}|K?^7ph!u1hT>1Y_-9e^qdz#K>hy0sOD!2ID!R_@ zeev_tAcuEXwCQM7PnVyWM!UG6yiRj0szi^*xQT1Z;dO}v>ILndh2$8wSyvSin!8{m z#q$NHK(nN^3PINcy(u7tJLhE}h$>~`1oQ|-Mi0I9zU~S^=ap(sLCNe?tPn)@KioP} zaLQBF);1SM2|>zVzkY2DVP_EeH$Qh+6qfR;`DCq=J-Fv=|8oCwz<6}bPqvE?G|(91 zoi|eX>Q^D$`4D3)5yWpNN6402qL&cwyfWw@d4r#Sw92gzcYcS?u>TN+0sn*y3=HHN zR{qvF(c>0!-gCEPCMzXC&VIi)ShQ0-t7eZO7EbwzL7$E{RCasdV0XhT{fCRGsp<6e zbfd-}_*Xp{omFld?t~S7Y05{XQd+BMu6;Ts34Cnf!B#1~+vQ@sNWKU5(z4Ox$5R`- zzA%ALYTZv0`!R$u4=&Y^mfyd_Sx!@0`;gP>mD(C6$stWCPArP6ny;F1*YouA86dk? zJaBB1?hyTCU5Z7;$cjd44e8`DJ5c z!w+U}Z(m>MW zZ?468RZp?s<7nsc*ylPwt>C!SUws(fX$X1~^@Mlu%x7ipRCxIGz$^r1v`b#3`)fG- z3y}Q_w;rSW>C-=Pl;T~Ytuqd!8I78NQz_07_RUm3@>Nk8b&C$3#id%tuFG@5QWm|q z4%F@hI#r|bDRg<>f`WpdSZY-Kja{paioI0Wo&1e=JmrX~>`tVW;A(t2e)Qu6q;UWL z!TA8<@gvJ=XL>UF zMhO7XWcge8A$!)cU z!i?h1fZI%@uBobmVg0RtMFEY2-V#&@&($Q{xw_8alhC6h$>*yoE2@GryPve-QIciq z5VXiWM>Xd4y7yqFfgwe#p@b4rsGjL@UPa%_>xbwnN zk5*OIh{%9#eEfQ0s^ZQ~wX7lv)#aqsPuW>qS(y0PSodvxM@PrydmrQC_NRgbhi(dymYQZd4GoR zSJ^v^F6HG(?~ZC8AmLuCQ}QJjdkLwBCm>4tv|JwvDtb?}L@DQfFi#>(Ygs18U=IEG zV3Li^Eo*M8)Y*1vFYE*az2$m%!L!#t=8&AYpD`>+sq+cyQt3$Z|oHVA2l&`$763 zNMIj7zs=#^7C_6V%Up7DV|YU76{*LzG*A>}%EVUB#RaX)yqPo{l2oC$Z3!!**oIKA z=`dAOiZj#+x1E1CHH9Udd@JTXke6oOpw|Os-Ic~8) zQ2qlL&)~wh(Ex*Q_(5mkG#dg@g0|A^M{$m916tnep6wup; zcODiO2V&XsBxOC<`s4|ka*he{w`{h`l88oehikQ}*JQ@=nT$FuI7i)c{T(MDb~TuY z>v)Z(#2jLAzkAw|HkW$~7Z+3gQahwQ5~bY#r^)ygf`0T_2#N+Os4~`INZ6__+=V`= z@>-jVQ+?M~Zji|1t;{?L+ctIUG2iZm6VS)&(S?)e{2zL~zLS(>*te2;qTftBSU{fG zyGJi4fZJ{8m00nrvPf!ppd!c?{>tqUh?o_s1nbZ@zRaX4`y5&m~le=zi zHcp12fr0s!Z{n^$1YA)P7?YF5jCXMmQE^LshH~`mhIcI7*!A}8eCj4N3<&~|Bmq5A0E@smEK_H@~RWrAV!SvXOX23op{R!;-gJZ zhE@O_3m;p#2Vn*1!nq^4jVJ-by>$6Q%f+5=2pXeyvceAar=j;X>8pu}wh2RN)2x9B z?hO@(Y(&C~LJvlbm9u7Ua?lSlhjN2z4??cK*)HDeNFQ<9jI203Ara9Gm$wlytr@m1 z#mnmSCJz=nrj1JBhMYosCjo!F@ixrVQ7d~rU)Joe7fS{~&#q>86WDeqI?r@7+DRKt zW!dW_R2ufJ&oB%*Fo8T{!TZL}l$ScoR?oKeHH|Cd0-t{^ZT)OX;}8I$2jV-cRI^Wq zADCg0+3#H_t=CVY09~>NdiOuk|Eg+}ogwVokxhSkqG4uch98a|2?*3@8>iBF#fc(b6o~NNEZyN-4tjb+ z0c@z9$pAJzIR{TqPZWyS7{67KgL${GB&N!V4T&( zr8H@KAsvH>M^n5m2D47V>iS}+$g;pEy5rlE^!WHIgE!vp&D2tl^*Z!4Tf0a0pqX+m z4p(t6(~;Qnd(c0#LSdJPU&SP$Hn))P zK8XrQyNX(N*s-CD)r+_;lS9cUhp!XOrToPGPS);3w!xcSF0bo1#|3s))4iCYYpcyq zK>0xomGi;1-7}WDE|pgwQ%+j-f1qKGbdna{N>Q77R zppCsyq|qRvf2r8BrK0|`x5Ro$_3m_)rc5JH#E6aSvz_O<-Q-e$EO7J;0xA2ClV~JwBFeK# z*Vys0`~S+(Pj9ymhE^9Bt`A!f^Txew`*<&J&~RjGyoM8h$2VBW%gyy(NSZ_03cXMsho2qv>z;rb!D)ok%!dFY16{4d zpOx6Hriddq_S?DZUYdl%re2dI`0ii{t(y6GZ!xw}x#7d5ymi!88$)~cPRT^@RQp); zR#yYhq2dl5KkI0!;rJQBTm!;nTm*U1@}^f1-GEDDA~1(NKhEDUY@b-5$?FHJt+Za~ zl3i9EiLrcbxU;vyn>bqLHZyF;uU|P6ES;&tH~Pp8{n=M&ef)5A$3-M@_cftnMlH&# zzK4PYyxM*KoV%^k*Gz7L;>-rLR7#sXxDVaMv ze+Ww0jKF7Y7R7u!+C-l9&PG~m@W3}(Q_{`PaDc~fO;L;69TY6~WpUyt+i6&#w?8&F zKiB0-R=gZUOjA#3Q0 zY+e7vd#xuZHzY&l`)Fq1q{SU^w9JT^IzfS9_qhE8yIha?w6u!VUX@dS+Q_z$?AKdhBn|s6c1)dV z%l1e~o${=GZvvM9+WzHuT)&Ij?X6vlhFDRX+5PF=fbo@sXSFe(lnmUKT7&J}=l6(9 z9%-!lrS6zSRu+C=SYqOn#3Q$)N#qc!1DiR^Jxn}wn<`7iEWXgEC&8~r12f-e>8P=# zQT0vp6o)TN?_jIlcBIR0Ei*xREk~vOQiqs%zkVL-%}uEx9=+$~nIiNexGTe%0B~6zs%N)N^7(e7Ouc_nAOPkd}cZPEe@r z2q}N_7r%gdrj5WduVg+pYou{g+$L5$AB9#2Ho+7${DlG8TkR4#dlTKQ zn(2bko3)HaLER!gz-^&ASaEM*%$<{(&1&>>^>h_m6#xu5oxP*_EJp|V@FIG9lW}Fz z7(Q|we7;zfkvf63Ls@RL_R=@I@aq+%Z?yAaa;^ZPRDi++mUCMi8HbP#`RhyG)D&}uhq^Bnpv=wTF$d} z-R`)LsBIix?HP4B{PwD`8mOaYC^w4i=&8Jc%dOz8fBD_s4*deIQvMYB@G-O| z039L!id6FX!w(%~NR!zZ}0#WFgR{+4+RLYay4`f&v=g&TkfeBjtF+sUd}q%ukuLYgif8 zwZr|{kvB_OJT|*rKS1h!82b7R`Y@Zhnpn!a(zU)0NerM}W~93^GR9kBa)Te@>?2_DmpXE~IttQO1c zu{fYD+(9MPz#yK*XV|x;twS`ph3;>%VEn!E#B$Z(!}^6U>0Co4n5&D=0^>4*@A3>H z33DP=#2-Ku`}z4P21Z9S8J3!b*3P!ZadC0k0N+bOZZpTQgPa)$X4w6C(V{KdUaW-?GEh= z%`U_>KbT|RuXo=4Qw-P#8W*%Nz38dhuCk&X$0L3o%|y>_dr&`DXTHfxdXXM(iXaC* ze@qUc4Gh1Vk*F|a_B^h8YCV%$#$-jo_S>+tx!_hkt%+h2jEaZK$ZjMpa&58gF1qDn zZYENC`)Uzue6m!&Az0X1i38R32R^Qo?`jJQLm9rL=15>0{kc%Wub!>9xOu%VLtC~j z^79AC4|UD_1d@+3(YWch(|bWDY{k6)yHN4*A~U;%UQE2b*^=oj9*~a3vx1Ib_?kDP zqEcGP(yio#C;9+mO8&<6qths-(=KuPC=Zt)@{)%h&q++8H-MCP)m@5XwPIPkW_9P7 z3&=!V?{1OUvgZz>ePWrk(EtlHZn}@?TDit(M3xjD&M6JHP86T!DYXl@0}=d_^!^n4 z!^{Ce+NH?w13mD*Jncu44(xT_5x8hl7dkX`efu@TA>eBA#ds3r9kR?Idf=WUgJy_;V<+cNf>syX0-xJ8Iv-_W|TUu(>lh&VmD?0hLlx5*pe8w94E zc4=(i;JM!4?mzo|EsCBO*AjmPi%vDMx_6gJJkeB_xYni3k3xTT`Eswi^ALk0j=*(U zG5E1Gy+Hl_kky+z{bR%I(%zQo1Y1yeF3J?vC(gahG9M-X9r8kNJ(a~wRVZh^5jA-B zq4mIRMa1du-|HHU;H%eG6*$USgZT5zRyF$e;RzfkLnh=aEHGJH35*MhlxK%4Y`T3s z(A)3RqKEblSI51;=@eYBm_-Y#dG)VZ@Vw(PaaulMjnI!@ufbNc0a z<SF>EszXQMHq&wh)|Q7IM+ALgX8QzI>(1MCi_8+oQNUk_uk4|~>MhsF z1$#A2yachL_-Dotf$*u{5aoFEOQ(He5HO|!J0ejzkDD&0@C89|WqBw~vY`H>TVAk@ z@vd*&F=)ic1a#CEiIv>?D8|K|;$zNkc|Tn5P{<5HwL#q0oh17Ay-*j<>?wHdHHMsm9{oXPQOaEF-8{XxA+Y!11I-|)K4pHN+H~gCD2NdMgWiXP zbs76`P$66VZb}Xh4J9ptKaH9|L{|H8R7kYazdz=?=NWSa1dB!?rFqp3DRN+S*_p$q zo^CwHLqGis2nXoGb0MEOKHyTdLB{n5`bITN1>!W&TV!^{;KK|yMk0^5{T@72rlR0S zfjnicH90)Wg@hHoF`);bp~CDw292k7WC2%n)FBa00+s!2G3iss6c1>0wBiK;2ze0M z5iB+FJ8Ab74KA$Vv!fU(TAxm~)bq@q!*zG9|Gt@r2PDh>3)|Ixg?&{?CH{!aeQ(+E)40+1gTz_E z(~+V=q__uhj<_FL3&`&~)g5hLkwGkiAAK>&+9B`k4aJ(6oJ57@ZEk)`xq0_h;?Ex6 zjE*{T1=36^m_-uUcqM?6Ajl7*w(ZkP7%BEH9)+1b@gjEF=3R6?+??rlH~PUhE<<{X z0u8T#1GS8IB5IC03s2*WV^byd@|J^Ug#yIp_k7Vc@Ku*Z+F@tAaZ%wO+QefO6evdU z!AzXx%yn~Z663JVy>_fR;w$LJSl6lLczDvQsthR4UNCF-I|;qr{u76L%>jzi{xBVZsZ&r!Dc^NhUY&xhex5<~M49rUqNkLTYp%Ajl5oTo=q*)t zxn`E(rzWX8s2U4%^WPy5^eC9D)S+}1waP&Uli4MC&NJa`k|-D>d55GhUrbFu_LwfY zdCgb1c8?(vLAGIcEK68IfQ89SbwZLP4SL~uM>{SBV6y5>b$@Ua1cD?3~*4Cmf+DG@?t2gl@|b}byd3w@Q%{McpPP#4QjFCG)+;TUq^iA5ddu6Z6~3H^`j2UBdC@}={I5n+sQ4}u-*l@a0FKU;w&x2<6U zyM+y~+SPyqd!o0527kHNM3JC~*DdGuz#yV@Zu==bRzsoKdqCcjO?06UR$+ zi#_Ip;IvjL?`+#~?xlF?xJ>fxAR6c9V~%2O8xhd4mY;18ExF(83#)}2JUjOZW>>!k zJBFByRv31rd>7YE-)B1%;W)2oB>D2y`1H@6#fDp*T65zasnxdSPboQmZwu}&BdITq zV=Anbg#N$;kevAK`}dg=pW>yfON+7(PV#I<7MX(xb>M(x(# zHk)UVy=QNPNEB+ho3rwRo4FHD=_(6+f8-QFwlWJl%^lQG3@TYSNb*sL#tU`F7$(Ta zCm^?9R+P=xQTl3ad2f_ed%oY`+k(L4k$Go^TtrA{G-j>!a%_^Y&wD!oYTeS4&nq?evfgLF66N&mPX zL$U}~7w$aYChg6OO~h1FzW3EMZuk{%98Oy+i%>) zUnk5({zYc?Z;m=#zen2Hy&8deYNLL`ChsFaa5XPH5;Q%{d7u%6Yo`M2?jnsqG?gy* zhyWkBOJ4B+z&n5U;7qw|7&&U3dp#8FA>IPH(qB4cv94PnZ9k=?tsM!gU5;WShaj;= zd{1_E_CFYaX+8cpp3J)=$Cddp6F^29=;__`U3Hb|Ch|zrLJDX6jlofjm;>+jmKGVp zv{%4184ylB-g$TrA;1LZfS>+_a~_XArdfhh2-m#64aJ7o8gc<6Z`}Y_qIH~H!7gc< zWrZ3D2~}qG;L=5}&eY=|;7W=X8q0&%z}+jPiI{yF*;jpJ`7DT(&-|71CgGUy(RU0y znVFfsFx%1tU_izlRJysDnVE$JHHWaUuu|cj0xXb-$xB;E#^M9-Bq3u(Ev+yZr?|Md zwN}aTTrv4`NPC;EQ=|1uZRZk6(S`TX>K2k7%_kx@lTaTR&ow09fts zL}ux{%1ToqO$v{fM9ZI%nvxYxU_K8bm!!uAdYk}Qff}5LLE=iMe(xKec0-PW?3%sNy`qtp!pkg2p4`Jeujzhra?Xqj7#nX%j zzGoQTzklxw`~Lkq192_&|Kof-!P3bBeqVmNtpiNm(A5UYbEw9-*;G}C|0en~z>4A{c%|B zj6+i!2%nt5?C4u2|4?8re_;PNgs{oFJE2f$7^i@M?TSP}Hw69pg2^8^Ym?v(*a1#J z$`B%v=OV!6J2m|TSrBHfzx&UZh;*##p9v&D98DsIU_m^}hSV&pYLMu}$NCeH z;IXAC4*_0Av~B_4DRG&}B6-sAbwkAI!bOi7Qnlru?fuWDCLHs0Iq)pkKc;~5+Y0|a z6-0Tr!f4zgA0TFPzH@hXS23`xtn8iLaukVIPu2;Us(yTksv#`)E{!mNX!nAQ3XR6s zfc>1mcuYm%PHb8eiGotCtTS)&lGdC{Uk5l#Y+5-$!}4m{v4HfnR0TM2RBa&X0p-aX zqz}rz^`NZoO3c`)QB6u8U(`i6Dpl3TT3y z7c+q`!-o8QpQ5&>UfQeyP~;CGpuMj~z*q13(@5<{gN1zN{eQulBt%**_T~DqSkp(& zusABabDA*lvpw$y$A}8J92XY8tTfIyl9!m~^1UzQa&)UXqwCAVd2MVxOiX>_s#wVk zQqFnc!Ucw2_9oJ$Ae%o;RcBL7_PJ89GG~JMNFC`uE#i*}#W^?pROLz2lPgHG)J`qQ zey-yw)4;+q_fGS>r>Q#NdQm}k%Qq}La zj+PfM=E(8QN|-i&1n39E+C=xV_9Mq#a4=5Rxc2nmorf7gF%jV3lt?~A%Z{>O2nWjgP^Dkkpe_zh>QV}5EMbh0vu3; z0KrgzGAe@*hQt9xMS=)~G0bxy2}8(4l6ww)U*Ep{x>r@-x88eat*orYr6I|G5N%!EKz46IoRToG`sJb=^M>sA+nAQ08};Acex_PHkn z0!uw{>=(zdv>A4InpQ|Ue|9QEPe`;`qkbxOm&@7{cK(*zpGRd@u6fSi&W+oTbdz2* zDk+f0nKcf_h6n;$Hosl%_1J;xf7JYk#ND@69a;JDL8kfk-Mdrn-_i;SMvzY3+|K^V z!8LtKJ}QfBf*E?@nlyeNH#qC+`uN_k@k+?Mhs_ZX$admNHOPvMVURWV-zb?!t%5>U z?&d>&*nUGf3bNJ=vdU^;#dh<5`beh4(^iTpC0$nxH|Lms_Ahm>x44jK_e2S~&{cr8 zD$377a5g;TmE$rmak2g~g_)y_oU6yU}7cj_h z68#foyVXCn*PlT62ahEE#242vzK1+_qq*pFHvD{!GJUnjt?Ol>pI=qh^kH@H42ocl zSNOF)VJUP6jU~i96|DKR-ajP`I2G2+Oa99%J{h4$0S9D%y^yb%^O2y)j-4C+(BXf8 z?qAc!j@S(A?(3rimgkNd>pKFr+P=DW&C-&1-n%)2U0Wk`*Et6o@E0T_7e?h;4tRfg z8c@I4DHu*tke*n!=sn)L7V>#>LjY@+XMx5ItUq{g-RO(V(Z?yukTcu)c*%zEA!{D~ zn-u=DJKFO-0m*|aLGqmRlN%#${noC7@BVt%fy`O7!6mUTkF4N*iMUnbyEHrpm{>nK ze-O1k*-a1weDUx6{RP05-pl}X&?jSCb-WQrFJxfC@IX*FcC^7kH@;{1t%y4FZ-m~T z#SI4VbNaZN9~RqBC*p;HE)#hG!Oc}7Hi*Ok?K2S7cyXo!O5M^z&tM}YNsrRss%9_T z$#=*(m15{~PB?dST$5U!{txEA3LcYg^7eMdU8-RD=AQo#9>|<6+_g>Tcau-t(xC*H zCtz0<*L1+xE~gnIv1MBK0oEHX%m5+rDI}x}FngfpIWr(4yu!t5)+Nv#&z?Cq9B+AX z!S+G+Ez_X@tz1)O$o-w@?tjR4D&0Iu@cc{LB?6iiG`;iha^ogp$FKyZm>E}L_t$A+ zO?*UO4gAk*R44+t*|5~t!u!a0Vrl zl#B|twBLk{nCP}f{zUxt@kaCq=%M+CKCoWLx6Ntm%pjX^V|y)l6jN--jyS4r$8QWKf)E=tCJP4vy`3n%y8@mZ#i40j+CXFZjnz( znoqmTWve$=NfKjDuBY%%hC+U*@nD*HeY`!!#7K=a67IUu=2_L!v=tJ;-BPa4;qf*Ls`E4#m7<~j45jYyB^Ms9W z&U>dEQSyqp*|wmQz5x4Cm{RU@+T~6|t?0~-yi)_(ROP6R5-sA`-e?j|dQ;$s>kAa} z4Vn>owwr3JL?u}|3?7AhzFm}%g`CUgElI`F8ZXK)lgZV*Ga^}-G#x1R?{1q-Wfn2L z86hqfF_$&MAiCMj_TCwXCps$n39U_xYe-J-)_D6ix~M82W;(>d_0RE2k@K(A=+ewz z(w+MWIWE0)kB$QmUnArnThr|~SqhYGOe>VVI z*8+ix{Vg@YY`)Ch&sp`zcorM`xC6En<5OgIZ4{-=P~2$9P^24ryW!sVzt)$|tu5U` z58X+Wxnm@KqiCc;Ae=Fx3p%YaWnx+0d%0+VV zV*_QUX=pdi(BNf6je+ZxZm(x@ z8%&S=v!)=^ZB-<WpC~+; zM*bHU1BY*Ap%&|#GfZA#Q&3ZI+Sm1vO|NJOH+i5_ie^{KX0-i-Hw_$Y^@J=rgdo>U zhPDXuyEG{LV77%51I2D+sQ`hjj<$csUsS{U#0<6c$vMtkvjOWy6zTI*mj$LCOwo0> z0zMh0I1xW8FY8bT*tyeY*qHRjQ5}5i*Up_!5 zA*<-q^$BOm_%aJc-`aR3a_Csqiz1PSm_AJNtSFZ?H=3GQYlXwjNUdU>C0S|^9pA6!&1ENDc~h|iSi(`OVKl?jX$m3o zV^sahQupp(>>;Ig=YFBsfu(xwUY7&86I)Cul|mzUVUc1<8p*DWrod+39zn@_+Z@UJ zL6}v3Y;$0RTbmXcz`eYCkES8pjbFIr9p2X&tsFJAF?aTe=;As8 zl46Tfg;?3^I}IJ5u6^)shvYd+wWXLeCCqm!I01ABIsJFW0Mc9c7&L-ifWQ_7c4i?p zRR@6>Y3wipYFA)LJQ2Lt1TXjq^b+51GXle7$|&$WjeN(UD;kbdx(l=+vEwqOH(dKy zJ@s7GJ^%ytoAEtlwZ%f;NpMfD=*dP&1c&l!c$S7Ddiq#?09gV!%ve83EMO&n?vmW* zDcIh0oZ?Ab4d=kJi!@ZcNRRK}2D=m{<55Ia#k-q=$0oU_fqg%9RBcH%IZnYIQ7{xQ zFS8Gfe{VB5Ot3uiNfi=zrJy<8aJU(k?^YHl3*uA=M(*-V!xjeUrl_agZTGtp$^eUR zm`RVJ><`y}t3Hk@k(7^qYKlfi)`=Ekr&cdJp>o7@qPFY!zS7;xj7Onr8+dqHtYfXoAgq-Pk#&Ks7CJf(yhRIrXGIS5uwwy!o0j| z7Z32MyY;w7U>95e9LNsi7~I!d(9wGms3o=~_de6Nxcv&$C(C-(7A5mLT0muaQ#VOC zRkUR#3dim3D)q*}Vb|wY+qW@(-nGJGD;S@5CmW7Uh;5xlJU2(v9ZfQ^lYPda)8mrWY_ic?97EhlHC*Z+Qb47NOirtHe(sz<3 z@@wwICw1XggWql6GiwsIvWhz`R5&dEzZ?qmbl7BRp9DL2tut1mV>9)6QEv*y7C>`{ zfHd+Kz3HH{UxssXobbU+_R}3QsqpHw8}u8)c2>FGJ_#?Yh-t%`>VV6k(St?G=XQq; zQ5!Pwe&YMY;~IFY$hrx4a&j^64mDPHUje2fp!4~L7hF1ene9Wm3ByNen0l-RS<_@V zeK?toSG?AZtI80wsWYv8?Wv*5tXccQ z1_{i&y81Sw9)Wva-^a@N?YN4iq49g?Y$cMLtqCb#?Z(t13;<$n+!t{`5__<8lJnI0;A^AcN1|bqG^t zgXZ-cdWZ|+iGMu9s3Rl-t$EU!$PAwYz({wmQ^~G2kk;FSnmAA&uno^Q#BCuyv(r_; zO!d~wzN5>c^E#srsslYMjsBhtW{Csvkjp^MP$KJi0Vmg)9`NE(Z(yiM^5XYNfoAup zMQn1Vtxxgv4eu83Fct(dy=AYA{nsBZ^$NPXkU#-)14~Jk6X)D z0q)ruT2?{gvG5zsX2+_Z)VwweQLNRVgbb0P8;fc4oKlh`x5#C<%+@u0ur03aJh1hr z#wUkEUs+b%*9?Ah!rRbq-^kSQ_+q_zbQ0LGoy_*v=)oY>&L-aZtWK0@Pkr+%1@qGuIYRO`}57Y0Y)?^c83u`u`4!NI_!o9)~TEm4wP1> zqyazLyLVL|=>4-phx`veV$X~Kb6(t?)=Dy7MOpj^Bx0Vo(?b#&EL@H$Y&=SoBpC7! z3>s&q(;J@{k_viHLF{q}^y!}LoFF6GA-Vg;$$IG0$frke+Q>tolPU1ObC~!1ixtGK z=uqEMfuD`2)(<>p+~_<-(>*GbZKwvMs$iynPr63c39=Btc*pp$bvtW0GoAQW z>F5`VeFyHxTMY`ish%6SoLTpI0N;+5NsBx?1fNS2k+hLqLg4sK zX)<%GB8$Pe7VfPw+yiiN=g^_W0eoO;A4{WKLYW)HseQ7v_aE7SE-wlni8&fEc1xp z2!98=F(f3!64qKC@?O%U9gxH^@N65%(T$@X?TPLnj#3-BS7nkK+e5jtavE5=dS3fc zWQB^8{5oFWb*WEdt6GO2-#9j@oiUabF#B?c)Y%A@C zKOszieLG6Iq+tp0e$Uw{k3jLPHzuT`s~TD&VJIYNnnD?us4xlgjXMjX-WQ+vsa8f= z6LYr0HHcT&O6nYc5yObw7e@v9oEr^(H$lv!Hhzbs2$NSp+VzsH$0M$n>kaOZ z?2u|5s>1q!ViSiVA%fXvehTXPJ?M=JCW9<4t5EZ)O^I zR0%mZ`uyszUdLBP1&+?+B~V}Z%Kq-|h`#Xg5ID*OwX@qkq8}nOL@XAI zJ9lL80I!i^w{0zbl zwtXnMMH%)8FlJYYBn1?h>a|fo!w3i-reR1Oc~->2ux{- zj(=zI{`p*{ZbbRAVTX)Cd;)!bVPPS=kwFf+_eROC{QrTuM*}CBD3&t{ z(K8l|?(%aZ3>1O0>dO-jf33X@V9||NiUm)alv-1O;&}H@+Mwp7?*uaZYDVN4!0v~B z4WksGKc0Vw5E&=5rYk|L9sn8lU+Cz6V8(wftNu-}|8JJg%4HV(FA*D4B~^YM1{`*l|%;zM}>*iRzsum{%;F;fOLAXv2&38dd3Qu z)DcYYev*$Z@R`Cqo9SpbtP5~?7LW7q*;F4uWW3$n9jTwJX&hl5bGVNd;xN8=fEa7& zbVW*Y@yGWss`%A>r5Ac|^iD^kEomoZUEN=?mttOP;X^4VU}idxDw_8?T`2ZsIhxU|_1s}pNC3Vn$oca4xHiVtM2>#N$^oP2Bd znG%{&UrE?mC$$cz$Ei@{6d`i(fRTJ!=%bipaL;h^<2rmVUyBfJBQ>$ouB{;~O_ewo z*N%?CddtErdLIee_qbK?8#>s8c_Ef`-6xUdlw9OZ3YV=n>JOe-(lLoBqvy3P@a?4@ zjLNYOWYWTW3<5LJBFP&vB&Vc8=^rqq<+&;=VOX*39qN?iBU%Sl8aBxx=_OsnxDF-r zoXa94M{j_gB3?#fXJ&oXH)m`kYWTnA@cpY z{5HwdH$kqYaC4s^LkPo(G%@G1S<6BKwA8T3x$@Fm>iT#Y<$T%vf9@ox zpX#k_+1wx0a8ubx*o>;-fG-Z2yhywLDd)zFZEr|}t8Il^cc7vOL~%Ad=XT<2xPq-j zlapcRuQ$}f$G$79!a9AjE-c>XR+<7J@>w!;CjYETsJYrj&26yJDz7ap^z&$_WWCa> z{;PXb@-^TQ;qU6+l6$(l53?%DR6E7*_LbACf(u=ONey+xRJW@>K0SvnQBK69lT4B? zF8k_=H0vI8+fM<-VII!TJ^Al-PM>E4VQSm{o)U)pdVC`5i}$;V968E#B6Btx(AMfT zW0B#XsM(sAnFV@u`N$yc)HpHg-IR1oAvusW9h74P2=$vYnotXg>tKBmb*4RW#VG0- zq36lpIg>Hg)GQ>auS?1T9tuHLg-=#&L4?R}NQ?K=f`l&dzQkGFhWo^06=LWI?|vXV|xR{J)sHuN9*``yqQBCG98T=Qrt$m4OzyHkyhy zYBmR0ytqhqm*Z>M^*Eamey6O>5BHQr% zQ`y%9sRp9FuuhT(+yp&@sNuhT2Bd^*P9h1^Y&gnLc)(3??XKW#xf<_pC=B&leOfdQ z7x-x+1QXF{AzR@5OmSzBh-+KFwZ-u-&Ym*9?1NfSMtaI(h);#h)5tIM_nM(LDKN8N z&lhD~6}_x_-YGdKO_;$Lni|YLDTkw_bk4+Di%{9RLe0a!S~)o}29>gMWPLSsMV~ra z@Z!m&PlQOfuQJqCp_G{Rsw2u(5n`kYJNO*2&6tXDzy3fF{iDra&LK29gsDxZPOD*h yio3c;FD^iS$ea=nZ-ZFH1FiD^Ssx=&_;fb3Y^Zo*0Q_|iIbmsYtmx>aoBsjzjc36C literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-11-1.png b/man/figures/README-unnamed-chunk-11-1.png new file mode 100644 index 0000000000000000000000000000000000000000..df5b863dae6a6239f01244eaff5286fdcd47fef7 GIT binary patch literal 14026 zcmcJ$2UHVbw=Nt&x>o~-W3Cwp!~{~3d#2@)vODLVLNPYqb->S& zY*)fnI{JgFkyw#}7nkHw0Dj}Is`P;HToYX_9-+91N9nqC55nIrj0-12JP2mI2g1)^E z0?~kR$U*)%|C8M>@@_b==)^=0#EqaE^6L6E4!)PiZ6W0FxVRh53_}6%VTz{njNXT$MG<;5R%crGgU5@zVNz z4@T&JBmvj(GDOU$HRUe_PQ2QJh}TuKFjeW;N5ZXx-I?$~dO!6M#aPiF6RhhUd-I-(@eoSc za4!k9P4|PAPPdMfQS_`3t3rABRMMz9T?YBR?91nj-nO|bGnSYpLpKg0`E0MY?18bj zMY2TSQ)ep>>CZ5iS27{u%5VdtjR%z(3;gbu*L$&j7nC|2bmad!2SC1u}b|FWd$&N)Lql+n@ZdC8P-p8P2&YjF*!h7@YHFXq>QCFX~ zXPlYYB+6Wxkabf>)UzWd9Y=e6&OOBhcW&>?d>tb3`-)!dMGYp4?FADDCPgE2Rr~c1 zc1EL4>x00uVK!6we#ip~!)$dpaJt9q3SHjmNxz?e)a~Et*)N50N9Tz(+VBvE^6j+DCW$ZXS1^>T1{zXCI&9f`Rml0WG^do`54zCP=< z>e8P&dioQ^NHgI2)io)@n%RXGA5S#%&PwY_Aq_c$Wv9pfRRbQV#h=In1iBgOPxw!E zA5|g))n2}gf#Av}%{kP}Y_{F9{AqC`x1B)(1R{`Y!2_Ad-1s-Ul$8Y=RT*u~cGs&i z>ar-mMuUzc1TM&5hD7zZ4SVx9^di5q``rYFi>ta2<2fxFS(Zs0;4;sq0^O1N)lQCk zD2w@_U-^(}(+h;c=Q=q%tGN%1ZwSd5e3rx5Rnx9}d7HJgv~Dz~mYVQ+o}YLQh_2sw zYh-P0t*56q#zsX&g`BS91Xny)$;ix{sj_vyJWk}dWPA7!@EfK=d=`tb%o#szaR{}$ z(-EdTg~R^i=Upq^fG0Cx=hb*!5@uD##M-Q^_9dt8+($Pbg@-sQ`T6-Vt;K)&;^fua z(b4ha$Bz$R=?4~%F`;t^_b3KQua5A$8e2F&b)VoG^$v1Bni9d(J-440empA%GtE&N zock?!8C7(aA_{%%o~og#$^PmqILIrYq_EJg@9R^|9MyP;qDa}4U5*+T2glRo{#IUs zJCTgien)HlWo2bXP4g(-pOaeJ@sI$sXJW656WGc8oVL0N*tn%vroBHacf{oB__O#f=LQUHoi^a5p#6)j&n7n- z?$A=hC(E@ZV*zVaQB#vj{FWL1G3T_6O)b^%ITsH>7rQFZtklUZq>az)o4DwNDYgV#EMf)w+vvD8u zuG$GeO#T7Rp;8&W`=*RnN1OLN@sifirH>01g2XkqC$-%`pc}eQ1Fgx)5UG>8Pqz$C z{|MKg_LMfLd7WmKY^8eIPsww;{c{8)D zojbU)>XZdzHlu3PuY{8O&6aho=iZjRdBqlcRzS{q|FLxv8{$TfEaxIUSqS#z5dnCw zIre1L98Gn~DQ%`)E$uOZe$-gV-COZQ=R+hOIU^j1AQ^S-v6eI*D?=Xm&Kq4=a!bYd>K)9ow@pLZ6TjbDg5x3{;uZ2tZ+-Og=L4IF}P z41FKVHYn1GiWH&y>`%#V0Ox^ZtEKTENP;ME8NTeH&lX^7iI%EqM!=?{Lv`h41{kz7 z<_cOB2G|iC?l|9|_fqNmyP0ZxJVG)$KC@6Df(Q|L$TaQj*ui_N-1m&8f`ek?;wYm= zpw7+#hDu;cYHDG}c?n@*T{mVT_LRVX15*J$Wb=vMi=|295>q2%C0(EC3*5e`H~XOp z$mlktRwISyMV$XAj*V<=YPXE5V63j&I%gc@lE<&*>Q zzVCcV^R?Gpy(?0)^E3TSscBn&4n979h2@|d>=^(NA8*mFNv+PgFSts-w=H|a;Q8nF z8MWO)lW$K9D^jz#;qce#?hHaLQOG{2cQxN@y4<{XI8y=9Yyv<_vXH%V8lUy=tjWpA z{2Tz|j@Ad=VXgi+c$a5;ds3^?n2W)(cU}3Z0L0C@PC$^n=hvt`-6DPMlV=tKDIBWr zMh6k5Z66O04+9Cwh3uy*xA4u)&G{|*oM6i91K$)r(``zv29irnR@uT)aa|1Fuhir6 za}pC1G3Y(mobeN%^L>Z8`Z~2lQK*HIlG4~nXC&={%ZLh+_f3UGf6ap5w$$opaipTE zYO$Bsa(kGrk!J@Q-xqaCFJScrMLDNCzg>(dwj4}dE^*tLeCm!gOp|hqWmD<=bZ_N4 zV5~qFb~fjZ)MR`0^-Elw)`(=Yl-Y>i%X5N}8fo&Jn)HgGU&=%OwRC7b>M}5Q7I2~oh}Ynk(zfXC<==BwJ}|wu_uY6r>8-jOOYu z?#>}<@}s-E6{B!?w~szEN=v1u2}?^aY`U!d`BO{S(6*E-L=ErN=3W%Gn=EzP)j#8i zlDf?GZn3nq)V0lmt`CgiIlEnSlGbzxn3NXjxeceI zhK5E}{Mlk_;Mo0pPfS|w>CF3~FTXMDV?*wJ;Fro(gQ$!3v~}P~C3mN*Y^(gG(MR(h zE0IVXV=XPpKaug-*0Q01O=zPUEa%?POZzoU8v>*j!o4^rtRoxx>C-109N1;&R(?S- zNq^)RZ}XMLnBw+$(Y8kmXZ%94$)maJwUxmV(b>hV`?y9l$A`Mia)7TZ0M6xkXa-;g zMbv~M?FlU(z=lPkYfg6?)wUM3k9ix9HL4^%QuI`eW5gc3SzoNm;CAHgzAsX*_UelT z5l99?mGb;p|2oRCA=&+)O_&u{n|0Y7$sj4l&#y@ootk>R6v9aGBh`dI@s+x|y6aU< zmYR)NDJ3JLu_ngcl>71Hm+F*F%=J(Hysezsl@0y+mFBr$J?OpIw{qn#Tr@Z(->w!K z$W!3bLQEZ%C&#eHwItiegP4x4E^2CO!tbezBLe+PPBbSY_=+wr$D0(rzkWS_{5Zh) zRl2s8mQ_-xa63CgGqWtwbDqv$1-QMvy|*qlapguTzkU_-9TFkJUjI5GvaW+Y4Q3at zlM)Z7fBMd5_*PUT(#1yFu08a&Ht(&Wo(dakBLZUptALeRJr$j9^gfH=ZF=(-r|Gcv z!mYWfQ}MC8;7es?bLu;)HY6U{n~|?NiQEM472;1W!1^8YZDb}sUzSLBEkv!P@a*hq zpaH?&7MhU3!{lJO1F73WU<|<2X9h|AUEE<4=Q=~j#uFVoJG&~*MjX(KyPwhpyM(NC zJVT-@o{Ya$bC{M8{B@*#{K4t!`~ZL!ZleYfE9lKnYILJv2Uu#=uFu{%H-} z#bQx)`{ECA5Xe>23C}1@wO5gRiw*~r8@mzlzmuGF{TmJSdvl0AKlijtc-TOi5yR19 z`HqRJHz^1-(4GU`FGd?TRh!wWkHeMW;h}5_wAUBgGMrQ8PMfLQ4BGO(6-YrKp=7+E z+}|qWPUFQ0)NGg-rM^MESBjgF=18y*p5xEQ-y{RcJlf}2ELxX3KBx~dM6AypXMH_f ztJP^21%bZjQPuP$8bo@d?3W%(`JKy!_3maN?nDojnl|7N;^MsSx=T&nyUSHj9=qn) zbnycD=BA|gsog~Jw|3mcSp7LdZ|}9{pq_-fNef^W99>59yZb)d(gkIxxH_rs^fOtfl2Xr_E81n1tKmlF9&dh zr_6r=hM8M+MqeEb-mwMCx*%uu)HjswKM9>q33QyUP}u2`-gCWa+ePdi)C>g31-BV{ zAhISHya*(?ML^ELRr8VB$Ybepy99242WmVA@3V&ZU2d9`u?2jyT zor}IL$>NetdB+E!1Yog`HIirk2q@@T2XFJ%baSvpj9FChx!eMQn7>m+?@Wsox%>1P z%PUOT>lpZ~3{cODZExEpvfsf0$?O(q>^(VH?cprBbPRk?K6_qMeJk@QgsGjyr_>J>FL&qX7#n{3UE>)0Te5c@rZZZs$>NZJ2a?H{ zHk5bV7B^pdms!FvW?`gpbW9L!K7~44pP)VcgV6N0|C;jD!WT24W2ERV3<7m)6%7B0 zJ2yImRUb`98W&-#CqB^W`b5lA8&8*5XAP0CWA^s@I*E@>NJ0LFQa60`+$`3f+Qy!4 zMvEpUDkuw@s@P8O7dcxk&i182MWxK7PZreB&=5w! z?st8$e);+0d%lgK;q3Xr3U`7&I;%hrpo-Mo`lF?$&wY~tw!Ct@v0*hQE$iY^34S0X zBxKn15C_!}OF{Ew3Hd}y@p7Agm{|#L; zn)BTn9N6L=GL<;Ly7G~p-%T9ZbP@aZ!AcaYQ*3wvL};}Xk*7R7stXD4-o6bF4?nio zBzg*6>#KvV1Hr$sz9uCm#`&^+dHL;}rPh>%si|qLj}q>~hH*;uHetCN7W^6cHuCcF zG~6jNL|uX%4mG_z&)AIX^L_1}AFzb8{>+f5{(f$HQYp#RVOHjB|Bc6?elz<;I zezWLqdp_#Yjlp@He^3o(4{_^QyBC;LLnnkrNDStv07hFn#w)0y(j5B(hPhUgM!T$PUk<6;U#In1 zROsmIBc+r$Ik~5z75rXQdcnoW8#`49Hwa?EIDDK<=n9s3&MP;SSe1qqD8ti%% zZd~lxn=9XveBapPeMpyunx2?P16vSS|6*_3xXFH+oPN)*?&i(mqht_?|I7@v=50JLq^|U2u;p2)x|hipL%o8uanj z%4P`Q)fYB*_dBE|#C`t6xlRo<&z=`Q*R2A9WT>l%Ja*e-tOt=Br+rCN7%RrTQ@@V; zv2yiz9}<$2Q9bNw8}mEgpNFKVuFp6&7kT%>4V{&ooy(E^xFQwPvxI4}@$|k2((FcG zOh=j-K$ZuKf#f^})m&iih)vr(dy?_~f!shKX$s661MJ>S#(#NHGVGe7t^8~5aWdnm=(tVF4Ao5*%v?|S@3 zHUuFQMxvMq0<};}eIjhOY~>D2z3Q;1IoG4m9dvfgKZ;|7`7}`EEa8B@48RW-85gwf zGf1-FfL>1w*Kqw8IcgPy$^g555ArV5Sg(O&#h)vH=AXl##J#njIq`pNy-k6u10 zxYgbOJO_}A0$(BKcyKG|a9fw0h?s$rj|=bQrb{YX{v%aN#7>YC{lY%7ux@))N?7Wm z{X%8O0fQyPzc3~d9Wlwt1*jCD6fv@SQ?B>JYb~vZLEVFcQDI@xkO*A?6;5vMTkXp# zuU<*`zBM)dj`ZFS4i1(L4G0Kux`@fm*9X#ho-v>lWSvA+=@<%r06qeE9*~+WmG>zt zE8|u6;W6{_su8Ih8WwuDCS|j-vTn{;co4sAu??oh91VK1he!z6%Du2VDT3PA*o>{D zq|l))i>;Hg>kN7349IS1YX^gQ;GBjeRI)dq2Rb}yGL=1iKtp@~wYx^WhBxd) zH;T*kwYA%REIzsO$$#Q=i9!93{>dp8ei|+YkbgSSixzS6oq6{iOlp%wf8P4q+C2*0ZT!M0%VWgzSi2 z%K&xJbi5O@wHnOKd)atM7vuk1Vy&=zant+!NMd)i;&3m=SnBwLnyOWX9R?0XB9_X( zQ{QUb=|o}BW4G6h=U2~>bFwGL3oiXRoIyqTnA&RWEwO~SI2U{FEcaU4 zxz{x+OO_oaJMu#@B09#=Cr1;>WK_1YlzvC&=|{-(CkVeiQq1@RSPwm#K%%^u$>g3R zu@=x`392*Iy``~d)Ku*>YF?JHGt-gwhumX1yiUTnNQ&5afdo%@`ds? zX0a6eC_TyJfl*O>VV?%;0slA5K{OMX@c~__6C?!PB}~#iAcXCgScW|>zW*nw(g$*2 z-qydsb6t7<6Benc&2{4FeH3_@vLNJFWjl!cCe3rrWw5){?@+t4z9*dU$5Ps}BY03t zHCIGq<5BPI`W@`DwPrmetF!sCl4`!KOrXGZUAVkF)fPj!Bvxs*e7B}Ceymol8A(4~ zBcAi_*My~=+=yyNbH4TI04(il(sNwe(nNWiCYOl~=%(a;h$J>~I6Mg}Mk?9!)CKj&P$D^H9_IMLS2$#}G+;q)V2n>O@bSsz}$%>jYu=cTdo zrhw)?H1$u;^cbh%+*Wf6Mqjxy!-MOEj36-J__AO7*yM?p#L7&OeH|eX$#1I653W6; zIK-4))<>*cM_)EyC~Rk)iVK5Y@|%c=h-mv^!Yl{yF{b>YzBwBp(REEzH%|r-3cxNw6{rZ^l7_v!d~mk)Gt|e> z7P}W(+P5;zfeI!=x;X<8Q1X`z1+pR;O1isue<<)Dv{@EjY^i#q7;;p<8R*aM&zH2F zAtwzeC(7-Q+KJRXIs}{7#3NWAVn-euczmlB#y%S>}TBRxm35k)xBER@S^+s zWJ5#8F<+Zk%X8f9q_v_a8&rBP)ju@oN>&2xJO9`39A~RwE6u9miZ;Wnn^Ej#{q-j{ z00S!WK0_a=lD@3WRA6M+eBgS&7v}LH5WKxL&MRuyggww zg1kCxQ0JxxzCfrSVWD8S+1jrJT=AL z=e(ftM2c7qi-{kUhJRCBH%#o*#13eL=!zdlzUz-3*Azz*pYnf#?ulK`%@QKNp89sK zFrsapJ{fm-Vc~o6!w74Wq?S>Hu!HF3`VUY07~5Y{F~&x9r-%1gVKCF(>|Xv1TkWMp zY?F7iWe>V9ShYAUWjp%{rMXQN<#7KW;IXe5Rj?7<1r#6_q>QRLzxNLar+LZ(W4kkR zbQwmS#t$6VmaOi86+e(6)ytPt*;8R1Qc^U_zxYw7etwq_HO-;#$#>K_aI@CTpt4r<&u!xQ#(_8o&$Fyc97(6^YyrfYIegJG%V?g~hsb7ro zD(urIN?E|QgM0aODLZVcJ}OrM_!FLSqhea7uh(q5jkp&CqH@A&0r-N4`D&)@o*AuO zKjP)3mYv*nnKMx>5$=1ffrP?W- z;WJaTu&`L^j0EUMB&{$|8{Gid8(|fY;2@8-W@;RPZ!=#+{xna7os8)|efo4sV>e4F z)}iTQ%|wSb)YJEJGsg`fX_#;URI-6&?=H_+c2<^|g~fP*uG(1uga^K0Z)NHWEZhQ! zm4~_dT+VdW(&g^mxc2N0w5QEtqGf8HS4wPbCTiARC>i_!U|VMicn_aGEz8YSbh|tM zQc)570pQde964$?hhmgoy#o4)z(y>$QV)P2#nMr{4kfFUl$6y1`1V&;%{u5ko?b(u z=r3QuFUHu|*u=gK$WR*Ap-Tk0`}P9KJ4HP-(LzO4kQs7B5csp?j9o8t4LL33t8kb2Ww64B@IbQP)-bHjcYuoxDBXu< zGLuUUABU(QlrLuwM(ge=?KERg$=-DGpPO7?3JwFIT8(o^AaCZbbofJd{>a_y=Y9DP$D_xU7U85i{p*;T_&fHjrdwJ7B&e< z%t6FkT-SGcR=cfuAn*e_i`9gqBrQn@g2i(1;H~4lhxu7$yOr(gy9y0WzZopz>ZE>q zYqab5U62Xukm<8|O-&BQ-1D^_D@*xZyCciRTT_b789sjz<#u2{2xKCXL^XfbO7Ryp zFlfg>av`8FGdW!8Pfkrc?0#6jMjVDy_azl@>2!h*WFD+__GxA?OLe@zZhc(atqPa5 z3C21+1%#*k2obE0g@W7mH}WE^+W(Vuu+#eEUs7MSO^Uj7<;V@q2^DabxL=NsvOtS?&nb@0@dMb>{YX9))b~u;HrIBE1qzaL#YH?ad zT)g;2`1$h!I^J`zX~QQ==mp$T<1XgQFQzXW7mKZ_MVfq1_j=9Y z0k6&SVLj5uxjwmf_uil&?>qZd`ka+zL!Z{vZX{6sbp3;f(!uPnU{no#44Oq$Pc9Tl zXPwIQ=ex*18;mcXs4$*L9sm3RSN*!+zItwPiG)@Vk_X+L=qZXwYea>qK#+A+?v*=l z!7*C!HdZeEo@f^KlyX~Q=ycwI!xidi)@|zYhp`aCb2;7XcG>!;=FEjbWnGJH-v+?! zetz_FZfo%FlCJrFtx~ZzJ0>1hMGgBQ*2`&_RM+Dy3od0dC=pk*Lw6&ME zUrShWeLZ6YeKGTbjX5ZEz-nfH(GhiWy|4_H1hW~2z@5eO$ zNjbUf{8XCbl6`clm^`A?gzB&moD-?l92+UAVVHCm7)%!ayfeba+-Y<%$*}a)vMMH~ zJakyZch?m7DVL5=mK2^YyM-eE@T?)jw}&tzG?FK$*!E_wTZ)If!a?z z$3{=p_63ayKQG6Nuz7daMZR0GIB`SLrmH+EN5j+If&8v-Bim8*UIW&=>KPe3KM2D) z`5~N-xylsew;F{g_L(~=7b@RHm=)~sfxRj=Qd2cPADR?etYMKw>zV~n_vC> zhgU5jG|&*3#MCpl+eGpSpC=?y%dX`GGFJRKDg0YV=!+hnw%1qE4#+xuZwx0-Jt}cR zctN15clc}#HnMqWeKG|!%b93grUG>(2^(Ubyd4)8cc?2;NX`hgU@_8nDi}EHCI)cD z|2}?cfj(>5LYuOXsS0-k6y?*+;^V46HlN&K7PhENoL;=<$ z2H)X``#j~O0RY7GI9{b8?H`9fz&)bPUsSYUN)k+bm5(vb8+jDI{D_-auHpeGV#1-q z?;5F`qh`Dh6R+Nt%-?H}V}g6yt&D%L(z&t5330v(McNY-PrEY=?2GuGvY`= zkNUY3z^hcW_1t93k!ksAb-TgRYtT0CheynqocgRM&rqxZx;2 zZO@RyD3XLY8aiO2UWv*I6#%|Wf3giIH(W~Db6&X-OFio6j)Me{XH+@qSLb6819TYx zvW5aM`x$^(rqNPDfPEcUiS59!fE`4sLg95&2sA5LFoXY7UorwfHlzPmkkA)=A`OsZlXliY_UidHoPa-9aNW9zK7IR_ zYZA{hUmnIbr&U((&i>3^54HUpNZ<6WNqsZWmh6{s5?~)J7{=6BSyNd@<@%%~#5kP_ zKk8|8Y-o1BV4tyU)+l%>`PWD`N@{wn^Cud|Q%Y+N8u(`yIq1bP)Mdg4}Qto$NufK8c zdx5^nx$n*NYV0^|TK4R$l1smuxpySuq_ljB0 z%c~xIVg?WV@}dQAKL(Rbsxo3;dQX}*SMmY}1GFZzB^{m~lZC}I9p_!U(-NmU44Ffh zV7gUebbm^?FM#QkQT%;eD_2a$2pBpOrM1^iEB_?G_rHhyBa$D%Ff)kW zp#~}JHSRJ8y^bIWf42fOdJY4zL?=)Yu{$hYQsPyA9C0$kf984AIrAba7oPI^V$x11 z?d0TC2d~5msJHy^hD$i1#80|PwoHpuTF1cqMC`|Age}U~jyx}wd(%>nbhziw)7;^@ zlE~q@-Scf8@m*H^Q#i)UX44OTXV`bPuWXL%XFU2O!hP=gX9T1lGjn_@;?J|7U;yHO(&E4E^(W)@L+z=@m{`2oU!_a19k*vJ_K~Wvz zB7eexSIgbMKtCg-k|X>fX4F$z1{k&+26(Zj!{LA}ybxn4jA({J6|jC2&Evgqi4I$w zy%?KNfYr?M+d)>J5^DbHUSCKX?cejkRy8;Q8cND5CPLBHHcVW<8}Q>0i8X+5J+s z{B5edAXkzg83)wj|7WiiP&FV7d6pnBKcIU+dx+;ZTl*eR63K=hAG<_9)&C2B6kRDG zkKq2`D}P3DH#;MvRBS=~G^`~2uU)ITfg0M^Wc^ym=|oDm4k(PdE`CbCO#4^Gtr;Pmkojaf) zLa%b{JpBi1>wl-gj#-GE12mvOB`FA;mzS3@KUUuROp!nFT#2NGb7@T3gsGeSUyC?% z*%9{vUG6i#7PVA~x~&6qQgY?O8{eafZE!roifu#}i9!E;iFuThEWp?s0ws0bEjc7w3O)m{N{)@ToWo9XslKwsvH5Bb71X@A~Se;;9&p- z@RQcCh3ameRzj*|2ryMnabL~hO!rXF0Y8%@1{wV);`4t!9T)U-b~DvQSy^&KrZpj& z)FfX5it|7oVOWz$6SCL0u*e2Kkd%Z7Fz{d_;rJVn(OW39^rB^d5}-;60#ikpw?jG2 zu_%bOmMrXYJd9=B2WAyWT_%C}*rE)i6#u>HA!2t?!EaHv zT~~ec5#r=JLogOMgP4>`k%KF9yYThlw#R-XKK`lhHKxyGu>py&Vc5*ODCZW zPknwo<9?&piOp2`5AXvH4(qn4yI32_w0#WPkGb-1KApBLU>LkUP{9TOAkqMi6o8ld z|L1)KU^cW#Ta;b2Ih)zV-A@oHyg(#O>7M06+*ru{T)Ig-$=b(|gSj5jMb+#OIX}HF z?O^Q%M!$;B4%kX;6GP5pwn5|6AtV;}pO!huR6KDTUGAR)5HgnRD^Nj{X!d< z5Am+6CX5Qad^TylAL;}Q<@}4g3Q_+%@hBGh{sZNEsK0{9cVJ?%riY!2kY)^)Fy=1g zH3K86upFBKmRl!_TQ;;nHEsUw{>D!-^VX7_aWcO~Ijn0Wz<=>PBcw8j1I{k>UQNat zhf59Vy{yz%0fQ@Pz8typP1%WLp^xS~{ z6-^KTqrwh`|I23{e$-oVBI1h;d#4I&_=&|)K*~^7TKbykHa)#>S2FEike$%_7mz*M z8rvQO1T_Ppf>i$SNyE_-78>B9cd*3kzkYwEXK$nPTW00!zbjn{z+;noTdt%vjC9fAREwP4z zEoxvPl5YRTe`hiN8jqr%f-usn$~N13;>Kz)dr<2W03FFE@qEh3bj=-FRZ&t!cVNJj5x z-kSrI+tPkl9#h&L+XW>}Tl0-5K!9vcy-eqG z%1Xp5P>4=Jm0pDfy|`QDl#3KT4HF-{y;0CERab7?V0;R zc8?I?5}-i*zw}_F2jM+t`NqwD6UC5~s>PdfARQN5B5KLfeS57Udh58 U*I9)DUI+sz$*am0%bEoIKS^DEZU6uP literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-12-1.png b/man/figures/README-unnamed-chunk-12-1.png new file mode 100644 index 0000000000000000000000000000000000000000..a3d324902deccd5364dda9aac351d8855a2eeed2 GIT binary patch literal 16361 zcmb_@1yoeuzwaO_2m)gO(jp}wp_Jt408#?d%}955BOL@L{rDd^c z{T^>N;$SZmd=h!}JS5{~kjlaI`#q&ddZOQMg!fLS!6oTFlBJ*!@09uX&rgW3X@5+z z93yF-=}ooJC#E1$JenyfQ+M=j*Wm+$?%Bz_G(BanKp^j?XBDi#LS9CAV}afUVmpIC z_CfzImmk%M4|o_E8P(%KED}*;KO~}YbJE`0WPJbr?#6WylEiJXWy41n_S~paos84? zy91$T2+jZLrPtfswa+(%s#oIm9th4%>Q>`!)Q)(%SzYlj><>J8gy;5I6}LNJ>p!+FbbTmRWMMp9M|(k$(P33nR^|Cd@60O4pb+=V!Z!|;#@ns9 z4-rG!6@M~~>eF1$vxW%jD~cX?rW^Mmi*L12rA|bimxsqHA-i#I-I z$YiWQe6r@%XUvSfHWX8d@~CO}OlQKw^f1dmlSiwmH~#9AcfA$|`7~xPrp;zVNa!?f ziYQhFvs0ITfruBMHp1Ae>h}xp(a5;-xz6$yN`0YvU0ILXU5_*N1w)@wNb){X;(0By zowP{s(BTSlQvjyh2;bu`x!F#WeX*`%nQvOYaMU+bIu7t}FsK$K9i5h=x^D*AY4M$})5Kt@)*IcO>m@(>0tM_~ z{P`1Httj!b9WfP4=L)-TD=r7Q4~KjM#RLd$U%VA10D0p-Isk$GfHD5nsD+42k`EW>CJ z#UM~i{FsFLM?*x_&wxNJI?$2r(J4PNFBB*gETS)uH* zQn}2OO-=K_FNB0{mjbDj(*Ox0-( zE)wf}k-0bZqUnOOpOPL5Z7`u05YXJr0E^FBR!`7fu*J&6)Q4skyV&-&@ZIOF-wcg# zuR98G4AHvK?{J`?gwzfO9753HQZ=3gpJg+axct=M^m2$-&KHpv z-!~1gK;A@SwfC*e*^PUpqL5otRb78EAt%^NFbETvdCg}Mu z8y50^h0K4A*Z;4h(G&NsrNzaACg@%ke5!gtU7(zQ>&eBXR;cXzC1v>gbG28{pl{#6 z2*YDT&xwNP41Hy2DWY(k1KZOb9^f$FgeA-5pl9%=$Vfz06x}gpuhaZMO^zRE&gsel zF;o6Vv&h!gd}n^s-c-w{O_Nn+6Lp0gA5*;Ie(|zK6N;TP%IH?zTVjY2yHvpd0`URn z1@v9`uE77tOZq}wkWY*Tk;2dq*jo=-xkKJ~sT)_$VHVDgmlA6^_P=@>6@tb(BUy#T zFE?|T5z4$Na!t&#%#R8~UZ@kBXx+O*i9ukjH@gYgf3($+DgF9ySt+AhLIVXRHGiB3+)^hq&_|I2+q7B$~9g$O|dVNDB27Pf>%{NuoG5mWq znG(_T25fVdPX1XH#>2V?i>+%puhh!)HwIJIas*Dt6o^8zcGeTH5D0{5c)wOoXR!J)oKw6Ob&Kp9IyfGJpiV|**K)p+^S+^`PTw(*ks0hy zE5&CXAGel+WJyk^~s7ayecx_7 zLc+%DqrNq-9~LuJm{|C)AO=fq{>ZakW{AOZN3eYD-X9>K!6kb264D;VGe4Cs9C)OV zEt{tO>C>mPH;jy%^KSdV%kq@+JyAF3M+%g#f6}L>rpn?;NJy-jE)6e9>YVmHPsdf_ z(=x{R+|K8mV4jz2%ll_Lh~u*vE0xX30+r(Vphq;lLkH~ykOHlGKstd`o^R>tvv&+! zU9U8(8kIcn!_1R3Stlz@M*YCyuY~6@%=BI5@*M}vnoPDPi(&DsTD`K2bDXh_==t>U zY_y=X8)~j&whGI;BdF5Yb$q-T^6tCa^!gYv>~C?HO?x{N+=$uQ*#T44Jtgh!?fonN z#KSxpQJ3LiVTC0`6oRf5P?|=!bJk{}o-$3H0Ki=0m<^)^#G;|>*^9kb-Hwy3x@(K!bWgNw-+Q{B z7uMC)^FzB#Sy@WPXz3G1S#^dGCMG5tu+3DOsZcLE z?aynaM=rGo#uHrNP9k!1b8#?WIw@hn!9Pm|Dft}>fDLjzt+P(q9nS3b$4E;`QeQGc zPhFbSY;t!|R#ryzo$b!3U|-;R4WJR{-mB!g1so}p zkslKN-fU{TBd{l5Qc^LRf zIM##v`vjLWuhn+oe$E+*t7w8G?p@IHgr9aH+Jp1#PM#B|D|=x#?sA>`cock`babNF zk;%!|mm6vM@)03NZ~VZKk&!!ku9;=W62O&Vc}_Ulm;U4=!`II)K97C7oqwkn@Rm-* z-o8R9Q166s=&!9u$M50M*P_ue(zTKzp=XOiC~ z^!jS}xGVi7Mof1b+%4yv;BStH8sFF?CZ{FE8oIbh&L0E|&m=>hld*q(hbU;ONp^gJ ztjH4xZ&M?&C$UdA4#n!Lc?E1I{OP!ow@ty&LAwE#yxheb z>KH4+;MBA?(KOH|RV-RxF7J7}lv5}cvdllnUNUK*Z=@} zakpElBNaQ?Yd@xPGr!e2U!do!ZhXDmLuWEu^#FwZc25B&IED;3Oe<0s+UR*tp{@nd z6N>~FwfAYm4~O|9w7n*`n{#++Gl9gfs(wMhS>6o__%on*W#6>2*eHZw3?W2|4M z_OyU%vT`y85ur7y@k^9nf&aG2Q5Okbn!41SWW|lUJ^UCiBlI>+JBxnKsEQSKC2crg zTJWlLJ>TcI?LyQ?ygd*11A`y@py!Lvwh2h=#4yXj(2zfG&PvT-ZU=!2xF0$m=xn{Q zcZQEtaKH{n205wytXH!r=ITA?(xFB^$JZ`qQq}ch6%QUku@zQ`!lc6=2PPk{@IW-M zSZkOOul&I2T3sx+Cf_tCt<|xms+Z2I@PJ$GG7aNNDDbHqYV+k=;PnEh{3a~!X}rS7kMVs_(FRcF0#^aORY>;sEKWlY zkkPnySJ0RIm*dG*0<($5Yb+gcZ;iUF(&JNyobHL#KDO%N_BX2vOc$CQzE>_pHM3jf zO3&+b{56sJl}hs@jmY)xrE$?pU_?k9!9!y*y~of&MBVj9^xpkg0SpCfYEiB6VyQt~ zD>m{4GgZOpm(#Zs!sqU@Zl@NQOh}A1CBS@t6&=-{9o5;&OLVII`s(~RiuYB3Jr?-4 z=DqtyP1G)9yn4pqP7RlP-Tgm9Y39NgNo~iXo>pzP4pPkTC&kp?Oj^jJoP;RJ8Eym{ z2Ilt2rw;-ckoZ@PX7*j-(mC6-w6&fdE1PV5O^P#m(E$N8Ft^)$&vU1}3!9vs1VDDs%6L~uHb#HDg&t1@4a<*(rP4R~gMlGvKDXj(DSXn?7 zb=Bf@2qxt--QosRVz%I(mD3g6iYJwO;YNSo3{|Wa^B&vj=u|I_)zn6aAuDLUxM;?G zH-2G%FwFRktto0S-OF8Qzy50iSiyIjGVR;s(a>A2N^${Ddl8RJ@VcX3-2Ps@>)H^% zLY4-Vi_yE{zMVEL`?-W1+*@-6Rds^I16BJdE172!wrdQ}m=tQRA|0cn;%?s-`Hv9K z5_)NxyWZ|yYPcSjB*N7_+|@op3e65BH8p4bpLiUSFCj=0S7cM<8r1el{8t~7Mvxzx z&hfQp&{P(-N>M_dwPB@&U1LrtECkryg?XuF)6ui1s%RjLFqPi=u)S@vm??Ev!`9h! zvKsq?f%%3KC6*TV;L-YVASkNQ6M1%8(O`Mkc^|&hkiU~2y*)Nk2Ojt+|38 z`otM@$NwC|%ACW*Zi$vE4#;)J$fwM#>Wj(g1aDip-A1+QSE&yOz=4cO^QSOz$KB)! zmNz^5JL%l{2-3u{s{I=dPZ`{iB1RDCB5doc{-o&%*^0_+)%U?%hP}(?^#|#lIZlPC zJZ7aj9a025k~e#WCcXh`JjKo>)MCdVka0F2=GQIMwERNwGA-Bb6hDCH;XBY6hu z7i=MJ=&fv_c&D6Y#kD)QinwM>6kPZj00_~;NEW4%wvqN<) z%Q#HX-MgXzQb+BFj(MY@^V1$jVow6+g=!Ex2?0G0(2$XE@}8n`RPCigohA8#eFvN1 zg4S^Sk|p4gJ${4TEwvT>?7k3nbB;CC9a?JZ{(NcI6{B0 zQ~S+Xsx%nD-o{MV(f&C#4)zLnb_94koD zYFQ2cC^^CA$DSyYD4p$n@%bXCCuTir?VT6a(_$Dt7dCZUd;5S+FE=?mZ9T0YHUUAk z=>3*=fvhT@A0`wBGd)y-AD!){Xn#yfsjFF;sdh>#n^Uv7e=ij)EhR8$=d6 zGA%95Lb1jGc40U}6IsjwCZ-)z(WQcr;%X@MV9#;G{RnKdA zQaGQ|%H(OA>l_)pspj+qmnOSVCF2E z5n4Da!i)M9mm)SwV0GhR^&u=GF@Kl?;c;CJlQ|(jway6|U5J$_9dF*O^*X;i@M5#a0Y!6yQSVnPzn2IsE8TF(*Q$ zj>n%IJg1F0d;R@8*BE;4)m~bLj<<;dua=%ZVmGtMVR^qa#yLG(^unL&nX+|%@|lP8 z%~E17cmDIfY=?|3o;luaE^7vQE&YI~O0#ya*_x(ML9fo-ZqLnQM4XDNAF+kkEvg7! z@+aV)aKQrPygE2~VmH;zseUqk?s!(K(A3?`nv0a3_O!8SydyE17bBOiyqqwm$jiEj=KO0v{kT;HG`*6Y-`_jdF<7I}L zAGj0gNL4iYyvO+AIlElxJryK*bDv3&q@|lddlg_5-h@*Oe0wGL;6bFP$Nl>t5X-YI zg1Vd)=IE}$V9%1y;D|033DT;(tl{TcZ-*ns zcuc)SPCi-RwH>qH9DnN*&p{;ZW+NN;Gv9E2{7u>Hkkop~GuAfDrUO0g+tMh~;yo{? zhK{ADM}Zq1FN0(-d%a%gL~c8 z7W{E+xYVz1_QFU7Kfmi*LH!whL*3@?38z79S6jh~13Uod=Y1#dK;Xi6f5GY0j=wjB zF8TFUpzS1)-_QT)LqVXV{NCe51`F2Y)pnpr=q>+D1Mo`!xhV0!lDz4r5a}YxRUgd0 zdC%j%0TX<)!nm6~kHs^`;ai~>#30a@kFhk)lV8{j-PPRZ?CgX*QETasAkBP67OA$f z6<8n;@h5aB*XV}Br!~pnLrBB3 z(T;BK2jF8wDHKJvP&fhOC#rYcWqSD%44pEsx{pWtvfenlNAao|K@KA5ilpuN%zjto z=Z8!=>~!^?^wAPgPn+_d1npPxf+@La{Mbpu@)}D+*m6(ixD!9p+kH+pRy>|7df?mo zTq0^YtG6r-mAJZW7s$=(dJE%_iSSU}HOL1}+Rq-7F#3J7BXEc8pAH=%As$M#QU{~i z(ozxM^Y>;EWYLHZ0ESE#y4FW!&GMmpsSnw`@%=Y-aYA5k34k3CR+b*FD59vqy06suOVlrCy zO{%XV2kE-q3JrsPlvtyn~11h5JwN=#7 zkux-mobcCFx3S6XGwAK_m#b1!i__E9eQL55Q6W2P8|y@D8t7DDV5PNLjdvQ*f8{EE zIN844td_Z)CmQP=Z^zSk+`nUYlbZDUyNPori=w-`J7N+@@%6GIb{*qy_ibxqED*%{ zYHUi4LymedW9c=|uAWL(W)2RUuOXe+MBnZU08-E`XC{a1Cte_bv7Z$|fP$|5WmN?eA13RL&vuAA5bYY9NEE@KtD zeRdJAC)#VQA8;DH*~&6AlQ3mTMi;f++iFcF{FLS(Q>C}aeQtC2tod%)#@f-J^CLiT z4RX&|)X%=@(r^`(fIc(T8qSoME{$eN&DnS=2m*zu%MpM;R1s({z;blIdCn`9(;U8l zfQl+LW~61ucPAcvrkk=q5&ofPP7OIJAwQ*nD#`P%6iH@#72ZXLvG98FmUvqu%bU+_ zzR@Z?m-}T)!Az+<3_z(9%n#?vvu(hAq+8>x+m~ntYeE*G*6^K|;HOU2p^AmRDPVN5 z1sWutDR;=drjRxdv41~WJ=r+R_Wq{kwAeeIHf?84JZd#Fj*$3W7EantqoT&Amd2S| zn1zXlX22ugU{>6IhCO73ftg?-2ze)eqN(K8+Vf|HYT?9YC6 zV~lnypw)kk$S)HP9BQbru=JT}a94*SOmjoaH5EP^-zBW950TGq!04C>UD$HdEci0BLob(q*fHZi0Y=R#-{yFD5@; z2xQ?U(#|%Sp>JY&dAUJgO$FS^ORi&CjUYDD1PYqV7EB#u>r1lAf(3|W%+Jk$xD^Ti zWexkkLFIoeeP77PUA6AQtEu{5D!aAbo^tYnKqu|BUVAA#GPg9P7AfWY;gzmBm)DQN z#zVExHSmMr57AOis)>VYR2+E7=6!*ziqvshe-tjz}(LVCbLWT&#ER$dh?#6 zQD?H?-#5sF<^J*fIw7Ggbcm)t1wUTj)^JDAd1AcNvcS?`NfeD?(r^KWJkL9GpPQzf zv^wv}=ovc)@~7=tZzMEDRFH5ubz2NMd}4M+Ymnb?-o>d+cfbP*DtwI+9ZCLZu%TPR zxLkoD13%hb!q}^+em8%<=-5nQ&?0lw?fG#TfPp*nGocO*aG^)G;}uqhjb}$l1^OD( z%DUZhs=fNQ?Bx+9+>2$7dLDD37^>k4yLdwz;zmOZkhhQ@CnfuB3dZy+jTGdfR(G@K zZ4Zx^M4w=-?bQ>Mn!|?yG7Jn5HZ+gCmEX~;o^xZ%Mj?QUo3PqZ=xQ&-w=sZ6dG`Yb z2;>uiPH9%eU}hK~1L&#!D%I-O5yxY1)BKT=@mu*9T&0kD3W=|^N#fx1R1aDc8 z5G1uFnb&S)WW*0_V`I}ENTA|4e7Ogv77-U0S5-|wdpbaY-~)iC8#n!HnSmPaaP9#w zRpzkqo5VXSbF42PL#KAn08baevK!|QZZoaSJL_UbuQe6{h3;vk8`k6ZWueF`g$bUu8J`5m@O!ki@LKs*VO1( zDD--GNm(iu3o!zf+&C+xkM8*)zxwi)_^TyTn^=AS(ubaf^K3tG#+t88rt~FGEAiG@ z+#G)Va#o#YEZ!4br90XoK{!K0zgXt%>yK=4+Mdwdsyk%Mq^O@cxVqL6#8IWF$kU2M z5~wRD&#{Oo>%>hMI5RTkt6s{lEHASrC&b6+T=+nN?3+H}%lQ&n5!^^E``{(^8<7gI zCG}I3zVkIuLn$kBFK=4C_@R`B9Www2Lxb*6UDry=zFdX^J}lj_oc^d`jzP1K>=^}? z({6;htAhSJ@(@7nip%D@-{tfMQ`q&9VRbhgT%r0KpWqkI&i*+wBD>de4@d^zNl-*6 z$!5hSBg#FGzxezzjCV32RX|w!TgeR5d~=?SUHARc8(w;0{;s%tfh$LS@}ZP_XzGnd zZY3uGBaP=LPws(0O8>4v{zILC9|ZbN`QNcy{#PLRU(jFv-3@=q0KisG(7n?GU`H&| zKRD?4mVApC6SZ{cOFdizFK}Euv+9$) zeK5JdYbkitrJo7hA^WR#W-U9xZ;S9%}p*8;m>iY&B=B9v){S7DfoyOaWd& zg{Fqdwc-2Jv~Ho?@oOo(3KR{hx!pVtsF1)@@miRNNx*eA20R}P0txH zwGry@rVPe&U6;OR5uIeWd7pR@oASWUcBwRN!DIO_LeuGXJMPN7>yWs*Z!;$B{zmOe zj-7sC=of&&hT)}be*q_^yg0uuK*2B8aeZ0KO||f^{rcoqttEynim1+pa$pVB6M3?e z$u?$M3ZVMtqQ)Vz?!jhX+le;n(qZ5AoIbk1c$tPQg`1b~PNMPe#}*1IX_qsWiibQj z%Tbi-9=BzQ?pG;h?W|rl5mMOH8|HB2AG{Q@Nt_6Ar z4U+7!E5Xn9VfE8fa(BHk7OD8O%Z*=rFOWz!6@=wg3GBx&V@G6#iweYAST7n}2)|xQ z`U%U=UMO<5YQ05vaVfYlqJeu_P_OolUeYKMur7>j=#@>k! zwepBA)Sc9yAOqmdC|jkA??cEb|5nd|APw$U@blhoBtGR-{bu(#!z_>UXu@&JJfbCwtjTbPdD2+x-gT6I^G*^nb$K)$JQEA- zKY7Dy{a5%aSV0KIwF3bhd}+pTzJ+RD&JUckafq0)Y}jAF68@0fDE_2uRLwO}qznOV zvqU}L9o2x2F*eyIk7I!D@@ho1V!rTHKe}uinxw_A-L?${)0sgM8j&HWqAT65i@-g~ zseA{&^2N4PTU&|4G+~9Ox21Z`KzZV0Az!79)wPS>(xuhY>!Te94+fN?b1MN7Amf0r z9jhp-@q;crkAB4VIL#xvX#Lnb7{=nx3vV4~f)&K7+1yT3yCKp}Df|w3e~JffyZq`L z%Ho?Z*R29&DK+`eOG~NJ>~X36s5j5VtXNV7x2Q&&)vN801Sm4zqqUnbw~9$!Y+S%L zf=>$Oun2;B`px)H!bhamvbps(KJMEbBnk~^XmKqURa@l3K0kJU#+ zbcq4vpxTpEw%>0@QYMxqHYdpZs)qL}~Na;vN;#TpZe|FwbYVezvZUr4oL*p&zoW!b2gn8ww{JJj@V3c*Oi})NKDdgt1=-{awkQ4m4Rgm4d?i-9WT|POjuk zv&X-IPd-xT$7KEVewW_5uz4z$2E>)mZvQZJ&Sy(S_f@cZ{9@tkn75bvQtQc!La75~ z9mAptI_ExCtp55fN2DCj8?SbB@cExv%GdeP6d;hPh)u(h%y&enw{R^Vr@ns zC|W&e+b~RPJS?q!1xpVs?Ws5%b|?f zwyse?FHL)~?7CL(Gq|hQ$Ua32dG>@rT4U0Fgc#LGUqD}}9C?P}wcv3c>mg`2@N^gF z3))CKD;|gW_Oaj_D&|Db9Tqg>pGaqvy}@y8aM}1Cj~mcXXL$TQ`^;2H)nXb8h^*C* z)EM|D_ee6cXHrp{ed(uM;u`3k>DN~)vSHvK5<4imfw3Tn$IbT}eh%SK`+aL;qvF20 zS`AGeRC$V4W^J6)jPogF-gmqpv0_c1>x3 zqs9A=M3TuFlUpxubkR3`QdktCXl@t{1bFOsIn>53NE@u507QlhLbYJ+6E4eEVr=KT zpn$x4i*f^jd4y2xd&`M57gCJ<0su>R-gL~$Z-P$o{or9EfJH)h=dnUua=31MrpTIZ z9*Y6O4UN$0!s4+yzoZcJ-}2j!8+Ve&$Xdy zD0T&!>M)_ zvK{q*U1EJ!AGmd{_=wgnmEh4E#FgIoMe7>BOsvP;o7cKigr_mgk|gMj2m&Z*D_;y< zG=Z*#ThU1E69H+UhUk^q=5a8MK3~57cy_a*Tgc;);HV%?Eaz}n;0}lefpH+780H&+ zRW}^sbO03z_`ticRpaDMKBp~4F zi*;4BNZYlm&9r>Z?-<9|t!MS(2$%;boV+`|*yzQ4XD6AgrLwHU;aMAo4rE)u$~XeD z4ewvk1*A%Yn3Rnk#X%!lH;VxNGo3WTe*^a)xuT8ojogoDikv^dDV(9~O?3~Wd}vz* z!Nv8pJCI64XGzs3?|`tmaqP=hbU0E0G9(k-KSZooN%-Sv5&O1&cX$B0j=V#LCCZ0* zbU+yf&@P#orLZ4SQr_-FxTwctdab5qieUUsenEyMGmMl>6Y}V7@;vMAM9UmFZy$&U zhhhE&B25~ERhj0Wt(GKjh3yDA*Z$eL^)T8EOB%;hsAlHx+YGEo2ds7SU!A4Mi*W%Ecpxmuj(W zC5L+Zc-3l`jxh7A1-#I9O9-%~pY9!66phv0Emj@4Pc0C;xy~LJ7S`oEfkk(&dJt)+{Ez7M4)r=)QMA|<;%KyQ%#6;@~;6N6C+}li;9udo05^EKkE(+!iBZnwlnBaHg)vv zB=T}k%xF+R;LqANjneGEUn^K}1fR_t3)rwy<&#mp+S_Jp;<}tX2p{sg5rJ?Wr=Wi~ zFDzWtDtFZFq<=ostj>E2tvIb8BR5((h=82q?T1LQkxMGHrS8yA3l}Y>`|Hl0)=Ceu z5iFv2`5ljCI2L2zEV%0#nr@2W{6n0Z z`FE)Hm;8&~Q6aQleB20V$8U;zAIcOmsG5%cfes7j*bQRGW#uTm5kpH3fQ-(HA}E8bhBalVSs$#uO?5@&I1ozAhIOvhMT-x z_?Hj<%_Bs<5FYO>s}Ddm@b$2zsa-A$dhp|2FJP#InVp4rrDQ-V4PpTxFmtlXZ9mR? ze!hwUn1_&d-N(zlxH_8WY*I1)cz2rDHCj!U#hW?p zKpdy@8@p}=r$0;yOErg=xRp!kOPP<;mA+*e6bG#5qMl6r@%b*YSKCm3&4u^X+=O7@ z!1^)C^bb!8+45f|3#jwUPBG1>tkK*}8vb008nmK2*UlZ4Dr^E4S7B4l0M`8>z$HmE z#MovRY!<~lV~NeT zSZB=w0FS9aDAm4X4V(|?N4?{fjR6QgLRn%I>WEMz<1Oq$Qn?WfG$`LL`pxnM7(S+CuY`rQwUH z{Nt1v4>)U+Al4ID=t$y28RlZ-3mOFDp@6fO0M;T519m+3ay&t}y^=K@ht~H!+R3~o z6O`cz{Gduh&P1$Wq2oXb^gdMU!X1HNIO&bQ9~v$@ho=>+tr|pbKmH<2`wPLl0V~@T zZr<-n*LG_d-+2wV@%bqJ(6i$Mal-+g8iuyRDD(935~d1QNJL@mSQ+X`C_(JS74g5t zL{P`ci-j!Ad5^^bWZJA(yN`#FjFnqX`w+_Ade4Rm7V|e2$v@HI;JV(B=4rgfYrY-^ zI3WCDWMMXfd(GvS;ivp5O*i8;_W|)*=4tv?FI>;>ZMVPh149R=tJYL+hOeD~xp(798^OhL5wuwdWEqz0?8f|LyqfRkHI!bM=D2 zdF48QB9M^0qT*2(5~jF<1yMWlKuo60a8vQy{<>FQ6Vc$bAwBB!mQDjjvJGpTSQa`S z_1Y)9yxPpCXS+ST9UN|=T<}G|okK0SyVKRY^|$q^PYMmnJ+|4=7PZto_tt6jNB$GV z9__#3=hFulQrf=p98IpLz8#EYIhtBxg^|3K1Q)OMy2ypxRk0&uVrW06RI*~-{sKRz zImGys_+~{lf4FC`)~l~dVZlA}^M%-^neZHz3Z-j#L{_#`6ZS4<6ToE$eDh;yM@NVG z?BX#Q>QT_M9((|6WiK=mq^dseogH~@^l@p+C>c{7IL*5lAtpI^`bSG1U$CHKw1-M= zkN$?u({dZ64foL|?m#jqg3Q&fnUp(96CxL>8-vb_`>2feZ4J5JE~u+4J+YU$|KId$ z{uACtz7ZbZit(DGSE-*MiTv-pTC zF!Z-4ZT*o<0a6*zOr?5h*+QvYA75q&+Nb-evOs4YmrnYMNRnpq#BW^lHl~I`(Rw+! z3L4AJlxP62X7J$CE72i{ob$0IIS|#N4?jogrJD2x0-%u7z>qVlg--Tg9AT@XWnAK44-JS|FS{y zKNXiuAit$u!rL^_aqrf8EE+ITPoJ$^OGRx64%#uoW%qc~ZC{TQjn*`x59UuF7dbrO zB76+bMLRcjVf0p!FlwN`L>>P&_=PV%0?k@Z=zu8Mqvk{b+y7tnYW|C*M9mebl>(z;GQ!+@Y${fde4 z;dyAtJXFGM0S;D;*n{qO{;xa9(1KZWuo!-aki(s26_YbeVqu#9T=sIRfL0=EIQIgC z>z`=yAsX?RGSj^LzHj5qKhL#zD7gT)FHHZtzdNQs!%V#cW|=|4Cva z9qsq)KM(lgCGOK5F4gCti*Px|W2_XYByn5qo*O;j}p-y3J&&Kb9*eD|i|+q2z3^ zIg*va=fL#p)fm8Xu&dPs{!y>7PM`2sTp)m4|Ng0vb8=!|hwm+07o$S9v6e4E;>YYCKYlpwPWuN0m}>Q9iHeC;Tg-4%zhAmGb9tL%=jXfFr3qnF&=RX{gcX=y2Xo{o+Vi+Y9eST4YVxcf+AT@KK}KQbV4 pFu<$H``_yf|JTOr-%Y#nqHNU`*Q6r?+7dw^2~io5BIswI{{bYiP^16= literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-13-1.png b/man/figures/README-unnamed-chunk-13-1.png new file mode 100644 index 0000000000000000000000000000000000000000..2d750762fee1414abd81af28810eb026eff00d1a GIT binary patch literal 18501 zcmbrmby!qy+b%qSh>DUTNJ}aWN|(aW-3?MA-3$$ibc=wrbc1v=Ae}>ZH$x0PG<)Ii z`Ht`1$MGKfd7r)ifMG4xy63*{bzXg5D_Bup;@K18Cm;~$nUo}083aQ81p=WgJwgS} zobF2+10Rp=B()qtAgs3gACxZJJQEOz5+nuwpz4~uHxKc|KfS{^K$_;7k4SB2WS1is zRtOcrq?BJXUI#t#oTn6~7q$2GhK5jGI=}iw#qjIthxa%*icwAI(&>uQ+o=h1`};_V zvTxr-y4Lp{+yp6vJZZYt9T8bQP5VL+ByYf`+x=Wjm8A5556~lQ6l@Ua*ZW7VzyZ2Q z3mORY8V8je1bY7k=KwhM~4wUjR7zDE@|rS?bFM(HIw|ps5iT<|C8^P)Q|5$=Pfxn zI18(7CL{S+fyrX%czf+|wn-xY<9oJ!+Aw|^=?|l*dYUNo61&BW={p^djGvrbaKVkb zTwCj+7~mgd;9#rY9T?3?ZxJvneYnVbuJa5ziY6$u$MHCh)!@V(5o*v_!ITnPPZx#0 zd0V=$7=5z4DdTf_HlV*LoL0dXdOr%qgGQ#`fg8f?7AHSqU!F&QCFI(Zv=}LdK!V2d zL=xxN^G^L&b4isaA2_rSY}O?%xLY>ZaT-g)hk5x}83{ce+7UPn_kFEzGfrc9nRIc} z9*>#Lf^GsHHT+}7?2OAmMYWkQ)_?HLHFJ#f3u&Ga2K0ze$!)nV#yn8nmKkx0_%x;E zS4g>pvL<5|F@~$;c2?3+vAO%1Z`p6cB3}meV(H1*P36anW~b)W(L+9QxW#+#-{TmR zW{u3Jn+cJ^r&{8Z@f*!^6q^QL3DxFWdJtZh19Pof6kg@oL|!L~1QUdyqmI-Y^O-_R z=19-$4ohl&aU%p7i#-z)g4DPRr5yenYO{G`BpX z^BYP=_)j~VzK~P16mV*?@FYU5#tJ`lPdM*M7clLR0R@>p!D{yt<}`!EUk&D+@X0&> zos^O+__6R-)_YyzyA)ZDdIj!|tlOX+;I6awepu38Py z>bL$UkfbTyS)!(<&SpVb>;A|_^t2Y2@7y=`;d|%b82@MZ)68g{G;$sv+_r5NEf-&% zSP=*8-AlI*9=-X+A2Nz&9>k?+SAZ zkB{@_XwO$#=vi34nEhnHpVxE${WzQ^ALG4Ldyp2()z+eJLm<=3tGn(aa80eXu8!!q zL8VbF&*)?d5e4qZ*ssUP)WM^5o55FVY7U(TLd~Qs)!+m4!$z5Phs$$}$fUzsbOX}! z_S)qBSQOY)Q6dH5EO}b{4tpi;`=%h=15YWXd@sZ`WU%IQilU3jZH7zCf?HAMb{fU$ zT%BV@d3n%lI=YSg+*G`Da`xE5r#2H@zsHMyY$auv(6VivUKY~N?738FGhhF4$6TZt z3yBnlFW;Q3BGYpeIfyMszD`@csDJ&4hO|pc@2h90rf|;3_HX|wuCvCn0rFeym{b^=n%?7pr;%fJ)r*EsD8By~}ph^Xlr|8pPv*EFIysWOpdj|#EHJ^wn&Web`K(v(k2kT78=ISTUKY(dz&rQ+!=khZ6jI6E;jFLE) z2UB}CgM(Q4A=R(>SRRth1DNopktS>^X-n~oZ$6u7=(zbF0Hc5n z>Hp}Kcgloz=$XT>ogbq*9z3KP**Wd?urvZb7znt;{ZKPUaifPnuRRM$?2j~1k6Lxp zhvTiu=%XN98nRhFd?Y}0uO7Ze6bJXL9F$k|sAJZHmQsy=DreO>;Q6!n&P zjo^ShQUZ?mptIbn<1Q9C(XM*PE~5BRi|WW#z;nQx1LXXvjdmSYZZHDD_b$c=4Qhu!4A2RbZgxlivE_x2q}< zDa{!kX6qDX4HOi>3R8y1S2#i$nYaoH&N8NX2HTFm|Db7pr@?y+TV0qaXSnNq5z8;b zTAWFA6t1x%UDP=B{JU}qyS*|Y>KC~$&}Y8BcGZoI(CNz8Z$7|9)v6)Rj%6B}#VUhhZ zj{s$~k_&*k(b{-0u$@o0yMDwT4L@^j`T+k5LL~tl1e0$y-wxy0@(V$VsL^N(Do!jh zp|+&ir-!z6b#-se22WB)auw20&>p%fX#M`!>W@jtkd`Q$(-TAQ0sHN9cWdB%(c#g1 zgIruJ(yHjqCGAqvk}gy)77rs@7BpS&jg^QXJxo0skzw6-s_)G;gQeytpQAF zB)MQ?Zhs1YO;%R>HVa>(T*9*#+%obhY=&QvPiL#GXX~8{kw5HLJ3Bf$)Pw-tadXgy z-DI{kQ?;|y>erOZq~CbnpYS$Tfs=TEv9xhTu&vCv3o!osf~MyO%f&i1XQ>>P6HF63 zm3wq@iDAT?y&eHomXrIlH879fEUB3OPmb%OMMXsy$D1Cop;7~Av)7fo!o~G5%+b-2 zF)bi4Q24n2?ZVsZ(@6uJYO4f64=z11LtDqy&Tz0(eU@z7P|}OzHf-VKA3s!i{YJMv zk@JuygArhqbkRU}1+99gZD5<4a%Gda!VOs{s^sM4^vX?wkxwBDZf3diDZt`W1!rw) zG=$`2Wj)uTB^u49D$PeD$oLy`1uoWNl$4ZW6)>MX5xQ8zN4#`L?t2{%aC<1=!nv=8 zM6sQBCc;acuFnr)LRUrVwiQa5;>KMOr>V;|i{7(!j=9JmxvB099316G=HA}7xoO^T zK|f)2Ii|kBM9$Elxef-)L?Ncd=^W9%%hJS$&xpsGJRpcS1cf=hxz9+rewd6qooo#g zFsi#MlkU0)oliI|vRT}2#xv1228r=jSFfYX%gfaY)!h_=gM#vo7-yQj z8jwhS28M#((k;Ngs1a{3LZQggpv?=0w^LTt4A6|5D`cr&!-PlgT2D-qkJ!b zOr?3O@7-R_A}}1!g0b^3@BAPpv$dMHSbl!K8u3eZqi@L4?qxgGgb$^Y8W#k6b9Kk1 z(Axq}i+99@*C8Bl-xj_bsW5{9`*oXlEePPx)tS04K`4upsw2{4IPN@q5&M({VH zE$q2yXg%pGS3~uNr3wOgI85bmhN~icVLd(hBa&BVd%&QVr#qn`Aq;6QTSMv6EfoAN zMbgy9onePq=Y>8M%gf7ZsLj2$T);yCep6FtN>krlo;F-^&jKP=h$h6ySlDaH@3f`3 zZe5~NQ&M|=^plqi7z6J>13C~$;XTE_RIFb3vyg6~?YB!TU5sOGag`qD`uaK`a}}Qk z3LbcN6yzV71CDuVgGD`Z!DGG7g3t5(0DvRT!MLI8FiW>RsSeLglUza>QVstgs~z7c zl+=82caO7ZuRJTrTX_ zR5qBgS&Y$q!C={vr=L#6j02dtpTVPIu=rj5-?isw@f5+@)s1jyI58&!CueMsva&L; z-E`7|R6Ps}cURMdL7yc$cW`ls-wfYml}PRv>?l0J#2mHoN~y)|uGHe?i+#dRahlbL zt*G~&Fqn#p>ZDfk_d@~l$T8aPcp?-S;VrvuJ|HaK!v)kDcRPUgF|em(V`A$6R1vHg z$x~Dk8VXs|gYzhWd9x)5tq{T`$keSNb>&G~2wluJJXk)rqEXkp?Ry1N-%;cD=40>m zd*`6{3X~$x8Qp4A<5Ahl@ypQbK!AccB-L;c{K&QWpws~QV*1HqQgvL7DZ%E}LW&{T zTWi$@8GaMdfT#J%;}n6T95S~88kJfHpGp}Q-HWK^8E+hR^B>5-;2X#^O~-gTrJ7La zT>W7kIZ|j?oSi4a*ll6iPEt?uV;;*=ED|LyekbTDOMIyF5|L*(sfCsc>TvF!85^)p;z)aub<)S7`H2vYFt~ z{1--+th(Zk&2Va4+`2I3%?p1Iz6Rc_Q!{iRsKkXZxjV9DlMQx;oe@`E-ZyF5jGhx$$#v*Li3c+%z+Vi6IQM z)g&t)n+>9Ye5d{fwCx)d+GU=rFS(lMzndbM`HgRG2cr zev@1mx`8yFmKW8XMS(oCp(v(X;h6Ag{2CAzy!h7VV)!WNM@h{yim4T4Gmu7d{a#Hm z#vq?@{TzGc;Acv~ZUJ{&>HEm|Uq zcxE+k`KN0KNj_EQIpL?rAEBQ(U;uYcJKY`f_+%w3=wa7$lAdCd*xdI4ydPtLWxHtK zeuAj6(&1X&chRFSYV5|vEz2bgCl}c76OP!wHJlk5ymNQ1Nh>)m8YdUivDl$YYAuWgt+l-*<(qEcK8* zO)3`Si;YhHv%wu4k+lWhtDV*Pg~g_gU=vQI?E>}z@zNWIeXU0HES&7qB%2be^y^xVIN-7i^p7dJ5t-cuSWxoX}P7>pZi7! zJ%I#*Ps{T~Yj>I-JV=)(=H0$EVa8>T+mA_WI`yOXo;9Q(k;~c^vXE^EsT@6X-;~6{ zjh;<(+;1;|4)O@tr^?(+)Td&HTbt2Pjl8oSS6yX+9A`sIr*kOk*IJ)5<0?ra<29_v zI_dMugPjDs1V$Dl!CBTLD-Ww?_i~qAEC~)~_E~QlPieWV7pQHA3NgF5#gfrLk2+Ke z1~s269oC-YEhJ=1H9|H0Q7pyMr6r~F`bAY7Rv)Gsi>V7GO3t!1w+c6nN8k&~dfe{O z`XoC`EDjaO6{$I14An8z8?IZmo$p!IYZIDi!goKc}lN0W| z^<0sg>~4U&eddS*bGK+xBXZcktHb}zUIZlw$BLA&a-Zt)nL&|R36Whzqhbnl-Xth` z=@UZ$Pb3RNtJ*CqZ|Ovl#ayJ5v>eC5kC1Mue0_+v5SG z?4ic%4v?`02R(+GDOQ(|q`;66-h` zs{|>C#?K=NF|cNbsWX-i7IvpFN>B%tY8$9;r+cUB$2SXZc zZQnhZ)Ye_-FHWwm(AJsB=ClOPo^O-?P*viVcP(~HdrVe7d0kGgb2SutV|$|!Y6r-y z!_}Hbaxu#~jqx_%!C%?jn75U2$W++B#eh7!@RSt+XPp_*56C^y7OV;G?%$;LCb}Rk9iTs z$D?F9^d*-!>*^wZZeFRp+cWO1KsmaCjx*+7>i?e3$Ux+uF#3 z#;+M~2p!RFxqdgM;qdcO$-)^d+BXUPt`FvaXK%CK8pWAlH-BYRSY=V#&eXE5eOD7& zJmsfAtd|w~H0)|z9Xao-z1unqqY(IMxEd_Uy%l{BEE@1!0J-HmVgF(;TMyLvW30?L zGs?0Wg_6)xx`;bLL_ge`@-~A)0P?EK(G6Aoi|=G0|5fiUwLjVg|l*tn?LuvltEwHQ{sm9%Rq&3?Jl`W@&) z(62bSLjozng|By-vHJRDta#z1rK!E)W8dqlcUw9ua30V>E+3e~!$ckSdx$YXxdR*T4gjfJ$s886`5z^B2lzHCXA}lDZrk7L_0jfs30+28VoRux@AxS< zL<(Wv18&!g_O;C~fD{>na~*}}LS5L=d6p|;bbZ`j>X23<(xl8JEWAQfrg$qGNIOR< z>eX+>*fy3e&r&ot=S(I+vc9o_RlN;YbttZ1%wJ85M~oJ3+!LW59_#Cb93#W590ZaZ-buNf@v9np2?%1gmBS#u#5 zk44rA>~=fu^54koIbm3{6gWvr|;fjWoXoRyVDUV7GQQGpjd@QG0gbFN&t zi1*y-=W;;KFyzUIcIxS8i`yrNH}-KhQp-2!<^qLIlQWsHcaNbOQ4@_90uiPa(+>=y zx>oIv8Dk(^E#yWS^rU zzrA=e|HxS71F^8(^0A{>61q8%wY^S%F`pWyU0C?Yu1Y=EC3(Ky^K`HxF?F@GhDB(Q zt|okR^@Le#*z(W5IdZfl403EG(RR`^|DEn}>^|t%M_pb~uqW@t7D}mn7w5&-aM&Wp zwU3#o$aJmQzWWp}awC0*4|=$Y&3g8vOG8ASDL@=82^L%b1oVgqonKbWBMj{1E#>Ox zGyR8;FRSGB`IHawsQGFhb=tf-qCs(d-IE2GiliIlZaU~nkb_mJ<8RwuxgsLlDi(?P zEj8S{`hZM#@YLWI!$_0Jf_e<2#!`$9S_I!s@8^k1_&o`FH8u5#7PgRS<+R5T(A`V&T~Rdk%7InuZf2n zm+}egbdH%R1YXzHu9UGbs(2lK^;#oR9yjXxDR_H9UHao})BCP)uYcTej3o8tWq;?; zMDRtI13$FMVR`G5_R3(X=ZxjbQNpke@)Iu%p< zcH0{8ndfr8Ad?Y?b2r*|v~T;6=^Q8qMotJ_cluew=RK4IAF2kU+1kF{Ytzt}J9?l1 zZf{_*xjSF1aH;Y-TLsUFV1eEXJoTrEmvF-0kaTlP=QCCUud5XMTk;GQVBu~!d{`i} z5N6#`8glY*`Mwzk)PdoaclFCImgT zMvzRL?+8b_1|)gO?lO1Jrt|H$)+E+0-Q0*$SX?|SG?MkhTj*mQs`fYurN!6D@E`|K zDsEFvw|mGuf%yL*%s+WHmABxMJ|ak|ndVy3`~0SQpkB{MmmT)atVgq!&u~M;ZPk^cb~XRIGG|!x{CCk| zL2MAt)YHTLbHgv}XVH&(Jx(A=SACq}BG!VEQzxeeV!6iEf zfg4R-K7qNf1CG9hhuXznYoDF&j~A{5DCk!@fL2`8s=dgn8$6 zYZNgXvw0{G?Pf2ppFT!_(oN9zo4w3xmCjiP(&->tBOgo>E_b-Rn$z z6<@eCaY|&*F(Vzhb(k}*LP+jBS#!p>+j@-NXV&D^INC2qAvDF;zjGSK^$rhX8RdEz zQplXyxFC%5>F;4Y@V->?{*a|jJ0|a$A)@aHRUd|Kj6n5Wl5H^Z@N zO7}bB%e1tBCuJw~x)^C`vBvc`Rlzq&JN|hfP{|&4lGlp=E>jJZg_6a%ZnMJSn?-TD z__30RmCsua^7lr7W9zJ3Q?ikUonnt|5FGDVh^6`=rBii5|gmi9KW$@_mFg0o0YB+uJli9Sj7aC*PP6M8nn z7syWQygQYby7>U)yVyjyXt#S&)bGHJOZ&MB(Z&6vo(hDc&%BS}b6MDB$&8fmWHh3P3pS$LW zN(B#Y93~JI3pU%$Tb7ox;(EZ;!&uzu;BoQ7OQKa^u&2`HbotNJXDqgwq=N2aHZ}Os ztsf=j1#37H;G{bDFN4PZWULsG5pIq`d)*a4Y6< za_S#f85m2jg86t=Qz#ySL7>9yBI%Bs-s4EcJO6+f43wp~0{n4t4dSW|mnDR!9zq>r zCSRRvReZ|M$-z^SmhLS#?fa%z?k5u5ZNlO2@BetVTsUvsB1N7MC!6@_DVWAJfBZ&W zjxJ_t$3JAC+4sCM+=U)jizyCg8k^Vv_dq;TsS;cL0KM!L82lnsjN}pZ1;^8uPXm6l z`HlJO8bn8sGA!TelSe{rGG)Pp(k|Do=OZc8FhX0XX7$xRm(0r?E@4p?$MrBNgOq*- zLz46Cc1yfX8h$D+Ti6P3n)SN7;C1H?H|NnU$6&(Su00q0Xz|Q93=DWKW!V$TR1A!a zjLMGzm*qFpjzispJDltEjL{B?Y;iDHSFj9lJPrh1BfC@vk5Nv{2?+@sP))EGY-%uX zTQ9GTq9~fbaV14`t12sJxL~wIgHy2~Jjr5WgF7$=&UnUerkrA8*?+kDjy+9GvMA+l zQjW>G49e>4Xs#>~xi7_ZAf}BZ1(C<8Q$urgU-GT1!V8GQlN;Q#EKh%CDLi;nt`2_e z+H8f`EFEAZJsC-UH87wysmRXG9vgXleC)5s(Pd9?XQrh-6?gMx(=BxqEn5`;#8?P4 z^Ec|&Xo>3;Q(w8~#|Mo+p**dGsu$+?Bp?(8lqzp(Tn%F9-?V$C*qgOy0u3Asg&f(C z)%?jPu2R7Oh8HFXFto$2>^?irF#&83lkI$=muflJ(L%-s8+VPlvRiI{^1|`T^4xK$ zmjpLQMjW}J&UZO7u<>vT*E>H9WxG{?FcMX|FLf8MR=;Dky%3UHQ+@v0cO<3#v8#2B z)M9ZW&7ZG;NPWvtNkUlP$+%4GH#AUA%uQ!mzIGO?qMnd)0si|Xz);mbZvWI;j9|P# z;ff~(2YvkEJ^iF5t+L5LYeDC_qxYs<8@MtL?LVQQ{F_qWouSMi*-R7ST#S+a=&L<9 z@4f6Vu@t$kRCi6jfvinOUa_S_IT%X3ViSSP4=ZLVfT z?xyfNs~}3T5i2S2-j<+9NQ_Ns0KPPjGVW>N(c+-BI&c@-#tTo$G5Dy zvxX{~)H}LD?E-?#hYA%clG_M*ED({}ULWq+H$xCH+Ehm5Fd;##tME;6|Cx=AchN@3 z+%Bn+mF1AeWRB?+p+|t4fYWW0(?$LuHUx*=8TX#4b8^%{iUCQHKZiJC7RV;duw4?P z7<^&mJ2)Mq*Pox;g<5vChq`_wy(jOym(YHfkB6{bU-Qw^+!Zu6tN8Ibe8wY0$$77R zBh;n&YRK=7k>qG1Q4ibs5&qr-eyaP;2jTkXkE`X#S`szE_Icn=Y63U5o^3hqdc`wq ztlq+gW8XK@Zcg`q@f@zI>!ZNfyr=68i8>XSF(I4ubHFL>I@-vnGOgw za25dR*GC$K++0$(qn}tmPTRbC6<%2-C(Gh^alM!{*VG+#xjCUqWpr}5=kX4caOZ85 zMoW?`ogqnOxi}RE(bN0zh#^)wbNB%`-@PgI`T$uF(fU!*pvqoP!JN}aTIY}+Zr>-SgIZevA!;CxW0>W*bbdly@neD2$Xwc8HL45MQ8Y~{zd z$Q7Qu2=YwBpFaK*b)QOp5?7mX-848qI-p`&*BzoMZuP+?Y(yognun0*FZ#;K?;6ot)jVgolEPJbyb!rmOL{Ev zOB6*g)`u6%tXod-;7YC}xq(o@eND21#)WkUt>Qm-?;mWs1Ue*7P(W(|4n*th^Prr0 zl|^fJ>GBSY78eTO!Hm85f23^vS9!VPIaZ*UfowT_k=aG>+pz%>?V#Re-m0Z9{02At z&0bau%VAu$#X17j`L1Q5g7?I+McoT{BXjz+T^Qvsc;cw2A8Y3M2!*-W|1=t4Gx zB30-L=^*@Ei|ij!TIwB6zI&A%6hy!Crs=H;p@)RIHSv;OdJ4HmwU5d(+-W7Mb&{yhOa|zzB;cXOI8%dck(=CojUyNr_y~#JS-tEE~C6il>Fme6`zU zFj+Jqdz%5(KmSwce@|Zfm25E37+7~Ea4{>VmIFSk78BuGJD>eZynV7rAGn zJXzSU{r+D56j$y2olG&@TPbozj2|N2NM(kOz0%liEv%fhh;g14gyT5oV(4$5v}Aoz zs7b0^I%u+W!eex`{|*p5K>4SQGj<(5!`w5@O7RVgnYQJC=gn};2Dcn0i{;7t=$oPl=lrK-`|!vr4T)L%?vGbL%_|z@p_~kk>n9xr zuVnaxe%Ajb=`9j*CM1q|mCm}37I8WXyCMr;s!Tt$-oII{>2iNra!1t~^x~jo&bR@Y zQl^y%*;}BxOzdI;CikOt%BlMYEKst-%08mCVp9Wpu|hxV*vn#-eDlYLYdys66(yh= zaPVlC=DWPL)ZC99StH0!rx+EG{hDRBPJ3Nw1%9E~4cu8mGTRP-o?FvTIgOr9o#<4Tl%*fF?29|mqA_>O^=>I%fqyg& z>grSOQ2*Rl9`7*dPY!$|^pQ!B;Sh!f@9`V{5(r_wBX>Y~#Ex#rLlMAo)g_O; zvzRX{3kW)4=Bs4lbuJh~6pkrtbdHEZ*0iwkmA>4xD+D4~DswMA(w(c9*J30p2zoB5*7NHKF8qK%svA!35l}gts2F=w7Z6=W77}Op__Z8!t|vF z1G@tGj0F=f3cdbZ6fxB#1#xK=XAYWb^X}J|e*fmT3SlZfDECAj+MFlO0aXD1Gj%%3XUTvcIM5D8PgQ*pSZUI z3fVp+4ih>+0zosVEVwuRh0efoT!{7KaN2$o<~QqaRz_IOZm%zRd3nLl$;bph^%JGP zxP;usF{lj2Tg!%QGpSyoI@E`bVsg7HNDUZx%Or7U6>QGPr|2%`kNvpv)cNv)r zM_PZ6SWu7??jY6!0-l_i|46P|*`-uSNQ6~r=qKokUIav z4IUDX?GZ51@{^O!(B+t?&gQ81i=>yL#x1SeLZQkDK-75o@+J5=1x4xbBXw+vK?W6p zWYLy0^mdPevxf3UmDFrJ+&+z)kGu|#)tC+BZ0od(Us&K`#nIL$?}OX%@;Qm!_Vam5 zFW>7vrG_EI$4k+p{pfL}3G8q+B8@uj9BwRrs}-&Ya@-i<;BJ=iiFH`MBQ``$HC?Yo zr^7e$d_^QvJFTv$emH4TobBS+xPFxWCE=}^y3imD28EA1kG)@P>isblwE&P!M5K~0 z{A8~-gY%64K!JikARM^SVrfo}qsY@lw*1h76a~E1&J-BmmL1-3cuv$^=T#F)-5`0$ zBmQM4FC|4VIGAsb-=3Y_VO}OwwJ`pjyr&T3re|GJ5P5irD-DMTJi~&%vW}6%K&7@z z5}c^Wa!HreN!8^%>D$}FDqKlAZ&Sp1ykV}OEOVrBlx%If?{^CWz% z05sLk=$JB@7bb2E@*LMq#mmhdDpF8pM_uG@-DH(J05}Y$aSc@rIqAB`BRVhp*2_|9 ziq+e?t(sg3uwiKskBo7P3hgC)*Fqh1%-i{;xu=#Y=KV!O2G+}mq;9=q3~0F%eV5Wv zPl`l48eWDc5D3i262ngEWz5&&mCzl>TpY>|yzGz*d0{KVk#c@&AFU{a@|=zu4W9 z)Xpdx-7r{u{evjYzobYRY3Vten)41{&+}^|9ChLk3dQOYV6dc~zibcV5+)|VT}H`j zXA6U!x@u`9%-aw`$)h6SsN{^{l(~~TxCi4O2nGKgk@5WkkD2#nF#a|#mpWYfy*`hb z;YR-02`OXq%cZ17mKaP2t4la*WEC02EJPc)fbP894^!XUvG{FWF#A*uB+~?q!BI08$1trx&z1Lx6J$stB&{Ya=n((CO=GR!W-z3-?A6oiQ zJ&eXBj@8Nf+h#}_4==<#YrN;FRKa2SY7Hbsb#?21iQn;oRb)bymbD>4?C*lu8}wN6 zWuB0)lTbuPl2-8H2-*K-fDhc1LLF^4koX3jdAfE9Ic-qkeZ|A5fra{Yu=1?^Lvuz{ zH$^d*1_;d|t&gqdRoA|-3;i5_6D`(!iyA;)rgUtiHl8J96{rdFTDsep`eQ-LvZ@&w zs8J~3zgZ#UmLH080mK#E32(gybRvbJwdV$-LT;8*&)oC-P!c}Q%X9aED;vB{payPN z(GQcF7r*yO>8XH{qCOHI*mq_tM6v4gaWEK7t#~#Ic#T(j)YJHrI0YQ6l^_S_l07;; z{jeOE+G?lgHsG`BH1qMc{9IELSpf#BthxvNWO_+lY&t75Sni)%QG%WoSP7|ZH>oBMPx z6A>oBZ9BKcDvda|yIDZv_emVN?AD1KoYRjv&Z-S7mB4m4gsgT6>)ma}+0t=NpI)~_ zACF{Df!f$zLDS`X7p6L&VLj2jU0549xcPrnW;n5ovsf@`a?Kr$<9UypHDh=(vbl`g zG#XYfBf~ltwC7LB?9I*v3n$iZJ#?93t3O`YU}1z52x5cyY*|Xc08S<#7_1 zAZ)t+dvcNa)7|Z5TlgDRibVdBgv6j3NKnsp#bmsUyx^GwW*PSg?!i&(mQi9ASAewM z!|sP>r<#ex%JHnSP47NT9!6^!^DjwYhOKu7+ctP>Ry(v}$vGVxBKqrTUy=!&e%$3> zDFF(k-UB{XVJ>Y7N&Rhc&)A}So%*IcTuSxM7i#Dga#N?m4HCGX+|-^=9GC!#kMs@z#~?z9S+faz5pqgVh3O;*wx$NE=O9>&K@} zh@E5vf;~jV^K_^XP)#2Ohs@e>`X*xg;#g+!gpXQn_%e=C3}E~dJJ2NWGTQe!<6z7Ihk@QbD` zi!zbur!=##f5DhB50WInpNtZ&yNLHoAcT==U){FBywYGV^c%MtJ_t*_VU@zw$9V~5r^TZNOySmPNHXS^wIpqKS2pV;$Cuzs;GFc4zbnaePNM zm!VXVlw&G*-W&8fASfuf`6{L=?P-4!a>{p~Tku+InCw^`Mo!byQ}z_r_u2E?*x1+( z>_Kk_n=HV@D@jdFNHDLN?I^`q%XB;55Xv>q#$7vc_i}J3&!RopFQ;k{qLQU=z|^(7 zk2l_@uxmS-{2UWI|Hk4Dm;?0hljPSw(38+@RkD@slMjp^#p+8ETyH&WV*{^6ewxSn za#iy(z>rA%0DI!sWQor8@c1Zn#`AhB!OAdx9jY*!ytVpTRPbWk(hAl<>6*k48?x!v zDm-Ota5gV?w=A?AXm>oCtEaF2{59hKN4{|8>y_Zo5BD?5SfPWO1m%YZ*G>w zlKx^YqNR4Aad^q&_o?Hw82zBZ4xXx3@K}e8o`_tmDf;yurotwFHcNUAshFv9yrK%7 z&_^M)h?rq>69>P47W3aUBhi$`>;mg-|6#g5nUasFB6=p*pCaeE`NmeT$?YQ1%dNh% zDR6F{@q-48_Mbe`SB)=zSDf=+Hy0)OZdtvM7Jg(i?@|fvV{E~xlp71DNrlw8T6+f_ zYe7PFw86Nq42BkH0Gq@C4 zD=x6jsBseHfz-yc2_-OyS zGB*fgIUD=jWpAdVy&XphFv|#?@+=mNHA!`(zylENvYSws`vnbuZeXEdq*rsw_)Uf3 zFDmELx8-j9!XC>#T0WdLgr~ZC^m5i8qu)p6zDu-2 zS|>s}AH&EbZVcRl50K;~FaH@qKZwOWO+~H8k6w;Kcd>fs>HU6x2%~>hzm+{B1AX!L zDo&J=(dhM9p}&vplfd{Dk%0Z*@K|fvAK;!YFrT9V{uC&n03DPD7glA)jRqZt37+rR zKVO#y5XkxRojM%PBK_q0alT9*uHPV1FHXRQaEFDk?kAs&-c|M(?U-s?H8*grmp^Sy zT>ZC12d&V1xH?4MzHxrcX&M|#X`!9=!gb}wB_X*T=v)ABnX!V-(<7hSW=_3?0-~%< z550HJ?Ei|Y@5(_f)?Z)ERrhbp5tyjpo(5s>dN*$+ZuEB<7PVLl2Hv+9n;98YQ~<9v zrv63L8^ec%sGts9lXc1#=Y#S&|9GJ#pY!Fwu`yLDX(_2!7L?AsloG)02U5PVXfRAW zvTJ89TwR}1?VXoAMP8C#@hXfX7}tTfJK$LZtrKGMON{pbN zFwa&Enh(|z4Kem@D5&7gPxhAq&$Bg*@EfAK&e0&;B6h^HXo%$+io1lCde*NxeGvbWNykb$S7P|{aO4@=DG&@Z z{~f|L)}xlf#dK`he+SE;$a9Wwfuml7dN~B|Z}Rsm5$yPs{PT;NP=G%gMfhPbqicQ* z*xxnrZ#zrbU+&>U*?D#6Qg+$U+*4QB9GWNi0FZ((AfY1kxWeJ!_&v9Bv_?x8}zWM}QQYx4xd;h2{<`6=_ zVI62DtHdY25yYJYc(Cv1yN|ojK;Q8*AbLSb1Kkc}e{uXV;IB%09@w>K1Z>)mAS7~r zE$i#wIjY-NB)AtKHC=Cg?~i{4{8eo0xN9{0PWM~Y{g}1i)ZyzG727u2!l#NdCK)i0 zw1flcZpx`g0BmfyR%g!-S5;J0f?w0p`X@$yuP2S7j+Lf$ehi|NKrJGDz}tg`f*7r} zUkwQj4eqw$g5EZ$!5!X5tno@e2T96D#RC0tH>NGVD6x?ScV7PAVtuWEZk87MSL#?i zJ@;Wn@U?e?W-!o62%-!+6xnSx*x_?sNPxgiQuC!kzbV=)&`R8!!-JLJ2eo=uRm@Xo zjgFHCcLcdKamfw~oIY(Bek4H_Hy|fS58V^@YZ?Xo^ zaFw%x!86~oekLDlF>w-D!ifK>Uzt)hK~I^6-rU)UWT3QF(t{azW`Rp?k>_ePbb+M; zsgtlBGT?)kjPA^>+u$nH{Id#&*b0Li_g`47x)+;=yYdOrb zG$X|4!VOF;vVKe6`h*~jUciW=c&@;OmEVD0N3*r*K4AkiDTh;2XT*3|@-6h%_Dl%5 z9Jt-K&?G3^J|OT{5thMO9SYS*n(sbLy1@%rh1{=3HSX9T-j1i3e(n8`zt`~kM2MA! z>w_}2gRaM z|4H@&8Wy;Xe){4aWPh%xh>0pBI5_zxoHZSSA-li-N>`fu8=8=~j{Osq_p z2iY{b^L4qqPEdObI?;4F&(d2s5jE~R8M!H`yK?}H+f*7Um(8Xjpi?c3~BoUo($9t;yU4eSCutCMHt9+ zWI3m4INEEr$q~K5>h~%YbluLB#Quj<|pz9&tFp>mH zjNQSTcSP^C2hOTn0g~L4neQSYFRm#A-cXx(U+a3Wh`%JF%X>D|N4W&_bXnBQ26uma z^fR5{y@|+Eb#%}Zn*LrCq#rWo|F1(op`<~I`n$T0z!DL<=Am{pycpwTg z0nmlJam9fQNm}hCg%JI2>lM%_6*fleJ9n@A6kPF)u=V41UT>q_8)WIfr8-68)PGum z1sXxCL-&gVt>xaD!Izot9c$iYHx%*jU79Dr-wthkPL%cTe-{QUz{cSex?Ds-x%3M3 zk%k{I!%@+@-)bouNv}YFQ*gQ%h8ND&&gA^KswGbqKmj#h@yw=^b&!~?eW$ym#qaJ{y1gX=@OxO@*5 z*tKNgPEUBLu2O-n(G?y+OYc~L?Y&?=3r*9sTYzC?-&YfH8X0W3RA6@&4vDGO$TO&i z@ELgWQ59c3>>GwQ`GRx%>S9fR@%@E!0C~W+{;JQoCQv&l=zPWR>g{*!>~o<)O}2lO z$it@ne0HR&(2etKiOO~Yr`vK~IvRBwGeM+i*yYY(>674)XRlU@yW-_Nb}vLBtmnUI z{}zB1k_V3>p_gS?tk*W{0li&%vo*;AHfw4Xc4kn|rIP7D!7#&vWIe=U!Ky>eEwap> z!gTQj9}0t_8t=$-R*nBZHR2m(tJ`E4}sku0h0?QQUnpFbrNOa40WPokpFLGMlegc&n; zO1Y$}Tw&|$9vdgahk>f#H+rtr3lraxW|`)P+i1-ak>qlT?_OnecXtam+;}ewKcKqz zP`v*fe=RaBnf+S5*^n!MnDF4OdIdP-2Q6s#4tbN}AL;ki_YOIJKtU5Q%soW;R!IHg zL4O5SLs#}BuK{DcBKk*`>xU5BzlFcA8pkBxH<~XR$JEZz<>ep#n-?~Sf?5=-Kua-f zqT>udfZUqp)H2<@o%=d=10WPLnV+o_^r;8A7tKn3eY5*zm5NZs%w6UO;1d5Rtb7l+ z%_TLk{IFhF&De_w-sa$YS9v1U;9lWT?G1wkvr9yBej5Xn*Z=IT5|Wo+Z2pV$OKm}a zFX%)?Pe7i3dY6f_u+KRyC$h4$ag~&n@#cZVCB*^BLr~gphgx8lZbMm{^E^E#zmDRm zqn3BrCy&vBd`S)0?Vj;G1pJBrY$kv*Ljn1zq4+9j^6L7XP*1z{UGEUy?@++rB@huX zCoi0b1FH^FDy6PR!ne8SI0}lwRj%FPbjGs|_sTu8@0Ii8)9m5Edxf7}Y;f;4m|6@; z0(%!?_&Z6P+4CI^$Tby6v4Wzgi%3g=2H^ksB&CFh!UsMXYsK9&fX1o-mGt`C35u}y z_4&Vog7l#G#N=4uOy%^##~{y^e>N`|pFS=&7B{-b#NA<;97z80{`sf|piCWWlG3XM zxi!3cg#SR`{Ockc==@u38|N=aK%M+&ndPVxw0T!Y{@!~{Reomu1F(-Df3^^9rWtzL z+P}!zZ?F?kSu=t&m77c4Z&LU$pcYR}!$JTKtT7O&xm?@AcdcskufyL$jB(G1l>eB`%m0!(0L0RU=ODv}I&u zf?w0ne0$9%u6iGE@B)&5|DJ%z_=wauhP0GA_o15SAH}Lk-&6%)yV3uf%*20_NdMPs zQbw?yR*NMHO$;TNmo#fCUU%V;XO3(=u!;lnFvTxCebFV9BD6Ed6R7>I0onntjEKMW z=xTZFth6ZA>Njik($UN0g>ogdR*4F`7n^JhRSS5`Ruv4fy+i~oR!KG<`I)b0@fO1# zkj2Ir5>+j{KA8NuDZ`;aOl|B;_eJ;{+{uFJ0MW7fdnS}6(b)E*st8t54_jDQI=*MN z;Q(*pTmKyq^xMkf&QD(>S=OuL%gEzDY#HcgYJMS6eXc(&pDHk&EfWuP-pc4nh6An8 z@Nn*hsQM6MtwvXS`*0{h7J&U&U2Xm>`jpPd65m7VtIc&VsFfXV!?0gnIyE@uaBnRZ(|@w%p$ovW*B z>8mTizopr04g;odjJ3c literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-14-1.png b/man/figures/README-unnamed-chunk-14-1.png new file mode 100644 index 0000000000000000000000000000000000000000..fccf2e603e0239dbb9c6eaa4f37a676270c2afc7 GIT binary patch literal 18518 zcmb@uWmH^Uvo6{pXb2wMAwYr#cL~8Ykl+^FA$T{MK(OE;K=1^2cWEHFySqD$JM>-f z?t9MJ=iG6=Z|`w`FnX}M=UQ{ls(Pws)l)0@y^=J>Gm>W@5C}t7MnV+?Lih~=Jy}9U z0Ir-J$QT13XrE=YoIoJV)`!0*o%T5&Y;*W*?ClT z+QWVs{S^%+_FI*oe|!yiy9T@8ll?ZpNBT&HTJxTmu3b zq)W-xpOM$TjPnqt6!Fv*XN4@D{m?j;Jw|Ii5qbgweJRVyUBTCSqEn(W&dtSD=K z!QqA3^fWZKHo6&w89(D{s3MV|CBOM-=<9B?4RaPt1KZBNFfVJ0Ay4^*nBA+xnw*;M zuFJ9Xi6_X+N0vCCRJ=_MS_{dkIwrxW<}X=M*II1YV_v+7gB{c=*=k=;LXsN4_Fx}! zG}r6d8B6?>RUB|ioY;ST2G%6Yddol9T`6C+URtm}RYvLBcCkkgrbZAXlRT7Zy>)K7 zJ6I1-n3-k>h-}O`C0jT7#GBnxFm( zIFB*=*tIbyvSz}*#Rb01%Pc}&dprO6@@Hx4fai9LKdY^7TwrQF3qig2d*ap;4gt-! z^khG>6cjAAmXoCx1|h6_l9EwCr~kDAL*`K^iHTpkpixO9`?Y)$!}3{r%0mKDYr*-y z8$+ap#_-8RpPvU-N@YOx)^wo?(K!=f7`L)X8S89ziFbcb@jK|1W%%Z^}klOo0OW$qjM&-I4L)ytZhijy@_SiP?Wv=wb zM@CA)WcDmfUp5)}072!`M)w8*(TE;hUp7q7l@&ZlKrYwFd?{0+roj()&`*ibU+ZO9 z@YYK2p&z9egUrg#qdJ{c93S=5@$;wRq32UIL6K6(iZvJDST-jo%-p;moBn26d!5wDf%sM6>HVDPilTsiT8mZ=!c7M9_`IAMF z$qGrM?LSwG6)A`3wEGJ1qA{n9zV4nLnzUcPeletas(y2C`g5~ly-2}cE56Ih*+D)Ln5|LeM+lmoi{wbXelc1xc^VEvJ0H=yRr(tC6 zNWkAa{QW&IsPrWNyY*b8pp!r<0}b?aFaGb=CDEQUfSi|6uM|(~s@$II9`7W=2+m|# zXG*E_H=~u?5&P9#0ku%Y-Xv=fFzu?SPTZSu%i}w`pX{uX=b~8zkoZ=%pnjP6oo>GV zQ=Q-nE&!pa0-ctDLH`nh{~M_N-x%@;^r2GeV|1u}Eu=v*#gk01^kCWI$^4H~#2C*) zm82!4(xZ5Z@;HSj3aC0y8pi0l;u;VZ_Fd)me4BejqdHer7Nqf_J68>fq;?p^o?FGL z;nmLD=@%9aoNAW)k|Eratl=M0L`d)8B6gJ7T)|^5hTA^gbBn+Kq(yTK7V{`2Wv+{qGw=MYzM6eI|HML(_U~@N0!8xAzIE4d5Ijk<`@9x<>5Pt{@T_{N683 zrfE9#=v`DmPZVffo`BwdU$u0%yB}YT5YQvkQonV7In2_QWA^KK(hW8<-M^dqkr4eE z;ks5BOD{@!{**dIXxY2)J#K8Qk~~xPn3`DgyXL1dtC@RqFjfL$wHTdY8?w!1h^!p$ zqO1n-32c{QVnhz!LlDa^&uW`abR4F!B2`e(_2P$i7Q2HgA;MS1ue-=%VtgOeCnjyK z>G@T5#Mi`k8Pf{N7mRm=$#C#pbE9Yl1ZFntk59ZRd=a^H>JI)Y6RhOTWIoAZP4Ytl zX??EV-?AI8G8*Flj7^x;yx|5KUP7e+t$j62dWur-er_lyf4Sw}ut4SV7W5SZ2pTy4 z>ih-E{~A*Rz53eq1om1ev73%7Xyp2`dTwrRdoL~+itGLC~~z%PTq2%;i|;2wV|^>xAu7G&$|U!&k?yHq&~tXu%k`@7Agj+kgd{sd_?(AaG z=YoRMb#LnO^74Djj~_pPnRqA<<$lQi`V_@ILaV}J7?>dwGB-(oFI&@|a7z@ebS#^} zfw0-u&>t4kT&&;N(CK+TZC+bji|@C*ysRvGS8;*p1HZe7WzjJkNRri1nd+P?F?@=X%*ZFUq5%cDzMeoo>^%R zX=JEb4HulLwucFu0gHF7Z!~)I`t|moK#Jp(Por6ivsJby6en$X$`X>2YR?H?yy#07 zob>Re5O$w)9#vd0{-$kC>3P^PkSsVF6HXy~y`7ypv1L3_Y~a)Piyhdvxf+L?^Zf7x4tQf5%@iwyGXT5p=UVUh77L29X>VRkRm3I@T;E5&Ic=>WZpr zYu8zgGs4($aByNK(nRksTW>DN@$uCxSp+=JZ8GCe_h%^GSzFSR`K0s81rtBdb9U+)I|kX*ny zXGDR*V~-uS#>B{&$MsfRTs(7aw#>A*JDPzB84nMSiEa^4qR9fSRnDc%>t7L~_cfv- zW>*TwLd@?fisFjyGt=FFAqUH2K0ZpSH|PPc{^p4eAvx6g4MQ3O=x zbHyjM+7@nSy=G%89#JLXwbOmQ)XS@g@28l+ReO-No#Js2wVAcO)Z&MNNha2;;lC_d zPu=NYvOIRdW7;vVBiS5{%NE4qoOJ8%c0pYjOD}yI1$g_V6C=y@yEj2w3+3_d0WE5$ z<1cJ9hIzp??~O5I53qM~@)nVUT=0eM=P%CUwC<#wvG6Uw0=}(9A&K4{3f}aUl&o$% zeLps`9s{>+3&OFqw3PUnkWlBmt*WwvBdb2Vus9&3EHTTW9}*O#6m~%CBI&51=Ao*o z`AdCw_ivb3R)5cM?nl1M9NKlSuR92JVlQxT{&Xt(jxQa7Gg#k3+fc#xE2$^3-~fef zyg~uzv!(^NMXz-Rgx0@*ZFmw<&w^Ta>Pjp&_2|N#Bz}Hy1h-Inb)HY*lh5ex)U6Ge zaOeq-Y&*xsye`ynj5XCt(HOB`DE7R66C?vM_&u6S&oQ;{8o{F}z*T^rvia`aFvngZ z>XSi(+ndRG|Eds}qE_o{*>^{0m{NIo0!P|e=F_sbe#mMHI}xLn@$EjzEOX44HpNVf z?ioV!Ot+3}-4gQEd07{!d`_JKD%HVFb2CS^r-nmdHFSsh09-#G5&n8&j?goKU1CY-UDyC&x)eHZ}ri^csDJQ>r$$S{Y;X z`?rcjD}U?S$gUgNblMb=MfEO0&WHSqo%{RGT0Qi9tbk+UGj?Bf+i>~UP2*i3tR{%k zevr0(3mWU^=&UC{2)U@Z<9~blZc}LY5A0mefwsR;QPdh6Qr>0ylW&k^ZoH*`x>)oz zaF`6L@fyx2#q?etPQiJ5gzfMCr|^cmZcb0O`X^z#vKt6gLjheXW?Q&+cU#XUzD9{F zwL72fjR! z8o!WwWuPGbq}*()#`VgY0QQVhq{!g;>cD)H-I={~S#rRo`rQH96uq`$n`yy~1ri2H zOo{dVajPj#Zn7QuOw)E|2dL zEyolHo;u~G?7QA5&$jniYPIFJ3(!Sb*j-G!NvABFZM45RCdP8M;&qhe@yQ+c>frQ) zrBqSx_uaRDK&gfay9D|L&2=^r&1B7&b#+(N*c zSRatxE(e(e@0^Rx!@`%QId?@3yt@)Az1yFSj1Pu4HMlj;UU-$SjQK_Le?Nm;A^~Pg z4GD)$vfSP*<-A}qC_5Ry_cDMiCwfeTQm=5t+S`@bUNlruOC0QTHVMpJ-6iK!Dy!hd z6p)OA*S_zYUSO)=I9%1Aq|87)x}u!v=G5}X?3$>)N?M22)^$buu?x8e2)zxl8*}> zoI7q=C9R(Bl)$sB3ndz_6WXtsUljTIPGYTUBT2Yw6*h{g+_0%yUs*KkXRJ*c9K;ot zz&ldYJLlPLpI^O$!sbn-CNJ?~WIYqV32PZoZCawvE}g>4_$AEMZYw|eep zVB0uCpX)ox^RR?poIIjdy1xrYl)7l!sMBJJe&$did3EJFbJ>;^4}4Q-Ue2;#7)s^oR(o4>Ndg zK~z(G1J?8YxMWS5$_B&BX48@`_muSSLJ_e(u(x?QtF)Y96SD5=#s=EGf}`_s46c(J z8M8dcVQ1V>4K0^84|BilBo(<`Ki#T|B5}0$DT2Vu)dr)`LcV`GE^`u=u%e+6aoa4b zl-v&>xw}(g%~#8BvhCDyd+xn{K{kl*5t~podcFs##K7ErQe@rK3Yk&MGTbT|9q;)a zS4URU7oXX$Wqm%?wvSlwj4tqbOnn1^KWma=O}(ZuW*Q#i-gLWDtkT}Om=}gYo%zI` zOI;##%QAy0C88rmUR0iif^>{t^<7)so=*LlP@HNz-kabcG??&j`R>G2*7z}V6E6&Y zEYIV%E&CfgsQG&}du)9cgcLSSk=4TV{cQV$JF$>A#TT42LoykH%`Pk~j1Za=@vB`Z z!(gAX5|IhJybkWiPy37!iZKEQX_uQ#^5H~|y!uCTKQopk1NcfKGWLmQ3h)h+1YgyW z75=j>)pdhPA@ZCvz zT$~G7aAK2L4Wq;RutWJN#s1jxtiEE650Cw(lo#AnWB-VP7*m zJsz2x*wPAEV9i;sY)hm3qyZ&cw@Wc<%ksiDG+=4wdv9WG?Wn7iwIIZ@mt?q|)w>Rb zPHikK0y>kinQmLI0WV|HxmiN@vcFOu{fv(j=RVsOm)y^`{?d5+=6=z`?#kgVN>zTf zbQHz)*_HYBUjuZSu!NsFsmV6BNA^ip+RqcY7Jd}ak5na>oXf!bNvkM&i~>Z?rhkj@ z{t9wh5Lh<7X*zkSm%kjH8Z2|H?1$5;G2i?izjGsdMoCfoY*xPCf8iC{ea)2TY?P$O zjm&Wgar`TvslH^ErbcSVFJqM-<(-{R$7%15$d(~U{?V*!&qQXMkG+lNx`N*1=I0Oq zC->u4`&L&~pJl@Gm(qvpx)2h#QaQ?gtJX}2uFVyW=W&;~p2;Vn;wm6O8CybK@V0~B zKPOd|sC$CtA3@2LvosxeQyElk!A6eoCTq=ge&LcDczD^AT&jqt)&?EMb7n;!IbOcs6>6yt?^G>*0&v6 z3*}ZPJp;)fbXK{95Rn7^j_*`S`CZC;3sRr|2|bBJSv7w7x;0I`-f96z!G2A=I#|M=AdV71vEu9Bwi8NiR2sx^CXcE@M&;E(`*3e@vWR16Pl#bm*6E4(4!aH|jHm zkjjJBisRodK6mSU@XKQ%|G2I+)_&cfRbTr(Vv=$hM#DGeTG*FdHc? zaYx^a_2Zq(wQnn}fn}N;9ql>=bm|o&KsrSxhez@BHSYq^%>+tu;lX{!elGQMoS5Xr z!wnSDbPu5qiw;)fw+03MqB3p$jvR(=n>bO8%u^oDPe3`}spjdrOPZ2rbR~;nM?JhB zq~-(*wi~*Ta~-722jV%~&yb-|3++k0=!DR#^vTWL>-2h3ttl_N0R!^|sx(Cgdb7B_ z+T3oG=gWO)AhGv3x8ul+r4fv^&|%s`@u*?aQ!9s^Zh zlroKmrhK{pqw%1kr|lOJ4M$>sKnZATE7J67daI}G*zf$A3T4>-rTR!i0Y14%WA$pq zQw`xYnJ=3ygoK2X%kv_dw(2xx(>Co^UxA6`Ux?zH)%;O8CHL)P8Fc4k@$tX-1(x4j zJB0f73FVt~CbTN^K5vqatc9FFD0E zS7z$!J`t%^$7Lsr@PUHh9SmZK~GX2!t1UA5U82bYG|)J zr?T!Cq+#u1)fvAS2XD9w&6=HZVEG_&qSmH?b1YnS8Sw(Wk$fvS-nKU+Ec2eKjzdx_fcf>62ty&)s1Ol!hFply*cp;6yI+t@W6rOAR^B#AsrVhbFzAbg<3zxYv2Xy`P<1pu)5Sy& z=UD(>goySp>utc#CY^1psrdW$^;0_6!?T#|>qc*#x;)+|#~V(SeMN6vL6%d#d%;S* zO;XM>3!T56Eh5)bsB&3Nxk_Ke@>txpbfo~VidHM>d*7@qU!N5lusiN7N)rf8owstQ z8~FS-P1aGiVt=Xzgsa+0@pnDn6Dc=?gTRyiq9WI@Q1Zf*t5;|dkxxO`SnsG`o8lz< z^MBBHRe6Z;+J8^{Z9lKhd-ttYFVZb=X0W@CkZZnZf34O?BlvaxTw>71p@^#9v{K>l zPd(11@i6b?9%q}?Xj9f z{A9uIdbBKv1#diQ?zVBWPz|wb6v+OT2B82^l@R03p}j*$htcBvbb)0K^n6Se{2;Q` zuzHY?C5SVeDgSaz7Gq^_pWiG!i-2bGh<4lIwX9X;bf-+qPO%HA=&p)?c2#ZZTT&Vt z#x6dc=B>Z0tF0#U2v0#0ZFq&RSf@8XI|{KdF%py5wH)v_kAn**L_9MD*aG)>czB@d z+xl-~giM?RFS3-9D38D=efIj=@m!7{&?~>!x@VY)#;m6Z>wU7PQ0v^R8sEvN1tL%{ zyjJ7gY_7wJ&r1dAUx!Pn#XjHg!B>0+^|~B9j)hV>IobMp>R-7?f*jl5*eH2X?TR~b zMTGw6R3*8I!gZe}*57{UT`uk?)wfLOp^d-xgI}zEqK?&1yjeQ=9}!<8Ha@7i^3Jk6 zLNqmb{d^LmEtB~|S3Uf_Q^>f5h(hSDwN%GbnF4|*#YzWr-M6D(M-RUCJNzYYhI91H zY1t`Dh0sfV#Vo%`6{ufys8uc^K)!>8k)U#zhi6aGc8>P;T;n28h#7ICf^TZ?Za8g( zaJG?!UWj-P{q{AdJeZ_eNNcRA^Nfe&nebWTW zv7qJgCCFhm)N?Is63e|3cYvg6cy|uLa;BloX>)9X4+D$J$u=yY5QEgFd=`@8{!5(M z>hwL*Z!vBN#qF4Ic&;}y5=g>WJsW-KHTdzE%$bwzrMb;Z}N2eX1aTGQmy0fkp{$9AYIAO zFPrG$mG(crsz|$#4UPXuiER%q(FMNVJ|diiUeDASl}6aKTcnw%*?Dh275OMH z(MFh+`Z{b|9d;bvzT6tP?<$Bx{5-%mX0Zi`g&w&8KYzY3BrF`Z=z$lHBRBgw5Cy2@ zete>mr(H--Gb}f5!S$T>P%ByNwyM%scy!!=FC|E(P(9?l{TcN4vAs_Eutmk!;h|R> z)p~@CG2ab|TIAOu@cZ~OIoCZ=(ZTK7U!S%o*tca1>#~$pR`dv!VcPc{@cy2Z%M1g? z24t0imi#b7Ly5My6y2u7R!WzBbqH=wj^wfXsz%UNFkl0DbuVXWodgBXAE` zV#sV1C;od#$oK(>FS_ew88fiFWC(I6o4MiWUs8}& zQX(-meJu1)U+yZn@4gCOEuPZj`*|00@kweKCdjdXG2ZDB5z6hBV{WCkuAp`nICurA z+1*s>c0zhxCMAIehB{xE7Z23)EwyX;CH!Kt|6^oi#HhcyxrttH62964A1o^<0cM}F z2}!~FsTwR(q1p=%|NHE>ef{lfIdkvvSDZtmA_rf#oRwL69uPtbg4K-_jUAVjVQ+Vw zP}1tm=w27Nc;pua2E75(5*-~-+l4e0Pfa@S?X@T#mH-YuGLyl>>?6sE`E`YGJf%kj zq+*smoky-MZAT*X%SDoKd`kUQ{|%2Gi8^l${0{3tx!rH|2}lfD_Y!WP-W`rkSKo_b zZ+UG9$`lO7JDeH7gX(a<{e}eC6slx4&*JDt+}_B%tJ~Y8T0dDrCKpL=+6l>ris;t> z!;eR?tS-qRjCqhjo+AP3XL)Fk{1j13kA{YZz{`-B8{10Ym+#U4+Z>huy~qaw-M12? z3YRzy4x_6pts$*iIsy;4Z%H;dx-5(+t#M)AoM!4ZEC$b zz1qVu=M?R$-&(m!fX%Lj`J#?}`Q88a3dvgqsw{m+1`u&zY*}{l(0e<6D=r-q0cE&LNTI=QtmVJqA1YQ3jpHIw&izeIK|szhTcpgf%GA zeLiUJ3D=a4o!i-YCvAM6+ru`pF&)z2R_=`)bi;Vugf0+TT$_nl_Wle?awAMq} zGw#kjNO0J%zwzji28NuGcQGv~(nptYR+LH6a1cHB9h|28$QUD)juxbP<}Q4-3{%7R zYxxbe+N=u)@JYK6Gt_=|gDNdDG7`IT4ra|F>X$pZEpcOnWDwc;n;y819hTd1ArTy5 zNR+H(&e44r_*OzvyHG9@_ZHUfaKA4s)%pgGR_M~Ni_>0Z$P2fh**G>-J6*bfrVi;B zEX8Ov>lCURns0sP>w(*kKNB+dS>hYmcSXOayY%Z_rxCqv4C?yyMpwA(7WRrc)>QcZ z3e}ehUS-Qen*HNuSQ*k>ugm)X;*7!2_86X}El*+sVf|vM_7bGAcfCy8-{39crfZ;M z(gdZou8d63(#eaUth4AvTX)s6c9dpsNt^d;={u9Rl&Ud0rKIOFZ@vHnE zQt$4gar7+nmoD84>R&PZQPf>%35~Tc(&NgC0+)u+J}}1?b+2|BSpG~~_er8W7t%SY zw)cirq8sy)PnDUC9?-dwCkdQXbBMms!Y6BaAWAIt3@6=CCj|vD?4mVtejs%7kX1Bm zt{0ybJyuwhBB2?fqw9>>cRlvb9pimK1CW;TPLO#+=Zk$#efM_Vgx?m$D#jZP*~5|$ z=O{Ju8O~UWh(>V};gZu))25<(EzYA8sQWT{F%YZ(TmeUK?h}fQnb9@4VICKKSs)9? zh{L|yQBr3=2Z?e^=?91nVRW66=>+KU*Ce5hG8#O;32!YK`Hc=KqJ_%dlRLKKG{|`r zLdsa{rOA!#eBizNu+$-V?gSnIS;OYpxe*c@YZ&1%(xOYYYpHtH9mf+7XZu9f zAB9{P>Cg@>my3aJ^13ES^E(L%?GHH%`+px15cdOd&GiN0%;1)0To3kU(Y3CJTE#vx zMnyydNBQWOP8x@Xl3oT$MMhyzZpZ^b9EPbx=Nj%u)P*&g7o?oD)Eg)z_Dxtr2C+yf zx9w`~6A@{(o9i7T_U4>s%q&N8*;7JhN-c=`udBVcTO z>{raHJ~Xnv^I*!NQfaW8Y1Oo`wKlEh)Tb6n;`F`LgsckNP;Tj{sVObz0NyYP1W7)` zYK$^SS5tZW82+3(ZLe~p3_&Zk#W^mA_10)ZNMTsSxZ99@*2_9{Gv~90%(hBn{rlv4 z>YpyUo9bNH--(_Ku4g1?5bTp!1j#H`*p{#0G05FQWmz0dnfX6^q?}RV;7>)|fe(v9 z&bfTpDkdf{OXg?%Y_At-BTG6UIEN^#JRTe76R6EET z8ZkC<{jJLB?-7bLD?Y^$u$j9?`EEcUWDFk(o!wRC>IY3e|C}n6?N8~q_=0viAxT|r zr;WkX)adAU62rs8=~7|1R)64Y_PJaey4wM3zc9u74aAh(9!O{l#v{jZi*v^=xjVI0 zc%2$xEP|Dxs*@ijD$3ff->#A(#@8;XudjJv zWyRHAl;0M{z6Wj)AWWATLqepkz5i}?^|oeFVtiy%F05V%dtEzA zNg?CVy?klG!yY;q{Qay(`=#VQ-!cmO0KnjYebl#tx;MvtfG00=F)kz^&(Ral9I9KHVN=dWg>q&JMKm zvSF&03c4~8K;-ymgDof0;zNk%tSEk~Z0v#~OAM~Ky-ZDWg#%rnyjR88B*oOPi( zHK|AaHzKzgHaC{(@f^0;-Rk)d#WzPi?1jP6z%2O;0CX5@V&wO(cJbpBbZ2a!Nef$@B`DN_PjpjLkB~ftcFht>v7cKpNT% z);u%u#2T6tZbCQWU>Up~$%`sWW=91#8db}yUpjJ56M^n>V-hBI2ccV3qs|OzIi$7} zi9N2`(h_yAcn&61e`uAivlCRT-{%fTV#z;j=G#4XTs;VLcXO$j!?A>#tqiSrg8>8Ksss=`VFh5#ff|DrWII z`9?))nR z0}kNdWPWq05`Ol-z4gqM2L($?OB)E6)zkp|h7g12U4es?$cE`Sr(;$w5)$74I`_{8 zgnNLTq#6fOH6rTRbZw}p7_+MmF~I7QR(lc=CKWlldxm}XflQ>21rbfZLS9m$Sk?f!#`Gz#e7jX%)B9NIPD-YmwRV? z{@Nojd(pj0nc16MOrofQF52L(l#iPG<>p7rPBd5;j5xTJI|oq|4f2WnD!a<-Za7Y7 zP&<7D>E1FBnX*E%R#W z8RZKN%%@s1{VH6w(+bHy-!$CCSh&0uhdQMW;4sp3j5VBLOw7%3cBPJ>sz<(Rov*Mym7H=AYQEdIX-LON7PE^ z{zw14S8wT>x-rIxI^yx~?|YtupI1WQT1^{+$vy`P4dzyyNp)ZI0gj&723WddVldU` zob>!2UN1{+Rk6}+^dz8gvWDS^i%V0WwN4} z___$rGvf_kS4F|SfNa)|?X|Z&z-Cu`vNtU8p(%oc)yvOw_{Xve&O3tj6VvVdthsr1 z{<+_r-?E+S%&#}*m|W9!^E)LNgiEhREICDP%5}sAn_Pa<(Lhb$zS;J$v7D4?+(oPA zQS@`!3b_9llt{MOqS_B}7M*?fTmCI9tqzBna7UOY>?@(q0F&~|t?2W>C*tGLr|IN>{;)`kR2YaQ~2H>HH|8eXtcxbkkKQM zQ5rq&2ru98f(lq_a@uxWv$=I#kW&PvSI+Em?}Z=MYZUh1!KU~a_2H}Zt;q&hsOi30 z7XzB$QR8af5$sB<+r$1*pS~W$Vjs=E`;+lKj9fPIUz}B?2|+UzVcoa+H-sU|LdU8f zO5H|q4v$;5j7X~A1jy+jcOjdfX_63+#Ih;WbBRwL{2?};G0H^ha9q8t))i&etNoNn zU)LR3Z9bRei<~0x=A6XUylqIWX+xAluKvDLaf4d^CSJz04$?O-ILYh@n_bOTqL{s# z-B36<-|6dfI-Zi63BhT?{7Pg;<|;i^64OL5m#b6t+G=W07(=3Jzxb5+vUE2q>SBKEBt?*-mI-qC ztHHX@_X6Cb9Q_8_kNtF^*b&+^`%39Z?Oi@52!zQ0ZqU$=xv5yU&SX3G+cK8(1Wt@C z+-f1}0A{1jV?Bb0g?TXAvr=l{l}To>ab0cwtWy+485|VE#Ufa>;c7d-UUQ0dE~;N& z31?~&EOIZ0KX7=crik4!$xXE2J!2TT7mJJ9?+^Yh>c2@(y%R}o z1TXuZ9Jf2}T(;G$R61?m$9Uh5og)n@+@1?bOJvB^U2Oj;f~-=cT#YUUV%pq-_om#G zxpt1)o_!U z$Z)6TK;4+t>XfPsb2v!;s<_L0AWXOWH7-z+T|z?PRL^O$Z$Fh67Uiwy9&ulBcn%RA zB%|tXFMU4Po8$AXqM~9~8L_ARUpCKV&>bF(h}VnIC@|EM>VA$Q2Yf>zyS9_buQAEX zZ}jefJ3#s|iF2EQl!%m?Etk2%w|s-m$e&7oIgJru7}P~s?jne2w`fKb0OSXoH2w7J zU55iTBH)fE!>!rn{(7-+sIAkFi1OzyYuTx#!mx&=laIL{g$B{@+r4jo!04~1J-)&I z_A4*CYFQfow&4m@Ir^$5-0L0|ku)LnfktOl+t1kv8XwQAl+4ejhB#efRx zh$iZR_vR|?-p0hp==qM(eblg2Zx)3feuRG5!OiPc(PVT%8#i5fx}meqN317B&ufte z9CZFa-PLhj7ob~W3R>#k``dL3Avo4X2Nqj`%8=dM{$34O_bB%k`&Q9GaGd~aF8!k% z8=jHP6>lHxD!VBv(x^e7F4W$HdAqSHc^-ac-HW3Y?DsNi4G1o*aM9JQd{nTS@ws?78L4-4Q}sF3-pcXgdWa`zJ!B#2Aket-~l)3Q&VadnAe`D zBA0~3jC*O+fpc8Y#lAe{As)SgjIuIAT1LjpG0?lmoL#D93hec)0+2}IuD_`0D%P-L5aMHamM^nohM&dx6J zf}H$rHkKKn!SVkX=frvqyx8I-yMb@;?Dp!Pm7WN!dpPh@EFy_)G1 z)$y&;nf;bC9*mS=HjpWOYViy=>5ni!ezqy{t+e|ASIS3W1dpU?q7 zvlE|RHfB$9_A(_bi8ps2Q zIUr8+p?;=pV8&X`#JZ&PzNBVh2@6vF@F93dRu8ia2N>>&`)RfL1Yr)vCs_}1QZ#=8 ze2ry^r#iVl7IgXqKJT`u)&O0eV0c-8Xc7`_dO`@2DLNoU(T}X3D&|MI8D>lIF*=L% za;rqcInzWM1Q77crw;VL7Y()L2H_SdGo~xWNVpZtv=2fKI+7sMn1ts&1FQA?f`xCa zv614?w?L$}6Ssf_LPpx?n^r-FkI(G{)go1vat26Is=_gV#0@A*pQ$t5^ilf799S2v z;i1|M4*MqL@iaqE6_9_HAK;FONPzr$BF-@1+DL8=)n9*Dium@a^ zX59vci?XWwY)L`0TlifjAgUd17yvNb*o({b zfH(;nXD;eUaFajDj(yivC_F0A0Te)<)F`&@Tipz|TiSz+{X{P0^u*7QhFD$Z<=2tG zQ_mB&o>)nzFkyjYl!7K)s3~}8du<<+Zob5inVuQ5tpRfDC)#F7 zSMXG*J|j3kzYuU2-T@8)&K8-4_h>*8Q3A(ep24^Y)DLc>%*h zI@rO11F&gMeQXi)ep63j%W%V<)Ozp5s+00_(MCRxROvRXfCsy!>cBhFO@^P4A5Jv! z?CpLYobR?WO1s8t%C+d-;H1$H3w&^7s8-&)Au0VLZqzSxq5jk~BlPs0Ye~IExlx+Z z6OXo~?_Owi+F!_oTumX6n4e1=Jup8!?_S$YB8Pai|{^J$LN7&}W3IEH(3>B8|(I1&W91?%1cYGj`=Si1bW zU$Q8Df=H^NH+xscnoCws+{H4C+9m0!vYI}PMtb}uN#S?P@t%rLFtqb?bt~vn^L>LE zEolfiJE;MIqM4!SKv?qW7hJT_{!EbY^cCy7Nv}Sl{=;0#3$OIf>FM&(zy=SUUqSVd z$Bi&jTU=95hg{yH=mmD?i@*;HmG!Si=a$1#Qz@y;ppW+2byd#huBN+qRDKg)yo+G< z^iiY=k(({)Y!6{WEzVk$^ReGQ^0}#GbASB^xnMNM#3W{{rHAqY_8KBsm-+FqY2r_q z#^$bTvN@W>?^IS+7W9gqK452_$%UUvnh~GE0~I8KIxI>BYYMl^pz{Lq;}buA;L8NzJ@(2L@dYOn+^IiW-`Q_he5ddaD8Q=0B z?B#_tVA$VkFb%-}EVzM6`p{A6+e0Bk>^J4%fF)x!rfuJSEAm-Z;1dsvR1 z1xd+Y^%=KX+jQb>;I8xOY@tjw+0}Kb?8*HyTR${W!FA50puUmsAVCD`j>BuV4jhp5L^W735nZJxeUQybI$ zxL@B^zuwwdk5EJS_!$_Kx;8z?33~NKDZjSbXYzZ?K8mu5iH3Et!>2(Wf)6rR)*-n9 z^%4Q!V)bx!`G>6@D`u$>&B3atolMB+-wVd~V(k`(oeR%Z19+6ePq@)i%kPtU)sqZ~ z^*S9mJF5r)Kbe2p8f(m7UqlKU+I=uLY- zWdAK$=y!gi-D;RxQ_)Eg_diZN1+f-OKYSAHQDJh%8yT)h`rb|&kMtlf<1W ztW$P85e@vLyy^3_E^_Kvi`*Ztk0I9JXoLgNBkE;qAQn(^1!_77S=LC{@z}{~Pre|a zl{++_EZv#>&qB1EteedL>hREyYBc|@8hOQYTgT4s)6;}Wac=FqJcL@`9=$=)LG~b; z^r1J54F0~j7_6R)t?#6+DRG!1l>dlTbc z^Zg-np#;|dlCm~T2#^52%pG#<2Nezc#{$3!y7QELyC|q&RM1v8CZNU{41&}tC~TcP zAOJ$<-O?q}G1%qx#4+AH;P%H5rTlY#eNv-gojDr957vJiFdm|bG)@?k3kZaA`0!qU z1ZMzl>PCp(Jvc7~_Opi%=d3q?CKW{zJ@E#)G<9QCcRv~XA*4Y8icES#isJ9;j7Nm> zP*A;ZLI15Cx6L2neWwWvU{^W&q5a&`yM3F($LGzX#Mo1UHg|3p&z`0T@?Q)SD$PMJ z!FK2OgERJbuvPSdtE&vIM_;A!;JYpjTv$iT_itBIDI$axUW*roA6#wS^mMcK93o=F;5AfWr0=72>$~Kzcd~2gP}{=7fo`%s;p-e9gNQU zUVAkw|9V3$ESww!v=GXS%04>ZCnI>2pdf``-UaP7T?0-=uzU3Uxb}PsR!Vg`5$N*i zoOfLv>lH}`)@6}iJ&(;)WDpH4t=sx@m2d8 zh=iql_T|}_Qpd#l!%kAf0nxyYTsjtT#@G?4wfh4Yeq64;*TWVDv=~~&9FB{DmLU2& zxFE6c5{DY(M*#mfC;8G#nwKXr%v6g;HGf=n5?~kq#s*GwH4du)%_Zm+H+KvTLaqlN zc9@)h7Cq?j32C5pq{vcd1f_wtwwwfg^med+{lnWNP#+*xd5TZh@AS!HrS)X*Q&jLF z((apo_WQR3;79-K5(GO5%01v!*||+5uv4FYHE(UE8hXMU^c7~E?k%#q+Q+m_(p?|@ zV7eBtNj*d{RKQs)bAt3?*t3!I2R-6fOaj`+3Bv)O{F!XR5LkrpwBBP3{a>At@N|DX zCj%2xNDx4&c|1>L{!MuWx@>+E`p}?$`p_IHFDDoD>gCICuim(S1VZ>o{_UsUBN?*z z#c`oYtp6iC5!a}k{1U4Sm?P4^D4_pmIgYqFuNGRLyfE}&S<kc}+{6J#e9pf1Tm}5*&RL)Ja+(*b#-}t77c%G0RVP+CP#ZhO zBk;fh-~Ter9IbW=y6)Au!Sr*{b7OI6r5f(9cU3i1SV9O`c1AKo#?;2T0nK}8)CM{( zV%751UG}Di9~u<9&PthQON~3}gAJT?NMgROc26VUrWQ|Wd2Octp9Q>fYT`KjI1pHX sFmwqsu(JT^fM9UbfV3olQ_GkC5-(Zjd_MQ)4bW%?Pgg&ebxsLQ0IDNuDF6Tf literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-15-1.png b/man/figures/README-unnamed-chunk-15-1.png new file mode 100644 index 0000000000000000000000000000000000000000..585ae7d282c57560bde4780d7251045b1e78a939 GIT binary patch literal 21438 zcmc$`by!qUxIT)4l*C9%jtB?>g0!>_D$?EENDbXEDvhLcONmH#cQ;6Pcjo}ZFn8lQ z=XdMe=bro5<$-60*=w)0*IM8D;{D!lf)(T>@Np?|(a_NFB|p7aLPLA_6AkUbGWJ8@ zlZ(So#=r}X-6u^)G&F+t`@aX>(BCF#XwT3j-@j9FOW9v=)gj&jV;yh(h{X7WEsdcV zfUamau2}6n*;wgZ{Aa>)OI~PPOIxC_a?)ncdO{0cR6bh=|E-Nd%HQ+iYe78%`86jB z!{4s9o*^CHFVW9Z}j`)9LuYfkO1SNSF~jc z+X`>lOn5)ulDvXPgCIe7a`WO#BV1{aZVX74N|;#6Ou|TFgzXC*grmMvY7ys~Wbp?U zL}*4#>WF?Ex~|+@7{YKUIE3D(fQ1y8JeHcL_f*JIIFpImQ|cZ66AflG*@tg$HFW30 zKhsN~oSKKs&qSemxUj0oz`s0huAATV;|L6V63fq?m>slyxBG<#61rL3432g|;Axhu z=T}?ZWWfpiK!Uc&_@x7BBW$|&nRyDL&ybpwFAiJ20}}Cm$j-i>OnEB!h!^JsBuE0n zm)t?yNwlfAwa|p*qRQcJS}N8Ua$CpGb$qcv{DO?4qSv!S4+?#J^qxTl-M6NoJ&*8l z{XTw9inw9$nGAim;J{q`lQNYl{BvfP&GGSbsR{(M@fOrI0J+>sdFhK~HBETO`1%(h zp8o@h42Fxk!Cr9WT0RNn6jDxGejn_wlCLm`4{4N8fd&>-i+B;CR~%Md-NIRZmIJ;S5mD2vL#m?^3~{nm zF5!#Es5z~StS{uRMJc_z51lLoGSDB`88yI{9i3;*v0!2&7lmrPms>3JP3Hja&r;m}creasy@ zp-J`~lVm1*sbPS8N%sQZC`ny-)@&{t*KW#D}RnGa-$;^@7kk(FQ zPJ(}571gtN9~s;lq+>^6XJQL zWF*8w#?Kclm)A7@4_bJ6L#DR&gN9;Y21R$ElGFW_<;&^)$7hI1JjFcUOv5#` zNYG9(=Sr;TqN9^bG3Ap3GA6DLH&;Z*VP(5ltV0geEmd!ffU(>UG&UN+^1i8hw|Zsb zmV{QSIVeCpPJc){`KzQTmz6^Kv_crm&%adkKBDQ@w=8JMK1OEnglABW<{(VpcwLuq z2*JN6IF!l#)le;P4znUW)V#Fq*hpOP9B43l?g!%Y9?t$;tu-uC;^Kx;TkSOcg;A4c z^H9X~WPS5QwOEEm@Zfha2!b75;W1CWgSym-Xg<~!+nI!Sv(>hP&IScUgkbRsTjiB7 znwd96x54s)uoC)IM!&%Y0iU*oA?XNRk@C7?Cqy8ay?!epy!mzcHn5)W-%nbsLYMHF zS?RL%7M5eQWaA3oh}gcMvnE?GS)G3p7V8Ik(Rivord~xolaU!3IV~lwEjxGnCiumB zDQsyhIKqBtIY0`MDM~eCeVEj$r} zIcXR>va}XZX$5xkTF|GNfRQd?h>{9YVPW(GC04`FbYz^En0Sk35Az!dH#Vp)DC^yZ zmU~cYmRai|->B#~d1OV3*FVIl@T$ajxsIXD%uQD@=mWyYMZR1`&x;Qls;Bgfw9~!(F-O z<Orfgn;SOG z!)^v597Ek>Z-IyH(|5_Oxmz!oLw-o*Jn~s!v#M|QQ(GCrwIc0&pC=TWuCUqD!S0ym z;WuS@b}_?Bw$&aDgY`)7|eSs+zJ&_9y7T8R01$ zwJ7M+uHR(#1}9}v!2sx<-(S8dCb|DXJ^4o@)99*s~*Nl8ji(!ju=mvx1V zNcc-jnMDBIBl4I5Q;jUu4C&KsW&u^Zb{Qz-DY|JN+nbKx)up`Tr9MfIBR#l@QqnR^ zM!uo>IlWXzO*RJZ@Vs(*wt8CaYH}>LF;;v<&MaSnJpU%|_@JrM0X=!!FZ^K&6);Am zk7U1sBm=QDIrV(KF%M(144?k0QD2`(pVk4{SZI z7lTb1Z@&c+5wW+HC#u8KcE)nA2^$+4fDg>B{j8>nXoTHH%Ca4|hMqim za!p7Ppjl$@b%U5itzf#z+q3@%5&>Uoa33o(S?`H*s1-)7v`~8wlo-EKD zD_f7(_v!8HtBZ1qVBAOkJ(G%MnaGs~_cNskIBt&TDaSE3dcp~Car=rttJP`Oy;U=;73ctumk@v zTH3`NY4U!i+lwiE^&*{8HVQ$f-%>e!u!NYH3Lm6LKNF9|$WPmax;RE)R+T9enWGk% z_>?Bs7|C;i+ZQ(v3o|Vz{uF98maI&JVYg9{kp`Nltyo|U(FRZW;ZUm3D`~AtOI6^v z|3{8={3h@t#-{vBW;jjcRl42&bm?Pqc8xf^r>|RvhdEG&T3WM7yjE=K3L5B5X*u3z zT!W8~iDBqNFlH5Wc57t{A<6@xqlUEu^heK=)y^!52(7sD?NNFj9v)Q2sKxD0 zZaQ#(j#TVqp|*D1I`4AI`&v59&G=|>Y&2L^)XMeY%-s2gBvHx@a@~TUpJjM`eGl( zs^qH`zCB|(_N%g)(@F;eaf_`cm(#XF|K`Q^Xx78ntE(%GbTC-N!zA0;uLLXSEGsLk za5&--%jcQ0oQ-QvA))#f;v4u8)Z0hc=hp2`JV)ts>hfb1r3{GwLmZ!#Hvf-Vz=&&I zVUJT-3BjVbbI@kZxCZ3qTpW(5fIw}Fq6wGgSH}%#Gm?y)JRVh|Q|s_(C^jxP*UO`^ z>FwY`y=%4HF%|)J3EN9Mp9aS*xvx?X2&7;*VrOUPnh=ly-Dj;}F(0p)GSfK5R3X~LwZo|(~9wCf=p%mP|-hSgykhHTq z?x(UV)T#s;0Asw87IfY8WYSJ==Kls+5y*f@3f$Rt<7B8`~Q>KIBRaHKefC)gkehO?GIMA8v0KXNj#_L^xpd+tx8wY8@Ei zh>FWG_dU|Cr`OO+wSQ9UiJCHk|LjmrwU&AFGR=t5t*==snoM=N&agi}k}`}X@8Bw$ zs|%{-PGI*UZXa?9O0wRz>*2S-!oD*=c_{OFOXXtZY zUgU(lKSay_)9Z*k9ftyyh^aJdk(^zDpQSLlwxv0^u8eYb#qPYI)|qhNE*ox^10lzf zhq$ZNLV-=J*pXJY)uMm-8l`Yf(YeQTx^&lYV@!6|t1ftsp)M0_B4=MZKE7*}Y4E zmhaMu`-OM}_4Y=&Pj5o6fF9Yr$tI1hxye z9rYUp&LVOGw<=C@E4rB~%b0b_98Gdwhp`E8#U0VzY{_ipI_)1D%e4;;X7Q30$M=~Q z;{~3=99MVwap?RKI5=ppJ-=EV3tK$pdij{^J4j#x zMb=|^8AK3l(vgzSb7dOnds`>_T5VMxTs^m~?gR`8pW+JvyFr;!sJT!D-6jUY&KRx zG`Zn|Xoe%@En()>wmAa23lrK~_GyAgM31QE+2>g2FWb-+oPLa`9pNipZ{>V+j{Xb- zTh`hvrp3<@za0wtV^lBtz{{$_9!>> z!=-VzBjUdZP>e{^8zgmT#;sJDJzEsd2&a7>J;+KmFJo#o#svR`$HyvNzw?@xvHjIm zQA?VYaDgUyGqiVdFWcJs;x~w+eT*ueo#}eql5DLKnJak|9d|}xOG&#CUY+E7R%^_o zH#mWMLZLR>E}Lw?t{dURx5_1UVR3Yx@ARygxo5su!s6FxL@({2)x&Beo4>bs4I*0X&%?5LXw zZD)#^(%w{J^W)d3&YV9EP%Ds_5PWij3>#y~QbZ+)FH zlBz_i1J9OoW{4m`@$vE1v$98I(Na0Iv@yyRxB*XWYtcqoyOb(}_fYWW!3Rf$SD9^K zV^sBF+C+L1PbQpDtbt}obxSvY!a-%s5!08hSnGu8iW?q3FE6CV?SxT1!D1qc=}1=X zEIRP!vU`K`XdDqZXNg0{5*sFx^ae`m(U=Cx9NVe*SXzyXWvDr6!Q*h(DhNDE*qmbx zlvIEV!c$vYTQDhm%C^NK4PQMUL|~ zLL3#lrxg7Tw+jNrkT_G#Rg9%R#u$mLAP)cV)rs(hRBE_2)>d;t+nW;A;|sF)Ju^$9 zT939)#U5m!etE8*mwyD7T;(zi zWZ~HY@b!7MJ(|yWw&`KccJ9VgN|h9zqK9v8ruWjlravFJKp0F}Fm*hd#mBUh!sY$@ZoMyL0}P_AB{*NP8+ z#Wn1yXWSoIpR0sI5@J&Ux2ys^eznu{UTz&-KtH>MPjnsVb2{4<7e{PcEON+BkNU>P zv7#e_w=TC>J}Gf+bO9r)w7W4d!YH$*kgO%cMQ2aCylb_I z<(E_QZ>0rXB$Van-Othse4*k&U6st`eWNLBEYnmDIFdrpc@r9Fx|z#LCi-V~JC*lL zY@c#)!{!*xpnbKBE-iCu#o175wp#KfMB;&hFm58p;8Q(h1GyyQ>Y$g4oO#UE6b+x} z+G|^5V1YoNlKUPymC^JyVL%&DTR%GI*clsNe|}3j>3piL+h>$c0jPo2ndoKN|C=@c zKqX*O2_H^xuoLSpm#M@oj)%AM-zRH|W}=o8|97*yKSLTfp{sSX6T#0?VXbo68=kj^ z+7(+nBYS7moQ)0WE)LC&!?l~h{3|(UAP)IYLu;WvoIH`b;8>xuB#>T#^Yaq|8@Y`i z2Yk*Z`?T{!9TFCrl>R?@#VPIEAyt4q5w5uuk!I+>L8{8wnVlVtK9z6=96{*uWT91v{k%9zi6_TNRjvZ=KGMOv2 zfY87AMSMRa5zbadlFW_fJxhDPe zGjz#v0F>h3;DA<6*Mkdk{XnY+2ZbQ--!F3fK$%K;CMk!DL$5X7Rw{gucaCv=pUR&U zi-4C~Pu49HGvv@We0TG2O>y`<_m@#9+9<$#GXL8LY^_2*R@U#J)r}3tC_68*Eani< z^Qcb@G1J2l*BQ7pJ^2F6;|-RD_C7xwa2bh$ufz^elqF|=eKwW;seLa)SPELFyH~Tw zJSUwp6<*y<))bH>Pd2~jB=S;-Hq_^NdHqClAq;=a9C@&CxB%{&#Pceh;_o!f!Ryy}Ye5Q)jg5tm1;irda_Rj{OilBI zI~G|^DectM;v~->FKl0UVDTEr%TqNrH|RYGJlCS2Ytky5O!++Q{7H0Uy$9!{cW7u* zx}#}EMlSpt$Qih8yvJTjjU{$oZJWzYERUiXC3^H}W|aHm z(_0Ag7Gww7O+WZ=5_}Aoo%cv}3VFWln+nsZYxC2ffYf?E?AS9mi}U+bA+wiO@g+1xLG|OgY+jOYT&f35j=0IC3PO0F zPoxXgA$x(FGMSh!6`mINw!H4el|7UJ3AL+zz}rR zQ#EPc6s)b@2h*}z-iYz##ATT%q9lnEA%PHp0$-U)0RZ#Ee|T&FqtRky!yZOb~o zci}z}BGyV3_A$;>0Cfvo>kcg8ybJD-Vi2&Mj&*T^G66!SUUm--a8VmQ4(%R&@7N^5K&sRkRWWizSU5 z_lWa!#1Wmx%}%4lBB|iDvL8s&BInbMl98Y`{r2@`ykIIjwBI~WMM{zSC^%7_?t@~= z)c!L$5+-Oyrs|syzpv9-(gW8TAh}n+&wzi)(*KNP9DkQ=F7w>W(4N_4DXgmwJJ~2# zA4Kq8QR{}scL^Pl%edz?I8+J-L~hlu5r9R7+1bNEL=+UY_G=$)BXq)xXp_fSpFLB6 zoK#X2H@4wdIwsgYc<=y%b!z#f&O=F{-~BhHZ>yQW7FI|ctH;LEJ`4XukoUd{)-FH40(Q8TUz|&4_3Q({%cAb{gE>`e2ee%HcoFa{ZplY6g1Tu4H$LS%pm)uaWabUgdO~kIy9kyVq%6gf=wR|cb zixzW(XDmFjRsdq+P^i`qd;N?Eul*haiwA&f?l{v4OJ^KbNlD3SY!XeAtF79_;mRp>ZwYq~R8*Ex2y& zdU_R`jf3 zWmR1Es(~{Fz8C)ESdKnPK9$=?D*J^%)UI%m^XpR~G&JlmJ_SE^ABe|=G;{haQVdbn zx2UP_EplX%OcB~d+)z_)WitOb#G~J>?fQ| zb$T7pt?AN+Hwxs%gZ$QPqv`#&!PIkg$PV;66`B5`10&>>PUpjW-9MisPTcUNqltm+ z{v`c(=HUO#_ppry`m}rZpE>jYh7l6!<{JI|`*&hN3=oj|khildaTd_>7dpGVB*4e7 zWN-FH@V$6k|H>cogqD`wiR8II?f)RnVcxQ>dfvqIM3`MI&Eug(Ia2K zF#qF&nAOzzI7^*n41PO)gokZd&QW;f)o1JN_Gma4N1$>Mb-8AilLNte1jzy)TyLI{ z!qHi-Oc@yho6iCDeO_5(r07R$ZlTY7S&&4*K( zoxCoj#fs~{5l|(t7od0x+xJZ!%?9p1JFE$@^679rrXdQ#_W(#CyFLn$5nB%VQG6z+eeJHtOjF2LIwu@mE-VsbGg*W z3rYlK)7iTRKx)tq*ZL4iFWu$ckaT#~d}vrRiR-S>Wo^cc6YY#r#N5<}0NfR{)!gQK ztKFW`X43{v`_XaR4N^!T`t!HR=P#1nR4r$q)6+ZP4jsLE1Ob6`PUfgLnSW5hu)mekl767) zCt(F-85w>Ak1-evr%TfA<~FEU2n*Jty{tRaRoaVLmixiLAbK$kkbIR>rBxDuX7bVM zGVgcjT-oVTs>23vpbS_C9ad*6r)WG~4Yt;4K8oL{c#%1it$AR)4hh6C5)XC(o9^Ep z43&U|HQIfS4e$}I%@{@h4Ry&+`nbz4Rg7IEEu7UH5c_#zmexIJQ8Hq0)KA4a2~Zi! zXx|vz__j`WNpUh%?O8eQbNbkJ+^>?oeK!8Y@TFILPp)Wcf&Cv9Bd=u#%=#ITQr-ct zP+#1uen*C9v?QkW(gtUX0(QjymAKCy0$n24%a$AkBcM;tdv3xvP5a|E7PhG=C}!%M zt(uI{M_(se>o=U7o~{ZIfe6cIE{zJ(($e1a*S|{YBD(co6>8l|(Y@HqN_bG1rc>|2 zKNv$_>wNI_`LFqA;|l=iAB36xqc?nYV&jeI*tEgucI408ZN{D z(wM$8Pq?r&bba0XM=pGc?8nxCRGt+aQNTy%2Rhs6q=ymGAU|(C3oQiJ&rYVMh&uB}9z8%W@@l6fq04wLwN{WOLyCbJ$$R@S#hwnIMdUkkOg zaFt@b@Q{~BNAIxdtj*eHlC3ucTPetg7C5gzsO3?vm`6>^XcDg4iuLCQ!iNg%9xr_A zcctZThyvFg0Y;PP+_#c`4v%V~*+U~oP?oYY?j*uOXze|wG`3+h9Ja_H%upxUU35VC z-v52o^@?5*dv!8f!*ZR)Ee~GsOem?1H$12?RUhoIbFn-k93DsPcxahvnay5&sFe2} z*-MVb)LX*7cfVR-3=bBV) zF@J*7og=c5&%vQtN(z$wu5flT>T`LS=2)%so~?xQ_R}P+M%BhfMkbh z(XC$3>L}&K06dQu*Y-q63si)DT7NTv?jOU6w>}(F^!KOkHgIrgpif`pYwyrsMJf5~ zu}a^h2G`v7nBrgZzloJOw{QFsCgG?0bWtSK`0-bmSG{|%Dn~2*i!-Ug8=dk2<*wV_ zcA+bN>^lM=8GpBu?@iOC3*Ez2V$^m4*{#lo6qRS0tOJ z&OMfVHa~@{4ELfN%sC0wUGT&1uAn}}ty%Z+$>E^W`W`{FtqY*%8!aF~?=SWN%q^Q> zPl*oEvD+ymf`HPhX=Xr=>$Xs4uv7ZEzhW1wlM_N5N)?;Sll`weri-FZ_qYt_Z_SLg zTWmw#O{B_ijXEga9y&Pa+2mYUD1Ktv3 z&TJnf`|z(#;RTbw==b<&>(o6u0>%)V1Q9ax-m5rSdDA~7W%6K-dD$uxFD_UunIR;+ zqR6%B(q%8uy&w z12O{xUK*KU{e(Wges#hDke`zvVWx zSxo@=1|R>)^6Ccaed7Ytdb6S*KnLjV?0f=wPEXHoJKy7I{fyS%hJ_deYPq)rX5}+x zwdv{Lp;I0EI|DxQ!@9&P&E!NtfltcN@OlBw)nvn&1c}LuEy^^*Q?b;*c z%~fqo8g|}^vKr0&a5tPHV}-$F>Nxfq5~NqW1z47dHa>jrr+Cw{;jD6SCbKgk@cN4P z58cb&%4C^^Cd#Q!mU>{@YM!@W9B6ZF9eb-ZH6uoF)Qfh~7zUG_oS1NM{EhzPc`bXlJ2 zsw6vDf8t}eXg+Gy*J;sr;-vuW$b(O9SjCN;(cNVFKVQ7K4d#%ZX zW>N6v)ZYt&iocJgE(bFCQ&TTi9FFX}52Z_OCE{IWyuoRCkK)t3crvO0A>+G;sxHNB#+~(8@d5;$6L02$>Y#>`4eLWWjceuHY_(uM>P`@0e+g&%Mh+l z&`(V+o3}Kn@+zrQtXQ*6OZU*NR7?2x&GQM0Fm$iNM?7ivmDuImJ6J-wUUl0RN|#ya zVxfpbgRF*Vy_&K?6#^)r|eYg)S_OIwTi<_{ab(h_j1##)} zvtvHT<+ zX^^SpDWZ5alM^_|!*}m=8{?;X7&<$n|M)&P@dJI>pd3wv%?}x|-mKi*BWdw(X01OG zkvu8-L0;xl!^p=fo_~4KThI0EY}Cz)yIkWG`YoLwy13RIfkXH1-8+CDv-yHAP%(c3 z5~!d8$ZlGj8tovA{(d!wiS8!MZZr$q1?;k!T5?LsT=N zpz5+cKiHF~VMP-HDO+5{upX+bHSDUIXL;ODo>NCYJYTSpr;|TnW@`H69=bZ6N^P2h zh0wgiZ3~8k>73;Nep(!yf(y_140fjdVO>cC#u+=Xup$L4#NZ7#iTiKBnGMN2ts()e z34XC*EE;4Zq^FwBK)E{9QmpsNh_wOZTQ&+*kr{nX&48KYsVPG*))K*MP%xX8L90xadG$>O6 zFh?H@QIAvXG6}gkRBCl>%T-Ox&A;EW5r)%8_pUqCjwq5y!Q95~Sd5Fk<~b9dU-;BC zWnEN_{knvnk`{|Z@BaxCixr5gy7J6qaLCD(h}ck=2u;Upw}c{oK>_X=*(S8rW8J)*9wcl>*{G#52~ z{a7R^a9+f&sZCp7y@dq8U+q5hg}ka$XYh-h7t-zu(^2*q|0*b4gj8z4So-aQY=h&* zO(b~T-KtOM#}?;g*oYzp_s_4dQZSEX-9`GqNLQc>O{c$6;3cpC!ej76n=c}K)56R% zisVQGv;3M-#Ek`pInLVS`-kVVdX9z!CeWU5z!%?F+dFO?o~xWc=Qoq^ZdIXEyI1b{ ztI+F#aXxgPTBzp_RzMLWdXZLLSIOR0`&S{TeYyPx!Zi1az3+zl1@)0J?ZQVRvZeWYGs}q z+Pq}do4^v`GMIuqZ~Wj3`3DjLJ$$0aVqaM3i-dhnR*DH;x7Vws!AW!X+EMZtBm9Mb zl;eTiUFGaca1p7m3YN2)cRjiGS(@zJyjNa+puTD)Sy708JiGM~=+$x=; z@t~V#1G#t>N5-)a`${YaHzb>63Gslj*F3+y)Nf0}kRN*h9eQ(WM>!~!^CL=|V|?26 zHp;cq?3EFEZHn>MPVZWp&@)O7RAZK^U5}}#OuRci+I*RLd7{-4-=1@c(a}3}taA&s z(QfX7cT=wq(dhxx|Df{QG%zSBuD{Y}V{`5bTmpfGz?b*F7;dUu;Go%k7*{^S64K9D zEI;FjFIt9R5>LOY^YIG&d=y`_RJru?E4oKz=%sVnsHm%J-k1j9)S;namC?5X&AW55&~S65;ujyi0lcW3o0J#^<}lFr>ua&XX198&HK@C3n;$Y5I=FogtTW9 zD%O*z@BVWUsf#Dh?E_*>D1-e!bN~48Z}Il^IEPd05z}C8fD&2fjhe~r+um$sg3ZDd z7(>T^4uigmu+E6g@cL|%v)|8du{XZ3)tM|bm3gLC0<-`T3K0qC%T5M3-I<*w z9Tr+)^wtvI7b;2hg=26O@;J5P9?}C6i8gdxX|({GPPtkTdo}AN+MCU+S~(aQ1)Vr< zr*#5+(hwjo5bs^>c2sEX9P4rvMy1wF62W?O($oW{Y5qK9CO!v^E56=9G>J->afs!0 z;*tV4eM|7{$2`{)pY=K4U@9ypcLmo7N3EP}doj83U2KM>%-ST!t1A8dGHbJYJs;*d zu!Xo!!$@vMEyO2>C;x?qO(mZvziH^p^W6#+rcDJ9X_lW8TViD_gb-}Qv7^O)f->ro z8jlN0IXMEl_jxJ-fq`e#R6!DkRG-}3mR<0N-Yf)aP9MIZrKQ#QGiej-HO#QIXa#M| zIcM;j5PRcs`YvahSroPF){MzV3G#xA#av1d~|v)-fQt35q=frxse{d-;kEP+r6If_*jb z@$do%aegGIe+&LZlt|dyynm`3C1c3k%rAPodBFSFoaTBPOc#%coB{N?s*6M5~Wk_-N+YuKtGxNPc zAfYuvxBt;=T`dy@({^RQKZtx!`(NV)Y%j#sU_rO9UM(FEdbz5Mp-E|0b$$tdCo;6a z2WK6edM$Dky`M(2=uvuFB44Lr4yac&a)=~&Kba4T;sz2pKrPv&WbNsO8+Fzeg0ew? z^Un4(Bd?KA6vh^|&5h_5jmk`81Vm54>qpSLB|OckT-(M8US!&>BfryrQtOJaOa8Uo zF|D(hRy~qFjSwjNYZ2>%hvjvzebj5dOCTr!>59H>-5b5u?*+6}i_Iq$Q)7J&)}AQ; zH}?sQHvmr?P|W|A(!1z=py`6QU`EpjogLvntX9jw;O7Y48$UPVhQSZHt+FIlr@y(Y zLU=OJnM1jK68Q2|Sb%d5qCa_Y1w?GX+xs{UV4LcOtF_Vr`@i8(3o$g#02QizuLKtD zp9=Y6@Ph^zT>5`n_lF^Kym{W?nfGEP9EkRo>oBB`18OexVV7qoPHghPBDIKoCGt9~ ztdzc!d9pbTOs_~j2xHiiqv&SC{(BRC$rm1AIOF4HGLd9=vrZ_*ff$&m#9q1;Ma60K z-pfmvj)9HM8X(>_bYmJB@+I5EVPRnWhYXif0CNDyp+Mml$%hkaydVtOF#t`{^I~w@ z+zDQ)Mn-okEtaO(~@-^ycsEQ9AvCjrzV6K9kJ~Uj0y7*KIF( z+Vh(qQ*K{-unTM>g_&i33wp>HzycB!WXUM%_+D#%^)A!g9b>)qw(nO;c^ZyQl;uv{ike-*hh#U9JwX ze|+1|1kEim0f_Z0woR;6h-kx)CvBM?=H1F~@2^vo;?cT&^ zedx<3&R1|h*cWZjGS|N8&Tf2n!U1&{jhK&jX723OaKWT1Rj5V@ ze7-YU`xiW4*|8-cH%_`f8ES(#4Ae!va8vWNov2`xNayq$A>=2_*Uh;I{0^r@SzVYP zWa?9u(J4ksU*13Z@?_m*L2{WVf`T6Ke~O_C9`zneqNV%(ORz>o*UP+ePkx(upY_{6 zi@$WWuvUU0$WH+DD;nnEQi(y|8^%AU#~S zwq+xR@{YzFzj&ohyo={8B(+PIXwL`~L&?l$cO>V^FZA*TCTK!_tE-p^*24{wVC`5` zP3a#2M{4l+xL4S7_g9{TH=#sx)WeQspe#bkkKh4DmICv=zWtYKIX)h-;FlJUFo7Zq3cjHJ-Do z&QV~NN?Q)jw%$rBhLyS@{PoIg2$RAND4)}vhY6qu+OmtGB7}S`ulj>_)~8ttiS?Bp zMW@9L0kpRYnHdnvMi~4>81}FGX*M{oo0wg5J>1uhu)5!lO$JjTxEJzn5}Ir4acYJN z|4Kr4?pq(6y_=kxkLU;TJ?w`9r$KZaUQyX5T#_Ge4;tLh>du;N{*|I>h7lZmi$L)l zsqg_PaJjr3EFW2;n+IXgKDk^5G}aXz&cXcIMQN6+1?G{(p7axl@Gg9ZYIJ36azSqV zOuEtQ@H0@XeKY-ygKy&Ia!HXPV#?Erb-~&CtcocKQ$)mPIXpWh7fA6iC(CKPu9(m+ z%!Kpifq&IsZJ92OYKs-oy)XN4kAYP);T&*&ma~*zDk@X~@L=Zj&2srvnB&=<)r=^> z7q?RH-n;3FMJORfOrOwn``8w-(Z|5*KbXr^FWqkWYs00(ZoS=;_wgl=(vsL2-)0BJ zye|$8>g5L$ z^H+AcbMnLmP?*+`ufkd^5@XHacl3edozDNSnKmF(8kBx_Saifx?D2FAx|$iz+4Sk? zEw;^HZlWCZoH!&)<-Vr*;mCFU5f7CXj!o8;(~C=6Gs$A8Tkj|LC1wYS5i~Snjr;Ef zXcHW8GFzR{etGH;%NqFG?LY;<*@IFK_cJ;8-5R)E-<^R%+aRw>+Gs0z0fa)>YwV;LBv(_P03gE z<*+_gBhFOnZrE&M)A8&Dwe{8B#ux&gDj<|UpEOLSyK?gVsmF2VI;mF9kN6+e#qQ6{ zLMQi?6)CDsH=6U$`>Y5OMKvM|S>L`V;SKOcw02z}d^F{(o+rsBO^AL>*ceI$_y1`7 z>uAqX>fJQt9&@-*D#5KE0{Wxk`!V(hyO`0Z3nJQr9=kXY{b!Rc4pA~eY!Hs*j#~PF zC8HC`GtrQd0HoMwW+#%OFN`vh#KJEbS`kj#4prKV5jT5ORr5u>LBmIz|CE2zy3!y0 zeVA(+Z9TLhUNc*WNKj4biX~ltGp@m@C04TeYR^wGnm{$F*3*E3mLv2&+wld#m6SLU z@9ffGXRc#=Hyn#@lA2{LTSjkv(|d$~YbPwY?-q?Att{LcPebl;^25S)@pJ$27SU_( z_e&RwVyQPxve>8{vVV>qP%FsT$e9y4#Z6evhN_25P4v~Q1+HP!#bnA{c*J^L?{@vi zpsN;Sjf0d4cuIAG-rM!Pfv2?659rqtlVWrT=2$F%3k~ zG*?g}pPA}sm1bIuDc4`dG=|Ra^P%(VVv^Ji8!s}%nTc{jeIL&_x4{KNj-6&qpPIFRSp2?CJUR{QDC@YEbC=Z(*Ssz?WW>bhXw#6hFUx3Y1X&XY_V? z?ecwO<%_{n#k#|B~F)xIL`pH1gSmRcF{ z(|b3+hC^;LQ{w))KvZ%8+nsN0fZTcq_E}CVrPd>jwV$db8olAJwL5aScu^vh(SnY#y{{W1pm`n}sSWsUYlXADLJ2g#^< z)gyqFjJk?Bq0ctLVO=p0b7OG(@|7RNiw5zQ@C%Sy?=UG(dzZ-I5bXCLZ&c<);*|_jv?$8s$&+Q( zw%63at)k4#pSD40Z?hwpTc13Qb5BV#?tUCy?r;XXydY8M8l>+^xOa%#9Lfk%pEi3x z|985La8{N@-7xQ0`5UDa!t2(a#)ZC;;C0@NN%)_f)nUnJC{ zoN%^Qkt9^~T9rLEwX7!l-`cqHcqrTMpHhQ}$dU%xGi22BWU{3gSx1kpk;v}J&WMJD zV(b#xK1P&%%f8E&5VH1IdS)!yCi_^*KJ#9;_xJnn{ck?^b=}Kc=X<{AT<1FHK;kmV zNe9PoCR!hoKxkL2&E6H+HpgZ5f}*w3ISk<%!H%p36C(6}I947W#t*RGrR-LTrZ$0a zuLecNGEYZP5~hOZ83UMF34O3_6_eHH04E3Y9v>6eT}yhS?PFu!aOzlQyivy<{aA>w zpCBmO6jf1q%K<7uLtdQ@3E3OAVuL_1h``rj^e@loP#b+#BV%JFLqZ6IxItNv3G%Y7 z01o9J-54TEbltg-#)W-pSz)J58;Fr~;g;j%;E^XXI6vlwFy4lf>prJ~2a9H4{UB@& zh7^PHf;`+)>;THAadjX@q`nPCXI`$_FziAv$B2|SsWa65A=}Swu2<3SQ{KVJXMqJs zMg**bIP;alcTOVc! zL8Y5RC@lLucZeMd%pYv(ctG{gLA}-wJoV$G6407u&}TR+I1qq7vG`!)m`QuwX! z*dtIvM+dF}VV939_nYRuXLNT596By4-4ba2a9F&>?tV16@bCCgFV`Nt=U8u1ofR_e z3A-7qjHRj#-hsP=><^RTi=1QpN{3V*?nrFlZ`?K?n@&brrY9tznZWs_So$jA9E@=m z?G+bM25(9> zOWX-e=;>10dGLz#dpZw8Orm>@jj*4NW(*;?YP3R3BfTd=^~>_5`8->@aI`u&f0$9E znY1=l(J*3k1&OqG%alc;?-SoqFSM8a%F#IaFha88feZumze=T40@5* zrIMVI=pd({*{;>}9J;2HJ8i|qE0}`I5ibdTQ~eVH!3i{BJ{yMYe0K8~63@%cS77%* zQV~GYu2neXD0h^F1e50E&~zOx3B6tStA2(iKRs^Cr6Acx2NA9Oyp=!eQ|u%=&wc#D z=?`2d$JFCg`#6}I=BZETDJqgDrsL(hU$G1MQ}56QmQ`scty;H1uMaCWVqee=pc84^ z(;fI8PAp_4rn!2%U2&Q4tYhre-XGW5>C60^&5^k)DR8qzK~jhx zPD^JB1#LT8Ka~5s^7bl|<@d5I-BkLsbrZKeG(<}nRc$_p@9yH&v`kI;hCT{ICc{Pg zB(%t8-49P|7~GodISfzanbV~$Ac@VS#j|`;1J+91og2r#NOB+T4a8Hot3$%HHGHibLq`t% z)2Fg21+Pi|=ia_aN_Dki&e>)gzM{kDSRNtW_H>P`K&LDQez*V;qW=6bsV06j;fv1A zKnYaM5-$DD=%Mdb{|p~;udVT8*}@-uey{76BBim_tt5Hlsv0uG2yic0wU0LSb=`eF zZ1K3~JOV$Bh8tFolPT7s#AQI2BcOX4@a^fSLp|-=iFZfTT`VgokTY=;7MTe)|K{gW zpuD;MOl+v7i=*kMcJ4T^RbS-CK)!?FtSl2C&1(`_z^*XslA1B|lRsjVHEmFm|MGUd zPDB9x;4DGj(<=5>5RWtDq@)Dq$r{}Os_WvzB zygD)-E7I8+0jaE8bX4LBFay9m`oq16X|2%NPwVq?@(OG~TLuo6e{Au|pBOH+Y{P=V za-d2|R`uiTg6i9)*Zp^?b@bY&^!Em1p71W!sm9fSmEY=lq_3Vewx}8+QK7k;e}NY6 zcqJyE7LFFZa_9UX1x)Cka5iQPUB>VwH&4ZV9X8Lo0oE8!8=6{0_5)W|uNLw|4XH%6 zSjr#dI89L2wkDnqz-XRI~nMWOUqCTv36M(}nsO|bUFGv@DyDi|{{O}!*34`cG6X99bbgBJ1C+Bt7MbQ#- zEH7i^hNVJuJ`10A0Shy%+|JXi2sjR}-9V$O6Ri$5<$OlK1dhigoZTB$4-Vrl|G)%I z?#^eaiNZ7zDa|GVZN-^O+=Zek-c4B=-i$_}JZM7xAGccUj$UntX@3>UBN=PTNh@;R z7Z8@xuSKwcrs&VJ^Lp3PhTGy$`h}Bn-(>BB<7#B zdVjn5F-q5HF;4uT=UdtR;1>MG43%2O@o9D=zyD;bSxRPDT!Pg8whM33)$i1y#(6?2 zh=ldC^ySKiJ*LDH1KB##Bo> zBA2*BvgYEt57#D`=?%4C*(>A|h!I@e4cP4Z;qiHn`KVh+_GTLWZKO=WmABU|2FiD) z4wgFW7KTwPzBv-=(K~6AjrOy!@zO==mgD!oB&_b#{S~~0c_hfMaoHiUe|Fws@ zkpId`hn7i}%Gg;@or~^|CdsC)T`0vM20l3Rf?LJY5)W^w8?FW4Q`BGq&pp+81jKEy zX%hG2iNis>z_Z@XTw4U~&Jdu6%CSxR*u#Le@TChQcohcDpN9XnlE^ zOKooMYjlB7Hq+LyTqeQ_ZKBt1#uh-Q9qq^yH@>C_+i7(Xc_4V_M>?7owFxQXJvKc@ z_9Y0~?|6uPt>J}1=S{A$K?%TC>VE=<)Fu23`-vbn=s=BGH?Wbs}{s`>)rC^dJFWkIJjlDfJ^CfE<39bf$26Qg(?FFia)q?EqK z>j|UFzM$r}Ziw$?8IEOU@I|ry^0DWY!P)hg2O58?dOR*(AEepdP6yf6vhj~vPo=+` z%eRdidLJ;5b`tZ(*JjaD&T?jGMMB=Ws-|YCK``d72`pm0^~I@QzkU@OrBt|2HFtL2 z9g*UEI`f&?Vhp4~8G~`^kM@R=uy*T_J2TFXjs-dC>(h(L&Yn%S(Q~(4F4$Gr))N!Ha8I7 z(0@^bF#s=xBq5qRPWZ4G^NiJH~R F{{S_>I}rc? literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-16-1.png b/man/figures/README-unnamed-chunk-16-1.png new file mode 100644 index 0000000000000000000000000000000000000000..d0c1b9969d41f25962debdb9307ccd7995530d50 GIT binary patch literal 23152 zcmafb1yodR+wO=U2olnQ0}=uP(jl#MgLF!FNp~ni3%m#jlG5FsLnAqK!$@~GL!3Q+ z-}nFjS?8>C_F62~g5lZEzMp&Fab4F+Tf# zawH3pXK?4krqk!jC4B_^g86p?-q>kKC|PIT5a}`kUVp&J;*`1)^9NW+R>Ax5%BmOU zPd1%nwaP+3@2aU^e(Cyru|iwgo7K1Dq@*B7EG-z3PC!-WzKPgrhtI}(sRr2v77 z<@!BkE@+aYeSeHd>@JE_9YL{db5JrH1i6o5bD|+{iBk`E!EBlI0M zar|^5Rp)?)KgZ6HKqwUcDfxMWpW0_0W{b)Lf+ z*T#2zM5Paw9)0q6_wewk76>WvcvcBKG{alj6knVDulvi4q8J~STHRpnu<0-J!d`lT zz#0tP$+fYYYWoW{2kXK2b5hS6_7m>MH?mkytFZLXfQNhA??orzYVFcx5|k}k!B1N?3)PFrn4`nPIh<%;GVaj^e6VZ>_Neu$`tO2?10WBLUua09enH*>#Ege82m%G5 zi6Wo3{5`2DI;dMBZ?Wa9+2`{=$?CPw5>uqmf85n_a(y&eeLk{ZbSPYOXzaTArO&V2 zVfI9*&cIrn;{3*+x7FSCY29v4dx+K|f&e5do#5z=sH}N-tvwLAiMBR)sFtE{qg%zm*w4_XB1>k zfB1%6Y4tKx4eB+QoXH}W`>sC;#bB)`e-qNi$4 z=5QGWR=E0-b-%z(?bqurlI;k_l=84ozpYM+!F);uQH<~`W+2%!vcsnBZ|!!E(81F; z@90eQ&Qqe}-BQPT(-pT2eGF25<|9CFA&QYoz%oWTLTA5^4ZZ#eE=ZY6-*#d( zJ9fM&)#E(T!0IXqDtUFvhu#01p_j*mPWaQwz|oRy|FBSb?>C39Ia7Q%?efY~RY@EH zuiL$jPrws7mw?THKv)pe|LH~tf#_^<)G@!iyMuNa-fisd z4Z311bk2h?15t4ey(Uh!=Ibb1*EDTs1j|zrcP&9}%o!0BZC&{$7sEHpu!rxbgmpZS zK|azDqPj=FXh*)Hv%QhO39{?WPQT;Hh@_F=Jza8o^Cq^yFlYBW%6luoK@tfS)Wlu7 zy|O9~4O)_oRM{{n8<5XD(@9eH^%a{LF>7QErE5vmsTbQJMpD z*ivrY^pt~BE3}vyBZ!|j8pVvPLTjXo(u{STmYPipc-?X#eM8FmX_U9F4GuMhwJ_c? zkp+w4Go|KF>sN@&L&|rb-$NI3E@I(nQy93d2&k!|Mwt3aaoOJhxti0=%vMc3>F&XKsc95)e^AELYQd=6^6*L{qtej*kDHUz~T*r<&a2 zl%_^i{p9?r1pS-gLYftRI?%r?9OPunf;$mnK8+`DIvv` zjK4OEmp64CI1IXwL#+a%CRshHN1&Xns2Ohm27{uqdf6kSqXUr)xEm0x#e36rYBa|S zp!18X)5cYMjNF#v89~sq$;7GVD;ue3{jeW4uZect_C`ySXrl2JJALI?`X$c@(`P>K zy;;}DvASG(>uYLs7nC>JdZq&;F~dj~n9|#H&IX4FH|h$PtkFgrj!b^y@_)XaOgCy!>r4n zlQj0y>C2bClHQkYh`3*25u|0xz5wj)wJiLq^{;Gu?Uh5d@g>2#UkPc{if$)j8C6Zb=AsZi`=V6 z2KV6zIcl$t(K~gr;sSANB?dZ?vz12Mx5A4fW%b<-qur+hDU0d7kv*d!J!*}!oyB7OYr!TffeUu#reBG@ZGk**gZr#H}Xpx;B1=+oE5ow zN}<@{ciLNM9(|S*YQ0K`ounr({qA&de(La0O+HzDllBAKl(j6?Q{_5OmB!bDwl|S= z5Cp{EDpL~^)!bdk9HZS+D*UjnrC`K*k1Ky_yAyMe;%9teVlxB(t!Pg5A^r2a>90B_ zxU6NLZQ=fXJYr&VZr0kfU#PS7;MjGH;8}NJ$+x?ALt{}jTO)6iS=pnEGnAlK1a`Nd z^ked}u|t$d)SOnIi(ca_xiu~SeB9glowRP*+1m%7mH z&q04^a&mG$s=dHj@njb9VsP3bQJ~rHPBU|lGd3pe>F!>?J2^XZSw-(8+V19bIinfP z-bU*$*`a+WAW)^1ywRUc1~%Dz{lKZ*VO&Co`WARn@$u^CJJZ`PK{aU#U*7bZbG>`2 zOo~iF<&s|+ACr{ymC|qUM{xjo2JqxiC!3K?&eA{zxq1a0WVQ7FNLiAjk3odiVmgvj z-n>b@g_EpYbCm-5;Aj$48`WRsx*Beg%qOPK?WvPwA(asjypB2(L4MQtZK`iFEC~s% z_&?<}Ze+h9U)8p9sLD7AG%ogQQAmtlu*SIAJ9LJ0U7QvyI z#1-MxUAZYe>}{x1ibgUc%dc}hZ&D9pXTr0Kft{8sIA3qJljz#xT2cAv_WZ^Tk@pz$ z?{q&8zx%1$tAEW~Fh-9(uq;ZZnW?^WBD&n&->Qc$8rnKJGy9&8Nns4vqp@8(wtd!i zN0|(Wo5e;P4*PSTSw6VBUydG0$#qYk`ZiY|)7QSdv@WITRygvEcDrvpgZERVV#*v{ z9xO5)4J`o$P3!9?YmwytTQR0A0J-pT`VZ84`<;o~X7OzZIaRqmz_^I>!YB zfC6J-B%im(a&A>G8tdy(QBl|6RQ&w>?Ck9RGUK@l5}9=hOU1>-x^?#J@OBui%(y%J zTF!o{`Dg5@n?9R>KvOU_`39Vdh2@|xmi}7q>({R@!C<)Hge8||sa_v6FeF6kd}s1B zf$$oan?XqEt|JKRTJHAluBD~rGyxJEys^=`kNb}_EjAg~Z)oS~Cd|adzkT3S>K#c zVp5_#r3m2uc5<8}hJH|}O2GAIrxQJGZFe@ugQq0dceXMywcs0v@jTo;bO3$s0E>i0 z(C^mc{(D?p+%2w{m{e=WNk#l_&$bVlLpki`s>{pEd2tsP7Y`Sk68u9{^Ar`*Zii)41l$j7 zr%SNgp62H(DpiHV`0pm3m&l#(I|6``dy?SMSJ zmZMWlx%$%{$cuY-dn+m?c6#{v>S$TJ%6y%b&t*&bo{}A?5744GKL2Th`#%Wz_hm{% zM1ci5+q9L2`MN({n}`7-t;@4)V!8!y}#MDfTgu~YE_vJq0D;0(uAP5Cvx}S z{U7dlACy|oiYNTC;C%i0AG0t8%?=hCHiuKaPe*!s=vY`-9&i#^4enPWSWgm)wX1TK z(uJ?(p5RiXBwSwTyiew_b30s8_?2Cr^b#~bVUg=9ym;UB)$MgNPrvD+jt~O!@H-$v zF75n!H@VL4er;_nG!)~m_Wi3rr||7}Z%3|%2M3u)n2WS3jK7#Wii?Zi=g89H_a&Qa zyY$E0EeCq5^XI8GJI4WM9op?ce>gleg^@5B%Ur*mt*kp z-WM-Wla!EHhi3q9n!^nrouE>EQfgI<)FzCdIws$IDCs)=yeg}2wbS}^!E_1 z^Agy~Zrop~=fIEhQ)9Rc^!AdX5%x`k?&_0{)ophI zUSE&8j!?9y2qiU!S!Z3%Gy|Bod|w)(wPPv}_WQTtF5Z&@HO5p$3u>%Vl3GG9?GUN) zC{NFwv$L;RH+<~}UPopS#l|z(V`!^gGan^I1S)PDkKIh+&!%g!x)24sZL8!%PQ}@G zL=9}OQ%S+egk%@zf8bBEh6W}jB0ZM;?^*ABJs^0-7Ql5`i1nT&fusS?!%J~*u}k5+ zx#!)yI!pU5-jQvMi%jcOdQN)Nt*O1?HEZ}%jZ44R8y8>nyfD^!dq`{>+qbZERDw(e zz9z#xm!-l_z+n(eUsAJkTXtpNyZVaUKOQdQK8d!Y0jjbX%Dam9B))xD4K8PH)*l=B zg%#6yPOau%m{2@#BeY~0wq#$6ZjzZ@?{xxWQlY9&qLeFX<;m!KiktEW*MYQ%j0QZX z(+4^?dAMS7tHL0U4DS;sq^2qQtwb>j*z5P_90a19MM~Yp3^eDbvqn5CcN7X6h~4E$ zU+?le_|A%Bf~J5}8Sr}NRK)dVJue)R7Q-oJHv|n-fTo^+eIuHm;ey(p0BQY4DB|Gv z*xnz0%z(@F7DC$lRq6Px@64V53}Pe~BhW~oZ*XGdcSqmI87h&qFvUFr{$y%ftzU3o zK=aR=aC*GiP*gJy7!To2m`-XAlT4J%0GZMlNa<7gTcBXp*K(Q3EiJn$cW75LRUp2S7`=E+0I13^`C_@Jn?$#` zv92&Lt5vR5=5t=@q%f|IhsEIao83Szg{DL3wN0`{2X*12T4e|(mzP6>5G60wSO;!PL^-$}lvYn+o#XlizdQ12Knx~;W7!f+*-Tz_|G2iX?>C54 z$Rv7B?!QDh{Y&CitdsBlR5{}p?hzmK0FGc5FHr4qb8wjs`INUyEM^s>THzmYjujJv z`~cSJ12U?)iIRPl{pvd!rsX_tP#imOeiu)DZb}lG$+12h4*Um*ZpGU_!?)R39B<&8w$Z{8%b^3=(RE zSxUkeB6G1RE8dmKy}~1OR&qP`5TuBkp=8lO@V>k^yp6^60-lc9 zh$CG>cpzTA^poN#^NH0Hg;3R;wvBj{r&Qu3Brhm>oli>kSKG%*jtC`)8VDQxLRR*) z<>?Qiz5lt5E*UxRY+{F8I9Xq@c|L@=kF)PIJxzYX{qDfr;Iz}5nArc=K=UUHIc(oC z!Wknx6T|46FMhse$i~hZ$%f*kj9!Q#EpiVZ9|Rgk+veeVts<;`PBf1%+evJMu2v`& zN?4pI<7IQ;oUGBQKP4+qzW2+KpB1(w$IpFYu;0Tu{GOZ;PtRcF(e0_PQ&OAgT^W&U zm88r}F}<|3Wa#OL^I_aL-1wUhJ}H>0>r>V!=`sKdB5(NoayG3X+fy{-*XYGy^V>tX zfWmPQHO>l(VJcl<*+)X|e;{-aJXbP<>*i4Q9H3G5ivLWPi7%bJ_Ax21iCM;+>3d}` z5d4VK-e)WQiF;3*tI`>LAOJqD6fJwBzn}H#okr0fM2TDrRe?_AI-85NV2iieVtLU6rKd%#)>oZK?okKRRsSQy^qb|R`+cZDmLtAtT`^Ba`zfoh8!icEat8jqOVkdtRRWN=~JA3j+sa*}43Nf&{ zjbXZ_T5P?ww>ipy4J1!_&;;P)&y1s>gPGJn`e+n>`HFlia~piO8@(R_TbM9#cdb`lu-a97O$RO7cMNg zd$GFm%{EY1U<|pR^1flWGBDSOX?n^aJHXbh9cEu&H2(c0hwK8)5Q(?WL$I6Nl%vz? zY`1>M0*%E;IJ&nOo&A){+!RK_pCR~ji3`or;k%TVS_O8_Iz7wJ(D0kh3_qnMKTNt8 zvCxj;+=J(ZN?PyxoKIBU%n7UOBWoCLaowXV*@WaJb9BT{uaGt{bEuE|h zCauk$Z};x2p0y4_{UV6D7e~C%%T4E`62ww(?Djs522;nQNAA4y9gg&9R5!y3(F6i# z+*8ScnYf~*kt{MQ2%gzWl?CK`y?Wd%(Vg0P#E2LIwwS;<9G`r?MYLxU@`NH_n*de* z`tsX*x>pdqq1E}AE@(1(T_8QX3qgSE+38~Xw3FlU$?@?}+1zw*xMNlsqw)COWX$l} z8=S4JgmT{vhfNiDIsq<7KKl2l7~L{~!dQ3CWABG;L80u3xcLA87&1)ev7H=Tyv>;J z%&k4E9=aq?s&r($q2SX$n`JPv8& zWtvFgcV(od6^FKbUhZ()pYyF}(OHwnaCC8r>ocVUhf-0;NEcx@AJiS`L$}s;*;NGBvH>hl&ek90_8X zS6#ESvp;fTlW1QVSG=d=JeB!Xz3l(ibHshIDhWfwdT0EpB^tWLNAjKx zT9VKGc9-u=hHQT{Gvd`~zi{>{<^>x2M3M9Bbbg$LQwSGxLW`SDq7SBO*C>< zS=BXLX%w@h8mmnPQfMm&??4RLK*Ce)$X<*Hg=y@ih?vy1zE}4C6CH?h^Z_j(I_MA^ z6iaQ#C_gd%ySTL)8Gt718IQ<0ixzV$S2cECGF2$yl+Uf z1c}T4#i3#(PRrsqwpDX^jgV0q`Lq9Gc>q`bKQR4onE-xYTU(3r;dwe-keUiIGdl~k zD;hYAco?CI0~&Ui`i`CB+t12$G*YCywEK+@w0(>#5=$_QmGl{-<=J9j5f=U+|=qhi-D$kESO-To7f!*Tnu`QOL9!7tiIHzGkxkk2Z-Rg*!uM^#iEhFZbSLd@@AL*sYdmQ8>>MJtW`FmPU-2I zM;!T+Szz%viuDo0h1%rRdYsj_NX`#n_yFvhE<{7Hg^29u;A!!Ay*=8~I?ZEHn_dPQ zuAxrio~}*q;Or>_=iR{+WuBeiKfSK+L5696A$<9rAYV=2;F8* zKQf7ML6lg4yTxXPd7cf@v%QynF4}-PaUAM<7Pop`{HRS3xwdTLf_#wTPQF8>DvsjC zY=t(z=$WccNKjCTZk-}@HS{^n&Qu9vxqm|N4V5@`%sYPmO8nIKuYOsAb!*HgtI_v$5jI`JFI9Z;jnTdPS#Xv zh;)t$xs=<6qi6djRuJHOlxF>BbUl1{n}Gf0hXwc|JP}|xGRDY2_~& zMHY*EtgM-ao$t^Ko>JMSK9-SCaSx8_#w?05 zASdxOkijq_#68Hn(md_XBLrds(*B|iwR`XrI5*T@25SsL0lPO9C3u#B9`IaK%NPXu zmlojrukhxtXduZRQz5J-Ki;34;0fB_1H+&F5(d^Kqr!Ecu%_xv$}sG$uq&bv0t6J& z$(DD3Z~xDL0fe#tg9QBFxa9v^lqp8XHT(gtN}Z1ZEeXYh?w*dB^r`I|NoMc z;c|J>p76^JMKoCGGB#`r{JrH{X4{^8*RF|g?GEkh3{DHeyKVF1xQ(oLBz za9(D)$+#X@@wC*}e3(LQJZd-bn?k~8pJCkH^rjmDCgV>x-*nz(RVApmk_@5(Zncms%+}c_tSl-!YI=8x1?%~tL zz}TcnjYp;5CHU=s)84qa_pKLyQVDnWf8=nkH!QtP)_hJNdPPxV!=Fc=r>!d@lvP`_ zkmKO2Bupj#%GrHtqo8D;Fp=b6ly}XO;rkr_+o(f7=~aHhs3XC~VVy#_sS`y?QYWj2opwrZs-LD-beZgexQvAH%*nScIS{US)hN>nn<=)P5Y^Lhh2?}nv{}ofRNj_D%8gEcP0<{e1!0e5Ir^Ki8>IphhZhL zY2#k7zT~Z!+Kke_iAt)VQoC>TE%kEqQvaRsxY3>b=$sWDh}p*i(CfX+qh{}-5SRPq z`mcDIQ6hELW94b70+%m&wxg>Ytwk}YlCY|pqGl-woPCx_gy_I(c$tmWZUp0-;{hn0 zi(E!>2-lx()TfgIp)zv_yG^R1!(E0t`^PA-+nP%>0f)E1E6YG9yY?w3H$iCH=yPBn z(eGwXR=e4&{*A|VEOB z-W(86#<=%7Y%3><3;YSon|G&J3d_;qk98byw-q`ybnUGl*6~ zu?@Qz4jXqF|6`5j|Kw?rMrBKb+qe}P&{pstwJ}(H_AQ9pB4K9(+-ZyS=$d2wD2HpU9}} z{KdAkujd~h4S1Rg|MH(Sn{~vn6(b$wNbvFQ3~Pf+#4~H%8xjCY1c5YUCT#l;==!sz zreWgU;&5p7UGw+tPQ1m~hkNgjSr)LJ8*dO=jm3iU;46sV{b5nws7%Imny1_T_|>F* zu$#h-+gs>{mn8@IJ%$;)+IL)2^U{?S|GR{}eejc0zUtlaFV{D1K`CkaYv^tUWi$RC z#qO3pINYbtY+%}+zFV0F*C(*Iq|hGgozm=y4BAXk<`uEYPsD9ATzBN60G=$qvKuLWRk{{ zfwG5I#6|EUKR!waqlG(k?XuqAWJe0EKGrYiKb3DnF#5U`$Ih5GK+NY7;0yF_)q1AW4N;7FrEnbGH5@h=M zdE7M9WF7?aH@h>vgx4wBAreE_%S5_&x&$_d7k%!n8OeKbeCHV5Lzr9DE#5yAmXY7d zYq(4d%wa#)_WS|_%3Oxa`zR5duEKhp$8BF_8s+Z_w7af!h>A2$kL`s;%I4enU+7Am z8=ThPhE9?Pudz625BDi-j2>;Ceer)wzSZttswU&*{h{~9~$02gV7Y^p(JJD&bw)dq3Fle?0)-1}N0yFhO&ChsSW0df474>I@ z>r`|QOCm?yEY)tJ!keb~?fH(RiF|?RvD8A|{FM%RNWLnilw=NGU11GV)6OA@>DuK( z#B+466Mx@F>3#3mnwJdTJ_ztP3QC01y;;$zo+|sG@1P4r%N;oaYnQOZvp*B0hnkW5 z&8Mp<{%1l?_XtK?dA0z+6^u!{BSkh+3i!;_4#Ep6eDC`c{&aS9OqJ;7!6~?{)l&Ig z>%&KXTP6`lbRQnLFCj8=%1td-?L2{6=b0lC==rkmKi|VS^qE@4vKwiSJ5OGKl$R z)|+N}vO^Bx?$f0*2^TebaKiDz;+Mv(L{%5_6aE27sHJyIGa#;RXv2{=5g1E)iN*!`g9L{U3tr4LBJW*0U)-(7_kG`&E=ids| z01Tp&RjIL4;#J~;w_gztK>^Aok1XJ#aFYq_W3Yq_n%k+tiFLdrmPr(_CMfJDb zEjFzDPM}^HkVHZEU7P(kpg;&fyJcLYm*2+ke#sx#<;noT12#0C<@emn@}U9Y)YITp zMbYxrckdZ46*}k&k6>FG6rid0JlVV~%Ef-v{k;?vvd`%+kYK%k`Q_33FrX?)B>We2 zC5dDCsYs`#)Zpy6$^9)y!fqm{?IluFmwogfU}{`I^Cx|E)qfvG(DzA879hUr>s$@5 zhp2)5F$i1k=K&qt4`%I5cpAT}^=eOKL)hq+<=l~il%k@dWKx- zhFa1)J2wecEd~?-l2~KoW6zr^S$MuZ=GrmXst#XsUs+xrZT0oOtBs9~)hXFvc#ne- z)NzSbvh$3v)-9qh4N{3Q_>#ChLoYe{HhA~d8PW@|VqGm3zY%?Wl(kW2d0=)roL;C= zqEln7epf4+@w=~Y`IRtBs5o^Xd`~uK%xfc)mAUTc-uy3S6wVM-2T|k-;Ro9>kw)CD z2v@aN2T_j$#{RZk@^dYrSGL{5*PL#Wl&qVsX|(xD~9A(;MmJh!Jj&0h1?sJjB_Xg zD*vhOEa6gOAf}*;#j_J~udr=aWZ^7p35{^+$~P5QkKM|CjRCIl}G=!o;T?!w!bmeS(A z`b#@Hq-pV2U;d7Jv2W|o9E&~Zg~aLI}SMz$OIoRuuO$!H!L?sXAvd)19kJK1d4d8VAR zM;T3zX%ktAVW1}ZamEMkxr92LeG&55O`RsO^kHr=Uz$DHG!m$`uz0hdn!0p-&iuVE z+fz1&$Zz$L78bwbba_vUUsFtuToYT7FQ6kE;Ja@FprLXF(wS=emG-wJ<8YtG$%>`~ z+sGm~^Y6Crc_72*Tbte*`j)kOzu{H>i7m?`3;hqb6(T?9pGE&Ap%|YbUYly>QMi^~ z#TFNn(0ILV@#2>s-L3qX3j9ZNg1n zs)`HtjW&qmkvSO0701IHfhn9Foq-qI;5MgYCVzehB*IO1x3dytVU2S&8aodY#20-3 z6VDqRHyK~>+b$cZEkAA)vFUqyw~^v!;~sgu>G4_`aIx9~B_%7qYlBJe^%a~5Ru*f6 zGX^iZ)B7-A`a{~&<{kI##n$k+)tGvavY^XYMc87ipyqCfU0ti~&aki7x-bezuCr|7 z*x%sV#z17kyc;gu=qZ&As{>mTtv;55zN@rc_DqL`_+~a-UEUJi8i>s`Qg=U26r@}I zvsPB-I_vG}Wc&I&0jSEtT!^dl0tgQJ=}SQ`3{v`ZdK zWcU9PFp2u4U^PCp$koas|8b5MS7XOf`}?4*&`~P@Gghd;;;neQ1`voymgq|lx_LwSt-G-KF<(?nBJ3ghK%XH@=1I$UI zEIi}>ZmdRfo!X+-_#{rYU(q-Vu4L?xkerom@Nf)tZB$fLH~SJ1#5H#FKjQ!B>FaA3 zy0}*H!_O>3dGJ zH`k$kV`LKQExl&lR8+!YHvR^Vb@dv4u&-Ub5-Z21lD|3rX+qOvo3x-N@PmsDre9a=r`^unAYxUR#{moYvBKgwTG`lMd=#OIa8v*7*BSq zs-1!wt3D&cAPk6ckr9SFjy#S!womp&up=Pd2gro1vT6Ihk^xQ8r(oYevMCoJae|}ml9iN)$$g+)4X+KULL^J+_+Y(%%E0yDYc{fDqdE7rqR>7X3jL3Vej5u zjZxjGVMuoAiC2!&kp@!4WY_F;&hP$qJN7z0(7IWWENP-e%Jb&>oXu<~L--|J4hyvL z6sdI*OR;YBhwhahDRAm$VoEH>)zcijJQcAbPRr?uBC zMyL}Qs0>fH{o(*I)HnsI0McV=AS}=HX6qY3uMRocUnEV_v~l&-4GY?~cu!eykIf(!)Zm*lCbnK$nYgHHkwpc#VOu%Jj&3s znZ!GY{LX17RCKn*Xb0V$TbZ)#(j}62#C^Hq#_a`?qs>>zQrQc;b0_@P1`T#to0YSA zHfom3#MOxVtO6ZmNCH%MwyT=tF94z6A7cGfij@8Nyy3VqUDu_Zt0P>Z3gNR@Tb(rQA4h;^P)^&7j zh*;dc&mCN&|Dq`btv=j}6z{2$xm+4z`Ya?vgtXFx#l|y{6*j|}Uo37Ayt>?nWcZoC zUT;^Vz#_dP7$snIi=u32^g;>oC6GJ@Op|O&>c2db*q^dQ9ASfe)`rFy8z{Dw)@YI9 zrK8-%lE?9vZJS4JqFVnZ13i{P|(>O8Ymy*tcI{+jZVE6SGyFjV1f}fM$ zWGJJ|gAaUax@d~t#BbJfPe5h@}1(kMrHb!xEsDpbnP!c zVkUZBFjM`|mE&F7Lni^gZM9yj%or;2ZH0#uU!azA#OWG_nEQQgDhhG8#XIxucZWVZ zU3u3@4KSKS3Oj-0$$k`<+R!hn_w{{Pd&kf;ZuTv-w#s8)foQCsd^ut_>CTseoIaN! zqkj-j0_KO%lnjDDDe)zr zP)$2u^y2ZI*<@bgKOIFncWy(YTYJoe(vt_W6Dyd;WQxdzSgyCH??7RsMOGC90y7fb zhr6;QTHz<;Dadv#m<3#4yT2c6;CYOZ`h$5>F2~rOwc~I0TyU__gMJtO+1Fg}HmMIk z)EvaX>jmqv+01@;FhIZhqeB)@P<42={%f`q;Ty964ZfJV7-}%EKeUC}iT|yV8tE@h zn&(`ee#Td>^#jjq_&+C#9dMNg=1cl379A3lS98dHlO<3mh3G+j4i16FD`^T%jH+HP7tlr+GP?2vzFkV5w4-AA!d-86gRNklf z$vt0wSqg5>ElN%w^th6i0gBi};+P3-ag2}9<_7omo!$G+O-=vU1wab=0v|sU{;AsX z<9w|hU-;-uwN6R9Q-PZ7M`nX{Q=4<%K?&Rxv9IWV$YOz5QvLR_T3p$8WWljLO8ok& zD}BICxM0TSmQ~0`0IFaJOh3$4nnn1{&(8AE&;(|MMk>6*Bi$=yTW{FXemH!`$M<6M zeQt4iEa(ZarO%Pyxxh`C+q+VY^@exQE6WQHCeu#Kd`+FG6mqnIg ziVx-4r_bqinaP6;e*pd<{}fgQ`+nzJABEEP727tp16hqCX{-Nmeb4LW7v)aR;u=F{ z0Ua^GydbGT;1BH5N|=S@*JKq;b`7RkZ0}Ck zGUY-wx;JkdrUr_Pi0E;unDGSztc=IX?6eXH1v4~>gr_q=?_)e#AN$V>{DUVdy_9yp zUUxoMd(Zi%m&(!G1H=|8!&kQx-MM_MP3M)s3nC2P)F_e&K)-|zjsi@CP$LPw2IcDX z+3Gzx3P?C9|6D0V*BOk8WGRH^>S>B#nzueFw!MQh?)P|W29Oec5u%~$*^ zM;^flGHgW$3u>VBX5M>m=mwn3yWV_fLRoAvhK$reNY{aZZ^_(Ny7gQNOFjG!ap`}5 zZE<%2XljAl!E{fWFLTlw`-dDYet71$m-6hh^YgkhU)uJ7^8YgnukqoS??;`E%foA5 z#MNXT_$yRRLQ2>xCQHWK?Xbd~+uxlWcn$g8_GT(fr0$#vF@yA2HaV;Tpg{b|bi9n5 z9Ovv`Cnw~=ZaQzq4s95eaNt1h&_dJyYVYPoVX=zK!9c$&OzgRMDl=@T!D}zYhR@&K zr30m{7s%{vuYJ;o;flNR7*yYGx1v>z5%Tv2LO!yOexU-&2g6KAX?$Tp4xLxftWyKC z%mzOygYFwwT%ezfLAJ7V{S|$`3-r(*fi|%I&b)-q-_hiFddUvi+e)ZRvBiS_Vggtc zZOkv4?FQ%S8ylU#D3_l%NeQ3)o9#w+%by;C0Hq<|ffKCN) zFr~{qnXeWSA@xVPF^-s>Sg*(u!fuBFzh<+LpQ_4}Nx(fLRcmQx;a8bFzU;KQL42MI zmBa#W_Umk`zs2w7^k}juPbp++acO7lDm}`~k^Jwh<@xt801YD!VMkgN6YLDHByE~D)k2e3aSNp?f4@o-60 zmFACCw+0K~wFM~bRnO=dC%xvCvKr^;@0jg!u*luDb~`_M!cMjYNnqQCFOl=Q1Kmjj zC?fwEoRR?Gk5A1W8ET9TQ618@c6LI5s+raQWG(Fc?86NLLCzc<7RLUcQBvToHV-o* zO^urO{`@VkoVj#-yO_S6q{nON$x+4M6Zo&NgXF;5!m}s#dXT~D-|7RTaf(CdOPa?7 zg>urcbz|bVfvpFuWK@}mu`c-(R-fZMv)Ad4fw>Cm{i-r4GiW5rt3E9tSr~y)q_*Wg zdjNwNN*6}pbj1x8Iqqicv%C+a0#=>-^7{5?BAl&>z8qm2{IppBTzP**XF45dtK;b~ zuvXy@S=T}+gy&)d9>YMEdU4dz;M{weB8_7Yb7fvIbSee&Z?dnHSuL6gjunl4eXgt2 zTSK{GqF>^nJ~Mi{l{=A>{$^~n^tGV-aEZhnOyI){{#YziPn9d4+?ov)BB*&yQBDF zv^v}ZH!Z(^GJl6|gP#!T9}FyZ{X=$Dttl?@7u|zY>Lt~_;xdKRlw2;Bn$brJ4-2f5 z9xf4`rk{SoOTAhi5zt?h7`S&GyepML&QgL1(PP04W@Gj1xJ8i&=gCXEmSVOR&Yu-^ z2lNHkEW$P9Zlw3n+QA$-b`Acuu~$Qp2CWMkCg+hw4{0qG4xc+3Q)6`OA6IrFSW=^5a8V!W`Ya^_f#Q?Ala zh1`nfjtolnc)sF}b&Etyx28-tYkbp4{9*gBopc9vJ6$`&Mglk8UCtO=bG*}wvh!s) zkMzCfY)TNV4y~Heo=kTvckZk~r3)5In~`jzLjqh$&3PvQSVjo)S&KA^Y16a4VY?}p z@1IGLJ0m1mS4PAx>7ln1wJHt3f@{|JF%QBP9?zZQ0D|RMaT#!m%{iH}f$Z~@iAr~J zFKf%-O$j` zBgjD21x)+$-h{{C-aI;ym>ei|0y>m1@so|nJ7Hit%1w$j^5?En8kDHpILIpcuv{yd zE@6l@WJ+OoU%zSV?qtdNqOhiTD1JwUFSMlatP(%HTx&iOE=A5v+4Ar@LaI-}qKZc} zw5tUrq6UoUPwt*$rT_xV;CJ;Jy^@`7lyab9{VP@=Lr&hs#Ch@jTS{v#mZ3~bOS@I) zO2%E+PD&u5y?uKL%0Z&NJiy=!F|u|nC0>Y_H~a=Pvszs1h6R$tEIZm;iF&HYd1W3l zF3WQ3NyfVic;3PHY!CZYb~0erpWzX*Kw4f|8O#4jb9d2mI=b-0L>`EWuLFR=)&Eu^ z{5^qR6NwWcng_3K;ChOgU1_dlnvN@<0~qiHNq^~SD;21bUH?iM6tivR;`_Nb%(w%$ zLXD_-vqDj+m0X-u*6x%lSz_W)IG1nYU!@+OCbdtzr(yX|mXZRojjEYNxfVIqn%SCv z@swu71Di2m% zV82uznHW&N(v$kv$B55|;F_k-=Eo&FTwftm11%%t&RSpWjh%We5w>)fT8$x3+~)n# zuJBfK`kRG70B|zo`5qe!Oz@PzYm1aa{$>3^iHo1$JjTnP`&O9OU;tG1K}APiyLD2q z+rWR+khTY?UCs;~0oT5gYg6~}D+z0SCxq^?MD>*?Sq~yYH`PO&-v*3_Z!;*5$S048z(dU)f;p(;9NqV;~4$J zB-Oia*a(Ra{N^uz^-hDEq(!|&3sn0D>6-wpK_Y~7Q3;`Sq>KLd|6~~KnXR(e97@iE zUpOFMP_ZoZm~aVFBvH2|eM3{s@oXHgepXBU#s+ELP8iGqn8Lc*PyQK2JFOF(X7msE z{ZnKWg)Q>;y1Qsmc!*g`K(6uEDWg~cBmHl4`ZMioIpT}0t|IKZK$Q+Tw>dKN_0RbG znlp@xH7hX_%jJwsOsLTqU=W6h`v{Bh@=hnBzlHz^*4p}u>%^ncVrwrq;5e#&Md?kJ zZGN@z_(iNtU~QDV-`?>qMGwGpuk@b*!O>b?(V9#@<9l5IUjHQYJC}ai z@LU<}`-i{f*hIdQesImT-Dub3%7L3^0{E2de|2%)@octjJ8hrVs9ja9qDE=aqKHka zW)(GJMNvG|u1%Gwt)!|pwQGjhLTFG?)D|;l?Y&n^;=AK}zW4p!H~-}KyOUhG@9VnG z<2sIWRpf))ZZeV3BXj>=gjRspV$WnM4lAscW~}Eii;lbv>_Z1`US1VN#bp#^Y$|xv zjU~F@a41|s$N*rHG}Gg6mP$f293sHhMkkANUf^kQEWG9DA)q|Q$Z2V5DJc4##aV?T zC59KkY&n2Xz_rcuU~Tl)U$%zQDf~4hRz&WJ%^$$Rdta)O);32Y6%16!4LJ+eC$J`V z?a;C1WZByLrw&_I2BsY^aQ|I-5uAuWkR1<@0(f;YL=yVg6ohu_jr@+?8q$2H} zyNFv})(}CafCtOjOFGYFQ)y4*adpeWH@_9CM^eCCUMI)762K?LJH$TJ?YR5g-a?OE-Nb=# zoSG+rXcG29LD}?AI8^_@;=<^Es@QznoBw4T%7%ucXpgo1apTe}!EdBB5_Yz|Uw;7E zTj{bTEUo}Y4oUBlyad!)FP3L!GN(0jKJ9^Ko&x%%OBsmX0_k-*)9J?}jof!*#=WDi zxbv5Fp$zK=Fp)m8wKh6 zk=5G8c~M3*z?t-zVeAi|dCZ?usSI-mYtecRN%gwk@IHCO1 z3%=WfG`v}e$Q*KIp$A+N)=vxdcp82zOAt4Oco4U=$*tA#)*Z>+e#`u1nsNw9M>`c3 z6<#u@=~`023*MP17#1A7jI#H-rA(gMGW+}{gG|x|p1rBMdgP@W#l#fORYYv!+mW=* zC=wkT$b1q6LFlibP^KE(V=E-Y0$R^l2QcK_CTt=!uIWdY#+Nzn%KOi0j?784WCKx6 z2LOXa-)fk*Y_QfS1C(j833<>8Z!pnG4(sH8NxS?5EW z%?`7U7I<1O_!E|e7q}>ks5X+&)!J@~I8dS1A`r^2)Tq76W%JH}z@>AH(mdFko@M@v zvH{sYikJc^z*+$F22PBt$toVV`h@4^m+ ztk^<+7^*7Vsj)1tY2yWxc#7hz{`*PFtm98J%>le?qsfuP9PaDBy{KhG&m9ghXdiC-R1->)3lZ zu(sy9(g9OI;Q-$euJAapDhFdm6I$`)9EIAb(Gt23w2hJf@9_ZN2`O9*Jh?fTI6ajX zD&~>v0)kz7f9KUTI>t*%moHx*DUb9>L=WB)Hnvw%E~&xM=SxZHmt1#@tlsQ=4lS-R zj?`Bkb75_!cCf!3DKHmGdFv4LQ!_z?JrJLKL9v#D-*qxOmX(3BDbO(b3+P$lTJYiWwa> z1jvkEqJlw1Wo53;O11q+EhY190EQW{kgBzjQh=b0qnzEYmp$q4?|+mW)e`V1SwKoE z1@StJhLw_>e1^~15@-kz7!*|Z0jQ%9E7VI#OY4R-0m;SAljwNFYm=g5ZJy0?fkMsc zh1Xe3nic#40s{Q}bB8)D<`4*^W5M-D66WfF^6uVVXJ_5J_BswkLBS_L8$Ap`766VC z6H_R(6Y@AjLEFHf4N`^28`qiiylT1x6^^pw17yiFTR70-eBs zN){6(H+Og7=kvf+OiWC0Gf)`xS5fmaMAT9)Z*ETIs^0)^Yhy;Q{-bkf{4j01-6l*- zU%+Qe?>fXf_+j$$oQ35prdnqsRn7Jb4DmPq49K(GV{6QR+!D8vYF54R z$QrU-7dP$yaZrUQmmVS@{tj{>rq)#oqUt?m`S_E6)1X|WvsE;%4-Ud(<^Xsm7+Q%8%}sDh^p zAMou7sBZUuw_`loN))O`e%4IL`|~hrvm8G_RtFh=`EtF>r&1`wMuV!!Ch+66seQq##Wh4w|67w<222kweoMW-~L z9CN{q`{YYM6};s2)=y?SToBu8B@!g-sVxHxeTegGWHgrscWO~j7@~et$4#sl=SDO0EQI29loYw?j0}^|SJKhn?7td~#}R*5t)rr3(Yuq# zvd*Jta9=WV4gYtq8wd@o(m^AR6LnQue~9f=xtPwcPgB+{Phz=Yc(hN;um(||m*z`{ zI5Ffs=|1|bkMX+nDj$Q*Sm)(iTH*?JyHI2w@;5)q*Y30&O{I%=O=j0*O~1#d{JEZ1 zEFk+pMMKeQ2=>WlCl{M~5WAJcY29(Jaij3dgF6nn3EbZLZ*83ob5*o**r!Gq6U*PX zT)|U>|CJ!?+xWsr&jH&=ESA_XR-676y%^^`Ar zGs@qQMGg#kumY6U*M9#wM!s+ z`Z2igo|w)(mEOZOfjgWGaN`rdPbxYyeWr4ymx(y5{$H}r`kFbuvP$FsTjbWUz9qt14C`-a~Qw(H%}x37z0&7Dl-w?aat&h*-a zrO!N`I_UJSetjGoHY8Ka$W$TN{|>*}!C;AzMd%~CySi5e$AcFY;LmL1DAI=@az#3i z7?Om92Z8deq76y+s-b-YDNW zT(GauBKTPvrjP75IwsHjZ9maSNU-Q!{lMp_X#x#4pW-@^XgollSJvsqS@6csN*QBz2;a`Jw7xD?fG z`SqF2zDhR#hbWp1?dae3&U0EmB-5CQWzsqnDR)`hnCdSe6E({HiH3$1*R~iPu#=zk znC#U=XLUu-n}+#s{nZVR3YUqqSR)W`*=qHGGaeZ>kOrW?FxUOC0D#uhSA#F#0PmP{ z3L&I$PHdIQaS?!{LD0Yb1q5L%z2}gC>MQz107F9V3&&6xiP89(#cC`&B9^X8lD^+` zW63pc!J|ZDTURzjpSt+bz;ra0{0Wa|61n>_A#; zsUU-p2mR zlIiw1ri?+UG*Pfi&>iSNEN7QBUa2C}u(nG=D%@&Qlel;~StYGFdWJs#P55gXG$4evOPI7Vq`9CyG3x|v;abW zTUO~>3H(EwtJdyV{)g$$_3)hoM}978;o+i67A{i@osyyhx~L(5Iyf`q$`+|R#aZ*- z_uBQU+|K_9lPTZ8#VRUV;WrLiFFY+ikcecXFl7&xdz9QZoK))zgC?>17hBIBs?l7u zpp88$HZ12_9g&IcVf%K19};u+4ud2b6g-d$7v+Qac}?36ejn-)#4nctUXTskob9$$ z=I1D=)Rv}5=*w{`h6Ypelb=>>(40A^-xD%<387JycXdqvSpE2nb;-KHnZI8J&c%;P zK71eB!s9K$tjG5l?RK4Q zAVQoLxfEH#`0AbPEaziNt<$;Gs9T)C26kv=Y^075b2PmR0tMx>W;-urZ9Nmc@pk*I z1zv?`&#>{(3PpR(tojaT1)B(Tm}7=eF6Kgb;2K-1Un}LM^JVn3^?qrioLsBjd=&-H zmH@Lh+flZ}+WOcm4TCNx=M$C2UQ}3g+S!MZ7<$+nfm2E1$2K%>t06#L929WY+Ck^X zRk=<@!_a_9I!xaC&GRHL?2NrDJY2QU2ak!{bfI6WSiPP95D!L1FYeNkJ$wX>QQaM0 zZS{1@vzop2Mxs@OZ}qeq>be9GjtrX^%b4nX_SkAwZf$0WV@I3!^PW+@WQH0q%^St~ ziy+Z}SdKr3G1F>I?(XLzqp3^o-I=zAea7iGFEqBJh}As@|AZdkgtg70-S6I}(Vqu* zF@3)tNw$yzZlHI~%yYePTT-}mhT17~dA#lJMUu+iRyr|mpL+JcxHv)8kBX)NayfzP zVaiXF&I_%rm@UzGjh<~l4ue3>%TARy|25(;=@K)$TuD${x+MUtEO?LY5}A~*9gW`e z>p?Yz8aR@w4G@$Vqs0^ogCN@9Lz{+#kMPK6a3DVgKs|Gl*8;V>-`fN|wj_VA!4UY0 ze?FP&Lk2l7^pjW8H#g2R=KF)OkF8NRRfPfQcX!H;#>KK72Mw%Zp&u5%47Ii5RV+^C zOCD!NX1mam9Gl0p-gZDhX<;uto&%P|0Xv@Gn7@!F`5+E?N{03BsrNj?1py<0)RZ(8 JkqYL4{{wND(t-d0 literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-17-1.png b/man/figures/README-unnamed-chunk-17-1.png new file mode 100644 index 0000000000000000000000000000000000000000..e2733786cda9101657c9845eae68d3a3654457e4 GIT binary patch literal 15218 zcmb_@2Q*x5*Y+R@AqgS~f(W9M=v_h(Jt2smM2|9}j~*owB@(@t=ymimY9e~{Fb1QI zA=>B$qx@$)@B4kv`+e`X{<8jiEz7;mIdkTmd+&Si>$>)yPtP=!uanY~fwi zgFu9tAP~VE2_bM~AM?~4_;=Omseua!bfX>rN6-Z>umFMXf>fS7e&LzAf%Ndyv1I7l z=FmvNxDJiT_i@HP&$Rq>i<6V&qdMPRh4_F4kgsLo$9rlN1jOG03419hEV`9GT(jJ~ zUdeT9Qr=@Urw4LQGAGY@z{VkQopnww+PY~$E#{go`qY(Vm!dzvh)@GMFe8ho-kO>4r+{&@1 z$F54rnLOY@e!M$J0QwSQyS4>GbJrg2Jb6Eo_L6c71nO?f9!@k#&?b*8LzTI5=v|Tq zfw-Tv5rH!0|7ALt8Ij;`RKtOw9LT#o7eV6L#zLpbmnaPRURHcbdhSIv_3X*UUe{G7 zRV)i|l2WBXdCAx1*`?j1OIsNd-3TubCc5&54;Hy^<(n}fxxHZK_cbXgDK^%^h~J(rD$EF?L+a5wVfF~N?<0=uC(R!n4fx3 zu?tcQ0u@jYkb?q9E6AAwbc!n8d^66yQA@|G&(-$sLEt~__BRv$KTPXW?##ss(?{wR z>%z$5=FU|LZV~`bL4GlE8=qYTgTc8*phe|2BF!Ef;6f$f;HUL<`&^?(S)LFG7cx-j zHS_;q^ndRPe?Qt5a?99I=J?3nfmooGA7SYo&lCRPnpx8ETqJt)e7!~si|(nj1l(~> z^4i+0zu!n=ADjGd6%3)%5vh=egSc!#vCehlssv8|7EAhsw zp6^5o|5?GD)U_T7%Zznom964zs8Q8j))jm0V}(5M_pi3hX`VZ|dB;Db5zWp})AvGh zhH?C(zX^ebccShic1tXuaypo5;k&{Mv!c`<|CGyo;T=GtXUgZqR-99V_iHvJ(uU=;TRhy*-_65>B(>buAsXQn^3y zIggLksQKg+QDrCVQ?W6JPLf{)yOg{#!$u?G68B5#qk?~bZFh?231 zkdAx7=$$6V>yw%jC`$O^b|t)JBYkLoZSUCE)W0Z#zw*d#)3q3Fu3|V*>=#Zsg)9)fr)@^i}ML<)MVeFvrCHT3M)5aCG<_~ez{%b$7-$-mWoB7wV z=#a1kqgN|!t2AkgwM}`1-|sW%PBdGoec%;{$9*RP87qFO_lgTdp7f48zGRiRJK^ik zN7rv!Un|I^lHdCbd$ABnWKH^H+azYzh;bW(83XI@Q@nXZcJ8%rUD~^WWS1Or05>Qz z=#f>eLvW|;Gf>9~VTtd`B-^T^ZS?(0n#kGtpqDJ91Lw-zteOc&m+-PF!TQd)1a^j8888g44ads5e z6J2X}JS1k#EXIkX%+x;Ouy!lfs~pjRY8cj|OC*-Q-ezVA{!%GaC48J2;4iao(%aud zb>?-717iS2!R;7zJspoW|Q5=;y^>-sF zlVgXNKgsA|;w({fv}oq4IhPEd z39X@VJZ(1#ur8BZ^n47l@T)Ar_wPOfKTKxYX)*$Zym^@P>qmdT25ayG6CApIaNIJb z-zw`W7>VAFfUwF=z8k%lv)*oYjk$phF_k=X`SRsxiZhMI>XFhrQa)(QY>G}bo*B9- zZFrtqm47N}J|BaA|K@s6)#W;71}M{X6J#@YDxvbKP5cBKHuN>~M%3ExiiNbtt+8%P zdy#M5iu!g4>An-)P-GY@(Tb%2+_98sSKqi~hGk%FVDn&OO3b|T+M08Qtnb3Y!Y$k9 zzJ!E?v5o|!TMkD{xP7Bj=-U+)b{Ro+YH#f3ojP;9jL$Wqyeqh|l6J;pQPK>GKj4Ai zFCg1%V98Khm%g}Nxd&yC4YG`r9mNF>7joCtVU|@Rv*zw!SMB$fnxd$}ZJ(UY*3Rid zZBND|8g+74=jmB;jEZM`R>vZSyZjinAM*s?&xE`&ukakpPLql~H`hLI0~7ZNGtqJN zk+IDYbg`mMC#0AA8oZl~ZqUbWZ8j1TNb_nu>bq)(I_a|up)egYGxN>sONvQ|WTECx z7->uit=)h~wz|@lj#nY`8x12{e0J26tqa4@;kf#%EGI@9QeJy#ojO7uoSpDwp1G)* zCkmULuk*yF;kCeWP-E7VE zwzA3_wyCx=zmeA&_Q^R;a>AC-Bx*occ|Fyo6`R6ZGT!bt_kEqR~g{@ zlOJ`8kAv+T&lmG&qWEkYUYmA3GiVvFB4={q)L#7nZD|~PvpC_WaVCQ#5Wk9KRgjCo zt+b2yH=o#l&(fNL7b5n(p-e2I z8fUgqhWh#bDsg293|a@}cM`k{AmZxQl&pmuXJY*#Or-TlIyQII0jzkJXf$2G zl%ZJy9j5Y=8yQ9ctOx)|=bwZBL>24%?fS5HbYcF2mOpRF%*DD&rfKHKRAgpkWJHYF z>yOf44(MdgeH-4M%_!DtxA`mJ!HR_-U8E8n+0x=-_sf2F5r^+_W{ob}08oToww4Dj zP>E(!iC*O6G#8l~tG=x7xAE*D9`-iaG^xRh)@U=I!^j`wpN+Xr+e9`a+m%Z1jv^k6 z;Zg5DaM|Cc?{3L}+CnU@L$p?C)`Kq=;X8LuoAcxA?j63kNJ2LywkB)h67b zOPiObDycZ0uw0Cg=}Sgzh4~L1>U%sg(L+9q@l93CVo{EVy{S|Us&$v!;sEry?kq;` z?PzQmy6K_i-Ko!7Z3&C;Rcv>M*`o*IuMetc2EHwYU5W=Tz_}%$T)rwVe{#K{VLhDqcfZr=;*3n_0P>eU zjPm>Qy?_(xB6u-mze>U=RI`4U3U$PMf1ueIw?WUOdT?3s_sfUR%e0B7uEiJMvS;y_ zU9?U=+R}c}U%nO!?QCgv#f0n1#I1({54EIM)OGlpEW@4wYXtck=T-_Ijq$Lbu=cVa znM}_m6|%gKPBlL3*ozC*LH@9l+1*joircM(bU6tM`q@(WfWL&hnr|0e?R-B)ehv)` zoo~ZkPrq}jlYg0!=+^p2F0V&^vNa#dWXi49t4b%`%4p|x@(@EuxTvx}%ti${qG`s5 zD{rws-wCxqS`9GYxcc}L9gut=x0HY76aR{M+o{*5#LGkj?A))e@UAg>$WR)JibAf zwa$@%x5D&;>ftXL=a7g<>#C?)O`D>|^WGzP*$k-~XCbvb2{te+)$@_x zq;tQSXQ9vcw9v~2`Zr3FWzKDq;K{nabHtjxgJN%+n;n@WmeCuQf{U|h=&1&m|4E!4p9K z>3hk-#nH`6u*Wz3l5w)5RZn^{8B}_#o@?^_fB4^hP0e&eNgGOnQH!UTSXIJ)YlGfWX~V)>0Y=>bkv{H)&&uvDkHSTm2rTV>7iu>-Rk@{GW_Xz|=+v%U z59q^R)(`@JJO9#bk)ZzW0fwM*g=W!L?lCf6{Ks`pQ2iC9tpNKOL)gv{&iJJs15IDQ z6=;HtfV?|z5~cM5S2v4ZKU@e>U}wrs(*kFH?A)5Ur{XxPf?`n@|CT;HJn(w z&q*ldV29H)>C6HkTB+8(;#dzNUc8Sq6wKT>k2l^IuoACy2V2=BbqDORhBm>}y*ICR zKuxZ;Spr;i(Mq!XU9mnE?0@o2}X-M6LhFH?tCXi%4B=85)=yrU}qO7g%0Lq zGM8A09lP_;GRkq%UFYUfgi+G{UEdoO#30B+Me=S9qe5)?=PKC!YEtQnLf<#jL;6g1 z55?vd^Q!N=*tsO%0eJ&?4ABrGx7+_+2bvoFLt1q|sae%W(Avxqg)qbV!x96rX`s0` zB*1fZMrM1J{q|TL&drUYxK}+xX1>;(>8b@<|DGD>x~g7DQv8zZhuOBy8w4?VcYo>2 zf{CMdb&|QP3zOFp>pcfW+JoQ(bL%;K{q6KGG(68X=9{UC*sh(kD|l^5igu6yo5(vd zVR_S&Yk6c~ES&bV+~!$~$8ntFjy*PA238XuwPzL0REBz$@*OaPay;2=q#=dSe%mk6 z_Y0H1#w%E@TPJKD*|IAS1NkIn=rFzv{%&qjQEGrA!&J6lVOR?$Rj`H834Q`jxrbUhE#dlv@GQ>QXICb%Gm(WicOQ zrZ5$%k86*UwI8z9L4MKk-GP%`HfQOHqOYFKG8CZHU>8;7~vrVu?M z7PY!J^T9Y52LuUXfW6CD4J~Fs6M1bL^T>T&4&DWgFcNS|bGePp$!7aY`XEbOIZ}zq z#c6gMH0-o*nx5~46iL4Rgrz$^m<&oQ`svM$qzU-(CEDM|-1V5%%}ps+iV|=YT*d6L%+Zm-V5 z!pEe3LXbzu7GIpzuf*3Tn9+PKW8>6&eB3;D?><_g3Gn6?$L$yEv@1bv8DXz${}K5K zZW+tfuI*`rJCT(<;}A9G2#)oBy_+hqjM;XSuz4mQptN!ZlK#SOJHSA-W90u$s>y9? zJ2tR7X38VAkk*Xl+4n&K0&>oQ=$K?zbdiA#nd)zvAODH}akePVS-Eq!0+UAfjmetQ zJ|F?p(b0uf7xMy{shsrc)#tDff9oB7vr+5WUs~9!E+a`NJQ8MpjFivwc6HpDv3b#UjUbi zb^NaRmrDT_1o5-&9rk`JN!QM;F;1JHXZ=^@_aCyMc=rtui0&y}>!xh1#g||T`TEPc zB@FuV!zr><7fNrr?UQ2t8%hadcEJ=(ZXfuM_L3+f15YV{lef~)lSe$cxB;XrEH8+S z2M2s9r{r#jiwe8ingH{p|DLne`w=9G68=VydSRX{5L{)g33tMS42k4fpWZNA#y(ET zkN4*Y@^eO4TqPCB=bnEA;Qa_62y5}l@Ay73W0RReI zN$PolgvyDRtLvJYq;rh|-T>P_)^UE;R{rMkjh5y+Uxvym4*H2``%8;$DP2bX8~yrw3vCdU}hg#XcFg$ z;vWe5pXFNdFg#DtE~?gpU6#T}o&eH^fVx}%W$5$+-e!I8p`qvccr*TsssF?3U(_Bi zb+8g^!`Fv@=VL9K-Mve+VpA}VSMRsu|<6xQR zKJf9@)3?h5Y3(1bSMh5lKFCsux$nNI3AxbuLDMlk7WH4~8!cx?lurdkuYKH5}cfzGBU`4 zG)Y4I?sxtJ^`Q6neKwXaHFf|ep`7@W)EO`4ks&5$piykBd`UV}I1=2fFIQ}BBFdZs z`9CZMyft`y`7$YU{iW#?@7#&7m9FT>Z^?BO4Px3mgyuoQz3w@G#tBa1YTs@a?s}22 z1joWwky*=B`B-R2{w*g$$FGBX1qZ_^K`klMLOVZ~v)x6!mPc>)GI8`}06R8pfbUyZ zgyQ9xeE+k@N<*yXVmDMHo*hcx211T{@)tdGD{kbafY3~?1DlMBsDtOQNGb6_n!l1z z+Y(SuC~+kV==;m>{zhnlngiY|-!}AW-1%D|vG}v|*J{syFPAYdd}7bn4YujwI_Wxc*>Vlms2ic$-A zrSR|5Z?e3?A50OS6T(WPPuJLz9#wh$V!LrHCu}pP;7Z??9Dd@*ix78d`#KO*ehz~5 zE-GkL9G-Rya*6Nt?^Rnb{od6BXe>V6HY6Slm@OntuqYL~vdZJbRd>$ZpCUKy?9SmE zUpMh}s>*U>WXp!(K5R@n*70YUFaDbErF#Kpj@O>S!W;jVocEk`_5f{UJR~#oZcI;X zTAD*pJVqG`x3;pHgk-0ur=Ojj+1lDhvmsm>0hywBYzd7R$ic;=KGmmx1NzmCwFZ$2Kzwyw+Zf%{WhnPclRDem3h7D3pNvi!P#B(Sr= z_`>)g*^w!|65a%}PFoj&t{d`s_ZM`gSwb7ERm~7~MYnNt@5p6Ou{_S7I=roHSA%;G zFzs{`M{D;%`R#x_0pk8kk+@%tgPS;WxBm@^te^8o;WzeMlu2448d1LmZybzJ;&W$h8|k%9iQLx--c z6zAB#Zd{PF*W8*O;hSf!2xgJKm+n*hd}e@=bTb&Bjv!8MjYp-*eH%vN%Qm%aI|8ML ze%ZAL*_Lt0t6G3!^vnV?7RsM!{LXT@h>|@!#W#O{+Lb@<5?ZzF|WDV|1*;m4F~1Vdl@HP*jwZuT5G~^VcIe3B)Dw7Jqj!#?dXC z8r1g;5PqPOBzDMd{aH}U(FRQP+srOi%bjuY7YHMHe9#HF7gN^1f}I}OVcu-;*@nN% zrNR2y)r@#_0SYvTvoh6zr%vB{K2nLr5L?diVXwH{5AoT@QVI`%I0eHI_FsQ)G)lik zKIueM71AjF<9O?bQmW4y8TA-#z2lW!)_nVZvBf2>DN14lkX9`mzsltMChWC(q`qpvD-eP$o+ zPPd1RdpvDdLT9bq{^*(I+XKl01X9eqx+1(XIuWO(to-7wO#fPGNH#sEw8EhJ;_h1z zh~YNA7eLl?TCHceb9&l1x3TTiM!45ho~UiMLAmDKUJW-G3!n#J5mmpV?P7U30XG;* zgzeDWlF!MIyXURJ60F2}zK%*4xYBDXBo5147ulyo-W%fBFzgYQI|sKaekUp%r!@@1{{W!Y8`CPWX2D$3DYqWdT;GR{JnK}Z65&e zqR5|e5HGJ|94%40_`fvgmG@&)+5{g~!uPfg;+pdi7O~As{j=oVrb6hS{6IJ! zMqUxo4G+-Q{&R+lijAXJHtSa*(X$!lf~tGsLrv5f7w%? z_TCdl=5Cc0Pz+SK)bfW;F%`K?$S8=Ap_XBh5KBjhoImJ z9&P{4BK5TGd6Zf*SoFiH5#JMK{1eTY{u2A_I29N3no_>lmFN8Oe^7w>us8*yYCxGi z+fdf-guUjQ`izL@$tj^yle;ri;}E{YH-)8>weu)K3lv+H`Zii-fCp#Ni|dRNci;47 z6_2n3rM~?2bfG2x=9^Q}NZ+|GJHNr2uJ2B%KL~O42{OwH?iM)IHuzTbVmW?!u2jdL1S|C*iUjE552R zdnUnA^m^3mHErw4%~|J#tP^j0eMpO5X* zx0U7V@|81x#Fs|#&Et3OP4FFYoxAs#U-bLz_07ASgsz_)Az!9ZEYz5aOzQhOOo!3Z zx(-d9)4<;blpjX6>xl?WhLiW8or&Kpr zmrBmxWzPzcWo%Kwjurer4r<8O*r8UctUrTsX9>n!&%K-;a`|qS#VoD$&DhlFnx8&C zfS79zC9wfgC+K{v)Fl+ks1;q8r}b0?LPpBsm?nka+fOEwh$`X2=$t;&(SD@DL9$_5 z-MUCsv|mDVp6ortgJeM`p0P58w7PtLxx>fk-EgrhZZBtsj6R;kR2{RmRNSl64muVo z(kncE8Zp>_qxs6VGI0Jj5S8KI=)cZvP_)gbGnog?+#>Ou4%(by##6>hJC7Hzkn=wS zX177)9ekB0p)jz2jgL{yXo{Mvp}s!HlbPdp3VN~h9yaJcOBtY`YssNBjnc~O@UezA zt@P&F(cmkvF!}9up&4BU8JaRm`Hv^8yPf>|tK)N&jm^n8Jje?mdlzmqbv8^!HgmhR zLVcNk3>iW}6Vt;xJv}WfPcm9#CVOIUQj0iQE}pWHKJ`KJ+fR8;-VKhe*hFoIYxByJ z%s;QQOVBpzyq@HJZ%g8h&A2Q z{V{7;sssdaTRY2{tGN+kGnJmdtCq0s!q8lssxRWfBE5QJ%BKw8W8O8$Mjh*a@@WC? zZYDsJLn(ha?&G%I<47Bo*2EtY4}DQKar!y67N`(`<_v|;p1aX2o$f2obnuMx`r+P- za>6uCSb`~ZZ^~~FPSfiah`R-CIbZDx%Ev{qt1iz#kBw48U#Q9CwejP z%*iQsO8*Ye1Mv})Vvsl!KJ<8FF^r=2iEa&s;psP=o9#fKKLNB^NnZZP4!WT?{vaY?(59p#UL6x7xe2Cv*8ovv5w24DVURg1OGKjCe;$J5Ie) zgE!&a1f*sop8@z*AI6@qVbJ+)rl9b3&UhCpW8R?wR<0bxl91uqqWg20QlpD6?O>`} zlttA_8lQpaqS@?SIh6Wx70v7m&wIAPH;ICO7rPc0=_Gu9dn#Wac!9r+Lo6zu#(yJj zV*4o`UYDMa{Brv8Lvn_06f~v1Q9IF}S^{z$W3x zGvqM)2+?E2LomR^zBq0i{%McYm25WBMyU1Use}If2EXklZ%ThO8#VVF5;^U29vhEk zh+R%Mkjy*JL`X2Um>xPqHhj}r{m)-8F zhK7Tdn?dz?ayC3Wv&3vyo$#sYg=aF^-H$Tl0rVS&v7LR4TkJ0{ zJbs{$G>@PJ<=+FcWA^AG>Ae(kpEKj{K^Zn;0C$gN3sF4C_Qv@XJTSqWixCAN&$TZ8T;uRMl)z`?Jku~ld4e%v{a zGWp>UkpmD*sL{d`1+HYEyK+f+f6{`oi2*$1{M9mSMpWly2QRMhE5vhoF>G`sFkGOE zXwLNxhZjJi1Jz&axp&c=*h!P0AIMnQ1Heuoq@W3iwq<)-4Sh#AWpF+*N2c%}BD{4EOf@ zCn7=|Es_Ei^Rc(PJ3H$Q&sm;0IhB8ZRlcjVT`qinAafn}ZQKNNa6p&LFJm;1TG~LQjzu96sPYT1 zb1L!Xog+>B`h>DwEyFK#?^F5DQynu=wJ+cTOLTn_^7WGPlRepdp+g>hUcV5~Pbc6GsJl33PK2Yikh+HL|2Z68aLliHDL4tCb+D#QU>8&pp z^lATVaQUw9V`_Z2tML^)k;s&iD^8LPj-ALL{vv^q`xL_hnAtXv{UC`ZO#Wu!)`UXHS#l_m;XABzrdqVAvITPjN z9P^UIqy&PM^N-z^a{AzE(l@h!ig(@3TvhsUW0iy_iGd1$3;-a*^fI$;$2K$A*NUT| zkRK(~wA6Y+k|&sUf5cN>O8>@S=;|G7w8{|yZ<9uT zlmrN|!tR)93Afc3Yn93fSg$CNIBU}9Zytb4%n9##`Kqf&xE&e4*ZdeNn?~#O4v0EV zPjri36l$Xns6|avDvgaB3h<6vvA^+#@h>(O{pIzgO2MWx#>o(OPnKvm3UKermdt3=uZ>@iR zkgU=;-fOCp{q=kt&CYDg@7@0`#`eIxALRW!=#XHYOokM}#~I+7FNCcapxN|#;d-JR0D1_&gi>5qnA%R?ca<)|)fDiI(L z*7)EqXD`y+nrbqL0}+cy#a$qnQCcXn_ZMVq_iVMZKY~F_2qW8sz0(@&yRp|3b47*0 zbfMy&D<|uPVHO)+Y&73AHQHVgoAriu=UQGwj>}>x1aluhGt0FAT_tPIj%8_3#Y+Y6 z*;L${qSK5jf?J@L3GwHG??doiO{_vfyFWisja$}{q!<&@Jd+4loY?f+N`78 zJiEYYKKRk(b~N^h>`8Q>^#q~jrwa(!6H=y#7pROwq&;F>qVaAC#H0EV!dW1rYX;jUIKo?jbk9nBF)Z>tBf#t}EJ7;JQDu%)bjCXiZgG_AU0rEcd4@ zFE4Yz^T?THPcV&}nrV_Ef`Zy*$q52xnAz6zKf~Fmg@whUq`0`TQlq-ZL03fH{(f2p z295w`>y-p{XW6={0Zrc73AtHA;M-=q^ z!Q0=QbasA6=mZYU)Wh|vL5mWIS#(uIYdA*k^Bj1({%d+VKbYqRkC>Pk7gvv4nPXyV zYHD0ut}Cs3bXrLp9^D9knuNrd(e5(KdWC-(E0N@y|8f=F$rvw%3=41W0Fg>v5}?OUWXXYD$=}fe?01v+bJ$L4 z`?{R#p#XsZ@^~X9L}Hj4NoE1=s(7hAnwxx8gh)i5BqL0>chO!$zVfI*LJaD z86BQStWPQqgGsAunFk#iF;GmfM`_*dHnqW;MsLdQ(PjSg^0zLp$5jicu%14VjpStS zG~@X1@;)JXtvVx#9;0o!=4EZ7c78tMI4tecrdHUhZnnC;ZsaCPKJhl_!<|pw_Ry;p z}{BAHI~C@#@0md)4TTe zD@_s*q<%4BhIi}dvu9Z?*n$9y`kkpCP%8&`jeovIPO`^fa=#UMTGz%S4|szSsd|z0 zZ%x4^i=||?tnIB~+^X=8keN4aXvCI#1*{Y0!OZNBdyn3kX5y3Ef`F0V({)c{={aPK z+th4RS`FS5jlxfVRG<BbkCab$P5$s*xvO$eudn_+YlTXyI-{ah zUza^f!M~fb2_e*!x{SEaGeD{~sjE};y8n3Y4YlfVFC>mvIokWx5^3VIUWKuo|MyZ?`G>lGF1v+D7mE!ka^qFLE3euqPcrJFAvWhdsNywm zjiyr~6V%|KqvzNRRWLd2R`SAiT#F?V`|4!BJ-zieXG#3 z)WDBjY+lq^S?Re`hI@KTbg>%)t@QxpE}Hpt1333Dtq_dqD--0Xypq;$7zQi>$U>=2 zN*eVw#9YqAzo*2N83e+20OQ+jnh4$d>7^iJ4UG!UsO=7v+)Jm4yTK2P5l5)K9+X_- z1IvNIe8DqOo(vD0vwEmsgC8zmySH`)wZz!ne9F1DeqcH4C%O_tC%4h+SUtK10*Uhz zni61u)HfjI5;d#o*?u5!B@*$4rl4=~Sg)B|gLq)N+T%PP(wVH#?$ouH7m(p*<4c}`_l)0gp~exrj@8`G8e2{2qYa^meu!FaKp7pdC;hVQ54ru(8f?^vyp`(dI(`@)zSiY-)v!H zDtnUg2qulfFUq6g&Y;8P@ zcy3f+sBNlOi|Csg)pknBJw!p9Mt7e#N173V+Oi%7>H|No`T6sYN}qoEC!mjJ`k;7; zKt9or;b{H5RxG2@&9*V@%TvZ0%)$zB$%FaKLcs5TVk=ks-L;~o9LsTPgdp*o zN?WAEdK&5xOj2(geh+P2ZwjXP(W+ASWD_GG^ZKO$a&5JR2$B0kestVN*v|wlhACOV zzQoZuHseHl4UY;o5&bDT&8#(mdUe(7I4H{B=bKh@Z#ccoO=t7vPM6_L=%&dBs3T}@ zq~4_D4KFR+M-=C|=W=dmf;pHu2>eaNlW^iZep?$|k)Nzz1IYB=DX~NO#pj(WDTIx! zlhPv^x1kv0TKm3vA(f>fq$$(|GnE}@>Rpx>1^ggKy6PPw*|$gA=9jrcMiJ!?S}`EM o1E3M8BtPN*TX)+3@9CaDuY%s@v*rgFfE9yO6g8ie$-fHxUoaPLpa1{> literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-18-1.png b/man/figures/README-unnamed-chunk-18-1.png new file mode 100644 index 0000000000000000000000000000000000000000..8cf6a490986e8a9576e4602e0e07d4c363b6f83f GIT binary patch literal 7814 zcmcI}2~-o=wss-Xv?8Welx~?+kbpMO4$Kg26;V_WnY0&+1Ax@Xx0}E_T=rQH@U-Rj*{f&(*xm^Jq-dyoPXJIg zI(PbKhtTwe;jnbKVBFd$n&bQI**sQLW7p1v#|q_-A7?i?NpJeFd9$LH{+`al?&8ZS zSK`Il-^<(?>wWUOOoi69lUEuJ^#A^cdCP&{wn&}axBt77ybCwTEI#em*+AJqjyc?G zs&%DqD(+Y)hn&^78`m*_4p6oNPFz{O3IhNQ+YzaKCpN(Vshy#~w~yaSpNQP73T)C? z1issMM>Z1JVg_tJ`%i~BxG{zhg8H;4CE>;ccD(3JzAwEmGwk@>j+V}!JRN$~lV1A? zU%j@{vJ$-=y&88Zws3GAyt?W--4y;uV8udz0{7d4F2@P}E-o(j4i^*^`S|7OZMQ&cj){Aq-?}R;dS$q z#wNeGl&QY(yvOT>3_Gyt;9v-x)!Ig=E)$_mD=`*HhOU=hAmZy1A#7~8O=dSw-AMQ7XP&@K*ovGVkO zslu~`Y0AF3g@3%YO*8NlZwNA4&pTIHx?o-&+X-wuboF3DExvJNnv8cjBYJmOs`wCv%QJFW;X+~T z_xl#z0=B6}s_yGEnp}+`1g$12?G3a`Qi@oF>xqlv)x%B24E;N@&!h5Z%R468MKtay zt3EHY3nW(e=6^5D{*K;njI4waegIDJ9l@Af=V0HySzl_7EmN#p??yr9cj+@v<9<8& z{d(1@a`18piAR7@x-@Iw3SKIwIhBABneZq**cWslkA=IW8|Eix7^Zr2TTWh@x*w`c zYi^eUG@3F){?{e{?~ilj2+pVIx`m4cER3#gI5Q=?CSc~z&42@F$~ZL(JfkiwqZQ^1 ziw(&=wgb3S`el;^eq*hDQea4Y*h_i^TKAGR?VrNbe=qUZNcJ~|Kwx)!v6j&qiAN#Aa*7+6zwJXYYOXC3Qs*p-l6BZI;sdNSS_ksppI~p-1`* zY~dj?_(i==u0AV}yeg(u=iYDuCtemBdiFO-nJ*PFo~UJhNzLh|%nl9?78Vw6b-rwG zpV;)1xwCGrBpis`HemUeAe|hhvO#MXjEdqA8S`2hf#eDzy>&9M@s&zE^h%ctY}-jxsf8Sq?Ap64DOZ!&2KwLbt@mPM zttA#3xma25zL3uUFB5GJGDA1YFe$tOfAppVFi&kVaT>lYZm_fsNlPTl{3B;wqIa~5 zraIJya0hRVl5-XD<7HT6Oiup7WE7D)pM8&|TQ_ZGXjV3A%WJ{BuH)6or67btLXDpw zjvChNrsPijC4`kKM6E6Hspxl9B$_X$Q?Olc5x7LJNmEScHeN4bR=f~lQaZ9E7 zFKP%$eltqa&-ceKlK4NG@KHBxghNHh^~N-}3X8A>5(VAJkyb-t7o$-dv=XHDX*-%6 z)yU)H%N)c?V_J%+BN=HHBAFpzxU;L<2jt8E1x!P;tlyQI32`r|G2ZSN#gg>ES#8<( zRPyXH4OTP4koBibvCgwy@gHP|{I5iGsM2pAVgwDRh(~L1)RmF(Rw6P;ol;bH2yi+pgPu!hC)_DrTqA2F1Yn@|`$805U|0qn|Xt3(DvQwz^bD^$3 z6tZzQyo3*UM$wFUrzk%dJwo{L4(AG*8^(M9nsMx+KF-kMHfNU~T*Wo<<6_l_)br|% zd@@|Ef_?uWtde9=H9g4MZoDut6``;YF_xEQfuBW)WaCUHa9(cfpQ~ogYhwcH{N}0( z-RqYZO6I0czI>Bmt73#-f7YevrNd zXeZ3ohUta5!+ul19pMeU}%Nz!Q^{!xyI)sPzl+VlQ1W zy}R4wM^I^%8%>Grl<6J}*W$Mj4(K{sef%alwi|v`&mZUO!(8%;81H{3e;6;$adB6< zf;696E2nfLN=;hi&3LkWCWfx(FKkQffC<(dQz+QE9;&L5hMFb$1r5)qFmb;&%VSFX zRc_BJ#$h|&soO_9Md`-2hF#_sAgdP{R!*9Ti-V~*R5L(Af@Q}RL3w37&J>D%gH=67 zJO~C?g6DQa%*4&b0L(AV;j=3vO6$-+qM)JF&(Ci+@g3z&A?o|HV$&SEL_(!S>Wsmki2ayHbR5jC+(@Xe^c-~ z>!krSF{*mkp0!QV4^6@J9jt`%)3Y~2X;VE^Y~ZPd{D-@&R&B%&$fg5QCw6rB$5I3M z#I4RpfBO~x?nSVr_-;c?j77jF8mchMq+s#Ahkl-G$Z$hWlm=GsARL@x7oeX{Nl1N3^(-Ip!Q!eMDerMsyEdAf*r{cX>%}ZIDv%`Pwrc zQy|;7tf*2XMtEX>K-Gy0GHO%c+Y2*~z34v|Vz)79&dT5!GMOfrm{tb;(`MnCPD39=CPsxJ`9gpM5Jk z^iXuRt6NtRRheng*%k`PyVE3wGQD?eTJ~@DCU|Z!8s8(p;uq;FCF}F6r_&%uz86gz zsl9TFJJi0x8R~c)G>p0cuKv_0_Aufbq`*d82I<9Fpu3*Gte*su$>;e-cg%) z1ZA(os5%XhN7?mZEz}8$k-$ zdG3QX!ahG8KWykn`mDTZVUaskh5qzs`GRdES+Gip)_Q-hvSdMP{E;4NfQ%&*a5pk` zgN~qSGjYJsutqA9tzk29#!v>dg#W?V#L!f_67fa&7*;Ytg<@dJSXOUEWE6j$674ubAQ_H0Y_$!ZMG>Z2g7UFS~+jsY^^)_yS3eio#=SsLPo3UH`HU%_n{&n2!@JJ zobM&NVTb%k!Mbtyj-hOmJF@$JJ?E;~rykPTk!gN+Md%`?&ktf~Yb5jhXHq z;AGPKb0MmVa=`GTIgn`@1*DH^2PU_AnFBzORe-{WfEUYIx=zT@nci~N1r_rO@3D9< z_sTMTfdC{YHJ`~lkfXMpyHPc4Ikozbc|j{Obh!{?5z_lCg=iDuOaZNR1O$++yCn*+ zh}IHC=3vCS7eoJLRmYvIwTb;OJxUnvi=Y~? z?c%8|ZM3ikb9U(O#t*9P0F9CD?AK#a=QYJfqOMYIO~xqkCm!XghP{1@;AXTs3S3K5 z-kXM09ABLo7GzC^^Zn?8mhE8veWO@WQANNsM zQAENRm@}$^txE2%XA`zKygl;O@*IuYjR#8}rcTAKNRTHC3O;q|>D%@j&gl4q_Bk-7 zWixV=JVqPIagU<#r@cznI+(t3Lrx-oZYv{X>_}q*<9AXF=voi$>m2=vlJppm;aiFE zQ}6vM+t3stQq9LE;;swiINAtZ1H+NWdOE*|bFKTBV4?L@C$FR0z#1r_seT&Lc(PHv zPN;37G~|k7VT5E=Zo_aR{C)glv1NzE7{zMfr0~8Fug% zdNYyc_l^~)je7 zkQwefy~Xz(zq%ZZ-P-{>hnNF0j7R>!^9SuwZ4T?@EW&~JN~rZgD!tCQ)Z$wZSZa2{ zmsX~-%6!HPYjs7m4rEY=T6oOTIQP={A5cqhKa+l0_S+VpeYcc_uF{NQQ-60NOIuhWD1f&HoMlV+>s!=@8&ts zWDm-x<4oDr=Ct+~wz*2DV>5>wt-MSRJ(NNb#gj;5Jo&VKQbEvd0|wL+cJ= z2&_?uV`v{Xod``JU(k)WYk?${fyBE#Ry`I~&mKTThPLKdm`fUp)FN_2KAGAIH}aUr zh?Iu7M+Xdxq$0=0w4&v9OX|W##+?;$W7XwZMkDGHGf8(mCf!(Qf8G#Y>cIp#wnBVU z;|-q1q7KFtJ@>L)RYYHEM0Xj`)eQk?CZ@0Y8XL9f*}n zGeBvNKXR$^8>+AKV6|VW0LuS5?e^((o-Jz1u_*mnE5 z<-4p*LXTITGu;b}3ozxfPw`**j{%Jjc>GLAm6L(=@AJHoT?KL^@-KR5m%w-p~6qvhf{Rg!=snO`nLg_ z^FO_11)ihB6@jx>&uXXTigo-a*=b1J0&8F z6^LzxVhPxJ>Ewu7`1A{OhdBuyMm=R~?WGFrlR7w`on?w)-=+5b6q>bqV-s*_;{Q^z zmTeKbDd$7B1N(j^8^xAqN&#n|LUi|EH1Z2uu|rIqwNBAtCpe`4rI{#**(NfCGf>0W z%EbqwwD`B5p)1NOU6AgU^6q@?DeKWmP_Ms~6R-9OY~Q$v;yAZ_e2Q)#3=R%%YioP> zsq54L$jbl44#MB)yZ!Z$OWaIqMP+4WZf-8xSXbf8e^!0enOA9he!TLTY{t%jzdQy5 z9!KunMELx(td48-8?+$W)alGzUmnyiEZDh;+5Pn(ZzN)Szm5eUr24xXAb%~}|GSN{ zx=qE!JtFW!S4qYDtFSM}93aA2M~-DF;zrRH14eK9rk?zO+z{v8(vwV6DS=}H$PCje z&AH~9!yp$6BHZKh#Wmw1MG5O*3O;y><6n(oCB^9)72M|T#`snmGn0=>XLSf$fyjEz zzRx6EN2pnFu8WTq3@GNft9xBktNKmkbMG~LuBwG@$u#nvk5s`Wg4+jAZ*MR`?$GR{ zE9!s>md_-WRESy3epD4W!sw`Q(DFI|C}sxYC8z)>0^7=b%2oI8Ad90iewvD5N(P?7 z+Fr92MN>Si>QLFOftnZSZ=9~1UnM!-7#Z)k*#YoU8(K-C)v8LRRN@-DOskL>i(hYa zl-A5xDm@kMWqyS}sbLD#P+c3Vsq1t>d0fA96)y?3HIl8@C)A5IJ}|dGd=IPTf7>YE zJ>R*B>e-y|j7kb#=$dH*8_oIQ9Y_>wst>UldJr;jJxVqFX0LtHe3N=y-9*Cq zvdrw`F?)1Uk9d3}x`9pQm&f6mp<`jJj1;ay-43W`{JOhYXu?WImt~Gh9Gsowl#K&h zlCpE=rcg1@4sm2|Lfg~=MtDpBTlMP#sCk1$2m)z)5Md% G{{A0dl89db literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-19-1.png b/man/figures/README-unnamed-chunk-19-1.png new file mode 100644 index 0000000000000000000000000000000000000000..74c1c47a6184148e9c98c5fc7a9cc706dd5f2a69 GIT binary patch literal 21361 zcmbrm1yoe;+cr9&NOwsK(jW*(mnhPmQiF7NH;QzNgi-Q(8(~1q4F;1p*-~qaXs` zobF2*0e_*|OKCZQKv*3Qe-L`?{uqNmFF?}bVruRwy9;ja1e4Rq2V8S;^6>ApUnxBq zP!OJkoD_e2`&8`djWU7KQ!xSp90DZ|+*o>M6qVny_`d_35x-(dOKFW&%Q7TmSP@+P`y z;Fi^BVs7zqwVWTE+XSmC=~qN-;60#N_4m1; zGn{x?bqU9*@9KsqEhB(HPutdW=*a?hrcqtK^@lkffI!P&Hj$4WqOg%8+x09|JN#2+ zRF+<=ljov&R*2_wc1()t$^H+Awl*bcHN_6G!8Ihp(}lm4Q9TYGyF7EWrHaRQh!%tb zO$a0udN~{moysXw=Qd<8G}GOvqpVBy&lHI-X3XP4Mb*$p0OD0gUUKQ$X4 z%>PTz9zijkTdmRV1)EASW(I-yC^{DQWSi$*v;FY}alKgh>a5Qw)2YLGt?xX*cH>t+ zSca2375bteFxZBTa#OweUJ0yu%i_jkzaCZyVfvit^PtN z&Iphd5?`VNoekcAKGvm z?oYF{kQwXMeX{!ItSD8>54;U~r>RQeiY0xcEpE3Nv-diIOkD~+&5*AyRKqi=mUJ}V zE;R~BlYXSFJi~uAj}N@9THdpbY8SUTg_OVi{T-NW#BqVo`W0;#UFo7<@*Lk3za-&? zsf$s>Fs1+@R@1$0M?c@-w7RDNy956+e{+_5*%UyhefoT^_KNf}Z<_ZI8O%L2FU+uM(Yz0NDAkF z_^=}24kFG{$wNd$>>O@)n71^Ww5-xDA`(P*w@j$yYO$I18^`$wuWL?)U4(fDBb+=$ z`9%eNiC2*coLzCfoCG=7&055;Kw)ie@E0;LGg^~R7q7aI)3tC~3QO1>N+g{Nu7`4> z8?dqQ%ZQ^Xf%^g3rDVU`oqLjgNKa$v{qFq)eU{cdn~>+@Y?(4KO=o@m-K`)@rmLat zv*Jxv<5f5p13oTpqQ~wr|Md>WMQLWOk2&x{%nZl$M7_=|e+p%Kz=8~ttdTwuhY}53 z9uZ&YR%49dP3bSaIo@;A+&sUxUFfwu%9U2&V>|#UbT~V8oQy<06P;szW736uy=v+` z&!W4AjRKPP?pOtL?a+Wbf&@ z~*tmrt#BuXnD09xl1D~sDn#epby_&c^M()EC0&s zX$ZaDS{GGAOm?XGn*%!iVArKMrzm*60L{qv)n17KQ~AD@;y&&YKbmfiJR$D&_2Ul- zA48I4aPv9v#ru%InhDi9AYZmrABRV~;o`;$<-;IiLtTZZz)%c-X6fzcSe)bZGl;1 zMW1GDQR8`27`Z8MQ<4`J65{CSSgc!TsKd_2rjUVim&y{?7b3-$IQNo|YB(WUug{pX zW>#PN&{Du$Mzt*N0{eyzfe*QRyhjILx#=e|ZY)i?cCCY^Hl<{B+yTeK<`?}A=3HM` z$l5kH4LcS89v9a^D)bZ^Oe7{I*2PxSGc54rewAorb5l?NJJ@}!4XL3$(iW8RwcK(j z1ew>4Bs7He98T-`HPC~%E=L>*Fk6<2dbAnjpI`Okf0i&AUY@p@nOFIf2?2z zrFGJWW_MwV{U%+*U+uHVfN4Z+uZ5iBOnJjatd}fZ+u3;4QLLDDN_gsk2iz?PbYR+4 zu>-9dT}lyd_S!7V;zCRq{OGg9Y%B54?(VV`iY1$|?nLTL{}B74jMmoBWZZ`oQJa{; zV)?$jyitd#sp#(2$-^ArFmxCOGiV~J+3oAB2VO?*q-%}#16VHYTyeuy}Rcc zR6@to&G5w^UO6`RXTF(Wx?pNg;NUysSi8czcvC-NyM9lbcnz+z$UPmcHMTd8*$-qa z#?i6ag+VMBDfwFbp^%F`+#U$;D{wF|bbC8bE#Vq(ajb*L9WS;9*t#_jmc1{o1T;my zEZ45)YR+vhfAIn!h&_krZ5%wiOVHZZws>;OBKjg54GoRi)x*`bI)KX|!qD!AVQv6R zJp+YqDGSEvf62cFA(TL74%A6yeTxnJ>+P3E%pGgQ-(&-~dhjwBm06`i&WN4+mn+t($JY(C)V0z>9Mn&!yH-ptkr6 za@y-+>%;j8-*w8oU}Ox@CeZscE?g<8`V?j=OfZQt0;j2JvtYS7UxYHDV-ROgg?@a^E>z~BFVaIxO|vb@XC<0MO?fbRaj z@>@zuN?ID&UE0~XQYPE;B&+RHt?Qol3gNqV@0iv8D7p8Y!lq9>Z?mZ4WlT~9T+m7m z4purkJH_W<0xmlQGbte_p0}6Bo9OJQ=;-K}n6DbwW~;281+0ulGsiOv2-F{-38ba|es5^jwZ z)r#P+T9$Lq;dNl8e{15~4sUSYR$0?axzjJuEMY5e&-@S`R;c=$wzIR7yrJH3N1{H? zxv#o?YcwnTDZj^&@d}FH-KAM9VRs~%=I{6%`D7w6H7)J$UbJ-J`>dtmBo63ds<6+M zbF9Xq7rco^Y-g%S$2~A4B!q@#FonNDDn>q;XHvk`aw~A4n$UKkUfnnl;mI=s)UhV7 za~hbC`@ydRG|}4=)mXxfk#v1pDd3s*G|>VxApvt`Mm_Dg-(^fgzC64_@f;ci=0o%I4~5Sfyg4emp57_o|#Z< zrD8ts%=!W8u!>vK5(ik#R$DZ$*Q=Zd1*P9K(57vM{_D!V9i+vB-=;{h%8!oIzw z35k{YN{%^{H^6P6vE$|=FY$kv)`nRm8*d5;U#R9P%w!{vOi9md>$!*r$r;g|EH6Am z6Y|G5h^zJ~f6ZOoRiw^zn;??WN_=Tf)E^li%yr~KKi@i7em6TqHyqd_Nuy!fvBq@LH5@N($x_L?e^OEF!f$!4zl3vZg?2@Q>( zpP!xlujRH&6pTt)k)yeDZqmrqFNr(S!Yp=n@OEK~Hg{ay%j;_vp}=TN1#~3JR_P>L z>yM80iwDt`7LK+Aw|Z)76U%J@HYEW80qD_Q=u?e-;^Ih1NR9;uZ3FKLCW#v6DFtQ4 zH3}xJdFGhhwFnwo=;QJZ^6)c~XHoc^DCoHUt#9yZ3gFoD$KgSrvJ)cSi9!?Re&suJE@{LvhzfVJ|Y(-&lF z&$VBbTGjC|O~qNh%@e$K=8H1Yno?*R$b{Sik9TH1V61|lhxsfZqLU<3@-s0KFx*Zt z)7}Q%gPX6&aT8BBSJ}S_G%l7{EUPa3p%HP}8x>5~K;LCH>OXv@IpEXbV{{yW-9MSI zm{QH{dl0k1;KQxFE{6}=eHb79*FReim_Lh)r?7#u22qPt`qD?PD^!c@)ErC3rlFg* z8+X5V5zcIpKxv4;g)0nhv@yL(lw*MQ1k{=hq&Pl`4{zhO4L3ocVyyE_z zYztZz0h&sjpUl4{IwT@VH4fvh)h!@@N;gu2{0^ZL)vmR%sG#qdi9Y5MJ&gJ-So%w^ zmbe3~oA<>$DRr*GK5QwE})NikAzU0_>wqDzCEgw5=Ejr|oRmEoNb5`RWM zBj0B3T9bf$1j@5Ur9dvC=jxQC^ma>{1KjL;1*$pP15eMNk6G{Br0=_s(Dh0_1x7e^ zD_S9P?+ruSOCcdC)vclYeeyHI2C0a#j`9BHKO8yn@T|F%R}7ga@3kes&4>E%S&3+w z4M&^RwYw6dF6C?a%8HE5H1=Y0QYufAq3@_pzWk1QW}`v8+Z=ZTfmzAdoZ=f^b7l%j zRcFgxv}kt6{lVxW7S&Zo3(^dO&ZYI6&Fj*0!58#VAbn<_Ax{SXt-3)sb>m$l4pz%rI$ToFzB(kO4%(*rq1ahJE>gVkk z6rxYXZ9OfzKV%`QN5;Xg?O#F#0E;sNfjj8V?^?P;vS4-PuvBy@iA9&wj*i(Q5rU|f zM-i`yX_@~By=+Md>}$zG^P`hpp&Q1u-7{EQG?uUF4SW@S$KCXK-f=%mGsrGq;Q0D> zB-rWPb(oxErKkj|ppa)JAkuX0KN(NY2Dy-r-@Q$bqMVhj-kcvL`+0VcF-ms-b1@4( z{d47*=T+W_t~S^DLbLG9`yNqS3Gt~;Zn)pL%|!ou3bKoD1|y3v+g>pQ5$;75{5;>r zt#=-X`mX$vnX?mo>CzD|@Wl5|?u&1{HVZEdhNzh0vRDq6v;goY$U#&(x+f_9t3JTL zkiOf}FmrK`*-rn4X>CbE_+luSPfP(>kZw3@n=E|x)aPY!dBh*^q}a$HdE)nem9_nn zM0ywPS~u-`oS;9W_dc;F-NicCg}BkxTsMb%V=(z#y$eGrbrR(YdQsz4i`Q=3ZA?S6 zxMcz*`^Tm&+Byp2yHypNk{BGyB9hd|arG zpuk0YXvG^mAQMS`C>}QC5-Dl_A{H$tT@D~?RezO)7h&}smm9y z&A6i+(LUYQ!%;~ ztm6s`YW`WfGMzjWbXsCMC$&Mfrf<*jA?6ln9B>G{T%e8mB@oIB5|#TEh9a^(*mRXv ze5)kBC&B0~{Yg>e^qH}%Blc8sIZYNtlRuzmSxLR;3VaE}M zdIdU?)LX?TM}K89x~&9+C3kv8oc`#X?(L7m6Zxs9@pKe-Z_P>5P7OSB+}8WQ?7jf< z&adw_xwcDO>btCXZa3yl29|kbXfkic3pQ-HTrZXmcs^sq)~l!6g7t`Aoo}7_jFkE{gY377*-d%K zCd6YX#6JV2#j5|u(!J+F`W%=eLM~(KDp0*hub>=z(F?SyA}Z)JS&0jk5LF!@P|NLz ziJtN$zBtl(={acSY<;vjr)fn$OtEB=qd+lZ*;*b+)njRr!?U0>^kXrvyJ+3bmx6Dv z2J^^G#JdER>5P_lelyqN%aL98v-jg~B$K#J=pYqE-B5KN6T|A!@ZHHw?o3)q^C-QN zg80uVpN2qIJ+foR^Iwt_H}gWXgm|lGXdF(bm@AvwPg4vmbC{=Uk;XjSZPlQ=(()~?Y=+VwR%F+_%rhIQcfkUP3cpwqQET_ zQXPq0)D)lUZf<(ol(nRn7!+3r8q2Zdanyy_Em4dTYYqR5oY`#At5u(ZPAW9tvsNx% zT68TS;9oyQbvB^^0?8*S+UMMliGA?;CcB$ZXkDB$8ckmRhv4y#+c+XHmIcRJ1qY_W zt%HP04ayV$o<5pqBUEWM+voQp*4^HQjti~b#3ajx$sH`ckWto+iaXwi_t)g?jD| zZ=-_{28bJRXcoNu5&gG-4*C->WtBeoq{qLGB(%nsZau%#q}6{bx=ar@1c=E}x!y26-@7BTU|JgYbT-`I9h&+Sy(a%aZZf2k!j z6LbD3WGy)Cd5zKW`pl|eB7h}vz^0&Y_kQK}&#P=aJ+VZ9g@3_#)*VGBI8N65`j7fz zG2L8=4%+R`1p*Dthe%sHm!e@Ka|Qai84(ZJkDo&b&;s8L!!Xm5T)fY#?$=3W>U6w9 zG@IhiiQ*fhTB>Jd<$aG&L%hS@STAYHw7!mzqi1p97K1drs?!A@%|}QgPa7bC*%Da@ z7!TM`ktp9P?KWk>ru8bin`UYDwyvtK!xk^TNG)XC*@KZ5jXC2@0>6AgtnP#(WcT;W z4s+9D+c*sC48htoLT4m>oBj$i+-HQnlldtBfW;dDiDm7Ayhn>QK}8e)>!hWLmPSl< z*n)o6;bBYC{p)0Iam#?VW&hm1A9Bnzk)!6u=#a5#w$V5&HVENEQd8SAyBl3RbKIcn zF%3(`0No@ibM7GqRmp7Ce-vo%`*w)?2K(sy#E_yRgd@J;8}R z-=sR85pr97lfhZWo1%qKimy;(J z*0%VO-%0PF@}*ydqI=Vk_BYMvrAO8m$PTHw-sckY*Y3KkA>rJw>)(Tsr0L>8Q6|Qg z`*)t{c$=qjZj~IrJU&0!c>2}@z}Ar9^_?!*%AVk)igNps?DM4r_VfJulQC}ejMji! zjL`gf7R#leXFtk+x3jA16m@@l<~hV)K8T;T$Q_vvYQ{f&YySYXsL@f5-;GUd+_dvDGI6^RZylDAlK>%}?yr&T*_mJ_a1@G{! zultOos+&aAbp`*v5<2KC7!msuLq0u~wQdoWi0?tL+YvA8p705LvUUgt0d zXt(!Z+4HC7DT>`_Nun4q)?_BeCHyVtSA{Qb!G_gBrH<>M$St@#sFWSnr2hU|FZpPi z*hZWxAE@r7WNhbCqfZ!YO@GwBJ5E|tPxHyvqgCh-q+*fepHeXm)8ZTMbkMSvF5nPv zzS*ZnVe5Can5?x}vYvO4;BpLu)B(iG6G-IU)&xYs2~ViKBj8QoPF=kdBz%vCLk{lE zW4ak3=dE-kKpIr1^lAQkyy}<$=S&WBe6oip%1??~kViI8NsE4kUKcJ^NNOnNV`7WC zuN7djmA>gVP#34l3n>5id%%2i{ZiXs9~IWiSDxUSW@7u(wy$H*gz;cM_^@QE@B?A` z6R=zuBo7B55d9aPqeHgNC}@-x^pM^Yihh^h(>x68&jYbwuI2A1>J;`@9+K`^Lziv!I7* zZ>4>cA&PZ(+<8`-@G7Lq@38aMPgBXE3=Xi&{tLi}pvcU)?wkp$b`2wf#A&eoOb(-S z@`sglQ>g*s6%=}aVmG0?OK$zT59`11Z-5M?5Fjsj*s&UaU9!muUU`Mw$X)64TVnS+ zsMRC`8GD(wcK7|#t7avWwM=zUR*x2w{(dB#{Uc8mUO?*sl#!IDUMzQ}*|jUDw*(j; zTrBmy_R@LL8C6(ZwLy4sf(}0+OnfN70L3Xy_}KWmR8hSbH?DPJ=_@e|lze$YLPEl8 zJ73y_g^GH3e$LJm^Pi0Al0NSTW$cPjO(-(vBpIO%4Ka8=3S}ff3u4+fJ$I~|ul^aa z6nvh=heoHl(@$4Qp&R%vL(NbKvi-oiqsP~@goVgi1^_j=&QDO2vci|=(x&osp04i#RL$M-c1(*PUw zN~anE9xyH+9Q;OU_ANbKQCv$)i@7dPk;lWsL;QPcstxx6Gh$s`-2=a$Whg6iE!}}f z2WQ3AD$)pOQ`)i2Hq@Fje{&RVRQ6HMM5+ODJ2WuBQiohJT@We+aCgu7OVZqYo5Q4% zQ&V5@9{=3V7*WOZSYKOvPGF5%5HGax)b$G@_A)EvTF1=iOmeNX4qZEth-C5f*9S8CrE@>T{Q7GiDNJj6oiB^z1;f16_ z$h!KnmWIT;n^=G0fgNbY%4|@xenJ^8hupN-`(|TrCyhm zaNO1$zbCs4)twK0yw#_lni>p`%EQvB?tS0>!6$H|dAth38kL|u&GomH>@!(wQ5Lf3 zTL)kGC){x12WlT=mtQ^ZYTJKxJ|oO|PuiUH0buu+S0@O`x-|#{L+@KzAJl>W(LEqn z4$$+wcxR6F4-@o3hXnM12c@z$whH;nrS+Xk$^ZuFQQiD+azWOpIYHRB#k!x?n79^I z+Ewl0n(r_DdJe}9!k`96FK84M71>L2LsfS)Fgh6H`*YF3NxE#r%)o?kujiwrq;#xn z{7M*M$^URLNei}}#<3fDU;-3B_&5ePHa9o7J6w~z6d8DQVk6EUgQiY>EI6@kpGx~Z zn%bzklpT@0SD!~p%-y3C&~=TPzv*IQXJpKFiGs2c$>tTr_ghw>5eA#gs6YX7Pa-SU zK&IZWZl;i4g%snN#Bjl{pK{DPnI-S0jdrNZWQG2Dg9!tI z=T}&lTYh>vRl8TiUn#o-knKXfXAvLc$X)f#4`1u_c3Fi^)3p0zA>xIMZ@qfv|47oR z?(Sa9uY#8fpu~6;Z!cS<7j9(hU$i6q6Hl4eTnr*yw>P`~CCI*x^}h$SC_oQ-i$6Qt z^;S*#jbl6=O`v|07<-MBkPn;ce8WAEIv>=gKgYw~=QE0%k>cW46+P_N;_8REZV{Am zyTG%!k5{H&I1CLhkW$%#haC3|#d_F%Bk?cqd>$Y5hAF?LnXS3!G@RG5a;3^r?Sy$d z12IZkYWFE{Fzq|Sk69MKAksHa9v|+1)PEie)O@e3!?t1W@{32=P73EyCztp#a<*LI z;R!8zXJTmgzxF6}{&d_49-Ct>o?4i-W_ME5?Iq`0-JWP%{FS;${^*jU}I0JO0J>Ew0^u7d7 zA$$mj1L2hH>teHO5A&n;`LGvDSIiX)wr2$^=MwP+d(=2-(ab%`TZKY-?G~+d%Kp)i z*{HwK>%14&F48DESdELNzlZaINx=?6a+Kn0+uPggr*9l&7QzgkXRBN~x1q-ktiS70 zW+VVAOGn3hHui05V~MJikV@?$pxW^kTna|L8#oN@@aPTc1u74;izTXa3!d7PWue3% zzP8y1zyLnnoP!Xdb2x*kg2He-i>7r6banM{#$tBphZaL*vrddcra^vtXbTK33ge94 zBtg?k`fB!b(y8MUXjCM}Z_?c!>Pf22{98IB0?uY=tlvaQ)~DxzDRwDKJ5vd`OfrSz ziZpS3GK)*g5(FQoGnH5_D0I+5=$E940wspIqV&}*-}KRF4qV4Co0}U>?iam_03$vKR$r+rKFaQbB(0I7pK;1S$z!E&u0sj>=?zhgz`edVtB z&z-o%J<+lp{bAWi_@e0EKovAOmhRe?N5Elcya5WzSYDcl;20m6=%Z-~3-I2Y|+T zDf=59k>uRzZ8kOfv!I7s@&DwqF(48KegI<4-Nbgc(+P?X3HdJHbARJ8@>ZhL8wdkk zIY2!GgVP{dC?%#tKfBlzrKIfb>9Ja0%SDoMQ|hOE|NcEa9e&}xyC;pTsa?Apj;wHf zcF}_CvMx@GUI?Qzbz%7D!Aj3<=_I?(_HVq^8Tc>vXf1$LQ~Tz4VNN>eST^`{d&UoP zlFq&!=1b-Nc)(&IQw^MyQ{LcqG4;fAp8>GzV^ZpT=(K(FSR@( z7pjZp>gsiW9?zQA>Al(OU^NcOCoRJ-<6=9W|H)2lBXS;7Ntk>_#g$`M37O`d!B2EE zfqn^ujpY1L&yWW{7c5q^Df)Uo^?71M;pal;wSP`-vRaL9Q@*=HANxqy&9E3CriYo; zHu&@<&J`1ch!8^-(G=K{n|jQ8S22_Q(x&GseK*36=>ap?%d@L`4;{4FB=F82u5%Hs+3)FDYxveFN`YP*Wy(`*m@ zUY~VwaqHF7Ikmj_7A|jrIb`Uh>FzvFrzwM8lZOX-Ku=&0U2m zJlsC-0(Hzmxe@z-P@;WQ0Cz4gLXzjE7Hk9^EH)WKrvWJV?ZNDJSHC9%%Wx4cABGEj zQ+E25bgqs6-ZORop_~DMvOL9iJM`7dO`&nYVqpoLAhP@JO^aKpcmXApjQ1#&?AR20 zKg&$$J?UA>m1|)QMAPYW>TB}gQ4)~mm(4a=P#Q8jQK|y5cXunpJ5PLhKweh5gv5)t z{07{swY-l3{yzdfU3y?~|Hr_YlTL&u0U}MGLZ4{x>76D*qM`|kBcXjES^Ha z+mxPGzV)OoSi>XV zXwJUj;fN7mojUoKQY)Y(`)24bEUhg%nB?v#(2P z6wum+cHsco9Aqc=3GTo??2*?)HhryDU+r48z30;Oq_YW!5|EjYXzA(GggnO1W|LsO z==^ON*3*9j!pFLYMQYvPXSazJR;)sh8XLmM-bq_eP&?qA~I5=FN!)u!E)~21Dp&7N8{;7N$XTO%|A8LrdN}d|? zeX{}iOZ?--kDz7d*Wv%wQS{IpE=!ChhX^+;CFLv$_mqFJ&VppK z=`fIqp8_3|e|XvRQ`08U5_+5>e1qz12ww)Cs39CMJ<$SSt_-05j8>StYz zn{DODn)F~ll=}-3-r+;+cj9PO4JpM5v;^+F-)=I(dSl)AUBq?T#*ZlehN-UbDeMxo zf&t?j4i5bc01W=)X8pHL@faL8R&8QN5C7s=9C{YHM?|-pn*G>hE=O~dQ1*o{Rhln! zAv)j#T+>5Pd7Olgi~7WdgcR1a?0I}T*tDC*J#SNbEMDy^&dE7G!~!OYg^9hPkFRI0 z#*RwBx%aI8h2$$+&QGGXqmfUO*jdxuHUro7Za;`700*)y19qPRjiU0VV!XL@DHdCi zPYeKA96d101J4bqiJl^Ib547(iR-?*27Xy%XXkZ0JSO}-j`iV}z!?jm&N`Y@7Cc+Y zAhU~{AgzaP{>$=M&Ans3N&2RDr^45NP3D=R&G*iy8bc{-1f+mm0Cd=`>(^C3E^LGQ z6~`SoM!V{_9IyxomwxA5S7*fKO@2=n0*b$V5eB-QW;8r)R=oJKm2CBr_ZSn z^>u53Hd5*5*%oYB&wif4zq8XUsB3z!w;YF*C?lJsL!k=`NL|{;AgwTTO$GsL1#(;J zJ;!oIQ|tt)4^0hFwwM_qFqiGY=51`tv#W66O*~wJ001)3Bg5cB=fj7Q>0Nu=K1KU;6}5`S9}uR%3U|v7XN`KqWSceSLX?` z@bqiB_jNT`cjdeO^@nEQKl_LPZ_G;@y>-9hZo8h7O1u+o2}?}2U(L5$+78f$Iw7@w zer_|MOtoHkd06wF8`knM{M$%cucgpg2ZF1ge?8wV8pp5J0G)5hyj~WDTyrpg2rmOV z*GEjydYgHH3n@oY++MKu?P9@tj7EjXF|?v?$rxdHlrP9CLK-NQZ|i^{|6fxIfIAN# zfN56i|Mlxv!00vyCN>s4(w4Mmtf?QxgaEE`e{?B%d0Rj4?Qa6Jp#qEh3P$XYFIL{%3yi8~ zSx)5r5_RGeQC*Wn209+Vx305)Hp6wiDAeR4_dCM;Qx!s$S)oV8!gCHPmC#4qx*vH@ z8POR$k(K2R33sclA+|(+3U=y={01nhYRvIQvySg;)wJ8~?e&t}63enSFt@J5Y(JsP zx91QZ`VhT}!l}WI1o%Y5k4B&CUL^XZthJmS0HKFrwDdz@C$eI7C-}z@%i`XM;X4`4! znD8%Gjb3ZN(hig+W3N>9f)@|DkCQ|~eUHt2OkE@ywlPKYFNurb*(Acm)OV(>!Sr$7 z7}QGlm^YIiw&!!O(c>wVF?ok$1i>=xu9naIQqO_{fb90aksgmk$kVo*^o8p6zrr7? zAjPR|e}b&Y-l2(qikPQ$Fb_{X#CeTE}R1lQ=#9-6PDXy4QAc#(qPA-kfC z!?JSvI1N1*FTXaMp#q8+QmD(iarrMTO5JO9YX|!*0ILSSo=R@I51N|veI{%4(1bUp=`YEEpI^-j4N zF+Dk1R-E&PT#*J@q(qO%yW}% zmZ^?#C^XG_;h@2G@dvUF_ioBw!!+R}>2b*3_=OosKpREPRkh~Qk0;5N=*Lr;Bycbu z`kQPUiH<=j!B4J2L^38|b%mH#Dy6LG$??&V3^G974UT*O#e}0v|f_& zaLkX6cS1eKPHP$#Rp^d%x(UFEt$XW_y^psm>ZKaPhcManG&C;RJJAoPuJEFwB9U?} zy^g)L#Z1hU6qty=F-HN!UStX$^I{MX9n5@$Qva>lc>InxGg(Im@K-;5AR6aC9FBy> zGX84>2fF7+v=EF%QQpLZ<{-?$#~_4F`4pIh%ZSDLEq9Ze`ZM6^u)RmH!FcfE1#n=k zze1`&>Rqs1AY<7$f|tYKE5SDT|0!`l1l<3|MgYrvc)u;}erN*2{eu80TqYYBB3l%o z=sw3{LjkPktzAh+Z{DdMY47oa2rYP!Je=>l)4TlM0>&ACSlpBv_2Nw;Xgu0 zmo?Ac9JM>Y_XSYwd53xXyNFF}{k}uAXxqPkz*R5y7q?p|pK+Uy0`}+b*u@Ja1pB92 zZ|U}KU*_&}wN1jfEpha;l3gy>xO22Ch+b(|hF~eLM)s0<9xMm3@+#6!{3tb-5!9bE zld4Ix(Tvbf(YKOH3{$v@=cT4LINx8Wp6+fWcZfr{b|@fQ_{cS!THSnb`9(}wX6_56 zUY4ludE*G=ZfJ7Vl%DVrtvG=x3rXR@e;u^-*c;SNM%u1T&Q%Zp5U`;<*PfOjtTNSWk3D6H`r0CZ zle-uQ$Xm8jL=z52i9az#ZFEF7gRLvZ*fV{5us2U_01l5GRFfIzdwU%H-WS~BJ8CB& zoQ0XUcoXTt?uOwsc5KWBM9zF%j$`uYxLFKrPb}O%JKud ze*#u~VOXG=MNtWR9D<{=w@eczWP|VPlkZ1due{8#^yN52!wd&&omNVmcwHnKHuc#a zT8L$~Vpb2P{UIv6qUv;3;ug}s1`}5VBwm||xbiF-wm8#Snmwk9gbjCuJQ2-mFS4m+r0`CKjEoJc8Otl95^L* z-mGJ_szyovQ3E-bJa_{jc>O0JdaRBetaX4 z()YIdCT;5AYU6sZ`@D$u<=JfJ;)riQRvNd-T~B0Y79ti_$%%$EbuFR~f~0tarhm(9 z?(yzYi;sfIb>yVlr)9M?EJ$Q|D;2&!dT(D}-4XUw$Q&-Bknj-Kt>*>#jmt`yeBTJ> zF3BLydioXgd;N59IyQVP(-g^0Yb;Xd!=e%3RMK^oNU)hmYdY;|6J*7WH5;gwcXGQg zXCL5cTJ&B&cBSU1V9NxsrU?=L!)D|qY~+SVN74y&`<<4rIzsiArN`_26yd|iEvH@{ zKE!@OA(fFj+<*NJx4j}Ms}H0^s`q>JY6xd`_k~f1=58xO-2!sBRfr>~Nch=?Vci=@ zOJJ4PMIll|BIZ}Ub`6+2F}%C$Q*BIw#O%_$<<9O;%$N!vaI(LSvM86i^EA&$G|A#< za!AOU%hKg(4O675-~HwE%k5DrYtg#x3gR2~y$hE2L@MmnCfxcYOr(m7l@5+_`-|Df zEi=%=v+j5!fj57C0gE_ihi3dffr+EP`Uqm>PEyuf_U>r5r{)w33=m@i@TNzpDyi0C zsq-EB_xROr))2DetdLMjW z0fl3Epc?^w4fwC*{C~iz@uozO>%cV30kvwt=y}dVtF;28k>^oR8GV4*2kD|cw#Wa0 znf6!@mAI?+Hb@tL>4no=-V@=lAFtZ7DUwd7AYI6DMIw`FWG&{S_u5zC0=bC))a~N7 zpH{1a$AjA5{*8K6jm`A-ZHK=XsY46&VF&#uL5ajw;|JE^*bkN6e{Pu%;f^I?eRd_z z_g3;O+>MU1vFXFg4J|^-Wk-jhZ_T#$gho1x{MJ$mswMI<`bI3@lHgT$yanAMWW`%nqjN@Er%CJ@aoiBSJ9@mr~OCK+k_e)Vgd~NhX`ngzx&D`{R7%ATJXIl zlsNAvHm>=1+Zs%+o)%MOnm^C?K7r!zYy3LG#H68d>dz>Vz`hr~XKHBhJRVHQJtB0^ z8kG_U9D4jwMMZuLsvwwpIB4Bt?$s-?6 zP|0ImDN)W)f;7h;t*Ig1S=MhmmjiT^U0QQDzz75;y?YvZOzWpB1ArO@!!Iu!BKWZ% znyqm7Y-+>dG9>=`270YYm{Yms(tZO~+yYNaFNU`0ajlUKECjS9SvDtK*}?y~)WY#K zCiHJD+O6Vzu_^19m%s0;e^>lCp!~R`(Dr>2^_8I(yu_mjmYX*2nog!WJwReB9r6&u z`(L1ZQBa@u8b}FB!m;e8-uC(Jk7-!`Wj8U3>0=C)Y9n2g@aYa;a%n<0g|iIqa%}H0 zA9jKG#Pg1+(n;|Tu3S4{XCXHe|730Z6m@@UPvS?sZwu`++8qNX%Q7M!KE7g_kcF3C z>m-fmn7Y97?17NG7rt>w+RJJ8L4k)JJ|sH&{$yOyrbMSnB-NWNJQ*8;iq_bK$|Vjb zJ*5CpA))imL>{mls(PC1JbQt7Rf2c&NVIhs*BDuHj;<2Au>w}2?<-WmNE~&r(>DFiFbu5hwqJ7@dW!pbF2YqZ!dl_3ABQ%yfG@jiGMB z-)to@$;_v*y@xH==QpTkq|t@^DIBhjTNoxtIWmlpkZ@1w4b?>AttK!!$OS>j<%`1J zG1~$La!(Y4{t)B#34h75R6ndaRw6A9K#qCc-Ecf;GQy?!oE8Zb95e0V)aM=Cg1xXU z;7-gBLwUif<_09j*hkdUb*_`2`tKHAZWtz z8@l6zp8)|C6}7<)UfnbWyX}&Hw%b!=>-;jT`1Czxs+i&+E1&nRfmU_C&S-=0x*xn} znOPF>1V57gwzHLeXZ144zT#=C8&3cOnVsF-h;T34>qNH#+0dCpyb7vYNS1QaFXAgj7HpZTK?dm9CGCcaS;&_et!Na3zioz{JEc# zj}t)%+2Rvklj}a@k41G#$sVDufMeVF+Qa<@xbNNNCb!j8rKAFlcC+{8A+!fr*2?Tk z(@w@|ECoCpGA1dlD-B|U_vH~Xm3Jx7nDzEbl{q;O0a}JWKraF7ZiR(}E;@lFscVH= z70vf|*S~(f5OHABtAAtC|GlL7ikXJyi((1`36J$hYwKNLVWUSkiJ+@>k#-fZey)pa z7&z_n<|ePj814TR84Tw0o^gt`XV0Fmzy5mt`t>T6icg%QM~}{#GiT+>mHz&`Zj5;T z{P}6qrhW6xHxg6tZdhjNbDJdz*Xfz6*jp%Z6 za#B)K#LmJlQc_ZKb92ScLU=}_F)1m@Y%ce$sU%FV*C!<<@qg%bK|w)MQWDGZeeR{b zk5NiWN_KX3>FbpyEiElHG?afFola-JCywXm=O-lzaGN9B!R3En9oxZm%m}L>?E0`7 zXXB(p^Z)<=!o!{HO6K9=5gi@PbM((Sg@lAuuU=j3EbO92jT$@$TAh=pr)P9@v|6ne zI}s=1>+2gG9W9gbeO9Emw|8`Ov{I?$8OPqosCxD4At53B<3vS8g@p-lkMW3z2tPkR z{&9-s=jRt49nJq#z3t#C6ny)5TCFxZI-2MC0!MPINp??j4jupiz!i0!wJkfJ@A>6l zCv^$)bAbmwVTc|80Ne-XDg*5Np}-fy86MuhpTYT6svPVo7dsh2amLKVWW9H#ihe3d zUW8-Sr`=7=Q3O}6?5~mJ4g!Ec1es*#BHs|6vcR(s_J6y<(ra|5N_$w*N>|K9WgwWT$Af_r#u@kfjQQbmPx ziTC7f$4njE*eM?K007Pilk7@ixwm!E(mgp{JGsU_mW4HC-O|pB6PO9nVuiqZ`ty@7F{oB7;by-~FHjVulBF3|3oyh!j zoir}2=5!Y?WYmjo;>!>d7}KW4-ShEz()nISM8=2t>gKKLX&EBMw^p5snduKDwSNF0 zB-?fHJpU7WC(5eaRoZZM-FKIoz1gq2%Ul&vCW`v6&m9}<%McNpcI40Nm7{BD#Lh_& z){OK_-{3$65fS4N6r|12Wl5?4dbS$<#qcI7A|lhh!$*^=)rms)9RQw)6XHMDP`)90 zPJeOD_cz;&`!LeWE$dQ_Ik2nEZsN|o~OF?oebVYQfD=CAWf z{=dCD4~pW-;{g5}h7o6oaw%j{xfB8f&0=JAy>$t(0;my8yiy(&vkC5|)J50QHP$X7 zx+=yb9=mE{Gzl8z^gvKVF`%NLB1cRVFe?E;25^Qe&h*-Jas zMn-R#;A>|g;hjiht7+A@bi{Pl(%jnJQ6u%XG41&;HfP-8NHuWA%4siJ>Ay{m-*}|; z53^Qo9P6n;cn5%o6SByz_1p*JB98ja4(;*vq_t^V&hHF&67`1kSOK1qox5vw{*g3d z&9@rwvYaD%PVOF#DoePfwp{vjO^Rw(+`3UN7V^N-LHWE#pXT)PM)rb}g1cQ&Y2`Lj z+$)X;ie97Niy7Uy!WvF**>J`+YQx;Y4tO^Y0FTBPGr!30Ax{X6hc@kaZpqm_3q2JL z0n_}~@2v=3=p|-C^;iMk+IPy*518!w{k{{%@r(Q|>H&t;=N-TLyJ3sFRh1Q25s^aW z=;7mPYYG230N@{EOsMf&?-ifBeK$J)U>z`R<@AAKccAb>J!swsbCQ#izbdrzdw1nTAIqwa>C_?ia&*|J-vZ1qB4Cx5rz_gA}~3xKPy z)jE3jQW6mg$>qiJ5LZVFqaQ^()5cLF8wQIF2zQ z=>>QI007Ckt<^W`+a7l-T}%7V1ANy-c2>Py92@Gi9Jwlq>FTwtm$SXNCCySVs0IK4 zFjdD$c4jVJ?^+cwEU+r)Of^SD`n*$DU;N`>k;er`1`hxLvcb=1a$T|yU;6$hGu~R< zKBY(Y_M+G0H+hPjLL0{w!fWlB6N`GpClu|0|0SX2JzaXWJ{Lka+Z@EFI#A`uAiVq;C`Ka1V*O}%6; z82|vuVtkOwd^31O4*&qNA*mGHOvvE*SABA8?6&Nh`P7&357Ou^3w zPT=Zucf{__Z|b~ujFm?>txfvYKt#7r2Fd|}2nTaP-J7kVNS|{#Ec84R{57Cr(ZWA88?<} ze)nIuryni5oSB@QdAan^)asZ8n~Mc+1^|G?VT|jT65gyuA{iF?;02%_H8tFRN@_;! z{JG9enTc7plM{k_C^WN^YiAP?*QTwyarIQu9nNSl{PtzSRb^$AbaxnXX6u?{R%MJ``8 zx?`eO!;b}7*VO%=Ml%2aEQ_?NS+8zPz1?$XJ!M_qdJ`k-}ko*l_KEkM`X(5D^(~?u~kF z`qm;5+5`X~d2%YULk2I9?!zO)dj@Yg9kgzXpOT2I+`?v#S-p5>NKJ@0S8<_K>DEV6 zaUf>Pt2-ulZei7L!jzzYE_-84RoFmQoSCcZ<)ZBP`<(dLl#q7<{dbKTq^Zm~T|eTZ z><9<(ng#$MRf3L1|ExiP7mCe@sEw;#YKOknUr9tnR{j5+dU;SvTHY<{^X8Im<2;*A zewt9|@SMti=-d_R0ZvwA?YHRIrNG3)xh2v5NW- z-~j+YK3Hd+ojHq%40R{t7OY6C6l;Po1b6@dkPGwEcg8qVs_5_K{9~w>Px!Vn!&7M0 zLmE{g1;dtM6oyefP8u_G<|6001BxlA6%nObGA*03a8PG5O4)iU1D)0P=wh w9smHq;_#EfOXM8@0z3c!$Ob>3$w|Zi0YiQ4na4@8`~Uy|07*qoM6N<$g1E&vssI20 literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-21-1.png b/man/figures/README-unnamed-chunk-21-1.png new file mode 100644 index 0000000000000000000000000000000000000000..a7ce8164e514fb447c806b12823688f7d2eabb98 GIT binary patch literal 16027 zcmb`ubzD?!v^G3gfJljelFtB&k|NzoNP|kZwB*oTN{I+ag98kWbaxCP-Q6Y4Fbq93 z?;f7#eBXP{dCvLk-9PxT+1#`Dz1O|&wXW-0i{N*PQuy~N?t?%ed>Ltp45|(E3N4O0ui)gzOgzWzl=ekzd$k)Z&X|pk#jDdBuBIzdyq)Q>ET zTXxS03-Cao*H23sdLoA_$5qb^Z_$7jMHs*g1(xq{u?Ru700g?U z%ad__3p|UapN#gvrf83Hq`dI9uc9#xcF}Iu5ww%_7L8($z0FjdC{5$?tLp?%HE4>4 zccST;JKu|guBZB_oI}T>5%TiFJH9s6YIuc2ScKWp-o{J3c24)cKRD%Bqs0<+*_lPo zRGH1gc&vYR8GnEafC|6KIQzz~jNU#lg;@(ZI@*OJ2`>gaIv64I^$BRsSFdnfo4i~- zJeYO-SbDk{r-ZjDzc``I1{z5n=pBxdxr43_&4X?Qo|DPV3qpp~hwL`npoeY;N6#dw zuBIfLS~sQR)cO_-pO3qbq`@){)>-%V|72bj2#hjC^BXWQ-5duo!NI{4<2mX|_{pg) z&!JiMSuM{8p9tQq_dA1}t~KM=-JTgZ(SI66)S{6R317N`>78zl5s>WHpSSrosiK6) zO{R+XLcbA&x!$4)qhmy#Sxhb}`OG*}tdTR4$HjAe^x6cY4hxe8c7NT)$BIb~-mhoH z1Lup-w5%ZGI(iN}GeL_(#xi_cFZpLqN8)5fr#3goP3+?v*>tteF4x>q)QB0T&Ozgg z@!dCg1P^Gm=Sqm>n_4+CLJsuJujfylA;)-$jZ!$UhbBV24>%{OP+gD_d0pU9P!v~YGoO+TQmgVq{~%=C{w-5N40CbR#Oz| zJs4BNdOo|cdm6g;D1EEaOQHo2ydYG)k*5i#tu^30BV)Gbkt9G5ydb!^xS)C`INAiv zV9&6Ou~bw}QC~)@WZBgwHdieg`(;9M>f_NO_ct0_FJr>0wfj z9-DVnLLB7jLO+!K?~&ZjLg^-D2gp>!S(>%qluk^AOy z?Ae_yXyQKYv-ui*s|OpL=86qX2ucy3^#fWBt{0o(b))_1>DGCg~r)j@FBM%Bo{7ROXtgT zl-34=ul;gV;!0?r9Q^br0_=3i|31U{-SM@5Mn=Zy=xFbGV`JlXx6^y71snywU7f>m zT_fm&{UrEu+1o2RlL?fzyi;~;4O)GNcqq-TebB_GK|ecoJs^ISk)mD)Jp>E5PrPgU zK>S_L0Ix()=%rzo+VzT)e!qa~QO;7&8hkug#YSXYc>m5Ssn}#Bfz&`^CVM3=Xu_AUu4V2-@)4%2%6bM9@99BN1hQ~SMJG(j<+D;OG_I>z- zoVV}l;@s;qs~(bEwQkW1OhZoYvN@dDdtPBV!9y|CXKZ$K<^@E688d?S29Gx6U%&Qk z;pU>|Vdj_IJj(N?U8s}(oX8w8T$m)}EaR_+!@L1Kor-q%M$JQ0o$?+XKN6d?(dV;o z*Ws$S65$pg5pd=6N3KMMoBn<#TKu#(U1!2Y-!dLeyr8rCI~3-#8{&c{%;I5QItZV5 zD}gzT=hr283z_NZ#Ssq|-J`MVS-PAz7HPe6wbCKY`(yX#ujP{;a#NUyzP$UW=)(Wc zkVA-XkWoBDx6XdGea^RPuEyPX9cGt9S{v$dJk&GYpMQlE^ZTsN#lG|%x{&8YmD2Lu zhZS1b^4xdEZZX&^SlhEbV%%hPp@P@l)+J?GcVS_!~Y(spQ=8O`_d*!Qhnf zCht&2`Dy3=@w9z-e>vwJE+4cd%-qP7dJpfYI+kb{*-+&m>jL&4vv86xp$N~svfZk? z#^>?zNKFsY<}IvC5AwB4@x!M2Yx#G?NSegNpYUWUh)DTLkkOcw{El)L;!hDITyNKG zIYQ~~3eg@}NE?>ZntWf$D6OK`g-9x{=47g$OAIRr6B67{>ab`FYrRn+rB;o^b?vdY-Emz`MT1D!Iq+*Y(Cto^FT^WsMTktPmxq{f!mgI9 z(&Tj={=h)>C;s-CeaD}0k$i>P~Ei%dwh;HvUj@Y0djqG?zmgHNBY?}D7~{v$>zdqIRf#-1^(1Qyd0N9U#0qZ`ARgtreN&xAe&_b zk~3tUCXzsv0;ttN`{Wt;6wpU$!$Fxu$38^j{tk) za8D~GY4ur$3oLX%&|4?lkl+6TIb-4ZqXySIp_ZdAiDF@l>(p=WSgp2-?cm#v^NaRV zyQgfJSOCFuR!^!v*l5<(7t&1`W7IyT;&0sP8|Jwl{Gmhjj2!MDCEJ?Z@KYt{U8W># zJy(CagndZ&O6r#FbD7H4K1rfoTbvh5-A5NOd5<`s?5h?%@f2dydx&*(@9@EiP5YUY ze$Eh)M%lTgbvF>=#rmZcNZj@TeCJEuS;}Ij_g=AC0l^!gZIu=z{uqy(HNO1MyZQq2 zoXFL0Fr7wp<#Xr+W4KcHn5B8?uGen^`_BeWxp-iI&-0W098taeYpppC^7y1zCf#R8 z2u>8cR(WTuAKc))GmafL{uIRYLw8lkv3qX`C+KC&=Kcr2J@Mr2?Ft(^#2P7f<9T;{ zh-z5xvmKw7_Fz* z@C5uG?}c$c<(T~ylyj|UFvSiGwc35LVn(#tLEa#`G%&b6pD>-)D@u@OIaO-X6RXLH zwJO2u?6}@fT_6XdX(lk^i``trGO=P*@1569>0>S;Kj6k89zr1S8?L;t#9x=}%C@~i z^-QSs>PB6!%G`!Ma6kO+0qW$g1H5$qF5so&on3Wi$EU^c9GwvxVfQ1?66My&a1ppd z<)IOFSave6&sl$NZ%5WE*3B7gbC8c>G+P{`}r~ zq+|$L!{y=mC7$S1rc_a~FdbzauIph0B~46ixZ8Oci~our&B;yVfzB?o5vTjqX?dIy{goxoy3_E!>%;R5m*sdQ_=bbHK*X(HTvCg zuYT|{QaX59j5?4@AaC*ID^UZ75)?2>Rg9Wg=ykecb<8|XDHUTxi z$J|=N0R04h)#)LGvnpea^Nhb#0JIYTVEYf_DfYMLdGqGY{fR}j2|wQI0quaiAN{N}-0od& zP$IF(S07kuyd|~Z!pN9zLOqgXk~xsgQ$9Y8B?^nT_)4`2X|_PJ3}x1OdF?mQGr{9I z3)xkNvdOshR8k2zZ8g=N?pVI=W!8T&ZR2dXwssq}#@U~bRR3LaiAyb%7*=9Dp|s{g zDu!clbr7XTiSXvFmFZVDi@AniFRE>iG_ThOMyo>LT<|9HnPoxJdcG>NgY^y-VWFcJ zusYG0hy6M@PwF?fPikqzaQwPPdX}_l6H@MgY$?C7KSd9wZ|8Ryy4-W}D)7Rk^;4R3 zC@SxsEJOV9Vy{RNrPj~a(V&6c9PEUo!*RYroCg*s<4S~<3s{RK{5$TuG^%g&b$N4h zgNVd56n6v}x?`Cg^?zr<1U)tn(eFv`W0MnjZma~&YI6m$34TitNZ zq;Ve)Ka7u)_0lkCt$e>k*iT(a53pq4I@^_Cn+&`I4-rnb0gt@vE!D1Tn6P(ya0Ofk z2Qi=Txb{des%vIuW~gj?5*wi1lnIQr?_GQL0GNDP_KbRSe~y>^Qh08Jje6RPtJzR? z?o2cMO<7pReg4%!-jRvePiRLODeRXwjJ-R1u%|S7`5EYR{Hj4}`5E^vhw+}x@v5ZE zWPh()PS;{4ue@r|^-CT{8I@JTHYQPc?X)^x&|5yogLCO0>PYImxu|PQ0-^@A z30>QGDyke8D-o$e5j#UksX`i%P67k2%;_`tiIZ=yG4C0`Vmu}JN0a~Nt$UV%WmHAkT9%Ilnr>HZnxD=Z7@wU$FG1^^Z)F$Qyg(?c3}IhjEoEqw2zJX;OMAAs{p{wY?ik{8}|Tng9Ie73CYQ9 z#|F{PkBQ#F;COwi`Idiw9nbZe?x^7jc#I&R@znIYnLT>>bgBE4qLsUY9i|^?y&Q@43(r z7oxh^dUfjxTJ9~8#U|s`{4-G|U;uU?@``D$t^b_p6PRJ2CN&&%DCpU>o8Axk)(y99-_kyIE5mr7 z@Z7vmskcOkLD>XqzRtW^Fez`0x^yR&#lO1jJSsM3>o9Q_u@)-&0P;R(=$As54`g=a zSiwd&M{NLC&d4avYq-o=B2UIcIe=)qT5`GZr)cH`=cV@vbJsI}q_N{+z`cSk*J~pk z<)$P2<%Pr=Zp(+rzOkr4??z@}n9So4UIRqGv zu6?Zr&&Dyn%uKuYPaAV3GI5y8d#cn+%|P&M)t7LfTyuA#v7*PY^0MNW_Mh^SJlRIB zVg;FjKdjhc-i<%eo0{VDGx{D|g?>;&Lmrx0?uz3p4skd?D=vUFn$j9rV|O%#A<}+A z`$v-sQmvNi=Vpy~;!Bkg_=VSvR&km*V8$ZN^7g}Chk`HuL|MgJV;Q2nH03?er@$t( z>B>e{k@xqZ$XI%L*{SCmy_M?QOe?yE+qjttqFrrXpSQdP`-87Xmensg_7a*r1h-ca zlyXYzvuh)&UJ(a#U^6F z1H7Uma-UoLQ*c^VzIuWf(|DdH)1qFJoDA;7YD-&)`@C06*{3}^d&3rd861ON{fynY zFx|!&&l%n((db*$5$i6dM(sL7$b~;Os{CgIrfH2bbT)Peuae-i9J3b?PS!i^F;3OmuKKX*9R6HujVfVjT#p(0`th(O<;7h z?oY3BJL5zeDPXsk)r@-9UN@sro*+`joq2$5L)Kri$d(f6|eDq=gCl;e8(Dl252ZSLIWFPX?_ zZry>$(`=>3Q?xFk*JPuPOW6Gq#-xpOMO*oqbxD;o)|4^z;fkz z&6v%4a_N3oaf3jM zv=81;i#(3xLFC7Q?4FIi*s)cE&TMP4(hsj#`gXPCiM%AX3JrTX}EYcTCc z)kIvoCYc4hhav@DVsPg_$=i@bSV!K2*UXJs&@A+SgONNI3C@l+*Ps%IX zK)xfGfxVp(^b-pvFL$vYfcVof_$%c1Z;4fATmk~M#)qUBY{mOtK%~dPD$I4i{sp{6F<#G_ z%U0}*1@Cs^yzv-g4B9BZJts+Ht}I> z$e(CaRe6lcMm=59f`HNgQ}r2tjFiOAP%}_g5(gwoDHc4y5FS0*PFRH8+H+xdL5s;Z z2n>7-44Lgj@-B?j-iaB!8SjWOm;Gus(bEueZ?=K}z;6mcN=06647pMJ#N zufV636d~67tJ-$6Ryb=%I+D9E2!oDl{-HeBGs`6Xg-F=m)PWICwx#xs)eXmuN(B9C z8^;^{!eNHJ`x*sP7qv*yl*}uP6EvD`TD;Q zkZH2t&)k8vqC46MzoZ=BYA75wgL-=uq-D2{-Mm_&qk;E;S^KIR6Eg(@GYR& z@OvC@^8=-?IVmmLz+0e%{Btt}f#KD<26ol`@!DvBOzX%yIy%bB%ddHbM^O87dMe#p zJYLa0N7IC!H+&w*$Y-qosVI8XfoS8JC01-|ZL2>T*KQ5O@2Ov~m{S2yl^0-x{D}fD z*bAh6WDrbOfxbZ@dq;GJ{ z-a|QV3iKLaI{%Z0VVryN^HDEETw9Gr>z8fG?s#il^4NuJ9A*i>b>W80Q`N%TlmcQA@4Q}PQ7@JFhBwM7c*@}G?8`|1gM;2^-x(<*U!xFWA{G$?q zJWHClcHXb!X`~o$5dpSwbY#)BK*~{kUqYRO7qcomjEvStdq&gQaTo2stuU~;Nd>zY z7+zJwVEhJ-JFyRHg${cH*vF8X)6R}N^#z$*;r)=oat2J@_R+yF4#Q*H@Ej#lW{nKP zl_C?7OFIeGQ0-5czeaPe6mZ)%?|jyZvm^Xpw$E=Ccc8GmInVV5@lZwVW;rptc2>Hx z@mQ8j=@*T4kt|i{4QBs$K64Xy=n+#fBjnUvmb&+Xx|+ulMZ5$!I5-X(RbG?bv+lw2 zg>!T$c;uXKq!hVJs_qR}J_HDl>CS8oFem}dc=gDb%UqiPG|PBdBy-!lQT6wu3@0!k zNcC*aRH4cSM4)chKh1ySTXTbKmA1mdu?rx=PLn(1Ar)*G#gjkv=14%3^y4J>V=q2h z(S|Ni*5)C$H<++t6SZXEJ5fNseW%!1V{`b`sG-rbAuYSC_dyzlNWIu>+40IYT%Wj4 z^TPk>QI?xY*RC*}I{qR$+xaQRg`b<`3ccbn$RHB?dZ=GZsyVnhJ4}A7oHbbC5EHyH zrgdIv6ExfdfoR@fdI3g|aTzvRb$|Im_v2lnGlqSl`f$1!;6=5C&_^Tk&kW^jPkira;(w6mM*-U3zA z0afa~w(fw{z2kAdNt7WiV59EL|EBcpeA4|p3JujyCI{@%>zW+uad$wIcqUEvg=D=3z%ifCYn>e@~wx1~fQnAIm?B zsu~wu25<}L5oe~&WqwDBrqqXkMEecsrlnlDM{PzWF-HAJiI*B%68(;^`%tw;qojMF zsPK5KC6$;0#^Bq!0s`_VoYCEddaRlbC+<$}CumIckd))+w^Me|~p z!GkCQjsJ++e&Izv0m-PtJl&U&)HA=J%G$?e`_YwxOMfp&%zfsVhLO3CTom%pFnND* zOMZ1mc)8}&aEtPj{iN2itU|WoT9X&nB*~c6%^#i%@f7U!Xy-H$XLi<9TRI4!&$aMO zqzLN50(~UB8auzwNpaE|H$K{c>DnWTX|(dE#Oxuyrgdv{=Y)M5`V)1QsYe z=3T4Q{}udN1D;sj^D};D&8O{sZuO$8VTEbyijXxbcgt2RL;C_Km3_#R!)zsK`JVJO zTi)Jz%rC$6kK()OnRpE~izC|@o#o5bpN9QCFZ1!{pl!>dvBBv`Z5sgPfPAn1#zp@H z$$T@BK=+z)%^ERH`!r~de8a%LM+Y{7=N4M-SUKL!STZ}@-9IK0 z!+CMF&JjW{qNl7sR`!<=CVMt{?^q@7)*yYDf3A(y5@C9KKC%zj)R0_T@zi_#I^L7T z*egi`?IVbAUw1q5s$i4Az>|;cv2&uAThvqBvq1P2!=Tp5;G@BBWA@8g28t0V%zT}} zy5HvPYb@rvleNergS{|g{7QZ|g-!qxx+D+AfBusy1r!80Q1EMS0KAO*si*nB8L@bI`AP;P_R;U*5d4;M}zS8*UD`TMS z14O0xs!#7xQP|j;9mvX_GzA%4!_oFv0XHr}kn<7=X}jU{49u(&sAyrO@7LyDHNJ;&`Y|fpFmR z$iMPNj7*7#M5KMrM$^{P19-FyJ1jor5p#<5?@~g{&h-2lnmn8)7rup`=kEcVg1xhD z8F&xAr@%bSvPhCEWj4RJw->?CWyLdNQUR2R-450iWMxaIw#&?a-=veN5}~?$Y|x^y ze4C)c-28rbu+iT54|~#Y>tpqw$Lj%Y)3Ieky;>}^MN2&*z&8lbBYX3$Ol2<5?2HFY z#X4X9?seoCRpHQxPY!^M=*~25a|a35=lEmP+xw8(oHg4Qm!ntG3wsVGsvXKlsJ2y% zBLBA%c&JYU8J9$7;S%KD0i_sW2*6EdZ3?{;Dm(t4iNQmmKffZ|NEp@r{~d-&)BgjF z@;mCz+7#E{o?Xpc8X51%b4mCfgjxM}JN;R_(4+5N3&=hLz(Ni_jOK zn;?0SH^z28u^%tT17 ze~eD`uAgXf5m}LaPp>AC;@u<DmksaW}(GzQblC%iJbJUdE2>!0{H$b%C7JXbsB z=g^M&JULF_o(LJda317Br}_*KH>%^me#J@WU>?H{9Gl+xbIX?{P)rG~fewj7@Z^2q z;$SQ3&oI&bfZZb(fF_4&utx2I62E|b4wSBD7ua|5YouLIzlcy|*WEBq z@&V7xytR?quXU53|CPRCV3rL7AjD(#>y4b++}w;2$8Y)z|CPG^JE2PvPwY~(zFpgO z1L_qJVjz(F-_dlaxiuhEdwMqQPvwt7B^1W-hOiNN{If9HF;xdXu>Y*|oPs8qUv4Yz z5MqYff&krj-iINp5fo|rzOE1c@vZu40tMxwpywAlUo4EUK#BMN7l`~{$mahvY)Nm~s zsMb{E(R+cQGrPRjsU5w~@57 z3jJX7mxfn+b>(-Fv@0a?K#(QS;RSNJnd_001j-^)VP;0F1a9x<#?gGKDy25IOYbc+ zea|XSlxmqQie4SaH@ozL3sJY4;mdfM-r6;YjVy3`(YaSWf9nv6F7Bq@Moy#T82kWQFLXBA z`E@_GKrT&L>pMzia&hE%25;S;sPuF#bHomM{9D^9)2imvZ{^DTZxt)yLR@Ao?*Wkf z;R|eGHA!$FB)gmc*m{Kk@P{UASC!!J4+P7F*78}s5Rs&t)_PXjO@IB1gu7~?Yd?*A z1Pw2$GVY@zwHo$uEE4Fq_r)+Tpg&b5?E8arE6v_urVjNb{hHH4{+D>d^a5WjURD_XQ6K3fr@m7|7j#H5ld4ehaXnadJ?9Px#Qj*V^2xpp^c=Q_ zQ#hXkIob|7^1v@*_a~yWP|3{Ct`|c{9u>toktw`4Gajoe;$C5$NHeP;3oAGgwTorN z1%aBv{&mE_TS{Vdv~k%K&E>Gp?td!++jjZ&&$ zKj7Z0TC*S^H|}nGs))=zF0*3_|Mg?_tq=I=3!Px8X8e1~8-4@XI|;Kj2aM}->gcW*z zy_96nlDC5-y|mXa1P(SO{ptv2sCahs3dFS^`E&|-9NiSQ4I&hH+MpW_vv=A3-6keG zBjT>BEY>Y!E+2(|B)pk}hH<(=Wh+A+RlE@#2A$vb`!?YMnP%`OYWG~-5+Tktp}eUF z2dF;I55slk=k6;Ki>Rg*@f1bi4s7|6dycqWsw*CNvM|N819*~i5!eee~$}M!1eFQ%xQJy#NTikgs zB){B`5g2C6W;zw0TJNWRLHg$JXT?AD)7)baRKJO=0b?{#+mjLix_97^d%H?4ghj|F z;plkS?1x=O)7ft)gAHN>9%M=obvtonwI?o|ia+uwMMD9|NsETB7{mhs{j%xB5vJt4 z(3pU>tQS_rfda_f7Hnz|u6f8-itmf@oR9}oKTHuK|WK zZkM@>(C^U?W&*Z@B13x9F}B^I<3O5zd%D`lXwOZItmMB0zUGZ4I$bcU#lz6`sjM~F zMrZluO(y}{wmnsS2-hxVU9BgL{S@|UHm+kzUZ;!reUN<)%PIQ1nyl6p-xKU~{YPKW zRs3^c1NL*OCdHfS|1kCd471Gxs{4EOEyDA#K84(_S2W{IS|ts_p3t zM0&W$*%}mbpN!>~6D$8D&_3;tOS0CRKte^8@5EYD>N1;hT?~j0D(Ia#dU|@Ko>CYY zo6chr5>B5hPp811&d#sjzESYmeheXF9erX4aIUzJ2ee4Mv7@VpE6G@i}FI3L% zH)5aNgMa5UAI?Bb6ou1@Ucp%|PJr17J8ldriJWE_wtd_BelqWY0vd$FD7a;lmdY=q zE4%OI{Sn@%os)n?L=e-`LQ42rGk5KOBq!4Vzf@>durZh^>gj1|X?c3qH#pPs74*ch zFEn~-S1j4g)jFN-n~ViUneYS9iJM!sf;cKFsz|RPciNT*$_iW)7QP%}uZW`LwP9dj z_{EbrWfc}4&I|3!4ULbF-&kMIp0=I#exSwRCwVI3N-pDy0jaYAsytf8$IYVtFqpop zYjt>dIDPJWwlX20wW$EFD*+Do0j_3eXO9Q0umCMDOG`^MGy>Pt>ZxJ@x9;Bm#iJuF zEq%Jbs!G}ai7PND2>b5c93I1^mVln<7wOZs$;rvUC$6rpazi!BKfTx2KUyn0J2~+W z3d-X*-22mZu+jyLn)a5}HcqD&aIK5}<9csOwGt?arN}R@Mn%4g-f7aBbGH4I{JL&* z`JDi23{4^bV>`5@cah|EL7rX&fF1lb(NN*GUNHb^BBEq2KlmEs*5xTLNo_^ai{IDxEr$l12i(Xy@{$Lrjvg zYFQMo1n+V2x3zHaILcahox*M@3x|V7&(WMUVYvuC3|BUS7WIbT$No z^Q+`R;$E_2$E3ebJ}Xl4t_Y07l$kqh8dP}F%1J7cKYaLuk6Qd8bPp)~KPP$^o#@(n z+9)Z2MiGIcUv+9K)JH<|T)+FqDHHZz@2I4EQ_BkM^$PK?9@28oUwyRhl=FhFxny0k z@Pzb@jL_%N5h@Wv$F`^zurj~T@B&^M1<9Hh=1(2Dx|v>I%Ej?uMK;aFP7GrY=?j(I zw{f`IHlMDZz|Qk4sn6Zk^q&gCe>$%0#^h~28P2KZJY|mUM@eK`MJR_|@tl^Cnmg%v zqRXCT9`LDhJ=s4w&(c+l@_&g7&d$s@J>!@9ydO$^ke%Q79Cv_e06xIMD z&QobOew*JsiUhMD9MCrxa(Kyd{Cb7$&ad20GqV?b_-6;S%V`fUf+FC^#M#3atkA_- z?0TuTPGShqU|gJZx*6IP8@J#I?hO`u-Pq`aY^FO3bZevKf5h(p(shkpRb+HPv(XzT z{97Ls`ixEE{c6CjafLx>Rs(QM*`&A6n$#wIk;u@$SWDQzVSQScGS#V8+8W=vDs#>F;!_(G4t)5cR9a z>)LB=F7%ds`i+9u7{}P8&{L@OpsRJ@jk@A<65^FpW&TiZ8eup^h##0J0$&{+b%cYi zdubCcZhH>zWOR%5_^#_+Gb>(}{9I zYRN9I5=fZcvFkK2(w$tS|GUOuk&ebml`PL-ybeWe33G^npu>gERdFc=40rU!Gj|{x z-|PAqq#Y)2GULKhe+JcGwzjw5t_rcKMCxcSxAtOWGn-a6YR`Uo;?^}Ep>p)dl2QJf z3jOO-M3x&B*E<`Gtm3jX8Pew(s$RIsK=x9P@D~k#~ZLt!<07UO01EwP%*9W?Di`y@eo3-&p)lCtY;&R5tmxf}Be7%o?wZ1MWfc8`tQ3umA#PbzEJ8 z!;62Ct1A#ETs{mIrGA>>7ql@78aCni0|nzRi( zn|}!X7A8kr=bObTV=pW1Cx#Tnzw4vVT^$0`7l6w6Ugyo7=de+G5^Y3s6^?1IQ#&qS8ggJbbL$>>VU{yb zKjdr6n}8PRv8&4-uES1Y`m^jg#gfw#ce!zv56#amrO>$tO_?|#(9iCAo%|MP9@n1D zbTi)4dwzg3mYHxc=2Gb!AYPWKrVzyz&`RJ3TXXvyK&X4L<0alY77b3&=gRNuZ_#y9ON^6*5n=%7S34aJx&|Y--P2#`P&HTKjx6qk)gRDI+?zCI@9UEPqv(%=PaL07PR3>|%|2u)e;;n&GP z5iuO%!Rwg;EZ>~`C@%i-y{su=mXPtaIufb-sTUdSNhn|sOc@EijKU@=dEr&a>Eud5T=pF zM!d9xncX)uEz7Bg`C>p*;Gso53|;2cK3|5&LA4AdnE}` znm)fH7Z&)gx}uPU7jXi}FPQNmYZX0aw3Oa^vcp-r9S&tG0k7`nsjey5rU(VOivZz`#iMcivj69! zDf;bIO?@;A@($i1Ai!iK65@R|^lO!ET4zntfbB<$-8A-BIQI0u_M2^c@ z7*nep3n6DS!yt#jj2UxcnE(6ief|Hnuf6~M@3sGHeb?ps_`dgh-{*av`?;Uzy*;{k z!A$DAJ>LNUAcZ=6`Vs(a$^rnfv8|iHC!EEzx4_%ByJv0v06_W!^dr{do$mwyd+(r5 zpSTi~wm`ewj}M{gBSO~r?hGY$Qk^&ZntGbY)5ZAYZ{g=|Qz&>#wMbN6wI$8df?Yqurnh+~PzEIPwH(qU` zM!d_s`}?*yHA`)H=)zomw!UV8-d}(#1=qB|?Lr@|Y+M6qIky5`Y2euwg(0zj<+p#Z z>5q6{-Fa-{XlI}_u_8E;J(-}ktCd$!>oEI+h#>%={Xk{jWE6|v*E)eUB?w(SW1&9WB@iomm%swgmG zE}ifHW%U1FyV!tPReC7>Rt$n$h+ZqG9IY#^I>rW$OVEyjrlke!XSxrRIMm)9rx)tO zph(=?;lH2Rv2o>2Rgm~Z_3P;L=RnpaRO}=ehP3ei0KtD`50@lNq9;72K|5xzc-Hkv z#H1W<2z08>nLl!>g{a5)UZZ?TpavoRC?#BG4?IOs3gJB~Tnz+C@S2%oJa6l)6q5F; z!7RVkT;?+vhIlvn3S|1F^?@U(*uPHw71m(11@J%pCuYHw5kXC7s)2X&lij&f@69s4 zH^mo1c-DxXfN-F&2^qp?e*5;VhqV)q&++U_-U{Sj1D_Iv{H2MOq(tOu+-f$5zL5hO zs95luWWRsP4}ZkF|2xY-vs`R{r|@0lZr}^P$tR7s)v(Z_<~j*44eRj}omU&eXQbjh zDJoZ94N?+8Cogo1+V!6(CV{_lX2@#)gZh3X?+!T3Y2osAFf($)M)u^);IWp^)r@HW ziUB2tlgLYC?=EaLf?>FR9*m6mf;pp>#YRE)$JJ7~&>1U#v6c&Y) zTqOR^slS*OmkO7-nT`Ph=OlE%f>I1=g%sUhqm#@|XOIQLOwj;5MmV2}d@JgEwd}TP zP9jaXhzL^{(L~}F&A=-GK_D@+tUJ<879wTlwTO3Cdjk|4mf2Ip)hgq_rfm~cPMh*) zJilAg#eqBC7AczOD2y{G>f?S+^LD_tWQu2cVEHTNp~CvACUrOT(x({9J(%A~!n=#& zBGE&gbmKr8lHAY`oHxG(2DBS3JW+8Zviqqur>*3w;28)Us&~jmDMdKmOwTw*tCxYN z;6CYi5gE_vqL-ZLA(=oLc3WHXNTV=$M7owWo(HSN_b>2t9G8pNyjDNkeDf&kXC72O zA`ZMCVXV0*`gHTW@sma^jhc?e?%bZX>2$-o*Jk4^wSH(lFWU;?Y=jJagwj8lc)HsT zajr0+dlWYyb8ICymE`9tXKEGiG2b29n;n_qwKisjC^*!B2m;hge`Bn69lhD7RI^@I zywGOr=Xms6n%>(;P*UK^#2_B+JW5yuS&SHgIH=3)0y=)C)$%WwKSsfIhR%)u}K&Le+fEPKmxV z#WEN6Vt!{C44wA*up)&5jq70I_e|KttS&cYjv7U0tDif9@S}#ON-H{EE*>hZbN~j~ z@?1mC6BTsYT8H;&xm&wo-i}8(`D?k;NoEsyX~T!}k3_`|z=-t5q{mjQ=Ew82;o;w# zrxW8#QmHGgp=-29{pwNK!`m1LEJKp8ycT&x%}VY-s&d0TBabj19dMQY8?=RsH$J{` zQ8Zk*KO&Ka8$n6=$eALdkJ0DXsH;soFQA#7VRTq%5Qp+~wUR0dFCAq?drJr56JTZp z=JJg^3#0W{TNo5~jyTEDdawq=0GF)8gmNUO^+kC0V0{e2jZ_@diE9|YKa`nyu}XTo zG2mbHGc8;JUA2gi%G2jP%~p@1t+#~oUYflYvNF^Rc*>k5bIS~S5?^6}LiD=G7+$kX z=1x@~s&(xOPay*)^wqo?1(@)MyRy|O^vT`ZMgHH4F}9Ns+pxjb?0gLjMeJUClh3pla%YM5X2QBq(3@we11GU>C7I$|Y+O`<{P=g6{md36%;-#a zj`^nnqz%uvZ!ty&kRQ$o4SD`ZdvoKj@m*R&J3% zFwZZ2Dh(U#=FBgoCW>a0ZE%Z5x6j|A&X-~pK(tQ?EZTCnYY@u@XHG=Sws1ArGEq8R zCZboCR?hG?6z$hoOVI$RxCX zQzLS<=d)V53BywcO#id7`8mcIXO$_;ry63z%dUgU!jXqZqi8P~$8LX3X+dkBv5+SW zqCrAd*L)O}AYn4MkGW<0onK1HB#-(eti;RrgHCG2L6}z3M;uL;zI+X-<4CZ>zBY@*V)Nm z9zO(^GdS}hWjK^wY)-fw?C=9?UDHcA`tf`!IMbJ~b_T|du)QkMfl1{#UYxC_rh&b& zAu9Gth_p$I9Sux^cpJg~m3$Wb)d6Vb*b^BGVE@F6ZQH-n9(pG!5gab5J1DA_lmW=7 z*e1gus7W-KkVOES+xG_pTc1+F;m-;J)auD6#>BFooL@90O>ZGg^t4#RZPORj>n+xv zjY9~R`ji2-%**|7>|v<1k?RhDH_fkH=%HIM7i^xEkC24+P(2j=8V*6c@q>g-!_)K9 z-3(WSA$fMamMlQIB%wyyi76MqC+o~KhKkJMw}qfz!B)Q}QaM{^lJg$;lAhpo)oz?> z7h>GMU z1Etrgw>)~ohy|QfKX88CV7Y8e%$`d66fGfjz>6}JEU(6(e#sl4W0kH^-^0~u@6GW3 z!&XM#p)65HQBV&HTIr6?nXVE_1AQt{sW`pirk9{_#Lb=7!&(og7wX!pfwec@>U@-@ zfroh+O|#UKS~dE`sHXEf@Nt|IOU1yTPVC;IYTM))15?lhuLG#^pp?;6ua|+JB^&Q{ zwl@0YW?l*$=^IoB9%K!7g_rKe4_9_45Kc=%Yq$R*W8xzX1M1S<81HT3Hsbx0!Voq^ z5%5=gbZQxp{V8%rY~SJfaTnh{@PzawYzKF&;s+IZaH;ax9opp;P^{0zUg2PwR|g{A z={Pp7eca45KEr7DX#Z-nM#8wI{H@b!fs3&WCu*aSA%m0$-Gzmh|2t zXtH>}jmuTgi>%cgUOpFaX4AcM&UZaVCvJ-EJ8f(4H0@Icd?E9dz&=C`<=b$}f( z-CI|~w=g~M7j zOVq|<@h;ZJtNc@v9J<5xl7sQYmyYG0Bhf1aytzngafH;xts0qsFaFN!x13zh=Hl&_ zi}+{~He|rJSL{P4*0L8(JWx_vI?@>8{${oGL&g z!91zx;2A49Pc(OQ?s<+(YjBJmlw_*sbot5l0zak|xlH*5OUSVi-Ei-zTPBra$A0Uz z+>^+GHGqM>c;Ql$U0<_Qo+GCs&x9NLQ_N70-{c#;b#|PJ9(8;d)Hld0E9{jq{`RQ? zCh*N2VY~q0g0(f)?*DKb$ilTvIxd4m1A?Iq){xgGb{rGyv}DY0WrIen`ao$HcY3$* zd?!c*Gq=lYTeWMHpq!MhZIuRok86VoGXkYeqAMC*v;n6))`bJf!t-7+^{v`%G-)Ds z){3eF9zS|8j5X-MM+uLF4t#djHB->Rf<$ra1*+f9xj$;q>1o&-9zdOH9gx;<#?kr>kn4wYzB9%gevFb=$1oo3A1YhLVAP^ zqV}fC?VJsoaPnJ&;h*52$qkh$9BV(sOoe0{cs7zVm-w~r!^ak+**RjmXs_5`a( znK$0SVw|%&)5n=#>erOxBG{`nnQz(Ln0W)ezE@MAb`js5Q+>CmJ8~gdFm}t_(VkeM zrwPOH^VjicQjDX>gyT%@ZS-8L>nKLa4d~D7XW2}BNZb$Z?2Nhlh=rf>`7&BMPvkSe z`dGG_gfsVB$m{8BIZfYb)7Xk|z;z>?vwiTVl0ljZy4yj+zv*sRRJC_hb) zwZtexC%Yb&KyUF$f6*I|dM>^>e<8Cz3I?2vKat6M044x4kOq>BY=#Hnr=&J@S8zlA zW1haCp$+M(s3sZQ!swxUlT~V7bu^p-vY~oheNrY7Pg9mH6Ud=JF$LC?%Ygh5!x;8HduJn zm06BaB(mF^YSMppxk3MW5TUu|wBZdhyLPa4cBg2Ga|qW2F4F`r^;|H>3YEZ&LvhM0 zvFX}w;=59kgrU~lZDVU5tDp@rkT))#67~4v8IIm-CnQB=NolZGA8z#MS1{pJ+?W;x z`|jf1hnVlybZ7tG+Z|+%?+8~Zee@-1ZGflX=1BTj>^gs?{PQQ-M52>hB=xlX1mey=hntN@j3T_t&_a12^j@r@I zCtjxw(W`FSR}3`jTP@|Lc6qM%q*R11f00sKI*y7R^Khz9h&!QHnvR`T{V!Za8L9`XKOF^tz`M%?$70Q}KDX-z6N zJg0-D+1^LTzT6-dGAo4So8$^e_>1yzD(B8k%H_#}Q_(>Z20SsKp!s>=|EX5~$7)1h;Ck_1126k3 zx2vviiMjnr;y_*T(P+>z7l*Avp@5xdndx}lgf=SL+ZVHuKL^7YC&yw;R%Vj*ToMz# zv2Q{v-yGX1cDyN86_kA-ZR=E|w9+yEJFeKy;iPN}c;D`AfW`r4XU?CkxXoJI@jhqE zTb8y4#*=RkZg}0ay68Hjn;;B$!;oNmW0DWus)z`vzg%f4h3ZJx=rKs+>d7G-2jeAY z=0j1L)S7~YlwJD_YLTrMV^zV>=t2F^zpEbqC-K-2Z`)!IY~Q7&4zKa>EbKG}o`wA_ z7TbjZ0}eLVy^L8`a3a9p4iauH(~kwreSMQVWohqYUP*A?XrAOBH$kEm@$R388AwY1 zZ>6^N*@eE>cE$KsD)5ZAHw_s<${lZ2!a38_Gu_3 zeC*>u?C&_xIgO1#^LzN zUqLecCu*C}KPs|@{R^Ltgfcv)gK`%34t!nCrw_RtPpC%s=9raTE9z;+G;-ZyRRhEy zTDz`BoP62!+d~b{kZJeQY7g?)(xog7Ph|8&;(M!D)xN=?k_JRJR z(e5~2VGpyZIuTx~#n21NOmQR@maQF)9;i{W&mGSJE6ELut`&klajviuWGdbp3aMgb zpj6{4cOFzB5~``XMNy*nuH@=BgOvV4bk##0x$jPKXYF#IGD1AbogMU*m>(Q+7YwBH z3wsiIKcIMi!>)M_*r^0isO*VQa12@(OoNnrPS2$?P1pGx=_AS}PF?co?n#WYZ!JmSio&x6?u=nfmX;Dhz z$?f-p8qp08rkHELRb}j6uQ?Gep|7tmwfBe?<3!I4l_c69saQ@WtWF`$?!m7t?=}jY z&$r59!Bn3*5`&e3#=;^Mea~80SWqhbZ7nQ1e*Io0B_(BLc{Yxx<+@|Hu2at|l(?ky zXWX;H64Hu;U%!4G9DKps=ekTEV0<|xqh#poL;5ptMdF#ngPBX`aXSF;LYZDTU2^i5`~L;WwFYYd literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-4-1.png b/man/figures/README-unnamed-chunk-4-1.png new file mode 100644 index 0000000000000000000000000000000000000000..53b1fbfe408619faba46daba70dfeadafd31b44a GIT binary patch literal 10453 zcmb7q2UJsO7wuIMUX_As_yPiG;T`lCG@eF&b3L%?)|9zl7*=PpTbU<1p@wR zS8b#KK3qD@0RWV`H~_d77DNTy{*6%<08W2G9RqY2DCvQKpleb@>->E&&XtJ}bD?B`W72|AAE75TbKozp*EDhxvSU-I_f^>6YP2m4N zdHxgtRCEU78<{U$xWLFbg6y;ZF)Vj~t?WJ!U_W|buEHC@EwkHBUTTD~w}-_HbWKn{kW98>@>DF5T{x4;!8UU_hE zkeA0#@KN)A=5}^2RSgWMJ{V4O^Iu6~_A8h*q(mmTr?`hnZk{DZS&sNoBOW^ z=EW2sIT+k|<$u_D-f1c)5oE!z!ko%6Ag8f+5n#~5q8!8#6YKzR`!ZeMKWEY#3d*#^ zMDGF1@!nNeGadk7*V!5R_C{QLe(+*SQ?VrO1AvzpX(H@4Fdi$6W8%5$#Jjgat zn(Cq!{%qoeGk=L5dZ96iK_QNFw5qg3*VQ<#0Cs1nvdQ=KoghS8NffSN-mLv70A9%^ z*l0Ch+@?hWN0QyBFgj|AUP#Keh-2U9*^_i0$bh33b|BNT34`7B0zc$`2U@=|dJGS* znYJU@2<$%V4#-Ym#waXiBCO~l^QSLmsirv!MJ6&lcXYDM19d6E`RS}zd{xe6aGC!EK!_x)Ij zz3H;o>XcgfF-o0U&pDlEyJw!cD}QF_+64>~%&n~J4e_I@IEhHuPqBoY+@hY|Z(5#R zBgsX~&5h3ifOC4oS`$?$Jz=d)1V5=?u`(VM=TcsJ^OT;KT%p~X9!ouT#0}L@7%qM{ zQX7%`J~JUz($H$We5JHLzfX{4h;ejiDzL)BY16^vj?@5We zx?spbz1{+w)h2SDob_A^opAyAO`#!lUYKB9%-xg2Lm>=}Dfgt~>*Xx(eII2zPJbO&_|f4w-VujmA5uDs{I@EY!zObsMOt&}S`GiLk8~J0&a= zGDE?4zcf=Tt)dE)gP8c?@_%*=x``_~_wV1=(RplUW-uW6Fr)4Te~r4__&c1lS7_$f)YMc|jMRxA_VkuF^g4V70OU=_*v%7kE2!Wga0$v);`1uw z&?96FW`yf-0;os##g<%QceV?zpJFI7HxM$t-YuJ%Rc+5tLO9AQdz(9@R|jWa-UPc^V&-G~ulM6^lM|ltm_94?` zba0=K*3NdIx0rtBn)(SKfUui6CA>ANdXl!w(ZnUM#?h;}6`xfAiF462p(x1kq$l^Q znpaH1yN3cM8=Km@qT#Qi25HKjgd$H1=TG)HwDJ2PvtJofbNN+k7$5kg=%~kD2Z5~o zRK#n|h$102PYuUsPZ?sbq>Rq!k^m&5nx^zPE{x1I6XsuY$O6e(No z@(@TAcIy~+`v`d{yWgFoRg`+ZOW6Yeg!E!%W;0h7>or&t{OlG`XR(|`Ebm)9RtBo~ zHRVUVSBj&zuO-TPEhfVr{2s@Iz96bPNqgh^wL{KC85nLYnrZdz(C4UP2w^97f`g@) zb2+8oZ7brlA{~sl&7p2f?ji}o<;x@TO4M9R&c@lpyz~%}eAHLf)29(FEn@?_ZOx@O zWW7SbF4n-Z-?GWP-IZJP;Tyy3k4F2zK%ymcr(ovw>W6Eb7mo;9viT?h--750VPJNH zlCo}AswNkh>-vpldR#ZHd+L_R@W~F@k3B8z85z43$HLoYlQiSW4A$iQfUNUmPKN1M z?kIE$M%cFnb(5kvixA#SLh2lHJ1?%sCr$#)t*H^QN7MNw>Qyp81Dkm2DptvdK% z)4y70&3nd%XXzbIi|ODbe0)bonghT&$y$P8%Hbz0)zLFe$XNHUGBascSd`e#c7`Ug z7}$vMZZbiuaj0g)SYEqak=8T(k7_J^kN`_;3O~rZ^VR1KX_(C<%$s5<5J^fCGTEk6 zCQr_vWU66M2#0xTwXQw&~KSes2TgTi}6OWPiYwDTB`B|jJ<91roB|GW7MJ9I;LcN`{Mids=hV$6c~ z#|(zUnQt6WP>5c)AcF<7uySU`pjkP8?nCD9MVMM$?x|iRZPfj3jKMT}>1lJBx~=dP zCb?>r_Um5h^kDJoApE2?-@}kU32%K{l?@Im>$my%eD_({)M)G;?2LY3V^$sA@H`p0 zxBTm&I`g(3C}Rpf4Pm#JtDu}y#psYqTa9tG>jrt%SFYLicP2tk?<5R64CL#EmH6(k zU)x<-S)rt18bJoirJb#FDN-PRp+=*wa7ucF*1EPlSL8UaXuRy^GRf`_nFAYysgpZ&T}tkiA#ipe;89irKRjc) zS>P*{1Ikl~ioDL38xd(SNm|2wqkeWl&;&n$S7b3*+6k|vB<4kE0{Mf z*w?r#QfEO~Dd5vrsBGT#EX zZ93%I?%?1ce#*DEF70^2jdxsxJLu8pQaGIHc8iGWZ@&r~K8KLL?7`u)M^~8aH z6S$mjVd0(7Dy4&qIa&$w2gaIUKg*YTq@(uO@E0Y)+_|>sQ~!t?&I%6S1hLTl?59&7 z6HF>{REc=bDrsY7Fo`cO#DDI1(t?Jj486#iB5l8o9D3Qhj_DV1AtZ$F+&}d(&FFBx zb6_KX5e+h!0Eu<%&PrZmaNCuv=g;)q`wJ!`kt|gMVqy@n`K8SAtvlTs)KC-FLD4%? zdI#j}HxL$M7qy?A$_7&}+=dyV^WL*4KP|>3=o~Mx0-ax59W|EJe7_g7om0|C-bl=D zh`2-Ar4WWs?r7pFZ)H8f=-}fk8t2{Kmyrk+84PYK-n= z-$6Exf^s@rJ53(8KZ3NCYWWmm^a~WRI!Ai-Pp86ErT$I%VvBH7=!EpbJ138KEQppW zU!s}mfjQaE|2XJbqeCv{CzB$)hw*qm-)OkGads^nf=ejSX7N@}^e3YBdwFVc zdV^uQa+fnaZbg5g1ia37m1#ryIkrdHxMlXj^09SsLu#2eNL-t|9fugtY?EtEok=s43FKoE-gOC2Xm+*r$z%1HsevcPe!O z;0q3gZ$wZW4|>Z%n&~?0zLF;9b~~)l>206iq2Hu4(AY71D2^E918spENL@|$E!r?)>NF^n?e5aZRpKnE=AJAg^yw%Y;vE#j4?@MP+nvwrchEu^n zNSna8i)!OqFmuy*vpBs(8Fi1a1vGUP*-ncuA-g{X>3c}~3)r*Fr)@q8R5w>!-opQf z;m{uFhD%IL6tU|5RY>`p)GrMc%|cjSM|U#72b;e1{xJ!XLj`88%$(3WZ|U&673n$cZ_&`{8d_(Mv`w{Z+9iW5WkirYo`>KEWBQU9NcaGK!(RMULCQrLiV8YmE{9J9+S5^du|zf%E-93 z1chp8Rjl?{8oagLgB|0beQVH_io<{!CZz=PQvUFQQ< zcbQOAwubAYrD^lb-QQRXjCB(z;*oLY|M2bGO(>MqPc;p2Ra^i|(cmGmeNnh8JxQ0-xs88Kowa@%@#>B6oE^C9;<{Hf&}4(DVQs)YCZ9f0(%2IgX0k?g zuF4xlli%wMu(|vXq4%fF*jl(^vi?h(^1)s(#Fz7+KlARYeXVZ|_4YeX&_XM?SGqmR zETTF+P>{KTM@sA9#KgqVy=nDZjdro@prjcy7wGmum+nb1C(%~S?wjNuZ|kipPW-K{ z_$vYG|Fl!6MVa6TODB5vX5N{U{8JUVkCm0q9H*~31{k~95xoxMLpN1^q+T?;iS27k zcv-Xip#=R)vU|dAu4H{W-x!AGoppKxdpOa-J9-Ro*8D=;Zqh#9W+~TKpQ-M&IYe^3v6BVVm8W`7B4*_$tYYLIZh$!|n`r8qBe|YZil>ZAL?{zo z%{IO~(0#e)en{x;G)eW8&3FeIq9nf92mD*JuIV6|^?3BHH-=tSn^tY@K6)<8cy+0s z_KdisuFmXkTI(}7(l;w;j$loNCgSzd zIm_p#C1x+n{QK6s&~bpQM+JZ5mh|@vZ(CDign1NN-{gW|WB{%Q4@~zPFi(yFj+;-k zGBAn@v@tsY6$4Jgo-nm$1ei(z6qICH7ZGuWAU*e4Mp@C4^CvyfQ2HY9ExpFyP=l(l&GWbl~#3W8*%UK~!t7JW8@Oi3m z*Wt)7S&G*~)FmG-jMEsb3W$imTGd%tQ8rrT%BzmA+g{}`G?N2SOmpB0C5U1kOO~Ut zoJqy1o6ySLz!I0~cWS;IQRnk06N~FcTy;U&f0y`{rEBNm6-|#F-O{qy?;dLRPJ#fb zr`Zr-08L6>w69(IUR7Pr^w4Q30~I`;GSP^sikbEV!~L6%!aZNmJz~1Zo-@uUAbNz5 z5ev*H?5l0-&xL9SMZaFvgJ>|NFregZ2>Ne1Q-u!Jku{B{Q{BORePr%9p4qf!&}Myt z?&t6i(m|Xyr|pq&H&_p^p6x)1TXBK;nK>bmU-L1Bs#r5}ZSR@GVL`mph*^@j{a&q1 zbje%&ZZaLo-F2^kDNqsa(bTU`6}D!bRmdIi$Bpa+uX0v-#)~5ZgQm-!%(S$kU|&_= zor2ne4;5exn!^76#AGQqkP`Azg}o$u5rFZ+?Z)h*HIB4Jpu=dWes}3#lP%0Y#uyc^ z$@y~YUU)>5^NW+c$?ty87iF+eWVJdM)R3VoY?rW&1wwmwE^efTuoy%uZvAT}qQz9x z(JVm$7D7TS8s!kr{k=-n5p-BC(fkXMYVM2gZz4k#UWl#M|qt)beys#1cK)qOQR^kM>?~C)}Og)|aZ}iji`xNXq z7PN>n+F)5ji)VTg;4++ox$nt5En)^f+XMUYb?)SbSy%ruRN3CT zc~mJ33BJtJBi-_u!~r(Le3K)REs3dSWP$v; zQ!sonrNNvW_*o^QOEgAtOFl85zK{lSWp?Q+4fmBZm3IHtny7v>Cd9=hOS*io8_u0L z5B7+5)a^!VaFORdJ)HDsX(wX;;HKEoV(alThgD339)0*7{FUQCL*y6IfzMjwk7#<^ z+24fX+^DEd%gd72MBVV66Cm%ZIB6K}F~4U2nGM8)3Nni8cgF~;_qk`*`ApiD&Du{P z67+4(D?m5LL-iI&k1}Y?WePo}k~yO*_M0D)L!|%3li!~}IDC+9LCqC%lakr8_Li^a zE5RGC3sAyL1|H7GJaf>C)iQoJP9?e)u^9GZcyQP&HP)gimVB9Y*#K`~XHtBIT`9PZl4o2T4BYr({T zL*&GL6HnXjfJMN)YLEr}~)OEjGtEg6d-?Kfp zrV;H73*i<;ui3yc$dbbr%u}*Q{&4?;<~2)ySzSfIeBr_`i*amtCD)M-TdTw z8ZKt#FqPFq_qX20mc5R2lHK~Tq#|%&8M)x#3UVY1se^el4zodj$KmFXOBS*3$0Jf) zdeNSBq7rcY#++?^W_!3InOsD;lYA|B;>~P!)oOLPJ+TS9S7oJY&Cqq5GVsD$vx;Wf zqc3OEo5&C|>^;HnwI18V;jEl!>awHpuCfUCuuy;DD8((izxMB!X#1^{niI0E4j$U! zXx)5lhvyPba~v#NlB8mpAPKv$BchY}bE>!gr+LfW;xaZLq~~6%L@F_pG`OzFk?PS~ zh&1iwkKchc{Y9owMfWS`|HN|||$=_NfB$iWmzbLkG zb0FaG^2eH(gFz~xo^gF0p5>QnEUOI!6n=F)AvV_Sx^8nT5)FC57Ws3cE@R!#(*6SS=6XWg8a z!V%S(+S==-5F>HRM^gj%sCQ!f%cSLoK#GC>{uRu2eP#mV-Pd4P5^kyDF{?5j+m7~k zLI-jmu&eoI_&L_<4%jk1i-Km$%+x2J3cRLLZBfyc`W(%{~2=Y)G+hm{XDN6Y|kwLZKUhQmd{S=H4 zjyPC0Aa32qu1&tIFX~wKo!j&!KnZU8tJ%V#Vs?{Rnh0@+NAJr8y{wf3^~au)KP;4P z^n`=x{Nud9mOnavy2L_bXYlN{-OLV*G?td_V5@2GJ&T!^c2KhC;`gFi-l-B-1&8&wL2FoMIgpoC0dZvBEY3nyl$tVttab1`b*+m zEX7eLEqsO`qVhJ@3he6z4EaNDN~l+6+KWgH9XSQB%_bn)lx3S|6>PSvrl9$s3e~C2 z9s98{zD?il51nh77@-@sU%zbrO z84};^bV=m5z1fxbTHn<;rRYT-b2-OQgf8ah=JN6Jt=jW3gDHb*1RdsgduCA_^tyNmkq+KI;XY&7Y7N;Y{61jq@y=zvG0d70){sa%%pHnWZ zJ<2_yNN`*cg5hTW4NMYQEhQy^@?Y>@w%++Ck0!l;$r^B)iVr}7Rz?6RHkNtx#r;#H z)0OIARf}q^p;CO6L3<_#@*lR`Uk?zG5Bv~zR=YYn3JYfWwtUu3k$F4%VIzEhDSKy| zhQxj3_r)(vKvrMC?-sM0@yeV5kEiscE*M^Kon;3j@=u47K=**>{4@ykIAc25#RW6U z`^|&|d$JM*3`fHLqX5V};7{{V=M6=9ho!Z((8F&Hb^iQ<*T&=m!S}*|!N%cm@84e} zNdLsY&-r6Uqlt9q_0OA|<=y5U&&)msT>G%r1v=%x(d_2GCgbER`u(xr#A1W#^K7qo z3jF?1$rFv^&%`UGz;9CePtyCBb64cBUA=mhS1b8j0oy}Q1#$u)zWS?HN)4vM z(RXxon46ocWCH?XC4|CatW+lr@qyAbH#yAV1Gyr z0Pkn%I4L#?2k$55(-A*03%Msl$&x}15TT5+sGDxN;A1(N))Q8SC%6kgpW2cE=)pq< zQ6lAPwZe}#ms{$YjnfqBDR64w)hFCG2jc>!A7C93ZyB1edjhFp)_oK|Zk8{~`IJ(sA-Y`Z_=PoI^AD&;I=_Z&R4FR|xvg2p;0Yz-skFu$@A zwLP!qDj!GO3+&Zz%9jOz6EFhbQEh$^fKN04*!#RqKs#cWG{Api1vq##QZNG8rvdEx z^$&-b4z|R@IX;_Yd4w=9Ho^4mV$TxRQnGZ893A|RlmEi{zZ+6?f{rvdH#f@G(u7zK z*>dHUtX}@ar~U9ov8g`nwVRVALDnear4&`oFSV$-O`xi7Ur5{yPf1mxtpyaW+1#}p z3e?w!Wh$dDHnikB4(xey?$18!ciaB)m;dn)7YD+SGyWUEiLcnSB)_o#Lee>^t*eFE z$mvQ$KY5@^hcxSVeYldh`#JAp(iqR`bs*yQUgJ2j^S`z8AMf_(-r|``@m96nHk&c- z2{(+FTQdHgsV)%;VcB85=W%wJ;7m{WuruzR!9L)J6Dw-hIz2OpR;A!oQc_K{vM$bq z+talGtI3FpMTFEOdgs+`b|b8LSC&*Ef^{@zNl4`+a1>$w`EPakd6ku7Q~B{gKwEK_ zobJh9)>zYsf=fzx0@)O}6FXV}xpE!Ni?sfpLm`rwPkjP_*D-B1uW$ZZvn+_K(BZt%h8tacq1Q{0-j z@Lw9qC()W^!rFhcu=sFYza~#0B3EU;NLoo_>uauoxX$&K*;T>qiRF)p@k@<_I29Nw zbWSy#F{WRs#cG>t?roxNkg_UzZCukHiNUnkvl6KL%Wmqz|eeau35$k%=TJupJ> zuh!{Rpq1ZMabM;&#fRPR(p|`Cgx7*=XPt&Hkx~A!TGC94C)azW5kFOYBF0a~i+K#E zxzaw%Jfrl8gwNROmfeH6us*L6RU4b@gtckK2RnSp3@_3kR==jye}ES7@r!5=EH;4a z2ZxZ_(Wfa&qn4i@QZ z&Hm(WpX#xdcu|bbBD^;k&W%LIN=M9^)Z@W7<`7}wjE1FEJ(#=7d^0OWXFwKfU59tq zWpBKtU-KWMZ^_{OhQ`{T(bOtROJj58Vs6;mOF_a}sN}jMBO|yo4U7ny)f{3FjE$VV z$rOl#Db6{(iHl-!N9n&&C?j_H7=W3 zc(t>^MJ;ymvCB=K_(rIvQ>s#!8`&)uW5Ax~9$p)?kGj3x^FeG;|1o!qMv|Xt-G1^~ z;Bg40O9aJAJUjV@XSPXc$o9Z$lwu?C=|dWGqL>Tc?1e}-t**Eir!b?+Q)7tpw@c{{ z@fr~C&oLd20>CrYyZSjXEY~vD=vW2Z%xwC#E^;u%Js>YbM+7iTaKYz0B2%(Dz8eSs z{T;K5B5A#XvS{E}NOs`dwo46|aZbqA5LEHwzAM%eoH-(_@=|4B z&>Hcf5f?2;m!~MRTh{5BYK*s?uWskgY?bz&S^=JCY~;M9_gJ_14Ek%e4jDRJpKI}h zPzRNybgmCOFTm>&HyK9oq{-6W1@!1tT0GiMg&WvNV^M#2|pq?$}4 z9o9zgs*R_oudiWXYTr1lK;55G>+tCmveAP*GB3uPU7fyFkUDyS_^>8r*h7*!rIP7Q zFqxaPcm1x6EBbAvwHe%e=4>*twAWEW6VN#omuql}nmuJPzDS888$*#^o~L4RoqAi4 zP|4bLLV_g14dvjT7uH)+r;u`Dg)X3NGVDvvTKH~O&Sl2?rdG|1f_ty;aR;I}geC|= zjk07TGvkd@36@l?fXTx^)WYSYek$%>ZpX6l6`HX$m5be4QkJoLxq$BPo zb|^Ai;%6n&!GI1C{a6E5f3BjK>lyU4AaF=OZ-^~uk>6zNd0ZhbTlH{SF$i$-1=m2* zcDI1D?#*6_Yqx6W&6D*MZb>8qId#!u4I-I`G=N&g)zPr@+pz~h7r^*Q9w0%CcIx>7 z2Q#j?n;o$)Bk<+;Mkh81TZ4Zj>)nwEwFCF6mG}HnVe5p$jb9D-vU}20WCFjuAP2a) z+_9Mlqh7CYh~d#eybHButj*OpV*BDI4~#3uOz_y$*jO(^M`lowDIk225FsG^F%H|j z`PQj3VW+%F`V_vH@sW7<@&peNPsAEyS|iVt1=2@S=gZj}bw2cC!3Ri_HbiP&tb?Yi z<1N~z=`FNPFlG2mGS&0~SR~6`*ry?)HN*B@NjnMSEUm42jM|5nBABD(OpgrKigT;# zl@^rOyG6`&^5Mb4b1}I-*=Lak%z+jD_;;S z4rpbhU0Z)QbZj>r~OJ)*As-_WB&mhT5}Plga5t;7KKGWzxDHCOf0py47*)@PtOdi)hc8{|0pCK zkt-&#qP`^;GuvsB{gRcuj=IfUlo`PWeoZN!v+b++Y6Y3w@`j|uL+Wu4^el`{L)_N1 zb~h`Off3p%%W6r}2>-#j`F|0P~ork72s9q(3_QmDvOUL89hj@n*AXr%lA zVZ2qi!1?a^&kCTm4MkO(oG-5Avu@Mcw6ZyQG!~q(5;p!h;hjoj_9}nE zLsmk-*i-lh(7!YWMr>qsVxxg#e_P>@d!(TD{$GF8-j`t~agX3?ZZ=YOGkvElcIhIm zPha^_cD!-m08p!}2M$;gk_IMz263-_U-V}Ceh`z&o<9bD7XUaJ&dOaQc)n$17g*c@ zcYo`dAO+(51$+ZM3YI?&9uUxe4$hE0`|J`gxC}Bne)2M^7KkuE$x8+AOxxfa{{YGb zZgF+kd)h>?)lyA%*{vIl(F7xiFa_5LN7Xp}27ZX$>=ngC*E{<+lf{gn%N0G(weqiv z=d+$R+7HG*_86RiS+nEw(7vR#c8-PVsAMRP$o0KaIXsU{R0Sh+OMF?mk@;v{Oa1;7 zDba{rohG5OKRlSxYj2^&njIHNh5CGWq8}dE^%^IvWE`zIDiv{848secUO_Eub?$T@ z;%n<&nu3aaY8itaYz|%TD19FkrC{KmvxXQ=m7KNfCTP4t}UqWk5Y(^(Q zLwYXuqrTL7gxC`+VZARQ;RDsTwF0KLoBgR%XCaCT(;?bJnpd;bma7u`)O@t{C{tGP zB@Or4XJLry?#GFXF1Qh2Ia1YjQLuB=;Dm48?&d5oJ<2Jbud5T24t;%ChE2pfx=D&m zzNM<=UEL-HPaKd6{nSsc;t;OuQvK$jGeyrX?9v)3*G)C^sO(uzj<--mjN}L79!Sai ze*;!_VvcK^ab6PJomkPZmDR;0D|M%sZjy&cL$03(TmA8^LuD57q&&G8XqKAoC&ggl zpT?5C3~#n8-K-+ar6T&`NTX$nJt08O*<#ZfTyp0=jr|poXWj(U%QL;$jZ)nhsY%!N zHwv;TnHK`HY1d7m3$LvTQsUKEgcr7$l#CS*WEdwsW;dEW$0mk_*%PvVl=urJTr zPBnOruRech^fdR9b+!obDp8w|cQJaQ-D6wf5+=sA(15+!OTQhy8RH)OG?P8{6GHJ> zuH5=S588+n)}JOwmkH~9h{UheOja;;Q$OQ0d{#d{A_XUPajbfpd`T`YF4aVtxbQE@ zNa*RYGT_d--xLZXfP32OxF6fP+INc^=#e$_eZ2{~xl;Wk_L;aTc%;kUxyC)^DFjWx z?S`c6+Xq;db-<(f(?LK?JP*b9MH@ik+6{t6KjTW)I$qG22d4o&f^wrdI-cjd3y(r> z-zz<~0*I$wj9CjC>zVhk!=>*96T->*2Z9klpS&NFVY>qKH=XcG%K#a;R8-b0?+8ei z<{!?2k_>E$iNiB^WsHI3$<>CNVD@qHvQ900 z&jUK6l3>N*M>R&m@^9>%`Cb@AOnoglR+n9Nv-z&`&dJaccRrJPYW9Tmg`p)GSzJ$> zY?ZeFkggcLP84lSgdZO&LcAqxB2!X?zgPER^<}fvZ!|lNdV8nXb7}wJ$8zoF4ylJA zU7hfhZGK$;JTQDM5P#AC8pfvCVViN4m3WHHfC`f~o!^lZWHZ91;AzJ~ujR>IqaXI} zej{@L#O!V`hnqA658zsT)(^qV4MHer^nj){nb?Zbw%P=rY~$Wd%8VBZoo6U1*53-mywE@)kOEq z?jwPY1xq8*78(8{!^d#Yplf(TT5@6VQw{Ga8`(_nuMr6ojYw%T&(B-7Stz?yzg~vL zy%%5ty**k{%9+kC1nXB3E`{-oSQ+A3xM${&g(hpA8cH8E%c}_8Vo(pT$ZBhp$8jh- zC%>_JoOD+>KIXx!A^K!=G8@W>*?TyCU4 zUrtjKnO3d~=@~y1>RKon?v7dW#Lz5%UhImtFEpGf49yaA21P|42}ob4VYDg5Gs(B0 zo6t(@@V!S{DQ8uuSnriEJCwUDm>GD#v(DtyHgi6>0v)7-)cjx+Mov;norlEl0SQ#6 z@Q%V(f+i{)n~3M)pm=Im6umockEB;SR;2ML7Og1(B5!rI>M*c3E~*#M4w$`SzM|Lj z<~dl$&WeK2g%QrR^7D{n)NWMms>8cIw6vbV^WDb|kS=-Ef33P=;^gq!T(`s-%Ookx zrthOP5#ZdZg|u?oV6QGv(p@V)#R*zS!e24~ZQF#sEr-~SW~Qc3WuRIR z6r)`t_dsbNFy@kQkx%QzroVP1b)?jy(z>;pxN%%XNJR#4GEjC?9DeU$`Rz_oep^rk zcs*`&2VEK#a5d}5I0{=IZBTHZ_lC+j9@#P(o_F=JxrD(pntZ^~!2d?A{io*jFVfmg z_~ufb0@Ub#HA?f;`VH}k#|{+)l{AALg|fqQM?8{z__wN*JId<0+{1z zjaIBrF?FRWCn1M`vD~`SrdrTRd+-nc9~`pm5xU;1njNzCiG0zdx&G&MzK9QRZWQl$ z<+nEUdLJZF7So3sl0QTrn~_a7iDO2ZH$9U!w$j*phz8XBwt_<5wh>mzvl2AedOkBzi& zhTjx>mq4ds-zjCEpNq$$5cmh){4o!}hsl07l|$csNrjFZZ#676vZz^&)x^i#H5cnf z${L<+vK-m5Pec4h6aHfi#X5U?iTMtrfC#jiF*q6^3(oyoqm;2NS=CJuADVzX@4^0DcdF9RJ_wQMX8jc?xalzJ2BtxO=!DplaG|S z^_Ek%s8W(ASCYkeXZ27w?rU01uH3YLrR~*ttq^+F_VHap?Odyzw!z6~WnbwZHV%)h zrr%QPk#0ayfk!7-jGc)x+vHNSN+|a#_r>x00slJ+2Lt39OsSzX3YUow=MIxX z>ErtN$nr~s*DE(#X%%1TYltjrIkjzc)_SAr(3|>cD#S6Yx(d-*pG^raA-P9MwHBl* wO=!WZ1MqmI!0G2F5P+XKhLT|djJ3c literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-6-1.png b/man/figures/README-unnamed-chunk-6-1.png new file mode 100644 index 0000000000000000000000000000000000000000..f3e014fa25966a0b5fc43cebae10365624dd3f39 GIT binary patch literal 7327 zcmcgx2~bmMw!SnfxInbEwFLngQB+X0*<@FuVpK#$i4q~Lh!~JX*$E^H2;Gf{B1_8_ zkX?iz3SkW@%_ah}?+FMJAcQ1H_U+w^^Xg64%$w&-)x2AkO64wp{&UWEzH`oZe?5D~ zMrn=88UO&45GRhF2Y~M~0YGkC@jLJgXW@hk__f;S#AROqP;P)ea?Rca*8yPLImFQ; z7lP6lW7xEd{&g%iby$BiYUJ*f6+dj0-?Z*LJ7d_j_Hna;#nb6Rb)7bI+Mc+8y=KI+ zEtiv0GM0W%bO^9Vu*08jcDS^6%Hqq(n?dsO8&=-CdV?Dx{qgfl$83EMMth1tfUBR5 zGn}M&;P*}G*O&J@n<07(0N{3Ef&~Da#eN3^Hhdoh{PO6H{NczI>cC&LSipMCdkS|I zSDOPzPmIfLxBiE>WHp7_iTDEKs31At!|eSHeRoQ>YuwqEnHW)`g*8sELRl9ZDGnH2 z{I$%c#oJG&4BqxUK6I$1N`wqTg zlYf7U`@9s6d~u1*pNtFiLXJ4n^t*UIq!lAxsTSA(8aE+=>dk>2ChlZe zD2nA2wjJ=D{?NhDLsxBoaoL&h7|1MeFL&fB?xY_XPfdXiQ__=@@UUq)!2QkDfPdYc zf4|dz9F))NLgTf{)8&BzC;+OpwWjmzis6T4L$yBKLC~jK5@J8(@ZNy|C=6)TK)azG zQ^sK(Hf`#f^?qR*mi_z>H12+Eq;8Y z!sUT;|9Bh!92?(ijA4K*i#HZX)x)u4Iv5;1rJ_!A;H*3%KEcAeHDo>i2OS4p$JYhE z*bhdcJ~wqBa}{_pY5C}2Jh2m9R>B^_eqr`&;}gSbYcgHtT%G5u(NNX zw$k5&F)*VT<%4$)(ehltpZRm8?n65gbZKiWZF`10y z{#W`l{Ky{UP{mD#aRCVy%{t(H?wKyF95;dq?=iQG7Igow^nCD?16dxHz5qS|;f3Ia70OHZx0=X(qZ`h)wr- z8yiUR6^#;cKTo4%o*j!w>irtYV-GT}gF{?l>4c@lb?_IM$P4h9ptxlMBHx8s|sMk)?Hpn@7e?6oXX?<(djDT}CI?k?JJ( zss_aVgvp1)72m%TM(bI9{(n|O@!!e9Nw4+&E)|G^ya%Pr$v zwP8sA=tGO%C$=e@FMK?QP*k(CBpaNzV3p2-i=IH&(vnH$PD-;ydS$0nRCS7EWtCs5 z1<4D-*-obSTFuC&txU`7Z74lq|2spBqNbCt2uU@j>kn8VNy;dYK9cvM)B<`J@-zI# zSTJ;;kMH-^GbGxT^>664^fDyy-o(6-yCK=DL)C%UR_AgW%RfUD66{$sGg zF0A=2iD7(0P+X6DQP!S$L^JY$Prcq1pU^guV?ZT_YN1{0*D1C#B=~V!_2>Gpg8f3t z#R}8K7@7sIWV!(r6}jH}L{!~m>RP5L>p9w@^u}OLT*mE|4|xiBX+&yO$p&JLqOUG{CU#J!pK0%KLdAH{enM)_lqQR=CDL-%#%72W_{ykt1vfya&a(=_& z$f1&A@avS2r6DNo{6qV_de)by5gt&b2Mc z--~4A0I#D|DFDZIB6wa_8;R;GaBss`zH;ka7`1feKDcc^r@sN%voebJqtMSIgbi?c35_AzHhzqj23? zNnRiuX6AfJNV9R^Qg6IZxD9v5x7UCy6XiZ4&nWthvR8Yy-nV|={?1`h50VhX(#DzG zYR{m0(RC!MpjdCTmY0jKo*AEB8fv4~ zx4G$w-N(BacST+lflA`*vyJ_B5^h%hRnbJVMBY8G?V;xcA84NP=PdS>Ktd3GYHZoVt zmbINZ#Qm*x%RX~@=57DIFCoVnXn8uN9buB2416)pVeSh%>qn$44Or+>|H`A!{zcyB&ihb?3(AGLeOOSF>a0f$cvTR=0G3 z^c3>M{eCgS453Fy!<62r36QW)(Ov>vm)7c(FUA>hLZd2zq%4w)}iw3FT&TN!ZeW@3eR- z+}CTXuY;3tKMVMHUnMQVu4Wicf9_f&WE=?lbocX0^fMjE-741gTX*mVml%^C>R7V> z#lVb1<-z&)V&%<9(HzwbN#^w!3oF05jN&iqe8Sqbb}6=y_pt?1|Mn-TWT&1Aaw;poW2H1)amp~qf^k?nF6`}_peG^x~WY>oImNAK3K`siTe8nW~&*k%jf9t)r-Kp}OE zP#vp$q6RGO?_2NgQ#3q4flnszaMP8Z(Y>E>9B{3t@t^3-IS>5c>4vEWyYwrpoz;JV zfMJXFmW(Owq&#<6PE~g{=8n@?YsuHYz$kURB|+#Q#^)ihU?A#jm4T2%gGlZG`Dlr% z=^Cb{@iJH+y*4=t10ExKJ~|xgY>bne+6Ap$+_;94J`ZFD7UpG@`-~fNe3;|g^2iPuEkN;;Y#08w>Ypm&A)sAJ3}*)f?6%1(F)jbs^<|1(R_^U zjn-_1L@x|<%#KP~wS=h8e{H_^rS)q?=J<@qfZJ*F0b1gtavc3M5QIx_<=?0xuC0Ut zU4@NnEE7oKdW<QaZMNz^5FA~+7c6B#i^`K3m&5~H6&Uj`W(?s%zJUNnNKz7lOsvu z`FIrd&L3}GJnF&&mzQxWuE$nB(M5c@N|Q`w#f64WCzMM_7V~0_j8f0`Eu#>O=fqd_ zTYm|&H0G6b{xB-@SP$mf`OY82Hy~=t-F1&BP@1b=&IlE2NB;V-6rq6$FmthcJqWNI zzWO3K0k$MWF7{I!!HMYl%W#FehY|yoLT`g>U+#Vsz`jbfI2#HJhAtxDi>pF4LgOWZ zK;Wa!Cgz3jt#g-wL8`q++=U2^R$DXoZF0J+-PfJOGO>T07bbWo4_re&Ia9X* z2@Zc%jvz${M@>LE1ND9P$qD&+!^+codLRmP9l*;3Ev3YFyeu7Zv{=t+SO;X?qzgUa z=q%BIFt-RN$kn6rt=p5tU+uc!!Rkv#x;vFm!IH(aJ+v|D1&{WouU^;O6MDA}b&qK2 z-#$x_PVDHc{dll?hF=@ zlt4dvE$mF?fq|SMh)b3{3Tl0)r);Sd&YSLhg40;K_QFAiEnJ~qoci`--aKk+zzY;- zG^N5oOFp%E9kFvv8RY$+Zr!5)ZY(21&oTnZ#5ua(9PEVxQ?}7*fp%VW|!^l1eRs{yp@2W3OJ=8Tu zjrY{D1V4ccg@&7?l+ouEBJ2!_N24t`EpeQWfqZ4}7y)0hytN7lNlv+P9bEonO)q<| zu>A;l4RxOXWgO17nA!<~Y^PEdKf2Bos?=lcSV19Aau% zP@fwMx%(^$+8OeK$%dbt?K4N~unsU=1w4~%=`+A1{oy;-uQM@vKK zFc)qgo^e9R6u$JetoC)83F0RC$|g5bLs`Z7?R9fGYVO@PAmsEJIK6WBe5g%cdUqa1&qm>*x+!V4@-Xbt-aVcfx(%~F2mYWc+uQQR_p8&*g0)NdPiYSja3N!Co;DsYio7?t6*)aP7|cR;Fv z-LP*x;uxAn_{vwq&VDNi0epz@Y=wqK>(u%$_-IEc3@p8?%7BQHl_bgQaAHT4<+l*e za{=Hm1AOj(WYNEoCCTV@d`K=QrFL#_pqC!J+A?lSBvXigO#c7UmcL=U|Kt`(8ge7GUwQ3!8VbQfQ+^yIOxKEddqHP=N#3i2Us_2TnLOR*by*PW8_qCR&|8gN(TWY6pQ z4JW79Tl@_G{sZ!8@1P`lzjG}g)S~I5UZ?>_LNKU&#%qDIY&=JomFygXp>YS{6sP6$ zE657>2!f%z(A-hhWl zRQ4mheE?5F%D?r%{K8o%di_qfN_chk8U+(zv)X-1xo za5#ME)zT$6yuktGX&5G4dK;mTY;j6G`*`fI|A3RtgCEavw+BD?@!&P#((GhYtPb{( zd6cqRb2Q%*+sz%xufdu*!R9 zc4v0Jy>;h<+Ebl}4I{rp;?V0j5tBtoPYFJ7QZNs21Hc=0Ox#fz7#h_B%H zTpmjr!k2e;k{XULUZ8dTxxDPNEi!uX;=>CmQ4tll^ur}*ZRKUMwLg}^V%aMLDRH5*feDQ;sxZv%dD=(J)U!lX7DhzBl`0_O{`^R7KmGSi(Quy+P z9B=|(ULcG3{dx3fL?i+D@&gE7eFfj-c z^79k1v9Zx`4KPCq)K7*$$OR$8!^3$>bODoSBM>8Y4IdvNRBr+zqMgmn@$s1A;$m&) zV6bK`2X@qkySw|xi=IL7_V)I^Fn-j3tMZ%7;f_vkhss3f(s^}zTW*WT zNS1&Si8cEv?R(OghXzOlgC%a3TjklFQ!Z)Pu&2wHL|YC#T7KFj@r*v(=7a*qDa=xl zBd|?=pi-W$CfEE>c}=-DDtcwd&putLA*Ubv*`)jY#%Dhx#AB$D<#oOhvTm|n2?WhJJCkM6rni|-K z8?6kH6JMrH!-jqBspc#5wN(4|NmoFLI&Lg1Q!h)!Zh2jnlSkz&)m@5oJJ0hnq8(J8 zBDV^ITI3_t1hp?U0Sv>~Zd;2-UH6PFru;@DYjLdwo^6Y(WK|nSmHD!#PE)MU*&u~H zDN{U@t2AF;J!hGkoz|pE!E>rwVr;j4NPn3l$74a}ma9(P^=6E7*AXe>F~8H0j5tFu z4P>PhCEu&vdOGB2Z)E$p)6NFgHXD0l@1NMmc0ZU84}*YxUpFtUZvGZ~2c9{u#nT5I zNPIC&nJ06@H3;uF-qI{eE(=hKFd&w?7){J1J!RH&$$nbM&GaU*8qMDE?MUH?p~&Fxj+eIz3a)&T-!6E-8p@qSP)`x-SOBq`U93`5YmP0S;Ht3t9h&tSZH8e2{0-V}jJ_xvwqmPcYP1 zU)e2kx&Ls#Z?M?!c*-Ggz}}$vVQ ze93g)=+EC%1WO)o*n;-&k@OKGh*(%Z^9b$CDf@ga)kbt)ukEG~Yj zDZ3c{=3pl;8wd82m@D#<^KQdEuTffzaz;*LHRE!=jyfGyb?Jj{d6wZrhz>QJjIndnI;gyCu@ik|b1F{XC{yL0pOL9H*sk5ud~RMj;7fH6m|Tz$g!Vz zc~wvM=FOt1(S-(h5gH;9m=~I|ODXeziC7lhElUUd5~il6l)0vrxtCk=Wy1MAZO-BK zloNy66TcG6MzT*k$)A?EY$kB838J*V4xw-g8nhfId3W0bJWahkvWCKZk-S;7Z5b5G{ska&2^g0}FO@x^~#Ho?fwwINO z`CM|i{W6%!)rl!V9B1e~+eMX-@61TMNqo&TUMGi~yvg`;7doCC zaR7fvNi_UuJby?gMDqz20t}5H<&o|mywp>UTkvmOR!G|P_Q59oJob6a@aeDe*~$tq z8Z|%v@V71;zB+Uv4DX%o->CkUM1-7Lx9Jmj323gJ@vLOkp8cSLInv@Zu-l-%Z{IIU zH`z@t>eMywZ&Wp-5q21#8&N}>PFIif%MJI#Z?%0MsadA=gr>E!CH?)QxU3hZOVweE za|j3s8X6i4o#jPBr$2 zx?nI^8dTx8R`^%wA<=p3)xOZm{^%W7kY-fKE!b!_@ZC#O0X)4ETYyWK)UyEywA*-#m~Ex*+fj z^-yN-1>&NQ^(y0BCndagcrQgqh7K0c>fE*{_mi=5EI#ZBG($GFvMK`uq=N?A`C3O- z4=&Zx`G2=J=!-8Mrx><0ObOdND3Kr)elH3FMsAa>lyL8KhLWfaGA;8(rpz+9>$1Nc z8y%!~dC<`WTxx-{;Kj-v`s|m4gTFW5drgX%_?E-zU&ZqVO7nqI(2f}0)T$s$Q$49m zPP|wunNC~~KX z5cVPDy>OC%Fwv>X62$Z`88jdwf%}!!PTl20m#agiW`3sYgWxuZZl!No#{Jss)8!-7 z*QvICtJhae0Flh7c$qzqH=fVi{-|_5HzWcjeNZO60St{&mws9ro=msZsSSI1dc>{W zXMwhR(pT3>6JIi?LjK@$6XSX*asOG7c;vbRU&rT-y33KAP0OZ=FuF1d`C~yYZlu7B z*J4N0L^zSTZ&Zc@pxgB#rFG8qxN)`y9TkPWs+L>%x0$(jF%+orW&0|-t&|}s3e{8T zCiK<7NbSV?Yu{9rFBe$6@rvlwzI86cIj$=Z(`)&w8mz<-0H-J~HtpVYj=5!}*YlUy zLy!dmI~%9ILq&1Wx++lzKVQT6OvpPMV6dM)n__7T`)vyQAP04L#$3zoO+Skm2en*? zZ=`C4Zc1}nvNJ}QR&!>s)L<^H*g@rL&(vIhM@@U8EweLFqBZMbWuhPblE1O?Gn&om zbdUH?ypxbup><}rn3LaLb>p!%-(j5YO}CMA{DOLy_886P*ER;oX}VjS1o?X)W3!!K zPgPnmwSRQA2>DGRd_SCwT1ye&)9PhC)B~I$-2#Wv_EBP4r$ymXYqzF?Z#ZP3E6Y<8 z->ZL#@WvOV*t*(38~a&C(lj`)7icdNdqte+F8fXBggO8q&4#GwzbfDTB_k*cfY)Wq zQ4=E}9)N2uRQt|m!$bEeK0Zj^?(>N7Czs_z%V+g5?Dw2RLc_%y-xOs6r}%&GEX@n- zWS5PU=*r9Dx-B32gsH1n=Bw{1DQF9!g%`1OnmpdkUq9Ji8079PYoo9qAL-R>>15b< z*r51aq1!W-gb7C>r%-UEF8^fQn)dxUfz}m$Yjy@hC~EwK$>I6FZ`Stc>O$ju`&ux& zs${BeEHOl?{ON4Nl_VgRrd_H>?}z}_y3;r2#z~VAjh18A{+(iXvpgYHc) znzN>?AdhPRN8BX|xy{IgR^#TVw!nxh^4w@{&+al&Uz4SaMS=(N^cSk)k-joIJ%9D2 z&y36fKsJO0E!gnOm+xt5TC*hNgdlx<6EibO1po&JN3jYLqz>c=NRbua3lggTAM2Ls zV{c_V22e^`+Vic5*wfk6I$TD*0KfU4kX8R&jr=QOE~IdIiWQ}cRkjgy>+Q;T5R%!^ z;ViPF7o7=qVir~l0+xBoO>|D1AB1>Ab`Qf7Ak)DyRK-10cEq%Zz@1z=DF8M-Hd4Nl z#w>|Ge(#n84w4vL&0)Mpd@Y?H8w5rq7s`s>;6WvM_xjbh54*R20Ri+Mu*ERKkPyXU zzyOu!pPHmUH+Yz1Bzl9~#C=3SJ)4L4m~QdIA1_IU9(q!mB^H_O=nPQ1Gft89U(w@=Ov ze$^lxEv%OX`ki^MgfVZi}~92q|z!M1Lp6m93q z5h2f<4ad1tSZqOcQkX*#tbd6JnV<7)Sp`k)!)1!JFmJ0wQibqEx+6{8+GU|lk@ZU% z=`=dAvtkXQ`qEkJqYa(0`mLhBDy6gJQo$(sZtwZZJm(BNMq7Uz>WX+5JT1L?Jj*&n zG22rrbnhG0B^`~tD{oIweTa^bF_spvQT_2ux`C8Z*3I?FWJPniuU0c7QK!Y-bK0D= zN?1gEY8(?Ni{nON{2W0i5lAWD+v$0|y_U)R8?v#Jb$d6YCx1#YUD<7Eq8Qats=%doprQmRb%*;o1%2MOf6q&qN}O?m9G**1 z#*LedG2k|128-Kk4+Hmlf2MQ}{pvCvmeF={s4m_}u@4FRuAz8N8_?dphkr?ChHast zr3#6slNxxHCHJmaY$XW2#^3@V?GMh9ewXi7&HLp+DlW7zvt7!AfJB>@%d9ukNF4d? z7Wjb%8P=xoNKWo0i4#l;;!ow^Q6~)4T<8V$9AEF?niYCIb-r^nAlVk}l$G{y^tA2@ z*fLaKx~re>Ur%(k+Q%Y3zg;iG9ciibyg1PPWRjUF=r!{eHr_O63#AfeDIwr?T-x6G zNQ%O$yowWTyWB&BPOJ!x_rFnletpxt-McJ*L(Mg2{IGVSzl{|2ZPDVOnOe6;Aug7H zmX_18;`c{Z_JrF;cSLd$_%TwU>jj1!#J`g(55Vu6|Lwb-O=zypENocg1xCyF@;+Li z-C4<9SU|#9*QzI;ZWn)w3%11<44V51mviKz1z9N^f(@FbsTY~f%5t?}-4ft{@=9R} zKM&!%jtw@iXtYc48GoybfIaCwtg5BJYdE{$`CGzNJ3a1$*pPxMAmZ9E>~;4>Bzckm z5V(-ScB?Df1=gnq6;Hfc?k{U?)FX65C-^*s0RjdyQ?@MnMzzLW4DDlby%VZ!kIVe# zPjm@&^h({S+&OVHj7lH6&ivTdCm+HSRDZ`rco2i(b3x}_ob3M6kfs2q|3bkW`lJ+A zr$A8jEmX0(di7Ky_b^dMczW&DZ~py`7={|;cJru@Su|L|jsbm z@BL3!DhyT+YWTN5hgO2r<9tZwLGF~j(I`c69t-tZ`@NvWrpW^c2Ev2l#lvnmij|e% zsHFx#pF`qA#_8-d0&Ml=VdvLJ0@$vcHj9hyrSu3oV{=4`@~i1VbaCs)`TX@}Hk9}2 zC##CTXj4G<6B~T0rWZ<_TVP>jDl1g9#!TW(N)s1M3+%z2<}k2D{U;V#BMS=pn}^~P zfo~s=&efyrL)o^Vp>E>_eV5M829%_dzK=LDaWSDp8k*S4_CGKe7Z6v3L&qRT-LJ)C z_pdH@Cvv9>6@2eo)GKwbuC5kb!)cEXq57luiCC|m*yMQI*L+VSxiS`~>y-w6Vx#Z>JutyPgDpN}YAZUUrH$~@Y$8b!9{)Fg!4g8LesGTb|!N=+l7 zV>?OV;4lgP0$ZNzlZ8l>vG3lHE{h}|{&>Pc5dgg7)!x?FLfV9FRiB$7ul8XBvZ>xX zx9d>#qwHHbNX+;wT-1DIqBV-i+EmIo8VB*U18*R*nF?qimv(mFrPi+!a5YXzmj(E6 z#LqO3$=4v1e{JLxM1i=@UHVNH83sM+v2%+4?u*))O}G>hLu(eEj)=fo&$oJ8s|Pl~Ctq zDOwjRTClQ*-s|Xa@`$00^V@i2fgt@YO6-(JH{1Ss0)46D=gjn}{;!j3y|(;H{xpy# zZRVha8b^nV9vo{DhDBkYOThlDr|&hN3cbJvSfaSxK_KZ})4Sm7AfgjuAsU=X<=TWj`}FkN#|rN0yT~tVCUpa7}}x+t~o?~ zwOqDdm~Zj8)zDMSufTe1b+Y2Rxu4#G`n&=b%VRrm&HIRMPJLJMsQW;Y0kI<<8ybR_ z2$zb;f!L>|o;M_Rn(mxAh3zlsCYeW$h3ckM{27o5ah~J#=pY!tgokULx|N2l`N(iG zMjZ(oE#fKDi?`%=sR{Yc^p1{>mt@2J)KTAB6}eAM9^X#0e?laW3N7?yX&g>2qTO0E zF)H7qz>Xp0?KuD5m7~8l$6|wGW;Ae9xJnmH;b@>1nc5%>*>zy<`!%wRpdcr2crq%v z4{@l?|Mie;{1Oy|Lcs2H=cj(tH-#J&{h739Rj_k9i7e)s`qJ={-jZ46F1Lt#YP0tR|N@Ow01ufa$xyOg*$SY&A5VhrG~3t}6ar)%Eq|ihTZ~j3TFE8)Dcr+GXp|%-LqqQ5u@IH!Ys}so9jT-HvAO z^uDJ%qL^0%N~&GSe%mvu>%@o%VFpCHS-ac@o=ZrPaN1hiT*vnK-(@AN)05`g=ytvf zG#XHEu;z1ONU+?Q$kFQ5y)4emnAs&1Fnpsc=SzRWmmBx0l4b$8muFQZ6{%T7gb|hl z#dgb>`iWMWDZCV2po|d~2Au)w7#bIy`Nom_5w(N3|B43vpD`5wxe`-oEwpdej*-k; zgv1B+ZA^^g1?gji8R)@vCm(2H7B9FW(p96m1GxE^4;fHOO4OsjgW{Gok1}(ysMqBm9rAx=oYIC8nG{@(L-vy}c2|-ef=!zkSgIESL=T z_e(y$?c)4Db4$|Q`n^ zqERb^{;uB|pGndX7%IsW@(*$;D$xrve4<EWuzE(h$OZjA5`}2HgtJIrb)wH{)3tN3kKr4Ca%g*MU=QB%TU35h9fOlzQ z^Zfako%4Ssp?3U+zgvqEO+~K`Z@a#jc~d%vYRf+TT#s2ch)UYwqnP_`41PM@9}k>IJ-8`}iWe3)LOMOO);;22XlU_Xp?hCy`Nn?g++ z&|q%fzk9s@!Y>QrL%bxp+#kw3tctb|nKt(` zNe#U7U_10M2~GKxRSBCh7xSQeev*?_W+{iw(U|ny>iD>zbd<2h4U%5wg^?9c+8znV z{+5L8bk?5DgpO1b=LRc~?UA9k=2>w}_O0!J*w?2*KV`8gstE?WSTMHYv9%9vHA*PR zJK{~?_{Eg;*V~fuv_4+jp4+}@6rR|CYA~Vrc%aaH+wmd2BpRH5XI0! zg}ll4*ZqzP*_mGbQMS7uRDRBkj~9;C8vN>0*`^S^n<1SQu+!$Qpk*dH$%B=ccW{-tdwn7~Kvt;n~>pKw z$khx1f1UX$crZQ>yQ_D~f2Ypm>c<|x98ge=B<#k?ZLK7r;91P}KsClcB(uSXY3{g# z(?bK9To6+_hg3QP*Q`LlsGS~ebGDk^gIcTcT;yHXC_mN-6&CBw$B05hXHxhB2TErQ zw+~6hpfLody%M^_9p-I|W2$kiMP`{K4Y$)9*Y655#BUEC?`V*HG45dY6IK0`=LZMm zqF2|%P>Y8WERgFp?$m`z#I5DY8Ex8jdXbQ&O{-qCGMoKTi@4rN0|!EyPprCQEknl^ zyu~o@IHxDgWQ8vXRYNKVVrIR6@0g)kSGR*J)Z~+EvDPd+shI?OyzD`Kraq*sD@x;5dCU0YDTd;#}* z^i9h7K8iQy!1~RIIJx~Lh+K9&Omo46M=L} zY39B^7CFd6dcC=t`Z0Bl85b}P;BYu zYnf#u0c%NPt2r+(%{Y6!2NSDUB$#Y*X(s`($I*J>lkLRXNm53TI^LFm0RC+quuE~v zIQNs=L*g6SQiYD`UrnO)9nM1<{DgJ2vLWs!N>)wDV5;u3+Rk;vcNoBs;jvr#xXr>m ztdIg3bbP52Pgdu>$^6TMIp2Gal{R-caWmaI*2+_0^VOiMYy7IWgzU$b!@F+)@9(0M ze3c7YX=1{kH>IrUzTgMxzbFb2W9CM<>!zbR?tQl}m__tmXZ5HP%_ zli}uU^B7wW(>!jguZ-plY&PJFe^>|fjRq&IBRRLAS-?KDyV?y&nZr)z<%G7ektn7h zAI(I(w?1H>p3YZod!rj`X&m^shVVs_RWL>s{Vol3kwU2i}#Cj zG&D30&Dyp038Hz&TJDma(BHT@N<>(pqJO#x;P~0s6;znT-CGX4_3quQ5%6w7F!-h~ z8Fh-5i9ciR%OGT#gAlPeQVO2@36T2iXF7ZNV59w-&sQe9-Q?~3Y1(0_Ytn01Oa-8U zjk$==>HKFmd3@T<+UgA7_rM`mJO_u7Z)OhWiS!ZO>uq#T!~4Fg@@F}xXoBt?C1rzS zH>5@TE#>*_DXIw3$sN8}`$osexX7O%m6bg%;ue6+$G_d-qvyNTnm)vH1a;KzT-b5m zy>B$#+OFnEOV^n48?63n10>%%AD_XqMA6YEN|;Rr1E>&zJ+d0;+MS#}C-W|7M5q_o z0oLfkEJJzPLU>6-^&Mv=g@uJr{+xi5(Z4rnN1`Ov?d@%9Wa;bmBR?JP!&U_KM7R`n zQ3O)GU;ES3m$n2^sK>t6{hpPjaCp^y zy0(19i1qfOf4=asx^FTutb0y>KLQu4>Jv#F)+6+YQb@k!cIA3lI_|ghv{1Es&trIt zLJ$J?8A`xNkQla3hgupO zPp~&89K&LEnC?2O!jbFBmOZ!OioaDJNdEBi_>o0WqJfhEP+zVDBoFv5c5qurs^Ioa zuWF-MUo)|#IQmv>`!2un!jurl4S_|RPEVZFN4r)F4*?cCEhr5ML0`iPvWY?GaoZYC zXP!YF8d2q>hvX?bF4iH3CgOT4yqBh4cSz|(lqScXYdOjjn+kS;Ej2stjApdy3^xU- zYB?Rx_ltC2#4D!I-FA^onOgatco)PInCpEHOrYLS7Nf>)ls-z$i9pW^iz8Zdo;g@sW)xM!G4xZ%<*YS0+S_ct+&=*~JZLxq8C~$< z19bXlzC5Rlpun+3`mcI@ojV&VeH#cCS%t2#Xs&N!e5SFr{c_Bu#fF9l!7F=RaoyTVu7oTiJZlu=2sl)#`d=j1GHe z$qGCa4w+VZb@$fw%sT0C3D0LCvI9Vsny#{T)SvF%N>biJjEUu@RXc2Axw24BI#sZu z&(sT*DxIi{Q6sbJx?|n<7s;34S@UXLk$;g>*r&IYZO_Z;J44((W<5Av+Gj{@g-oDc<_J|h=(BESwnrt7 zRv$;l&tGQ@e#*tyVUci5>v#jV#P-wn)x2%3N2L4&aA-6hmnlhs-KSkiOjAG|(Y+a7V< zKF-u6jSWd1)5cmAZmC=(#Z)h-Gh@?VoE&xXMj$1RJkEJe5v8DeY-!T$f7p~zVDENb zIz;ioQ)k4*!^VCnV7cuxMHeEPajAW_=J35bBJ{GcVNMV)3j8&d36)`Vkw%(obbJI^ zcKZECRMVV}Lri)~kG5?LOM{nJLp}Qjy>U>k2*{`5_c1tjz$jlQt-Chv{fZHCS*cnz zd$y0AnUz&~TpTF>4JQch+YN4=DX}ySc2Ef^B!*{{ETn>;eQmeM<5QW6qDR3zQ9D~( z#Si65u}@EO7Jk*8pSIg&3L z>cAkU(eRgAa4KX;8aZFGz0RsCNy}L4o{&`6+dsNJHu1=92FN+>I=Jaisp+JLR|$yI zw+J!-u-||2)shJ(v+_8+$tywCEXK2F(dtw({i6oN>9Bpg)pQub4XnIe^Vx_a_GM#k zS)yLw*E^N&e_rnL?5{zFZ5i|H)_>o` zstgJG&cN*ya)7Ts4DCXUy7JdLipmQpuOB10SaK3hs?mn4}@hU@8Am6HxB(D08) zoW9?~z=PA*bi`w){9WOP$TpTi6ZjCSOVB{9O7NW{a$PRreacBJF}DOo$k!m$4M zq}Xl>#kkgJxE^2d@i3)D(e>Dwd(YC^koR2my`S3+coRYXR0><~Wp)xB6GFxNBUb9 zVj@Bwp1tY>1B3ZZT!fy~4~`oRO!Hn8e0MIfbry~u!IgxUU|w~!jKl`Lc5@4EEEGsf z=_Pb&&lzyG)xS47EQ;vuJ z;8xJSpD1}>NKA}nf&X85+ZPGwsR14a`N`Vs@q|p{kq&_2JdZfFneYxurK{lODtzA$ z*|=F9DAZ=yC9w{Jvr;2rBiKII)6EeG9Es7EdZGUNGq=|>Jq!xnA#x}X1&iJ*| zdiZ3cG})Ty@gN?h*yetwnY467)2lwdAypIeJvB4A!JVFB$;b1ozaHnLzUwYGJO&=b z6P@4BJ7PGLGRdDGV-ucM4B^wJqLmZyexnuA4TtA>>%Nx2INNcn{bQ1i@b*of2NpKG zO{}Q$a+gP=R~iPfY!#45nW>7GhWvbq(f5c&!4wX5AUss~~j3{h0VSwHt7 z{wb5!C+I1^a~Gn?43jfELIw;`br^*MFzDT?JbrO?4Gi5aCivqN`GZC8?u}CF+fiwT zq{kQm=sVpX5pmp{A_wQ<`IyGTJ&Lm6k{Y*Ca<85>8#mW>5Dp$+F1*8mH`zqJNGr{* zu@Jv24IJV~ivd-vQfn377TR7Cb6jgw`F3SzmGA=*Pn%#Yy=vMHjFL`IO7z!rP)xlQ z>a8#xZF-zzjBlx#6~9dF(WUvxi#!S2_yY-5ea;{{dF1~+mD@)~#7zuiyzAKI4AjTpfRv@7A$~%{B-@Y|UG{a* zpVO_`8SIz|6etg;$bbx6mpiJk2*zJ!CeMHQb?L0hv2VSmH4h4exs zL`T(|KWTaUel$${2qfBeb_>m|R#b9nzs z?#7MS`P~fH-KB!gT9!L)8~ty@`{|+8cj0pWO*#1=&PUQJmlDHb5SI!v!U#zWr3hM1xQSjtmsS>wS^L>86ZOAf+w8rSVOBwB+A6HHC zZ>07&9I5R*-lJbXL9w`D7Irxrz3ev@qz`9oIg(c_fxe1yHVN?m(PAyx9r@Ok#hOG} zZ+PeIfW=*8@zwO|vfNN2Q>i*j+nJ%heoRJ2`B55DbNuQT8WIqfoRw`Dxr+7PSs~kU zSA*U)x&xC?CK3*PzY+UCSljehe^^@+Q&VN3Z+M}i?+3_^QIx|>+k|tL zgOKwLEtUS6Cs+g=$DNvDcni1XY_KRsWk1x|4#OsEJ-_5PU0S2m6JupS;OTzL!Tt2# zf!pWyd2tq6el1#t@7wSK3|<>z+va-jrZvLbr$#(Awpev$tHl+bu02uq7vn<7@EIPT zj#*l&;^4{bH#s|^IcaroA4b@$llBI+m@0G?4Lx4#s(`i%#*&$F)HfK39)r`>+W zl;71pr_JkA+w9HS4`1jG{2b8knLD&9k6x9Nm7VsjLMUD8?%wpAdLJ6_%S1F)Bl*1C zQe{G&9vgnP*%xhpMe}`NR4-~VO#grwIH>m_00Z(tGCEEbzr0*>7=rOXWDzp(l;06&94(WFP|z%gMr220h_ z>GP;gxOmKSD8QC-JuYbTT%sq@inPDp8 zXADZpGV#TA4(_ol0^YQPf}t~H%Mc0(7~E<2ZFH-!r1IMk|1}M_jzdXSD_zic>o~=5 z@l1;jYgmTjAIkRpLp>NVMI-DsinHVdi3pQdwN^Y@*e8*pOd5A|@@}2?X8893$IhbR zzX7-$GXwF({xOUGO$i6?$$0`EN*8ot-|!UlDDMZaG>>n#{Lz2|WaT8ayBV&#zuV*5 z4+D%jWJkd0JyLx2W(x}pP+?Ze`|qiKva)jcZ9`EG0Nwhv)?7nmoyg=>8Yg^wT&(&M z2LCL&Tp{I}dH3?P=;#NfkIIt)H*=r2_7e!&LQ_179GYf!EhNu8B`AfbVM`qbyiGmI zctmgXeo!J&P3CM#NFpO)=>1sT2ZiitkLe`eoS3iizBoHLFC5UmALQCEq!7wTj@3vSU3t%Cz9j|SAxXZy4^2fS+n%=nS(N{4FXPbB#wybhJZqxLQuwzwneXNx zz&_EiXQue8zVuz7aM#7rvLFd60RwS7C^Yrf1@Br9w`tbQK#SI9aAxFZA0ljq1b;aJ z5d1!sf0mWyA(gdix+}mScz@;ye>tKk*ui!R<2sGMHuOhCO&o@ll2;)X2 zl$&)Wakf&}A52#|W*$~Ar@YlSL(5898Z}5Ur>DYxHwSGMhUwRS2kDEGGi=|L551qC zw%V-~GH9Vm)6mEkQr@zwaAu=gKOZ5gj9eBhjZey@82qQ4Z64HU^mxW-+!w2*@)M5b z$HUvs5CUDCkM2@-mQgD$)UMm><{es1E~HH2uoa%(jM2DSd?|}_HcN}SRn8B8o2_QM z;azL^`1qUK+lkH+A-!-E9?tzwVhs)t%hD$R0Y~G1hzP~zTS@QU-dzQAYvD543JW*J$A?FkERM<#3NP$Yl zj0aJyC>svVNP#(U#fAuHX!Dh%K!5;@tg$}(^q{EMuU?8^Ts*ua$Hu`3qkvnB0XdQY z?2_j%nJ(U||EHi@`HBBuq1qxn_VcZb02b+*UC$^f9Q2*AZ|l*6?j+YKdP4(Ww+nzoT`4L-GMPMj~s+?t$wG%Doo zSHUcK&GqJ|g;R3=U|boH+G`1c z|7v4(6{4i!oB}Hf3**1L92MGr<}c`Y7k8lj2+nnB(OJo%z)o@Zz8#M_u-VxoigkCV zND?V^Wj;2Ofw8j$c@&Y!ZLNHsAAm^*W3km9u(!VAe5ZOXZHA1)ak+!LTi^m`Z21qw zi;)7qQ`}B3eI@WD-L_**-x#+ZsBrc!WxFp3GywF(jq3|`DJ67%q&KVIUxWDJMvNrT zK$dbFxzy|L+j$AGSuJ5xuP_y&)XjJ-MxISP)eWwQYtKeH>;)4Aes(^8nm4{rv(E4( zO`)3Z{E3B-fLc`d)K}eAI^Y}s9DvoDrKdl zac`_VYU)e%*A#f#^q`e=x&e2n{ONsTHy#xkJL@gsql~BY?jOXY-%}>qL_F>CM@ES} zzuN+fPF4&kkE!DOZYqAklKFkEv+-#1meIMrqt4yj*3~>)s^}a}iNeYg!~da&Nu^H> z9Dm%z(TEggqPk$UtzeFG!1-H~;NahEpLvRc*10v@b{-$dpgTHQ8yw|d%p@G)dN~(t zEr6StO!se`v7th*LWOOzi?ME&$i_}9bYXZ`+%KLECX|dS;AUxlo|8Jd_ITGIird(> zu~|xd!3)z5KVNboidHy(*!zf-;_h*EqDsaW(93jI{WA-Oekkm?WO7}LWjUehMxeQU z7JqHNjTR;T4d&J({>zcTm&Yr)`CIO4!-7Y}=9RQbdiwNmv&qztew9}V=qjKX0(BOl zqH*WJfC4pOgyA9l*}#!?3`tpQAtEXuIz7GCtAXb0qK1Z70XJ$)Z=EY+o;TOh^rD4! z#l3II128D2#)eZ!waQiH#1$m4CjjwDC1770KbLsW0PJw#wA=l#vui)~jLkpw30Y14 zy5#c-9+R*tgmopl5GkaO2*m6j5KzZpzn-j?8i>R|Abol>tJ8M+1M^ajH^lZ*;cJ$q z&C=29H{S15KCrJ8V$bvN?IvVO&r{tDU&(tQq1jCPj#bW(z;Q{(P3?~BJYFFeU^iRY zjP1nd=zx=4g*};`VdT%ZY;T(+Vz|#t z{}IE*TP#Hb#`Hrji+#5Unt@~Zf>0$B`q%_6ki%rmdj+&npKY5b!8nrc1X=II6X{@}txfx1g zfg`zweNhSYs*^41w+W}5t)#KZs#VTKl2o0N@w3G32fMKiiPWabRPX8FSZ+>Tqd@n4 zS^&}| zNE5ScdHJtTjP4PQ3AVUUc5xU%6Cup`P_+CY2Mp<37l}$Pt>r7dbj$kM_P^=eXd4qn`>r;znR?3OoSvW&iObYuNynK zKWnSU4IjV!`BS9U{!w(au^4I&ZVZ$`;60#pSGozA_3sU+b0^$3)P9J;4}#N8XoYne zG&kBP`q~|zK4fdJvY}uh)>Y=WAd8s@uMn}jh<}c~@1))N$d%^=!U*nyaA5z<=Aw41 zHAFREMe7NMwIm$Ebc3Y>O$D%@43?XEG$^Cra&zEN?U}t{CzXE0o$hl3yieK~%lXgr zEdrC1@89%opIZ^dO|EsR!4hqmwHZ~mSKg2pAT!^Q60com$0e8s--x$-fV2$rLAKnGqlEiz|RHQ=xI92jNh!lU^ zfXh^I>Hk4*OUHyQ<^0u9E9gEMEevE=?_?yEk*IXGTxBWe@W#v142_M=!LitXOnR9; zI$Z|;quP`S_*FSlHh15qaC1aG@*0sm&#R*(^17oy!j{SE<~oR;0zNb9W~A1CRIcNE zB0|ImTI0z~O1eIX4&7Y#ZhsP+in1ot7bIUdXc&P^`KW7;3p*ByVljO% z`*jG97O(TDARcbb2N=OvtQQ>)uRNRcOUJ&ZvU!X9CO>{1+#wkr8JY2ArF5OZy44ff zK4GL!!R|m`S79yw3O|t+m}TSN=mbzGQTDl_wJBR#++4EB70tLTXA_4FhiV8u#?R#C zKU&yf0z(Yfwr%{gq~s~TCl`Ct76lKEBqE&~Ccf#0%V)Zw9%EZPl+IZ%pJ^B2f@7nC zj)%du(%8H2JX|ib+LTyRIe%$K6&JswVfy|w13}snlSof&&|T}iVjQ02kA)am>bh&v+IdeD zAR=b5KL0tBPRS&omGzkn02mi3S_+rh(RN73 z>Y%LBR&mYq2PcPQ`P}~)t*u0caetURhRSU7^RT-ok!*pNG_mA`WB?Zr4&Mu_9Db~s zD!8z!Eypk?>hXH1Dv`aPt8jPh%VWUPTMJ|o)pPH4y)3#^555zB@424SrV)%Q&PN8p zEec*&uY12ynMsYS!#1YimMN-MSJA)8G(DNjTTY0&oTTm6mA$SbJIt>%O%FwH zeYD_0@6h;)0hG+dAhn0)=t#KUC6ZA(i;mlEZf?hjJl+@HH#!5Q*xp|C&ZPR3A=i?f zXNP$JZo7uqQp7o-L6zEPk5a_pH2y&iMrFiG=+tJcMo#Tr;diK#MB@vgY41J1Tw51@ z4T-{*Z&gGXs*KPa=OsZ2{qIq=Z)DH;cyoQnK0Ze=BM@9iAMp;HFY{&d#l2Z68fjwV z^c;o>Zt6VaCK$cjxh9sjX!bHhMm@IQP}yhwVR>1^<{tvlHKD`1B9?^J2~|}W9R_I= z8_um753qUuqNt!TdS_+9b;$bVYh&D?@M2cQ&$zuplW0NM11$CB0yH56V{(Gi%>qKD z82+|0^8PYYp&|oz#`#!kmLf;1?lOa-ddKO;{=Ah^z8KxtKJxcC>69(FFI60yYyJ## zpMSXw-W*MELDe0B8~u+IMX8{>Q+*bz0wY6)Wgd`B0;1E2)-MvHO-az9P+#$i8Bsjs{p>cQD zB)B^ScbCRpX6Kyy-Km1w-L6~bS>7V%Z{XZrgU?KAP2u`3>-j3SRoP6yv!TL+rXxHf>8 z6oQ#+d)N4btv%%_{C0G_|0TR-Fq5Iu!gKY*3^3q-+XENKg0YlHX}X*{xSXGZwQ0o$ zims<$4uHpIv4(s;#JA?PT>)y`no__m+A1)2s~q#U?iLW?{L$SaARzdIMgFjwfj#S$ zjFa^U5O?tI{ysog0++IVW`QC;zpoBxa3-SC(@BLm{K;{++}+(vbbt$E=i~&ur=QUN ztMZNhGn2T5;`!KGk%XeyLIZtJxbd8byiw0>_iE#0+Z*hVtCH)^<0=*XqqHqcVzd9U z{3S{yp42n3ka0lCa_0)hjiCwAqIHuQoNhFFb-62Ge7}HZhW*}zPfFf`1UNAgoc2K2 zibQcc8Fv?3=P}xTnhlIF>|?+J;_;9v-g)8I8qLh5f4llzekT4rw5>8hrWIlUXgPh_+SF6N z2uT}8P&=KImcwUEfB)P#JuRXX&Pe3*-u=nI^1iFyXtNlbxGtmp;dnQDzNdpbLz-SK zI7pG^xxl%Or>a`*=XLrty`d;SRU%CH4DjCj1il^`!lmIM z^Tx5OTsAovHGSWoDtL3bi=u>&VGWA2z>?}QpAw_^p9^0-@)T+wT&(?*bE~fP$*TG1SM|HIP!6M6ZD!w(B!C@2-BN}u7=WCm~ zR;39zI%3M(9U}0J^S$;ooG$TLqM))WOcs&TX)YVXZ#fM8nU}FKwQvw($CtD5bhzN6 zgDp*rcs$F=PyGV&p(q_$3abkl4+<6AJZQx~cq&lrNE#DB|qo=Ik_g^AP zSeUpkbN$|>9JKj-iOZCBo(;QmYx8+FJ2=Q9FiX=cu)4b$qpq^Sjc!<1ygXCjN2x~x z8gj8&=nU4cs`PnS9xYBN*J$U5sTRb?+*zQie%!!YXf3tt``Ob_Rn1ghP!aSn@CFLD zn0U@W>rV;F%g6sMFi$L(4E!#NjG466cCyH2K12}E(DI#s_jaH8t4IKCqTKIvH91ML zNIqq%Kjh)e#d3m$XB%N_XHUa(sJFLk=-Gf*g4JL7$38;8?MrmHmh7)fzGt-%eTwm?l;$qiohbCWg9MjDQIpyh23lO1 zmBoUxzI(4RI+$-U;r8OZ*N&3E`)UapZ6v$JV#B7mXm*b)N$6OM|7crZ4U?1hEOifc zP&+ZRsj;;muJ?5i)jPmZRK*I<2CF4T$&*W(Ze^mEFV9w+sh8_$x_OuDLsLzr?TrzC&>RR@r^@a|3U zqx>ka4(GUjX0#lwslKENM>~$x+5u5_uAdN~m@Kxu7KuHH(ysJr(69Hh9~?9rTw)7j zP!{N{B9ke`bL=oL$n4G)?GrXOS+(d6dB%}|`Yt_Hr}2|{55BhD!GWowfj%2yzl135 z`)K@vj1n@TiDJ?AY55Ho=MihNGxFQhWK1jMmr;iheVo*!%3IB5RmA&JrVBC!HVIKK zlu1k(cFXyI>mQ^;E$Z_r-h+cqBo5X#Eb45z7|c*nSXT2H<#dXIfIuzmup`D(?xP`H zR4l)<^tZWVSHX?tg(heLvW<@&r^DVH*Om5=jb*WCmCNd$#>-vNkj^)+Iks*1-^Lsq z9%|Q^E8SOXFsjjC=oMwj-COm3yN3n#c$~z^=*UwlhcU#-$WQ$K{ad3{tr%*;2odXy z$S4y+?Eqw=6n?*|4b|mI+pjf57K4Q5^C!8oSgHLYrQR8`KZImpCJ7`QvK_i*RkGC@y#V+A z1ujfKBp~^`&@vF3MAFK%)ODy)=e#i)(DP)e67_3a))EH!dBNw)EoGKYvIF)^lj-;p z8XAi9ZL}i);I3pL^0$vM!}gRZHGP(S&yh%-#SK`v47%sFJ=NJMb{FPEdrbQGs|z$> zT=nZ0c(MB;X>Y8Iq(0Wt6TD;L7fHDvb$T%nRl5FMq9kKN=5!H}8wkgE+hbBy)utuh z8*3T;<2y163S9;Wh|#Dd2^nl{v;L8Z%OV)a1mY>v<#Lcy(vVv9Mhh?yB#lUdNJvP? z&l9? za^j*FC!RBPRthAh%}N4Nu^-uEWpe4K64)<&sw33jIyl`R;R}Ol$$xOQTLdN*dvK*H zt2|K&Fb{>61RCBU*B-QU(O;2>3Cga{>c5@9N9G7eXuM!PD}y| zQXexyEK|9h_42l)VyLsjrWBK`nq6k}zK81e%lGoPMMu)f=D zW#Vv&63TitO~0hFcV)LskDI%|oojM=P^1;f;#Meg(+I72%mB4&Ji#d;K)`YCiqk~VGX)O<&~uU`C zyT=DFO?^d?muRp_#cUp(iX$K1Ebo`frOa*LeE;0}+A0xI+Ui$KLWtS;9rFtD;=FgO5` zXab3d>^&Bj zt=O%vhAgaagq?T4J-DW9l5jEiu#mMoDs2)7zGqWCx%MvZ_wl+($-KQ*!O!=2YHAKP zoAElSYJQ-pD{t)o^_GDaQ+2-uSX1#ZDl$<8o6BU?^HI}Ahs;_F2{j?+dlPn3?g$#) za%gHWlZ~RE4*?g)i{{oP(I>^uH_LgIdaq959<=13rH0edUYEq4aR7&HLW*5O>-4PxQ@Xh;ueQ70x5~?(hVh zS=t~kd`UR`*0h6laA6@e38JQ^X5ZKnDkR=ttrDY;N1$%+R9pVxgv^#uj? znD_X!gi3*QR{Rh!_ZG{UZ+j_U(Dti0VLV(1smp@q`<@c(L+_qIds7u`FvD@I>oYq~~EXy(Ia^krnzB|f&1RGw+Qq_sk z+$31*18s=6&dRR%I@V>6xAKa`OIX46XQmu{8qr8_Md>;|I|=FAO@-D?--7#NQHqov*fZ~UqWh_D+Q z`TWL-jeuG?9v&X1jGbX6LC*=WGrYR}27$5?h6F!XjLz}Se{^?IU()?Z&@CsK!8VN_ zL&7$JA2SgV1H;_T)Bnu!7R8?+V{g#0(^x+hHCLzs@lO=+f8k91hbCG3rCywy^XDgW zvig37sfTawgTmKhWflyAw$UyT4^?DbVr`(OnQv4q!KZ|Iwt%`2<&Cra{+pHEy&WLG zV{ylcXQ^nwsZ(o|KUPr_R%7*5X;RcHPhnXo=LGIUQ`B#i$`5-Ra$nJ`ZlayS@|NG$ zO+Fr;=_4@@iScreZ_M9Nj9?^KXoGpg?Ky#aY?_~0?QjFfIwYEMbST?ew!NRea|=Cs?~L5S@1$}aIW+sM`cc5^beV6+WGwrZDfsSk zQ%OjRqX2#`gt2Ksvvmn4bt;26$cE$`%BsEfNi_QFWx6{p`_;ze5w;?dz~B>)>C>_= z$vXZyK?Ae@R6k6%Ac08KV(j@uLEtT_Pm{^QAeG|MR<$?dI1>~K0+#mjW!dQ2)7AA7<;1&hd5V_@CmKuC!2Pfn=?K#YA&-VL z(ag-ap2Rb86%FN%$WDS)r|?E;MLrLiZnh~dJ1 z{ER?W&+j~><#V4`7!TWh_1iij3@9FGA%f?qis9+(nefy3YZs=4r)qWh6pLq13CQ)6 zZo@!YK{{4oHDRjv^R1@aZ&Dzy>vYlO>}r8KB+SzSyo();ok9n?i3clh!tfv2Pc2dV zJ?DxZ5NR&kb-!-YWgtbj$0oV?vbXCy&%}l*LJ~>41gBrWK>K!L%f%@dc1I@xxNSf_ zV{xx#8`3}8M_O_~Ehb58qxF%1WTHHg{qtc1u4deUYe@$7-doH2?$=+J1C`BkOr%>< zYOV2T4V{lo#^@$HWQtw`a3-dnNr0Bf_0tfN4;J{slF=LFsUkzaRD^DYRT%iIbBc(& z__DDz^od)qny}R>u{p94b9sU(HjUq~)r|-%spOJ8CE}0jw=a3O;hkUk=^%;J&;FT7KJ>NPFFh$^wMzDFUwCd#u*R+V}{Xk{|eRq5@Mq>X3>|G*92c zd{y43msCU!?TL6P0`RuOJkcA80*ce_c|d*k`nv}o(J#~-(vV*7q_PSZ`yV)svwY&O zKFP}^K#b7ub5DfgoZfSHF*lUjNel6yBsO>rm|p^_Tu#4RBH$tXmP?qnjpkr>C7PrF zE7If3qQDV}l%mD-2z>21O-EZ zN7#uwX5?v$ZEf*;jb~wgzOFP%7Ex_$*qgPrfhKY(Q0TkbQZh1O&))ui`p4PsZVB?t z`@WFg5CQwuqmGIBI+|N1fqNH^W;=}79LDk=-D9ik^Dc=|LHZKdyH9@8i^@;eQ?s=N zXg~!LpnwL9L5=IT4xE1Ud9F2_oUWpAX!X-|rI}_zoveeMot@<1hn$xrtc3kdRbG0R z9$_%#vJqRMjoE@2Z6cDx4_>d>-_nBw5D8zmqxdf;>g9`u=H%^tzPEZmQeyuge5NMu z^a%##1p?BMQRv8q&oTVAYH9?ynCkbDmR=ga=8%15-mcCDrh|kkNZJCOO`i@A60Px{O zuHD2LsUP+9SkGNhJD#l;bg$XzTTy}{%(g$q-W|36=)Ip0JjFmietW`3@BQ>e22k@p zoR_Pi;h%0V@UkgCskl~ZlypqzOrw+VL+@htXUeUfI@#%1BX6~lBBW@riHe84`mDUV* z%jK>il%kmI(bavomi)l8I24cD(nuzh7oHoe4{fPxktjlV5T#Q;jBl}h&M*EqvsFzCL|WksilMy_AXG-1^nW;yl|r9^X&=sqGTrO{tP7LVuWE7 z?OWIxZ1T7c_&!fdPxkN(s_qr$wTIVU&ztdt9w#8*fS>#$2vffBr~WiEGXwcNwp^R3 ztE)!^-`^oJF);yEazFyR-?#fzbFn~iu}aowRLwr9(o}}wr|)7feJe=F0R+r)xGS5*16z% z>qmKGNtUy#&+~bHECVE-=Q}T0kevdCAyOB&*A3GMwgDvVc$#;2o9I9ozh!NcBduSg z;6?8*LfK1Q#SVsBzi@N)8gqqPKLN=A{+-qVdT2rBLpT56>6)Dp&J$xyAMM*vV`-X8 z;pnCHltcxp;6g_!8PF$Ey7bi1^MI4zGFUKhdh&~((U06tk+bYmrEegDhtB>al)TPNv78Uk)pl^X93+WZ0A06c#3#E;A1GGh;Mb0h4&S_!P`^yjDXHrX+PSdHL}?0u)y2K*V2&fu{iN8~x@2K*-;neO zMuKDJJ_)SFVP%xz$+?t)=+_%XB6J*Z)EC<5K2Yt4-tQrikj}LO(IBY>E~~xUl#F5H zzI*kg8_LQ~=pD3kKilDzT(Gy2&QRY%HH|F+m$lm7^A9%$n-?7DJEzSxGiz)NjNLDr zPdS)N)4U?hD_g=u2BED=7`g7Q*P|2tVFAQ6`i-$Vr#yp`g=#kV4t2q!uPJJVONu{q%-#L}34Mh$4Vxhq-YfA!MGPr(8vlf;z$TVLoPBK?@%rPsppQnSn zpZOv-)};}*^_trks4Ugia=0*PJ|&AMQ(`tM+4 zq3M5Q;~Shfcu0G~EAv?8D*BG`efgmyhpD+SuxQeg(Ehq80^}6c{{RjtfYTu?%)H`#w`cxalV$k!Ew3#>l6DS_iapYeMvovxGPVcAs$3`A69wf_P@i zbG4?6bp5*`==HNn`%6|2c5I^E1`-18hG?rCFD(T>UzJdhGETervCdbRJZ*_dl#vnQ z6>^sAEVd7TJZQM9CpVdXma}K_y0e@Clt!MlO05M=*vZC#QeLko+fgoK_Cl7Qx;5DKPk zW&1an`RaDfnAXZ_Kf~_4kHvfLPZO2Dz+?}ANkdkg00Uro9rUZJs)`=i#FPP{1}f9y`1|{# zo}2t{Cd=xOCqVZ6&rJQl!pHx^biUR&NQpJe&&wH*J6zPEPqKQ8l$1bpC9!j4*?m5G zE-5rQqWv+|8K(DLaG@VLchD{U{@(Y;bgqm^FcL!#%re5g;7vb9`BK#MNUmzZyk>X0DwqH5WcNIc;&KYVYN<6HWBu2? zZ(v$>_|2jpLu`NZ`>G3vkuFY76f4au z91`CF2j+VIqmKGB+(KMroeRhH3Q*aarN54*n&{pnS}XrkS^+)$nUyc#U#tJYTPo_G zfE6;>*u+~Buii0wq^mu3Q7~)2SBc7{;>&`v3CW1Mnc4E6hF5j}WlDY_6i335ZFGmO z@0jc+7`S zKTlwobX~~kcy#+xj1!_9_>6tK`_#79=ge|kxWqq0eWl_l8W$CfgrZaJE6sSFe4=X= z`1ux*`4A13jhgGp0rhF*J(G>n_g9j{*iu!4V~-ApoZJ8*IhoayCL9 z?kw;D=R>~xa`^+eEcZKj`kk5gsbG`-d$o})N2H6UP)JdaRbW^+R)j$EF(cFFnsxoa zME-%4S?wpFrGhmte0pGzB{~}s`uT{rqLl0Voec14TDKOwwoG-rJX8G+WO0sUyw^|Fr?TBEsFg-dN3Bp^>AOl8?o{8wWUEtpPZesm zJLY29zGpX*A$xsWi{%==gfG;q)unQhV#C|Wx^p*>vvHSr@{E*=D2y+*@3BYFZwDz? z9tAZU2qSXe?6-<2Tm2a)j`W&=Yxm0I;#c5RdZin>V$V5)E$!X)U|)idm74Etu`SUq z0lkz8tx5Ml{q!(1Ue?HqgR(IgMeONx9TSF-#3Ng;I%Vge<#}4OwLPROOW*v~0@?p{ z+W{rk$w#LR&Gz12H8o&c&=s{|B$2sT>9%PR$)I?AL;6O|lE0+c#d~4MSdAsLP-P^| zLoatG_OZ4^EXZyXWT{LupTEuAa_@diz?JId=}-_H5~zJX_t{nX(9SM;qvr^u`P=Y* z5L1$>lfwnh=aZvvfBsc+FxN2u2i5l0s?jgO_7*&X0I@8%ZR1KXA~P>@TT{OLc-cT> zu5hmb?sFPzVb@#3a}6>C-j+Yl)6Da1$Jb6K^?4A_1igL5a`?J(OHA*#^KJNxxHS4o zP2PgP18`gBKqgxqktWs2P}VOV{`>(l_vMbXPHI{Kb4x$3cQ=g!!}S_cE~734==lA# z95sz-owOFxtY^BvqKEMGom|D}Go)%`kl|{D4QWpSMJM^V76a#+2ftkkWi=X@EessZ z>Gun0B4T{GU*A=&aB+Fz0Tr?Sc|;?(P6S&O)mFXPo8}Mjqg<^oM7BE&vuoMhTh>ds z>Ky{TFILQ{G`?ta6{7Ey_U4R~YbXMq2VGTmmidxscmd24Iy9m417 zctSZ-L4Kt9Wy6KKmO>GQg>>QTyn54`j3@T;`*SHo=}m;Yk~Ts_0R}*&5th08>UAyz zWG5mE>?eg#852SmS?E>0f~LdmM5P>1G&6yj!(maE_qAGPUwGynn$ko2A%*1!~LO%AS;N$jp& zxEtSi=`+6zk?I-kmA8_-R=Jhy)}Y14#;(=U-SR-DI6YhvMoW0C+a6DylfXgzoQz0E)EV|ytEiC0p|maYQ?p+H6)?}hqd}} zTXQSxW%rxK=V98B?`}Hqpd$&0$qkClxj6=$pnX}{NzsRvmxpYGdy-zO5n0)JVTX&I zT}_tTs#mmmhC;EFpWPz8S_|gciOk6NVW$cs7G&I(XB|NHJ<`pYZmX`}C4!+aga~aO zw$X#Ab>@moG{l=iK?5ZtD}!&)Iug3Y&)oyS-7KWJ+N%W2ZCqeZfOZFi+8I5W>&}X4 z<;J&1RR3;qkGME-v$V{H(c!>6y-ZAe^ecn4uS)4c*!jm764u5t1Y74`p8qq^ck}YrC+~HcRTViqAqd!IAyT*i_dp&-ctA> zN+wraT-@YJ{2$W)A@Mh1+vM;H0JxHp{!*aAhVH&v0)tVy4 zhkJ{zuk5@R!fkK$RE$A5QI)0I6S&d4K9}Vb;EnmjT`EO4MxC*d_T}_oR6q(;YYOSq+J*w9Li23aF^xT^tJQwhH#Ty_Z@B1hDbrt=^mURfo0cPH5 zJcCL5z}j)8yT!fTwm@;CGKL6sD6FLs=9_qX;YJN8YJvVT$A=lg=Z8Yy9zVpO+mi0t z1_WVzmUVZ$8?jM6D8dYWTs24X-zW^sl8|4F+M0Ig&e|1f1}`a<3p~(_*6b5q5TYxVcnm5FwDQhk9%R z<9)}@;(W7_9oNmWrQ_VBbl+^DWiaE7V_E`D zR1lk6)IC6{Wv#3&8J%v)`kEIUab^+~?OgiryZ$IzIx+=Rwb(O9^Rs4CrzjXFk==}s zRIg0>x4aD;CWs|T=ci^QOO_X(Q|04P;nfg)#RQ9Ob(i|rrK={*n;euF^n$9*w=@%y z#o1tEE3$~f58Xtf_a8SRwaIp6Fu?mx_2QdR||KEQ>!sVN%8#v6BQ z!xjP#WnCNmyY>`1Hk20i@%ENYRF(T$mDc1B{9mkVJ*HbTO9275Z~}szXy?bln6(S$ z&Xn)l*nUgiN9~RUhE)TS!?Xx9Ca2SE?T`9ZqvK>5;3tqUuxzqotrkay{%N1jJ+D}+R~VGC2h4{ z-KL@($unsGDz71Qr1A$Sw=qrzzAF;==$htr=5gsg-`vOmT0bp2^GZV8Zky+{m*SBjsNrk>g! z%-K(wbS|;Z>kHrjt_F;<1zJapt0|va`m~)y?+)shU2?lqyEe;p>85Zv=>itjP8H0B ziyOsrY{+587&n>PS~vCd#?CVzufyH4RVv18CeLN`^cd?Q=&OhtVZO^jKe{eo-q+83 zVd@BK$SpFeFbQ2Vlkw6N{l{(>$GwssCyv42OT}L^s`>8J3kw3XPE24Zf9PA{sC{>(7GCVzdphw+DeEo<)gPwA|~ zx>mT+I^EsV?t$X26$L1iBGyN3$uHIPFVx8-AkU>ALx#rvAE_*7_<9cs+bI5}w42Mh zlgr@wFAdtx-V)lQZ$_}hgP>LXNF#XRh!@*5mQnR{uo67HvaKe^?5le5lzn6B63pD# z)HF}IkYML~&pO~C4fm%Per7@)3mgjo_AtNz42!IUgtq#KQ(|$DBqb)YR_9~-WpxAF zC_oZc{%Nl{XNP*V@<(X=Ur(d{YkvNhcjZmR0!TA4Ew|(&3zmgvY%g!^ZHp5eg5RqB z@ntSVoUnd4wK;~G!|50m3BANHJZ_oS>9iV>KNCxW>~poVP{=^n_)tWSwt;&L?aP8DICn zDUb*L*vkA^O_$-+_82u|&06n)%w*-dfeHMg79Mz1O;+v}R$&ZAsrvz2LuFXEWH5$e zS+|~IFGQwQ+wVmKEB}Lru&;VIljX9Pd{)spm9fa)VxVSHLS2vGuynBOAhnF$X$+o5 zwh!&vVPW6TXYGnwKBw*nWo}-{FU}W}ON@;NK^GH{%J~R$^jx{QQI3kK#9FhXCE;3A zon{FbitR>JZi<2LBTQJO^|x@-%&~uuUeSOUKQf=>gm8_MQg+$b=Tn zNZsNpeH;fliVr_~ZW@KO@^t6MSN4|6M)+h>prbd(g_e@%X0P!~pRd_&y(+Fp1W%d&BwkDBw#Qe%r|shXO|BMCdML63sV*%>w&^R&9>8ZoENO} z5!iNQ2l}TYg(<;s`Cse^9tx$q21Z%hD2$l|$nEva_W4;8;rp__C9F_aJLw+uGkj8u z_FRtQ?SLjfcU6Aq<8FI=x5p5u-r-9%W+8|3xh=oZ?$@tl4~H5L*3xW~H2oWBM)*3z zREzy?4Rd1@(7=)(=_+j)xx=ne7ITK)gCL6TK~xQ5s3@+^z0of`&X3D+yN~gSjJCG> z%iBPnu4fZZF-_nk_;rhv*2^6@}Sv)*R@0>8)=^2zIU>Rxh@hSi>!8*M=773DGHpo`2tOOmdlF9ckxTkXLiE zC1-pZOAxt(#D^o#kHerAbQZt(7q$73fpd)AOr{8~q01KW^GeN?!T@@hYlGzi=-bl6 zJ+~h7%&MhiJ_MJ`KRUO4uyE(-Bkzp36Vk;}Rh68g!Mwy zV!J?a# zauI~*>S84A)tMILq8{IK@iD3oD=!S}?f)EM1_V|2WuU!+buHS^(d?(oc#ElAQM0vGDH4w9F+77F0WXK>p5>|azL z-`o`3$e4H(!p#QCI5)m8lC+szX46Dd)JtbQS5CDVmiec0+I!C#s3vDljS?7T%!RBP z@aL@}9g#QFbop^cW`~01ny~eQFu@yv9`!12!)54`aFJmF>Mw-+uvQ0d&~G;G38XNWRiqmTxqy^=eA58;r67+G5%bcYdt_etlphz<-y z+ysg-)XziBj4ANGbD?(Heay-DKz^Lc9ZufgWOK3(C{?%5x(wN-)M)+Q+|`!d@0tm& zyKW4o`7^~|UB!gZ#kx|9PTl`ZS58mT@VRbR9N(PkA=Q~(Oq!b#yA+KgV;K(Ph1iVc zeqx!jbT=ihhIPlI=l1sXM=vkb{K_+vQhl7DiYit+3K#tBDPu#gj!lTtwS5NEf#^@| zry3=D>gK*Q&p5}@Fo)^_b*M5vu-*^h|@=vrv zY0pfb*;dz)HNAt6HohV2Q+b>xVW285a*a1+;~>*@+hQ7nMssF@JR&<-{) zSE+_6m)kup_Zwh2jg+Ef+Xtr~LX3gl9;=d`2|9Z^QIOUgyH{1s`LUO!)GQVxlPrS+ z&qby9tld(6_&YdX3iAF?cv3V1Bz{v6`j=(OW?NHB*!Aq4@e#=Ihq1hyja?7$<$1*; z7eJV4Uaq^*#FzD<>MqWP&#^tHF#ZeHd!JLRo=$I5G%K5nS5ReQxVG6~wpgT^eHurc z45o-n{t)yIXoMnjW>7pRr0Os^K4#{QQK0Lh(%LUBeI-1{tGaUHDpjhy>-B~Oa|crE z^n0=gc;y?XeU+nTpv`RSjG~1WNk32cqjzG%1gN`QWxANYb6XMFze$783&U&ZXCGWwz9Nn7;K<3|{>cbcBZoaM@PJ(#q<{`*n1>w~x;t77vrrOw2JSt)Vuio=(Qk^IFFPs6k|~5* z{#F5`e7&g%DTb~#b(12Fp#iHxszoeQzT&=SLg-5lmk|G}Rua%3dx7YRPZ4kw|hxOH5dJ!F>LVp#6hB-A9 zJ$u^ej>PF^+7temFc#@mDT#M+TFV~l(HtAuco%s4Vz@Ef=hnBkTjJa4nYW|%*opx) zGuqsBQoDC*Y;5c~?}a=C%=2mOWIdtr)`ykpojpnV%ZvT0&{#s^3kragQ%2lF!s*lfVv3NTLrIRiU zIDcs_gkvJ)oydHSy35De;-f*;Q-X-GX}iRgbT{(`vVw*fRr};a>@df&%vwh}Q2b@b zSF`Df+6@oetI}2Tb&}83N}riB2$Z1DM?S)4eH1YCo|}1BN#1UTf616QSJhN8jt0b%x9*=lhdHP(XE*BDI^N^r_0M7#I-MZTt2&h z470rp-)ZcUUT~fncsP;B%L#fG729^D4$_zH^l$el3chi>RpW?#KY2^BIfLi#A1ZJh z@&T!^TA^&|A*jXR$80NUQ{5Q_J6p`B)Ci)R!{Yka8B!VgPuVhT-eDBqsrB|a zs&ewyf?IY#(x~KxOm`mr~;9D!_T+2yiD_|UJxpKzc+lS z15auWR5LpMG;I5|hko)1m*P`q#ZrhnO3j3alvr-wDwe{sUi6x@E+gt{4diKtForXj z|MUCv!P$oGm)#UX)QFrX)jW}>3IiK#fE>d>QFA)Qe#5=_ET5TXJ7n%Eg@gby(fvUI zqp+n{BE92E$HH~*Iu2jPVkGE`DbNGR;5Ld~_UU+5LB2EKljAkA|E}38$o45LvbeH7 znmvS3AWUzfCjC3?KHFBW>&I8DGU0f4)Sg}=vGdJW`3g(@8v@~)cq`k6eLJ&664AE{ zJh6SoCM@|`F;IFYdV0gm@-=bifAMC}lW`_fFwm5#Z_^$rmn=Y(4kx54-ga!@AF1ot z@ON+eFaV^80#>4klIqupkN_zJRMpi@dmD-J!T+Gfzrz0i@QbX`?=D=Efud|7v?e02 z#?SACwzf7gamwitu;zXJ@MYZ<(3@h)$jQ~z)z#J3nq;!TAiWy20M%M)DE{i!kP)h^ z94$r(jDLgR1;{!W@#be|0U&7vG>Gul0a`GJ`^zXO)Kyee)YqG3vLK0z%gBTPf>U2# z1OzW2o7b|vGW}&b+fXvs{$lf0rikxvQY0XC%WkPuyB;PQSS5tX{}K_=<={7)pkV6Z z*U>`x6z;>hT4FZC7xM@(6?1d*PoItx*^K@So2$1Y!@=RSUEr-l1m}m72yk0Y(o#}> z`!fv4vUb{^P7`!v|1+%KcG1(zD_=gP`|?8@V#41!v;U4fLG0|&hivyjQ2J8U;`rKH zE?`7VZEbCNIST>`O5(dX881&yUcCPP{tyoj;AekNPhiq}@=!YTuE95$-GCyuEWprI z7saTgq@<;#B~kNv7Pe^n-aOw};AYAe{qs;s Miz|qgfj@rxZ+ualNB{r; literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-8-1.png b/man/figures/README-unnamed-chunk-8-1.png new file mode 100644 index 0000000000000000000000000000000000000000..6f4b8ce739c7599b0ee9d02f053e853940bd72ff GIT binary patch literal 7100 zcmcIp3pAALyZ@w}?sChv-D-D1ihmT!t+b^Q5|YI1TpH~}lgk)mW)h_cT}YCdq7Wfs zT*oB2N0RF>W^!rV$HW-sV$S>3TIZbq*`0ItK4<-Bty$mt-tU=tp7(iv&*lAnw@%nv zty}%eY6ybX9X;~fNeEi@1cD@(E0=*4?(`8)a9MTvh)Vzjt*?Q<67~LBUJ#`0cl5V| zjvVST~)$-;o#3 z!|~()Fv)D?aX6eqor_LRo8yL7LMyE;2P7e=S1trvdFPGffvd~apk-TUpbeYCrLID& zOrYgQm=c=~ER%*LWPd2)v<=&5-h~kN1n44-n+#^V?rF@bZB8_`6J}Og9m%5D zf{p(ql0DA1cFuRF`1TgYO?kLlW4=gST`Rx(dZkr^i{Ucr<Ve16;%N_~Ho$t-kW z#quiUaFQ90KiqiVn9Oq5H$Ss@26K4X)uQNHkAW@2FO|ddbKwtNXl?23QYQfw{(e{W ze|6hGne=1N{z>G-+c%1^ahU1q>e`*_ z+FhWk$bW!TgEmRhR|-2`IAq$U(h6`*&V&t?InDaA&@+X46fpfg`d^5YV?Qqdv!+y_ zJDXFpkIj?M4M}I^{E|AQ+4tTSyM!Cq@~kkpS0DK6?9;XwyI*#d4+;U~{YIw+Bf$HT zR&mYW{4MkWl3&Mb(8Hz{7EXIbAU%+)#Qw_lC~^RF;6`A!qPndFlq&PX^!kfV{c(~y zc5;)*MMZn|?hW#-ubuz;UJ~+p0?=$uz~gYZ`uTzS$I6z6nqYT2*%weqY14<9(k3%+ z{0V|S)xKGx|E*Jdl8{@WBieC8-_rx(41c-{aIC_pG@x|!>2f^QJVF9G_!lw!V@&+m ze7Fof$@cPB);s?;Ztt$%xWbm5Wdc6%@$;U62fUSy3UJmQ@tYYn1wJh^6Y*ixPvug$ zVgq}5O0gF}$g@KJq7``h^l5C6eW34v!?4z$(4IN^Un<;+Gt;J-exsQL`eU97`#B$PUM_117)}UysGJN zfie4x`|UK%Xokx_*i}u*nX0C9BRNP?aA$eCPKAI|8~;8+EMV z)sSyu@a3^K8^3@y#H0Gt5k&mg&gQ0I*W^faq2yJjs@}wCwZ_0cLMIZ*R-wH9eL%Fg zzCUF6iBF4^E&mHw-Heq*&q?!PbC7B%PNm@~GF2=SAP6u#8_e#>H|3`H4r!-rKANN6 zpw7=6?C$Tl+|_M%!X@tWPioMy33S6t&l_Qrt=IvRiBGtV?<)vVa(??N363AdH}!49 zCi5n!;uysTI*ZLiR06Yj(B7@rrSBef=Y=zKx^fr4R0=duyVVx!qCFgmZ;UOaq13F! zwwLKrB2FB(tCGU(5=6D^=Q1B@(iR#l)gKuRO`xf#L})33u-SQO=5~SWR6u`M7YDj) zVPiv;(4bf51;vo($w`F3($sVfU=Ce8$(a$F)O*5M|aTOOGqjsjFbWz=xUqi(Q z@-3wes#q;bAbCd}TdLKKgPGT2bSlx48s=qoPV$xtHE1OnD#$2O*rmm0J9^OAm{>^i zCsT{VFrOG3o1LchuCUNw5UARkW_JX?AxIp!r0cGG*k0c0_WrTT_`L{GvcB$OCy9s| zuOhuCiYPbe(gP(KXYa2ufdcc`9WM3jaoCz?4rU)YPMA(J76RK?ZB4~5L{iq94mBmd z_FEWX)tfIBZ~0Ae}(xrC@1AAFIIN7qROs}e^04Q)k9E;Xy|)%xQa0T;-uEYr7x5lU@nkm>;>&+af0pNij9n%|C!P()YfeXiYyHh^`-FFD>=H6 zZ}=xV%|R#DUpF&etD3;5hhzWeY2%6C%QSxh24g+aA%?s@U&s=Rtj%mme)F8b_I+|sYeJY!?yEnU)!9VYe|U9%|FTI zq-7jhBOu~iNUeg;o0B)XGbNrx8pREEuoj0r#-2mFim|DIt>>_gmiF@8-V5*Ay1ZLl z%T#j>LpBDQFk2x+e}L@jkXTs%X@NyPV^<})9)hpW##)ji99su`V@<=xvN=8bn+ zAr`A&QX>^ZAWbmhB`PnG8}eS{_SEXn`}_TokLT&GP_XxA>G~o>4R+Kk(}v=r`s*cl z-c5-M=XY7c`sO`~0&VVD2IuFA`oi%}9leZI2Bx@L4ZDSbjQhGGI?1jloshPw#1;t4 zdAoXbFHK6D2OPB#MabUJZ9`2c73=b|L- z1aIFLxb913;DEQbc@;%h4Xdpd&6|!`?_xir3r>NqmmrTsfo0OE+eA+78ssxNuM1w4 zwQ_l!raNKJ?^+4VWSU#5KW7{|2|Hc0TZ?}Qc36T@jMLl;-kpbFp4HH62=I%Vfz`Zo z36mmKmnMCf)fV7Y#JWdzSz^il(G$;leO4_cJd zDIS~(UDT?r@ThBag$FuTmU!me1++{O`<#BC#oITm(rI;Qz6;&{AYeq~kXN@EC z8zv$oo>;{UY3gJw^@cK2NENg5nTCnpVZdP7LCxqPk0w$sV+ZonY3Sc|%7-I2y9`sBz_%(6c+Cxt*x(CE46P`=HTtgKLRW?3HRz=z~&We9RQ~ zeXMr;QGrbA22e78TVXY0`%&`12U+CID<#l}pCB6tSkoPzq9lbb`g!YvlU}tHL zyAtn0n{vT47pktbvv5LHI^{)9j`85lE&Iu&{x zh$Hmr%>H_NIdsAM%9^sN5unD`ZYOA^8xlpRf)OyGoH+KlRz}#B7ZIOw%CPcPxwusN zw#tcQe!##XIG2o~^+L}2W@39vNBio-CN(bB$AxA-9ea3DQTThE?O2jXEUnNxy&kfV zL8cAo#pL%Jv8?t6h)YMSug8mgsR$9Nc_R|<{RnJU3ngD$+hP7(lKS~GR*@~{$f0v? zudc};2|pK8vCMpz{JMZ>5NA#K)y8u<179zC23)*|P5QN;nqlW%`(=n#)wzx8=8xcv zf2G-1tl#+?s5DAteKU#qRUg%+h+_v!fRa_6PS@o!rVB>8qlg$xZ*;L6W=KX5r)2UZ z!?PlzJP_&XO5=CU(S^C#AjWvtgRYlJeV`R3wDq?y&0;rdgbb-ln^V29?L9KD&CA7D z_me;G@rvSFcLhD(aI-ttjatJDcOf9Bjp6Fl>UGy`ta*6H4K@WWMiPB|;?p$UXFKla zXdM5A#7(>s2NxKn{>HqyWZrm0t5N#+@EU?%E`Gc@$&EZ2$!<|e;5fkrcUvt=iL~9B zBK`^O9<*4JS2-GQJc$rb#GPfeOktx2*GSkR5yL89JVnANNIrhz1#w@YCpL4L4%8z6l7|1wn~}qD+%;I zzZ7pZqoCmDA${P3ljbwZ-m@z8N-xtsFkOX_vMZ`66w~_WVlD0q`er!!U(G%Q$)Cq~ zRSr+BHPK}F5>-xzhu8TB8St~7u6w+dFV@m7S%7xBC*-uv3Ty$0>9zaSsgs4Lqe$@h ztcAj`EfIdOdhg4+p(WWrT~*6?93QjG94=+2fra6XU-ZiSCO6{+&$nHwh-GM{>s35f zh4#zTUm%p@S5iMe^;Z$p8Z(+E?;ya&pBcr)Xc5W-@0q&?u}f@8_%|qXmv-XkIatLz z7nN%CwwdeUSXBX4JVje$uD5B5&Ra5u&xor!aoM(ymUyms-0;{9=Tk4onv{_$CKrAe z)8eMWMHN>LQ6803GCKC=_ZNJv+8PmT0p~;)nOvdnUOCcjW3$Vxau;2lxL^$c>dB$h zO`RFv#%cPAkxLcjPhB6EGz(~)6g9Pbe5-jz?iF~4YleA@o>FhDgG0cJB>5H7i+Aq} z^0YVZh+>~f4t&Gg{5>O6hmCs=QQdgP&xQ+d!GO~^b~F8WUIaSl45&!$jH6Y`*ev3H zR^0B0C@=CIxEUuH#hp~IMh|Tzoa>23}FD4L!Z}8l>_tssL*H zWOPmH>YI1=8?9z2zs}?UI)Uu#QXgDU{NfvBu=@JWJi|WQIHsb`+0zIFqkzJ)67P=w zFtAhs^-2Z(;bJo)ll2(TBXr;JxT`4--OkMs)?G~^T*)r{Qjkr*4sb9*(_^ifA+X& zb}3v}r)+RC-#{hk)0&)9CX25{YWzu79(Hd`A_h*oKoj5XBX-UY#x8|TN`J61od~!e z<#=j3WTuz&cxEpBLy`ACsBGXxxxQiJg{6AL?Bsh1$#l)=!D2fzPLm%tF88>g;4Ykt zqCfcVGmD?d!cc)JA!NSR8`K@7-M-+=a}ma5ZEXg%Q=zyfI4?FWq-NIegXu)GohpGY zy&Y~lM?F0qMDchcGuB)*qUuW4uzNI9W~VA9CdrFKTQuU!hR4VjEw|OpLdUGKV{+7l z(=M-d5vWni67kYxp_^m@Yu z;#o+FiL{yfY>u^mmY^=pKP-fGJg%SNtzZfT{u-yhfKk7+&d#JvXo#FXX+L^m-*~@N zVX5qZ46t!SeR99gJdW4KieOyy5x9?kz(~Wr+QfGSWHEeBAKLJ!T*ep|+VwucSgGQo z+xD8Rn*fsEE)-O_^SOjpZ1k{fUYf4Fo?EjtqCBiKD%dNXvU$O>kjoi*s+7mbLgPooU0N{8-sIG z+!VsJLg!3H-nWw$N(BI^wOnT5W4cwmnrXQwcFDTrFi79FL#u@I_!W}SwZFq0{~ZK5 zH4bbnF(@&}gI)e5)|`<7w@EsV@x7tC!K~-F#3A@ntji#QKv0%O>EEci6Ujid!)ECS z+)=~o@i4%E*K0j?e~ah$O+5ys@~^Pnf5&D}AiterPdIfWXl-q;0J9u7)n%jHtPfK7 z$q7w>8rYdEB6j*~vn~jO=uUhhpgbF{zCjPki%|8dyoHKC&?-(<$5k&S^Kyh4g}$lI?L43B7oH@YEP<4;K{FY!%h`z z5JNl$9JU6EMLfF{gG*DiVvO{?cZJ@~88#{85YAww)KMQ=(S;Ivuq!O~B^l{{rEwcz z_D|q&A`B}v3H*;}P?2iHA590v$IFx>FRF`GPDx1tcTel;>TFUBMu6IumKJ3L-v(@S zB#lPv%5_x)q;JGl`<)wMiny!m0dLc)Tm-f1`SWdTEm>MA%G1HY0VwR~=_y4G)m3I5 z$to+ui1=KLolGI|=Mdn=>`E!kbM4QLR!os$)Arzn3jyISA2V3X*py# zI&t5LpD~=Ncu~gjWWCGGH}IaC6127)z75+m--{&e_N*HQMh*eX_Xqlb-#R)wqu)qK zfyIW^l(~fM&?^P_fbyevDx1-qK0^8Qpf%xj;4IGX5s@-t%qSa6t_zD=7P>Dys$XG6 zyn5A~RVFE*vwdFk5BygFk|-jvZ>x3dvJ0-dw*<|!$-T>A8{xk8`V(-U4H+gw>Ptgy z3?1PYsf)A3RimBD)k1HCjO1q8nz5=qP??|D_t2a6W{y5ZYTh=Que4k1#{ELfOxU?%5YId?53$vA(-vu!hXNFD{JCw(w|G0w!($(a$j+^Ld0zYq;IgVH;^I|uUN p-nzU2oX7ufFQ@*5^ER>6;Y6u16WbUa@H!4UYH9mhp2hFi{tZIW^`HO% literal 0 HcmV?d00001 diff --git a/man/figures/README-unnamed-chunk-9-1.png b/man/figures/README-unnamed-chunk-9-1.png new file mode 100644 index 0000000000000000000000000000000000000000..6f4b8ce739c7599b0ee9d02f053e853940bd72ff GIT binary patch literal 7100 zcmcIp3pAALyZ@w}?sChv-D-D1ihmT!t+b^Q5|YI1TpH~}lgk)mW)h_cT}YCdq7Wfs zT*oB2N0RF>W^!rV$HW-sV$S>3TIZbq*`0ItK4<-Bty$mt-tU=tp7(iv&*lAnw@%nv zty}%eY6ybX9X;~fNeEi@1cD@(E0=*4?(`8)a9MTvh)Vzjt*?Q<67~LBUJ#`0cl5V| zjvVST~)$-;o#3 z!|~()Fv)D?aX6eqor_LRo8yL7LMyE;2P7e=S1trvdFPGffvd~apk-TUpbeYCrLID& zOrYgQm=c=~ER%*LWPd2)v<=&5-h~kN1n44-n+#^V?rF@bZB8_`6J}Og9m%5D zf{p(ql0DA1cFuRF`1TgYO?kLlW4=gST`Rx(dZkr^i{Ucr<Ve16;%N_~Ho$t-kW z#quiUaFQ90KiqiVn9Oq5H$Ss@26K4X)uQNHkAW@2FO|ddbKwtNXl?23QYQfw{(e{W ze|6hGne=1N{z>G-+c%1^ahU1q>e`*_ z+FhWk$bW!TgEmRhR|-2`IAq$U(h6`*&V&t?InDaA&@+X46fpfg`d^5YV?Qqdv!+y_ zJDXFpkIj?M4M}I^{E|AQ+4tTSyM!Cq@~kkpS0DK6?9;XwyI*#d4+;U~{YIw+Bf$HT zR&mYW{4MkWl3&Mb(8Hz{7EXIbAU%+)#Qw_lC~^RF;6`A!qPndFlq&PX^!kfV{c(~y zc5;)*MMZn|?hW#-ubuz;UJ~+p0?=$uz~gYZ`uTzS$I6z6nqYT2*%weqY14<9(k3%+ z{0V|S)xKGx|E*Jdl8{@WBieC8-_rx(41c-{aIC_pG@x|!>2f^QJVF9G_!lw!V@&+m ze7Fof$@cPB);s?;Ztt$%xWbm5Wdc6%@$;U62fUSy3UJmQ@tYYn1wJh^6Y*ixPvug$ zVgq}5O0gF}$g@KJq7``h^l5C6eW34v!?4z$(4IN^Un<;+Gt;J-exsQL`eU97`#B$PUM_117)}UysGJN zfie4x`|UK%Xokx_*i}u*nX0C9BRNP?aA$eCPKAI|8~;8+EMV z)sSyu@a3^K8^3@y#H0Gt5k&mg&gQ0I*W^faq2yJjs@}wCwZ_0cLMIZ*R-wH9eL%Fg zzCUF6iBF4^E&mHw-Heq*&q?!PbC7B%PNm@~GF2=SAP6u#8_e#>H|3`H4r!-rKANN6 zpw7=6?C$Tl+|_M%!X@tWPioMy33S6t&l_Qrt=IvRiBGtV?<)vVa(??N363AdH}!49 zCi5n!;uysTI*ZLiR06Yj(B7@rrSBef=Y=zKx^fr4R0=duyVVx!qCFgmZ;UOaq13F! zwwLKrB2FB(tCGU(5=6D^=Q1B@(iR#l)gKuRO`xf#L})33u-SQO=5~SWR6u`M7YDj) zVPiv;(4bf51;vo($w`F3($sVfU=Ce8$(a$F)O*5M|aTOOGqjsjFbWz=xUqi(Q z@-3wes#q;bAbCd}TdLKKgPGT2bSlx48s=qoPV$xtHE1OnD#$2O*rmm0J9^OAm{>^i zCsT{VFrOG3o1LchuCUNw5UARkW_JX?AxIp!r0cGG*k0c0_WrTT_`L{GvcB$OCy9s| zuOhuCiYPbe(gP(KXYa2ufdcc`9WM3jaoCz?4rU)YPMA(J76RK?ZB4~5L{iq94mBmd z_FEWX)tfIBZ~0Ae}(xrC@1AAFIIN7qROs}e^04Q)k9E;Xy|)%xQa0T;-uEYr7x5lU@nkm>;>&+af0pNij9n%|C!P()YfeXiYyHh^`-FFD>=H6 zZ}=xV%|R#DUpF&etD3;5hhzWeY2%6C%QSxh24g+aA%?s@U&s=Rtj%mme)F8b_I+|sYeJY!?yEnU)!9VYe|U9%|FTI zq-7jhBOu~iNUeg;o0B)XGbNrx8pREEuoj0r#-2mFim|DIt>>_gmiF@8-V5*Ay1ZLl z%T#j>LpBDQFk2x+e}L@jkXTs%X@NyPV^<})9)hpW##)ji99su`V@<=xvN=8bn+ zAr`A&QX>^ZAWbmhB`PnG8}eS{_SEXn`}_TokLT&GP_XxA>G~o>4R+Kk(}v=r`s*cl z-c5-M=XY7c`sO`~0&VVD2IuFA`oi%}9leZI2Bx@L4ZDSbjQhGGI?1jloshPw#1;t4 zdAoXbFHK6D2OPB#MabUJZ9`2c73=b|L- z1aIFLxb913;DEQbc@;%h4Xdpd&6|!`?_xir3r>NqmmrTsfo0OE+eA+78ssxNuM1w4 zwQ_l!raNKJ?^+4VWSU#5KW7{|2|Hc0TZ?}Qc36T@jMLl;-kpbFp4HH62=I%Vfz`Zo z36mmKmnMCf)fV7Y#JWdzSz^il(G$;leO4_cJd zDIS~(UDT?r@ThBag$FuTmU!me1++{O`<#BC#oITm(rI;Qz6;&{AYeq~kXN@EC z8zv$oo>;{UY3gJw^@cK2NENg5nTCnpVZdP7LCxqPk0w$sV+ZonY3Sc|%7-I2y9`sBz_%(6c+Cxt*x(CE46P`=HTtgKLRW?3HRz=z~&We9RQ~ zeXMr;QGrbA22e78TVXY0`%&`12U+CID<#l}pCB6tSkoPzq9lbb`g!YvlU}tHL zyAtn0n{vT47pktbvv5LHI^{)9j`85lE&Iu&{x zh$Hmr%>H_NIdsAM%9^sN5unD`ZYOA^8xlpRf)OyGoH+KlRz}#B7ZIOw%CPcPxwusN zw#tcQe!##XIG2o~^+L}2W@39vNBio-CN(bB$AxA-9ea3DQTThE?O2jXEUnNxy&kfV zL8cAo#pL%Jv8?t6h)YMSug8mgsR$9Nc_R|<{RnJU3ngD$+hP7(lKS~GR*@~{$f0v? zudc};2|pK8vCMpz{JMZ>5NA#K)y8u<179zC23)*|P5QN;nqlW%`(=n#)wzx8=8xcv zf2G-1tl#+?s5DAteKU#qRUg%+h+_v!fRa_6PS@o!rVB>8qlg$xZ*;L6W=KX5r)2UZ z!?PlzJP_&XO5=CU(S^C#AjWvtgRYlJeV`R3wDq?y&0;rdgbb-ln^V29?L9KD&CA7D z_me;G@rvSFcLhD(aI-ttjatJDcOf9Bjp6Fl>UGy`ta*6H4K@WWMiPB|;?p$UXFKla zXdM5A#7(>s2NxKn{>HqyWZrm0t5N#+@EU?%E`Gc@$&EZ2$!<|e;5fkrcUvt=iL~9B zBK`^O9<*4JS2-GQJc$rb#GPfeOktx2*GSkR5yL89JVnANNIrhz1#w@YCpL4L4%8z6l7|1wn~}qD+%;I zzZ7pZqoCmDA${P3ljbwZ-m@z8N-xtsFkOX_vMZ`66w~_WVlD0q`er!!U(G%Q$)Cq~ zRSr+BHPK}F5>-xzhu8TB8St~7u6w+dFV@m7S%7xBC*-uv3Ty$0>9zaSsgs4Lqe$@h ztcAj`EfIdOdhg4+p(WWrT~*6?93QjG94=+2fra6XU-ZiSCO6{+&$nHwh-GM{>s35f zh4#zTUm%p@S5iMe^;Z$p8Z(+E?;ya&pBcr)Xc5W-@0q&?u}f@8_%|qXmv-XkIatLz z7nN%CwwdeUSXBX4JVje$uD5B5&Ra5u&xor!aoM(ymUyms-0;{9=Tk4onv{_$CKrAe z)8eMWMHN>LQ6803GCKC=_ZNJv+8PmT0p~;)nOvdnUOCcjW3$Vxau;2lxL^$c>dB$h zO`RFv#%cPAkxLcjPhB6EGz(~)6g9Pbe5-jz?iF~4YleA@o>FhDgG0cJB>5H7i+Aq} z^0YVZh+>~f4t&Gg{5>O6hmCs=QQdgP&xQ+d!GO~^b~F8WUIaSl45&!$jH6Y`*ev3H zR^0B0C@=CIxEUuH#hp~IMh|Tzoa>23}FD4L!Z}8l>_tssL*H zWOPmH>YI1=8?9z2zs}?UI)Uu#QXgDU{NfvBu=@JWJi|WQIHsb`+0zIFqkzJ)67P=w zFtAhs^-2Z(;bJo)ll2(TBXr;JxT`4--OkMs)?G~^T*)r{Qjkr*4sb9*(_^ifA+X& zb}3v}r)+RC-#{hk)0&)9CX25{YWzu79(Hd`A_h*oKoj5XBX-UY#x8|TN`J61od~!e z<#=j3WTuz&cxEpBLy`ACsBGXxxxQiJg{6AL?Bsh1$#l)=!D2fzPLm%tF88>g;4Ykt zqCfcVGmD?d!cc)JA!NSR8`K@7-M-+=a}ma5ZEXg%Q=zyfI4?FWq-NIegXu)GohpGY zy&Y~lM?F0qMDchcGuB)*qUuW4uzNI9W~VA9CdrFKTQuU!hR4VjEw|OpLdUGKV{+7l z(=M-d5vWni67kYxp_^m@Yu z;#o+FiL{yfY>u^mmY^=pKP-fGJg%SNtzZfT{u-yhfKk7+&d#JvXo#FXX+L^m-*~@N zVX5qZ46t!SeR99gJdW4KieOyy5x9?kz(~Wr+QfGSWHEeBAKLJ!T*ep|+VwucSgGQo z+xD8Rn*fsEE)-O_^SOjpZ1k{fUYf4Fo?EjtqCBiKD%dNXvU$O>kjoi*s+7mbLgPooU0N{8-sIG z+!VsJLg!3H-nWw$N(BI^wOnT5W4cwmnrXQwcFDTrFi79FL#u@I_!W}SwZFq0{~ZK5 zH4bbnF(@&}gI)e5)|`<7w@EsV@x7tC!K~-F#3A@ntji#QKv0%O>EEci6Ujid!)ECS z+)=~o@i4%E*K0j?e~ah$O+5ys@~^Pnf5&D}AiterPdIfWXl-q;0J9u7)n%jHtPfK7 z$q7w>8rYdEB6j*~vn~jO=uUhhpgbF{zCjPki%|8dyoHKC&?-(<$5k&S^Kyh4g}$lI?L43B7oH@YEP<4;K{FY!%h`z z5JNl$9JU6EMLfF{gG*DiVvO{?cZJ@~88#{85YAww)KMQ=(S;Ivuq!O~B^l{{rEwcz z_D|q&A`B}v3H*;}P?2iHA590v$IFx>FRF`GPDx1tcTel;>TFUBMu6IumKJ3L-v(@S zB#lPv%5_x)q;JGl`<)wMiny!m0dLc)Tm-f1`SWdTEm>MA%G1HY0VwR~=_y4G)m3I5 z$to+ui1=KLolGI|=Mdn=>`E!kbM4QLR!os$)Arzn3jyISA2V3X*py# zI&t5LpD~=Ncu~gjWWCGGH}IaC6127)z75+m--{&e_N*HQMh*eX_Xqlb-#R)wqu)qK zfyIW^l(~fM&?^P_fbyevDx1-qK0^8Qpf%xj;4IGX5s@-t%qSa6t_zD=7P>Dys$XG6 zyn5A~RVFE*vwdFk5BygFk|-jvZ>x3dvJ0-dw*<|!$-T>A8{xk8`V(-U4H+gw>Ptgy z3?1PYsf)A3RimBD)k1HCjO1q8nz5=qP??|D_t2a6W{y5ZYTh=Que4k1#{ELfOxU?%5YId?53$vA(-vu!hXNFD{JCw(w|G0w!($(a$j+^Ld0zYq;IgVH;^I|uUN p-nzU2oX7ufFQ@*5^ER>6;Y6u16WbUa@H!4UYH9mhp2hFi{tZIW^`HO% literal 0 HcmV?d00001