From ac045dbec5e1372cbba44ef8a4ea36bab47d0aa7 Mon Sep 17 00:00:00 2001
From: Manny Gimond <mgimond@colby.edu>
Date: Mon, 5 Feb 2024 09:49:41 -0500
Subject: [PATCH] wrapped up edits

---
 docs/index.html                               |  12 +-
 docs/intro.html                               |   4 +-
 docs/resistant_lines.html                     |  64 ++-
 .../figure-html/unnamed-chunk-10-1.png        | Bin 5251 -> 5898 bytes
 .../figure-html/unnamed-chunk-11-1.png        | Bin 10993 -> 11921 bytes
 .../figure-html/unnamed-chunk-19-1.png        | Bin 5692 -> 5133 bytes
 .../figure-html/unnamed-chunk-21-1.png        | Bin 5551 -> 5133 bytes
 docs/search.json                              |  25 +-
 docs/sl_plot.html                             |  24 +-
 .../figure-html/unnamed-chunk-3-1.png         | Bin 16974 -> 17027 bytes
 .../figure-html/unnamed-chunk-4-1.png         | Bin 9826 -> 10038 bytes
 .../figure-html/unnamed-chunk-7-1.png         | Bin 12205 -> 12125 bytes
 docs/two_way.html                             | 144 +++---
 .../figure-html/unnamed-chunk-14-1.png        | Bin 8904 -> 9111 bytes
 example.knit.md                               | 444 ++++++++++++++++++
 example_files/execute-results/html.json       |  18 +
 index.qmd                                     |   2 +-
 intro.qmd                                     |   2 +-
 resistant_lines.qmd                           |  46 +-
 ...-10_41f87f969de578f7dc1e7a8ba640d2b3.RData | Bin 0 -> 244 bytes
 ...k-10_41f87f969de578f7dc1e7a8ba640d2b3.rdb} | Bin
 ...k-10_41f87f969de578f7dc1e7a8ba640d2b3.rdx} | Bin
 ...-10_f05e07280210339891d5d97d22ddb550.RData | Bin 243 -> 0 bytes
 ...-11_7e538dd616e025fe6922c952147b2533.RData | Bin 0 -> 244 bytes
 ...k-11_7e538dd616e025fe6922c952147b2533.rdb} | Bin
 ...k-11_7e538dd616e025fe6922c952147b2533.rdx} | Bin
 ...-11_b19fce4230a230eb339f211b686407eb.RData | Bin 243 -> 0 bytes
 ...-15_7494a1816f080868e5824f192c16c90d.RData | Bin 335 -> 0 bytes
 ...-15_c9fad914b2da127567b8036becee7f07.RData | Bin 0 -> 346 bytes
 ...k-15_c9fad914b2da127567b8036becee7f07.rdb} |   0
 ...k-15_c9fad914b2da127567b8036becee7f07.rdx} | Bin
 ...nk-16_c70a75f3fef1561cb7ed8a2201a63220.rdb | Bin 14479 -> 14477 bytes
 ...nk-16_c70a75f3fef1561cb7ed8a2201a63220.rdx | Bin 310 -> 310 bytes
 ...nk-17_2a05749d67b8200d4ea3d0f35a10d198.rdb | Bin 5280 -> 5280 bytes
 ...-18_98214ea5eb9efd2489658138170116af.RData | Bin 413 -> 0 bytes
 ...-18_bd557fbeb46fffce48702dba906e7707.RData | Bin 0 -> 422 bytes
 ...k-18_bd557fbeb46fffce48702dba906e7707.rdb} | Bin
 ...k-18_bd557fbeb46fffce48702dba906e7707.rdx} | Bin
 ...-19_48588591ed562775d36db603ab76dc0a.RData | Bin 0 -> 382 bytes
 ...k-19_48588591ed562775d36db603ab76dc0a.rdb} |   0
 ...k-19_48588591ed562775d36db603ab76dc0a.rdx} | Bin
 ...-19_5736d0c7f23d2dcbe1a6a29ebaca245d.RData | Bin 404 -> 0 bytes
 ...k-1_0e263fe5f98ae08dcce973f6ebb78bcf.RData | Bin 170 -> 0 bytes
 ...unk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdb | Bin 1370 -> 0 bytes
 ...unk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdx | Bin 158 -> 0 bytes
 ...-21_0a271fc46f5b247bd6ee9b36c233b494.RData | Bin 0 -> 383 bytes
 ...k-21_0a271fc46f5b247bd6ee9b36c233b494.rdb} |   0
 ...k-21_0a271fc46f5b247bd6ee9b36c233b494.rdx} | Bin
 ...-21_f34299528a71404319578f2d9f21372b.RData | Bin 423 -> 0 bytes
 ...k-2_fe5120f1633224257ee4d0dcff357d33.RData | Bin 836 -> 836 bytes
 ...unk-2_fe5120f1633224257ee4d0dcff357d33.rdb | Bin 318 -> 320 bytes
 ...unk-2_fe5120f1633224257ee4d0dcff357d33.rdx | Bin 208 -> 208 bytes
 .../figure-html/unnamed-chunk-10-1.png        | Bin 5251 -> 5898 bytes
 .../figure-html/unnamed-chunk-11-1.png        | Bin 10993 -> 11921 bytes
 .../figure-html/unnamed-chunk-13-1.png        | Bin 13456 -> 0 bytes
 .../figure-html/unnamed-chunk-19-1.png        | Bin 5692 -> 5133 bytes
 .../figure-html/unnamed-chunk-21-1.png        | Bin 5551 -> 5133 bytes
 sl_plot.qmd                                   |   4 +-
 ...k-1_9d27599af8b18542bf589d5de9a52edf.RData | Bin 163 -> 0 bytes
 ...unk-1_9d27599af8b18542bf589d5de9a52edf.rdb | Bin 1370 -> 0 bytes
 ...unk-1_9d27599af8b18542bf589d5de9a52edf.rdx | Bin 158 -> 0 bytes
 ...k-2_a9e0c5c25fa201d342586fad77e0b216.RData | Bin 0 -> 814 bytes
 ...unk-2_a9e0c5c25fa201d342586fad77e0b216.rdb | Bin 0 -> 320 bytes
 ...unk-2_a9e0c5c25fa201d342586fad77e0b216.rdx | Bin 0 -> 204 bytes
 ...k-2_ddef71e58918eb94c9077c76bf467040.RData | Bin 783 -> 0 bytes
 ...unk-2_ddef71e58918eb94c9077c76bf467040.rdb | Bin 318 -> 0 bytes
 ...unk-2_ddef71e58918eb94c9077c76bf467040.rdx | Bin 204 -> 0 bytes
 ...k-3_9187cec471b10956d63ffc9a30e6f07a.RData | Bin 3141 -> 3142 bytes
 ...k-4_c31935faa3125f3844ba51b516baafae.RData | Bin 3167 -> 3168 bytes
 ...k-5_e930bbfdb7e1af934707bcd46bff54b4.RData | Bin 3127 -> 3129 bytes
 ...k-6_6d3fd12613d9bfbd45d59b658e228128.RData | Bin 2878 -> 2879 bytes
 ...k-7_2eb9368a33f85e5ca3bb37b49231d052.RData | Bin 3183 -> 3183 bytes
 .../figure-html/unnamed-chunk-3-1.png         | Bin 16974 -> 17027 bytes
 .../figure-html/unnamed-chunk-4-1.png         | Bin 9826 -> 10038 bytes
 .../figure-html/unnamed-chunk-7-1.png         | Bin 12205 -> 12125 bytes
 two_way.qmd                                   |  18 +-
 two_way_cache/html/__packages                 |   1 -
 ...ock_a80bfd981f796072ed50d2d6f8d5d27e.RData | Bin 153 -> 0 bytes
 ...clock_a80bfd981f796072ed50d2d6f8d5d27e.rdb |   0
 ...clock_a80bfd981f796072ed50d2d6f8d5d27e.rdx | Bin 125 -> 0 bytes
 ...-13_32619a5000872bc3f93103779d81e8c4.RData | Bin 429 -> 441 bytes
 ...k-1_6737535602c30bc1c6e50ac19f5d2b0c.RData | Bin 163 -> 0 bytes
 ...unk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdb | Bin 1370 -> 0 bytes
 ...unk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdx | Bin 158 -> 0 bytes
 ...-22_9857b00948e76646f2b42871c3c01715.RData | Bin 347 -> 346 bytes
 ...nk-22_9857b00948e76646f2b42871c3c01715.rdb | Bin 2135 -> 2175 bytes
 ...nk-22_9857b00948e76646f2b42871c3c01715.rdx | Bin 142 -> 142 bytes
 ...-23_ce64700903bec89d35ce4c76b73761d0.RData | Bin 403 -> 405 bytes
 ...k-2_d6b817bd2dc7f751b645b175972dbeb2.RData | Bin 827 -> 829 bytes
 ...unk-2_d6b817bd2dc7f751b645b175972dbeb2.rdb | Bin 318 -> 320 bytes
 ...unk-2_d6b817bd2dc7f751b645b175972dbeb2.rdx | Bin 204 -> 204 bytes
 ...k-3_bb5971ce07d8d8c0b8943589b38c4d73.RData | Bin 787 -> 787 bytes
 two_way_files/figure-html/clock-1.png         | Bin 77229 -> 0 bytes
 .../figure-html/unnamed-chunk-13-1.png        | Bin 8904 -> 0 bytes
 .../figure-html/unnamed-chunk-14-1.png        | Bin 8904 -> 9111 bytes
 .../figure-html/unnamed-chunk-15-1.png        | Bin 31651 -> 0 bytes
 .../figure-html/unnamed-chunk-16-1.png        | Bin 31651 -> 0 bytes
 .../figure-html/unnamed-chunk-18-1.png        | Bin 26465 -> 0 bytes
 .../figure-html/unnamed-chunk-20-1.png        | Bin 6632 -> 0 bytes
 99 files changed, 642 insertions(+), 166 deletions(-)
 create mode 100644 example.knit.md
 create mode 100644 example_files/execute-results/html.json
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.RData
 rename resistant_lines_cache/html/{unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdb => unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdx => unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdx} (100%)
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.RData
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.RData
 rename resistant_lines_cache/html/{unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdb => unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdx => unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdx} (100%)
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.RData
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.RData
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.RData
 rename resistant_lines_cache/html/{unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdb => unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdx => unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdx} (100%)
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.RData
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.RData
 rename resistant_lines_cache/html/{unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdb => unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdx => unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdx} (100%)
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.RData
 rename resistant_lines_cache/html/{unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdb => unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdx => unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdx} (100%)
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.RData
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.RData
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdb
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdx
 create mode 100644 resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.RData
 rename resistant_lines_cache/html/{unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdb => unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdb} (100%)
 rename resistant_lines_cache/html/{unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdx => unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdx} (100%)
 delete mode 100644 resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.RData
 delete mode 100644 resistant_lines_files/figure-html/unnamed-chunk-13-1.png
 delete mode 100644 sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.RData
 delete mode 100644 sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdb
 delete mode 100644 sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdx
 create mode 100644 sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.RData
 create mode 100644 sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdb
 create mode 100644 sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdx
 delete mode 100755 sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.RData
 delete mode 100755 sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdb
 delete mode 100755 sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdx
 delete mode 100644 two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.RData
 delete mode 100644 two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdb
 delete mode 100644 two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdx
 delete mode 100644 two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.RData
 delete mode 100644 two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdb
 delete mode 100644 two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdx
 delete mode 100644 two_way_files/figure-html/clock-1.png
 delete mode 100644 two_way_files/figure-html/unnamed-chunk-13-1.png
 delete mode 100644 two_way_files/figure-html/unnamed-chunk-15-1.png
 delete mode 100644 two_way_files/figure-html/unnamed-chunk-16-1.png
 delete mode 100644 two_way_files/figure-html/unnamed-chunk-18-1.png
 delete mode 100644 two_way_files/figure-html/unnamed-chunk-20-1.png

diff --git a/docs/index.html b/docs/index.html
index 75e6ca26..d1a49c33 100755
--- a/docs/index.html
+++ b/docs/index.html
@@ -7,7 +7,7 @@
 <meta name="viewport" content="width=device-width, initial-scale=1.0, user-scalable=yes">
 
 <meta name="author" content="Manny Gimond">
-<meta name="dcterms.date" content="2024-02-03">
+<meta name="dcterms.date" content="2024-02-05">
 
 <title>Exploratory Data Analysis in R</title>
 <style>
@@ -334,7 +334,7 @@
 </li>
           <li class="sidebar-item">
   <div class="sidebar-item-container"> 
-  <a href="./robustness.html" class="sidebar-item-text sidebar-link">
+  <a href="./case_study.html" class="sidebar-item-text sidebar-link">
  <span class="menu-text"><span class="chapter-number">23</span>&nbsp; <span class="chapter-title">A working example: t-tests and re-expression</span></span></a>
   </div>
 </li>
@@ -457,7 +457,7 @@ <h1 class="title">Exploratory Data Analysis in R</h1>
     <div>
     <div class="quarto-title-meta-heading">Published</div>
     <div class="quarto-title-meta-contents">
-      <p class="date">February 3, 2024</p>
+      <p class="date">February 5, 2024</p>
     </div>
   </div>
   
@@ -471,13 +471,13 @@ <h1 class="title">Exploratory Data Analysis in R</h1>
 <h1 class="unnumbered">Preface</h1>
 <p>This book is a compilation of lecture notes used in an <em>Exploratory Data Analysis in R</em> course taught to undergraduates at Colby College. The course assumes little to no background in quantitative analysis nor in computer programming and was first taught in Spring, 2015. The course introduces students to data manipulation in R, data exploration (in the spirit of John Tukey’s EDA) and the R markdown language. Many of the visualization techniques are adopted from William Cleveland’s <em>Data Visualization</em> book.</p>
 <p>The base R plotting environment and the <code>ggplot2</code> ecosystem are used throughout this book. While a chapter is dedicated to the <code>lattice</code> plotting package, its functions are not used outside of that chapter given that <code>ggplot2</code> offers many of <code>lattice</code>’s functionality.</p>
-<p>While great effort is made to adopt a consist plotting environment throughout this book (this being <code>ggplot2</code>, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the <code>tukeyedar</code> package. The <a href="https://github.com/mgimond/tukeyedar/">package</a> can be downloaded from GitHub via the command:</p>
-<div class="cell" data-hash="index_cache/html/unnamed-chunk-1_92abb4a22322b722d1af3b88b82b6e95">
+<p>While great effort is made to adopt a consistent plotting environment throughout this book (this being <code>ggplot2</code>, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the <code>tukeyedar</code> package. The <a href="https://github.com/mgimond/tukeyedar/">package</a> can be downloaded from GitHub via the command:</p>
+<div class="cell">
 <div class="sourceCode cell-code" id="cb1"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb1-1"><a href="#cb1-1" aria-hidden="true" tabindex="-1"></a>devtools<span class="sc">::</span><span class="fu">install_github</span>(<span class="st">"mgimond/tukeyedar"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <p>Note that installing the GitHub package will require that the <code>devtools</code> package be installed first.</p>
 <p>Functions making use of the <code>tukeyedar</code> package will be highlighted in a peach/pink code block as opposed to the default light yellow code block used for all other code blocks. For example, if <code>tukeyedar</code>’s <code>eda_qq</code> function is used, the code block will take on the following appearance:</p>
-<div class="cell" data-hash="index_cache/html/unnamed-chunk-2_7743d95d3556383c2327130315418249">
+<div class="cell">
 <div class="sourceCode cell-code" id="cb2"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb2-1"><a href="#cb2-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(tukeyedar)</span>
 <span id="cb2-2"><a href="#cb2-2" aria-hidden="true" tabindex="-1"></a><span class="fu">eda_qq</span>(Tenor, Bass)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
diff --git a/docs/intro.html b/docs/intro.html
index 429cb45e..edda3dd1 100755
--- a/docs/intro.html
+++ b/docs/intro.html
@@ -333,7 +333,7 @@
 </li>
           <li class="sidebar-item">
   <div class="sidebar-item-container"> 
-  <a href="./robustness.html" class="sidebar-item-text sidebar-link">
+  <a href="./case_study.html" class="sidebar-item-text sidebar-link">
  <span class="menu-text"><span class="chapter-number">23</span>&nbsp; <span class="chapter-title">A working example: t-tests and re-expression</span></span></a>
   </div>
 </li>
@@ -650,7 +650,7 @@ <h3 data-number="1.3.4" class="anchored" data-anchor-id="reproducible-analysis">
 <section id="creating-dynamic-documents-using-r-markdown" class="level2" data-number="1.4">
 <h2 data-number="1.4" class="anchored" data-anchor-id="creating-dynamic-documents-using-r-markdown"><span class="header-section-number">1.4</span> Creating dynamic documents using R Markdown</h2>
 <p>Another source of error in the write-up of a report or publication is the linking of tables, figures and statistical summaries to the write-up. Typically, one saves statistical plots as image files then loads the image into the document. However, the figures may have gone through many different iterations resulting in many different versions of the image file in a working folder. Add to this many other figures, data table files and statistical results from various pieces of software, one quickly realizes the potential for embedding the wrong image files in the document or embedding the wrong statistical summaries in the text. Furthermore, the researcher is then required to properly archive and document the provenance of each figure, data table or statistical summary resulting in a complex structure of files and directories in the project folder thus increasing the odds of an irreproducible analysis.</p>
-<p>Confining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document–such environments are called dynamic documents. In this course, we will use the <a href="http://rmarkdown.rstudio.com/">R Markdown authoring tool</a> which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown!. You can view the R Markdown files <a href="https://github.com/mgimond/ES218">on this author’s GitHub repository</a>.</p>
+<p>Confining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document–such environments are called dynamic documents. In this course, we will use the <a href="http://rmarkdown.rstudio.com/">R Markdown authoring tool</a> which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown! You can view the R Markdown files <a href="https://github.com/mgimond/ES218">on this author’s GitHub repository</a>.</p>
 
 
 </section>
diff --git a/docs/resistant_lines.html b/docs/resistant_lines.html
index 8b013c4f..26eb1ba9 100644
--- a/docs/resistant_lines.html
+++ b/docs/resistant_lines.html
@@ -563,7 +563,7 @@ <h2 data-number="25.1" class="anchored" data-anchor-id="introduction"><span clas
 </div>
 </div>
 <p>The slope dropped from 2 to 0.86 because of a single point!</p>
-<p>If our goal is to explore what the <em>bulk</em> of the data has to say about the phenomena being investigated, we certainly don’t want a few “maverick” values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are the <strong>resistant line</strong> (that builds off of Tukey’s <strong>3-point summary line</strong>) and the <strong>bisquare</strong> robust estimation method.</p>
+<p>If our goal is to explore what the <em>bulk</em> of the data has to say about the phenomena being investigated, we certainly don’t want a few “maverick” values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are <strong>Tukey’s resistant line</strong> and the <strong>bisquare</strong> robust estimation method.</p>
 <p>&nbsp;&nbsp;</p>
 </section>
 <section id="robust-lines" class="level2" data-number="25.2">
@@ -571,20 +571,19 @@ <h2 data-number="25.2" class="anchored" data-anchor-id="robust-lines"><span clas
 <p>&nbsp;&nbsp;</p>
 <section id="tukeys-resistant-line" class="level3" data-number="25.2.1">
 <h3 data-number="25.2.1" class="anchored" data-anchor-id="tukeys-resistant-line"><span class="header-section-number">25.2.1</span> Tukey’s resistant line</h3>
-<p>The idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. Two half-slopes are then used to join the three points. Note that points that share the same x value are lumped into the same batch which can lead to unequal group sizes. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables. Such plots are often used to help guide re-expression of the variables x or y or both for the sole purpose of straightening the x-y relationship.</p>
-<p>Let’s look at an example using the last (modified) dataset. First, we divide the plot into three approximately equal batches.</p>
+<p>The idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. The batches’ median values are then used to compute the slope and intercept. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables.</p>
+<p>Let’s look at an example of its implementation. We’ll continue with the example used in the previous section. First, we divide the plot into three approximately equal batches.</p>
 <div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-7_b8f03c002c624a936661d3fc72e36a2d">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-7-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>Next, compute the median x and y values within each section.</p>
+<p>Next, we compute the median x and y values within each section.</p>
 <div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-8_3f38d7ceef20e0dfcde207f1ab4a141e">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-8-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>Note that we do not include the same point in any two median calculations. This implies that for the mid-third of the data, we do not include the point straddling the left boundary line when computing its median value. Likewise with the right-third of the data.</p>
 <p>The x median values are 2.5, 6, 9.5 and the y median values are 10, 17, 22 respectively.</p>
 <p>The two end medians are used to compute the slope as:</p>
 <p><span class="math display">\[
@@ -602,28 +601,28 @@ <h3 data-number="25.2.1" class="anchored" data-anchor-id="tukeys-resistant-line"
 </div>
 <p>This is not bad for a first iteration. But the outlier’s influence is still present given that the line is not passing through all nine points. Recall that the goal is to <em>not</em> allow one lone observation from influencing a fitted line.</p>
 <p>From this first iteration, we can extract the residuals. A line is then fitted to the residuals following the same procedure outlined above.</p>
-<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550">
+<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-10-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>The initial model slope and intercept are 6.43 and 1.71 respectively and the residual’s slope and intercept are -1.22 and 0.24 respectively. The residual slope is then added to the first computed slope and the process is again repeated thus generating the following tweaked slope and updated residuals:</p>
-<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb">
+<p>The initial model intercept and slope are 6.429 and 1.714 respectively and the residual’s slope and intercept are -1.224 and 0.245 respectively. The residual slope is then added to the first computed slope giving us an updated slope of 1.959 and the process is again repeated thus generating the following tweaked slope and updated residuals:</p>
+<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-11-1.png" class="img-fluid" width="576"></p>
 </div>
 </div>
-<p>The updated slope is now 5.2. The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. One more iteration should be enough to stabilize the residuals. Giving use the following fitted line whose intercept and slope are 5.03 and 1.99 respectively</p>
+<p>The second set of residuals is added to the previously computed slope giving us an updated slope of 1.994. The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. This took three iterations giving us the final fitted line whose intercept and slope are 5.03 and 1.99 respectively–very close to the actual relationship between the two variables.</p>
 <div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-12_e85a23ab58acc055ba33325b3854ece6">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-12-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>Tukey’s resistant line can be computed using the R built-in <code>line()</code> function. You specify the number of iteration via the <code>iter</code> argument. Usually, five iterations will be enough.</p>
+<p>Tukey’s resistant line can be computed using the R built-in <code>line()</code> function. You specify the maximum number of iterations via the <code>iter</code> argument. Usually, five iterations will be enough. But, the iteration will stop before the maximum number of iterations is reached if the residual slope stabilizes before then.</p>
 <div class="cell" data-hash="resistant_lines_cache/html/unnamed-chunk-13_be2f218c284612df28118901bdba9dea">
 <div class="sourceCode cell-code" id="cb7"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb7-1"><a href="#cb7-1" aria-hidden="true" tabindex="-1"></a>r.fit <span class="ot">&lt;-</span> <span class="fu">line</span>(x,y, <span class="at">iter =</span> <span class="dv">5</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
-<p>You can the resistant to a base plot as follows:</p>
+<p>You can add the resistant line to a base plot as follows:</p>
 <div class="cell" data-hash="resistant_lines_cache/html/unnamed-chunk-14_613f81c207e185507c6d409afd4aae11">
 <div class="sourceCode cell-code" id="cb8"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb8-1"><a href="#cb8-1" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>(y <span class="sc">~</span> x, df)</span>
 <span id="cb8-2"><a href="#cb8-2" aria-hidden="true" tabindex="-1"></a><span class="fu">abline</span>(r.fit, <span class="at">col =</span> <span class="st">"red"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
@@ -632,11 +631,12 @@ <h3 data-number="25.2.1" class="anchored" data-anchor-id="tukeys-resistant-line"
 </div>
 </div>
 <p>You can also add the line to a <code>ggplot</code>:</p>
-<div class="cell" data-hash="resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d">
-<div class="sourceCode cell-code" id="cb9"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb9-1"><a href="#cb9-1" aria-hidden="true" tabindex="-1"></a><span class="fu">ggplot</span>(df, <span class="fu">aes</span>(x,y)) <span class="sc">+</span> <span class="fu">geom_point</span>() <span class="sc">+</span></span>
-<span id="cb9-2"><a href="#cb9-2" aria-hidden="true" tabindex="-1"></a>  <span class="fu">geom_abline</span>(<span class="at">intercept =</span> r.fit<span class="sc">$</span>coefficients[<span class="dv">1</span>], </span>
-<span id="cb9-3"><a href="#cb9-3" aria-hidden="true" tabindex="-1"></a>              <span class="at">slope =</span> r.fit<span class="sc">$</span>coefficients[<span class="dv">2</span>],</span>
-<span id="cb9-4"><a href="#cb9-4" aria-hidden="true" tabindex="-1"></a>              <span class="at">col =</span> <span class="st">"red"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="cell" data-hash="resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07">
+<div class="sourceCode cell-code" id="cb9"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb9-1"><a href="#cb9-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(ggplot2)</span>
+<span id="cb9-2"><a href="#cb9-2" aria-hidden="true" tabindex="-1"></a><span class="fu">ggplot</span>(df, <span class="fu">aes</span>(x,y)) <span class="sc">+</span> <span class="fu">geom_point</span>() <span class="sc">+</span></span>
+<span id="cb9-3"><a href="#cb9-3" aria-hidden="true" tabindex="-1"></a>  <span class="fu">geom_abline</span>(<span class="at">intercept =</span> r.fit<span class="sc">$</span>coefficients[<span class="dv">1</span>], </span>
+<span id="cb9-4"><a href="#cb9-4" aria-hidden="true" tabindex="-1"></a>              <span class="at">slope =</span> r.fit<span class="sc">$</span>coefficients[<span class="dv">2</span>],</span>
+<span id="cb9-5"><a href="#cb9-5" aria-hidden="true" tabindex="-1"></a>              <span class="at">col =</span> <span class="st">"red"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-15-1.png" class="img-fluid" width="288"></p>
 </div>
@@ -645,7 +645,7 @@ <h3 data-number="25.2.1" class="anchored" data-anchor-id="tukeys-resistant-line"
 <section id="bisquare" class="level3" data-number="25.2.2">
 <h3 data-number="25.2.2" class="anchored" data-anchor-id="bisquare"><span class="header-section-number">25.2.2</span> Bisquare</h3>
 <p>A bisquare fitting strategy makes use of a non-parametric model that assigns <em>weights</em> to observations based on their proximity to the center of the distribution. The closer an observation is to that center, the greater its weight.</p>
-<p>The first step is to run a linear regression model on the data then to extract its residuals. Next, a weighting scheme is fit to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as <code>1</code> then are modified following the residuals derived from the most recent regression model.</p>
+<p>The first step is to run a linear regression model on the data. The next step is to extract its residuals. Next, a weighting scheme is fitted to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as <code>1</code> then are modified following the residuals derived from the most recent regression model.</p>
 <div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-16_c70a75f3fef1561cb7ed8a2201a63220">
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-16-1.png" class="img-fluid" width="768"></p>
@@ -677,9 +677,9 @@ <h3 data-number="25.2.2" class="anchored" data-anchor-id="bisquare"><span class=
 <p>In the above example, the bisquare method does a great job in eliminating the outlier’s influence.</p>
 <section id="built-in-implementation-of-the-bisquare" class="level4" data-number="25.2.2.1">
 <h4 data-number="25.2.2.1" class="anchored" data-anchor-id="built-in-implementation-of-the-bisquare"><span class="header-section-number">25.2.2.1</span> Built-in implementation of the bisquare</h4>
-<p>The <code>MASS</code> package has a robust linear modeling function called <code>rlm</code> that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented here, but the difference will be insignificant for the most part.</p>
-<p>Note that if you make use of <code>dplyr</code> in a workflow, loading <code>MASS</code> after <code>dplyr</code> will mask dplyr’s <code>select</code> function. This can be problematic. So you either want to load <code>MASS</code> before <code>dplyr</code>, or you can call the function via <code>MASS::rlm</code>. An example of its use follows. The default regression model is added as a dashed line for reference.</p>
-<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af">
+<p>The <code>MASS</code> package has a robust linear modeling function called <code>rlm</code> that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented above, but the difference will be insignificant for the most part.</p>
+<p>Note that if you make use of <code>dplyr</code> in a workflow, loading <code>MASS</code> after <code>dplyr</code> will mask dplyr’s <code>select</code> function. This can be problematic. So you either want to load <code>MASS</code> before <code>dplyr</code>, or you can call the function via <code>MASS::rlm</code>. An example of its use follows.</p>
+<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707">
 <div class="sourceCode cell-code" id="cb11"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb11-1"><a href="#cb11-1" aria-hidden="true" tabindex="-1"></a>dat <span class="ot">&lt;-</span> <span class="fu">data.frame</span>(x,y)</span>
 <span id="cb11-2"><a href="#cb11-2" aria-hidden="true" tabindex="-1"></a>M   <span class="ot">&lt;-</span> <span class="fu">lm</span>( y <span class="sc">~</span> x, <span class="at">dat=</span>dat)</span>
 <span id="cb11-3"><a href="#cb11-3" aria-hidden="true" tabindex="-1"></a>Mr  <span class="ot">&lt;-</span> MASS<span class="sc">::</span><span class="fu">rlm</span>( y <span class="sc">~</span> x, <span class="at">dat=</span>dat, <span class="at">psi=</span><span class="st">"psi.bisquare"</span>)</span>
@@ -688,19 +688,19 @@ <h4 data-number="25.2.2.1" class="anchored" data-anchor-id="built-in-implementat
 <span id="cb11-6"><a href="#cb11-6" aria-hidden="true" tabindex="-1"></a><span class="co"># Add the robust line</span></span>
 <span id="cb11-7"><a href="#cb11-7" aria-hidden="true" tabindex="-1"></a><span class="fu">abline</span>( Mr, <span class="at">col=</span><span class="st">"red"</span>)</span>
 <span id="cb11-8"><a href="#cb11-8" aria-hidden="true" tabindex="-1"></a></span>
-<span id="cb11-9"><a href="#cb11-9" aria-hidden="true" tabindex="-1"></a><span class="co"># Add the default regression line</span></span>
+<span id="cb11-9"><a href="#cb11-9" aria-hidden="true" tabindex="-1"></a><span class="co"># Add the default regression line for reference</span></span>
 <span id="cb11-10"><a href="#cb11-10" aria-hidden="true" tabindex="-1"></a><span class="fu">abline</span>( M , <span class="at">col=</span><span class="st">"grey50"</span>, <span class="at">lty=</span><span class="dv">2</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-18-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
+<p>The default regression model is added as a dashed line for reference.</p>
 <p>The function <code>rlm</code> can also be called directly from within <code>ggplot</code>.</p>
-<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d">
+<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a">
 <div class="sourceCode cell-code" id="cb12"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb12-1"><a href="#cb12-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(ggplot2)</span>
 <span id="cb12-2"><a href="#cb12-2" aria-hidden="true" tabindex="-1"></a><span class="fu">ggplot</span>(dat, <span class="fu">aes</span>(<span class="at">x=</span>x, <span class="at">y=</span>y)) <span class="sc">+</span> <span class="fu">geom_point</span>() <span class="sc">+</span> </span>
-<span id="cb12-3"><a href="#cb12-3" aria-hidden="true" tabindex="-1"></a>       <span class="fu">stat_smooth</span>(<span class="at">method =</span> <span class="st">"lm"</span>, <span class="at">se =</span> <span class="cn">FALSE</span>, <span class="at">col =</span> <span class="st">"grey50"</span>, <span class="at">lty =</span> <span class="dv">2</span>) <span class="sc">+</span></span>
-<span id="cb12-4"><a href="#cb12-4" aria-hidden="true" tabindex="-1"></a>       <span class="fu">stat_smooth</span>(<span class="at">method =</span> MASS<span class="sc">::</span>rlm, <span class="at">se =</span> <span class="cn">FALSE</span>, <span class="at">col =</span> <span class="st">"red"</span>,</span>
-<span id="cb12-5"><a href="#cb12-5" aria-hidden="true" tabindex="-1"></a>                   <span class="at">method.args =</span> <span class="fu">list</span>(<span class="at">psi =</span> <span class="st">"psi.bisquare"</span>))</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<span id="cb12-3"><a href="#cb12-3" aria-hidden="true" tabindex="-1"></a>       <span class="fu">stat_smooth</span>(<span class="at">method =</span> MASS<span class="sc">::</span>rlm, <span class="at">se =</span> <span class="cn">FALSE</span>, <span class="at">col =</span> <span class="st">"red"</span>,</span>
+<span id="cb12-4"><a href="#cb12-4" aria-hidden="true" tabindex="-1"></a>                   <span class="at">method.args =</span> <span class="fu">list</span>(<span class="at">psi =</span> <span class="st">"psi.bisquare"</span>))</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-19-1.png" class="img-fluid" width="288"></p>
 </div>
@@ -711,7 +711,7 @@ <h4 data-number="25.2.2.1" class="anchored" data-anchor-id="built-in-implementat
 </section>
 <section id="robust-loess" class="level2" data-number="25.3">
 <h2 data-number="25.3" class="anchored" data-anchor-id="robust-loess"><span class="header-section-number">25.3</span> Robust loess</h2>
-<p>The bisquare estimation method can also be extended to the loess smoothing function by passing the <code>"symmetric"</code> option to the <code>family</code> parameter.</p>
+<p>The loess fit is also not immune to outliers. The bisquare estimation method can be extended to the loess smoothing function by passing the <code>"symmetric"</code> option to the <code>family</code> argument.</p>
 <div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-20_a9b9ab144bdaec92a590b3ee3b197474">
 <div class="sourceCode cell-code" id="cb13"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb13-1"><a href="#cb13-1" aria-hidden="true" tabindex="-1"></a><span class="co"># Fit a regular loess model</span></span>
 <span id="cb13-2"><a href="#cb13-2" aria-hidden="true" tabindex="-1"></a>lo <span class="ot">&lt;-</span> <span class="fu">loess</span>(y <span class="sc">~</span> x, dat)</span>
@@ -731,16 +731,14 @@ <h2 data-number="25.3" class="anchored" data-anchor-id="robust-loess"><span clas
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-20-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>The default loess fit is added as a dashed line for reference.</p>
+<p>The robust loess is in red, the default loess fit is added as a dashed line for reference.</p>
 <p>The robust <code>loess</code> can be implemented in <code>ggplot2</code>’s <code>stat_smooth</code> function as follows:</p>
-<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b">
+<div class="cell" data-small.mar="true" data-hash="resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494">
 <div class="sourceCode cell-code" id="cb14"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb14-1"><a href="#cb14-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(ggplot2)</span>
 <span id="cb14-2"><a href="#cb14-2" aria-hidden="true" tabindex="-1"></a><span class="fu">ggplot</span>(dat, <span class="fu">aes</span>(<span class="at">x=</span>x, <span class="at">y=</span>y)) <span class="sc">+</span> <span class="fu">geom_point</span>() <span class="sc">+</span> </span>
-<span id="cb14-3"><a href="#cb14-3" aria-hidden="true" tabindex="-1"></a>          <span class="fu">stat_smooth</span>(<span class="at">method =</span> <span class="st">"loess"</span>,                       <span class="co"># Regular loess </span></span>
-<span id="cb14-4"><a href="#cb14-4" aria-hidden="true" tabindex="-1"></a>                      <span class="at">se=</span><span class="cn">FALSE</span>, <span class="at">col=</span><span class="st">"grey50"</span>, <span class="at">lty=</span><span class="dv">2</span>)  <span class="sc">+</span>    </span>
-<span id="cb14-5"><a href="#cb14-5" aria-hidden="true" tabindex="-1"></a>          <span class="fu">stat_smooth</span>(<span class="at">method =</span> <span class="st">"loess"</span>, </span>
-<span id="cb14-6"><a href="#cb14-6" aria-hidden="true" tabindex="-1"></a>                      <span class="at">method.args =</span> <span class="fu">list</span>(<span class="at">family=</span><span class="st">"symmetric"</span>), <span class="co"># Robust loess</span></span>
-<span id="cb14-7"><a href="#cb14-7" aria-hidden="true" tabindex="-1"></a>                      <span class="at">se=</span><span class="cn">FALSE</span>,  <span class="at">col=</span><span class="st">"red"</span>) </span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<span id="cb14-3"><a href="#cb14-3" aria-hidden="true" tabindex="-1"></a>          <span class="fu">stat_smooth</span>(<span class="at">method =</span> <span class="st">"loess"</span>, </span>
+<span id="cb14-4"><a href="#cb14-4" aria-hidden="true" tabindex="-1"></a>                      <span class="at">method.args =</span> <span class="fu">list</span>(<span class="at">family=</span><span class="st">"symmetric"</span>), </span>
+<span id="cb14-5"><a href="#cb14-5" aria-hidden="true" tabindex="-1"></a>                      <span class="at">se=</span><span class="cn">FALSE</span>,  <span class="at">col=</span><span class="st">"red"</span>) </span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="resistant_lines_files/figure-html/unnamed-chunk-21-1.png" class="img-fluid" width="288"></p>
 </div>
diff --git a/docs/resistant_lines_files/figure-html/unnamed-chunk-10-1.png b/docs/resistant_lines_files/figure-html/unnamed-chunk-10-1.png
index 275a24ffaf1e0461059758a3fe52dadc90992ee6..b6658b225cafe633e3ca29aca9b984e8d4ca9cb1 100644
GIT binary patch
literal 5898
zcmd5=c|4Tgzt@;y>`Ox^yUG@kr4sW9MOns9S<1ePL=5R6d=o?Y$`+<YXlz-shLnsg
zV@pWFSh6HzOJmG^xZnHxet-9m`}@7_{oVVz=k<P`d0wA$&gY!-S>ETIxr;GA&%r9h
z%D}+DVW6*T#=rmrb{`}o0|SGZt_&RdX~q~@=o#%6KO-ZYk)NNDAM_>|;c!McA|%=s
z>=v9K4g$ds5)uf01Tqe4?FV5`j3eL(L>wd}5^+T6P0!5C%*)Fo_!$v!egqtDw+Dep
zAVMG$$n?g>Mk3CLi1Q;7pdOHnOeE8Zbo%J%D4F0#Cg8|K2m~^5uZ9d2I#f@l)9DNh
zbRv#UCeX=5Iwalgv@6zlC*BIJh2@&Q?R5qQ;keyrU()o7D+2@H4+C9oi<^&@va!zn
zHJNe3(iiz3`pH~RkAY!9riYw@Ho?XwBYoj?{~Pieucqye(VmUO=g#IDDEG$96|Oaw
z?{~e(02VEC0wZGF`v1?tu7?kGTUqqC7QQ#u)FVQ>+Vo?=b%Q)oD*f}gJ{V|R&!>ZL
z6np^;+vYnV2h<sP3#?|oQ&m=l?ciZoVx>ueq15sPR3#@&^Y~j7@l3?LB^UI`$me0o
z7DT7nituRCZEQ`oBDa5)Qfz(SEXB!ZJ#r|8cR1#T%d&kol*{|xnEoVXR&-QvR5j`#
z)X$3Lcdp3xc1vpL*2YMbCHD?_xgOy)xi%SU8B~1knsYiVLtB#|QY3v&Bln8e7lngt
zUZ-|k^MT-;kdG+)Ql8HOPXIdI)oUw|(p#k5A9$f-JeZ<NUtXdX@#d8`8=B7eYQUBK
zPpJ|HdRDD^*M;6B?qeBvp3cF)j-Q$GPe`}yf9Lh{AX~>~hM;#nU}TZnbcJtEZvl{^
z-b$#r#3<Qp>lq)B@$}G*i)mX5pitm}q0b9p6L2-bXF!j`P`|O}MlG`mTVi1S&QjCD
zqoT4adGF?Zv4}cq6Wy*jNe=wz4OeH9!em%Yuk=i*6Ammfgz$atdLi?otIivgJ-_j6
zWfSdSDPDV+6qfk)Jqa%RHobplA`>`QmT1wD=@QK5V(rFOX(d^sbOwyq%L{MdX+&-R
zBqfAw3Kl%-7D3ZT>D#aQ7>kFHe(V^$gov!Nq}(gd>zhrY9fE~ec9qgiiAZ0h%WkzP
zKHS5a&`GW8*7PP_<d~N)3Uf>)^?al#cNWCFzT-Qv*G9rFv@UGDH<cD^OH;dycM~Pb
zTgZV{qgvI9LvUrq%1!VR<h^KAfy285t`zlJ?vUJyvkd!12dV8QqZ+-At5=?n+*R;8
z`C6g6jIh=%f7O-f^P;@(X8oQ+2k(7qxzG|%M|<atf`+ulNXORxZqDY&hN9pn2j%yy
z6)S_O`0d!oK%b{p?d|z_e5eS;aclcTf7TpJnUUGBru>BTd6h<c$RZdp({OR8b7br^
z8ZDq|rH&llWHc(Kf)CvWvofnyPwgaG>*);<I-QJqtsvuK;8D8TV#&b&J_PW9;5+dT
z9(skA6XNK;&d$n(5Fd2MwblX)i9W{;D+R^=lJUX_IE>{_M5!$+1lBbPgDok6{2L`d
zW+x}d>Tyewn41sy=O!n!CSc%*7)IS{Cw#OzUYt~5doN(*U`HyN%2BS34|pjuRb>BQ
zPM(AoatgYB^Jxrl*jvf?d-sLtK0G6g=6q18?o>nXS^R_Gg#Mou${qv&TXmI1Lv7>x
zR1u5QmNR?#muoKvGmlkpz+&=y<QJQ@j4$IKqGPnPE5+IF8J5D9#@mMFFhe9JP@+E{
zVBQGu0fRlR|1@KQ9ZtNMP%+JcojFw6g9Mr0gBp6-PLE=jD!Sd+$^DK=XXCsRO$&8p
zVZwDopJd(-zeqg%^*2Nv?Ra;2`#r)31TT+AgtLG2Tcr;h(}kh;s^B<l{Bl1fDTsm{
z;`KyUzI<8z;e)_zvReI!InBTvuXm!SX~{+^QGW63ZGM=&gB8rTYUb;bKroj1&e#Qt
z?WfW-+u#SK4(OhW#a>Zi?C()PT-xtv@ewITX$M;_9TTxpuD;&@tjc2peMLSu^^{lm
zxyDM8a#X@g0sA58>dR&kjbiC_K&@Je$@JT-Zx`~S*$*>~Xz2LxcnnEQ2aZx41{Bke
zNMjnKEI-;P2wyo4TQYdN>0oQqt!D3cDgwiclID7xYn9|~|90*%vhpa$_*0{3=Y;*a
zDu@@1xm!Qrfeiy??j6Hl+}ldW-W|~feLVT&p3bGCC0-h|UE~-&n#Fw(%LO^2^_{d^
zuA6s4;I+j0S1;R2uX~(iwUBTT^oD(RJllmbM+SYxk(N9ysuMNgeK#@S$4!GedDB+o
z72NPlb5)V?K`ipwN;1rseQrl3jG$VqH;)k#*-C3_Nx=hL=`p?vGNW$EOCvtHPMpst
z?rx<N07{$SqJX<(K~>+6rH_YpoW3;oT}y={;_LR0Ws0ly&)ci>4h3!bZJFN31E!@h
zRZhRthWI(tL>XCFQR`j}n$bRkGtIoNZe^XFHEBY`7TtI%*!b%USJ0f<+wU@MoKeBn
zD<6<#N>2b2XmLk_H^fD|K4F-fxW$|<aT`#M3>)7+#(Sk+ts7Nggnw+$v7DuXpwO+}
zm#BK#(wF_Qh|_f{c85*DN5eTLzK#C0SrfHwP|X?T;m<!9AF$n6bzJtGBxX1-TBFrl
z2{%;De+~gF?#Bg?{g3J1mM>y15*t}Ei*9Q*f<F)}0k{GR_kk`<^4!#uR|T_x#VNR3
zI7}PEjg;Dj^ck0{%E;dXX~w%r$gS`88J5WUXTCzY%gSY&&JN47Yci)IQ6iAaYTzjh
z1pa~+9sVQHfXvYHfEFx<8FYDnj8yP<{Dc3I9Mdj_=~&mON&+Ud#WDieRAm2{08*+C
zMSQeM4*tvv(~~d)yFin-e80&X9@+4)oz)a4MPG-*ZfF(NLMd65`y8nFaFoxAn^8}~
z0Hg@iP1)9~B2jmx5FO5Q`ElceFi_(DGa!_mwy|L;0-))is*sRU18`=TTy4p@@np&@
z7Pzl(hR;ZC6=je8oaAjL&X#gl<C2?b80FW<q1RdW0)h(^k*Eq9YFA}@K4s#}LOMwj
z^K8Q$MQkxVm;DNL7aAiTSRX9)`fjU)Zir3QJc~d1Oo0Rge<46Xf)5PtT`!k~hSdX$
zYT7OkH+1;<3n6`V8CJDan*72|OZMHRJONtIO=c}jQ)ai$8CF)DN22nfM#|<GqkQg6
z0cjxv*2;!crGe$+8V>=y{xca8WhbsSYiebosg55KNXaIjK%(}T^?%(#|AIJ?I1Ju;
zUCH(7^&f<Y+clb$6p4nV-kDi8&+k_zwm?R~0W&^j=kR*h9eTbR%j=3|AX77ST7<wZ
zo)<^0r|(|P=ER-H>o4U?kdmBQU)X2352tvqHs2haCLVW!j3iDfJ|()?8hQ*<Vsyi7
zqB|(B4-^r{9O~ot@cU3x88sJ<AQZi{8yS^^$LmPIjEqZ{<bAGYS7|JupoEg@<DUCq
zsO}5SH|LMGuRw970+%g=m*?3Y`t1q92YoK>)!zbrXN9eDo(I<IDGCBk1+a|b8OkN=
z?5C0>ZUb|%^0GI{MZh8>NAzRXN<{FJIQ>i*2lbMGZMxyw!49SfRT0qT37f@duC-Ju
z7&ajQ7g`g(`&7abd>F~OnKNg4zX%AIa~6=2N`}Mq_VVn1m|_0{2mVvj&^N$4DrP<9
z>{2pO$S+Qg(epx!gO}W02hKZ5kfI^x-K_AT2ACk%nxDyFUb?BmZfFpO=XsPchs=29
z&Ig>akt7w3YR4EQaZ7W0B7?9wqpOn*_mAWz)g7wxUPpqH$+5szlxk>2u-kn9>%(ec
zcYpwWU3~ku8**%&&U4k(r4-L^TWx#61qDO4ZOKU6Et6Z9r>`iUKIZCj_5O&74jy)S
zFa43RFREMT`hvOjkGuko<mWatsvTXP@p`nh%m!=qK^sBz5=JQuKiPBo@Y*|wG|cfE
z1p8Mg9%)`3zJkV&mfb4#aAkASj%v{&6bIrFAU|^8C=w3Uda%`}m4U4QM653n<&z?E
z;-k9(*MBP$HfBhOn^AbIVBN|sZASHEweXQ@taVU`%yG{?BIbm*c_x#b5#@FI4he}$
z)J0tS^2pkDWO;0FnU?rz8rOC8wyB}W8+#*)gAjZ3LX=#7To8Vt_E!D|kMtR&)CoTj
z+73YYpNNT*H)I0M_ReCgT(I_p%Xm`|5c>-zAQsfd|Gp67B?`7g1IknU9u|Lh&BNRz
zwzzOhPyfmuIgkG#mfTf?5aNRt`zQXnX&kwkx9OOZ5zXOXr>Z!1E8T7Q-7Qyt$lb<N
zPvqKbtw*y#w7h*Huc82DP|jY(UBfcJ(^m1u$sZ3OMwCIiaDLU?s;f*&lXIw(bsP>(
zo_E^~6&Yk@!L0Cgv#TrDa$HSH2-bCvPR2nl)5hCY7>*gT1qAxOh*q#JJ+x;x1Sn6*
z>zph9mGmaib9Zb`Pu9vZoL5eO-!@~41OLY|W%sKHt?STrke6RN_jdex$3wROvG|g5
zn!f!A4A!nIR7|x^xx-<DH@*J=c%K{C-=>GR+*QQF;_@ooisb-|Bla<?%d5;zZ+lDJ
zE$o*w+W0rg3Bb(cH-j6!PM>T)73k~XYioHOmrqu34IGtmyP8|^@vQ1%wg>zHi~YAV
z-j|gZy{{sr_V3)npI_48sue<`%(x3iBK?{yK1;l#0TC%tz-rg?pt~Bp%x7V+3`;K^
z{B-Wy*GI!Fq{J}Uz18ZmvDD%O)BCppZ85fcf9%VDIPgE+4F2oQ`JbT<^)L2h6%#1>
z+8)Kc?xfW=G}PSO^jn9)VrB~vbu~YOL${Vj5wO;&bVLVD2Jym52@YdUKp#%kM#4G&
zBhEZ5n0R#0lhZ4X_x)u4T7YnpRMKjbPtJ%A1T*vhjI)1_IaJQnhn92D3gf0I%1gh5
zN0XH8lw?!qRv3*-ZnbSZWw%baAj-aeLJ+&fur|&Z)5t8gPT4ot#LODO1<X$~k|McK
zzeH{ibTZ@VBGPM`425Z209_L^hh;ER6urHJ#gjG}o;heS&^Cd`%lq_Shco<I2G5Q&
zCWrmsDHQYk+Y#v>e)RFp?Q~YicZxLCJn*W`aPyDQ_%RmrbvVnrhk`~MR`^T~(j65=
zX}xFa*Gu(}+JcQH1jii>KCi8H<yF49=kv|&qH*I5?X=k!bocMB<L(cE!J|rBWBH=8
zg-~|f(x4PZs#bJa<41Dkv6Cm5yEAv{g@SU^eBtF<EaSBn;-+9%R{%vd^2h2KdOwwX
zxx0nxtS+41pv3lVz@1ZO`^3EuOW4_++0~@Om=y!NRMB^mrL`DIQ;>hX!CA|AT!t9_
zGY8haFmdUok@jlc(24W=B2ng!OC1efU&6UXju50|NkxL2+y2Ae95On0>6HD_ikG?%
ze$-)hyYV=tU$og*tJg*GgEv_8k%mUb=pxFA`8+*6$LLcL8k_s2MdigQmwvISsLSQ^
z>0YLXp;Ii+$zv4W4ELGiW9sZGA0Cer={lM}6wL3oFl%Kl)^~uoq*x;^8e@0H1dMlT
z-RYcC*GfDvVa=l(d5!Jy_b%)xZ14zn=d#L!1Ja@_O?T_<bkCrJ%x@|zG4j1ha1XsG
zR!^r?&gsm<GBkNgSv=M~scdVPU(+VjG_&AeezZi;^zc_IHwO+CNE}6j@x|#*EOpey
z+LTkJw5*egQAkugcGI_puVRoJ2`gsuo)|<-^?Y-b+h>ox4S+T4Ut&wpA<Ku0SRx`G
zh%N|y4%s|~0$Z+>Nc_?(>sG@x0qZtf30V&#QeqH~Z4eFB+?P+X9Y265ZwvcwmlJ{K
z4&SKT|3sIcD54&+Zy+@;dyb(imGGk+*b=f~R?v$4`R3vAl9<p3NzG5WtG{l&=WwGI
z9y*pJR@0E>JXms`-+dhOe(<JZ!)ET#3LjD6il2Vns-1y*u+VZ{k_(%~m|!anFs>XD
zdvkcXt92giX)*m0PYyly^u|TG5UH?h^u`eAtYfuV8D@9SW`qt8p^t3p(%UtAKYWU8
zieRa1pi)Xh`+J&xsnJ#~S6o?>D8ArND<&!SKR30%ZgBs-@2!^wx7c(}ElvvnVrVaa
ze%khnjw^teiQn^9|I^6xA|lL4^2M!-O(%L7*^-#xl)QB8_AS@#bU@5MFjRz^9TI9N
zmaIPQpOA>%rz3_~)ya}{Z06Q~W2pVqc!C2-?)ki+-jT!(r@Y^`S`S+D7J!918!u)g
zQBS|;1-GF)mCxG2UL^V6UHo{U3_BQZD;(I@&vW$cK5)CHux0k8V;3~9%>MTgJ;G?-
ge@Fm-ZLq__YV*Z>>3G@hzupW6dd9jXXRk#48_IDw*#H0l

literal 5251
zcmd5=2UJtb)+WW!J0e9P2ui$&0)j~OAVpM=C{jcODIyAnOOYxhfPf;+ih_^`B1%9?
za7Dm?qChm1pwbK>N=KRyAV45_3HRN%yl=g~to5(=uXom*lQZ9%%$fQ2-rww*8_45_
z#YL1v1Ox=ckJwtB6c7Ld{96bjARutkY8RCE^9X5o%G#cPq3rE5>`^Ft6z_?*&mi;a
z{2KqtKxN=jJOn?S!E1!#6;uWvBWLgsGOuuRa&n4_its3Vd<F`SN8!oC_+f5+eLXqD
zo}7Uq<9V%y$-`VSmrJA3hViIje8w=DSMYpzm^;knas>pq<P7dGo;ytD@*sX&J}f!v
z#o&!o_;=gWp#lQiQusG0b7bzkfPifJ5i5&Rk&mY70hTlyrDQK7P2vvW%Xfe(<^JSm
zqq_zg%Umw8i+o=@zCxeb3Mb{WSF5gBrxYk3Q5QZ{3bN2$5_z*9oNx^TSA*LM3CaA&
zygu{>4tgG3xiEF*4InEvz7%T#_}T5n(X1_iaJxOY5UwSVY^RM2VkTgAKXe8Ri_e>B
z7DIhomO<L7V=j!iU8#&cJ(K58v<`&GT>hW|Ui~3)hLCw4AY{9wHQGHq1UTTC`CCR>
z4!-CX8@kM^ThFak%?X36d}Tmp4VU8h-C6<VZdf?{*iLC`UALwX`Svd8aI>d4)K?f}
zaR|tglG1=e|N5#I2k4~#Te;k+fQ;Aw6j-Ja>SQ`fTo`OzS~JVW`i2%gc&^duaJ2ZQ
zD2>T-GyipfkEhp4_17rE2y;qd1+xT8ATXKn6iwW+onTn_QlF7JZa-MbkJd3}c~}?x
z@oQe_qoqwFwb*x?45X1BGx<aPH9K?<;JDL8u5A;SwZUIsg=RR06WY!>A{_wk<ZW+*
zV&Y37|H9Y|!t8}J$P0iV;k#6LpoB+DjjU~<sta;RwA~m#(Myv;UiHanjD9gx4Y{=F
zxLF^eY~yt!U5WaA@_-;jDf*Hna3ft2*>UBOA0X-b8LgFwv11ywOe`lr*pG0t(ja@g
zjynY&V+UgBF}dt9Ky6Z4=LFZ?vGtVq4qW|(bW(e;G2tTgK`>ybI%=(JQnS@G{uXA&
zqqnY@yS148vzmLmSxtw5sc$zt_=I3+SzIAaC5gsFm_=rM&Tg}$II=4hsh1kCXv5!S
zlnW~c#N9T91)mW7a@u}&NTF?H5lZ{8hL{?gEQoYgA=P8$o9>`tFK#7aRwZ{i0V(18
zEmed9v@6H5`kJl+l!C~(5%X8Eo^s{M_WSZM5@PQpVfqUSBP`oX<h?>}lFwTGmV%kz
z7q8}?EPwt8vaR1T47xzI_&8QMlK90_$3OuY1;yhpR)6u)18q}CR((yVpwq;nh8IpK
ziaj$;iaUXRtq`qbc5kC+U&2^a#-02&Ot_{wWn$BC6#o00J;gD3X6Wgi28kep!qbab
z>*6(a8J76#E-Hy|BiL)UQX1(#v$g4L@r3E&2{Rk<x{4OhF=`~NS}jd)1{%36H5jhz
z1eiHo3zsZRKHIAfZ!3g_v5Y@tS)RI5v>Z>e?;w?0Y*`YrWj+AWX}FY>&b+Q_iIcJK
ze!fSqXqhL1%mxut9JQhV$xnIqtUXU76i}tAg`lF>5?@SPY9db36p|xcK67tI$tow~
z#b9?Aj)nzD2BTfqsfq7REaQl4&lJQE6Qqi6qmSQXMAtu$y*URQnQb;?!SnhSwifiO
zObu?IE`!;475s?8IXv!wEYdGUMrMCD6^@RSAKL@Ra<>LSpUC9fUOgwbfYfDy=Q$8N
zVX3UCV?XzGmI>4n`ewar!8u>)KP&sh5Nkv|6=R#S2rg?Z5wwl2<9=Qr9z-8{&i0I8
zbzu7^1uq-H!hV<QGHwxOmnD_@%2NIAMVHGlj9P?Od37o3+3C=&D@1vjb8`C=nvYa7
z%91g;xloN<6p$H=kH`4RN?e~j5IiC;)f2p(vKMY;{fB(WsTS%ef==f*^vv_Z6MTDQ
z8`Ak#6-Jobc<F(wOwr{dvdF7Y4T=e_^jFzIUQKKCh5ANuJoxb}WP3jXIQ^@T<CYbY
zJ_wQL*GTsrfH~=`-LsggKb7l78>T-df6aq<2)NNJMkf8dSPRk>xl=UYmd-MhrWTqc
zU|<cUQ7IT1ZH6Ck^KH;?rNI(+uYbUN3>}Z3{YqEES=qr(<y$t4b4%pGN8kGbBSs5#
zxeSWzID=ynCbI!iyq8+S#lrP|B5i;h55)XC6`EN2Vk-?Vjx-_c?uQ4|Oi~F4%lq*W
z6djMnGEq>GdwmoC1AQ%RDHQK-n0)@%y#aC51^w~c+sA+#uEPEiEc^f~P@A3Um20pa
zr(Y^qy&V@UEv4ZMjwVxSCD6Oqn=ndaX6c|lue8REzxObsr{d}muz}6$I4cTK0eMAj
zZn`UaeSKlTs53FZ3b=SbNEc2N{i+xy(q@Fz+X->=#CH2s8A6KTIIBQdb^ZEi{%GXt
zSc9b|4@iRzr(<OJJpViGv$3+w@hl>pHL?<;jl~SA!%q)@&L{o4z6|=v?No<THYC64
zFi`ax@=@eZ?Y|FRU8!A3pyx_53m)XTOSr3pkG?|!#M#^+e~vLL`V6eFg2#qzR*Ye<
zIj)NnYj!8bM-B8rru7R+BTzLfCg}%((x&_lMmn%zhNA$ZM7{gPz4Iqb8$wiHy-0qo
zmln#S2O2gsAQ>J~EBdVUX`JJRrgbPuBbD}p-D)G;_a85ysJouEFD%+1T0z)<X}-ir
z<cz_<%Q}THC3~Lp35}=F=+%&~dCOukp{Af6-s-rc>Nr1rd_G}3x*F?!ul64-aF-!p
zUr2+BPV-hcy)I0D(P$g#1zjNz^OWodq&4n*7YMiu<|IFdeTmoVboAYayT}mbQFM$0
z^gWqvmd)B71#~e1Y@~|6T#FR-3D&kXwF}ej`IK!J=G+Q<A9UU>@i9gNdRK@~;{Szw
zerC|rg0Qmz?vKsByb4au#P~)D-rf9bf|Z(i;z1f_cLyV21uCZs`Y<nn(E2r__#f0^
z_ofBrBF9N^#=yZm=!}=#egBnY@FkL#59_EMI6BM*QhQd8ULLa@ci3+q?#F|dlK#DQ
zIm!X=jgU&t;8kamN}wv$yZ5FDiyr_yBaBv;jtz&Y+SeRZnlGU@|6#)4BwY!_h=GTz
zgWu#>-PbXnbY!SgBTfNw&b-L4TOsvpuP-s;|K3B2iTg`Wwi(;U1ZJWbhVbDJX+O9`
zAL6EOGiRo0xtLw#T7-gX9NU(q{JDekIwWX7`*Y-#$g@I-k@?GfG3hWznY+s;!WJGu
zc6jf@EnP@)KdFJUda6X7@o*s(M<IAoYJ63UR?71MuY<VFp!6FU_`^%UHWl-0_ETH0
zpLnqQ3XsmsZ^lf0<4quEgeEo~?SUT8mr)9FN&7>}x{}@#T_zV<pS`IP*F$lq0%619
z7ABD6kA)G6g`l!>hshIPbG`UeauxTFWw)8N%`J4G1^I60g@6l#cKpYC#)d9cjqf9^
zvt3x;iFYXL#VGUEo8H}Pt#A2~Ng+y8d+3xXkAd|sQ*9L+kfAj75*JmxIvtYkARhUB
z#~ARzRftT&u=<LxFc(9*iuV{|C!%ltSm(Fi4Xyq<9nqgFf|tzZCC(+B)-1zzY2<c!
zu-lZRV-NGUM|!!d*4ea<g$>r!aLM!3k&r%4=4by2zFm~|L);8Jx?X=H&1JR@AOeHV
zw3h@A5;S<OdH@$9cxqdDPG@O!d%<L9T!GUM0I0G$GZ|i~dd>a-uGCe8yhx}SACjep
zrwbv(EkQNM%xR!4Ap7Q1kdW*gLssn%-PN`Ujw)1N(GMJA=z#4q)P8CvLP@=cxj%D!
zZ6<YJPkgg)u-uYMr!mr=eN-Rx!Mh{ubhXyQC6W&Kb`x4<{0RGl<xI0fQWECJWXH6F
zQ>M_IDYch3>)ko~wdbq`trUdF+lpp3Rde*{7YYd8a2)-5eXN&%ZNt4=n;{_Uw}{=H
zf2`<#iuYgkSO49z{J)TWER*nwgN4d5bTb><DRF!Dw70i+5V3IFa)vREK<L=A1$z)H
zjWllAitOvyiCab306)L2_B|8b4v&QYeVg}m&-FXw*D|8ynsqqRTdx4_wsx}*AR%m=
z9&Y`h@LxBAsk5&Rd-ZXgn}=#%RhXeWMl}1}clrIMIHw$l;^b2ts%lQQE_6O)-03gQ
zJhx_mOe29x9aP^g2jCQ9Ag);Rgt;C-cL`Qu9t#~RkN2JuKNq_y)a(gq>Q#QTx*(m_
z086bj#4JvzE1<>Ye1ZffKOffNC?T2$1iJtKIuv-yOCf$$-+$WL{UdFnV^CbqOGIk1
zX7(rd7h_Fz)XmF3oWJ!DUE)8ZxjK7OPg7U9SJ#KJ>kX*J3s3ebQ+uM;v$-B3p(`u3
zLgM4K9`P5r3+TC6BD!mm`w{(>Wvz}|HPMZcty1|74=Phao6K7;2g+Of19fq!gHdF2
z|4L6ZBLPLZ$O0ME%RXkGOzOn+=MVK2&nM0nk7N$CQ2R;~8m3X3{DSE5VJcOU&sReQ
z^Kw}Olb$nZC6E*22Bpn#@CdaY>7$S9LNyH4=RK~2v)UxZ{A+0Lc-&cP2(eqVL!iN_
zuKuhRC3<c~SsGdO(I2?E9=;cSKQTis*YO7T+NM*--DVAyRHI#|cDhBa3-sSL$r&6D
z+k*6&_|6dGjY;Vv-S!)+Z0&n2QB3q%ziZ>e9%EBnkx2+I2T<lNdhNjLNjyvY)@7`N
zyBGb+e_Nwz_c^1OsIIL^225tIqs9_so-I6}MLeYFaSrJ6?OMz(4ziT@$cuB*>{MMl
z{y6Sc`DMXsEu)_e);{LAkYm@TUl|JCdJ|Ne8@cPOV99YmaB&dyi#s}ssL&V<%;eZo
zCH&cR3CZzH`bc&~Cqem*i6*DT6P)@q*1pX$c2rItd1cpAW9a&_*3YA(Aw7&%Hry7d
z>|gavrnv<g#!FGdeaaG?-!3xe8J98j0RV8TAL^Mr5X(rE^kO?Qvferjsr0*WV-cXH
z?=#zz^WM(v9l9o1O><VG*(=BH6S-MnECTgB6gVewZWruJfA_K3i5dyHcb*mwhXTnU
z17a>(;K!{LtxoCP_v(Iz03*7;M-0l$C#p_MHIpiU5&1}&A?eptCM;s*BH<<Yc!Hrr
zXkfOoPHKQTvYEaNf7^qd6%i+I{-$EPDjlhDRzGE~zUNjBsLR1-&NM4~N!QkYSLE;~
z*TgJH%jk(GZ(<b74!cEd*L^e1?u59ZpJOkIzuHoX;%F|jdg6AjigsAV1aQ_eHd9wy
z7!7xCa;6=}3mUi{>w4C27N#-FWnv08|MJx1&(QemS;&8lA|E)d6Ls!pleR*@B7{jl
zgLY4+hhkunFtc*b)5M=2-wgr4<NfG~2<hd<#zG6=aY?L0uczX{olv>bw6Tl5>^+&n
zpiQ*3^vc(g=b%r1NBi$%LKHx|`u89v)m~cy-|t(X3)jd}NF5fjWUNp1oe<(dj8BK&
zEL$M}EJ6%XubA3vC5uEvz}7R)ctPbZv2WkG<q@p64JtQUYaZLa?gs-U^)*~JT_6n|
nPWUz5{)>wL(}CG-E~MR0Z)vf}+=6#nCve32xYdh8=Mw$~TNO>A

diff --git a/docs/resistant_lines_files/figure-html/unnamed-chunk-11-1.png b/docs/resistant_lines_files/figure-html/unnamed-chunk-11-1.png
index a7a0c06757263b57bda5f77de0f7e365b61a71b3..38d5d42b0714017caf3a18edfec17502465ef6c3 100644
GIT binary patch
literal 11921
zcmeHtc|27A+xN^E8CwR4N{oFcOCd2sgd!@EWGPEzOWD`4lq^{yLd+=H#!}W~OH?Cd
zr>w=;cVVnE_nD#Z?|0wN^XL7%p8I*dp7T16*L*(bT-WuvKG*fWmUAKuFKaV19A^N5
zK+L*2npZ&}C>jKUpkOp05a`q8g-PIFqoJOWmOkZh(btdBcX82o0j@axm>B&SJTOEV
zpd2wSF~Es)0S0k67aSo5xZ4Fdslze27#uzZ7{uda@W7Rvnwt9N%^RGHJ}$-u7ZXEy
z0*A-pfs=qE04KSwt_~lgkB@P|<A8^NVFI2&#*@i|gM$Q|3jr5Hzyl|afTzw7fP)Oo
z6UbyT2t>xmkO??40Z#@-DGyPGB{MVTf#uNO*D-wv0-X$}{DEU9R%}5a1V~p?-N^gp
zLb{`Mk5Xc`f!ncrX~BG%;TAepp2<SAEpLuLp3xN#?je(n9k;~$+e##7rZ;Qa!xyuj
z6bfu@ikUuh9)N&A>`f;@Ae7Aizy9}V0DL3iGcTF+*{yV^a_tvxuVG2v*MFf>Y&rNn
z4X|gbV2*QMgG`XI$JC$IkXM|S)6`Kza4*1&t(?WC`iVkY-@uTIOm1`_6sWIOt$jGf
zk<*?NCMru25IoI@-`#F<M8Xa4JbB$QXzQ1#SZ8Srx-k#4?`D`L?eJ=@tp!*=pCyJD
zlkx%`r5+Gt>{oU_95r0o8arREo?K9`mZHyTFiKQhSYnM1RbnVVyp+F34+`>xmfeFI
zO}`%NOeQV$Vk(d3(Y@m(6Wzcb<3kfmZP_Y*&~Zf4)j@Z+r4`8ikUDhq5eo%mPhy4W
zYT-m%MX8QNa*(n(!Y^Y%t8!+Mr$On-o1P6bS`#Y-tO8A%>+V`@drh1acQEych(!9W
zRc(@o&F*P--)M4=Z^fKsjoV6?niQX#@^S4RRt<538@$6+OhrkYf}?9aP`0i%-4`>L
z!<);DyY=(dJ595;Rl2RuN@87%@-{yXxO>G~aW`F?&t3qJo6$h6v{6z06FGe_>)!q|
z+3#Gta|>?I*ahgJPCjb!9GdVQr~47^9VvDA)s~vrVd<ieD9|=Br1oC5YN1M`k>AyO
zxo^AcNlTuW3(9l~6SvzhGfejfk+cH>Oc?E{jEolZN!uSexM1q?hup~yx-6FcyaO~%
z>%YF|&+r?UP8On%e|`DlaXopZ<XBe)w5(eD)Zshgl{JSNfoC)oVa|`;GQ5zBFg)y@
zt9Z*Sftxd~R^ALnRdDu$7ROV!f`d^vO0Cka)A}_k3L!^4>h3RrjcfD54aj@sT`yOr
zeL0NZR#8cYsWR8Q2saeGOINEWjaKJt6Vwisx%A7CM%d$O0p4Tco1Rsh_3t4x!Eb4e
zax?4B`c{`Jbv(Q9Cf@UC!B(}MMqs(TjNLH@Ys-*@1;8lYGf2k_)u(5+GkoeWqYp5X
zQBlCCZQda_<nIA;4xdFl%rs`qwb*#*RUv@*qaJk9(3P?Q*H=?{q}^x_ed?&^cwGgP
zS2L}V4qKfQcn*;rKfmBRDYEyx15-K3+jepK0ZV%^PN=7CEu{*Id;GGksKCM7k4ob~
z>GTow%o=TvMVNDe?%UN-li{Te)a4y7^7UA4FZoUKp8`|*;oJ24D!5*v%LZuc)cg?h
zDDZ&iBwoMI_}uo}@<Wg6OoIA>QRmH9Df~M>iimj^q6Zu{Nfg5@wm%m^1GUyh4eR~b
z%Sq2!-}S%Sa}|le2l8}u`SNu1-71%A!+1PgLs}%Md?<2doI69+%a4m+5|luOEbpGz
z?4;9z4C&lBcC901RX}CuCEvKby?+w)aZ^*XwSfi%*#79$gq#cr?eatg1VUT<zjH+&
zg2ew)E6Mxqvh<T}%3kZ|ocFT|LhtkWy`_i1QRBa8otBi?rdF?c)-*7&k;6KNM^IJ2
zsK{n1DE1RlyQN<Q>u%d79e?>brX0P9+`GcH`nyzSfzDOMt<Eh%zz`w+bH#wySqfKJ
z*NitsjV3>J%IL@Js)eH2+#YrzXK!9N3rL86hd$HiF_y3wi@?5M+SE30xrcL=TjhwG
zSva?SYj^q2OZ%0~U8jY~bm<s)u)PfmIcB!8Xx>?E;oiRy3M+O!mmMQCC4to+T#^+)
z_Qp#1E_)bp^FcZrCbZQ5v|xk6DxDs>)o-?VF#cSB`jzB#T_*mPC!8-I0lDc>n?5L{
zS~rp;EKXkH(SCxu6@Sjh%{061^XG{-TMKW4CgmCJ%$ut{b3eC+D6i>c3tcrhWmMGr
zKCjO)kvwooFnsk7N1T@1>Fbd>o8$yHH|Sx4;44~px0Sa0Za)5-ch5k?Wftp=`ZtPH
zXX%r<Udvp`=APc;X_ijrG%?BX70vNG70}>La$vF%>5?Td<Ze#-J|vdp&U6!FsI;EZ
z8s)TA@~_7nMz&u-Ip(W$O%9MA4W6l6KY8?%S`N#auKN7C&PIjw85yX1S-4zJ=nUhR
z)mSmN!An`M@$823+-2FHG3%ZFlkQ@|TMD|m31_s%m{`b(FqfYiD(f#V_&Fn^?*_2I
zZrexO=&=yI-M%s@^qfDoP0X<JC5bWH2t6BDii3hVPGZHaulEs~QDb`CX(ktv6=O*8
zlGtoy?Lw73x~R??`rsFvZEm=1K3xg#giEYVawgBWkM%^_*P19I?gNdDZ)=oEza882
z$J^iG9b5x7ZtJl&V2^HGZAwgc*<SJ$$WKm<4jz19T(yQ$#g?pk^bRo%!Cf@1Ao{B=
zIw(K$Q-z3;#g}R(UIsP&XI%v2_`?O3w{(Bpu(bHj*iyhK>J`il-zV@L!Z03#U^-pP
zvU8f4J-;#Uk<gZNI7MJnLHAP13*i&DOzy*6OwG=w{k}3CXz81X`eOO&{jN%s&|!It
zw{)rfD=gZqE;(LP;k(!D;v08q?HagcEr*1|U)(iFIHiRehn4_Ve~+ul0DV3reORH!
zv}Aj_qde*Sq!S<FuC$EIw=5eAWKvi>Bp=^=l3lvtV(=|<A4|w#i#y+)`0m6@tnL1C
z=Y$@4k!Ecf8Qv0(uDL&}eoS3y9kmg{eKd|$M-0)fzMQG<nQSIYfK89DG)q@@o^Qy}
zz2kD>@F4~lQzZDxR((XWRRUe60plkv6niq5NlKne|2yR75)=8xxLRM>k7lJ$P`RKl
z+u9FWE~nC_DZx~IjtAQFjiG}ou5oHCawxrB9k|V6k;c4my6JMHrcZ~T#ixam6hGJG
zL(HF91>=4`lpjDoGxHoci@gF-etTHdp2Y_Fty%S1{EbVY0bX#qm!8Gojd!EXVs{Ca
zmc$IW0vvE2yV&p`!OHop=N;CZ{ELiyl!sdLRM}$LM5MObOi+#`Vt)vpKLdWb&qxEi
z5gs0>SvlY2*KmPeunI0r)VZ2ah@PKnSA-0VWGL2uP}OB9wQ5w_xhq|2^=av`m(-~)
z5)H!oXlo$JUjn<Z$MQ!Z2FQHeq6JWh@AxBeeq_Mi?(uA>e4PSMyd__mxGRB0pit+d
z-;+|GqV4uHo0v9``Tj5+d9}uNjuNvC*K_P=IT47@n>*UREn|gTRUq)pXG`QZ6_&u@
zJln{ip7Mf<ZDATn*Ed0OuA`~*y8a>P5vD5%oIH)lKPj|-K&4jk-@?%$d}6Ntk1>2$
zO`VHb%@gNQ4e&%oi)2f<AwN{8Yi*SeA@rkCRR07?th29VU^a~jrbAnsRz~v|?GOl#
z`I?=8?Zf2<{I04Kv32w~jC0vv0Z>c5E$SoCoI>03Ud3Z@!&7n@HC*J`iOkjV^tcza
zQATReBhk@+>~?X<;ebSA@oxN&WOyMA7ryvhW1O~I9=7}r$hCr3ivN_%0?xzw5O<*D
zwSS3|+`HD_Y~mTKVMfJYK%!d~BSTEJI{`-q4iqwj?J>xmD=w@{>b*W{gF=b_NDCx-
zn>K#mU>9I}Ow|*>E`jsw-uTW3ac2=hy9WN}EMQuJ(Hdm}W<_Q`49ynr%C99#5v$0j
zG>Axh(%W_mzsiU8CZy_I0mPpC9$Z~7N#>&2nm0ZW1e@~k*J5!-&^hL;gSB_mD7zEI
zpb9+H?ND$$JhFEf{8Sr=C17ydF-|fHC2bFc5CqoBM$yM@{<n38Dxx(+h`(Ah(v+g5
zq1DOhMixHo3JOKtym-?Q?x0ORfFMlt>K431PkDXWxPa#PQ|gjZMRIn>tJr++at6BT
zYV9+Lf8B^YZ9xoKm~U{Df49%<m>hw(zWTS9=da3iqcX}Kb?Chv*;C8KNM+C|96d0d
z@6C)m!%Nbnlv{Nb>}&_t(;$vr9A0|2O9Orbfu!msru$+qplZG9a{x_6(m@qcL{-*N
zEe?0;eU+1fw(T8$9@<|yU4e;A&Pr@*l5+=jLmndVxMc0jH?}AC`E%z&-K{MG7{JQ+
z$rWaF>t7sz5ZJ~Avp>p3^JXn}IcYE85ZD$1SoEZW_c-SMQXsFm<pzCK=1bZz)3?pg
zftkG=WF(W%=KLjM=Ww-9=O+@uhC3MI7GjK2oY*vY?^Vz8T*eILXtGpB(PcX&#<x}W
z{27it8dUX}RT!?Q^e216;KQmdqrDbOUCbZ^5@{6p1yZupY_OsBVEa%)K<fJhr;S=I
z_m+|RH(&e5&#;=0zHBx@*<qJEr^doDQ(Cc8=XW}jXW4U#PYF3Bj37(QD)6sG1QZW$
zOsg2R7S?a!jk-jfO>6OA{Uiir2{tUDK{l06@i$!;EshRP=Pa53y&bnGH|J>@nbUE(
zm;D~{ShRp9qN?#X?@y^}N}PPYEC2P9Z0CAgia)K*759{<F0<rglAP($0{0Qeo-Hm$
z@w_tgw0$alI575f&<p-kk961!y{`1l@uo)tcZl3hsnMCn{A>+LVch(Tb1cmceJnH4
z%?K;CN}#Xl9yoVG!ffdJgH{WaST(Yg)o>-C&mGerQ+n*h<5=T5DEKtJ^`*P=%e|jF
z-0bjaS;>~AtZ|QKm~1PtG=Nofq>mJT(0%)oHjyXeH-^nYYH(z)T;Bb?XWC^B6H8fw
z3}PIUpLXs7%7dGarupy%@)O6O){qA+0zT^;=QkkY+Dy2tV6@YV?D~6I<&w}uu`0&t
z#h3G}=V7_Q{m4=W)BeG$Q&&gl@wZTulik{F3R;t;R=U4?W9O5~zXTM}zw6d1a_u8X
zVfl@xeX6fA&7p59?aHT_z8$ocCysn~WePEUt21#|3LCrUaVMoX?D7jm$vw<ZST6T<
z{{ZLF$#XF1k-XiPv}Gf@v8_wAmy#6q8UZcDHD?^n;j@Q{-rPFInEQUrw<BmZbF%t(
zwO7473(^Gd@^kQy-R0JW2G6d!G}$eN>5rRMf1V%$+G$Eg_A){Pn=0r3i3Gza?|?r-
zmf*tX><94!BK)39f$acJJD6%y{NX19KG5S@W#If$G=~0U!p87Y%H~})sktYBn+uqM
ze-^ux9DQrIdp-KekEOt=m^XK%rRE~{=V)&OG3X7tsOX!QrKW_<ldaYeA2emT0Mb8^
z#-@cW1tLMvL>SCo?uzGZLjlyNcKZnA4j8a@HK<_7C)5yWMm{acLz4<05x+`&*Zq3D
z>SOPm*=J7!VQa8mpPk4BJn*yA%|2GDe+ve0_byf43UZ$6E-9jd3<7N9Ml`{sloiNR
zqlhS1r!eQeJ<%66c+S=kEpZC47K{(L2OS~k*Bzi6>&*L#WJ`usVM_#-B5+E==(0gG
z(@oDK`y?FYxC4veqa^~JR18s0C=3F0dV`7}hF@%Oyem>F$Eorp${gF#_HK#UM_O8e
zHNvN&pd)$~1jfHWKkqioOS%%LxCH_43)3;~Yqe>rK0;swHs2p6dg%cVNsM){Bx4^l
zxtm9jcg*@Y_sP>O%pqH4wsy1)TOO-ZHDw#T4&i4d#dntk?<1VDq4!kwtL<QwjN4gd
zPNMrlp4t`RJWDnT8wuh%#h3(Z4bd0=c3BlJfG|TI@h9I#quIb<>QEdXHl5V|4$JY6
zb~fFP7+!w@lS5E-@q`y98bqZDS5YAaqaW<=*GedlA!%R#fe7sGzMdLBO8$s$ki3xv
zL@z7oO*(f4J6fLv8Mq;JKo4%%{$H89r6!IXTQjhL(aUq~vr8XP+4!Ths(tZg=Kk`A
zj1(~pe`22`F-K5i&z%cRjfxwr9VLFdYJSV*I}3}$&+J#`qXsM3<|H7nC!Coi%H&YJ
z&?NwQjbk6KBzJ#-%t_F|M7h)w7_E0-Tdnd76D3NZWiy9{N8UR<Juq6Xpj)v>f5}!-
zBfl9+i~N<XV@dv%_UGRI_J@NPMbKz!+_qkGJ2}P6?86?*JHcTxmwLK$-0@H7N*81J
z0w2|soODi-#F{_Y65mUlJ-aqv!(o`2{yBX1>!5Ant8RRLF#>^**4z=9OB&9ZUY4{l
z3+?#Kal`s#i&jpYv86f+rH9`z_%7v#ULV^kS7of=^X=Ll{N})Q^LhX+82s+kgG~`+
ziSy6UUAf`(I`lv=<}|cPmjo$Ej(vXZn1G$ZL;Vvgq~;1+11oxb(sw(nBR7Arc{td}
zU`JME<^56%(L*AfyK58`h~I%y0$SMMOy`7k2rc2~9$=(bR*o3bQZT8Nw#QO!(!18>
zGpi(=?p7>rX(BnKCV~N)Xit9qtsQ9Bw0y0QsI<kIb7w+QzE5ZcZ>jGt8|Yq;@{8NJ
zQ=4YZDS$90NMeU4tc4%lI{MVqEsWmgZ1S5RX=&*R0K;s$OSF}wfE2{`{CCKJxtd+c
zY;&{J#u$tp@6JH>mv8-y+$x)AJwzMkf%1tfM|&p4rquWVbs#=JXX)fP<+iir``T<z
z0Ax5>5cWMD0MTmyf@wA>QbGNX3}y4kiDzfhgYw-FTZFC>fwyw>L@F!sceG_CcE9OL
z9^c;j5z+kUBI;34ojyD+q&X^gt^V76#d9Y@>>4VnN6pH-J)ASLb<aB_WTK;k5C}ET
z3+ywUch9jrp?wDtFUg)!Djr@H761<?0$#B>U6}WkoplQ?fhFa<nv|B#-Vu>0aWM7T
zPFYjTpiigOptbpcdX^Mxye$TGZ$7DupiFwo(Yt=eL-HWc$^*+^lEgXrHBfT<u0(&T
zC1}7*c2ZqfDvb$%g2zT+-J2*RW+MEgPnpwMibFnw+C1I4!G1?%9L9x5XbW?O3<qQa
z8*6!r@o1jEF64vx8Dwe>v}%YWDH#1}c<&9ub(I!C-#S6?b4FH6OOuwbx6Y!D!9;&i
zwze5)v0mK*XnsIRNzYAf86+qlCMUkFbh<;~^$J>6tLn;Ag0SBD;k4H{Qj$jz6VKMM
zK??Ud{<YDBtn`KTRNPAI<ZmQhho=UmT~Wf>A$X(P?mOv<7xgy+d!yA9xqVrOifl)s
zNdygV@_&NqVsnADe~0PYm5$MKGXH`QSgY@56$AoNN25Qz{)n9YONyIzyYnv(RO@_i
z%XxbhzWtH_K42naIlCPDf&D5KJ!u<ie79z22P>nVkglBaiI+Jj6QF;_iZxJI!ZH8C
zK@Gz?@8#KVn<66*|9uor=xuq0Mx)>eEF9{yULsnS9=9Jgpchc`e(N)!fxmKvMKPNH
zYxRhp;y_G0P>LMr2Y5cQ+tS3u&9b)OpKXJQf_ibuj9@J(t$!kf{n_=|^MtnOU@8RZ
zUuYh-3_u{@P?){A_}=TqupVlV>h4%xe)rG9I|R$NwTJ2RfG!gnosBjANAC*3bwQ_m
zWUZ-20>fj{Ni3^&U-sjo|IZU7^^sOCYRVrcaxWYsLFI#I8U9DX2$`~-e+c^<F7d{T
z5SB{mEYmPcqgPu_ggXoMnLy!jbjz_#>?QXvi(p6Z!VQn2P_LEG>_#_76;xTq3t^cj
zBoKmKHm~M;Lb=LS&h9;`X--*9#j$q`w5do@!v#V+)vKPjeph3}rZrY*9a>fr=((Rd
z5Hxody_m>Gfbk9c+{WCUN_USWb&Su+`t1Yg<y+T_d3Fzxd+=xZq8N)lJNm)5iN{or
zmD8E7b3ma4=x%9f0sDhm@4(?S+Cg}2m7l45R7RcGU}(WM0|fFQGhlu7X)0$BGh!}m
z*H*gH30&x~a#xjZqjl!09u<YFI%<4P+p9;z;ocepkejBZ%QT_tZ5XXs0}*%}<K<$D
zF9fZT8xXmNt5GJ8ycb6}?)kVqC|!eS@KYl$OcXoWn*%qDa02hCy{5#5)5`kz^VGWQ
z<$JCTmQ~@0zLj@=U_MCdhEca%`O1zqg&*D=wNPuJZ!q-&t;adNcKU|y;yTAA0R5M4
zpW$3+;m^wm04jeyMDLnO6`U1lw(Nzub9Nkpj0yUI*SjZoN-pE-hsI!Rc>VQ7B4aDs
zgAk~pfzklTYA@aP{P4V^-qTsxd-IDrG$Zb-OoQABnyXrqklE2jr@B5KAfZOK4`)m7
zI^LCH4-Puaw;Wb>fIvC$8<xj_EI8foMSokq?6^>PV5!%F_!8HJO}Ye5A8Yz)&!4;Y
zzCWbB9^F1Fd38&f(VoaN$sd|3gX0gqwP?3dU_OQEQjam?b6vIb;v1Wr%a>W`0*9dQ
zJjaxxJ(q4v`?fswpwt|VGI4c5w}`<t%_sbr0IKHJ)$VWjus0|<Ho#r+x~mU|+w|Kh
z4C|q;u#XpJm^DT-6iaQyrmi*cP`TRqeNvblqJ=6%1GDWR!{k#2<KCOIyp>OB`%Dfg
zGv;O?y*e-6wO{{|Xa?iM-Yz>$Nq1==XWz~+Llwd*E>Li<)fgx!EP}Cg3eo!mC{%dG
zDjQr_#*S$}?K?TZ067k%o{@BH4su|xZ>Jb5)~g}s4}9wrG|}dyVF2BQao*y9)|1YK
zuK+iV6U1stWJ=6^M2d9wNm39+7jp4|%nyAZVxEWM?zCzy%B-4_aS76k&JHiH(|mQA
ztsec2>9%*|q67$0@bh+>ZSHX&R9p4vFmGKZx3fqVAp7}5^q4B^N=X1Q&mfxPMa>IY
z3gp#Ef}P1RYkJdtNOqo`=$aH+irYP+7ws~Wy-C*dS(iINg?0;60+#?ne%F7yEfgra
zDB#NkKolL&V37O^efayGHNM9n4>Si45a;4AO#ELAj%&~h`aQg4{SWLp&tO_+mIA*L
zKL1S?w-=*;0qwug)1jX`C=;hBe~1#Te8ImLWn?Hgv;YYS+C89>$Ot2?9I!K#!df*V
zw-06%C^Opof*49-JGLAC@>ypP^(NB!$XipAejJD4W{b=LsumlgxJW67pwJNPH56B1
zMq~vwTx4EFEw|eoEb=KNBryB+0u^mVkHB}?K?nN9pkHkPW-fn-(z!4Z!FuoU{v~?>
z)l2jB&S9j0s~r<1*%yN3kM70H6dR&Y2-r=iQQc0@xt$dGm&Y;>=&~A)^VWEZ!1qJQ
z<HO+7q=u+^jf3fFR=7niH`{Fy0?>naG7Y>}7}oY$O44N9Nw@~X6?2!tas$`>^uV`Q
z`OWG$i}Jkdb~?voa#XD-PInR7vq=YGFsc&;JLir!k7&Ez@&p4ViDfwY_?~7hV4ODJ
zC<!kniZ?KWQ#FHSLEAFlfXCnC2OULp4v2V8{qiC)PKT`{dx1DqUl??YUA4|d&FA-9
z7TtA@M~A>E6G$+{Dg@Kx{!2?i<7$9bCJNO%I|Xbr-BAq#{8(4ZbT$do@SsyHtWPn>
zP6ja)z)G7bV&j~#_^O~Ec{aFXd$JvHRC1I0G`(rsU2Epu0zSlLJ85hpu%lWVM^0i_
zeOq+;C8mJyAnYmM0#MW44=IJQC(S5c2Na#)H}fQf>w~GlUi}btl#@LhTu741CqelO
zviB867Lvc8(}Q`T6$PfN*9^QTq!7j^)W`54vpz|WqQ&)llRuWeR|7So6B><Xsj8gM
zK)1H##HOZ612q*h9KOs)Od96s7#N}-E%N?ycK^0dH#Y><rOV#3ojn0`+kn7s*4I<1
zH$n{Iix+0M&EY|z-hJZ~!j47Gsgs+-O-GqyH7V__q-MEUv8!;yvQ;7aTvPH8IoDqk
zo<Y}yz5y<$iSl94;dpk_Q~%8Ks0V@kufzrE@qs16(55JCQn||a;j$m2TWah#Ii5iY
z6?a~9YQIFGvnUgNpAa=10*r$6_7k2}E?-$i;MgK+uQUW|<o?E7SkKQ*lO8%vZQ?#g
zfH}-(L>hy7V+AfEv_Jm!8d`e$^J|lfwr(8cwc3Z=K<^uJ01cdi*wa9|O~-~&wun>*
zmIbs}gQ<%tD#(j&XuwXgSVJLz=fadB;uw+j*@0F}*Yc_lOjLTmeafee>I>N}AK&)L
z(pT8;>Yk55OX}T)F;1Hvv|-~Ra^{F+vlsDaIy?6J#3_&melaq34P(!X7s8qjs!ha!
zhXIqdQXG&-W1y+Y0;Cvs=6jA4m6yZv1l*cnP^Wcj>lk3-lH4}rxAS=Tx6&Obq+-9l
z4Tv+L(bV7HYppPR7NwJBZ@;e?Zg7gUVN^F<p-Y(OKyV$@;NYLhOi!2CPR)U)^ZRXC
zK+S&S#&b`{f8&B)jz2kqSN|u`x&k@Q3_XGas(l`vtY*!hd312Y0!oh;v2PUiD*9cS
z2d!NAvijeC^RLi~gTC@dy8Ty%6hr*md#0uNi#kBJJ@^2^fy(=@E?}@t?EgiY?8%(8
z!^MC*kh*y%A6;&*E90$M7<sVu<u=`?*)&;QHZh<h@lo;yLOQCf>cfZk?`sN>aUL3h
zu9o>bH6#MjwC-=lghoTIWVKb|aIT}$nhf^c&5twYgP`Cy0$2F8sH#LnmgTKx&z!r&
z_P@R%Jqi<LilFj}b5A8i>!w8ty9t&9A4?El#A9Z^a;R>ewc~vT2$V;?2{jO=UV*-D
z?mFeE8(UoYCgK}eMIf*47!4TAYr}|t_5QfT=WDy<=3M4SeTs?*#IMGAsL`$GKpLs5
zX)s#tELv7q1qOp<Qkz(nVa}aQbpMt;+6R;#i2Q<<F>KypGwBtLQCmo1f$3&2;4SS}
zn@slo#}@>q)!5W%O5HIY2FsP+{<l0*046GU;|W)+^3>C<S@G5E9phI(d79r$1YQP8
z!ycr>g`+j%1>=F#nkFJAf(csT^mAeB{`9qQp$KXd1hyIH*HS_BE&o=ff+S!{7~Qvz
z7YGu!BWWQJHNr@VA4HD$TJ5ZRVR<lGDR>|DiqL(Nmp4PZ&Eaqf0QJ;wv;>}0`#Irh
zmj8Ae_*jSGOO1$(W<7^>t^BSvwIs~}wl!;YN*Wt>%e;Anj9;yaU4TX63g|57S*V^@
ztzZxO^7v>aIetQ0=@&e%X)jh1v-9Ia>Azl|xgS5c;j0qiis$jPJpIgo9Vb)bYVBIv
zLdnj@+c015Av%ri4e+nnk2H&($#nrmKiV;_)JipQPr^I+e>Y28R!hE}@nvPX7x|l!
zpa$=%WB~<1dG1$MuPvxE6NBUG0zjJr%joLiH?A!A-m`?QEzo@A4W=7fkPh%OYz#nT
zx$=TYuyem$yk-VNk1x{j1?+&9wSR%VsxOW5^xWr#%?#3^kr0;mgXY^C*vC64ol!N=
zF01#);l-{>y3_wzCe_^E|ARyTfyyc0VS#G@+ppGD<TW~0RsRj!E(@3BwJ(b3C1Etu
z!qU%${0HdX{pKK3O33Qb#a%CGoX)UoL4>B{o9#cf_PEF?_Knq@X#YQx74*M4`+p-x
zrbyQ8<fxUwIw1+y)TA4`6YSx>aXQR35t`hOwo5Z(L`c=9@vb9f4(Hc?OyL}RKO@h$
zEk-$4*Sx#=i70VHUMFi(aZ;22vD}`lrBbXKCvx|kO!QuZm*R<~zB6D+i!{<s*Ay;C
zPo=xR)=%XuY0R<ZTUv=woe}fO$2ke3(>htV*dn?(m4o$nJZx`v64P4Bs_u>y48AT~
z*`B;vd8PQm<Z$fjiBkP|k83p!uvqBz!)#*7ny=QhE?f1UTpW}5h?~1<4kpXg*NB~Q
zu5&5i)qZ<VaUlBJPW9MML`Hh0kM;A#QFx>}|HLz$#F{45kx{jbHe)4n+klK~q_x8B
zk5+RSMaS;jm0u1Q4(te>vPbd16J`^Vk%f==T;ty1G;6Q<skiWE!}q%Y{|%W8%fSRr
z&%URF>_5N}J-a6^@n2bGqmjM5ds1thb89k1al&q*BqF>xfI&u^`P;ijukoVYpp^QB
zDgCsM86IE`oh%E(yi9`7<4h$`;NIu_rP-f-cH`?=6DKB4zn|K;KJsJ5fON)~nJq#w
zUeqT-{nVvnHFcG<7dG0{kb}nTfeA@=BR$Jb{*}m_niNJIK^Q)ibTyw<fpa&|=UNd~
z)UU2y%~#sWtkR*9Ynb?5%+(IU7NJ5R1%A(4znyPqT)7)olNa0hMFN^|rk$Mk$HfV%
zJkfRzShWbSYPYjqBRG@6$&E#2FM&X{hllzK&yRi$TAxf*ECoe0VJIqWevvk{duZ`P
zFDJ>Tn};9Mc-py3KBqZK8LjyZL1A@GOa(I{@zpn4ZE-Hb$C`I+eR|>H%{p0{IGsTz
zwuooRO7XF3U#smNjQj|9+;zhY{BCmq<NV`v4sB?@A_!f!R-KrfX!g10UOPDFj9H4Z
zQoXxj=G_#kc`vZ3)=EJ1I7$79NadErVydw~ulg$24vy!QVe*{p)@`JA<c_f23?hCO
zQ^ig(EAWynu6lFwsq*rqvRwT+m1POP4fpv~78Tc2x`AIlC<{dV16{$3mIUaw`6#^@
zLG_ob)~{~M!VJVUSzkytQBeOJs~ZE=NV&ePO_HSiMx4klJa1;+K?5C4Zu<|c^G@sl
zEy)FDHnB8K{uqsbcjfKR6$dRbB<(9}-R*T+WPj7T(2v$Tfg`^Pxk!lk5?#SNVjLh)
z1so1SvyL4Gfv}waldh<vC-N=tIa;*sg{d4z92LCE>_&%(I%7Tng?yyh{}nwbB&Ft5
zS>OI-<o;I(G*mMmu?Wg~$M5TJPUZx;#_0$(okS~qD=v67>Qq+;T0RtEq%j13@*1BK
ze(4qGkQ?YXBAyAjMX7Z;b0bh524ZVQ4T16Fo_TenOd4p-0Sy$-3s>o0`5Xk3PL>pu
z&@iy}^0{SIC<qZ>0q^h*#B|<?D3X7{Kz;6swXwfrp@$5Hjt|9u4EQw8!Kt<B(e^sd
zN=_$>ZR{|L%kI}Q^Wrb?HFbVt0E<7}Fp*Hy+qUObgI+^XM@rs1UtoUsm`4vBVRRl4
s<WBG5<3&9zydm_6_<R57zO^GE%ULwJ2P5fffhYme)w--%q+u2EA8=6xmjD0&

literal 10993
zcmdsdXH-+$({~aAgeIX#5rrsTK%^=~Y7RvOuM|<FNfYT9u1IeQ9f1o-5iSUcqM~#S
zMY@OxhzOTn1e9K+MS4k|lYsaBpS7MZ?|MGG?|QQiA!qhJduGqx^PAZ-=YgUAWj5wx
z%n%5KO;<<T2m*oQAP^XUpo2gl@AVg_!GBK;uim(*NBv;*^y2j}7(ER5ov#<)0^U>a
zsGoRDd_D%G<mY4ZC*#3>81TZxQ^_syAf*MoC>a?U&!0cf$LQt9(>k_H=1+nbrLL~7
zC0?&39@CN!cARXPq_j{d!^6Xq`IyQ4_{kRV0y}~&lt~JO0)bFk;wh8)l*twfNTT+o
zl7CCE21SQ3{h?!a9|AcMMg4;&Os(2OASj5gw#E(L$BS96cHNgsosL>5N#4@={p6F}
zw6_uCFulhq-~eSg74|BxFXj9-NG$8$F^qd9$9`9`<M)hlK?o47sZ0m4;f2E?w^1kv
zk`4;R@gWe94*&o`F~DFDStJq?9fE@Ztp6W%k%+FY4;GIZpKI&r;)h;FA|;}Vb1$}?
zoh!fzAP_u_F9t}O%ICkqVWH1gCiJeU?%oLA3ckrLD)gL4Cxt?pGH2F}+}{ilN#q0{
zjWE7e<BlGE%+pb<eVz^zjc`H=P8IjLK9G24WSaVVZ4nzYKJ)#v$)JE1AdciP9MoK@
znmwz$AQNi@Sm$4x$-1Bkm?zGK7FK(+hrrI89W^jue^ILt2R);42?!F36Xg4R$N1CC
z_UQXYlFy%!Wk<ppo|rTx*XN`A;mn_NxI2S|cQ6;}bXYWDLvma^K0>o04XQU8|D64V
zZeJF-laPq}q~Nj6W$fJqHb^ieFSGTYLJjqrCz><%tTlkNTN^Xi+|3vYna)6agJk?|
zWHQyD#vM88Ih5xN|Bx)9h54f2x36`F4dn0{)1-2^3}AT*7CIx+aTt9AGFnY0z1<LS
zjl`Co6d_czH&Fr_i;sS`M-e~`ez%OSN(?v_Y^ka?HN!mp<|uLjfAo|nA+x*jw*tuZ
zL1rgQ)`pAXiCl(dR@50k=QTWPh|m!Tl|DV8cN~dRkIPeha|(60g(+I`9why;2QovD
z4|nead~GpB^bxc`SeW2ICwdHkeB=laK6QTuf)XYOIjWvRKz^_=Ks^5MZS6}6FmV)T
zmx+RW*Ltn#_^m=Q$1MG>jGCIBAhK3baj}qr_0G_X-|Wkzr4!>{2u*o3U3kT)>z>^9
z`^XHMu-1_?H_T;NRm#Jw)7;fz4)|dAZyY0m`*xpKsC+zdIf>n_Lf3F(j~H8)QFe3m
z&ZGpPI5*49s%&h}Hw?#lFQ^AS?b2uNm;CTGP9ZFKJhrhIX?XS0o?VecVX7kkHuFoD
z#ecW=!g3#GbZ|PXWYta^J@2})vH8X;=*{AA!qb|X)pV6dkBe~%LDjj(ww=|BVnne9
zpBQZ?J~jF2Zl+zMh!qbO-N%wL7dWcg1QHqt3$g$YC5;p}`U}l2!$XxylG)ZH{UUi3
z&kjbS4dzyl?fu~3d)M|CZ7C9tJZ|R;g{_}B@O*x9@tky`H~e~!t9()B`my!;C3uq7
z&Nj0XFes4Ube+6?+gu%)C}2Mj`07HvZ{U`rEG$oD6Q5aE>l*8SiPz49*Zxa{ptbe=
zd%=Ew1rZ)K^u)92g;-@eHo7_4HRhLlQ~uc9-_5%4ls`T*!aQ==GNtWj)s**Y_@ITc
z<tHuI7p<#LOjuaq>3y1|*RE+CFV#5`FU2lRzvjeZUqBr!1e?db>;s#-w#M{Q;D|Y|
zXnncK&*#@ouKv86lqBW$=^eii`PH>s#OK~aN`Kb5qvIX@gpltC_*zqVS|(c690;#@
zJ`L0_BOIF1Wg!e9lNXLW(*W%0UOq_g{kD1M^dAoK?E-cJit*&XB?v`oLG=?)Im)N9
zP9-u{iP=fU=}IOx-dd{A+2D7561TToWD|#&#q=uR@_2r>4(GdYmhri&2ouh%-J6&f
zYKIN!7cYJGJf7=bf0eW42{N=CIC8#HI=uM^_A0WQyswO4=k*jknL{KQoWC(p5k8Np
zX<K<RK79I&<*n53sGY{t@b+)bZGN_c1iC4yM8<GrDZNL!t|K(!-eu%*7wkD`4iU3)
zTrN4^{luxut9O$gDa+(L{bAYg<gG(g*I-<N=5qOSQKmcoyiHSM7bR9@y6Ja;b!Bow
zGQy{8m>9Kp{qn=cJ$j-|{0;P1V^*e)Y!Tad+zX~j0GR8MiNQmf;ni=Qw_IB1iBUV|
zM;_i!z&);fd!abY$amkAQ-t~DNl~BAv!T7P%9^z$SiH9^Z#nXHT<UmlShpoYOr}3!
zUrhb6I*j!G6}>SN_~nt<dJk$0dqqE~giu##St5x=3PSg{x9+43&r+u?+t0;FceK9%
zj|=r|aA4OI;th|*IY`m*Svbi2^_aeNRDjGMx63N>A%0qG8Jz7a^53_JM27~4BbpuA
zkwO;H7sm0sl`JROIggw9E&jn!-1za!vGLRP1l2)5>-X)>ikqX-Y{%N7Mu$)T)}Oqe
zQ|T~MNSARsk+Ba-e>dd#w1;=>om1)w89%a6ZjnPoh6~NM!nxTGu|8!#BMA=!XKVF1
z$G;1;%d5Elw$>979i@pFf+>BT{>t;<at!g&-t<|5m+Z6n<jn3xUVTfSrV3qU)wP@|
z2S;@l1zl8YgiQ6tqzpHDxj;&wC}B5~xKxaBPrA+HcHEI7Vb61QyL+XG>5?)Q;`uq0
zZ45oeGD}{vSXYS8b*FfNwsNeocAv-x^^)GT9N)!xT%bH#BOWzGB0KrGcC2GLI-ib3
zr#EbiK2N|&Oq}2QN~m_Ae9!8v#Nk*cmW3AO+lu(W-#^BSg#zSV3u{^dz~Qe6q5Frw
zZ~is)&+i69dB5+nd&I|PGVJN}u_@{>=ExUsSNVf40S`L4b%@=Ufd)fvMXM2McnacT
zh#Wcyekc69@RgsDSeJs{f-;f_9rQ1onUjkUvaAWQ?^7l#{7z_X?br;y)4bjMtou1+
zB2&5aeCF#Nzvu(dM4?!IxYZuNBYMI0P@aYsU()TJzBao#i|Uhq9SCvh<Gu4i3sbMx
zI1E+K9eK7gCrq%pb6l|yS9E!k?4d6NZ4#aUnDOeca~c(!yR4KSw+m?)i)exKwy*X7
zEm<vU`!9vJzuzvP-r)T&k=R`J!{@Oh!}(^eQ+f=ra}5n^0ol8)Q?a!9&<jtr#y0Oy
zR9mK&2_%`7=unwY3MjH~JMKhgA;dVg8H~a~!DKxC%xuh+794sLczXvSCRoW}l(NRr
z+2!|bt~dlMPPhHI_mE-ddn)Y&#rIgtFUlLg*}3a*xf3)2%;nhC_d#Q{qpj8NADhsK
z7J6C>^Cj<O-h|q~&qVqU5~io#uslnrNyDR<P`8JK>M=quUJ-)Q3lrb^?M+1?oRkq_
zMmq?nC&vS}#TRfQ2LrZErejr2G?%m9D>^E_1|1iQ@Ed7%#UQqyXcOSLqI^}7ws57u
z$GwS7xxG=Qz4-1Jnkpp28%CFNb}DCrfa?bj+UV$8v2F(YtakiZD;!Du97^M_bpsf#
z9kbhJgg%Es+eOl5<%9`YwPV+xCE&(Ga1P18dzx43MOsKVlRBhsx|BD9J~9ON=$*~N
zlpI<1I`PB-e|V@{tt!)5`C;1wJrFoLy~@_lz&yS!HF}@u3CI=pOjEQ&cAk34n$m^-
z<hs!;08e2;i1EGeUP;BiU))!JRJSDHaeYz(1>ywP>@%tZztqy5hOe+5AqSgti#EE)
zPdCQliWXM!e+1MgJTJBYTuqkOPz0U18LBfMDelSNFV+vf-xhTgT1M7QtHVGGsm@mg
z1}YkD2W1;>l|EAEu|wY-l=(K<ZKL+GSNmv?ShlsEinf>EeGzM@F<nH5da6(zK2<V1
zVc!Iw>HawQeO$PnKV`OP@LasrRn^0ecXzxE<ekm264guX(kAQeu4#ek2mvUqTj}T+
z*+?M=OKx08_D;3`6-Zw?<W0oryRN1TIh$+lE9PvMAQd>te_Ik4#wYvBMJZjc&%UUt
zQA#exF{J2CUr}5XI!ecTqP>~aC^FK`tMamFu-C@(-kOiwbZqjs3mNdz#gxU;g!n1D
zRiX{kJ~7>_B##bD+Q>8Sz82>*)y)!ZRx$`zcXrKgN11=U=^<eSoXJGTau{w0^vUD<
z<B9xN8=J3KhvBMl{8t>$le&NF{DUVt^Vvvo6T%7T<@<!uV1#ApbtaD%mM7aNv52Xi
zYedTrxs+pfT-|5?SX9W$E2?p6u?AAH84e_FXxX-@=Kx~ovSquv2&&>jmx-199chC9
zhZ3e^a5-(Ko&1Xy?WYJ=TP=YK$EH6%Afa9@JC3sQ3p=LsMxQcI{KfLpe{0Q5QSafl
zgsIV;^_*%4#tHQ>rq>frQto||k_4~y(}DFyabAELC)w<?!~o4dbhyX8moNpPm8TP5
zz3}0jHB*)hMtg`lO|^opC6}%ApJG&dQettc<rVx3&GJYB6CR1>5hjTH`#+8(a2S@Z
zo#!zeobZ3MJFV4b(CEGy%qtj->9iy&I*vR}AC6rt1vf0|XeZr7*vQ$?AGPdGC7S_9
zcCJ|yea7-C?x_at7B4_QwPi|!L6;?~^Q}7@e@26b^mC=d!=;Y{M1V`>uw$5!QcLuP
z!N=wBc-{KV01>j8e!KE*&_r5p0*!^43@oPSM~@1hYOEc5{<EtjCBv(U8iE$$LQ7K2
zO3Z<@wDnQmzd8Bsl!!KhGAul2g5cb7v#=`tx0}0kD1tVMFgVGX70YQz1Wk<-N&}Qv
z1i8dgthd?K14aNK{?@5HIH78D_cYISV!SC0*qNm=3e$3y_SGLW^%MxxO!!%d_rm6_
z9qY}uS7s&!V9blqftsoAm$hlS^zk18T4`&<O*DguG%4Z`T0c}3S^jJWzD}~hVyF)2
z(zAsjpL*60dUaI06efIbb>GT$fXb^d(MI@`!5W1Z=;{BVO=BSD_+~v}CnM_su<Wmv
zQ?;9X09Jvm10YOzE7N4-j_XWj*(J-$_&t<9ge~D8UTVk5vPi}4P~0idnTB$#RjJGD
zxuGy5dYT^Wb-#ey*2T4t>wxvcANx7w4nYT_tIk$XUXqjQvE03Gd<U|yFbE)Dtt4b;
zu!Ym`a|)QtT8Nwu^9=s@w-ND42@QK~whW})_Pdcgd$u+_5*(jHsepMynD8W6u#Fh<
zwv`voO<g0_<%Oz#vY$jZ!?=hw((u_DN1|#x>=X0RzgVMbgSUp^NX;}P{V@2G9rlU3
zUl?FXQ9Op^g9TDWh+z-p;`<yb$>-2;Fh{2oojHCA|4v#~3s50z0Q?6!n0!@xejZ<A
znAC1_Fv^8OpUCBj79q)P)(9G3-EP&uyw7NH7lqR_#h#9fNpnB`l;FU=wL0B8He7#z
zwbJP76Zx-e!~x)q*m^=}hT69!Em>q|fA@<fKT>9Q19MwG9XLyTYs4AqqHrWv8-vXb
zDzh7-Q%;An%I;UGlS!{-X4qpf(9}hI2rjthOpK%b^1|+5=atI<@UROEP|^b}bGMr{
zzkZmo7@3&2Bud51nDj<{`n~u>{AF5?+fFCQuUe}d*xyPDC^xkct$^p=`sxZo?)nx-
zPh2+fI~sy}X1ItiaNS6J({P`JkwI8)yi;Caz2(VjIb{roacWjzJ&FbyP4P8V$G(K#
zjTyhV>3%lX*6E<tc6`Mk_>KjUon+nnb?~SmdWCoiNSc%;d?&s37q@%=!@0;dXB0iy
z_k)80b_|5ebIgTq52_U2@OFM7y>{7<vw&6_NNvqEzni>xqX$8S-f)$<oVI3emKNf+
z9SZYw{0xBs+!gzu=}W5vKfkV5Z@C-~BP|B=M`ykSO?U>M5<ChUvQYP~_pm6hYQL;r
z(F&dv*ERN64D>F^@1lYngH)P}E&(rE%z)jt<~*c_nVdq)WhvYH*LG+2_B1Ig_q7z{
zcM;9hC_@1}*X~c*8Q-YA;Qv8G-GeE!3vDg_XdEBtvcYkQ{(~|>wZ$9=0Ec<&2cGZv
zjnS0v=?S;qJ1hvzJ%*pk%<zgz?Nmx4;x^I}QuUrDTMrABr|Db1ruM))9M?ft_WXb|
zJp4ek8B8SNTq0rSY!2TqKfPqLJ@BwK;u7#2TlX267}6U1@&`F(Rj!6F#-U+p6I&6J
zTw&5XEEoH_q}34g8_2}t0XYwvhz2$6I`A@>c+Lyg3&kVjBEnG1esDW`{3v)e^Jlcj
z%cGr36?xNAUuJeirQf_V^YIp*6B=d8qQ63aLq0@KQpk1fI`gcivS>)l3x|=x*wfxk
zEwDmZS6OgbHaU;?)G1UJ%?=D<c~j{99KJSGa)w?cXb4*QI5|mz^%qj3q+gGlGS$#B
z;BtJM{8yt-v|nZ*+B9U>$@~Hv>trx(Q=QOj5qc||xeWlmXOqtzT41p*u&(*R$E2Mk
zo5o<s0An85|BohPu9waB`!#!a-+cIvKen2o7e{5Cid%C3!ff2u%(EZ_(*C5<(r`=5
zb;j-!zB?P%&4JO8?YFJSKOub>9S{~SZNM@joCYKY(bKeh23Sl}(z@MpWa$AS{m_>R
z-%J2i9%#!W0S1s_d@Ae5p6r8L?+^&-?M#bhcdY+`B11Tj+TK?j4uwF7sWR-@Egg>Z
zjjuDIR-lW9O0d@@g=x(t-dePCfFW|HFiqNRtNAONGcCN+cv)^$SF=Z&QhkbLy=pbd
zLbRb;v&KsWvN%1r*Vf>_9zmma_1l#F6yA3^=wIB@MBZ7jH%6flFc`B&Vqu!G?c$*j
z$Qv;8fxcW})9RDdybD4MF*8&CuZ*Zti+X9tg(=yBk;DVf5bD3PKsvY7*Y+Q72_k19
zod%1^i1`PR<?!C?C+`t$Xjt6o76<w@7FZ|>MW{?)OQ<}Y^tA2wDLeLmL@_g6|F_A;
z7`<_*{)~nqY<i8U%z-1?Ciat0Vt80-{*N?evlaE$OokT8w{Q^~JJ=A2P#kWrq);e8
z@fi(*{cK16SxHhu4fe)pB6?JHyLvZp^U18=@*f2sNqG>c9}X)wn)v*FIc#T@0csD0
zWqh`4?6_)mr+p-k58-ru@+=DGtWc@#7}uqyynpfQ<kgXxA!et==`2B-3!2mc&sGy7
z(&Hj_by++rpq;8$<7kfZ@$6=><5sRl8V=KOWw%Ck_)4xDyIOsQ2LlZeJ;t97`meB%
zo&WaIdUT>F*{4xsR>(buH~9-8za|C%^uOWNJVz22l1)rhh&Gu|eL)x*l-Sv3uQ)#|
zUVI9f$g<zp*6*M|KBm#nwr$-zatsWQ9`6l(390p*kC{8@GSb)Py%8*=^_@+LyVFI6
z1$~aMXWxDGyb~vUGPJv|4ct=g0MPq*uXWf+wW2=F#V=^BWDRyIk$N0q;5MuP!=1dp
zB?+Kl$qDVvUf<<TCLB!eg3u=Wy<{bogxjq3US>(r2UMqhJICcsSr1-AN`Xm#m)}*u
zm}}Nos6b?sl=mAJ%7(WsQeMopH>}<Jk)9yK@BE^EJ|Y_N^5mvKmn9$oKdrj~8)C~W
z&b@28Km8~H#b1fp2u3?Hxc$DQcp7G;xdiiH<9Eot%(VY|e{N%&qM-J7wryWt38F0O
z`W-34h+}#_zKrJi{u=Iyz|JwWX|Hr>iPfA0vjqovk|!lK$}JW^K!;3mwXt1l+VP?G
z(dVu;*JT^f2f9$q9cj*sSR~!xqncU==n6Vy(l~ndO;b50NpeKTxpMNW6O+E&_mUNN
zSvbZl<?lMDF(6?vsli`hL)gelH%Xs9{<pJE>VfofYwR$8RL}@4FZiARt&A>&*v%a?
z7N=$Y>2^X{P0R()w-b0KhBx8wuMF~s*C{PHv>JWMeGdgAX$t@J_i*RWl`L?%c(65#
zzIyj&?Vl5K!`P7{H%+ZhfX*jlq%zh@*)CskT2(U|_wn`3Gc+?@d-tRt;l%2iN{xL@
z^Ke6fov@hjvMUGCSX4ZT6Pe7*5_u3+M#XCac3|-6i_{@L5GLFp+H3}^$&5QRP-Duo
zT!u+rz#<o47B+6g1!J0j6vW6#5$JE`Oe3a@l;ch2WmL?UV-jm6+Vrn?=Z58e7sWTg
z`{t>k^%Gs-8a~q9`hxcecxuPS+ZEoXf`1<TMm_uN^|(!_S3rGrePH8-1MH0yhc*QW
zk6*0cd}Siy`pf98LAa(oSks>!MW46Yz4}#xk7{!Eu$a=bmzMEL7SddbEDY2$X8^SQ
zb__1>`^<z2`+FWZTmt}(w)eFO2h=x0To2*E__2?Lv@q)OFF?Byh84N}3k_pjc4BMC
za&3Oy?+&4Pe}d*qy4`Sa8t73ElEp6j9O_1xuwa;AjXdB!R)h21X=4GomPn!YCZft{
zC}(>M*lOlFVBT1Y3uU7WG!D^Fy+i`+m2lY06nL`UIN20Rb1B~R+%?-;htnj&n8)@{
z9ROaPF;sT%JUf-e8B`>G=1}f*ZY24yKMzN`2FyCDA8Jzr`W+8BMD`6hcRRSZC1|0o
zyFRcwg#OSTssYA)io%5H2s_y*{DVyTFwlP8wSmRa<*V2T7*qpUfOt8&Tk5|_bP9eH
zcE~~-$ifbIiy{xXutB}ZwiCsMhm5@8ANtx(Uh~!(-Cw_cjoZLFcr@5+ch~vaW7c}5
z$Ty_<h8WyX;g}tBbZe~Jwt3Zy@4aLb(R!t<5bACe;4qvKf^&-n8N-ISEv$|Qu8&S}
zQ{i0!-ZLla!XEdwH3dYW@xfeD<0kP<)6dtG`TIZHlj~1>38Bia39PU22GmDsCsQi|
zGfP^#_bj<PimTkMR32+x_cOND0D4Jy2z5v3DNec!w^u0@HeGkgb!J*0i+l2_CQk-M
za9IDjS372l>k@eL!{4~dnevkF?JVDwHt<l-i!`v-)|g`(%y1k&GwdvMLc`hbr{f&#
zJ^G%ZzgGG5AS**~A3`T7f<^3kaC%Kk_8aJp&5B4c=NzZ$LtOv+e7_codW4ZMQou%M
zeyy~)E82ie<a-29IVb!<Z~6w=nP>khhanx!yTOFG``pSVbF)@HSpY8p;G5QxyoIC}
zCVPE;dceJ-9IF8g;&AVxzPfIJ;N6(pQ57YXPT$4=hpSIo5qDwcCI;^}&t{u3rhr~C
z(C{V^%cF8a@}{OE9gLYFnRoDwl(%H^Cea4o<>v7~AI^OiRJwS;Ed%ed!1VR*6_5;;
zg~UxoYA-TFFa8dOWmW4P)z-bmi18o*_7aTUOVV?3SD(Cc=x<8=cu}dI<8N*-stY8F
zz>+RrYd<3JW!U*OmJ}pfdPa_^<!;kQeRV{pj#%EHZKGd_Othu!8z32X6Em`IOQoCA
z5{!|jps9M!X-wT&fk=giB{ykl(u*+h%r5DVl;V*<niaY#o~DAb$!V~FS5v?L{6`aI
zFY3NJE!HqpMLZkSR+_82uw8aSCva}ys21=V43$<<i4I&-&+;2?e4Mp0+}Ru$Jj`&e
zAzlXKd%zL}xs=aZ9n8TUW=H+ua;Ap$-nY;O1KN!TnaDL-y5=^tR;-U!x_V*+y0w-m
z4u|(5#||mi0nGBMJ&%Od4rm;Q2Q!UBOU{CM1W6o)Hi1dVrZ51EPLq#(3=;Hh>=E9U
z@y>kq50lyH(#(KmpMet{jJ8}%2bteaVS@k3@#_3(`3wvj>R*1BK?z<qJ0mhm9z-4F
zjKw%R_uI`jjZ`Z7oj4U%4^^lKtE&IyJF<Q@P%}A)8A<C@oJbh%Hh7{R*Pv}p?SJ$|
zO+{Agb^S^XBLWWx1NYa#YJqilp<kKp5cUHVgy2FOegPSR>00G&@cn=}>bn49e1~`g
zo<dQ-0=WO_`FD)Jvfbape&xYe8V-}ehBCjr0+`AT`xW~A$JqbFGsrEQ!~FJtOhNzF
z<1{x)UV+0hdFRzo=iJl`IhK9cQff@)F<|C*UPKo)<x!SS&+_3Szd~Bt%nUE@B5xI@
zrFj2ERq>E}a80WT@XKzZ&$-pzvI^ezC^7;v3*BOPqpVL7JWn$}yY-X{O8=BKQv_4>
zkthN+F3fVoe_|i&h#8->+aDQfS5ZTVu|9yENt^BQ%$&S>RDsR%n^WGP-q_NsOTifl
z`Qxo)*S~<E#Gfpl=uv4NuE*!e;#78b@hi2azvRl*i&f46Tf=bg7)M~o3^zWytfpY=
z(me@Xq-pBf@Q4!Lm~4<Y(w>S1lN%R-=Tq%$aJZFcNR9{6A5c7ADy1KMcjldyvR6~e
zBSjTXdLt>5ShEsfHal|pi~!IsG4M~UsC&-z0J*e*5W_m;>nU1sZ?Gh};<+ydE8R=l
znbkmuotDs!YfhSYu`?$=;jnA+CoFHT`)b{$<P(35#I|r%81uy>;L~r)@}nZkhNeU>
z;>?8Bn6iZK4KS8Lp;k_AW-Q{@=Tq+oY$RgmMLJj2P4$+hj9I{$coYxP(Q5wzFN@1G
zfTV-oBfOne{+#57IVt#QX0TUE?+<)}fp?|aqr8F|e*kDO-I$D+x0LM*XhetI!#9Kv
z$WjY8<SzP@L~0!ypI*0CmIVy9`IG#%nts*6G)kWKW?^sd$QJoZ{e8x)c>W7oHfYXu
z;mdy%y(SPhORIhwTt$EU&4fG4V)|yp`UKIwmTS4p9iv}ieSuZOKx;?S39SwxDXjoi
zqh&()vyGb_KA;&YEs%FCR^ZR2!#5`AP<T4_XA73QtCi=#>X$TOx7xjT_(FEwzG7f#
z7q8~-Dm1Ypgt2SAXy4cAVI6WPfgKlkL^ZL<XR%o;b}gbaI1n;<|67P>tt(p4{MmmW
zvh!5X$x<O9$o6qxl;!eJLKM#&%ai>rNXyJSx;g*;VAWC`Ys6wRBcRSGsMBA)G4bT$
ze;1iu^8X<bppbO>|J6G{Ua+d&h1{oN*>!uW3lfUCO#x%9fraN*x~tE2Ow?1TB@e4@
z%3)S+2aiBJTO8A-)6K-yJ@V>ZartNlrqco^reCzZBi1)lX0(>bKS&h+o!3G!8ecu-
z?~yVM)IV#XyjmEN&Oz_SNJ{S+5XA#0Ua*5lwxyrlWkb_gmv3KFn=um(hFo>%hDRq8
ztLm8;lcb===nIEckdNfqfQ&zV?wasl@G~hJGYAUypD)QDs;UqYnW^6!JoZ7)k_(?1
z<2%02<#G&!4WR2cf*$3*aqrV*X%pj_?0aD8wCm$Sn(N4nzr5^HU2lDQP;^1{WPZ#F
z!e#=gQwayz6_%$}?=h{oR4J%^qpZhfk~)`W99HhZ^2vnuXK(8zvG|xY$DpsQMw`Wm
z#=~dW#IQlC`T3sY-7@R1Dg90#aSgTDuLb!GyEZ@mF!Zm7L>__Z$|e3_dRenkysS3i
zaK0k7s@o$wF>JjxKmYq=lg#{!ET#=qVilH)>2w(^Lxe18Kb5vR&9As_yZ+`u?s6b!
z@nyF8*NtPj>wA=Z^4Q4RIl2L&L??h+ydy4ePJhD+QonJ#+k3rWVgB2C!IXfP(AS?^
z8eds|qIdgy<lsqes53_m%TgK^eDVwLP~L8rS<8P{bT(_xyjk;j^hd`T%p+JxI8JrI
z@``*&QR6bN;yQCo)zt17KAUBrFKECx9}p46>wT4g!*rDsZ!phdcINXR8C(23KmMZj
zl0dP<4cnjdV+u<zrct?X%^2WGz9?tz&ce<4-nyz<i!Z|*XuMKbLynepE@f?+TQL>~
zB(a~4faM8h{}gyTTvWG`kV)p;zE$LxoUNp1B>{z<2?M%B3013ewH|I!t^Gl2=P{9K
zzG~ZBj~}^9Kwxv~VSte+0UcE2)Ar*nzg5v(e-I{2F_*qz=VYSz2kO4;yDw;!eL~T`
zyL#Duch3s$suYWUpCbr+wcA3p;SxJb){R!I*!K2mi`{=(sUv8IZU3En$Wu)O9l884
zDLC3p1#Yx!rkv=>)Dkc_uU>cWy5-iq+Bu4!!Z(w~!R}XW=*WBBwVjchP(KaS6sJxV
zymWXii$imijvRJ;tJEY@u|@7`Hg3=_S;SrYF<nT?@2FRtog<8^Z!0Oe0jV#VIk$Fg
zIbKAKEaeAQ$F1nk&LMRM;Ys39wle9Xikp=Eb+mmK8cWjK*_B=wgbOw=e`Kq^y`_b+
z=hDdo-|1_E{jbdZ|M;yyC(g{LBR%Cq8M_gl7(fzk!~)CE7Lp2rKz#vJ8H(TxdR<YW
z<z+0GRp0FLgEk>`*bq*q@}K$!_mX+v3BX=4K=q!HTg8Xldpme>if|(~SjH9p^9Ba7
z<7J-efD+t@9wf*II@OM_LQ#q0$j&<${q~B?lW=&K8jM8PnL4L-pV=0bxWtjjxR5vH
zRx@)1?6<_x=?OxQzP__^<1NH9X1H9c@pgV$d2OJeCV(<V5gxeZJz)8{U}CF4V|hvb
zkF9J`UmGd75gjb!W0hIuwTOiE?^@|}Aw4*p$i41AkG+W$oTkl5w_r!3F?AbkgogBl
f{;yxAB(v`dZLG<`bLhdhLLs^r^|gyMZ9@MGzK2x&

diff --git a/docs/resistant_lines_files/figure-html/unnamed-chunk-19-1.png b/docs/resistant_lines_files/figure-html/unnamed-chunk-19-1.png
index e31448cb9ee91951acbf038383efd11a734133bd..812b67eab82551070187954e5fbf679ea94abc4d 100644
GIT binary patch
literal 5133
zcmc&&dpuO>|9{SmF&T1cUA~lN5^I#mYT0Btm1=A&mz1SKWsx$}D#@6R(oMxw(#>VI
z?4n89Xd;(UHjy;5r7Y5r%ZP*-w_%vyb4I_{@1O7Y^?UtZzuTE}<~h&j^8Q?&&-0w~
zoHJgVHq51%PyhgP-5G8^01!|BkoGx5NI7!PEEaa=c>U<R4t4=>0w5GPIRPj5&jF!)
zdwY9G!U;~HPN5v9P`(qV)dN469v&$kOr{4D{_{LiYC~0;p-vzaio%1#59KSN5H5lr
zDa;feGo_Zv>q>!|On5>9FNIf|0x7ldRC1gEC)5e*armvARwa+=!DBLcDNJ5%7q3gn
z4+Z>CCq5^X&u`_o!c)mtDr-|bYEziCJZ5c|vR0{V<v6wSIXJUb34g6hWfzaxRh!aP
z3jvh<{ryS+AP`i8qBy^cr|g1yI1<!`;!34*{ciChm<f$&hW{@Bn4ZEfB(;0^X8`8$
z+}&3D9?lqOo8H~pXi&5Nam{me`W@T&o$u+(_7NS@4IVkZJMqW);`28y6d#;XDnru6
zLFQ9|nTx4y@s&cIV)qL#JKuR)Y)rZF;iT?rN<YDT0GvKepqWvy({x~V^Ivyj$h~IH
zcFL%>o+ksp$r20zXOa~}0y!>XKLq3p$F~5q?|+6YvtDlUZ3BTLRV>gvw;njPD70XE
z{us37Dj?kQE}}tu!h)*sY%2ID6yB){bOC+A?5(6RD%%D$K31HgoYS5}I5P?sWkC;-
ztKB2<p|ubFg21~lAKGah%;{?Ox<pi^rA<0E4H!q+lcXndkat|3Z!{-fT7I2G>z1D}
zI{g9Hw%kGcJgc3%otCcBW+qx>pB_M<L(K$UwGI}tio?tfNgORQn!OE9Y_Jr9iv#GR
zgd-$=mNSvTCw?5uH~72s5Sg=&{A%EmmDi6xu>;z)X6>BTTpzA<b7LEH8E1WECF&)k
zPfQsPJ#V3lsi2M@tCsii@>v&xSweksYR@Kv@dwwg3Q#>|)PPu{c`Psm-ROEE2Vjko
zT<_qgVNE(%5_CtbB;2ZC1M_!@F;kUBKS?%AW<dwz5;Og5%<+*E43e~`5Kc5SI<=jK
z!7y6G=F*c?trq>9s@0_TelpmGk8OMaEdwV>H0U*7OjHxRzgT#0aJrL7YaWv$$z6C`
ziX`{oZ5)#Pef(2HSS$(`gYc(h^!|W7q4Cuh{VRk>nEVo$nrXV|y2>6Q?|VFC&xN9_
zSgk%Iyvq6s{j3)Gte+m5wQ|7VC$wNI6tkMYWBOn2PLj5=BE&<#1>xQ<)4Vg$DA?^K
z!1FTS@Tbnj!$evKO!j<(f9&}J7D=(rUUl}12Zp4#g%v6ODqYIHz%n93{}je&Lau%+
zc8F<8VCY9-hX&zL>IY$cfhB-LzYE?}4v}cy3y_GzZTjfV5~OkB(JIVsn2;xLbpYnc
zI_Om802wks@pxGcBoNVfIhcczXA~F}taEKIIAz{iIf!WwBf8j_qPfyixWVe4y(aox
zwrZJf6&VG$<?lvXwbp98?l1_?z>6|dKYT``e!~)xGcHv|*Bu|U0E{#(WZg{sd@#>q
zBdW&&YTN-&x0zpDVc!+q=#n@%PT<g+k>pV#x0hT#$_Z&5*Akgzi^gvd7-@IF`G5(;
zYlQgz2;=@hyc&Jz<u9?MHK7P2t}-w&oqdrw^6Aoj=hCANQ^AUGuk^Dzz}!mo)-wXj
zN_(Bb+LAET*D-Q@T!3)yp?h8Okw?~^E)}JvE}6d?r^mj$t@GKL%*jLJUCtmT+3DF^
z1e>(KzZ6uczIlD&!j~x<K!iW~#L^Ch9Z$b%>EnimxVYHK$8n<w7O*~g?3GpU0Rsop
ziVV|~uO$!4K!mYXwj1Ih4Cs6<&+m`8cX(dR-mJH)#?miS`@fESwNNzDMWXG0HTHU;
zsC(oa_FU1}36>*SG<p2?zWDmhR}~``*2~4KUsxNUSB_umtMhEon}h0kcU&^#%H)x5
zz@2huQ{Z~i)>Wsk{RVp7OG^f-xBS#k*c)aWhSgL{$3AEXKg{TiCz=%vcRe%acC_>x
zzB|M83zpRt*`kvE!ua!^^{wTGh84#P&f5B6J+=bB{H(F<vItg8V&>jhKg_0nF6!8n
z`n8};kf1=kA|1p-OfT*pvRzRUw&u0R^du~ZnZx}}BPTZlgl>M`wcQj26oyQvS6vq)
zyiyP!A!=M~g&>+j1Ew#Mg`elEL&94B&Y~$?qZfTU(OACI7zHgi{$jfVg6RDM#a%mq
z<gGm46!>h3?)~Fe{ee%G;2|n|Fm-{FG(ZbA#L^^#OLd>XYKxdS&aL*mLOK?!t180z
znrc#5nSCzvU#My^B#8=;@Kttrg%x-vxx{_GgN|tL!b@dlQzF9!+MC?)$0_P4A@a~H
zf}`f2GKi2ah^&SP0gAhsIKuUG9HCFJEX%pykn?HQ2VrHyJvjH}>cw*6qixf>4}t?)
z^geQVtam#BwIceo6KN9cPd4Z>=D>BxnHVssF@xkjC;i?^WXxNOE_Ipb3ZxW9oest#
z1avNz5oxK|Tc&A%m_q*d;%<E*E|F=`z`9V`Wlfl0n{9<GWDaWA9M_?bg5=uI1!0i-
z-NC}`aFQnGEBVk_I^9G3tvU^y$brZ}pW}TC5__YstLCvXH35%=c(gJbGK-a|Iz#wO
zp6>Xy+EYSW!zXjhGud)&JOw67bGWhsUs>r%swknH;0@irXj94Zj{1(Ii}B};pZpnS
z#{R;f9~^0iujK4laG}9kKGeN3ZL&~QpItFU{g_oY9Hfk0!=D~gyeX)za@0DY)`G+o
z(%D0gV{MQEnFg!c3ggQrZC@Xa?LQSXN9*8b!OWsMzWA#6i4N8$9Sr($?sS)C5Y_@G
z{MyP)<0BF(6OhWITOt$rt>a&bx_rk5giF^%u|yxN4mytZQ!nnD>Q)?LfnrCovSZ+5
zzV+nt#@Q-my9kz1!MBppprhNZrOfwOKvu;F<urfLf_oyXFW}Qu-OtVO#>9(5h*v>Y
zb5Zu2Hm=drZTp)>+8PUw!iC0`8Nvp|^%B{xsXAGGd=xu#DeYG(7|40_)pSiy_f&m+
z>B7Vu7VstaW(uMb`bNcOw%uj<K}wGKwzKe2eIo{s?SXh}q7J4YT+FUWA{oNRo(|2u
zg)L8;0JT=!%h_pfh2;S2@n1EQQ_SumffWrkAD8|%YHtg;OKu3+J^`*W0%)l?<hf`1
zg=Pt?Ja%{YQ@<bj!vd@9xxZ%%Gha<!Gm6&A8<v#i;s6Rl#K@&aNE_11`}p=3m7pEB
z#?MBD#734)e5w?y473}F@|rz;a3m|PLH70W8^7ZK+X*HEqbh{xIlb-U(<-+Vh?636
zw^c!Q91?|TFJyPgkTg3kaM^=X{IFvaIS-(!GeY@dn@CUd48V~!xg1O34^Vm$ch0P|
z5w=U)RVoM1=Xx#3E{4&gGuSS<O8-7tf6y`?#?D#EHDtZQL-!{pv!r)cP|;El@yxOS
z=h<@8Pf_J8@H3M4?JNKr+r>s>ji40=uGwcxYo1U5yk22lvk=#iS3|0JYPC66RbJ5?
zQ40Ga4j+dENHvs5?roW*l}PtM7n{1e!;lhLpg^W4caMNM4<Ryysw~lr(7lDMQk5EL
zIo#3s24>ldFw)o2CLgRxRsT6o`6&-`C~Vt-C&dD-mVRF2<KI0Ul|l}mdYj6FzH<rT
z&elfQ$?nXe8~v}PFJ+67mT5lK4`vD_ii%R}NnGCJk-ueq9d&*i5a00~yYIpTVFa%1
zzM}Wz0+C$WM1BT*CC{3mX%UE-s=racGGnK_d8Fy-vo^x*(ayclV>$>R+Ph?CKf0@a
z)^hd3o;{_V-}?{$C3f6%EeSl%P5p~loUo{n1=?hh^Y6Z-^^lw(!L%?yFjFU#E?V~@
z!ckc@mPN^#6K+cl!(B5HdEb4aJu!@raT>Dhvohu|wU<K;!g<DClGvL%(*1lD4}ZAq
zs5CruHMIy2SF5+@(QCg>;>35`V6s~<=3T0X;+@!KhJidS?`WG%V9a+nC+9~Uc2#i9
zLQgcLzI(qp(HuOj*x8J;8HiV>&f%yd485W?JsYA1^HCGbY!=Q6B(GF#S0QTvIE<`n
zE}mmiJi3=f5J&gngEwO8Rj%@rE5_c+)daIPd+oWkmO|bs{ZWCVFsh;=m+-xMV~WaU
z(Kd9Mj;qm2ye@-~2R)tpaFnk&*erJ=YUWyr^K_89SuZMxjWcz!zC{n(4*UV%60;~H
zb2+ooi)>M8weSR<2+>m1gq498)<RftdM+${#JR56)>Bkq;mftf-U<W34|%97h;)fl
z_gX_bf`s?i*<<sTh=}N_rq7UvS#X;l8h?gwee_=mCoz+ws3T+tlk?={a-0;3jg^Z{
zQ4NFTB;UqK#Onvr5y0?Kt*xGTCjKVeRvV}kYvK~b6-K_}?A6e8m9}WzB`WyMw@O#E
z?)B7VB+U!ih*D;k)f^Zo{%$(81kgt1l@!28s4OG^pX@>2{}p+`T;2V8DX8@S$NK+9
zz!HD%)f_hdMib`GrJJZBj0AQHDfy<mF3fb;Pmn~yNhe7_{~@fWW&_~$4(<uU`~bQi
z-@*kUS#BHfUE4`g$vM~e3TMse#lzwM{cUY~IF@o{+e3P=g9)myOZpd=1sVNw`9I%;
z{~*P(61JyX3gY40rXs{E-F3S0Zq=w|dQf5`l6mFzyP2BXRioAZ$5Zc6oF7b6%(Z(X
zqQ8-s9i84E*OXT^QCyyI$bKd)PI}oRk+(W7%%|Nw?pe=2(!S&FlyfJ$BZeyf3aY9<
z;2?jOJQQsc_7gkw8`u4)to%s0TKEBQ-~VAI;mZ1BG7$6aawqIY-Hs5JlWS~1g2sI?
z5)*uIL0<a6$3jcbor2<PI<ym7mVSS1?RWI&Zz$q%$?NBylx=Pj_4>z5Vl_u+8o18#
ziiV;3KEh1gLA{W}1`bQTS~7loP4?}+_Gaa$1N(c8ueUL-iZ!N|<t}%(Ij`OBN9@d{
zITpnaQ?rH_F!Xu0VySvsTV`Hd$+@UY-8*!bqV;EKytVD$ti6>xyoVT2rfyfJS56O(
zF+NmTViYxE?Xn-O->X}FmOB-ePO_=*ds9`nB}uRSPsF3}mgP#j_|+W;g15KVeOelP
zP~F2+^r>v;*JPxOkgEP>3ui}S-=>nb@x>N8r~g(*-SmN;H*j-9boEI8wT}7ovo{a-
zm-RU+mn2jDuh?l|A#vOF1=kf)!NaqT0{-V+^FW<c8fYOImDq34Cen8PF0pxNxg4Ca
zUpY}OfA*wbLkpGum^Gu%^b7_*wOxwtF*SAC3Exw+hh!Q!vw25iLzH@)7M61@<1yP`
zf6%|_9tBIfmQnS7a!~Sg{?Yq3yYzvEtmOV?s{=>o5jobjp?<-sZCQT;^XH!~pZi$2
z$#WN&*FF4!GIOFSe)T^u!~gUv(SLkDQj#B3x+i7ig*4%x_1xEOa=W`G_}ISzab#`5

literal 5692
zcmcIoc~lcgx3BI562cZXMI0nL2)N<C1tg84f(it2Tu?#90YnI>IA92*#RU)tqN3=i
z5S1BG7IDOYAP`Un&{3k`#x9^RB1>2UgygFZe&@aO-XHJGH|I4?y6V=wzkBP}ty@bh
z+hx5r&4dO3&~|ck*bD%Q0f019Nsz+Lo)HQwn(R$m*1{?POaOcUlL?scR{(rOix)43
zB!a;7VfqM|J|d=|&Y5^P&d%}99F8*w{-!&}SNNzTeVD)pvcg9o@)0Q^6Tw0}@tpW{
zPJ9I?y^YW3$3tNbd?778KD{D7y)C{1zDfZT2z;1OR3NGo)G5<B&gmRZdORn+qAk5m
zDe?g#AErp)BNEk#>foysDU}uR&K2>TigZpzo3cWwtP?QnL;|9*P6_|&l*+brPFqEM
zTLlDAc6N3u0f0bI46+jKZRyH3C`TYcX~?crDy#FJ?}g6L2zK0Y1OU@$;vY%)B>fQp
z!*@;&_FKZPbzKklu77G&Hrd0(1N-gRfPHRY3@PyVrTpUqW$Ny=E#{4R@14H(D4p_a
zZ*MhmT6`pH$p3S4Kc(cPO}k%v(kt84uWhGq0_PkO`#>CU6Hw`DvH$nyzzY23xKW=n
z|5*vQrfDlc&AWr<07QQ{*9Zr(V|6qPe>xth#=u$>B9zWJ#NUZf1$o7pfb3ZRH`!TL
zp#Rv_$%y_?)j~1P1=snUvKJqDe31clrg*{9byaC6erz&}?AXY90ItjELPY+6CRruF
zW&lfzX$yKjMT5$*b_1cA8M*}LTO+ooQ;rZN3*>R{bc`hP)e{@2nskuIBh#@y#b1=(
z@@SyloWcdgmHjW{fX0~RGzL}0^BO7rCjJarEhWTnPu&yeimieUa9t+m$fjf4Nq!OM
zk-MSu(UVK@x0c3x_<fu3Y<0=#09s>FMW!AEnXdCN?=BY=aX-3g(&5Yo4f<Q)k+K0l
zpAvhpGaBsG77oUe{h;Z`Vd((buME-#PXm9ON5<b{HScqttpDAuL^Nd7N3m*F9#vcs
zf5|+H?ToZ=B*r6U9d2sp97(0W2Oca1=y&;690EV^cFF0CY$PYL4KcBttm0-3f$?v|
zKM`B#lI;<1!ASEOJbUyk()WZ=`~ht{I!x0hMs~f47&`Lgn|2L0l|`lofK0Q!IOCgw
ze6UwWXJpv1a1{DxdjtolwGudw0j)6nlsXX;-Zc6tU8MBOV$|xq8A@J;zfG8l&HaY7
z9{1x>>047YFsTaX7|v`oPShpzJ|u0C#<ouQ<1P}cVq1pkPZ;iL#6TuYxM#d4I-&p6
z{1GDDycUaf%!a3)=u<`DKAdLv&E##g1xYOvSWHB8#P{-qB?rlAS%o@Nh%i1#e(zOa
zz;IMY?goz28IGTUe}Jhz!|^Tf@3w_>5jbqR3(|iBho|xM7>;mgRxY233H}5%+-?_~
zu>(mPzpsswE7h^x2?T%z_`>r)3+xvGwxu081`Nt0by;L9S=7O#lW!7Cg?6w<$QM~*
zR%O3Ey5uockgXJ|MuS`-ZMu{&WmJo`M$K<<23D##LH1Lg{zOvq8zyRN$keeheJVXw
z3!%x!mchbYgeHy#dcsjYRo)5Rk}3zaEv+L(laZ)IQ|yMEE^OA!+O5BpwFsXrlNAMR
zz!^WPNo=FcP(xnH!;Ph1){_P8FZ+WL9$`lDF5EHlJgMVD`PxGv%8<b)gSQU21w=A1
zM|^waW>SaK{hC)vpLFj{v*w2>r=n!_m_IC+;?`$wxpFvJE?Xskp0T<8NjEgvfMJE%
z+QlLv5u14)ihN`4q+(B(B;!JEo=F0gy&sTMo&xS*a74i`M!Fo%%QFSf&0an;qq0-+
zf}~C0;t%ijg&+J^c+|h^))zY7keSmYeOX5%elI$@+hzF$;m(6=mj^i8MCM$0YBf#x
z=|vnU*>E)_47a}YTt>qNPstaM(!$wgUzP^#m33)qWpfx$H<E>Mf4Qw3Idm2yTVXR~
zsZ_}a?$mQ&I`Y%<`M-h!_0^BbfV(+B6p=@Z(_udfpF-;3Zmn<J6t--PRZpSSG`5u+
zV-KD^QVYG=ihgxX4n#t>t{Tp_o5ks$J2&rmZOd~*th04^^QWBlGq<HBh{?fFcd*+q
z95n1&<sq*dAC;}auhsHD?w*eABu)2ZU_~YtMPui)N1qIO)oI>_K{ApysM%Ofl}Hb%
zvf!|`M4{HuO6rhZ2Bv>DO%=X9F&}lnZEGTfnJ#!eSr2C0VqnAjWxkd^1FgADvwJbw
zrJN#J8MHULe^`TEQZ6m+Ge-PXaWjs5Zjg7NTXdGzQ%X&+&Tx~C2>(r*!q(QoT@wlD
zx^@nn4o2e4*6VOmviy_}?=|Qeitn^W=n*NTs1PyZ>1as~xvSDZ&_VG**_1_?yEQLN
z^T`)VC(D&*h@7DklXoW?)_RK!2N@=(9v!;4%Dx?Q=9a3Khiy2Wr=v}uM9jM7B$-Px
zMU!5S#SmFPh)jLzOUG*ys!NFJTs(;pBGc0i_FQ>Opvnouq?4`Re<!}bAxVqSl8)@_
zJ*V0Heukl{bq>-Z)1x)ldrwkTbCDTRJsREFbvt22u?~IVu}RwW1R@u?Dc^XXmdYGS
zO9Eh9SFuv9!HvJ;di{4+qT}@WsQDMO0kxhr<P}YbVH085`GLt|OIys;Xxfk1Yjx^p
zODp_f@*14+7kaX_)l3+8ZY|EZgXVlHAJcU4CWXwc)}WiO#eb49<O7tB5Bn`J!2r;2
zxowGENdAL#icCE>2{Ym?h%5z%-xx3)nBWJI4n;@8$Lw*&0g#j1&tu@sFB<e2YWR?=
zwGLpru0mFagyH^{UbVL${X2(5k1p47`4x3AI}OtmMLq4&;9LX7kek+hP~=IbN<**j
zYDNUU#~jd;VS2(a{;)TT4chEip99Zfpi|iy{5p4U3{Rft;|kMR^r);>7ONu(clbC5
zCI7X+tm*MZvxRtz2ZDYzp-N|93l&|m7`PJwCVSoyE};$glv31Vrp7)Z)%>hW6}aMd
z5M~XZw@TJ)bpjk6_i5^FH4p|}T7&ngrJ1E91H0<|XyP2qP8OopyUSNkC<p!{QQbH|
zuG*5VZ15=06@lu0-3tvE?%-5mcD*h;7+(M(`^>zW$DTESGBVW=iCRL&rprSR!zm2*
z4m9z1k<5W_JJa@j?7BI_mIHmhJqk+TF=Iso-y(Z7U&-l|^q;a{k7rlE`npb-G;DFf
zjMsbJ3BM}~>wRFW`N?ga^F3w0JUlm2wo)uvAZ>t|xo0F=`oM0JCFVRnHhJUe$i7GO
za8&l;#RUz)&ZaD5ZhMLk=v%R3_gzut8oYL3v@RuyS}3)Dn#jE@>xQW`SK$V?B%BCk
zd2Ukf@6CJtCdls;k+Qs(R#f&?Pi0s6g`XQ=Ol4FRB=yI{fupb8v&xFR=00zHZp>(^
zOc*;G1y*+KcoF$if&F}opi`NDMaT9OnP({Ee_S;iZrw{xJ6`2`VYF@JQ{nRBXGRQu
zWIbOEMee58$3}YdM-+XYS>Lm%cHN6<XbrjJI=@Cy-C0br{-i=l&DS>TxfOygIeQv{
zrpi2)+u2v`qcaM?${tVqgs9`lGPwUBQ{BFnw~Nc~S1#Uz?<V=d@G~5dcFA_USw4JO
zLr@(D=KU~*e`)akfCD8BuIMm`7n(IScBN}bdXb^2Sf>X4W=uj5f5@HGK}Y;25PQqF
zrPyx!j74im{6MB979%elYTDLlUGx^1GGIa^w6t}-85*yjH3)ZNPr$>-;_waQx2K7%
zu}r!78~zt$E~)0H?&QtNJCtmiWZ$WWWw)i6@n={3Fvag-p?gU*D5ET(N~YQU{E;$j
ziK!E-Ah&7BuL^hFJ^I3~-quL3m8uF|C@M=zWFgO{!e#jN7uF!yL26r})nytP%tsS7
zu&nA3-3j^?v@P;dxn@evsOu{1G<ayYv7^#;Gc<}}gL|axA1brVgy;ez%(TZ%wkdh9
z(s>oKL0_2lE*R}~N>|p9+Gvu-o|9TEsiJ_3Ca%C9Hc_8U$mn5Hqx?N@$Wn=(^`U+d
zPH&XPFDJmAai-V%yWF+S7q-IAI_e4=->nVxJbuBK#ZTa(OFVJg#^sINvX2wZ8p5HY
z+^+MNiXC)Vri#WvvL6o|4bWdU|Bl>uiQNI{O?(NUi7h)c^CQMdof?t~(0ALn%=P`Y
zYeQqvZw-VCNj1CUS|`A0Ld9l{$n%6#oIo3o`DPX};fgz;ZO7~qm3?~xz`Ww@d0%dB
z43tXcQJmb(1pD`>pUtb-Lir;tmJ^}#986`;&J@UJ+tDWo3&EDA&$0Qul@su_VCm51
z?~%LLcvlGVeDJ6@c0@j;<Kj$=|8(4Q)#Cz1Zs+>yn|XW_65Bz3ap+z5Z*U-RI`*KY
z`*iBfnz1G_YB;5MOGIb+7U(EC0vGH6@QYEXOHh`}8JnsIaG2$395V8vJaQ8Os(~j*
zYzYAQ*R0Evx9KJn4UnmEJzW1kRl=Yn!^)1Auig<b)=8R=i)Gf40TV(T{-GoH)qS_}
z^5sYS`?JByk^97;k-=SX<iGDomet=dwd)IXKevI(Xj#0j64~Nap{Xl0O$fZ4e<F=y
ztR);}dM+sn?|V>~3hu2?CUZ9;o5^VgX5KKOut~xb8KqpA3i>2c`&Frxr(08=Km-^=
zi{0T85-j)Roh2;Vi)Xo>shjS*_l9&#y6`PD<s_2-h{pU`_vfDD3HJ#BZOMx_x71j}
zovpewc7<loH@}TXwe%GBHu9Yi&q&4b!Aqz)!hWy$oM^>paK@E{*UeN58<A1o?W76R
zF+^tE35RADFkB?RHkBx9fSj^&m{r}O#d`+854}>}#~Q+Y#x~eT`Fmm@Th-IfBn(fe
z6kkSY*KB*NXLay{h7+=K4fi|+WgopW;LJEXNm%i*y?#3(I|q9;p{bQj6_=|>Gch_#
z1kDmtk<wmOAJ<XX^0s54PWLZfRhK}|{h>}jtLp3mYrOa0NJg0c1QLwKINh)jqG#eT
zP^%61-Zy|ZlE#IbAq_QS3O07Z7fod2ZeYt*TLa-q^ehnmQF|TCG{g*qaC`9Lp$)RZ
z3ZH>xdP$sdeVUNM9-I7_U`#`5q(!R6*_eSP#Qha~52&gfZFdLyUZ}}-V)sYPhv)zv
z2+5BcC!0f+5>m(GpUu$3&0sD5vaWHP1wkV_GE_UjRA}b^&zbt~9Kk81m_^g$vH$Gw
z{&y7p{i}h0fL^s&ynlMG>Q-Tqc>n9wba-@!_Y3=9uTzy4z|w|^5<qD1uwG^TKfd#U
z<tux*h)q#%UZe<C98+&z*HR)6{O4C56jDcU{?Rz3CPRZx!e(GvAQmhH=IB!Z?`Hms
zkoq0CX}A`*awNw@IsC6rC28R6t(z-G$Bz_(cdoy!l~%hBpt~Y6Ml@1&Bs=ccbOq(0
zyH@R*DPzwOyEnKp4&m0f*T=EOwwW1)UPO1L80NYLWffb;7u9G4ubkIC7qy+$-Er1F
zmb7Hfw8Y|FE=}7;Nnvgo*Q#>p$(fZ`j8g8(EOjIv_omH8a*Xki(M-MO)v?XCFsaVg
zZuW2Egusj#>K{Sg0R}?uF4akF7#esNH|y(Urh@E<Jt&*KHC;KWVaV?xjVnytBPu%j
zBGKp7U!;)nq^3=Aw^$vQy%IHL?Vn~i9x@Wq*d6toswrtTi!;ODm-%#Dxf5uf5n38q
zzSH=o=C6qS@LgNAM?1R8ltYO}7>*uhO+S$~1X=pevu^dyX;6EG`V~-Lo1nSB%yMq6
zR!{p~-K~z=NM?JSz8*N#a?wW`OUl`O!pb_TJH=l;&+1vVxNP=njpnC_N7k*$%*{6J
zyvwsGVZV=(bGn6hNI6^+pM}&8wXh}gw%K!$XV-%Z+s~b+#Jn~_ZZh;3H2weh6E(1J
z(Xq~gJ}<@6D{@DhvuCLE-^wpk-kVe`@9C<%>UF@^O%Ev@=<{@X*;%#qyD5eU`tWh+
zmBQnCjO}qH?Jro)8I58pJ*#ZMci)iuI-H!7$5*u?7uN_rATgk1_O?BpFBow%u(U~`
z*<LOdJqOAq`Vb}Wc;R4El|_(zhfU0RDm|@yrp?T?>w@-?snv0BXkYJtxN3|<<uEI^
zEBps6*5Qm*jTy~e+Z!}zV20+XgZ)4JjIzw{y$r|*e^3bTJ%Q6&7l*9Xd!qgY$av*{

diff --git a/docs/resistant_lines_files/figure-html/unnamed-chunk-21-1.png b/docs/resistant_lines_files/figure-html/unnamed-chunk-21-1.png
index 9547802fd6f95dc72a2037d5177d625be4b6a135..812b67eab82551070187954e5fbf679ea94abc4d 100644
GIT binary patch
literal 5133
zcmc&&dpuO>|9{SmF&T1cUA~lN5^I#mYT0Btm1=A&mz1SKWsx$}D#@6R(oMxw(#>VI
z?4n89Xd;(UHjy;5r7Y5r%ZP*-w_%vyb4I_{@1O7Y^?UtZzuTE}<~h&j^8Q?&&-0w~
zoHJgVHq51%PyhgP-5G8^01!|BkoGx5NI7!PEEaa=c>U<R4t4=>0w5GPIRPj5&jF!)
zdwY9G!U;~HPN5v9P`(qV)dN469v&$kOr{4D{_{LiYC~0;p-vzaio%1#59KSN5H5lr
zDa;feGo_Zv>q>!|On5>9FNIf|0x7ldRC1gEC)5e*armvARwa+=!DBLcDNJ5%7q3gn
z4+Z>CCq5^X&u`_o!c)mtDr-|bYEziCJZ5c|vR0{V<v6wSIXJUb34g6hWfzaxRh!aP
z3jvh<{ryS+AP`i8qBy^cr|g1yI1<!`;!34*{ciChm<f$&hW{@Bn4ZEfB(;0^X8`8$
z+}&3D9?lqOo8H~pXi&5Nam{me`W@T&o$u+(_7NS@4IVkZJMqW);`28y6d#;XDnru6
zLFQ9|nTx4y@s&cIV)qL#JKuR)Y)rZF;iT?rN<YDT0GvKepqWvy({x~V^Ivyj$h~IH
zcFL%>o+ksp$r20zXOa~}0y!>XKLq3p$F~5q?|+6YvtDlUZ3BTLRV>gvw;njPD70XE
z{us37Dj?kQE}}tu!h)*sY%2ID6yB){bOC+A?5(6RD%%D$K31HgoYS5}I5P?sWkC;-
ztKB2<p|ubFg21~lAKGah%;{?Ox<pi^rA<0E4H!q+lcXndkat|3Z!{-fT7I2G>z1D}
zI{g9Hw%kGcJgc3%otCcBW+qx>pB_M<L(K$UwGI}tio?tfNgORQn!OE9Y_Jr9iv#GR
zgd-$=mNSvTCw?5uH~72s5Sg=&{A%EmmDi6xu>;z)X6>BTTpzA<b7LEH8E1WECF&)k
zPfQsPJ#V3lsi2M@tCsii@>v&xSweksYR@Kv@dwwg3Q#>|)PPu{c`Psm-ROEE2Vjko
zT<_qgVNE(%5_CtbB;2ZC1M_!@F;kUBKS?%AW<dwz5;Og5%<+*E43e~`5Kc5SI<=jK
z!7y6G=F*c?trq>9s@0_TelpmGk8OMaEdwV>H0U*7OjHxRzgT#0aJrL7YaWv$$z6C`
ziX`{oZ5)#Pef(2HSS$(`gYc(h^!|W7q4Cuh{VRk>nEVo$nrXV|y2>6Q?|VFC&xN9_
zSgk%Iyvq6s{j3)Gte+m5wQ|7VC$wNI6tkMYWBOn2PLj5=BE&<#1>xQ<)4Vg$DA?^K
z!1FTS@Tbnj!$evKO!j<(f9&}J7D=(rUUl}12Zp4#g%v6ODqYIHz%n93{}je&Lau%+
zc8F<8VCY9-hX&zL>IY$cfhB-LzYE?}4v}cy3y_GzZTjfV5~OkB(JIVsn2;xLbpYnc
zI_Om802wks@pxGcBoNVfIhcczXA~F}taEKIIAz{iIf!WwBf8j_qPfyixWVe4y(aox
zwrZJf6&VG$<?lvXwbp98?l1_?z>6|dKYT``e!~)xGcHv|*Bu|U0E{#(WZg{sd@#>q
zBdW&&YTN-&x0zpDVc!+q=#n@%PT<g+k>pV#x0hT#$_Z&5*Akgzi^gvd7-@IF`G5(;
zYlQgz2;=@hyc&Jz<u9?MHK7P2t}-w&oqdrw^6Aoj=hCANQ^AUGuk^Dzz}!mo)-wXj
zN_(Bb+LAET*D-Q@T!3)yp?h8Okw?~^E)}JvE}6d?r^mj$t@GKL%*jLJUCtmT+3DF^
z1e>(KzZ6uczIlD&!j~x<K!iW~#L^Ch9Z$b%>EnimxVYHK$8n<w7O*~g?3GpU0Rsop
ziVV|~uO$!4K!mYXwj1Ih4Cs6<&+m`8cX(dR-mJH)#?miS`@fESwNNzDMWXG0HTHU;
zsC(oa_FU1}36>*SG<p2?zWDmhR}~``*2~4KUsxNUSB_umtMhEon}h0kcU&^#%H)x5
zz@2huQ{Z~i)>Wsk{RVp7OG^f-xBS#k*c)aWhSgL{$3AEXKg{TiCz=%vcRe%acC_>x
zzB|M83zpRt*`kvE!ua!^^{wTGh84#P&f5B6J+=bB{H(F<vItg8V&>jhKg_0nF6!8n
z`n8};kf1=kA|1p-OfT*pvRzRUw&u0R^du~ZnZx}}BPTZlgl>M`wcQj26oyQvS6vq)
zyiyP!A!=M~g&>+j1Ew#Mg`elEL&94B&Y~$?qZfTU(OACI7zHgi{$jfVg6RDM#a%mq
z<gGm46!>h3?)~Fe{ee%G;2|n|Fm-{FG(ZbA#L^^#OLd>XYKxdS&aL*mLOK?!t180z
znrc#5nSCzvU#My^B#8=;@Kttrg%x-vxx{_GgN|tL!b@dlQzF9!+MC?)$0_P4A@a~H
zf}`f2GKi2ah^&SP0gAhsIKuUG9HCFJEX%pykn?HQ2VrHyJvjH}>cw*6qixf>4}t?)
z^geQVtam#BwIceo6KN9cPd4Z>=D>BxnHVssF@xkjC;i?^WXxNOE_Ipb3ZxW9oest#
z1avNz5oxK|Tc&A%m_q*d;%<E*E|F=`z`9V`Wlfl0n{9<GWDaWA9M_?bg5=uI1!0i-
z-NC}`aFQnGEBVk_I^9G3tvU^y$brZ}pW}TC5__YstLCvXH35%=c(gJbGK-a|Iz#wO
zp6>Xy+EYSW!zXjhGud)&JOw67bGWhsUs>r%swknH;0@irXj94Zj{1(Ii}B};pZpnS
z#{R;f9~^0iujK4laG}9kKGeN3ZL&~QpItFU{g_oY9Hfk0!=D~gyeX)za@0DY)`G+o
z(%D0gV{MQEnFg!c3ggQrZC@Xa?LQSXN9*8b!OWsMzWA#6i4N8$9Sr($?sS)C5Y_@G
z{MyP)<0BF(6OhWITOt$rt>a&bx_rk5giF^%u|yxN4mytZQ!nnD>Q)?LfnrCovSZ+5
zzV+nt#@Q-my9kz1!MBppprhNZrOfwOKvu;F<urfLf_oyXFW}Qu-OtVO#>9(5h*v>Y
zb5Zu2Hm=drZTp)>+8PUw!iC0`8Nvp|^%B{xsXAGGd=xu#DeYG(7|40_)pSiy_f&m+
z>B7Vu7VstaW(uMb`bNcOw%uj<K}wGKwzKe2eIo{s?SXh}q7J4YT+FUWA{oNRo(|2u
zg)L8;0JT=!%h_pfh2;S2@n1EQQ_SumffWrkAD8|%YHtg;OKu3+J^`*W0%)l?<hf`1
zg=Pt?Ja%{YQ@<bj!vd@9xxZ%%Gha<!Gm6&A8<v#i;s6Rl#K@&aNE_11`}p=3m7pEB
z#?MBD#734)e5w?y473}F@|rz;a3m|PLH70W8^7ZK+X*HEqbh{xIlb-U(<-+Vh?636
zw^c!Q91?|TFJyPgkTg3kaM^=X{IFvaIS-(!GeY@dn@CUd48V~!xg1O34^Vm$ch0P|
z5w=U)RVoM1=Xx#3E{4&gGuSS<O8-7tf6y`?#?D#EHDtZQL-!{pv!r)cP|;El@yxOS
z=h<@8Pf_J8@H3M4?JNKr+r>s>ji40=uGwcxYo1U5yk22lvk=#iS3|0JYPC66RbJ5?
zQ40Ga4j+dENHvs5?roW*l}PtM7n{1e!;lhLpg^W4caMNM4<Ryysw~lr(7lDMQk5EL
zIo#3s24>ldFw)o2CLgRxRsT6o`6&-`C~Vt-C&dD-mVRF2<KI0Ul|l}mdYj6FzH<rT
z&elfQ$?nXe8~v}PFJ+67mT5lK4`vD_ii%R}NnGCJk-ueq9d&*i5a00~yYIpTVFa%1
zzM}Wz0+C$WM1BT*CC{3mX%UE-s=racGGnK_d8Fy-vo^x*(ayclV>$>R+Ph?CKf0@a
z)^hd3o;{_V-}?{$C3f6%EeSl%P5p~loUo{n1=?hh^Y6Z-^^lw(!L%?yFjFU#E?V~@
z!ckc@mPN^#6K+cl!(B5HdEb4aJu!@raT>Dhvohu|wU<K;!g<DClGvL%(*1lD4}ZAq
zs5CruHMIy2SF5+@(QCg>;>35`V6s~<=3T0X;+@!KhJidS?`WG%V9a+nC+9~Uc2#i9
zLQgcLzI(qp(HuOj*x8J;8HiV>&f%yd485W?JsYA1^HCGbY!=Q6B(GF#S0QTvIE<`n
zE}mmiJi3=f5J&gngEwO8Rj%@rE5_c+)daIPd+oWkmO|bs{ZWCVFsh;=m+-xMV~WaU
z(Kd9Mj;qm2ye@-~2R)tpaFnk&*erJ=YUWyr^K_89SuZMxjWcz!zC{n(4*UV%60;~H
zb2+ooi)>M8weSR<2+>m1gq498)<RftdM+${#JR56)>Bkq;mftf-U<W34|%97h;)fl
z_gX_bf`s?i*<<sTh=}N_rq7UvS#X;l8h?gwee_=mCoz+ws3T+tlk?={a-0;3jg^Z{
zQ4NFTB;UqK#Onvr5y0?Kt*xGTCjKVeRvV}kYvK~b6-K_}?A6e8m9}WzB`WyMw@O#E
z?)B7VB+U!ih*D;k)f^Zo{%$(81kgt1l@!28s4OG^pX@>2{}p+`T;2V8DX8@S$NK+9
zz!HD%)f_hdMib`GrJJZBj0AQHDfy<mF3fb;Pmn~yNhe7_{~@fWW&_~$4(<uU`~bQi
z-@*kUS#BHfUE4`g$vM~e3TMse#lzwM{cUY~IF@o{+e3P=g9)myOZpd=1sVNw`9I%;
z{~*P(61JyX3gY40rXs{E-F3S0Zq=w|dQf5`l6mFzyP2BXRioAZ$5Zc6oF7b6%(Z(X
zqQ8-s9i84E*OXT^QCyyI$bKd)PI}oRk+(W7%%|Nw?pe=2(!S&FlyfJ$BZeyf3aY9<
z;2?jOJQQsc_7gkw8`u4)to%s0TKEBQ-~VAI;mZ1BG7$6aawqIY-Hs5JlWS~1g2sI?
z5)*uIL0<a6$3jcbor2<PI<ym7mVSS1?RWI&Zz$q%$?NBylx=Pj_4>z5Vl_u+8o18#
ziiV;3KEh1gLA{W}1`bQTS~7loP4?}+_Gaa$1N(c8ueUL-iZ!N|<t}%(Ij`OBN9@d{
zITpnaQ?rH_F!Xu0VySvsTV`Hd$+@UY-8*!bqV;EKytVD$ti6>xyoVT2rfyfJS56O(
zF+NmTViYxE?Xn-O->X}FmOB-ePO_=*ds9`nB}uRSPsF3}mgP#j_|+W;g15KVeOelP
zP~F2+^r>v;*JPxOkgEP>3ui}S-=>nb@x>N8r~g(*-SmN;H*j-9boEI8wT}7ovo{a-
zm-RU+mn2jDuh?l|A#vOF1=kf)!NaqT0{-V+^FW<c8fYOImDq34Cen8PF0pxNxg4Ca
zUpY}OfA*wbLkpGum^Gu%^b7_*wOxwtF*SAC3Exw+hh!Q!vw25iLzH@)7M61@<1yP`
zf6%|_9tBIfmQnS7a!~Sg{?Yq3yYzvEtmOV?s{=>o5jobjp?<-sZCQT;^XH!~pZi$2
z$#WN&*FF4!GIOFSe)T^u!~gUv(SLkDQj#B3x+i7ig*4%x_1xEOa=W`G_}ISzab#`5

literal 5551
zcmcIo2~ZQ+*6!{ElCUKT2qKcWf{I2*5DiEg6$M9@QQVN#1rP-t*&!q?ptvC94K5|1
z$+#i`#8ION2#P{PB~ca`cG(SEAhHwkcgLyvYpUM+U;S0@bvnJAd(OG%eCOPI``q)c
z&fBy#j5GiM&~|j#vJ(Ix7y!UlA`YcQ=PistUo>5JxY?tx0KfnMKY+mi80eJ?_zBmp
zU5k=10>h8t$7T2l8QcaZ><D&pN_Gkkb_zzX0;gn=pGwk?0r;V;=)o2G36&@l#)2Km
z!O4Q)WKpo7gTvt@qr$=HiP8kg0#UM{BUyx=N-hK7`Y}*ZuCRgIpcDi<34((K$-x3q
zhoD0#^aF%`3?bJ~C~Ocmpr=x(REm<FM9IM-L9nPpDN-sMxQqrN7i(-#qQ3^EvO^Hu
zAxiELp$e3}y}e2RKoy~4C@a?9Ay9Upa+oGm8f8~1l~vE*`=VfwPCD!l0f705*dI*k
z96AC3dfOeh*ttb!^f$#EYJ8)wcGB+W&6*;M6x$x5_OJYvlATuEmvuhd4`jTVXJCC^
zp<p`hovI!PymNiS-WO^4-7}|uZMz;*E5CSiMZt65N67LgxV+D+po4byuz4o&oSHuP
zh`*3F#|{4`?gFyUbrwZ)`QIC*WJx~f3@fPW<Vl<QmOTJ8d+@{x06ahTOdmnsOf_i0
zaGN4XjYb=q5keGhB<BD~bSNy&0q~2P|DWtkG4S}hzyKtTiPw}I-wMZ%h*y^!@6y|X
z_8`|>ou02YiyNtIgg(?yQ@AYU2k6Q00=~(lzdk=!9^wpd{4O>t$*v-U@5aQYuoV@O
z{?1ti+N@)C<Eu9-cR-OtD(+b&sbp|O!b}93*+hqzoJnwcg5pY6>>{^D$O`-I;nxaX
zGUZJo65YcKMe;t1H(=bI!0#+#X5!2@^*R~J&;_+9RXeX~nnGCzGHl-gBSi+FuP(n`
zS1T_@wgaxi_l$ps`sUl{s@k6dgzf=+f)kSLvJ_tP@Los+^m-{=et$N9c$bCe<O14p
zD3rAj%wQ9V8NhtrR=|`By)K&vb-V~!vlY&MRC6_@<4#;i{~i&Ok30;TwmN<3*&k~4
z<IA`h%FIi^0o%kMvdkIa@g61~?~Ei<V-N;!>0i%LNW8Uy0~S2yDA4p5Zx>*~A`<8E
zENN6*e8MHMA(x8v>#r#~HmGleMK{F)VPd3ilGz(Fcp7zZn;}i~*OLJ)i46L-%W-<5
zL?mx0AJpjD4A+ep0%rz_HsR1zP_9us*M^aj0DIKQlThgNKIqL~PwSyAa@29wQlxDH
zMbS12Ug@G$LBR5;9+a}$P-xeK4E8use$joJUWxVa4ay=qj;j<En(*5Xk$yP07yqQQ
zYP{qc3v=%wDd7G6iSu?77&67(fZ$N)z2fz`Lv}y(y(|VAQghDMA7>}q{g56sEg2eh
z6FgeS%G&(R7P8<h10BZ(mz4ZklvegZ%5FUHpa-a=FQI*#iN&uU0Nku2PPFWJtA0|&
zca1E0>pxcZ0HLV@s!5PF$9xR*rqAV%{7iCqQ5*`i#CPwHO*o8<s#LrN<0d|o>r!@J
z2Zswss}B7|js;G!es6!d479s4kJkNBvpY5did$|CC!Z<~ibwc=fSLV4sI^x}aL%C7
zB3h;v5ZJjH##axG&1VzM#?=Ok79XFk1H*<E(4fGH0%3f&9c27{A?@o-k-DrE<COVd
ze70fgID1l~wGYei7*gwu_IsS#$uW#87EhdtB29sDCn{A5>tzGCiW}-QDKn!#9E;aA
zwgNO-tMF#76jh!-A{kw^mX#~|)Xzm;v`~?J;h5f{uk90sKBaTcA)CBruk)HK`KrFC
z+NIPkl>bA|B3<M02SY=#&6g2=g@(lZwb&PNwNs4@!qU2t_NdPMwE%d=tpd5qu5DkW
zu)q`bELQXVsn<F`DXKb6zoaZZl0TDxK*tEK*;E4>$F3BL-nmNJ^In>|mu$c*RBD6v
z)qyt*+HX%-s2i@~UmWg9O-~o3E=fBY)%|3$qcQ~2$Q=p4WkeO1Yl{v@xJa%`g^M6X
z?j)XW?>zjfr>3-X^c)fws7d@<WlVEG8N4=n^yl8|j89L0JUq~r`dF$9X$U?V;bQ3i
z$S0`28j^(OZ%7;bGBDfKC+C`BXFHLy&;cho_%JN?kNPlA=URf@vpxD7A6;=*P?FPg
zcwR<Cmlxhc$Q)}rbm8GkMUt`PZJWhQ^#J9TX3p(^5Cfry7i+9$b_s{NZhBSU!BcMY
zr!9`3CW;=0E57Uc6cRr93*Mi@>rwe-_a6ec3w7LTQcuPHndtBP2@H&(_m5TUX!S(9
zH+xZK*$<U6hO1A%@w6e%BB$wD>y@78KmkE41a8y}#(45BKZ~N9N5&PU(sv<yp0x<F
zbYgNNt!&qqyvi?F1{-wh@Y4m`<jR8LV#NY}S$%A)=K|zd9M_9RYmu6=<v+hJBR^y3
z5}Zlr5LU&6W;1%XsZeOX_}e|U{W3z#d@N+?Pz@K;AZeBnuT&+%$SS-4_4E;FA-^{5
z=@gc_IhNG!h7jU8q_NXx%xF0x#xE!$Iy~nb1IF^FU~o^(%s_x@pcR<PzODuMxzE0+
z^0nFW^p~#tVjx{g*@Dfzk>&WCEL2U}Om({0wH#g<M<k{L^II(J5Z)`m(PJAn%Q%6X
z#<fC>T;P>-(mZ-G`z1kKq!y4_>+~bT$CeU1(2?V&G!K<8GAa2b=!Xt(9xa0m&XRO-
z4vlMt(UXu2O!_(dSN2(awfQ+Dk0coqkQSm-8n|0|X?^5XZOMLoN3>&I<P+s^(Ago@
zS+#02jE(=PpqOthO{|&4^@Z(<TZ>YF?wJ<wJ~mK*G7Z@RT07#yEG;rk`*J$Xd-ggL
zT!MTqg$o1FZ~etX?FvojGdS}ybSk-k2w4;+{;)omONIU*WtI`-o8dWN&8qo<-WsO-
zR)fN^-|~jmC?ayv)d*Cp9k`*1LY`M&Ah(C{dOHbLSoom8QvZ+x2tpJUqz!nW#z*au
zH?UC%3oAx)*FXztyi*fsgoZP(qwDJ|*NA+~!7#S{JSwUyx%fnP>O#IEVk;UAyD9Go
znIl>9HKvzDOy~F03)V4<2(q~@u*1j;b`$F}E>z`z2B*C=5lxJ*V&h_d%yYo5eUZ*B
zQsyXXtCJ$$WWAG~t11%4(~fnx_xLSvf&O^msc2+WZ5CzSs~IZZcF-BlZmO5P8*6y1
zmmsd1o*zB&I6@g;X)F`_9zMYDzq?sXP}gmQ`h()`JcH?j`ftg$<CTl~462ymybB-N
zyn_FQ<2l`!LuKn2YDBI)1nGTEMAD=!#rq5=-*pRtx8sh65_eZ7;Zw^h?IO9$TEr$e
zV{{%Zob>^(z@-gVyi`Ql_go?`)OmpOs@Mm-ML#fVCudSl(8G_sO8*_X_LC0$i1nL#
zsIf7PDCsR$Jm2@FAPRS(G3K2bQnt-WV#R-YQ|i$-HF5OMn7O!3<BPS-mLjJ7nor`<
zK*`0noV<`pWbZ8<qC9mu|2g1=cyadhQEiF~$GZ0BLy&?ZvD>}(R!iN+SWXoE%SuWG
zYCTXSPbp$XE5=H8O|aXniWeWY_>hQ9KER&uj6Z@{MA0f5Yfw#np9_*~O1pEgICc|C
zGvnv*F4wwj1i+jup~CT~q8dk$+zJo(UY5g)2B56Ku^!XABfH2joY*~}qE#W`yuHmC
zth-OxQqUZCO2Hn$6d=BEWy|2r&yx=bd77ecrVmgdpSj%L&mr4;@0*mYrgh)AsN(a4
zkJ%=QV^reVP+GoX@l*Cjd?s78$$_4VrnJ#bD@*Mj**0PL$WO$8S}B$*PZ=#^hm0hz
z$c=q{N3>nX8p?=fFxL{kkxngSf=9GO@hM^O>9`$Wz3ixR6wOe}t6#bZgFFU5uQb3K
zv9V%Ca-fP?T=A>Nu1XtVLgOdM3`v=s{6?Vhi!}b6ZdH)XtYBZ(_b(U{H7hQs%%FY{
zHxMgKT%S`%MygQ%doQ%EjZ-1<Uc)AGj?@Lt2QIX$NR*S5%XGfzBe|K0gRSrh(|HU9
z=KjQ<ts;8Qz-`VPWK;AJ^-SWF_WL%4m}GVoUe9}if(H8`i>FclrQjbpyxj2^ihhT>
zLy5~y6fzneo@YB#-0Jp38E6CEB?T;PSAohU^H=f?efYsM4<7kQ?)pL3<k#Pz@4_U>
zu(g%56BfV)@I#YkPesefZO8r1%=vnff&2n2GBkXEd$Z@y%LUQO^shj__v9MPh%JDp
z%X>>cx?+CslHMtlvuJSQi78dnVqoJ`rU&jthPiO#LlcwO4MhIEh)dVqnIiy%R8|a^
z-d_Rxr>Bt50@WSmwJ3O8Aav?t`bGVWqZ8lS+9%~~&~ow-)(IY{De>TChkIU29kG+-
z?6!Aq+<CxuIOOrd6${{wweW7{T1I9E(9aWTo`4TD3w;C0pN|1N|FzM$Cma*1N%7q@
zGJ73;8Go;bGI=N;FN?A<w}*3BKe;m%Ks?T<!#umxWh)AUPbA#i%iQQikPfGQLM@Wj
zC6aJb#r9BBUPi48v!oUK1ZaqD*6i&{twGxjjU^v<Ka6PKIDQzj^DH4WWF%mqduC>o
zpr$um5`*dFPthERt`TqFv{YB(25*$g_oJOg0U9wr8}6g9a@A<v^vH;!JBXL9BEH;T
zkERQQtYHkL{Q#P08Qqv>M#`;na!+Jwx%~7i%o13NNLe=2^&bP#_}|enYjp9#q8J2+
z**234{V|ajI&o!MX0q0(so&yWHa0P%S$n|GYI^0S&(L01e<)fV1^*+RCvU7h(Fc}k
zn5CsW!syO0Ks|&ZaT%d8g=oH&5J6v75}FvuC-4F@viaqmx_|Vd3)fXBNt^PaybeRb
zfX0%C1RqCDNz&lrf5>k^*0D;ioxto%B1po~b%vy7sL7vfzKG1$Sgix2pBDJbuE;My
zy>;YLegc#PNM7YzgG=;aT?xAQp;HIi4A{e!-V!HNRD$c6Q5(camheh(fv)Q&&<)hT
z#3lwLfEg#UsUR(7-1nhv>Bue}$?)N`tN7a`U*%qS3n8$QocI8ACj~}(agnVCK1oQW
zCo07Pw~~4qM+$!eFRdzB4@Q-f1zPAxMy6=z&|1cSE`prx<sAVaqg>8aFk@;pS}ySX
z(bsIwO>k?(5{5b3;YdFFw)TInqWxzD@M=Ta)$?t0i2t=R`k!_B-*pMoF4uDXAjnr0
z??1u6tjA-ex-m}g%+C~buRy#SC8?@+EgZ!atB(7izu%`J8I2KumceJiNF%0)(gr8n
z)aLV_*jR`MjdFvV4gybW@oxZhg98WK!&-noxCTHsJ^q)lTL;;9;a_fwWOab(#Alwu
zR(jA&Mp7O3&wSS{0`^jmu?af~p?g+IN3Gn!T$5G0tW5pZ2LlnbU*T)1w<n4ff|QDa
z?I1S8+_(DTeQle!6#qQqazqz+^KwL}(C$1g?J7Bod@XhC$_(gr`F*9od&2z{8>)tP
zU70zLbFUF3Zb!Q2(QbrU6HorWcs&`urh8ZWd0JzbCog;ShI>n#Ik53YKoBA8NX%sK
z#DYEphJxh4zbAjZFJ~m3-f+8fzXW#|UsaQPEGty+hAqFhc-n8LiNfywgnbyKEM$;&
z+Grk7Hwz2D_YIdNy<ThEcd+Q&^(;?^eV(ML`4PSjo@PNMbkmANn$`PbL&Y0A*HGNt
zTV8%tGb>v0i=gc&Ye!ISTmV>~fj=4qSy}F8B)QCU?Kj@ize&bGJ|C_7bJD%=^DnG6
zWL-Dyf~nn@izUwEa!pgo#QucYt#81UmAAXY?u2jtdhnKU>$_oV{!@a}e93UrYWXF^
z3)z+`HFu!HVM{y)6%Oxk2fxkvcbirJ=T4TY5nprhR%CC1lrytikNH{W_D+04P5Z6!
zn(0zy^Qz|Q?ba8!&!X(15AHtY#Sw-c&La}D-@bg`r;~)Vrk!9lPw(;#BW#5uKax2b
zkFC)eBy(a$)r!xm$6s#(W>Gw9=GI9Ma^EhbJ?V<c^PclIrhd(n3rI=YU`g}jp#R%>
zoLZe*Zg_lcdxi5|QIB&Hk{A8R1{ZTY+;l7Kx^nQaxvf#t`B@aVlrR1=dbXG5zxU~1
fZQcD{GE0ebaFSi3pAlGM8?TP`&RcRf`NaJXzD4@=

diff --git a/docs/search.json b/docs/search.json
index 32ad6397..11320cb4 100755
--- a/docs/search.json
+++ b/docs/search.json
@@ -4,7 +4,7 @@
     "href": "index.html",
     "title": "Exploratory Data Analysis in R",
     "section": "",
-    "text": "Preface\nThis book is a compilation of lecture notes used in an Exploratory Data Analysis in R course taught to undergraduates at Colby College. The course assumes little to no background in quantitative analysis nor in computer programming and was first taught in Spring, 2015. The course introduces students to data manipulation in R, data exploration (in the spirit of John Tukey’s EDA) and the R markdown language. Many of the visualization techniques are adopted from William Cleveland’s Data Visualization book.\nThe base R plotting environment and the ggplot2 ecosystem are used throughout this book. While a chapter is dedicated to the lattice plotting package, its functions are not used outside of that chapter given that ggplot2 offers many of lattice’s functionality.\nWhile great effort is made to adopt a consist plotting environment throughout this book (this being ggplot2, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the tukeyedar package. The package can be downloaded from GitHub via the command:\n\ndevtools::install_github(\"mgimond/tukeyedar\")\n\nNote that installing the GitHub package will require that the devtools package be installed first.\nFunctions making use of the tukeyedar package will be highlighted in a peach/pink code block as opposed to the default light yellow code block used for all other code blocks. For example, if tukeyedar’s eda_qq function is used, the code block will take on the following appearance:\n\nlibrary(tukeyedar)\neda_qq(Tenor, Bass)\n\nThe tukeyedar functions are built off of base R graphics and require R vesion 4.1 or greater.\n\nManuel “Manny” Gimond"
+    "text": "Preface\nThis book is a compilation of lecture notes used in an Exploratory Data Analysis in R course taught to undergraduates at Colby College. The course assumes little to no background in quantitative analysis nor in computer programming and was first taught in Spring, 2015. The course introduces students to data manipulation in R, data exploration (in the spirit of John Tukey’s EDA) and the R markdown language. Many of the visualization techniques are adopted from William Cleveland’s Data Visualization book.\nThe base R plotting environment and the ggplot2 ecosystem are used throughout this book. While a chapter is dedicated to the lattice plotting package, its functions are not used outside of that chapter given that ggplot2 offers many of lattice’s functionality.\nWhile great effort is made to adopt a consistent plotting environment throughout this book (this being ggplot2, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the tukeyedar package. The package can be downloaded from GitHub via the command:\n\ndevtools::install_github(\"mgimond/tukeyedar\")\n\nNote that installing the GitHub package will require that the devtools package be installed first.\nFunctions making use of the tukeyedar package will be highlighted in a peach/pink code block as opposed to the default light yellow code block used for all other code blocks. For example, if tukeyedar’s eda_qq function is used, the code block will take on the following appearance:\n\nlibrary(tukeyedar)\neda_qq(Tenor, Bass)\n\nThe tukeyedar functions are built off of base R graphics and require R vesion 4.1 or greater.\n\nManuel “Manny” Gimond"
   },
   {
     "objectID": "intro.html#what-is-exploratory-data-analysis-eda",
@@ -32,7 +32,7 @@
     "href": "intro.html#creating-dynamic-documents-using-r-markdown",
     "title": "1  EDA",
     "section": "1.4 Creating dynamic documents using R Markdown",
-    "text": "1.4 Creating dynamic documents using R Markdown\nAnother source of error in the write-up of a report or publication is the linking of tables, figures and statistical summaries to the write-up. Typically, one saves statistical plots as image files then loads the image into the document. However, the figures may have gone through many different iterations resulting in many different versions of the image file in a working folder. Add to this many other figures, data table files and statistical results from various pieces of software, one quickly realizes the potential for embedding the wrong image files in the document or embedding the wrong statistical summaries in the text. Furthermore, the researcher is then required to properly archive and document the provenance of each figure, data table or statistical summary resulting in a complex structure of files and directories in the project folder thus increasing the odds of an irreproducible analysis.\nConfining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document–such environments are called dynamic documents. In this course, we will use the R Markdown authoring tool which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown!. You can view the R Markdown files on this author’s GitHub repository."
+    "text": "1.4 Creating dynamic documents using R Markdown\nAnother source of error in the write-up of a report or publication is the linking of tables, figures and statistical summaries to the write-up. Typically, one saves statistical plots as image files then loads the image into the document. However, the figures may have gone through many different iterations resulting in many different versions of the image file in a working folder. Add to this many other figures, data table files and statistical results from various pieces of software, one quickly realizes the potential for embedding the wrong image files in the document or embedding the wrong statistical summaries in the text. Furthermore, the researcher is then required to properly archive and document the provenance of each figure, data table or statistical summary resulting in a complex structure of files and directories in the project folder thus increasing the odds of an irreproducible analysis.\nConfining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document–such environments are called dynamic documents. In this course, we will use the R Markdown authoring tool which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown! You can view the R Markdown files on this author’s GitHub repository."
   },
   {
     "objectID": "intro.html#footnotes",
@@ -886,21 +886,21 @@
     "href": "resistant_lines.html#introduction",
     "title": "25  Resistant lines",
     "section": "25.1 Introduction",
-    "text": "25.1 Introduction\nOrdinary least squares regression lines (those created with the lm() function) suffer from sensitivity to outliers. Because lm’s best fit line makes use of the mean (which is not a robust measure of location), its breakdown point is \\(1/n\\), meaning that all it takes is for one data point to behave differently from the rest of the points to significantly alter the slope and intercept of the best fit line. For example, let’s start with a well behaved dataset where all points are perfectly aligned, and fit this batch with a regression line:\n\nx &lt;- seq(1:11)\ny &lt;- 5 + 2 * x\nplot(y ~ x, pch = 20)\nM &lt;- lm(y ~ x)\nabline( M , col = \"red\")\n\n\n\n\nAs expected, we have a perfect fit. And the regression model’s coefficients match those used to create the data.\n\ncoef(M)\n\n(Intercept)           x \n          5           2 \n\n\nNow, what if one of the points is re-positioned in the plot, what happens to the regression line?\n\ny[11] &lt;- 2\nplot(y ~ x, pch = 20)\nM &lt;- lm(y ~ x)\nabline( M , col = \"red\")\n\n\n\n\nNote the significant change in the line’s characteristics, its intercept and slope are now:\n\ncoef(M)\n\n(Intercept)           x \n  9.5454545   0.8636364 \n\n\nThe slope dropped from 2 to 0.86 because of a single point!\nIf our goal is to explore what the bulk of the data has to say about the phenomena being investigated, we certainly don’t want a few “maverick” values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are the resistant line (that builds off of Tukey’s 3-point summary line) and the bisquare robust estimation method."
+    "text": "25.1 Introduction\nOrdinary least squares regression lines (those created with the lm() function) suffer from sensitivity to outliers. Because lm’s best fit line makes use of the mean (which is not a robust measure of location), its breakdown point is \\(1/n\\), meaning that all it takes is for one data point to behave differently from the rest of the points to significantly alter the slope and intercept of the best fit line. For example, let’s start with a well behaved dataset where all points are perfectly aligned, and fit this batch with a regression line:\n\nx &lt;- seq(1:11)\ny &lt;- 5 + 2 * x\nplot(y ~ x, pch = 20)\nM &lt;- lm(y ~ x)\nabline( M , col = \"red\")\n\n\n\n\nAs expected, we have a perfect fit. And the regression model’s coefficients match those used to create the data.\n\ncoef(M)\n\n(Intercept)           x \n          5           2 \n\n\nNow, what if one of the points is re-positioned in the plot, what happens to the regression line?\n\ny[11] &lt;- 2\nplot(y ~ x, pch = 20)\nM &lt;- lm(y ~ x)\nabline( M , col = \"red\")\n\n\n\n\nNote the significant change in the line’s characteristics, its intercept and slope are now:\n\ncoef(M)\n\n(Intercept)           x \n  9.5454545   0.8636364 \n\n\nThe slope dropped from 2 to 0.86 because of a single point!\nIf our goal is to explore what the bulk of the data has to say about the phenomena being investigated, we certainly don’t want a few “maverick” values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are Tukey’s resistant line and the bisquare robust estimation method."
   },
   {
     "objectID": "resistant_lines.html#robust-lines",
     "href": "resistant_lines.html#robust-lines",
     "title": "25  Resistant lines",
     "section": "25.2 Robust lines",
-    "text": "25.2 Robust lines\n  \n\n25.2.1 Tukey’s resistant line\nThe idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. Two half-slopes are then used to join the three points. Note that points that share the same x value are lumped into the same batch which can lead to unequal group sizes. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables. Such plots are often used to help guide re-expression of the variables x or y or both for the sole purpose of straightening the x-y relationship.\nLet’s look at an example using the last (modified) dataset. First, we divide the plot into three approximately equal batches.\n\n\n\n\n\nNext, compute the median x and y values within each section.\n\n\n\n\n\nNote that we do not include the same point in any two median calculations. This implies that for the mid-third of the data, we do not include the point straddling the left boundary line when computing its median value. Likewise with the right-third of the data.\nThe x median values are 2.5, 6, 9.5 and the y median values are 10, 17, 22 respectively.\nThe two end medians are used to compute the slope as:\n\\[\nb = \\frac{y_r - y_l}{x_r-x_l}\n\\] where the subscripts \\(r\\) and \\(l\\) reference the median values for the right-most and left-most batches.\nOnce the slope is computed, the intercept can be computed as follows:\n\\[\nmedian(y_{l,m,r} - b * x_{l,m,r})\n\\]\nwhere \\((x,y)_{l,m,r}\\) are the median x and y values for each batch.\n\n\n\n\n\nThis is not bad for a first iteration. But the outlier’s influence is still present given that the line is not passing through all nine points. Recall that the goal is to not allow one lone observation from influencing a fitted line.\nFrom this first iteration, we can extract the residuals. A line is then fitted to the residuals following the same procedure outlined above.\n\n\n\n\n\nThe initial model slope and intercept are 6.43 and 1.71 respectively and the residual’s slope and intercept are -1.22 and 0.24 respectively. The residual slope is then added to the first computed slope and the process is again repeated thus generating the following tweaked slope and updated residuals:\n\n\n\n\n\nThe updated slope is now 5.2. The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. One more iteration should be enough to stabilize the residuals. Giving use the following fitted line whose intercept and slope are 5.03 and 1.99 respectively\n\n\n\n\n\nTukey’s resistant line can be computed using the R built-in line() function. You specify the number of iteration via the iter argument. Usually, five iterations will be enough.\n\nr.fit &lt;- line(x,y, iter = 5)\n\nYou can the resistant to a base plot as follows:\n\nplot(y ~ x, df)\nabline(r.fit, col = \"red\")\n\n\n\n\nYou can also add the line to a ggplot:\n\nggplot(df, aes(x,y)) + geom_point() +\n  geom_abline(intercept = r.fit$coefficients[1], \n              slope = r.fit$coefficients[2],\n              col = \"red\")\n\n\n\n\n\n\n25.2.2 Bisquare\nA bisquare fitting strategy makes use of a non-parametric model that assigns weights to observations based on their proximity to the center of the distribution. The closer an observation is to that center, the greater its weight.\nThe first step is to run a linear regression model on the data then to extract its residuals. Next, a weighting scheme is fit to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as 1 then are modified following the residuals derived from the most recent regression model.\n\n\n\n\n\nThere are different weighing strategies that can be implemented. One such implementation is presented next.\n\n# Create the bisquare function\nwt.bisquare &lt;- function(u, c = 6) {\n   ifelse( abs(u/c) &lt; 1, (1-(u/c)^2)^2, 0)\n}\n\n# Assign an equal weight to all points\nwt &lt;- rep(1, length(x))\n\n# Compute the regression, then assign weights based on residual values\nfor(i in 1:10){\n  dat.lm &lt;- lm(y ~ x ,weights=wt)\n  wt &lt;- wt.bisquare( dat.lm$res/ median(abs(dat.lm$res)), c = 6 )\n}\n\n# Plot the data and the resulting line\nplot(x, y, pch = 20)\nabline(dat.lm, col = rgb(1,0,0,0.3))\n\n\n\n\nIn the above example, the bisquare method does a great job in eliminating the outlier’s influence.\n\n25.2.2.1 Built-in implementation of the bisquare\nThe MASS package has a robust linear modeling function called rlm that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented here, but the difference will be insignificant for the most part.\nNote that if you make use of dplyr in a workflow, loading MASS after dplyr will mask dplyr’s select function. This can be problematic. So you either want to load MASS before dplyr, or you can call the function via MASS::rlm. An example of its use follows. The default regression model is added as a dashed line for reference.\n\ndat &lt;- data.frame(x,y)\nM   &lt;- lm( y ~ x, dat=dat)\nMr  &lt;- MASS::rlm( y ~ x, dat=dat, psi=\"psi.bisquare\")\nplot(y ~ x,dat, pch=16, col=rgb(0,0,0,0.2))\n\n# Add the robust line\nabline( Mr, col=\"red\")\n\n# Add the default regression line\nabline( M , col=\"grey50\", lty=2)\n\n\n\n\nThe function rlm can also be called directly from within ggplot.\n\nlibrary(ggplot2)\nggplot(dat, aes(x=x, y=y)) + geom_point() + \n       stat_smooth(method = \"lm\", se = FALSE, col = \"grey50\", lty = 2) +\n       stat_smooth(method = MASS::rlm, se = FALSE, col = \"red\",\n                   method.args = list(psi = \"psi.bisquare\"))"
+    "text": "25.2 Robust lines\n  \n\n25.2.1 Tukey’s resistant line\nThe idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. The batches’ median values are then used to compute the slope and intercept. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables.\nLet’s look at an example of its implementation. We’ll continue with the example used in the previous section. First, we divide the plot into three approximately equal batches.\n\n\n\n\n\nNext, we compute the median x and y values within each section.\n\n\n\n\n\nThe x median values are 2.5, 6, 9.5 and the y median values are 10, 17, 22 respectively.\nThe two end medians are used to compute the slope as:\n\\[\nb = \\frac{y_r - y_l}{x_r-x_l}\n\\] where the subscripts \\(r\\) and \\(l\\) reference the median values for the right-most and left-most batches.\nOnce the slope is computed, the intercept can be computed as follows:\n\\[\nmedian(y_{l,m,r} - b * x_{l,m,r})\n\\]\nwhere \\((x,y)_{l,m,r}\\) are the median x and y values for each batch.\n\n\n\n\n\nThis is not bad for a first iteration. But the outlier’s influence is still present given that the line is not passing through all nine points. Recall that the goal is to not allow one lone observation from influencing a fitted line.\nFrom this first iteration, we can extract the residuals. A line is then fitted to the residuals following the same procedure outlined above.\n\n\n\n\n\nThe initial model intercept and slope are 6.429 and 1.714 respectively and the residual’s slope and intercept are -1.224 and 0.245 respectively. The residual slope is then added to the first computed slope giving us an updated slope of 1.959 and the process is again repeated thus generating the following tweaked slope and updated residuals:\n\n\n\n\n\nThe second set of residuals is added to the previously computed slope giving us an updated slope of 1.994. The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. This took three iterations giving us the final fitted line whose intercept and slope are 5.03 and 1.99 respectively–very close to the actual relationship between the two variables.\n\n\n\n\n\nTukey’s resistant line can be computed using the R built-in line() function. You specify the maximum number of iterations via the iter argument. Usually, five iterations will be enough. But, the iteration will stop before the maximum number of iterations is reached if the residual slope stabilizes before then.\n\nr.fit &lt;- line(x,y, iter = 5)\n\nYou can add the resistant line to a base plot as follows:\n\nplot(y ~ x, df)\nabline(r.fit, col = \"red\")\n\n\n\n\nYou can also add the line to a ggplot:\n\nlibrary(ggplot2)\nggplot(df, aes(x,y)) + geom_point() +\n  geom_abline(intercept = r.fit$coefficients[1], \n              slope = r.fit$coefficients[2],\n              col = \"red\")\n\n\n\n\n\n\n25.2.2 Bisquare\nA bisquare fitting strategy makes use of a non-parametric model that assigns weights to observations based on their proximity to the center of the distribution. The closer an observation is to that center, the greater its weight.\nThe first step is to run a linear regression model on the data. The next step is to extract its residuals. Next, a weighting scheme is fitted to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as 1 then are modified following the residuals derived from the most recent regression model.\n\n\n\n\n\nThere are different weighing strategies that can be implemented. One such implementation is presented next.\n\n# Create the bisquare function\nwt.bisquare &lt;- function(u, c = 6) {\n   ifelse( abs(u/c) &lt; 1, (1-(u/c)^2)^2, 0)\n}\n\n# Assign an equal weight to all points\nwt &lt;- rep(1, length(x))\n\n# Compute the regression, then assign weights based on residual values\nfor(i in 1:10){\n  dat.lm &lt;- lm(y ~ x ,weights=wt)\n  wt &lt;- wt.bisquare( dat.lm$res/ median(abs(dat.lm$res)), c = 6 )\n}\n\n# Plot the data and the resulting line\nplot(x, y, pch = 20)\nabline(dat.lm, col = rgb(1,0,0,0.3))\n\n\n\n\nIn the above example, the bisquare method does a great job in eliminating the outlier’s influence.\n\n25.2.2.1 Built-in implementation of the bisquare\nThe MASS package has a robust linear modeling function called rlm that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented above, but the difference will be insignificant for the most part.\nNote that if you make use of dplyr in a workflow, loading MASS after dplyr will mask dplyr’s select function. This can be problematic. So you either want to load MASS before dplyr, or you can call the function via MASS::rlm. An example of its use follows.\n\ndat &lt;- data.frame(x,y)\nM   &lt;- lm( y ~ x, dat=dat)\nMr  &lt;- MASS::rlm( y ~ x, dat=dat, psi=\"psi.bisquare\")\nplot(y ~ x,dat, pch=16, col=rgb(0,0,0,0.2))\n\n# Add the robust line\nabline( Mr, col=\"red\")\n\n# Add the default regression line for reference\nabline( M , col=\"grey50\", lty=2)\n\n\n\n\nThe default regression model is added as a dashed line for reference.\nThe function rlm can also be called directly from within ggplot.\n\nlibrary(ggplot2)\nggplot(dat, aes(x=x, y=y)) + geom_point() + \n       stat_smooth(method = MASS::rlm, se = FALSE, col = \"red\",\n                   method.args = list(psi = \"psi.bisquare\"))"
   },
   {
     "objectID": "resistant_lines.html#robust-loess",
     "href": "resistant_lines.html#robust-loess",
     "title": "25  Resistant lines",
     "section": "25.3 Robust loess",
-    "text": "25.3 Robust loess\nThe bisquare estimation method can also be extended to the loess smoothing function by passing the \"symmetric\" option to the family parameter.\n\n# Fit a regular loess model\nlo &lt;- loess(y ~ x, dat)\n\n# Fit a robust loess model\nlor &lt;- loess(y ~ x, dat, family = \"symmetric\")\n\n# Plot the data\nplot(y ~ x, dat, pch = 16, col = rgb(0,0,0,0.2))\n\n# Add the default loess\nlines(dat$x, predict(lo), col = \"grey50\", lty = 2)\n\n# Add the robust loess\nlines(dat$x, predict(lor), col = \"red\")\n\n\n\n\nThe default loess fit is added as a dashed line for reference.\nThe robust loess can be implemented in ggplot2’s stat_smooth function as follows:\n\nlibrary(ggplot2)\nggplot(dat, aes(x=x, y=y)) + geom_point() + \n          stat_smooth(method = \"loess\",                       # Regular loess \n                      se=FALSE, col=\"grey50\", lty=2)  +    \n          stat_smooth(method = \"loess\", \n                      method.args = list(family=\"symmetric\"), # Robust loess\n                      se=FALSE,  col=\"red\") \n\n\n\n\nThe loess parameters are passed to the loess function via the call to method.args. The red curve is that of the robust loess and the grey dashed curve is that of the standard loess."
+    "text": "25.3 Robust loess\nThe loess fit is also not immune to outliers. The bisquare estimation method can be extended to the loess smoothing function by passing the \"symmetric\" option to the family argument.\n\n# Fit a regular loess model\nlo &lt;- loess(y ~ x, dat)\n\n# Fit a robust loess model\nlor &lt;- loess(y ~ x, dat, family = \"symmetric\")\n\n# Plot the data\nplot(y ~ x, dat, pch = 16, col = rgb(0,0,0,0.2))\n\n# Add the default loess\nlines(dat$x, predict(lo), col = \"grey50\", lty = 2)\n\n# Add the robust loess\nlines(dat$x, predict(lor), col = \"red\")\n\n\n\n\nThe robust loess is in red, the default loess fit is added as a dashed line for reference.\nThe robust loess can be implemented in ggplot2’s stat_smooth function as follows:\n\nlibrary(ggplot2)\nggplot(dat, aes(x=x, y=y)) + geom_point() + \n          stat_smooth(method = \"loess\", \n                      method.args = list(family=\"symmetric\"), \n                      se=FALSE,  col=\"red\") \n\n\n\n\nThe loess parameters are passed to the loess function via the call to method.args. The red curve is that of the robust loess and the grey dashed curve is that of the standard loess."
   },
   {
     "objectID": "example.html#an-eda-example-co2-analysis",
@@ -956,7 +956,7 @@
     "href": "two_way.html#introduction",
     "title": "28  Analyzing two-way tables: The median polish",
     "section": "28.1 Introduction",
-    "text": "28.1 Introduction\nBefore tackling two-way tables, let’s explore a simpler one-way table. The following dataset shows mean annual income by occupation for the year 2014 (src: Bureau of Labor Statistics)\n\n\n\n\n\n\n\n\n\n\nIncome\n\n\n\n\nArchitecture and Engineering\n\n\n112490\n\n\n\n\nArts, Design, Entertainment, Sports, and Media\n\n\n72410\n\n\n\n\nBuilding and Grounds Cleaning and Maintenance\n\n\n83970\n\n\n\n\nBusiness and Financial Operations\n\n\n81520\n\n\n\n\nCommunity and Social Service\n\n\n70070\n\n\n\n\nComputer and Mathematical\n\n\n45310\n\n\n\n\nConstruction and Extraction\n\n\n101110\n\n\n\n\nEducation, Training, and Library\n\n\n52210\n\n\n\n\nFarming, Fishing, and Forestry\n\n\n55790\n\n\n\n\nFood Preparation and Serving Related\n\n\n76010\n\n\n\n\nHealthcare Practitioners and Technical\n\n\n28820\n\n\n\n\nHealthcare Support\n\n\n43980\n\n\n\n\nInstallation, Maintenance, and Repair\n\n\n21980\n\n\n\n\nLegal\n\n\n26370\n\n\n\n\nLife, Physical, and Social Science\n\n\n24980\n\n\n\n\nManagement\n\n\n38660\n\n\n\n\nOffice and Administrative Support\n\n\n35530\n\n\n\n\nPersonal Care and Service\n\n\n25160\n\n\n\n\nProduction\n\n\n46600\n\n\n\n\nProtective Service\n\n\n45220\n\n\n\n\nSales and Related\n\n\n35490\n\n\n\n\nTransportation and Material Moving\n\n\n34460\n\n\n\n\n\nSo, what can we glean from this dataset other than the raw values associated with each occupation type? For starters, we may be interested in coming up with a summary of income values such as the median, or $45265 in our working example. This is a single value that can be used to characterize the overall income value. However, the income values in our batch are not all equal to $45265–they vary above or below this median value. A good way to measure the variability about the median is to subtract the median income value from each occupation income value. We can do this in a table, but will choose a dotplot chart instead to facilitate comparison.\n\n\n\n\n\nWe have separated the income values into two parts: an overall value and the difference between each value and the overall–the residuals. This can be written in the following algebraic form:\n\\[\nIncome_{Occupation} = Income_{median} + Income_{residual}\n\\]\nFor example, ‘Healthcare Support’ average income of $43980 can be separated into the the median, $45265, and the residual, $-1285.\nSo in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values relative to the overall median.\n\n\n\n\n\nThe income value can be thought of as the response to the occupation type (also known as a factor). In other words, the factor determines the value in our table. We can re-write the last equation in a more formal way:\n\\[\ny_{i} = \\mu + \\epsilon_i\n\\]\nwhere \\(y_{i}\\) is the response variable (e.g. income) for factor \\(i\\) (e.g. occupation), \\(\\mu\\) is the overall typical value (hereafter referred to as the common value) and is usually the mean or median, and \\(\\epsilon_i\\) is the residual. Next, we will see how the idea of separating the values into components can be expanded to two-way (aka two-factor) tables."
+    "text": "28.1 Introduction\nBefore tackling two-way tables, let’s explore a simpler one-way table. The following dataset shows mean annual income by occupation for the year 2014 (src: Bureau of Labor Statistics)\n\n\n\n\n\n\n\n\n\n\nIncome\n\n\n\n\nArchitecture and Engineering\n\n\n112490\n\n\n\n\nArts, Design, Entertainment, Sports, and Media\n\n\n72410\n\n\n\n\nBuilding and Grounds Cleaning and Maintenance\n\n\n83970\n\n\n\n\nBusiness and Financial Operations\n\n\n81520\n\n\n\n\nCommunity and Social Service\n\n\n70070\n\n\n\n\nComputer and Mathematical\n\n\n45310\n\n\n\n\nConstruction and Extraction\n\n\n101110\n\n\n\n\nEducation, Training, and Library\n\n\n52210\n\n\n\n\nFarming, Fishing, and Forestry\n\n\n55790\n\n\n\n\nFood Preparation and Serving Related\n\n\n76010\n\n\n\n\nHealthcare Practitioners and Technical\n\n\n28820\n\n\n\n\nHealthcare Support\n\n\n43980\n\n\n\n\nInstallation, Maintenance, and Repair\n\n\n21980\n\n\n\n\nLegal\n\n\n26370\n\n\n\n\nLife, Physical, and Social Science\n\n\n24980\n\n\n\n\nManagement\n\n\n38660\n\n\n\n\nOffice and Administrative Support\n\n\n35530\n\n\n\n\nPersonal Care and Service\n\n\n25160\n\n\n\n\nProduction\n\n\n46600\n\n\n\n\nProtective Service\n\n\n45220\n\n\n\n\nSales and Related\n\n\n35490\n\n\n\n\nTransportation and Material Moving\n\n\n34460\n\n\n\n\n\nSo, what can we glean from this dataset other than the raw values associated with each occupation type? For starters, we may be interested in coming up with a summary of income values such as the median, or $45265 in our working example. This is a single value that can be used to characterize the overall income value. However, the income values in our batch are not all equal to $45265–they vary above or below this median value. A good way to measure the variability about the median is to subtract the median income value from each occupation income value. We can do this in a table, but will choose a dotplot chart instead to facilitate comparison.\n\n\n\n\n\nWe have separated the income values into two parts: an overall value and the difference between each value and the overall–i.e. the residuals. This can be written in the following algebraic form:\n\\[\nIncome_{Occupation} = Income_{median} + Income_{residual}\n\\]\nFor example, ‘Healthcare Support’ average income of $43980 can be separated into the median, $45265, and its residual, $-1285.\nSo, in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values relative to the overall median.\n\n\n\n\n\nThe income value can be thought of as the response to the occupation type (also known as a factor). In other words, the factor determines the value in our table. We can re-write the last equation in a more formal way:\n\\[\ny_{i} = \\mu + \\epsilon_i\n\\]\nwhere \\(y_{i}\\) is the response variable (e.g. income) for factor \\(i\\) (e.g. occupation), \\(\\mu\\) is the overall typical value (hereafter referred to as the common value) and is usually the mean or median, and \\(\\epsilon_i\\) is the residual. Next, we will see how the idea of separating the values into components can be expanded to two-way (aka two-factor) tables."
   },
   {
     "objectID": "two_way.html#anatomy-of-a-two-way-table",
@@ -970,21 +970,21 @@
     "href": "two_way.html#analysis-workflow",
     "title": "28  Analyzing two-way tables: The median polish",
     "section": "28.3 Analysis workflow",
-    "text": "28.3 Analysis workflow\nLet’s first create the dataframe.\n\ndf &lt;- data.frame(row.names = c(\"NE\",\"NC\",\"S\",\"W\"),\n                 ed8       = c(25.3,32.1,38.8,25.4), \n                 ed9to11   = c(25.3,29,31,21.1),\n                 ed12      = c(18.2,18.8,19.3,20.3),\n                 ed13to15  = c(18.3,24.3,15.7,24),\n                 ed16      = c(16.3,19,16.8,17.5)\n                 )\n\n\n28.3.1 Visualizing the data\nIt’s often easier to look at a graphical representation of the data than a tabular one. Even a table as small as this can benefit from a plot.\nWe will adopt Bill Cleveland’s dotplot for this purpose. R has a built-in dotplot function called dotchart. It requires that the table be stored as a matrix instead of a dataframe; we will therefore convert df to a matrix by wrapping it with the as.matrix() function.\n\ndotchart( as.matrix(df), cex=0.7)\n\n\n\n\nThe plot helps visualize any differences in mortality rates across different father educational attainment levels. There seems to be a gradual decrease in child mortality with increasing father educational attainment.\nBut the plot does not help spot differences across regions (except for the ed12 group). We can generate another plot where region becomes the main grouping factor. We do this by wrapping the matrix with the transpose function t().\n\ndotchart( t(as.matrix(df)), cex=0.7)\n\n\n\n\nAt first glance, there seems to be higher death rates for the NC and S regions and relatively lower rates for the W and NE regions. But our eyes may be fooled by outliers in the data.\nNext, we’ll generate side-by-side boxplots to compare the effects between both categories. Note that we’ll need to create a long version of the table using the tidyr package.\n\nlibrary(tidyr)\nlibrary(dplyr)\n\ndf.l &lt;- df %&gt;%\n  mutate(Region = as.factor(row.names(.)) )  %&gt;%\n  pivot_longer(names_to = \"Edu\", values_to = \"Deaths\", -Region) %&gt;% \n  mutate(Edu = factor(Edu, levels=names(df)))\n\n# side-by-side plot\nOP &lt;- par(mfrow=c(1,2))\nplot(Deaths ~ Region + Edu, df.l)\npar(OP)\n\n\n\n\nSo at this point the plots suggest that there may be a father’s educational attainment effect as well as a regional effect on infant mortality with the former effect being possibly more important.\nNext we will attempt to quantify these effects using Tukey’s median polish.\n\n\n28.3.2 Median polish\nA median polish is an iterative process whereby we seek to extract the effects from the data into their row and column components. The steps involved in each iteration are described next.\n\n28.3.2.1 Step 1: Compute overall median and residual table\nFirst, we will compute the median value for all values in the dataset; this will be our first estimate of the common value. The resulting median value is placed in the upper left-hand margin of the table. A residual table is created by taking the difference between the original value and the overall median.\n\nYou’ll also note that the row and column effect values are initially populated with 0 values.\n\n\n28.3.2.2 Step 2: Compute the row medians\nNext, row medians are computed (shown in red in the following figure) from the residual table.\n\nNote that in addition to computing the row median values for the response variable, we are also computing the median value for the column effects in the upper margin (which happens to be zero since we have no column effect values yet).\n\n\n28.3.2.3 Step 3: Create a new residual table from the row medians\nThe row medians are added to the left hand margin of the new residual table (shown in green). These values represent the row effects in this first iteration. A new set of residual values is created from the row medians where each cell takes on the value of the subtraction of the row median from each response variable in that row.\n\nThe subtraction is also done for the column effect values (even though all values remain zero) and the global median (common effect value).\n\n\n28.3.2.4 Step 4: Compute the column medians\nNext, column medians are computed (shown in red in the following figure) from the residual table. Note that you are NOT computing the column medians from the original response variables. Note too that we are also computing the median value for the row effect values (left margin).\n\n\n\n28.3.2.5 Step 5: Create a new residual table from the column medians\nA new residual table is created from the column medians where each new cell takes on the value of the subtraction of the column median from each initial residual value in that column. For example, the first upper-left cell’s residual is \\(7.0 - 7.4 = -0.4\\).\nThe column medians are also added to the column effect margin. Note that we are also adding the row effect median value, -0.5, to the common effect cell in the upper left-hand corner.\n\nWe have now completed our first row and column smoothing iteration. However, there may be more row and column effects that can be pulled from the residuals. We therefore move on to a second iteration.\n\n\n28.3.2.6 Step 6: Second iteration – row effects\nNext, we compute the row medians from the residuals, then add the column effect median to the top margin (and the common value) and subtract the row medians from the residuals. as in step 3.\n\n\n\n28.3.2.7 Step 7: Second iteration – column effects\nTo wrap-up the second iteration, we compute the column median values from the residuals then subtract the medians from those residuals. We also add the medians to the row effect values and the common value.\n\n\n\n28.3.2.8 When do we stop iterating?\nThe goal is to iterate through the row and column smoothing operations until the row and column effect medians are close to 0. However, Hoaglin et al. (1983) warn against “using unrestrained iteration” and suggest that a few steps should be more than adequate in most instances. In our working example, a third iteration may be warranted. The complete workflow for this third iteration follows.\n\nThe final version of the table (along with the column and row values) is shown below:\n\nA progression of each iteration is shown side-by-side in the next figure. Note how, at the end of the iterations, the common factor ends up contributing the largest effect. Also note the one abnormally high residual in the southern region associated with 8th grade education.\n\n\n\n\n\nThe left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.\n\n\n\n28.3.3 Interpreting the median polish\nAs noted earlier, a two-way table represents the relationship between the response variable, \\(y\\), and the two categories as:\n\\[\ny_{ij} = \\mu + \\alpha_i + \\beta_j + \\epsilon_{ij}\n\\]\nIn our working example, \\(\\mu\\) = 20.6; \\(\\alpha_i\\) = -1.5, 2.6 -0.4, and 0.4 for \\(i\\) = NE, Nc, S and W respectively; \\(\\beta_j\\) = 7.6, 6.0, -0.9, 0.2 and -3.5 for \\(j\\) = ed8, ed9to11, ed12, ed13to15 and ed16 respectively.\nThe residuals represent the portion of the mortality rates that can’t be explained by either factors.\nSo the mortality rate in the upper left-hand cell from the original table can be deconstructed as:\n\nThe examination of the table suggests that the infant mortality rate is greatest for fathers who did not attain more than 8 years of school (i.e. who has not completed high school) as noted by the high column effect value of 7.6. This is the rate of infant mortality relative to the overall median (i.e. on average, 20.6 infants per thousand die every year and the rate goes up to 7.6 + 20.6 for infants whose father has not passed the 8th grade). Infants whose father has completed more than 16 years of school (i.e. who has completed college) have a lower rate of mortality as indicated by the low effect value of -3.5 (i.e. 3.5 fewer depths than average). The effects from regions also show higher infant mortality rates for North Central and Western regions (with effect values of 2.6 and 0.4 respectively) and lower rates for the northeastern and southern regions; however the regional effect does not appear to be as dominant as that of the father’s educational attainment.\nIt’s also important to look at the distribution of the residual numbers across the two-way table. One should identify unusually high or low residuals in the table. Such residuals may warrant further investigation (e.g. the high southern region residual value of 10.8 may need further exploration).\n\n\n28.3.4 Test for non-additivity\nThus far, we have assumed an additive relationship between the effects (factors). But this additive model may not be the best fit for our data. A good way to test this is by generating a Tukey Additivity Plot where we plot residuals vs. the comparison value, \\(cv_{ij}\\), defined as \\(\\alpha_i \\beta_j / \\mu\\). If the plot is devoid of any obvious trend or pattern we can conclude that our dataset is consistent with an additive model. Such seems to be the case with our working example as shown in the following plot.\n\n\n\n\n\nIf the diagnostic plot revealed a trend, its shape–or more specifically, its slope–could be used in helping define an appropriate transformation for the data. A rule of thumb is to apply a \\((1 – slope)\\) power transformation to the original data. If the resulting power is not appropriate for the dataset then the \\(cv_{ij}\\) can be added to the additive model as follows:\n\\[\ny_{ij} = \\mu + \\alpha_i + \\beta_j + k(\\alpha_i \\beta_j / \\mu)  + \\epsilon_{ij}\n\\] where the constant \\(k\\) is the slope estimated from the Tukey Additivity plot."
+    "text": "28.3 Analysis workflow\nLet’s first create the dataframe.\n\ndf &lt;- data.frame(row.names = c(\"NE\",\"NC\",\"S\",\"W\"),\n                 ed8       = c(25.3,32.1,38.8,25.4), \n                 ed9to11   = c(25.3,29,31,21.1),\n                 ed12      = c(18.2,18.8,19.3,20.3),\n                 ed13to15  = c(18.3,24.3,15.7,24),\n                 ed16      = c(16.3,19,16.8,17.5)\n                 )\n\n\n28.3.1 Visualizing the data\nIt’s often easier to look at a graphical representation of the data than a tabular one. Even a table as small as this can benefit from a plot.\nWe will adopt Bill Cleveland’s dotplot for this purpose. R has a built-in dotplot function called dotchart. It requires that the table be stored as a matrix instead of a dataframe; we will therefore convert df to a matrix by wrapping it with the as.matrix() function.\n\ndotchart( as.matrix(df), cex=0.7)\n\n\n\n\nThe plot helps visualize any differences in mortality rates across different father educational attainment levels. There seems to be a gradual decrease in child mortality with increasing father educational attainment.\nBut the plot does not help spot differences across regions (except for the ed12 group). We can generate another plot where region becomes the main grouping factor. We do this by wrapping the matrix with the transpose function t().\n\ndotchart( t(as.matrix(df)), cex=0.7)\n\n\n\n\nAt first glance, there seems to be higher death rates for the NC and S regions and relatively lower rates for the W and NE regions. But our eyes may be fooled by outliers in the data.\nNext, we’ll generate side-by-side boxplots to compare the effects between both categories. Note that we’ll need to create a long version of the table using the tidyr package.\n\nlibrary(tidyr)\nlibrary(dplyr)\n\ndf.l &lt;- df %&gt;%\n  mutate(Region = as.factor(row.names(.)) )  %&gt;%\n  pivot_longer(names_to = \"Edu\", values_to = \"Deaths\", -Region) %&gt;% \n  mutate(Edu = factor(Edu, levels=names(df)))\n\n# side-by-side plot\nOP &lt;- par(mfrow=c(1,2))\nplot(Deaths ~ Region + Edu, df.l)\npar(OP)\n\n\n\n\nSo at this point the plots suggest that there may be a father’s educational attainment effect as well as a regional effect on infant mortality with the former effect being possibly more important.\nNext we will attempt to quantify these effects using Tukey’s median polish.\n\n\n28.3.2 Median polish\nA median polish is an iterative process whereby we seek to extract the effects from the data into their row and column components. The steps involved in each iteration are described next.\n\n28.3.2.1 Step 1: Compute overall median and residual table\nFirst, we will compute the median value for all values in the dataset; this will be our first estimate of the common value. The resulting median value is placed in the upper left-hand margin of the table. A residual table is created by taking the difference between the original value and the overall median.\n\nYou’ll also note that the row and column effect values are initially populated with 0 values.\n\n\n28.3.2.2 Step 2: Compute the row medians\nNext, row medians are computed (shown in red in the following figure) from the residual table.\n\nNote that in addition to computing the row median values for the response variable, we are also computing the median value for the column effects in the upper margin (which happens to be zero since we have no column effect values yet).\n\n\n28.3.2.3 Step 3: Create a new residual table from the row medians\nThe row medians are added to the left hand margin of the new residual table (shown in green). These values represent the row effects in this first iteration. A new set of residual values is created from the row medians where each cell takes on the value of the subtraction of the row median from each response variable in that row.\n\nThe subtraction is also done for the column effect values (even though all values remain zero) and the global median (common effect value).\n\n\n28.3.2.4 Step 4: Compute the column medians\nNext, column medians are computed (shown in red in the following figure) from the residual table. Note that you are NOT computing the column medians from the original response variables. Note too that we are also computing the median value for the row effect values (left margin).\n\n\n\n28.3.2.5 Step 5: Create a new residual table from the column medians\nA new residual table is created from the column medians where each new cell takes on the value of the subtraction of the column median from each initial residual value in that column. For example, the first upper-left cell’s residual is \\(7.0 - 7.4 = -0.4\\).\nThe column medians are also added to the column effect margin. Note that we are also adding the row effect median value, -0.5, to the common effect cell in the upper left-hand corner.\n\nWe have now completed our first row and column smoothing iteration. However, there may be more row and column effects that can be pulled from the residuals. We therefore move on to a second iteration.\n\n\n28.3.2.6 Step 6: Second iteration – row effects\nNext, we compute the row medians from the residuals, then add the column effect median to the top margin (and the common value) and subtract the row medians from the residuals. as in step 3.\n\n\n\n28.3.2.7 Step 7: Second iteration – column effects\nTo wrap-up the second iteration, we compute the column median values from the residuals then subtract the medians from those residuals. We also add the medians to the row effect values and the common value.\n\n\n\n28.3.2.8 When do we stop iterating?\nThe goal is to iterate through the row and column smoothing operations until the row and column effect medians are close to 0. However, Hoaglin et al. (1983) warn against “using unrestrained iteration” and suggest that a few steps should be more than adequate in most instances. In our working example, a third iteration may be warranted. The complete workflow for this third iteration follows.\n\nThe final version of the table (along with the column and row values) is shown below:\n\nA progression of each iteration is shown side-by-side in the next figure. The left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.\n\n\n\n\n\nA few takeway observations from the analysis follow:\n\nThe common factor ends up contributing the largest effect.\nBetween Region and Education effects, the latter explains more of the variability in deaths with a range of 7.43 - (-3.7) = 11.13 deaths per 1000 births. The Region effect explains about 2.3 - (-1.46) = 3.76 deaths per 1000 births of the variability in the data.\nOne abnormally high residual–10.97 deaths above the overall median deaths–is associated with the southern region and an 8th grade education.\n\n\n\n\n28.3.3 Interpreting the median polish\nAs noted earlier, a two-way table represents the relationship between the response variable, \\(y\\), and the two categories as:\n\\[\ny_{ij} = \\mu + \\alpha_i + \\beta_j + \\epsilon_{ij}\n\\]\nIn our working example, \\(\\mu\\) = 20.6; \\(\\alpha_i\\) = -1.5, 2.6 -0.4, and 0.4 for \\(i\\) = NE, Nc, S and W respectively; \\(\\beta_j\\) = 7.6, 6.0, -0.9, 0.2 and -3.5 for \\(j\\) = ed8, ed9to11, ed12, ed13to15 and ed16 respectively.\nThe residuals represent the portion of the mortality rates that can’t be explained by either factors.\nSo the mortality rate in the upper left-hand cell from the original table can be deconstructed as:\n\nThe examination of the table suggests that the infant mortality rate is greatest for fathers who did not attain more than 8 years of school (i.e. who has not completed high school) as noted by the high column effect value of 7.6. This is the rate of infant mortality relative to the overall median (i.e. on average, 20.6 infants per thousand die every year and the rate goes up to 7.6 + 20.6 for infants whose father has not passed the 8th grade). Infants whose father has completed more than 16 years of school (i.e. who has completed college) have a lower rate of mortality as indicated by the low effect value of -3.5 (i.e. 3.5 fewer depths than average). The effects from regions also show higher infant mortality rates for North Central and Western regions (with effect values of 2.6 and 0.4 respectively) and lower rates for the northeastern and southern regions; however the regional effect does not appear to be as dominant as that of the father’s educational attainment.\nIt’s also important to look at the distribution of the residual numbers across the two-way table. One should identify unusually high or low residuals in the table. Such residuals may warrant further investigation (e.g. the high southern region residual value of 10.8 may need further exploration).\n\n\n28.3.4 Test for non-additivity\nThus far, we have assumed an additive relationship between the effects (factors). But this additive model may not be the best fit for our data. A good way to test this is by generating a Tukey Additivity Plot where we plot residuals vs. the comparison value, \\(cv_{ij}\\), defined as \\(\\alpha_i \\beta_j / \\mu\\). If the plot is devoid of any obvious trend or pattern we can conclude that our dataset is consistent with an additive model. Such seems to be the case with our working example as shown in the following plot.\n\n\n\n\n\nIf the diagnostic plot revealed a trend, its shape–or more specifically, its slope–could be used in helping define an appropriate transformation for the data. A rule of thumb is to apply a \\((1 – slope)\\) power transformation to the original data. If the resulting power is not appropriate for the dataset then the \\(cv_{ij}\\) can be added to the additive model as follows:\n\\[\ny_{ij} = \\mu + \\alpha_i + \\beta_j + k(\\alpha_i \\beta_j / \\mu)  + \\epsilon_{ij}\n\\] where the constant \\(k\\) is the slope estimated from the Tukey Additivity plot."
   },
   {
     "objectID": "two_way.html#implementing-the-median-polish-in-r",
     "href": "two_way.html#implementing-the-median-polish-in-r",
     "title": "28  Analyzing two-way tables: The median polish",
     "section": "28.4 Implementing the median polish in R",
-    "text": "28.4 Implementing the median polish in R\n\n28.4.1 Using base R’s medpolish\nThe steps outlined in the previous section can be easily implemented using pen and paper or a spreadsheet environment for larger datasets. R has a built-in function called medpolish() which does this for us. We can define the maximum number of iterations by setting the maxiter= parameter but note that medpolish will, by default, automatically estimate the best number of iterations for us.\n\ndf.med &lt;- medpolish( df)\n\n1: 47.1\n2: 42.9\n3: 42.45\nFinal: 42.25\n\n\nThe median polish ran through 4 iterations–one more than was run in our step-by-step example.\nThe four values printed to the console gives us the sum of absolute residuals at each iteration. The output from the model is stored in the df.med object. To see its contents , simply type it at the command line.\n\ndf.med\n\n\nMedian Polish Results (Dataset: \"df\")\n\nOverall: 20.6\n\nRow Effects:\n   NE    NC     S     W \n-1.50  2.55 -0.35  0.35 \n\nColumn Effects:\n     ed8  ed9to11     ed12 ed13to15     ed16 \n   7.575    6.025   -0.925    0.175   -3.450 \n\nResiduals:\n      ed8 ed9to11   ed12 ed13to15  ed16\nNE -1.375   0.175  0.025   -0.975  0.65\nNC  1.375  -0.175 -3.425    0.975 -0.70\nS  10.975   4.725 -0.025   -4.725  0.00\nW  -3.125  -5.875  0.275    2.875  0.00\n\n\nAll three effects are displayed as well as the residuals (note that the precision returned is greater than that used in our earlier analysis).\nTo generate the Tukey additivity plot, simply wrap the median polish object with the plot command as in:\n\nplot( df.med )\n\n\n\n\n\n\n28.4.2 Using eda_pol\nThe tukeyedar package has a custom function called eda_pol that will output the polished table as a graphic element.\nUnlike the base medpolish function, eda_pol requires that the data be in long form. In creating the long form version of the data, we’ll explicitly set the levels for educational attainment and region.\n\ngrd &lt;- c(\"ed8\", \"ed9-11\", \"ed12\", \"ed13-15\", \"ed16\")\nreg &lt;- c(\"NE\", \"NC\", \"S\", \"W\")\ndfl &lt;- data.frame(Region =  factor(rep( c(\"NE\", \"NC\", \"S\", \"W\"), each = 5),\n                                   levels = reg),\n                 Education = factor(rep( grd , 4), levels = grd),\n                 Deaths = c(25.3, 25.3, 18.2, 18.3, 16.3, 32.1, 29, 18.8,\n                          24.3, 19, 38.8, 31, 19.3, 15.7, 16.8, 25.4, \n                          21.1, 20.3, 24, 17.5))\n\nThe eda_pol requires that you specify which variables will be mapped to the row and column effects.\n\nlibrary(tukeyedar)\n\ndf.pol &lt;- eda_pol(dfl, row = Region, col = Education , val = Deaths )\n\n\n\n\n\n\nHere, the eda_pol function required five iterations which explains the slight difference in values from those generated with the medpolish function. You can control the maximum number of iterations in eda_pol with the maxiter argument.\nBy default, the column and row values are listed in the same order as they are presented in the input data frame (either defined alphabetically or defined by their levels). You can have the function sort the values by their effect size using the sort argument.\n\ndf.pol &lt;- eda_pol(dfl, row = Region, col = Education, val = Deaths, sort = TRUE )\n\n\n\n\n\n\nThe df.pol object is a list that stores output values such as the common, row and column effects.\n\ndf.pol$global\n\n[1] 20.85\n\ndf.pol$row\n\n  Region  effect\n1     NE -1.4625\n2     NC  2.3000\n3      S -0.3500\n4      W  0.3500\n\ndf.pol$col\n\n  Education   effect\n1       ed8  7.43125\n2    ed9-11  5.88125\n3      ed12 -1.19375\n4   ed13-15  0.03125\n5      ed16 -3.70000\n\n\nThe eda_pol will also output a diagnostic plot.\n\nplot(df.pol, type = \"diagnostic\")\n\n$slope\n    cv \n1.3688 \n\n\n\n\n\nIn addition to generating the plot, the function will also return the slope of the fitted line.\nFor a comprehensive review of the median polish and the eda_pol function, see the eda_pol vignette."
+    "text": "28.4 Implementing the median polish in R\n\n28.4.1 Using base R’s medpolish\nThe steps outlined in the previous section can be easily implemented using pen and paper or a spreadsheet environment for larger datasets. R has a built-in function called medpolish() which does this for us. We can define the maximum number of iterations by setting the maxiter= parameter but note that medpolish will, by default, automatically estimate the best number of iterations for us.\n\ndf.med &lt;- medpolish( df)\n\n1: 47.1\n2: 42.9\n3: 42.45\nFinal: 42.25\n\n\nThe median polish ran through 4 iterations–one more than was run in our step-by-step example.\nThe four values printed to the console gives us the sum of absolute residuals at each iteration. The output from the model is stored in the df.med object. To see its contents , simply type it at the command line.\n\ndf.med\n\n\nMedian Polish Results (Dataset: \"df\")\n\nOverall: 20.775\n\nRow Effects:\n    NE     NC      S      W \n-1.475  2.375 -0.350  0.350 \n\nColumn Effects:\n     ed8  ed9to11     ed12 ed13to15     ed16 \n  7.4750   5.9250  -1.1125   0.0750  -3.6250 \n\nResiduals:\n      ed8 ed9to11    ed12 ed13to15   ed16\nNE -1.475   0.075  0.0125   -1.075  0.625\nNC  1.475  -0.075 -3.2375    1.075 -0.525\nS  10.900   4.650 -0.0125   -4.800  0.000\nW  -3.200  -5.950  0.2875    2.800  0.000\n\n\nAll three effects are displayed as well as the residuals (note that the precision returned is greater than that used in our earlier analysis).\nTo generate the Tukey additivity plot, simply wrap the median polish object with the plot command as in:\n\nplot( df.med )\n\n\n\n\n\n\n28.4.2 Using eda_pol\nThe tukeyedar package has a custom function called eda_pol that will output the polished table as a graphic element.\nUnlike the base medpolish function, eda_pol requires that the data be in long form. In creating the long form version of the data, we’ll explicitly set the levels for educational attainment and region.\n\ngrd &lt;- c(\"ed8\", \"ed9-11\", \"ed12\", \"ed13-15\", \"ed16\")\nreg &lt;- c(\"NE\", \"NC\", \"S\", \"W\")\ndfl &lt;- data.frame(Region =  factor(rep( c(\"NE\", \"NC\", \"S\", \"W\"), each = 5),\n                                   levels = reg),\n                 Education = factor(rep( grd , 4), levels = grd),\n                 Deaths = c(25.3, 25.3, 18.2, 18.3, 16.3, 32.1, 29, 18.8,\n                          24.3, 19, 38.8, 31, 19.3, 15.7, 16.8, 25.4, \n                          21.1, 20.3, 24, 17.5))\n\nThe eda_pol requires that you specify which variables will be mapped to the row and column effects.\n\nlibrary(tukeyedar)\n\ndf.pol &lt;- eda_pol(dfl, row = Region, col = Education , val = Deaths )\n\n\n\n\n\n\nHere, the eda_pol function required five iterations which explains the slight difference in values from those generated with the medpolish function. You can control the maximum number of iterations in eda_pol with the maxiter argument.\nBy default, the column and row values are listed in the same order as they are presented in the input data frame (either defined alphabetically or defined by their levels). You can have the function sort the values by their effect size using the sort argument.\n\ndf.pol &lt;- eda_pol(dfl, row = Region, col = Education, val = Deaths, sort = TRUE )\n\n\n\n\n\n\nThe df.pol object is a list that stores output values such as the common, row and column effects.\n\ndf.pol$global\n\n[1] 20.85\n\ndf.pol$row\n\n  Region  effect\n1     NE -1.4625\n2     NC  2.3000\n3      S -0.3500\n4      W  0.3500\n\ndf.pol$col\n\n  Education   effect\n1       ed8  7.43125\n2    ed9-11  5.88125\n3      ed12 -1.19375\n4   ed13-15  0.03125\n5      ed16 -3.70000\n\n\nThe eda_pol will also output a diagnostic plot.\n\nplot(df.pol, type = \"diagnostic\")\n\n$slope\n    cv \n1.3688 \n\n\n\n\n\nIn addition to generating the plot, the function will also return the slope of the fitted line in the console.\nFor a comprehensive review of the median polish and the eda_pol function, see the eda_pol vignette."
   },
   {
     "objectID": "two_way.html#what-if-we-use-the-mean-instead-of-the-median",
     "href": "two_way.html#what-if-we-use-the-mean-instead-of-the-median",
     "title": "28  Analyzing two-way tables: The median polish",
     "section": "28.5 What if we use the mean instead of the median?",
-    "text": "28.5 What if we use the mean instead of the median?\nThe procedure is similar with some notable differences. First, we compute the global mean instead of the medians (the common effect) then subtract it from all values in the table. Next, we compute the row means (the row effect) then subtract each mean from all values in its associated row. We finally compute the column means (from the residuals) to give us the column effect. That’s it, unlike the median polish, we do not iterate the smoothing sequences. An example of a “mean” polish applied to our data follows:\n\nThe results differ slightly from those produced using the median polish. Recall that the mean is sensitive to outliers and medians are not. If a robust estimate of the effects is sought, stick with the median polish.\nSo what can we gain from the “mean” polish? Well, as it turns out, it serves as the basis of the two-way ANOVA.\n\n28.5.1 Two-way ANOVA\nA two-way ANOVA assesses whether the factors (categories) have a significant effect on the outcome. Its implementation can be conceptualized as a regression analysis where each row and column level is treated as a dummy variable. The computed regression coefficients are the same as the levels computed using the “mean” polish outlined in the previous step except for one notable difference: the ANOVA adds one of the column level values and one of the row level values to the grand mean. It then subtracts those values from their respective row/column effects.\n\nThe resulting row/column levels are the regression coefficients:\n\nM &lt;- lm(Deaths ~ Education + Region, dfl)\ncoef(M)\n\n     (Intercept)  Educationed9-11    Educationed12 Educationed13-15    Educationed16         RegionNE          RegionS \n          32.215           -3.800          -11.250           -9.825          -13.000           -3.960           -0.320 \n         RegionW \n          -2.980 \n\n\nThe regression formula takes on the form:\n\\[\n\\begin{split}\nDeaths = 32.21 - 3.8(ed9to11) -11.25(ed12) -9.83(ed13to15) -13(ed16) \\\\\n         -3.96(RegionNE) -0.320(RegionS)  -2.980(RegionW) + \\epsilon_{ij}\n\\end{split}\n\\]\nSo, for example, to compute the first value in the raw table (death rate = 25.3) from the formula, substitute the variables as follows:\n\\[\n\\begin{split}\nDeaths &= 32.21 - 3.8(0) -11.25(0) -9.83(0) -13(0)&& \\\\\n         &-3.96(1) -0.320(0)  -2.980(0) - 3.0& \\\\\n       &= 32.21 -3.96 -3.0&& \\\\\n       &= 25.3&&\n\\end{split}\n\\]\nTo assess if any of the factors have a significant effect on the Death variables, simply wrap the regression with an anova() function.\n\nanova(M)\n\nAnalysis of Variance Table\n\nResponse: Deaths\n          Df Sum Sq Mean Sq F value  Pr(&gt;F)   \nEdu        4 478.52 119.630  7.7539 0.00251 **\nRegion     3  57.44  19.146  1.2410 0.33801   \nResiduals 12 185.14  15.428                   \n---\nSignif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1\n\n\nThe results suggest that the father’s educational attainment has a significant effect on infant mortality (p = 0.0025) whereas the region does not (p = 0.338).\n\n\n28.5.2 Visualizing a two-way ANOVA as a table\nYou can view the output of a two-way ANOVA as a “mean polish” table using the eda_pol function. Simply set the stat argument to mean.\n\ndf.ano &lt;- eda_pol(dfl, row = Region, col = Education, val = Deaths, stat = mean)"
+    "text": "28.5 What if we use the mean instead of the median?\nThe procedure is similar with some notable differences. First, we compute the global mean instead of the medians (the common effect) then subtract it from all values in the table. Next, we compute the row means (the row effect) then subtract each mean from all values in its associated row. We finally compute the column means (from the residuals) to give us the column effect. That’s it, unlike the median polish, we do not iterate the smoothing sequences. An example of a “mean” polish applied to our data follows:\n\nThe results differ slightly from those produced using the median polish. Recall that the mean is sensitive to outliers and medians are not. If a robust estimate of the effects is sought, stick with the median polish.\nSo what can we gain from the “mean” polish? Well, as it turns out, it serves as the basis of the two-way ANOVA.\n\n28.5.1 Two-way ANOVA\nA two-way ANOVA assesses whether the factors (categories) have a significant effect on the outcome. Its implementation can be conceptualized as a regression analysis where each row and column level is treated as a dummy variable. The computed regression coefficients are the same as the levels computed using the “mean” polish outlined in the previous step except for one notable difference: the ANOVA adds one of the column level values and one of the row level values to the grand mean. It then subtracts those values from their respective row/column effects.\n\nThe resulting row/column levels are the regression coefficients:\n\nM &lt;- lm(Deaths ~ Education + Region, dfl)\ncoef(M)\n\n     (Intercept)  Educationed9-11    Educationed12 Educationed13-15    Educationed16         RegionNC          RegionS \n          28.255           -3.800          -11.250           -9.825          -13.000            3.960            3.640 \n         RegionW \n           0.980 \n\n\nThe regression formula takes on the form:\n\\[\n\\begin{split}\nDeaths = 32.21 - 3.8(ed9to11) -11.25(ed12) -9.83(ed13to15) -13(ed16) \\\\\n         -3.96(RegionNE) -0.320(RegionS)  -2.980(RegionW) + \\epsilon_{ij}\n\\end{split}\n\\]\nSo, for example, to compute the first value in the raw table (death rate = 25.3) from the formula, substitute the variables as follows:\n\\[\n\\begin{split}\nDeaths &= 32.21 - 3.8(0) -11.25(0) -9.83(0) -13(0)&& \\\\\n         &-3.96(1) -0.320(0)  -2.980(0) - 3.0& \\\\\n       &= 32.21 -3.96 -3.0&& \\\\\n       &= 25.3&&\n\\end{split}\n\\]\nTo assess if any of the factors have a significant effect on the Death variables, simply wrap the regression with an anova() function.\n\nanova(M)\n\nAnalysis of Variance Table\n\nResponse: Deaths\n          Df Sum Sq Mean Sq F value  Pr(&gt;F)   \nEducation  4 478.52 119.630  7.7539 0.00251 **\nRegion     3  57.44  19.146  1.2410 0.33801   \nResiduals 12 185.14  15.428                   \n---\nSignif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1\n\n\nThe results suggest that the father’s educational attainment has a significant effect on infant mortality (p = 0.0025) whereas the region does not (p = 0.338).\n\n\n28.5.2 Visualizing a two-way ANOVA as a table\nYou can view the output of a two-way ANOVA as a “mean polish” table using the eda_pol function. Simply set the stat argument to mean.\n\ndf.ano &lt;- eda_pol(dfl, row = Region, col = Education, val = Deaths, stat = mean)"
   },
   {
     "objectID": "two_way.html#references",
@@ -1181,5 +1181,12 @@
     "title": "27  Slicing data",
     "section": "27.2 Case study: Trends in daily temperature extremes",
     "text": "27.2 Case study: Trends in daily temperature extremes\n\nDisclaimer: the analysis presented here is only exploratory and does not mirror the complete analysis conducted by Vincent et al. nor the one conducted by Stone.\n\n\n27.2.1 Original analysis\nThe following data are pulled from the paper titled “Observed Trends in Indices of Daily Temperature Extremes in South America 1960-2000” (Vincent et al., 2005) and represent the percentage of nights with temperatures greater than or colder than the 90th and 10th percentiles respectively within each year. The percentiles were calculated for the 1961 to 2000 period.\n\nlibrary(tidyr)\n\nYear &lt;- 1960:2000\nPerC &lt;- c(11.69,9.33,14.35,10.73,14.15,11.16,13,12.13,14.25,10.01,11.94,14.35,\n          10.83,9.38,11.5,10.44,12.66,7.55,9.77,9.81,8.9,8.51,7.02,6.83,9.67,\n          7.84,7.11,8.56,10.59,7.93,8.85,8.8,8.75,8.18,7.16,9.91,10.15,6.58,\n          6.44,9.43,8.03)\nPerH &lt;- c(8.62,10.1,6.67,11.13,5.71,9.48,7.63,8.12,7.2,9.64,8.42,5.71,11.72,\n          11.32,7.2,7.17,7.46,13.17,9.28,8.75,12.38,10,13.83,17.59,10.14,\n          9.84,11.23,14.39,9.44,8.26,12.15,12.45,13.14,13.67,15.22,11.79,11.16,\n          20.37,17.56,11.13,11.49)\ndf2 &lt;- data.frame(Year, PerC, PerH)\n\ndf2.l &lt;- pivot_longer(df2, names_to = \"Temp\", values_to = \"Percent\", -Year)\n\nLet’s plot the data and fit a straight line to the points.\n\nggplot(df2.l, aes(x = Year, y = Percent)) + geom_point() +\n  stat_smooth(method = \"lm\", se = FALSE) + facet_wrap(~ Temp, nrow = 1)\n\n\n\n\nThe plot on the left shows percent cold nights and the one on the right shows percent hot nights. At first glance, the trends seem real and monotonic.\nNext we’ll fit a loess to see if the trends are indeed monotonic. To minimize the undue influence of end values in the plot, we’ll implement loess’ bisquare estimation method via the family=symmetric option. We’ll also use a small span to help identify any “kinks” in the patterns.\n\nggplot(df2.l, aes(x = Year, y = Percent)) + geom_point() +\n  stat_smooth(method = \"loess\", se = FALSE, span = 0.5, \n              method.args = list(degree = 1, family = \"symmetric\"))  + \n  facet_wrap(~ Temp, nrow = 1)\n\n\n\n\nThe patterns seem to be segmented around the 1975-1980 period for both plots suggesting that the observed trends may not be monotonic. In fact, there appears to be a prominent kink in the percent cold data around the mid to late 1970`s. A similar, but not as prominent kink can also be observed in the percent hot data at around the same time period.\n\n\n27.2.2 Changepoint\nIn a comment to Vincent et al.’s paper, R.J. Stone argues that the trend observed in the percent hot and cold dataset is not monotonic but segmented instead. In other words, there is an abrupt change in patterns for both datasets that make it seem as though a monotonic trend exists when in fact the data may follow relatively flat patterns for two different segments of time. He notes that the abrupt change (which he refers to as a changepoint) occurs around the 1976 and 1977 period. He suggests that this time period coincides with a change in the Pacific Decadal Oscillation (PDO) pattern. PDO refers to an ocean/atmospheric weather pattern that spans multiple decades and that is believed to impact global climate.\nThe following chunk of code loads the PDO data, then summarizes the data by year before plotting the resulting dataset.\n\ndf3  &lt;- read.table(\"http://mgimond.github.io/ES218/Data/PDO.dat\", \n                   header = TRUE, na.strings = \"-9999\")\npdo &lt;- df3 %&gt;%\n  pivot_longer(names_to = \"Month\", values_to = \"PDO\", -YEAR) %&gt;%\n  group_by(YEAR) %&gt;%\n  summarise(PDO = median(PDO) )\n\nggplot(pdo, aes(x = YEAR, y = PDO)) + geom_line() + \n  stat_smooth(se = FALSE, span = 0.25) +\n  geom_vline(xintercept = c(1960, 1976, 2000), lty = 3)\n\n\n\n\nThe contrast in PDO indexes between the 1960-1976 period and the 1976-2000 period is obvious with the pre-1977 index values appearing to remain relatively flat over a 15 year period and with the post-1977 index appearing to show a gradual increase towards a peak around the early 1990’s.\nTo see if distinct patterns emerge from the percent hot and cold data before and after 1976, we’ll split the data into two segments using a cutoff year of 1976-1977. Values associated with a period prior to 1977 will be assigned a seg value of Before and those associated with a post-1977 period will be assigned a seg value of After.\n\ndf2.l$seg &lt;- ifelse(df2.l$Year &lt; 1977, \"Before\", \"After\")\n\nNext, we’ll plot the data across four facets:\n\nggplot(df2.l, aes(x = Year, y = Percent)) + geom_point() +\n  stat_smooth(method = \"lm\", se = FALSE) + facet_grid(seg ~ Temp)\n\n\n\n\nWe can also choose to map seg to the color aesthetics which will split the points by color with the added benefit of fitting two separate models to each batch.\n\nggplot(df2.l, aes(x = Year, y = Percent, col = seg)) + geom_point() +\n  stat_smooth(method = \"lm\", se=FALSE) + facet_wrap( ~ Temp, nrow = 1)\n\n\n\n\nTo check for “straightness” in the fits, we’ll fit a loess to the points.\n\nggplot(df2.l, aes(x = Year, y = Percent, col = seg)) + geom_point() +\n  stat_smooth(method = \"loess\", se = FALSE, method.args = list(degree = 1)) + \n  facet_wrap( ~ Temp, nrow = 1)\n\n\n\n\nThere is a clear “stair-step” pattern for the percent cold nights. However, there seems to be an upward trend in the percent of hot nights for the post-1977 period which could imply that in addition to the PDO effect, another process could be at play.\nThis little exercise highlights the ease in which an analysis can follow different (and seemingly sound) paths. It also serves as a reminder of the importance of domain knowledge when exploring data."
+  },
+  {
+    "objectID": "sl_plot.html#example-the-iris-dataset",
+    "href": "sl_plot.html#example-the-iris-dataset",
+    "title": "20  Spread-level plots",
+    "section": "20.3 Example: the iris dataset",
+    "text": "20.3 Example: the iris dataset\nR has a built-in dataset called iris that provide measurements of sepal and petal dimensions for three different species of the iris family. In this next example, we will plot the spreads of the Petal.Length residuals (after removing their group median values) to their group medians.\n\n# Create two new columns: group median and group residuals\n df1 &lt;- iris %&gt;%\n   group_by(Species)  %&gt;%\n   mutate( Median = median(Petal.Length),\n           Residuals = sqrt(abs( Petal.Length - Median)))  \n\n# Generate the s-l plot \n ggplot(df1, aes(x = Median, y = Residuals)) + \n   geom_jitter(alpha = 0.4, width = 0.05, height = 0) +\n   stat_summary(fun = median, geom = \"line\", col = \"red\") +\n   ylab(expression(sqrt( abs(\" Residuals \")))) +\n   geom_text(aes(x = Median, y = 1.3, label = Species))\n\n\n\n\nA monotonic spread is apparent in this dataset too, i.e. as the median length of the Petal increases, so does the spread."
   }
 ]
\ No newline at end of file
diff --git a/docs/sl_plot.html b/docs/sl_plot.html
index 34f694ef..63f20289 100755
--- a/docs/sl_plot.html
+++ b/docs/sl_plot.html
@@ -336,7 +336,7 @@
 </li>
           <li class="sidebar-item">
   <div class="sidebar-item-container"> 
-  <a href="./robustness.html" class="sidebar-item-text sidebar-link">
+  <a href="./case_study.html" class="sidebar-item-text sidebar-link">
  <span class="menu-text"><span class="chapter-number">23</span>&nbsp; <span class="chapter-title">A working example: t-tests and re-expression</span></span></a>
   </div>
 </li>
@@ -435,7 +435,7 @@ <h2 id="toc-title">Table of contents</h2>
   <ul>
   <li><a href="#introduction" id="toc-introduction" class="nav-link active" data-scroll-target="#introduction"><span class="header-section-number">20.1</span> Introduction</a></li>
   <li><a href="#constructing-the-s-l-plot" id="toc-constructing-the-s-l-plot" class="nav-link" data-scroll-target="#constructing-the-s-l-plot"><span class="header-section-number">20.2</span> Constructing the s-l plot</a></li>
-  <li><a href="#rs-built-in-iris-dataset" id="toc-rs-built-in-iris-dataset" class="nav-link" data-scroll-target="#rs-built-in-iris-dataset"><span class="header-section-number">20.3</span> R’s built in <code>iris</code> dataset</a></li>
+  <li><a href="#example-the-iris-dataset" id="toc-example-the-iris-dataset" class="nav-link" data-scroll-target="#example-the-iris-dataset"><span class="header-section-number">20.3</span> Example: the <code>iris</code> dataset</a></li>
   <li><a href="#how-can-we-stabilize-spreads-in-a-dataset" id="toc-how-can-we-stabilize-spreads-in-a-dataset" class="nav-link" data-scroll-target="#how-can-we-stabilize-spreads-in-a-dataset"><span class="header-section-number">20.4</span> How can we stabilize spreads in a dataset?</a>
   <ul class="collapse">
   <li><a href="#variations-of-the-s-l-plot" id="toc-variations-of-the-s-l-plot" class="nav-link" data-scroll-target="#variations-of-the-s-l-plot"><span class="header-section-number">20.4.1</span> Variations of the S-L plot</a></li>
@@ -463,7 +463,7 @@ <h1 class="title"><span class="chapter-number">20</span>&nbsp; <span class="chap
 
 </header>
 
-<div class="cell" data-hash="sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040">
+<div class="cell" data-hash="sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216">
 <div class="cell-output-display">
 
 <table data-quarto-disable-processing="true" class="table" style="width: auto !important; ">
@@ -476,6 +476,13 @@ <h1 class="title"><span class="chapter-number">20</span>&nbsp; <span class="chap
              padding-right:4px !important;
              font-size: 0.8em;
              border-radius: 5px;"> dplyr </th>
+   <th style="text-align:left;color: rgba(85, 85, 85, 255) !important;background-color: rgba(221, 221, 221, 255) !important;text-align: center;border: 1px solid white !important;
+             font-family: 'Source Code Pro', 'Open Sans';
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> ggplot2 </th>
   </tr>
  </thead>
 <tbody>
@@ -487,6 +494,13 @@ <h1 class="title"><span class="chapter-number">20</span>&nbsp; <span class="chap
              padding-right:4px !important;
              font-size: 0.8em;
              border-radius: 5px;"> 1.1.4 </td>
+   <td style="text-align:left;color: darkred !important;background-color: rgba(250, 232, 232, 255) !important;text-align: center;border: 1px solid white;
+             font-family: 'Open Sans', Arial;
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> 3.4.4 </td>
   </tr>
 </tbody>
 </table>
@@ -525,8 +539,8 @@ <h2 data-number="20.2" class="anchored" data-anchor-id="constructing-the-s-l-plo
 <p>The singer dataset does not seem to exhibit any dependence between a voice part’s spread and its median value.</p>
 <p>Next, we’ll look at an example of a dataset that <em>does</em> exhibit a dependence between spread and fitted values.</p>
 </section>
-<section id="rs-built-in-iris-dataset" class="level2" data-number="20.3">
-<h2 data-number="20.3" class="anchored" data-anchor-id="rs-built-in-iris-dataset"><span class="header-section-number">20.3</span> R’s built in <code>iris</code> dataset</h2>
+<section id="example-the-iris-dataset" class="level2" data-number="20.3">
+<h2 data-number="20.3" class="anchored" data-anchor-id="example-the-iris-dataset"><span class="header-section-number">20.3</span> Example: the <code>iris</code> dataset</h2>
 <p>R has a built-in dataset called <code>iris</code> that provide measurements of sepal and petal dimensions for three different species of the iris family. In this next example, we will plot the spreads of the <code>Petal.Length</code> residuals (after removing their group median values) to their group medians.</p>
 <div class="cell" data-hash="sl_plot_cache/html/unnamed-chunk-4_c31935faa3125f3844ba51b516baafae">
 <div class="sourceCode cell-code" id="cb2"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb2-1"><a href="#cb2-1" aria-hidden="true" tabindex="-1"></a><span class="co"># Create two new columns: group median and group residuals</span></span>
diff --git a/docs/sl_plot_files/figure-html/unnamed-chunk-3-1.png b/docs/sl_plot_files/figure-html/unnamed-chunk-3-1.png
index e9292ca6052f17789812c1c47d9e8173888dae1e..d1ef501b1ef51abcba9623f879883a633bb2d2c7 100755
GIT binary patch
literal 17027
zcmd_SbzEFcuqen3L(l-hCAhmw&;Y?LKyY_=_X$Bh2(H0HaEIWUNpN=v5MY7?cPGd@
zeD>bHz59N5ckk~0u_sMu=5$qco$Bg7Rn^rK`C3KxDH;hH0s_KQdAV2W2ndKU1OyNq
z1rfMoD16q4fB=TPR(c~1d<EJN5QGpAtPl_p5fC8=h-e6iy9h!;2trl}Lh%SzKxqVl
zKwvN!fO`aayda2(Xpa>Hf(Y3~L_<SF+eO?(MBIfS?gD=Zf44w@YZqt-D#-3GGBPq6
zA_5wK34o*RqV4XYqoZSBVBq57;^E;@P*6}&QStEb2nYxO+yLD_vha9W30VOpUdXCZ
zC_Y{&eo^`Ha#B`~Rd#Yxb^_{h<=B2rO-%y>1FOf!01yzY9?{|-@gA>u;Gb1IP&Zn|
zFIqJM<pIEd#D2VDonp(KV*8!S*JEO0Vgb5NKmqRc$Cj_h_5<Z1UI-yx2q5=J5uozO
z#p8dC@r^)Pj9+|6Pfss*QZ9FLDvxz4?_V!pe`vHqXtWY)j0cL<Bh=%y*tiIkhsKA+
z#)pUgSmpj$r~Y!M{(b=Cq5t7wF<xjf-fFQCDDjJbK|f*u*Tdq&!+N>XdVlPCKS29o
z7ZKr6(tuFW5O)Dl0<s6h{3y}g2Lyx%G&G=lpaX#7V^;wFdile8|HC?f3VC=ydjMGY
zvqOOD!@~pdyrCnY1*k4^y6y-FWD$>lpty}=O9TW;1o>AIZ+x=$17jYZ_xP^JQ*yFP
z2u4PdS`49zPr7AYG!=&+Zmfg-xt%CIV-`ZN+W4jmZ1?gTE!&!_q@(Z`U8(2g@^EBn
zO{cYPw(kc<cMpa;mk!zw_C!{&w!E9X1y+22r5_ISaJ2EvgAt%6T*uiU1cZ;6*qjL1
zoG)PrKmj2F1%iP9!T8VLL<cYLy^5$Nl1&THH97x^nz~?l{<Q_)C<IFO`34SA+<&Y=
zvfB=66=H(s^>~oI<QZfJ9lJE3MiEr7ZnHT5N}OLvX;KWde^qY-Y6+N{&>~$q)+iAh
z5=a;z_ZQJ^by(8C`a#4(UA|S%W~>T5Uu1Bq(cP`)*>Rri$&hT1KwDOzubWL@#D1xO
zY362CS6U1-Rqd@mM$z4U!3)<)yE}&Z_<P^6TqYD9#+<e`!J1f2AHy<%C+eH=yD|14
z)rIn=#JXyNLK=D_gHF;1jXyFK_lWMMb{vxB>Y&>ZY5E$@-yTNXy`2~5Fur|)iZd2F
z%E2f~2oiIk(%u(lY(}ZOF>j|&Lkp>0IpA7I<$}M<bOhD48GptffvyR(^)l<^4_nu|
z%qvR;B>J;s#r<J9(DEBTS`(_Jv9p`JDkuZi<^7#ZeZ9IfMuCz1AJe3L=I~&jnhriq
zSAK%=XU|{vN3O*l_tUVh3VJ9pHXMLES?%jCq<+jc7A&8b=d`5~EwR=VQq+gx+4+cb
z6fShnAVuSLZgP>xUJlhKLesmdf-rv<T^<UA6wdgWQ=W@hmM#nCcDMdmKw=Rj74T}u
z!o?Nu<uLyGxsz6|tsGh{CTL6Ga{qJVVw#k4LnUA00Eq>B|B{ie3mlZ}-QIyNFAED*
zDUBwwHSFMu7m_GkZq5x8Tlj^JWNn<VHYalYslVo1HOk}xqX|w%aBE&CA%)ps>NM%=
zfPi6L3`c1gZNUAzd@V?{x_@-1U%fR(B?EjmGLB#Ce%B5l=*L8+<t)NZV@Ut=Hm_ac
zg`|Gf%7)hRZ(Z`OQ~6)A>&}yx%_7~&%#mx2c5b23Z){hu^8L5{@rDCp<Cu@qdb(Y|
z#T|hz@)G;6A|k4eTsa@WOsgX2pR=WHPYKg*(XIkB+S-fTA}&h2#kDS9+#GiVQ^(1<
z`o#r~Q<^MwyBoMM!&!V^(#?n*C}>HuIHQB6%1i~%aoDd3j=01K#J^RvX4-Eg#BlPQ
z*9gj=bN(*6>Xefs()%OQm^zG>mR*JMdBU<><ipQmavbaab=M)yi=R{^qQ>lE9Ozd%
zfnZ<LdKp?PH5$0A??Hc$!aPB4l5QzhtO7-%V(yJnLdkZw`xzVU64w#cvH<UNeQQ$-
z)OUt6%a88Mfs~Ew0Pg1DRLQf9@ryq^k|M;uY)pA~w?^=%1*Zkz>IbB2LKgDGBuPqW
z!U}U&nKW_6hPKBkrn<MoB3>2ViQTz7JFZIdTh@#|n9lAfR1In;k>J2Lg64N=XY=bH
zey_-eeeT%gn&esT63e~)YIQoMa}e1pR_FV0sen3%{(<g3E+f*p-y!v#d<A$otuVto
zy;n_8vfQ_AyFI$#Lo0@nbC&bE33VrRqZF3LAvv}5%gutL4gXW;DDjqWg|Jud(u^dt
zI`WYZ8d`RJA3jig3iIViAiAf&<_`MWX`pf&AFoV&rMP!$-XdlRO50~u5avL(CUen*
zg>i0C@^CC-Z5`om-g8}$Tc5tmKetC|0RM_~=EK!yqNUk|ZDgcX^Nru8E<5>EAzrE&
zN*d9U&%TwvcrQT{Bc>bP_@m}i=cakL<W2?Z5L+N4Mc*u~SYE<nSHS>vBt@ZmAC6R{
z_y+-^FRGooDp~la8yN$^BoNVVF|lq#I<#g7Yqf<I3IoUWl4nQxz8fFY+?Bab-?!vn
z%2!`YNHOZOnB-h(@wlc)P8uQis<6zpPkNYpUeuODXVeMR@FF!p!520;ci(j1)KrKr
zIO)s~nyJ@flM`5H+tT!?w=N_L-rP{sp6eAY<nu-kq{wtCwXI0abccC;Hi*`aQz;{>
zV1+-b@LF(xnNeM)Qa-E6G2b?R^&g@qT{Ay|Uk{@zmf*VF`<15)>OR$~sb`2ni)ce^
zIhm+f9Y~hS9pwPT;)S9k><N<Wa21V|F7lxuIF~mz%6qZk=C6Qsgq8anZ&%=2KtRdd
zO<|+^eL6x24XtaD!VTN4W$G10;vdb)g4Ld$Y=blTh0{pd_@#<o1cf7Ro3Fp%gNzdt
zH%+<Kl*Fk?aA~ED`70%6P`|%fjbq-@4kl(gybsOjYf}@$VC~pvG})L&|Kq&(j+K{~
zE$YG*w9+<E-oOesH{%1iPndkA(q3Tv%A<l6cv10#=GgX9Axh%aD9ybQ)9Q0KnmC*f
zRrnxpIRp7G8Q|WWXTM~9N7gQ%DP1k7Y&*(=%8NRm1sPA1UV`btdlQK6DFHjDvZRn<
zn%Z(DsK{|*Cnq`cIZS=ERg}|FyX^wzkh4T*2Vqt0b-~Jt7$1zROW$4|$2+1^e>%t)
z2UTwRp?}$!55?EuP$$@p@dr%}WMy!<P?_*QDaxf_8DU9*v@`u;-%fT*xKcaGsX8Ff
zL-J;%K-9=F_x+s~_jV}qkO*;8`6t~)Sd}?^@O8h~PA_b-q^_WL!PL(1o3gn{qR%_1
zFkO&`x;XoRnXT%Z-~DbQYm|z@antSlGk^w*s>&ar1UMA7Ya4jAbX(`SHZ~f3^abIO
z5oVUK18d1LrQzzx4A(u!vejELJc5tk1wWu(#l?NzpgWm=XF<@Kctu5($=yAnBvxyj
z9+tW{>^l7OhC|kp;KpXTBM`QkP8%c2{Odj^2t10rQpRv!Vn=0r*ew~vHYXyHq~liD
z6xtwH8OV^TzJs^nx26Nr9x%j<o32KrNSJ#&1QyfcFcF%#wIxqlk6a5Q^QsnA4CvAd
zv;aL!ggS41%yywW{^bd0Q8(|G1nI(*cVX<8&g&(H$VFs7=$519Ny>H0_SqjN&5PsZ
z-vYFX{*oUUie^gGPh(Nh#p?(Ea27DM&ePOjD48b3+J#-~v908V(n(qPT+--wB9-At
z2FE_sv%)8pG;@4>5dto03f_w)_VqOX5j#Of{#@1$m+&*wTH>3GG<t`8t4@S~^V1kq
zxfb^Z9D_Do`xF1OSn9?m$;l7Rx@f`UiZGGmhvKYeKPua5MDxas3|Xg*wg6tNh0vx<
z@?Drh=^SBXb<A@<|GdIWY0!G^bH8|fdV3{xmlwxq<by~7r6=<VcB{(%dAj7%9JSC4
z)DHzgC1#sN7H<wv2yK?o@4gqwn9uAFib5(fn`NlB(R8YkDt^^EN?dOiHZ37lq_&>r
zx65UrH-Esj_TCQ2+1x{EaVbH0?xPzotn)gaRoUAybjd2s_c$4sa4_1K(a%H(7Fcto
zVz_#}B*!=88bHX>$Cc_=i<;4%xQ7?SEc^{A<4`7J{As^t%rR;BmQ<-9nhwwL<qW#~
zX}Zp^c43D0k8PGfqvpm;sHR3=$!unxNQ(N0F#b3e&pYc_#$1!F#2IAk=+qFXA-JqT
z^G}<s4f4jmJc~;Y4eW(lGOP9CPqPl^b!DYnuMHE*ce;;y`Ww*`>eb+1zBM*>G}h6h
zUIRPtcw`hMU@E$SE+K_pk2N&kqft?d;x9UbJMVB=8-{=y^1QIl5HK160@yVgK)Xq)
zAy8{UZZoSn2#W95{3+oC|K8?@1h`5Z?Tx*Jjr?mrvY}k9@f3HqEG^&OtomZR@RVbz
z)J(GjH9A<V>563Lm{8HsC1Ov9w;_Q?<{t~R7c%Vfn-ALs{a<K*@cq@Wd!cOw=6vn{
z<}se4U(Hz)RG-c<g;_-bHZ;!}B*3Xw@Vw)e421~61%nN=a_#(ZKfF2}%xt)ijje;h
zPx8VXqsic}$4UbCUd3Qby@Rs+cb1(B+dCOY%sl&Jr8P)jnExXgI|EpX?biR?zcT98
zs6MO56Hrs_KPGnlXWU)iZ4Q*?*nh0+;*^f@_u4Cq%f8mGJHIL6GJwq5<h6Ahxku~-
zJ5;i`Zl*s#o94Ec<cbxN0DC8426<COoz|Gvw5!4@X}6a+Uv&i4$N!X6uCuybzw-x`
zFoCk;di2En`OA|Y&T_bfo?XNYa&eFD7MhSn->1@;EH0ro0v2|7ikenZq$i*N#eW&~
z-tpXbBnKf8Hl=g`3zTriY(sSH8hSv?*e=PVRY;-Z8Gjr7ZRDJhg?)eP04c(doZdeT
zs5J>vKyUviJqA>8?BqN<plg4sCDXqH``GV)MkA-{3JDs0`CNOqH2zY>Ahw3uiPlIS
zncNU)HZYiHcBLu$*%^Z7XMoy2($7s@Xqj(*1dyRMvE?LqROLx=FY?QYZa|)E&uT=7
z-aoRmO@UoQHj08|KoTwe=o+12g^qg(uHm}0(Es^;k3-2!_h+;!Y(t0r(MQ_gFd-gz
z^7rG97=M+)M9(@#C6cu110-Z#&r1O6qD?gi#LJ~e5(70Q9$@>^eTtEV)g*KQi~-X&
zMh?dPUosOPM{xh2Md48jk4~Ol@py2PAc~-lHOrs#+Y|S7voSj4d0Cz2pI%+Y7wr~v
z63FwCx|Bb^`-yA&SplXHA_7!~bq+(3W<UbV;n61qJVVXHO@+9-ci2Ko*5$5`i^X}6
z*e!Oel$W1=WgKO8W$&XuICC3Fo1{~eTY*>fH_2AiSGCa=xAWm|h4jN77n8DVNeJnS
zVR1vjH-B>#=<<Z#1byr>ZgPH~Q%HfhzR(KL4llf;?$8`z3+p*T)~p)b!a99ZuViiu
z#iw;Q@I5BDJljjy-6I$cpNIl+O<@u6ndF&^ERuKsXcfmxl*+F8$Z3yfSaa%Yz+fPv
z=b7RtM%3Y!Zc|z}r;=C$?rjDzBJ#k>_V|F-F5vK(=Q~;0l8b<6OPm8$rctnN0@2sL
z0mweCiC!!w#PYyo{By9I5c%CofJq*$36my^`A3;;UxAG*<uha>|MioBf!0m6vK`#C
z{q)b$0q8*;J`N`imp)VE<b20R0b0xfb!9+B0KFL?*d>ho;Pq8as11vkp%C%22eKER
z1r^#AJk9w*kQ0=@BL`7xg+E2{A@oQK>#7Bs`7KOQukyb%*DNjjnR2K9xXd1hWKFOW
zNp4||FMq&~E)=E|u<-0~eGL{9Z`mzg+}CyEzzM>Sg=$xz%TVzuneB&P%x;;mI!646
zpSkFzLcJnM*pEp{QZ>5TI$KYVhbWa<WULx}a0`JhB7lqH2lIk-o+U!Zs5i`rDef`v
z3BO><!V0dHaKHCYpkhmE`~h}iOoBoJj-F_-CmmN#k(vLwOqL<oB4`YzZD(eaV5>BQ
z%d>*j>Yu7bqE2?ssH(x<)HSK79;}2jnxtz`^98lJ;+6+SF*C5z*uJ#s-$QNo*0o0^
zdivIwJRLeBev}_MBP8{d!C`$|f{NXq%Hv_D7+*4%K?;7<3!_tcJN=EODMQB*ciQ!v
zjWN2kl$9Hfq76BIS?&$(?48dIF^fR6?iP3POS_+WY04Fis5?MlqsYXGSYAm!@5Yvu
z#<aa%^lCQrqKgt9^mlWwi5*SEbeb?8CtB{a0|s2(2;+mI6(Al%RgVOWT%HcIwqOJm
zZ&cPw!1m(SSS5$(c~b1n)0Z&LNXxf?ZZW2&-WXUX>DX<>XLll*Ak;)#r2lpMot5^G
z+!{Wo!#d|E@G8brWRa*lk9m&l+^N%}Xs#>c*8kTFxa^2@KhP-<DPY%QWI}FjzW?Xn
zFBHuU+1B4bUcx{x^wa*FTxaD9<3CuU!ntY`t<kH9TMDUx^)IO)8_6=f-Z%{d+^Aj2
z5=&^v!>qXYIALh_*%@gHM3H+aP3&h{SA7Qf%mJ+fP}~bdA(kQahenuWAc|YEE{=Q8
zEpwAu-3$ZCGC?CRW%x`h764{m5cnsUlY%8E_^dKjzG5Z79C+srw#gu|F4dd5l@e^c
z_e`Z1aD79@(MDflSE&h?(AATmkO-qS@#Vfr`V3vs#m>6vlmKn6CdNv0z1`<mKIZwP
z9Xa5btSK8xXQEa|>>s~bcD?IZ5m<sjWdLeJ%NtXrk9as6Q(1jri1@-B>=o#`lexG*
z(nMf<o6ZH=1eFG`Mxi=v%7-TnCl147Ff{v+@g=pL+!S3=nNqIV)k!n8yPoEeDVveC
zzja2EdFYI8U|kst-mL7|y*k{V+cLHU%`I(b4fcKd0CQ8JIL%po6XW@nwvV{#;+k$&
zY`l2;sXok%jXJfUN1mWVw@rii-JLwE{}|v5Mtkh?wjf`Lw4^-jy=u)py0EX<6m7c7
zh=uMRc#Ps)>m)Cir2dXV_emY*uH)jh!;LoxQ{2)^d|m#8&7^cOk1fHkd|t(F^NGst
zkQ{$5`o0+rvOmTw-^pv?8)tk!a8<_?v8T;sEn}dX#=*Rwe4<iOU2^X)max#>W*ZCk
zUv(%`5p3{5p7?or0)?<;fYLLxMgcd-gTa;o?5y^4!&rCgou1hH6!q!BcF^udhDi&-
z%09>3&^3<fsMr>Aj@34aifeFZa0p<o8**skRO@i&j-|CA?PXZZn0$4USF{^Z_=Che
zg&7a>vzL7=tkX47%&^gm<E*FW^tLbrsu*kOyeVy|?&4GWqf|xyE{o>+AYWYZY=yv3
zhT>ecb19_P9x>G5b+h2F0>`@7=I_QOi5q{|6m6P(KYuMOa#JW}%Dl#1waZ4s_hZ{Y
zh@g;So!3{e!yx|)j|e|ql1i_Y=1xf0>cU4U8{f{SX?SFY-GY&HlyQY@qJ(;uVn&|C
z+r0w=8scB4#>b9Mi3e{)-FMDU8ZhSvjQN(fSt;I6Vx9LbI;8nHF>O$!f6%1ztyC;&
z=63)oo;r5tyz#AN*t4VsHRhsMPA4-Rb_*$97#n6PVdiE{i)dY#H9X9ucjJ7l-Q!4Y
zqb%G<Q=LdYE1zOOnUH*u{b~NSiXqt@zuWq$<E>;e=?k<!4%Y2M>9i`(X8bVEJH~_G
zA#NhNb=ou_1{JG(AsLbjr@VTJV%0P$djlrm&wj%Op9^O<ao-hw*HllsegZ?su=S-Z
zmMzmd_HeSg(l1zimn(j~u043u;qG+2H&(VX_r2c~Ev#S=JSsj})hr42B&e}}S3TQ1
z>;1&pRv>xso#U4jGzMOf!0M0Hmdl+g?|v2MI)Cc4WFpBSitW)d5BF|(IUkBnxB+>?
zNPrHN2M;^{mNyER{dKg=P(eoRZ@I@cE?OPMaC1GLzBcH$H}$>I?bd}odhF%~g=fEt
zaXw#soD55WU#)*rhWM?Wqg|l&RjQZN{_M*nuvbg;8^8MOddz^pXW`J(i4xmM6+UsO
zoudr_7lLA&1S=Lg)tOA`W(_6W%A;RpY%de)YwcZnO{HUJMZg6CAX;Txi&8LcIL^Lu
ztXN$Q5dyP*r|-zb8<ouNUXFGD+s?ZwF<WI8vUsTU55f84fI}b1kFY<j73>);q1T|g
zwh#%}oz6eL4GFf(CVR7#7i-2sKXLv)?u;c!;D-td*y-Phwrv4&BdbXpLy&@S?Q=5r
zouxmG)eKtCfO-XSBJ3lH{r%7zF#RRU&rfv$zZ#nfg=!V)KDSabxnH!BmYy7O_B1+f
zr5=Q=<!ky$dJ>lk(p`<&IWtTXa(2EK`5MRF;MUjF-!kHyqd2vV(eb)?$7lfAsIt64
ztA&`Xxv*_K{|1Q`KIy*1#!6#(CU1A;Iud@duJwAan_4wR`c2(7uY657zJ^2Dx~{ss
z+xMAPJ^Pu=2~+)6^wC`OCEO>F+sMKF&?k`S!wLrQ=$4~CK`Y#hgV&kWs*W~&<mii?
zfiki5HWlj7+!MpcUe{*BCG=Zye;n}Y&IC)Kw1RPJNQ5jRzL;c`1unOyM;5I*74Xq0
zUc`G`)`a60&VDLQWay4p(mMKB?&(?H**g;UuF->`<mX77DUY{Bg<b=BCv;naIfQk1
z*cSB?k>fZQf=Y-=)HgoBtA_TSl-aizNu(gKZvTkVq;BdVTx#o=J5#|&#RQK+9!=pl
zAVR9MvNH$z5ol|(V=mI>wi`tgK^<>4dG1e4B2=CI+T*7wS=&w1NLYF>Al%x;^3;l<
z)<wA@c>Rk3t6jnLnO(!dY{5BUO#p+-$Q?`uVxVNEw&u2Jw``qL9JcXZ_>xzb1J~_|
z0(a)YPfQ<v<sJP+Lz{j*DA-FZ($X)ZYmZy~8IqP*(t-n>`mCsCk)1HVZ3mJ;Yr^>Q
ze&{u~`o5z<)F?Z%f&z^P?@l(yl!we_O%YShJC!$aD&^JTpz!gkw1jBUJDN@2)&v^c
zEZLOe<~MTM*OdB2TMGqGwP8Inn5cSSc4oAv<8>a+8El(!t@R1Y2_Z@8H$Mx{Q$*V3
zD`M7Sp7-W_NpUA(TmE$s79^RYT6$HWmRirN`QDHHKI>$usqg}y^9$}(MAE>|wELa?
zriYWrfuGfa?G!rYwE%ZAW0*fO>E_+iN5-)~w1jMF`|@fT54_Wt;T~%J&4NhiqUhaU
z+}vMG0wyT7<C$I?vmzU7)y(deB;#5MIzO!<tI2>4WsDQE%Y%F0V(qxrLVe%Ke&F4d
z+6^LKkipE?_+}b0-d6O-JUL~eZw$8Hhcdca(?t5GT?aUCkOH*6i}`l`^iiV$^9vFs
zN!cv?{FFn8Dwt`Ntx%5G`pc;w%r8v${ESxXxc;c9*OD*O_1IR)3}2&xmitwpqNF+>
zg``H!6e^R$GM2%nZp?k2Tr8SkrsXSGWU0_%3q7U|EPMv<gj-!h4Mj7a0<n@A?nWxX
zVC_Tb5QOtyvK8t3>K&}toaLv@6A=uR*Zxfgt1n*hsF`2hVrs*RhD6{o&y}UAcm)E!
zgxH~UFlCNHvVIN_kq*fj)Tv`RD8qWK1wtpkRoBq`a(7n_{u?WxIrZSx)N<?UYSf{2
zzY>{FlNovzlTrJ^o##2%(Op9|G6$SnqEU}ygbov2Wy+VNB(9PPCird1pCYM!{WRf3
zv^%>K;M6{8V9EpTfAnr(-BKUSPcErlGni_hR4RdD_%{+&J)=E;ptLFpAK#Hop!33c
zxZp;|_?5u~NBh<4d)1F$RK2IFOXXR+I9shyl5{k+q_)pi>t96Dq3I+xGbs)bbjPk}
z5^x^)5DSULbxm_8+I}!Ri?A#}D=!Vbamg@}!J&%ON^Z7R{Eh0<cDEmwL)mod-JT?&
z1`97{*cBW}_3yjIY}IR9?l*m2B;eK`e`6`J`WCfW{O^E*)RKu!4lXO-yU9COgH=kC
z6=^u&cLFXV$~lz+HdxH(v?q=I57okMA5;~qt&x91NE$!AzO@CR^}XK#9Jv484rF~M
z)N}mbV8;JCI*<bR7eh_K7+@{ae|8~DS>bW_tKYo*cf$rO+*Z5?bKgR}|Lx}u{*f>D
zc|hYBt%oc~Sol+#d+!$D-j7h|x;J<#+Pjk{LaU$6FAKi7UJr{?Ar&>6zF$JO9IZU3
z&ksj{C>dnaDMy5FyXrO8cP56@n)sDmHlPM^_VFbl2PmovyG-Icr-cb%s7J*qm$?d{
z_$1*seIwnhZzpWM4<CX;hRN+@EgeqMb-q>VRkf~e2wjFtC~Vit^Bs_XhCUU~ElUW?
zF`jeT%Ox+KSxq@$z&Q0$E1TCZ9_aEALT^S)wU64kzYh?TJxsmY@oO>2G-EU$VSI)d
zY)Pp}#q^dEWB77&s4x-;I=FRoizuEs1N(q57ACJloH@1MVTDjku#6Nut;x#YBxv$g
zl<Ia*-0rlXZ!PKP^NgnAUpaIdz7Fbz=;TgVS>qZj6)WSprX0B3r&tEHLE@Z2e_#g1
z#^M<wO(RZW--r-{Ny!lFkgKe>@$gk8v+XZyg~Fgu#YQS`z89E4hAE<K4w6H|cgr18
zU!!8_z#0OPU!?PYZBZ@cUqP@voOs`>!E}7aqg6GpYvcC|HHg_MilQRjie6X-wW2~R
z0Hd9o10F5r+RFYQg?|)9)}uw7&WsgJDt}xz^vsHYT-WCM>j5Kw7WLhz*4`@`#JK5F
z(Qk!P>GuCPZ5D3LYbvozR^yhmIN7xI=qgG(3a{>8-ro7jXb6x?)@kfU>2YSE#>pIQ
zMx{~Mmx)E&9=uIJ8-HmFOVWAD2kya?`!Z#lF;E<07mrpPP*<lQurz33PJ_JnrcB_U
zT!3$P7Sy{geZ_-b%l!%PYk77P#j$Yq*aF?Ld9H4HbI<K*p#zi&s(1J<y)s27Hx)7y
z_0eyw`{Gp9#4F;r*j0FX7SBw)1N`8uRL?%SFz1A;&QICmPVTH(NtifuxW`l`J9nNr
zo^8&i<=n{2-g)72z99JUY66v<nlJ35pHAW4%QA@gchU3_n+2J)geZ+&p8#4RixTjt
zY*DEX+rFQHBbj}dX8=??>ZTS{jVOR3Sh$2fC?1!`7pRa#bN9kfw_K#Q@!7jJ(nuS|
zyrnr-z9lYhI6?xR=sh7tWn#^aof{3Z@Z4P&^sAzMN)cIHd8I@?wAh2*TgU(;V1r`M
zmIv-l3S3abM|*+W{)>BPG8)}yhU;V+_ekPWcF+rtbBGV~Q_`(VF{@O{Kys!wZH*<e
zx~b~kVUl^rQ#xZxpKCLRf(fV^sF;V@1YO$M7YDsO8by$fhoSY9q@Zf;n410Bn+e-|
z6JywyEAC~iz+FY-?Z)tFdDyO*jRLi;6Lq!H4a_nOU5sucv~0{lELX*q*V=EF-cDM+
z(f1QE8Qj8SSYR4Eqsldrq@HTtxYiSdqq-G7ZuX3Un3yI{{BG*Uz_tzXK=*-AJ55Yw
zi;`_v9uEUcqe4n!)s}6}Fc7}*b2FX`)M<;+J&|EZP%#+R(Jp%P66fd)BUVd?FiSbf
zBZykQXq}g&Zc*BXP>c8D$?R7Ux{l3dI_kI3EO2>zvracHHr?q<w8(?i`qqSZSxgy4
zw%1}9eClq)Y$^v*^ef4Y$$N0q?nx~+&rzAy!!gz6^Qm_aBHOKT`EAhS`0{?<at#WS
zaZcSis;LNzMvgAhPV(R^6rWTpdfA1RfcFp{Qz(xPC@muJ2j)Coht8?C+si@iEXN<Q
zc#}(V>(EJBQ>5%8yMCwh4+li8HWi4$Df@Z1*YfVgxK-CO6-q81MuqisO1l{8<~<!E
zu?59beH1I1d5ZF>QTW<etoen%G9A@vQ=e+WQcNjW&dCxCNbPgfOC9_Bp`X^cGDKe>
zwo(u|Qz=~A&^eQS@25+*+}D`c5w6V{5Rk|f@Dbyra6wH^4G|JWtusVxMlaf?k{G)n
z&mD1*C{>+Go=6^u=D5Yug{3S@d*3D|X<1pyJ-4%r*n>G`IUw(*t7~yiX3!)_x;IQO
zppQTT)(XCEN@~xsDg@1yDiLcR@#eSHxKOyP9$WA$>r^`f+YH2bZ6AN4HBYwLs7Ual
ze?P0wgApe}<>%=OpG8@MP8U%l-ISMOy7|o_)2mo}OSOye#qUH0zR$;R-JNth@EZ>J
z+f7eoyr2>xtAVmm3Td#P_hK(lgK;>sTX5zKP_zQvQ?s!bK0)n!6;k-+TDUF0Nsfk#
z;+nO*qT*fZEm{N}J})5rX)6b|dd+%XB+r_OA`N514?q0lyPDM?6>m<n*&yGI92wPN
z53h&ksH&&fdyg;Itw>JHpRcnpl+Q2KyaqJLd7m(v^r$=Q$$XCFg#0kds;KcwPT!%O
z_4T7cB;drUYmsMVI()Iys}O~gn)FS%$1l5YN9e2J*dBz*q)^>?q2Cmj3dP4-{^Ylz
z{*aO;Oh82?r}HJ`b^_hXnE~&#6Y&W_I8Ol2yPn8R83;36Ias5sp<ci~?vSLUEm>pJ
z>l=eA`TZ2b_)6^M=_R&{_7-6mvwl?r&g)^B{+ZU?7ApOPq=r)g<pFJLj<c1l^@#Ug
zGu23-Ohz<A>++rxQ|(<b`Upo`j#($;spU9Y*Rqx2qeTkQ$m!pa2Th3j&uThD&$B9b
zV#dooz3Zf!>XGf!IEYgY5e|{H-WsKE3F>DH-r6lSOm{Wa^Xwi}f6zSaO@=<q0w#Iz
zmYmMgywEa{RKtPRj(JTz&2AM3QCc-I5S)VT$zbv^62_L*owsu(+AZZ_%b3{`&R)c^
z^=qpEYsg8GYS7Qc+oc%7R&v$vRKh}yC9yIo$jf>(&M_;@?hBMly4d-(9s>45*5MJI
zNY=qXBnzA!P_$UxA9L4*UGpgvKg$tDN>er~jAs5S^}x*WwmUUI6B4k?Yb-{s>Urq?
z%{yXmYa#zL^={CyFVAPYB|Yl=&-K|2KU?|Eo!&sAy<GxQ?tO`!`!kes4sKopJ697;
zCEn(9Q}f~NTmZQG4ozKsOv6Q)@-;Kc75r(V``Vs`oA|8r+`(K5)L*eVtuDsb++(J-
zc3RfjmdAdCukAz=mviYRy4!yRU9{EM8@zn>gK6Cy`3GaUXW()4#N?CNLHxxNO>9mQ
z@DvjZH-Xsg%)yB#6WmBREMN~xYTHo7^2t?CZ;1IzgMd4on;mNNuA>||<cHz6r7Xt<
zQuE5$88eddLcWSsQihWme3#8dq5zcU^3b;Rp?02L{mLOrJ|jhziXKIQoh2Kz=CzY*
z0g$)-6YtHTaDiTf$_;gjx<Wdw`)}z1vK(-BoaGb_;bkK41_H&vAE^ozXK_;3GL-O<
zgKSALFIdbMy-g$mKSlJ}n7TaYuf%}qwvWf%ideO)kxN}NTX95PlUyg1=FAFqN^yB%
z+yc?enmEGvT2_%?GFt%2uStfr_zBp7tIQY$c<S?NJ>CZ-nA2QGjwmeK_?)=LR7jQ2
zMvWz%sTB)YA^kXW=|4ddFY2X%-+t`)Omh<OGynaOe5Fo^-7=$iVo(njlrrK#q0a``
zk~n7&IxXSm@Ft8)<zqBCJ{~TOKUa_Ru`9)ERPVet!{=!6r;bSd?T)IL6`h<_7lM_g
zk|N7pI29cF?w7h-Nn3xJO$g?6dBbQrn!a9Ed#A8(bK46LIx?+Aoo=FaHo1CVEQ%F=
zZ=Grzstz*Q=ep7qMp0h!FN1t}jBC;I&3X_Pw-epO&+qh7%094~80`*#YR+t&-)b`b
z_Iq75t5;02;a<n$wO9EAPiH$m231G!6AH3*9j&;ei?p6)K&#pEa-0IJ$=KgW8OF!v
zAv2aY9Ch)!0pIxe-Gx>PH6@vg%tpDNUFDmJQvutcB9eiNDE*!1gEOsuRVEa(PubD+
zs^k+>Gr+=RpSeJU5s)HV$$R6Cd}=>~w%6G*bZ~ccKF}P*ex6x;J|{>o>+>Sv*`-@3
zE82&EkTLdT<O<QLG$9i|qZd=o6DQqt@aVJ~B{8AdSzqg4NLko-pMtp)b@{2SKueqf
zcIq(iQMPG_0d7U*_tH+=AV^aHf)7Q_c7amzQL5Lo+a0`foL3GVxC{{K2=!?{cDSZq
z78Q9iv_Z<|<ae^Pz_;j}N?h5Ih;h`^BL|@_hObk*?H$%BuI3BHOT7eMe{NFaAsI}~
z)?pH%Q<{#LrlxjIb-dp4n0)i0WWgznr(#0ZhlEA*058gnkeOkBs<6xG9Zt<M?QA$1
z;(+~agu`C*#NNW9V2r9+9xKiHLEgi*fkkSQthBS)bTL^UfflggUF&l`#}84GvToHX
zCz48f%f4;V651r_RP1aeFC?X={tb~%6s19oPE8z(;<&H|Qo-|vuE2qs!xAaGmcZ=_
z{42G%ZhP5-L%v^kl2q(COCe>VK(&oO9bkX&vT=@2(&o8o<%zu{N{3m}WvSbbu*^xw
zW$mjxkK*wR&psws)xl8&ZMk*~uAE*D>rygnZ|Ph+LrnNI!~1zW#DlV$mG8Xbo-1&v
zt*1>QnJUF!PKE0%gt{8yHHju!3;9VlMv=@NaTIY}6ec#jhtB=PjM*>KR_Q!UTe7Mr
z8t85UTE5Wh@E1=e-nu<>XB9Qd9Ez{&Oue^18%wMyEiihb;Aq&MMbq`mJ?q$Ww>lg_
zeUv_mvd^#c3$2rIt@wir#3YP&Gi9Pe)mDv3%MDExyiC2HXvfY>G<Wx+QuP(?X<)_Y
zoEM+uE7KS*TC@i6S7YvcgIptxM>c<HhIg>xU=b@WEledcmLBKK6hF0lRu!!kWoHAn
z`cC%ZV|B%rj~W_zRLpaTV2;Z4tgjX-@!BMvZUB{X>TkfL-z#)zc#&t(8)3OR`CtX7
zs-Ng@q%4$*QeW*_?w5dCn_BrZhA%5xl^i6O(HkxBcSiHpV7JCWNjLf2RCkpkR}*w3
zXV>OK0y6f;G<eUlO`oj|tlAcJ4jYV=!`jW(ycbR|^k9it9{BX}pMMsl__Cx=Ssbqx
zq8I$w_6WaMv{oM-;BV{x_UpNRk`A9Yw~}3tqXFzXI$q`SWop7vh*2+#bp|zP4L=0g
zMLfFo*F10jkQ~~8_6f65(mt9DY(c-Utl*+aiWHx7b_>I^qXbc`Gp)dE)G|G+Ci)Er
zoCK*nV*LDuHA=yH`|YUfm<!6tELGinK&-Rm!eVA(rCXhY%$zVUvyS7g?q~aPFu_UL
zis5X$-WRHYW+?7+5!GWEOw+*bD%C)z_3>v%qdV0sCZ9|j6+)MJKx3appX;fr;fb=W
zyqLxn&ZLZ%KyU6Ze>-th!?us`c^7Ran%MTLM>QN@^Qknf4g7ipTknQ#*(lIVyvLPi
z36?<X@l~DS+u{op7?DrIFJHczDKmJg*Gn0%LzT-(w>BVJVi9q>D2PPcGcF`>Yx(W>
zb=Kan!aRMYl0TaLCGU^kwmNS~9|DOpuvOdZ!7&S>g&La(C~0x|FnaS7b+v7!kmTS@
z%iR|wb00tW^&nLcb9<pb1DDQXOXB|VUYhy|AFCbykyl?<iX&)9x{wD|eV(S-z{<gu
zo6cS-gG}W`^;48WJ^l3V&zR^~4dvDDQX~Wo=*`S)n9Tf)CjRzVw?QV2pR7ZQrAWTM
zu}2@0yZCufnv6(7;Q6d3CtBE|c!NjZ9!tbnBoJ4mZ3?AWkMu|XPmJX;8MnStYIszX
z@ZkR(a-Pfqr&?fu5B?2}{Eyi+NTAE-PrU!9gp&nrSQSI91J%EY+05Vr8e{C5?tg<T
zvaq{#ba3jwvF`sNj|V`$!~gGzBL6{bWyI42yM`Iq&igAL=Rcc>@xM+D`VSKlfXL5(
zN!I!Q-5iqtH&{1BBSJuE2A{$H%&Yn{yGjy;>_1GS`v1MG{tpfp{C_>n9#9~qV}7ur
z!xKoO`up$$Sq?NIAR$ya)8HqNc131VcK*DxuvaG~xYTG?iom6Da1!q>-%6JO9>TM;
zH=08f(7-?Ihq<ioUQs6Qz`DCMV+#Y*pU~kPyoLlyDAFrqce&|zR>Vdzkl;S|Ymf;y
zA$skSKHbyY9|Lt){En_U+57om{0~eGSiwtfTK4E^Ny2CV>!L_LqiDC#L$`RY)aTQS
zuW!+PdX#my>pnwt)m3_>e*wnM9;c#~ZlZb;o;>LgNyJCgvQLiUjWlrK7127K_LHhI
zsO><30j%=L8RQ(1y_R>$-^AHD)#7v`DzId6_l?LzA{>S^?B?_doxY&OVdQ+TGOOr)
zQ_;L>Ds4%GyoOmKwXKHk8aD4&8(b(pXeG$;?Qu_TDe4De-a1N?9c0#e-b~RW*m1{N
zokgbwQt{Gmvgkyri2-=jGLul=iZ7m@4W3~Yp&KG8XrSs!(XLM0!!(`3XGiQ3`bVGd
zh<GD4-2MIL^3rmE{qYZfX7DdD6`VCHURB>P(xx@6=i*|bodVfoJlh)Q3M_Or)JBd<
zE^shEsU%_PF||UGupfc4N?nh>Hi?pZ3C+h8ybdjzo;>>fZ`#q(9h3__543DXHB|7p
zvG~r*3;W{EYD&1~x5fN!U{7M1*P;M%SqhwUu%G?i8nOT;xQqUML+hyWNMAToGnqB6
zssxIAH%%%yLf|aZkP#)py9)(kS(8XC35hoG_c@(o?>vi)Y2gF{-?5K?ZSlRsxf^uB
zH7T?oY9vN7tLKc0uhaMU^SC&Hh|*P7V8zNVUPDe>JJ;7d^zU2T>Qp9rz4DSpSl+{9
zTP_)doZHHw1QB{6EcOaW6$FyiItxtbykX%yYhV>J^s67Mo+p<=xNa06Yg*<3n^&fO
z-x6g-w=wSOB7}@Xx0exlo%&9f7dkM<T*Y1vX5c(;hblX*V`s?RGE0$hR;EWj3nx(l
z<f_ILMWS`x(;lN@i&DuSnKCz!%(LMrwqs+}{Ghz}+*AVQy=<0u+Gl-5DOmXZZt>i$
z!)PpR=*3N2w{x2Pj010xnDOZ5@1g6+wK$sRE5c&3xvbAN?w{XD)Vq_Zr<yB;a;?as
zvd0i(v%2_xG%J?w$jS8yP^l5eDsXU#F<`$`r6f)LCT%e-R<2%VRKypSqO9iXvM=j=
zajEufWKO}>{~71V7nQer3gp6Ou@70_g<V&VJNi`js*lfKIPqQ7-peiKDdzl^DCcvD
zPW`3cMrXLntdJeWe0K}MKSG^O3|AA8lO4kSU2uTs`7RkPwKkksx>#~D1;U!D7yJR+
z#g@v}`(>>KD75msLe{aO^%QZe>a3!WMtmX?3*v79ZPwZfM?ukc>{d(IC%)9Y0*A^_
z+7L4-p$;KsZsANJ)(XU84^7(2t9l|kq7U87BV83<DyyxidBW&Ej!x&F$lJ+(5>V5$
zDqn2Y%^OKt?IxwXy~`xlIy@#;DRexMcoFDX@AuIX{L<M88b657qd(&E_HZJMA03UK
z-9!wHzS51RTzwMQ^IG{#4kU;+3hb;WDKafW(&!m3lGdh(^||I&zR0V~O>QgY)U%q~
zfSuAq=CZO01vc^Q=>{D56*CyN`AmaY=m=f(H+VlM<XhMC)a%+T>RWDCh&s!wAqXgL
zo^HENA{E!Y34Wm0calq*kDZt5IrAL<^)^-7W#s%=2sGswlCITSnf2>^Q~S!NSWPa=
z7KfXW`$b*k`;4=uG-ynv5${WbVo4<%&TvS(K(@+uR7)dN7g<T`aG}h~0_?Orgck)p
zC6nn5EW`ha;mnZgC?_nf#psc<#&zTo7yb6!`7N3zELCbNb*bAlbeyQ|lhj%ht{3zv
zXvNq5xT4p{X0iX$&J2`9E|^~A-*@cd(=d_KJt(zR;EChs0&WzEobeJ@1vbU-gg;50
z3Y;B=r(_a4?JUJukbWcM^1#R%p41)mYPI8_sb%+(MHUeO=^M$|wdK!>fB{#&w|Qdp
z4kqyB{n_t9|BWHC&-qr;s_SgxM(-3aHsysBPcjM&OZ&MedFK-bk03v^-h0r~FUUD6
z`-IY)JROw~OX%W{S{$m=^jn2&yPZA)YcU1BlCoz;#H(TZD+@FMik|R^aH#N|^_&*M
z%mOoz!re=20%WHClkfbWIC1y?>`RdyNkqxR*XUdjAvG3j1V}KKMXvD(Kmfg~lSQe)
zgNR5%3)c`)h_Xb150vm{U{*4UmoWGq@Bs-Fhi$Tbg#dnnAcOj!IjU%$1@1f@P48JX
z4oqtARF30H9p&mgH9Wg!IrJOMmd8t7_O<`2_Ce1&;15Pp?KN1!RlUQub7!qiR^o7C
zppXKnF29ekdR2fTw{-gF;#1kA2;{GmdZ0NX3R;EU89^6TF*e;B%s}6r-#r2rxv^@n
z5{#TcZ~x8e()l^Uv9vEPPRBpm7BijMa>}2pkP}%bGKq=Nw3l*;*>JAeJr^X&<$kSL
z&7qRFg_cgotMpm5j}g8*{NsK1r2G5o6tRaZjO*JAd$TqIS_?(g_#!0#@?PYpRt7PM
zeQO$Mc1$;yp0}7`gw>lA17c)((3Y87!=A$SR%46~uc1_R1H9iKN!H#y;i>9<n}5uN
z*l_lkDTe<_|705lDNBE3S@iNtXQ$3BvMCAtdHKcHzO>JUdx<66Bx_Pn1pdMa+mn%p
z(dEXzhEe4D9&{K#wDqjcA5M5XC{S|5x1)9$pC!xk#Iw;gGit)ijwRj^10p=WN|y98
zx2>VP_Q(R?v-3S`(wifE%tyb^JtR04S#xc4V3M)L(BTuaa9Qi+fS<fJnsy&3rolTp
zN8&mj74ClJ<o_%bWfU`DLZUI*C}GEW<|_VcOt~xECqUt~+nQ%Bi2adt(ad=kQ3ReP
zcg}39ne9>q!5!f9nXUK6bRx629N(mC@EKV?O64@{^+0+<r6+u}N@rpEA^MZ?U<^?Q
z)Y99qf&!tIBSsxI98mfkG8Svq``OGkNg9awg}IvNhNVXP6q|zIU3-LrNA=C0TdYs~
z@tQH9lJkmBYC!$AiFdY=N6Y~4Q3-g(da$(v$JlaGLW)1D$}++OUdavqd~WQ=7>>U-
z-{7v2GhVW{Si&WygVGxlz>vDt>z*?IKJjs|<Hq1^>fe8``kn6hFJ>AOqJ<n#l6Q6L
z4oqgmkn!~*qknBCL5}S!PAnuWzeo-ck^wnaPc=9Rd3z@;wY~MOs?p8Oq-k+4v?vvv
zwoHxcMaFb}&LQODA%@So;f+ZxvI3t{L-X;+T_GJ5$Xx37e$zQ<WoxVLiF+9ALwDQQ
zYEfFFm#nWxL?KvE$oci{+NrJS_PKNn)G{|#12`E>`+w<V@c%e5<FEwodkBqgT#ql{
zgdAeN!Mj+ass}erH|}011L$7vPdG8LkFH$S)-Bwwgs&HY)CCAcL<<V-LuQ2!@LVs}
z0Sf>kL_~}dB(7_7JiFbc>VeBi`SKBf79Q-*9hX<Fd_O=+37-J}2^D-EBN8t5egyzP
z0|-MQw<o^jQY%7%a}UEvw-ZfAx3e1JKUZ#h(k2#*Ig<NeU%nY<id?6l^S&M6K^FHj
z<G$|JHVG9G`HKZok?>CbmIo;M)otic+Y<sqhUQ)UL?~7e?28vgXB6a?!x(!R@d?sn
zS4aUc^R2p)2Me&wO;7frb1)1qfZ(p<<vBANkgVB$w}m9+8v_w}aqG<CAnqrXweSQ3
zLJ2<xq5BM(ZRr<d1xKI~8CoTr`F>W4UKa0KjsnYs6dFr$eD_cOk?QfiW|&v-ktu2u
z0x4suPv&6uqOz^9x?9o25=yvz04~Z6LFceXJAM!X5#~$S8sam~9RGzxl#K23mml7X
z>Gx-JRxb6srlJcTHcP<XA)@#MP=brxM0^lEi{F$9;<3BTsiK?C?sebnS1$*hMxqiP
z@l4JkNPz*sk6`+|qnM;uJx{^E+|}to54Vx4`jqguj|1}>g!?nQZ*>TX)p65i=k50D
zWD>{y+!t|lFuB+x8~B`)Yj?CE?7+D<>?T``VXcJ5Z$v~85rfBPp$BqR+U|eL&la1N
z=8PP273htg_ZMYem$ZEELi(EkE~ol((yNvpA<m><e4jsOR--HK!or|qT||Nif6_2<
zqu~sq+UssTT-@5nVz^E%FAh?lkL;1$GXA-r)I9VAghc|#`7Qc~%Zizf@rpRh%$&pD
z9Fr=njmN$x(*TAA(eD>1J}wBLI4lF0h>RHafy_6SSH@TT55KB+4rHjC$jO3sf@^&3
zu#Y~1fOil032@p6g^1DwfzkvD1p(#1^rqg^>s8>#0-iqpF2G;(j~_rciMq%>Zhj$;
QKPDkBt@5f$(j?@+0bu<u-~a#s

literal 16974
zcmdVC1yo#1w<ms@MnbRz5+D#D36=zR3vh!a5G1&}Ly$ml>p*}IEJ$z(?(W_Mr-ReD
zG}^dZqto2)-u1rs=9~9s-mLXs|EaD%taHw;UAuNk@7nuU1ihDkLvWYkE&u=o(r+b{
z000aH01)C182v<7=%^ZfbNyacMG}3Beg^=80AL1y!2lQ&0N(|`n}DDoAZP{%eh19Z
zxf%olVPIgO>267G6DAmZ_x6H`3C7$6-@OaIy9wR|gEuk3o9Hj_*BeZ9+C;xcUobZ}
zad2?%f`Pl}l4$a~n|C)i@$m5Q@$pGWNFF?RKtn_G^yyPBE-pSkKD0FG>TgB3O=f~-
z==@#KtXlB<cfs$|a<|D=PA*K&)>h6IeJzj+>sD1&)zQ&0yKM%#0AO}o?E7uG+w>j%
zG5e0bR-1jFHmgSG8+7^G(zhwhHmtxltlPF=IW#mh49(XTozc&_!wQzey3zUOyCCpg
z5Y6tEBbv*t6t{n>zgMI4^!MqT`1tq&Te$*T+k!CLg6`#l<(q0VpxR8Z`a3$C-BR7A
z>FQ~8zNx;MuD-eH4wLH+v+XXh?e0dGxaq#Rnf@*~{oQQ38lAsS|AYFr1UlVJ-`p%0
z*e-X6Eq9}N-)w?`TTP>tdKbKjRwY{ZXf@wzbn^xP&~>A^quJfogD$*WaI@Tfvy3i>
zd4sO}&#KV;Zf<VeO;OV5{>Qa{tLX>;RDri&Q25HeDF8eHq$OUfxF&5UhqgRccbiu)
z_vdhW7KO<eiuG*YNsFzZt|DJfwn@fjKrp*Z`x~58L!9z?rlo<d?;U@o<<aNgziSx0
zP&v^mFVohXx+zCGttPom#~%uE4IFxYm~CJ?y<8O-K&70<b4_QYrG<`}m9YT?1bs92
z47e-rQ(}Y!@EVCjh6bfR++nAf`bq$j5~nPC3bnAH<;5f?uxSqfGSWgP{xxwQ7~0@B
zw!qY11aoqGADV{Ssr*MVY05L`YgJ<l-~9*Q3+}MDYv8DcKD*ngib-x%=$9{bA8Y9)
z20q8wYt@Xez8@cg0?0Ri<||6H)_w!TL!92jpQjt>NJ5@=3g%ipP-HI-z;xwJoV|E|
z0gn^d4;rb^lv|`h?s^}{9qb3aIjB)6U?c1}Ki_KqOf;=*SMKHQMAf|2?n?de<Y}Pg
zje}bCGp7cnE1Xxc*KPx%T!2PTsz-xFsk|zxNyYwgCaWA9|7TE26`5UzL5rqISc2>R
zNz+j(hHcQqqw5TwF}esd2r6(~8_oG9R)5yZM&Hqb8suG&RLumL=j@{wg1}u*lvuo3
z$R6Y5A#trWi60}>eC2$vvJ?2UlyfI>SHLGM(puVunw##3Hm;&PzIX>G-i0m0YoK^x
z{619XSIfvIkqszCc;;f)CBNW@@6wZF8L>jd7b@`0l3&GG?<n2GgP+QkqG^osl%2}q
zUkST{xMZ@OaL(%c&9(z8^KGP?R>D`{RYya!6vszJ)vW&USLNMV^`k66_6wgij=At1
z7q}D<{Iv;%OOZ6^)1s_XM0zXi3u`RKBf7EUF@}jJ6P3kLHgO4Ok5DHB-;Q~(wu^xl
z6r%7E;<9aXJC85U*@^V{BikXyp0*XM0QQ;U<lad?JtZVQNs$3}s2(k|li3en5>L|e
zPukD%eZ9nYTULX}1f+0V(tgg~HyGo&(GYiI6UmHZ$>Y=5-;X!&vS0%$b`I@QPr&Tb
z+Z@-^8NwHX&OlASXJuY*OYyCIvBUSV80R>LoyHPHBgPqXTsw{_hkGtWST9fxk*NDu
ziI+TmggjX?i<S8a$wsuQDg0M!BG(B=rXo*q9v;E07P%MRECUx3xSXhkAWDbF%q>s{
zeubtjb6YnvonX8@HWYk?U^dV-*nQX7DK$#8d6(!2^g?d8tR?}dmJ_bAehq4lIL)n0
zXEc7%Yq4SqVrQcaQ)Zj2>IPCH#P^kd<$2IEg>Oa2=LN#0^8-8h;Ny~Fz1?DRmlQBs
z`j1W`3(+TH?=D?L&%X<bXA^19J)lWJG$A)TkfxA<QO57)Qr6+^MR4FUw^8uKjNUGI
zU@~)5JEw|hQk&+Aie7O%4>`sc`=JZUXtFf;esn``6@Zm5@E`XcWABO;yh}Mc5RuyW
z`KTmJgUf9(%0s}TE6Kyc<%(~DFRyJ}QUF1)L0jl8sLFq?7_UUX|0+@bQbZxCW&gX(
zl-)kfDV(8LC)+lC-$z5GUMuqeo*95?Qmr2@7<ByH?)rMblHN}Ah}@c7lujh|>csYR
zpdHTD?rnYwn`fq<0oWD1>=Mtz`pmH6+F#0IR;U~mABH{HPKP(nIO$1o%IflI+KbsO
z-@7;ez922o&0eAOF~U*lX#3*8F5kyNJpIYfy0qnx+=9yXo4oEyE{xScSG~Eedl~a4
z`q?dC*<wjV)6l{ly<0rw5=a$<nu<D3BT@GXLB$w4_N`rUZgb5YZ&HsoXh=%dO`DzS
zy$RB&4I<9xc%7nj9LfoGSlv-Z;Fh^znC^fRVlK}*#$5W$$-w!z<7dRFNXPM3mcFFh
zK-X8SjdW}nmDh8ct}!~1C90Z0&Cm{F(LTkTuMzDuznMbjjpmsdSshUBeKVrFU|~8D
zk*Bm-7&<3hHD1&K?<obW0B>$K%FFG?FBZHxoQ~d&Sv123ql$1eGMj7UX6a%J$3I(+
z_DYs;&ub)mZ{01`+{k~ZNlc6gPwg*h{`wH-L`qNlFumkR8ve>vBiU)yDf;btUv_)X
zxQ{~N_+2Z7Lp@n}iVIFVZv_<+_52<O)@C<%H5&sb2+VtxVSJQ12Gc|Pk-@Rc*z>vf
z+RK3j>Njc}EQOjZ(1X(^n~e`V6Hs`HS~UL@^;%ZA{>x-Jf&H?}zG2ub2vVf1F8hN2
zGh^ArgWa~5sh8uFm%b;%$&oiVXF=iLoRz&D8OcYKUoz^+VzLW$5R<7K*bT7-xBJ8%
ze|;AO6H`~uXmqQOt|!iW=F~SZbF#RBai9%43rG<ns&F&9zArBO^xMr;CAKPFX~8HB
z4`ST=(F?ol=yb+JMFB$QrmZ`rA2<B-uo%ynxhYxlccdY^(<>cXIA<YRcQ*i5rG)jM
z*fV-D^Io7Js0O4{Q>u*-=c5OzW%x2PGI&V=Vs6>QK@jFq?px!s6NGZUei@w77;eBY
z?kvM5gz+KaTpo3ij=;o;15IRL#YB4^MdeTeF;r!ISP;&AV*OF-msL=$#cCGz619eE
zs8Nb=CLAavS*pkCZy4;%3yxo(GsE5EQ6ub?43Ceqt1H<teFGs-W>ZqbledSUOyv8>
zYXOar&nTq1%%KcD#HC}DK2?boJ#h36;j_xG=H-`-4T>EZO0Ew$>;?A0#)w9SMuz4=
zCw!epxTu<Xj#Az==BH{xGDYudKjO<O+hNoyZ{(OCFD;6%W@53D30r=!L`EdUHff=U
zF7m}X%j+*i(WiMZ*70R#?xy@EOzzVbi`sSxr$-1bH?L1}V`}EhEuRvxQ13M%#7hRC
zz1>t&*t@L?oJr<S^!p^erW@IWW(RIpz08%X=C<Y-#Wykqzr|AfwQFjYxuXImGB)5o
zxr|WG<0i?C@PyUKV|ixc35Ox&xXkV!dYtfQRVT?BQhAO{WJ#q!OOI{3Yo<5VS#&d@
z4)&R>Fw`?0WnBI)l2M+_xxMM+*?zLd@et^`DSl?Km2yF5v2PQ~S6To56V@k4;@D^L
zo%!w}XR5dwyKxhq?5AoKO4H!mdHd>k?t+h7-6Mfh;Wtb%Yb{xk)Y~;)QGchtUo0`Z
zzfj5kR|yztUF8r+EE!<vx=ZU(hm}9<fBofhgcF(-pZ{wA063d_qe0^Ja+hr6v0$5v
z>suk!#9D{=dfgGu!ztMhqrb@@^Oq*Z7*lY6E!^VSAf5|3?>7+>T4_(ScYdVP9D&i3
zmQP{!)$OFs(~=u9t~t;ZO+KB9j%}dcgi7U&n@eYgKIZXAs~Y#eK`}B?M~AJ4SYpPK
zluU>VK*wLECg(HERg!7xWKhrzrI7*^qY5gQGe44gm+t-2Iu#SGE_hv7uU$t3t<KY4
zj%0zlr#+BV*uv`-Woz0ZM6V1}G%K3K6bK_3otdmdX*a{12};Iq-hRLDI)m}n>8wX|
zg-k0Zo#KU7+J7)d**#!kr$LBlc;>L~U)p9S!1?QfRHq(AxR>E3TxFy3F7v1Z?~Qr#
z4TtQC7C&RyC0iWG+`ua}-Du$+pof_o1sVMKruQ+Y<izd%v@MXBEnlQ%kA0vbV@f*J
zG@ENJ>gaa{wEbrm*)!-pV=5J%Z_mlq?;CtABh06ed=T<ah93Mgz+BRrQy`ZB{HJvP
zr9rrXh0ynOtE%5io%;i#t@4*eDFQUt8=V}5-$$6i$rB7-VJ+w5K;|1<7Zgq}PFot?
zNkO)1e_5jLz}dmZyQC%2mprXh#hw37q$@ciuRTtTnRE(ql8_vT&N0rO2U+S1Ib)|<
ziqv9WON_s5(PQkr0k-1imp%%0n%Q3i0>&n{faXRm-80zbL$vWsI#CETU(DaMb-?{^
zblhvieW2#%8PX&Mc1-^;V9zPRH)8AJw9toti`!KcU89zzSxBh9Gy-RkgZ!;RYEZGP
zxXXX2-ic^$R$XHJ5y)2g?^aC)9T%REfQtX^0bbMjBIQLxNinM@4#-yJFT!(j@cg0+
zt?qL<F<NN86}}vM3Wft5MmKh$|Mbjzq3U4zKPqKE=<$EvxBq3I{c9use?4SeD&%5p
z9_LOm8a}zpo_ojsJz7au61dHnh90V$4`d}k*bhPI5hh*{`@A(afv5FOslFU0xj~`O
zgcL?&nQGOg2bUt`H5O56;!}NfxPi<!GaAL#5-*Yv-~uiI@z2e;ef(Z5p8;b_lP7=y
z<F}+P0jfS9dw7Vu3~&1%k0g?Rj2Gt{ntYN=YCkAMj|Y%hdcS*!u4-HNT0(8e@}E>8
z03W&S@>;>|>rU26{lE4pABkZVf9_MBLI0%u$E=v?UeG*-BK69>;)>meBp{&M-ONRo
zx1fmMCwMpm20lA_`=c#-%zex*p)PFs40=0Ls<y@Tqi(>T;IV%ZOp6><U5fmn?)7g3
zm=jtgAne;6lMRg#+0@@RMX8H)F-3nD6YVsmd-tc7{PL;K9`iX&{KepZJ!k)${ThJY
zAri1e8{%!Lqm@gp0ICxVV6B`FRDJ#T?4bfdQ)tL=|K9F7odFl#23&vd3E{2at*dU#
zuVuD8U9_Z_wSMtP6asYOZ80=qWRo^2J$n2V3ncP^)GZ7MXCC8C(3MCI*SLr9GmAn}
zfl}%ab!~8!`CqJ+LVbkkI~9~55fe4HITD0s5ek!>v24cD`JU7K!fOaoylRRNsFoJJ
z2xO0m>PR_c1_2&wJQo$;0d38|f;=xWJ_r8ccGgOB)e2F(N&hg6QhiF*!fo!`-pyZ_
zmvbkEHH0#asr@+`;73GPY_w0I#ppfmq7>mkey7j67cCCPmeyZ7_@_DGPq@dRZRZ!f
zW7PHMewHR5=c4Y8{odmzPbZ77ia7WvF}Bo4{Wccj88G?n2|q+e1C7Tuu!6~Z1}*73
zszQawPoRd5Pu?jX&|tZesKip-lGj<q&XV4-AAH=+Ybo`i?zncSehB+cX%2xM38)t4
z-E|+s6KU6S;}?O^7y*>rH?V51PEx=}Fk2R{N@49a_?(=3`&^(VKRDmiNa3=xltd$r
zi5mum!uh=9Fb#(M<#Ag=;YnOW)X7hkAtk?eP($86L9@XUK9uxON?iLtG!4bU6Z1CX
zB%ru)d&`(=6~|(Ui%$Xgpyr-ZFXZJGZAr_;%vK%;#_w+*63k$x*-ez$0@M`HYidu<
zhmaR)nvvD2j$slWPPauQy0gerFG;UruSEnQZX%}ZW%UtlhfQ7nPoa8!BT`{>)_wGR
z>00J%d#m?pA-kTTkxcB(S2|rHM+??OjUnw8swJ?~5z)Jp6wnF(9V4840lxJ7w}E}M
zQh=kGohYA&fv6G0?KoQ}_7rLNke3_sk+>k3>iLs?&`!BqJB9%#rnluN;MgZNdO^be
zP<8h%54w*{thXiVcEnt!UKtJfH~$KNW>A6A6Dp1py#N>#!IL(n3*{5v$TF5u{~Q^J
zo+;}WLnci4pA=9?jwV`Z^B~<H_0U53P$SRvr{+=TAvJBv0QnwW%p3HYvE-~eN_<^E
zSa~741>%ixI>@rU3<C^mVQ;C?{t)>#Rl6vS_PMLh;CVVx+nfC;(XH-Xasay_qAkPf
z!B9}`hV`SK--P;Xq}C<q-@fFqf)rkdC(yBc4(?XhyWQ|+U>?<pr|R+X8SL%TzkM)X
zAhgE%hTbYqcHdX}7h_ZyJ6jp^p7E@$t@+}8gO&s^&ctRpVPd8}IK-(yKo9Q?<jRVW
z(x8Nr>5LQQye&A(`lH_-G{#HBpDTJxzlyHZ!%*~UytxyqSHo*d2c@jp_H@k3=*A~C
zu(?PHK6m5<XjtitG0tX7YGjSB7MTj*{%nnA1f@!GuRdi-E>7F5RwfUW)H!tI|26=P
z*)qB)`cwzGQ$9htGK?*VaXy0__pF7l0WI}L&I>}-0GWT!8+Ab({*ROWFquFRVd)kl
zf<O*nYjw4dRM7`aXBYk>xp(NLx>-e(&lw|f{iY%+bzHOoZA#=^TwRnDUaxiW0#Sq6
z<?MChvU!K5WbX0xjY01*wM3dr2S+}VGedh#>+6K;HAk0#9s%e|Z(;Q=LcY>ty!|M^
z+ntFWbxPk`?k##VtFES>B`WF~f5VL#H`bpA@Hqv<sUh(o;cy45={(~umNG{9oGfRJ
zF2hoQNy80$0y#V04`N-B^qOytw+Jr|TBmiI5QeHx6kW!eO<jGVX=K)#gB7sFgOl=>
z8RTV#i<OXvrkPcdf+f7agCDGK<{YKtwoFR-gzRYmtTN$9*2)27DnDkN`uceX?-7+w
z(8+qj#48eOpD5wcup4b2N(kR#e955%J|y`|z0$Kusj#9s%S^_Uc*5W9ZHvmUZDU+A
znHIs=wQK%o$?X(4&~!m2;mxXMGe^3qg2hVAI8n9glXwl9#-stGtQjkglA7a~35Pnp
zR3SaPQ|%Lnciu;D(_g5@yq}%6&KBn$hdHfNQrR%EderGrSIk?;)Xmk)duUYaZfeTv
zMb<P1)dl6N!~C+PO41$+j8)1u!yMD*1qM=CwHwIJH#Rg;1&^Q)vW_F&7IL@91Ttb(
zH067yyO1$D@Jy8+7~NSh7IeekqodVdmCYVDf8aOq+=`o`pS}-7@7M_Fm^cEEp4!+j
zZ`AuZW1VVkHQ3uv=P}ee5>k=<&JUh@MXBgU%p#MeIKAbD=?q8a8H`rmIKZT96Y^kB
zozpfwephRXZkT3<5ag}B9=1C2{FL^i@y?)scK8?XgTPM|=P%qu#N+3K$(psiOWNQM
zuJ<ZLl{J6PFr#2RT2+}Z$0Zk|GaoGe#z*v~k@xv^gD`aTZ40|vGv>OVelv`r&#KW?
zFtU7cp4x7NB#v}GUH#yEa9OxoR<2&KZ8vX9H+8R?3d`K2Fy-CxI$hSJ0+$$@rJtO+
z9+SZQL?`||#FRAsMf{qgU6#o<o3_@3#cqS1)JxNfQ&T!4A9106mkCrl9QzC|=<R{_
zU!Q%;UosWT(v8Lwtb4x6HY8GMNaU^_btq@^TLY+0eM!v&ZTP|mwVd?nq7>+z-14Bs
zsc4~{nM3uED0mkC-kpUN<oM`ZdCwO`&+%?l0<shfl19xTqrym>JN7olcvOfGqR$Pe
zT|&gp>XP#>Sb_Omu18B7d`-_SVQGTfISn-}o!7G5hK;5U#cjlsV_J@u3;Ix>tJNK6
zR)GU4;oY-#;EPNZAiS#fJvb@3hr@+WjF_Sr*`$l%bF7WX82F+@{z!KOAEAHMWOeh?
z`=}MhWI3?mGrC~quHO=G$#=57Ie%*Hhgn<Qd4#sT1|HjHZE>YNkdhkbo(Y0qzHiVj
zSO6Cmb?@AgwPDtdF&~<20jKfr@6u*i3*yvH3hIP@#;L~MUuXJ<FB-n*{Hx`vxm480
z+xdXa8$#r~TlClNpenW99qHM1*mU1O^{*9l!+`X>*M#tlFz+uKC%_)bP}>GS`&5NC
z|NnAz=Yt`Xwu}-G?LQae(b$5l_{D?v{kNdvmSp=<K;3~#wk%*Nk5T=db=8lo>5mwm
zIVaA)S}}C`oY*_2`jtmk5bJ=Bce<A8;ixO1CXag^H8qWkgJ;h(UbFd!2Ol>j6||GG
zoB?ca+2YW5va%28xEEiz#zY+G3>@Ip6xDooR<Pn_h45)c#@hy^;6qm!VZG`d;<8=1
zdx1<fBwC=EIpvDkjpvTSauObqHr3OAoU&Q)YCtw?#18{kC}yL%KSC@!@s}EtM1VxJ
zv1GZMXA?<RVa@su$uLM74{j`bTWLg<AD@OXV=u1slG@J1p+R=H#onN`esB?lpdNq;
zypO}iwm1Enuh;C^8-~?-;5Kq#NHZw~B$fI$2*mwCw#ljU_&HRr1~V83-xs^qmiV2=
zK@FKY(Zg&*P-7pzj)3&Wig~<ie=>o2`Bb#{f?TzZSs_g{U0~TJ>&M(&A`(Prpo2*|
zZorIxv9^@Vp|Ve0zG8k6L09XqQA&d=c|^j+XB$8-IMB5hPmL{=?AdkZWSFLMBJCs5
zvbPUL>2ym*Bs=Ae-x3*(chn2(7{&p7qNMLIKKz`zQP^S`MH?a06Bs%+Mg=%~RS&Y8
zfmmC*Po6>xTCdu<iroINz5X)L3+_CBl=_);otPfOJ~DINH%^lzgI-s7q@>xG>ORz{
zv@2!6BHe0_Z)}wsan3%K8mnw$RHbLG`v*5AIdt(UM7r;@cl<CWrAf3I7Bunb%vF9u
zSTF(4mqp1`KtH9hkfsfv1X2A)+&sX%Sq_ZI?h4&dFyBZ;o6Vak_qOjDxH0bO_n9&3
zUk2~`+zim9CSN91Tzr1VQtFJNL>0P_fmQDl2?~pYM1(}Oej|Hk@|_0EYvJFyLk$CP
z?b}wggjLOnflXt9sewq%bm8P4{)J~Sr}SBuH2;VI4cnG;>2d7Z8**1=v(MfM{F)U%
z0;S4XkA^O{lDMI7f-5h9UA-6Ig5{14#zjZ%e*%1^R$Q+|u^@2YZilx5(``GANq3>g
z1$~5!Wwp9W)e3r+{CcAR;()o*8}+H5Uz+#IF>lBs^bY_nUc*m-QM#I)HD9uy=^nR;
znrkkgU8Yq+A(6$r!RvEaFVHjobdy4g1k$mOmG_uDCg`LhgifAudG){>;ozU4-yB@J
zY5ASw)IE9dzP-bz=<kZ9D6PoILw~6ezpFsJQV)2-X`|@X2p;rk*}_{-_hmS8$ZL&F
z=FOL_Kh7FwR0aF=cpWTi0HG$D+Q(Yss!nb%*yP5oeYY34o=IEK2wLx!R%*=JXRTXM
zA%F{?>*{dUPrVk#v~*>w76kST`Ti2pMdqt<7==|()?J*F>AIIlLPc%X^^azs&feV!
zu$vAtZtE^BI15bx)2S!+8lzWqr1LMJ(|TTDwX`WN)kzwCi>|?w%@p$R&osGLv(yG9
zYJ8S0vyr*XciMW=ClH3w?mS4Y6<5vKCty!kn|8g?D^B9w&0dDu>Vh$K?v^SkHkYO;
zc5#SZzgg-6cwT5exlfM*56UAMI4l2_Pm_(*;d-LhMAgB&&1$of;mMu7T42s*`2z_X
zy|gaZ`W=LxSv^@o3e)*InV##y$Ad$z*)u8z=w*O+Sjt7S?h*u>6H2=!w)?HXEO5ZA
zsxMQMtR9%46PE>L6O@#O4J?skK%FGt2vPR9!3Md1e#YNBV<?MzIDMM%2UkLSy0n(b
zSJdp=mh-u#E$8bn7fyT(M16XOZtTTzXn?&Rw(BR@+ZjT=svb^ah2dA?0Zu|`H^gdv
zFRto6ciFpD#lJ@L;DGlgcpdHteS%AQq^+b#x8Z-rw&%&gRw?wd{xj&<WM_8PiO1Gl
zEb=3ADwx*2@Pq2VEy%6gUrsOYgp*aN|K%q6C+9?K=;wm}%4_uwvU|CG>H`51b2|qy
zmtH(k4+VLj4(QGA+KGxL_U+uLp|~*5O8<7ZJU}pg*gz?zN?W)BH6Kdi<8o}!(N3?K
z-}g2elm4h7A^tEgAbQcgxhuk#y(DSP-4s-9V^0;46EjWCh+$uQ=zuXhsF3RC<S0e+
z`=g@@jwc?IOcozR+m7QA+MmcrEel52BUdopGQ(VRsk&+pxyq6zoSWvRa>R%=X=sGr
z=1x{`vT%{bQVwO3m6gyIS7DCGecnnR9T0pqx^v>VWhf|5W93rn?O;z!A!PEzr@gX-
zlpnT{+VIPUnWglq?^G^b&+hHPk-=$#ftJWbQ=n4Q<f|W%_@DLf;@f+lf0o>vRDMQ=
zdP>v`$hVWEbrF<aE!j~>T+I<b#y6PGP_1X;iIXEcze|Y`_!wMq^5h-zP0-|P?NQDX
zoea8&F6OdLhxy0RMB*$jLO=%2=lP5fVbSO|9;h7E{foA~`j<TMDCHOHM_lxLgUp}2
z5A+lI$%5Ui+`kP4fRZw$UsBh~rv|Moy?%TyEpO_-0Mf~8<Gj99Vbisk5AV3k6O=V>
zN186VqaJ2x#dl~*XT`R?>*>WSH2IOS%aE^EUvb6=U_T>0dbAa^{?xybKw%giHzXLz
zQ5s&7TsKamB4ym~woQ+28C?|RhcG$Cc?KlfC~Gold4%|jAJ&It>Xb1-j{UaQr3p|R
zvVk$hA$$(^JRou=$y;YClh*(l;R9p+VL;hCYIHAJ>?5(<FCd#S!lq`@SLA`ayfv12
zQRyqOoQ1}aR#3WdVj=+0Y}{f2bn*<pRZMv@)559gRt7z7m*1C6NRqinSt1w8q{md2
z@x3apG}I4^qUT-r6PLTTMbYLd6>6KnUNQIEu!MUHo^zO3q-tu+T!*XDx-W127W3e?
z^J^x5ENSktS3-@?Xlb>h)iv?azsj>DyRg^~`T3jCVSS^)#axFqLT^N9v_wBo8xaRn
zP3ENDdDgRHBX`ld0dA(0exV|1`HaP!(;WHJBmnu~+f4k39(QPmvs}0CZ?a0GC#(6-
zdxCvD+B@%52ooxWTFS-d>wK)`@M&<=*j4cFb9f}3QlB{rPDfOzz7<hkx^`8xb*UFs
z8Uqlr+;z(vZiYsaQU=DCkv9b8!CA11Bst><8QTUrX@)mnW-~HSzlQePlo)t@tDSSN
zcMaTRHO<-CvNd~$`>oAjGpxbqS~CikNH#@voF9bW)&+%xc;%LVP20g30!ANf{lS2}
zm;D0d2=O`Btfx6Yq46o6rii=`JurBx7H48C>pt{}xXwXOBU~0n=_I!2EN!LAi6Ot*
zB6aOD6>JvE;?*N0`8)KpQ`%$*MDKk$!JCN~))&1o^TD*ObWo!P7(c*pg%qIjWGSCw
z;?*@DkRV|$*O475Z9Cy?bvC}9NdEl?;BD*dGaecpIIC!7-5k(5uuA9c@FkD(h`^mt
z^X9h_i|BLO>Ee+OAETMW`uoW;apiTKkaMhiv+KzE5qo?*gSyo$nxeQM!Y{gETUlSW
z2+N0`Hw>cdep^5IBH2fCFlx`LWWqHAA4emGTyXo3yROx5*WC`?V&I7#lW$LN5)V%=
z*ZO_poo2g+zy@=$AAy?(kB%ST(X%`qVCp+))-InL?qwB7py@+8ayIuTRbr>Fk=aE%
zOXA-}gsyExTS*G)w_TO?M0h<_<YsicivM~~`_AaM^PYKu7cV~$Iw@+u{auqEN&Q`E
zVZ=-7h4ysjP36G-xDv3B-d5UWj~g<Fq<1abh|j3=Ro@YBU;o{hYHO|hVbtZ8r+nb}
zaoM_gIim`N$jcE2KMW21!<S7hWxtQTQldG3GO0a0GeUK~x^h=!Lp2y$li^wQpLBgo
z8f>t3$V|?1G@bf67UE(g{KL+-dGXv6k&X_HJ`oVFH3-rpdm7qrxPO*O39AhLEGvKv
z<_pBJmlK#A{ZTxJ{;lT7N>C8XaYz|1LV@^Uq@G;^nt`WZhv%|WTIr@qd`mPwi<ZjU
zR*-1{m;G*Cd|cfJ(Uv%|c#i(|{gJh-O1gVj8l)A*y;!_k4}Z6DJcm&7@vg?3L~L4R
zB`H`HFwt+bgrw!tK==w3-mO`^=aH#W5?vh;{a}lLayItOzQr&=y3jsc8kt%X6w@fD
zD`842Vz+@5-HmFjU6r!=N-03W@p8jwNoPDj5>=hvTiK|6=v4cNK5ioWHJon9s`J~A
ztb<G=zf}OlO7SJ&+K=)J*1LoHwP=Dz^AjJ0l#ov;fEZq8NTSQ^%j1@X2VX=uG?k7<
zfs2IpUaOqDcj0rmW2@^@A2JmhD(SOzEd)Q(cRTqArPT+Pr!WQ{YF?y&DWgvQXgFNF
zKDf;b2A{ou6Pl=4Z2ivfp`=0$)`f?R`1H!jLz`X&j=Tv=s{woB&ATlTpD|<&oL>dO
zUljJ=V=ac|v%~RCrlw-jKr`@j<T*%DlxTIY`bYV(!$nZFiD`JG#hpDNq<N}aGU#&W
zP{fvTYwpRXgL2i1TGqo~DvmE~nXJiHvsF&}j>%KP5V-Z*lM_vJQ#0~s?I^T!haWY$
z?|pq;Lqg3>c1P%|)0HWIVc~3CfzmA7_<aP$Av?wv+OuHS4{MWbIM@UkkO>%4T30k*
z#({Q_To^jMv6PX_wq|GW)08Ji-nAFoP(7gf%>?UMb}Km_)az0T;^g?PWM%t{a8Vna
z9Aywo&s)YzMlA$w=<i3zRO+%^karL*!Cstx1ix0xs&P9pft@(e9ecz6eJ6~)<Xvpf
zQjd&B$WY6|ZC?&th>$4;26G>{*$lWjs!({fzi!v7zWZwa*!35oy7AJtb&F9~gbmL@
z^_jM@98EfoBL>K9)pbqV;spC_7KvKsn)mLo-J-#U2Hc@+pL)&C0N!hz`2*r|y~hKb
zoj5w6z6!&e25{%mVVyB5KhF&+YsRv;d(egx=GTy`qvR|zeaJdt*uWtT+Yo_f#iV(?
z$b*75_=M1CL-FP#>o=`&q)?kl3~GbavlE=N{_*zy(03J+;OP0{KD*}-584@~v3_3;
z9!O#ZHb2yRp9dq(&WmAh?#45GmG3dM!MkpZc8t)ELl}}+j>8RY-rpu-e}r-Pf{B+@
z1cll;3&5;Z=ywXOns)p80z)VDjXmgu&oRqt3Ya<O&AbD+ys6bL)WtDQ0LE8HR3Lr`
zYg~KeG`SHl^KgN6d_{y*8Ov3@hdB-iOmi{EvF}=$w*XuUu!!_y!wqD~5lR8CG5N`x
zm2qnEegzi86xbOEN@Fbd0K%`kN1!>X-veWt2fW|o`JpoXATa;nV9j8X2o&eu>bUB~
z8Gd+c+$*TtjvP6{A#D<;%Y_b@7CkGZ*PnFisTiI3sGaENV{B&(nqb}ZBQv*r4X~!T
zGdR2mXut;4`%sQ)$6^_;sQXupk>8MFhsxto9napaTE>*q`m*>AIYgk|(1Q2}+($x?
zlWWMKC>Bx-#A02>tJuX+H85uFCI6chP|*pIH;Y3pfBaKpMzy{u?)ZWA*L9j!4?|*t
znMKe}Ikz!wlUFbqHX<Ke4h5j#VT8jaqywcmrmDSrYXqcOvDJG%dxJu4^wJL7q%M^_
z(@6@gG-I6mJ<v~fSP_i!jF=)Y88xP-5Sa?aK*)85S7-X+1&73f#d*@_rj11bYq*B@
ziPX#f6>ksYp*D`{R$&rrWsw8Tl=L=v;W82FH|3ftc+<xL)T^$aPAo)jjw{~a!Q8%H
zT69!ye;T?E$T|o;#MGuTtejuQdZjSo;jx8f&~(*3U?MjclZ<~z9ae|JIP;55<pIZ~
zo)so-wr9s$;J9!oOb<|Qm?aG?Zlxc`P+L{=3yCJAUL6ZuaF_8TWCi$@1z_*4EL^*S
z$Kv@7gH7G6qV_L_U$ixci4RLsA=yN;-sN?=o_<M*qFb9K2Rzp<lUY~s5HKb#2p?L>
zclZ-jGf}#wTreBI0e3se7)OXSeL{bDSQu$bzerkOsa?oJiNMdGq}1#@Z*D@gr&Pk$
z`Pw|v<~Nr&+l@xQ`6SsCVY=;M>_X!6g$z47f#x1x_*hfJV4ys7)5sfW_HZ-3W8bMD
zB^N2FcSPcDVG#Mdhe$8-w=tWColKE*{h$QL)4tvN9;eL0v=fV84L;suWkGGdvR(<v
z=Wt5vKs7bu%G>;$CbMPYG4IM~knKaGci5LglTsG!=o(vMhSwFGZBZt`bw{jvCs1Le
zFtGl^+lIWQ602W=<il3+um`M*rQs@J>=9nr?odgew4<GqL@8z*&2Zy;g`menbTN-{
z2bB^vojgu|e3;*B<MImgOGd|pM%X>w8FpoZ7u00#$WP>2ztmkTD1ejs*iQMIDKl1r
zV#0>{dp%zhNip)%@gCA7HmVGNSuufoD@f&Eb}U-ROZ^I3p?fh;_-nvIFZ0~hn;Z7l
zU2jtM)%LN!XUd4CnN#GZp<*nGiLw`qW{!S~VCRhtivH%ijF0)f(a-Wmx?bmOr#1K>
zGe@-t<1-Z@<6aL8cr$0nFY;?%W`>lLZ><Qv`IWE43$|r$4I!-Ln!C~Yid!dl9r46y
z4Ty!spoRzZuB-*CSiXtK&Ad!1N-qXwdti0n3*)ImRSFu%UMp;7Bul>!YzWB&B{^)K
z#BLrt*Xh{C7xipzyEo`kv-S9FuGAw{qm|4oS;sfC-nzH=Xj8aFZKPzRQfueE<%k?S
zm~rnTo+}Qn>A@4?!-x-OGQIy~^56tB#MPluk7guNTD*w|c0aNsz{jmS9VF}7i!yB<
z%4HjfND{1OmalyIB#0|rVrrU)2>T-W&U>3Tn)SLgBw1Bjy4`{%LU(;<V~bc^e6I4A
zoJ`IOLxsewFP4neq#OEP;H(lG7*d^s%gxh{=O=zTM9iBQ*ltWQyh}Rq4huJB>+Hz<
zSsa^vDeAV~QP_cK7~D|_)<1;jeo>Ifi3z^Tk}j{ik{CSk>LnG}Tyi|tmOZioX&fFL
zfN5{}0r6osc|y1S8=-VEw#mmv`QV{yZHVUbI#gKEWtSam5U?W_P~PQjc&JzddyA<o
z*wn+@d$?e$NcZDnTne!7OUAFzs$~J4RO!dq{7id0Wcv2n(d{=G_RQ~%*w9kg$=06O
z-Ny!|H$I(wiD6&^C4zx)(oY4RV}e}*S`h0y)mRg$`^nEfJ)$*a>c>PVk!+R!Q8ugL
zmIXB86`8Q7es<Q=Urm=cPvfc{7Sd-9(-^lI$=!HgSwK*Uw>@;wK(EwnYEmal2c<rl
zjICek5Pr`pDX8TMvED`Qmr-mDtBP&;Vl+O%%qbcV25>AtuWU(2?z0{_M6C2d4pThb
zbdu-&w^Xtc2>=6OzpL5U<zZEah)+!3VlVV6_1G{TV;dNL;M14tga+l9L9|SDSW>}@
z(j|QXK&kEA4!$!1dsA|N?LmBv-tJG3ZBj7>C3GX|fd$+7OpYfH_&3FQ5E_}FSfji4
zsg+NMetX3P3hWa7)(pL4u&pUoiPv;|0r`6F{p>b;yRRmL%|44gTYTF(C#>3UA920~
z;@YoU`pyMA*@)f;oiJ^<QpL#|o8s(pQi(vF$^XQJkY+!{%F$@sAFV2&oKh7U^qK1*
zv~qzkJ#cCN+v$AkO8(OyF~%+h@hJGqJ@HQ<9W~(eG4_8%nDF4Zwnu5yGeG|aY70Rw
z5W#@;Uok~hO31~+Ki&Qtj61)BPR-6&NGDW5J(2rQh{G*l`=8t?EaRW=8z}z;d-*>B
zeg6}Wf0F+H8cY8F7Tf<BT=7lU;$Psc{+rm1|F@L!|5s@R4bY*L>W@2iJchSjGj;U2
z=4=NWX=T2d%Gib#S1UHNj+A4}z|E0PQS5c9V^N~qY0c)<#pH*Tb4z;#VSlW8tZuF7
z$0@1-31Vt5Z+Bv8k{<pLm8~hm^-bz$Eo+S`wj7JJ#W$yQUz|9s&ri0bxxW<rsGa(D
zz}d2{iWzu!FF+t__=%8>KUeRL@7VQZKvb1Zu;4Gc3#~6}D<qFLB;@Mba3)k;GW9-*
zTfe8k7PTpT2T9~i*V1E_<m2p+OZ?CiaF-p)XN<{D$8Y?eWi|7WytKBgg?xW<2DfrF
ze5-;dfkH0kI@S#S35Te(V(04vIGzau&>tz+H$M?v51Y>pndlZVs_#){`N5l*F29y=
zqlZSsZ3m-G3cU&}{wToi$S%HyfD(Jpv+OOg@1AdE`<ug+kL6E7>0U^yaG1`s%j$6q
z0bHIH2@I}lK*MI(ogt;q(U*~_C&WDI{RcH1v}ZUD?47E~Z#l~PQM+ISk)EF7MFx#F
zAiG%;efkMzt5Hc%s407=IXL=Cfn2_y1^I%8>`-y?*~g)ykjDmrv-erGSidJq90+}Y
zByy!^hg;BTaliSdc6xaV+FOBhm2A)Zm>&P8Tm^Q^U%ALg&S%^F^m#`yj|Gl9${2AI
zs~>z|Fojvc`C~AM@gm!NS=XY7&pc1&CXcjRCFJuJGra(~R)F@~9i(mi*Zin`$)TN;
z8*0FN_nEbas4ME13o~GrvX7!+=~S};TaV*HGZ*^0TOQejgbxsV_WWTMRa(a~RpX47
z)q@zu1Law#FSK<OXifWej#HZ*#BmSKxOCWWssbq~PI)NWVglX^D|*Vq16`G4e^g2L
zCbLYJx%;`RcO}2byNw{MD@bF+{c>w9FWNi~Hd-`_Wn40pQ0MZ~PjoN`o|ivku~`7`
zzmkMS?U##ERpEKL9jl%k#sHHK5W3s;<K;H@w%t1^W;>GZd7kh~Yu3d7Ok`foBY;jF
zP359NQYr0Id(u5BZBGVBPd&;XD;SkMQ|`m7rg^(i*z&vpY>^XAIL~W3$seWRqJLi(
zdCJ=R+P=5%N!hl06H7~lshW3-$G0xD8CIuLG7dXFP)3Rz=PfNQIdXT<d%3vnxYqH?
zrRXr%8B}aiBnX_C$~ijA9i%i3w+U{2pjEHYVbzRKo|`=g*8BF$BI(S*%d=4@lGs(J
z7rZGOgk%3ut8XmEO-kuW2rF*qa@YAx-AbJTm16d|hZ6MdeeD!3xohYTsy*xX)mfSg
z2M*(CT*0zvijez4B~h;a^l-V76<01!S9G1RP=9q7vOj{skDIPa^-G5;8ar0`{Zs9m
zvUw*B`tmuWCkz23)mw=y11xL!+{yK1u($D=2cBBxA0KMAY#F+w>Ds=0Xlx+ZlzJfP
z)#S0}3=VzZ6yE|@)aDS++ooW@mrOGx05@sQl^=Jmc%r)|0=TSQY7@rOS>PttY9(n0
zbCkGFyWTieFK~T3)+UkhCZIsbntY*zC(ryr8>{olh)Uj-DP0d#toeE||0+rz`APkk
zW;MQ1G>$lU;+<DvB4%i1eXwN0W2zuit?5X*yOuF<n?be<9utV9dixMD%cg3OF3X1z
z@fWFqMD|&-qz#{rU^^@_1)s5ApIIo@Oy)!p*pN=W<9C9+roD>c)_oksS}9e!FCtgR
zmuA+HwmAMB6f^yJcFW-bV4mKt{<3$$C5@>`%p4dgCbW@`l$<q7m0vZbI(s)YkOoTf
ztL9JlDC=h-lcbrF(cB>{d}k;N<PaM$y4($7t(+lGRQ>AYK^Aw<DX}F>0A#Ma)@WXi
z_JZNmkTCs0CWvG6nhX-PWLkgEH^z}K9jQqfh~7KRf`3ml*X_0p{}f2#j7kqXbWzsL
zl4Bw$l_pCdLPn1A6TJdFPk+EiRz1?ZM!V>vezK7F5F4Ba%^poi$=Z!)bEHc%pX#m+
z8^7<(a_XiO*eIGX%gH-YFmF4pi9>!4Pkc02Q%~75o$<*b>StNsz~s5BUPE6eREsHf
zpP9BUwS5ZyLCG<~xgvM>lBIewFaK(!jCEUY2gmzn`pZ09qoQ|18+_2G@eLnNXcctx
z_*cAvH9vPt0DkF(X(oa<HwULG!N!tigGAsm0W);&wX5eA`$GQ$IX85N&*4k;KJcLk
zml*N5l398TF!maJeBz5n1SYV9)Oh}tq4oczkp%w^5RHUT^NY&(-5Q&e!jce1b9*!l
z`z1z5S<25=^pU<!4TV7j`aGX;A)|#o`Y<2I7zsB&+At*F#HDzQ291XtV-kd+5#tn7
z5B_(L8;)R}?G%uy7x*0KY@HIFadb`zbh@<2iQN3MjwtTWdYCfjWlCRUU)7IN)S7Ha
zxFb)OYpUS0{{z0^yBb3}DviM$My>A^(d@cwl!fmzXwQv0lijZ*MNlBSEa`Wxp7H<q
z8S~2P$Bp}fPzPV-Px<=>kyr{X)h!p}Gn?84<}m%*M)%dKTkKd$-eY+Y&Jp32lR3#1
z$<V_k-UVGbOhytF!<iB70=!HQ$r+`W3@o|Im}fD2Codh3&=B;jf%%4RksE|*l@?{z
zdI~44EYr1GGEEKcZOzF)9hOoeeOhGnBX&B}55v*5-!oXR^i&PXW!_Qm(yMn;sMA$V
z{D~IT=GSf07;=Br=G-F1^suyqb4f7yU9`}``S`e1orm`_LroR8-psd*3O}^VlO5+5
zwTha9OW1S1UdirK1Zxm&V1m4N7rE>%FXv0t6mIB!=*=(>F1xMS&pY0ZuXTP>h}VVp
z+QCsD6ZeW4d`EC!@(G7!wfa(wT4G$<>^v>1v@KH8_cXroY0>?CD9bojpED{W4$VKz
z;9Z|R0<jXUsHPmF8-UPeT3wh`j}II^PA5ulcVD(9tk1cmDmp_qyGr^W&E{n4*pJZy
zZ@x}ufHv0ZsWm*6jFHVLFLu@9E9hw9cTk95nUibAV(r);>%ikNTzQ@R1d0;NC527(
zx-XX%yH1T>%4TTxHlclY?v2G`;gGXf2Hes;Js389X;ge^q3hK05S>ib;_Rq-8V{qM
zO<XJDmW7+C>;<`-xkL|1oeKXsy?CGUc?I`ak)wCJnyWfVYY*m+g!&B+x8uq&kC#|Z
zz5tR|EQTO<rB|FIKdwJJ8Fo&mYC124?s%S#hM?Vcr6t!oPOmf^r*A-uOT=9CvsJU6
zV7BHmpBtEr$R1U@@&s>zn^r|xMki`NVG%u4a!6GAMhaAYj?kkFamCU++LyCa{7sv0
zt@9zr=Ha!3t<DR#d_pJxocu#$KBp%oQuYq7RbTyZAtd&w7RimmbiEO2;!&}E;+Z=4
z9wo`~4wjgIx_%wV7SfW>>Xu(fx{^ZLA3j@I#ZK=#f@ig`UZhF@)q0<U%T7UY@4tJ{
z_uoxZSND_tmb0T^(dT+|sC7JrSA*v`>Sm{xUoUI9(UENL68yfpr_hlKm;M1W#+Dx~
zjRJ{%_Yip$7_WpgfPs`=eLXP<<A*zYM<KwaMC;-<QeI?^z@YN}EdecXGkxerbH2Kj
z>PY}fDMa((!q`K$#GIzF4Uyg1Q$asWxew8=e|9lgliGmvSpixuoCI5rmx)&R(6POP
z1Fn+TE~sdRexmSx-MAY@Mb3`r?*8OfTWZ_=gFSq7X+_9<gx6YP1<uY}G`#tXS3ncp
zE>{C`lLG3}%+%s6>J<xIvZbo)Wf1h<L##i-It$wp*MGL11H|pUqny|GQorXJbm^IV
zn2+J<-_+!D>L%hQ2c#rlx|HnBUnK}uh4P}+oMZj~(X=K$@4d5Jg9%->8H#HD6%*96
znbZF6p#cW-4FyWFk)dZ>(=QYz>&J!Z>fQ;EqJ_c~1le<_cFfn(>61u2gxK}UJz3U1
zvT5DdLxC$7$k7Ti21e>~gg0N~>Fqvu9E!bLh=NUpK8~e>y0wJ@ME$oCgX5N5k=B_4
zE4jnP_J*gIxj=;(<5-FJ$(7wJktjek%ZtF~Z2+J!zz;2CLdUhFK7yeR^7)v13e;@P
z{s7U;Efbu$&o2JIV!?$rNDHgasKsFtw#yoy+Ajdn{6AjrodKJ#$&3wbzD{#vlNP-7
zFvSl6h{n+`<AJl)t(2ROdX;$(;O|hv0ZA)KZ#ZU|-}H4*vtqiQ-ByhW{nE%tUe_U5
z`o|%I_GI6<f0Yvg1Hr_PP5t?{&q3@B_v5b9x7zD(5|>x>`wm#t6|PImN#1=*^O34i
z7-paZQCHp);+B5UEbvH^q-5e1p1;wrO4cx1I^61MNmz+8TpYNMXnllMS`+{iIiOmx
zrK=Y^LdRU}t_yc;>6|x*dKhnV;&P-QI5z+1XW#$bl=!a>%KuNqCpVx&Ld@3RRU+tr
Q2LJ%llJXM8Vg|nd17PZvD*ylh

diff --git a/docs/sl_plot_files/figure-html/unnamed-chunk-4-1.png b/docs/sl_plot_files/figure-html/unnamed-chunk-4-1.png
index 8639b65af331e5202174577ebe5c0023c40c21ac..b54cbc3eb41b0caf595fd2a2a63c3e9dba3b7a7b 100755
GIT binary patch
literal 10038
zcmd6N2RK|^w=gjnEhHp_=m|j(Jw}94qYu$b8pdcth~D1!5F$DWA<6_1U80ZrreO5Z
zqbD*#j1s+@dnWID?|1+E|M!01z2Ecv|G%v{X4YA2uf5mad$n_-5r*1K^qlk*6ckK4
zw=_&BC{AI(k1CW3#5fjQ@}Z!h97E`vYJxv0C_p5Pf&xiFMMXgcp`apCP?0ELFbWuw
z0+vXD1fiCalJeB4Qy?9ggxnxh5D<t|5E2!UNJSz+s3;&HmW&1)5ke$FNF-WXS_TFN
zMn*<fR#rAPHeOy{etv!#85soy1yCL+fGmXEkT4_&i7;d>EHM$5IB7s`Xaj?I12hOF
z2JtvEGc#LTTO@guAT<S&%#%oFBDX~F519yFYmteQ$XXCcATyfW;?eOX=y)8ugb)`O
z7Z3J`1_8vC#FyaWO9=5e5J-tIibNRL9l1xa7xECu|7sI!L6}UOB&DaPm!J(w(CCtQ
zbP0}7LLk*5DQc0h+C&hLWGZr-tepgbR7;wyC6RFP2Do@M4hNExa3s=XB5X1dIav!r
z;^d#CWOA^PCP^eh37UY5C*Z)2Nkl3NB7}+vDv=1P7Q7Nk6ci*X3Q)zMRIp#LFR}!X
zlTbn;;7A0J2~;*&CMXB&j6@>c8m0*X7naWRmX$XJ1$PwrLzytY?nptwN1>wuH}%h4
z$x6r>ZV!lRQ}hk*=86B7e~G<eBX_b9upf(w^NEnfH+<)uj2YrB@XctCO#YJZYnO7J
zUFqQ|I+prsS`L%zTOH<kN!7{bgSr*@7BYjo$Cp|r9cP1(`A$x<c}Wh}p%EYMSKCoQ
z1SI*csQvg21AR>e2s}FteTsnneS|+`x-UVKl>O4?@&yM&uXnakdM`Z(s4k8sJ%JHU
zH_o@2#D9gK%i*Rp<g!C}k9H&`!Yy$h$MP(ZNt*WpaJCZuT~HmNCXWmL&zSsDn`S?I
zdrB!D-iB=Cs(g0{<~ylX19+faBX$N8g6jA#pzp7*2<QZ*R~e8>xxmkdy41Mf0HudN
z7gEQ+z>Mv3p_c=6k3#?WIcL0nNYa{NRzcplz_w4^*k(6TaAcS5WT;!cyB&)C(akpf
zWUjZPMd*&o^C`Difg3BH_U(fyIlB8L(Iy>Fv#z{6vVZ5WmZnV0?9aQE0Qaa5I{wa@
zq?~a@gA3?#*)wdoJQGjH*+N1c*;no;>~`E;Kv!12YQc;#ev?{DBSyzvmY;L`7A%Jy
z2bx3q4%V^mSx3);l{PF=UdNwPGOk77`4o?Q!qo7RgmX1a@ZG)Ob*AHwp<%9?-P?|J
zS+Wj372OHZYnCs3@j*(Taf&ZX-3lca<1iDnP4b<SPvTkKG>m?KQ(K{;ST}xDCZ^D^
z_c`x`HyTaEy~*|HKXD1oVs(sxil*!aH5$5bvJQ*)!Yi7CWnUM%Lq(tZDIbW3x|o-9
zMM^Fi>?<p=1V5bb_7sfB>7I0OR1blN_g)Gz#-5?JLTkM1br4Mb>^Av|5$^j|iWycl
z7Hvcg3RnVQ9bM<o$c}#3BYgvI)++1ivCWYtSY&Idn*n$2*6Vl2<4qS;kMIlDKR3Rg
z4Bu?o1P-{qG}Kufhbszyeo_^e{Mqeflu7BUEBx^A*`>n`oKdgW{N#m~fkEYc?<zGR
zOfi?jut{u>j68o{*iVIM8q~Vm0te<=@^|)*rA{6w6?X7cVA``K-?(LF(+8@r)>ECp
zr?Y=+nq9kjoRvjh)B*SJ?rI&Rk}9nSwT|<XRjn|KCI5GMpk6rTJKpmc@r3s^3|iem
z4A(-M?|+&r88|q4ebwXhZU6Ph9zF7(cw0_he^Eug7ZSU`32j(eal%?G$Um?J7LhS>
zr$TW|%RQk6)~h5=cm1=k4cU}TY8Ov$pR8!%KSnW;+}L<Sl#GYXAtBOt5l-fI#_bi<
zyn)h%T5kBX*3PcSr-3`H+o@U3*_i0w)XOMULnvo(em*9t(pkK4^32o=t_Y_ZjKEP*
ze+RPa{M`dBqelOC^Vv@sFFhbc=vMW%4+C0VsY0lq7Q^h1`rq$=%ZRndd%E8I%B|0P
zi^oLrv%|a^EqwZ^%F>!?m>`nAfg4>*7<hejFWMd-Ya$$@EH;^mQS89{0BZdiML!>Y
zeD%Q1T<zILKjCmpqmy+cBOoNN!mg>&Zs#I2$ar0bqm8%c9lz95W?@R66oPBC@sT}c
z7jGN;Ia!n1e2ik=o-EvkyN&j?|JUEVN9kVohDUDd4n*#%dQfl2-<UT{<1$XHpr%z_
z@0|ZMrZQFUxB!o#=M(|QFusX#2526mv=L#_Y8P8+LlWzBJVFJ1IlmdVb|vsU6Grkf
z7+ngPR;tfXQkY_ZH&ZsuehT0kcnHK@ui}3<4pfk8dSrB>Q?3ux=|MTgZA=hhv#&FC
zbXjGux^MwPhLznF#F{VNY1dVPr=PT(rY#T3zNOqeKnt(XgeB~0#eQa)bu;U4V?Phh
zL=pbcd)<ibOm(mK`g{3U$=fg%H)NRH?Q82IX$_Ey`4Z*3hUv7oW*r>WnBjt~^3ib|
zW+E-)AJp@<M)co}4-zIFA#u;#4e`q(`Wtsyf!g{E=l7@a>a2;K4q+Rw_)Y;pkD6i6
zLpVZL9@m@1d?{59PPU4@Nfq7jvEF+C;y(OLb1aEY_<W1n2^R_uN5>!0hP8jaM|TZE
zjlKLowyyspll+e|aSIu_2Thz-6dNa{o4uu=ga^TW#XSvB;hE`I!yL|ERaM2`OtfRr
z$bW*b#Eerju&`9q5}d!h4|bX;$0+{!+u?3_b!xF4+?)P9A0LVt$HE4P8fdXI!$*Yd
z6Cvbl1|3jr(5|5j>LK+1sWR@Y4xj(sHTfwL)X#Zr`Ad7(*b*3n6Zp%wDQ2z%O$BTB
zS=X!rJ)Y8Btw61CVVqJ7TMy_cmmy3jG%G#0sL_A<%z-vmvS+kU)F3<3SZASM9#Vh!
z7xtT}@Za~SzD}LD_e+6i`<e38+qw}!!)drxQL9B~tD=M<)TV9I-k_y_mv;1Wd~(~z
zC+#yLZTsF&SLl|M1)P_k)4zc+ApKIV@+=6MJI1a&({89SU+`8#)al!E8D)rNP8(Ft
z{#Kyys%#{{9>z5G^d8pk{W3b4AH~Al*Tfcd{PV+ihmEBUmTEichCMzBg9pIP>oRB7
zKS=VS8XXvuoBaKq&$4d~5<YkIHE*WaTkwNueHrZfp@Psu_!>IUeIZ;%JB$%-BV?aD
zgOyHi+G%`&u{g4@5UNl|BszcLqz+lv?kjtNNfYu2RQa~1hDg-=jmY}Quq|rgxcqn(
z>B$01HD&@9AF3iE1_u%`(a{Cg6DOrSuhgV*nGWX~{lO?j=ht5GA_5QCn7w>FQvjOH
zoENmz>5OO-M5fLutaQB&oHskC>52C`pT#K!!NqBVih-u65q&-jh=ORL_ZmQ4D6vT4
zEqP6_+Ad0DlorM^!5Or~FZUN4J$6V`?EG)UIRE*9@~!Kfxjk*o|3=8eL$cmETtgM#
zlIZU0mLTr9ieA7eZ4jn*v;_E2Mz~tiA~AwRoPKFq`RYRZ{j-$tLwI(42%NP!I0!JL
zf^P-}KquJ2h3k`h1upbq`fP+6*cbm5h*?Ig1P}QP@%=hUvaArZm$A`-ppJU){kw3^
zHXNg+-ZE;kQF>r{izYqAHV>oaqKZg-e*PI6^|xs+&ix;wzGZZZnNo^_jbO=O`X%Uu
zNTtidoVbEkp6J3HKPnAZT!ysvX}yMy6)i;q7;b@*TAtxM+<Neit!)fTwYtNI`LGRF
zYOt4UD0of|)gm!0rq0q0{?KB1taf<*^xb9>C1fOiD$2P)X|{Fw`mPa2<hxxvXfYS|
zkagRpU65C?Pt!v@WseB}rmodL!zg8^){Vt=NX{yvZ!m)g@1m_PKBhcfZRoXMTUgr~
z3mXCX-VrjbEY`Cn*Bq8P(=qn9dADK)I}bbJLQaDgM-(dppH{~Yfec-Qf`&bDkhKHD
zCnj7Nw1qWdoPC_m(H35sjZxZg=^N@>wTX1o=D&jL1@!2aeAm#+n>4z5Z#qN44a^YU
zO}8`^a5${Ans7K9xTD^X!%{8oHG%D`UAi&N5k-9Ah4!*A!3RDtuK7_js+KZ}D=N{n
zF0OK~h-*8gx*xRTuEviF!~GzxOcYfqb9+3gd{X0!Rj`&2T3nqJUiijVkX|j|RBDNS
z-G>erq2A`~Z?YL-XC3Bd>!lT1+7@uK-5k)(nx+|^dF#lUL3+y!o#66Hqb^fCZ}!sC
z)hdU+b6Us`8xw`G<MZ<eEw2)MwM}+t)#GSy%fpiqRP-k6w%^PLJ~~1Mjwy2~miaqx
z6oyaXw8Z7b)caRMHkF8Tr1n8EQ)O`eZGY-E6=)zSi`%}gu!zL)vD2iT**baX!L*oK
zXS$yYzw2S4*IBi6o1dIlumXYKa=F)X75DFgJF@CtGG?RF-ZlkNX$>5Vwawm1v)~2&
zfI|($Cqb!g;LQ!T=NX_*Us9)?-P&nbUygdfK??Q^J45FEVgfupoWQPpkH3GljH`Z`
z!(krc6Dk7Rv0FQdc|kk!^kQaYj?&7sbyk0zxT~9y=KEz%$&AAq;{2+xc6^imE-SE+
z68>0!lObxNxT;?J7$sZV^G;d1qaIam>1)yX-UQ(q`omGrr?z9}_D%iU)p@x-7S767
z0L8wtGWREz%GD1IKea1T>sHq;op@ZgRepp!#x@w2BKCpMlb5KYRNDs4S-p)hlXc%x
zIWJGe<jdB@8mtqBS<`3Bo@xib_>Nmy@Xo+X140s6A8!=O|C!{_j&)lJ2CW`c`z|e~
zq6{tuosN2tPvD7~kh7JoJ1p5f-g{4H|09a`UhW+(FA|MT-Ix?}F)KD~NZ;mqO8z;l
z0_!&1)LD()tWmA(+!%yVd9M;<iKeX_1mr8H40lwNr>sIQDTpniS-V$`1owDWOK&C<
z*=4=b@N2T~rX=dMjhOw+c{{fmGU`3lr-$^v+V%CB71d-bl_U_5)W;8wyH`FOYM@R3
zLPgT*m<cprVX40BumaI!pOvii1s)_0OM=;3y9FR$!^1YDA0jX&a%D`N?V9ndU}Zdz
zDiUBGB6=yjN2mNY{@&$9BS!ll!_2c`B-*IB*J<x~*c{9t+uu%>`PXwyQL6k`RL0M{
zj*5HBwk}oHz&v90yQO>IxyP0EjQGw&nmH7kv5zMuT{L{Rt9yU9<Z+WqsfyXEmgA|{
z<Yc_+D%)jUVY_PE)YO>8SV}wc#4Vbb6q)y`9wzRL0vEQlX1&t6{AxmE_uLXTR_vy3
z_EPL4q9t=N^SCcH_seq3+(xy7<g8)VN>UB70XR+b@oVJ|dRX7$d^a7ZE1bVj!l9Lt
z`?dV5mErNqcGvQpa?EPjCV5R8IxvSOVNn>D6ti<%2?9%Ok2<bpr_g3Mu3hkd0?0dT
zH|(kO<+e-AG^!M?_jINRGdHT_2p-bGv7Mq!$pYw6<y*;2Z+N%1w^*L#lzx)Et<k%p
zRgkU`d@}TL#>??Q_Y8D`20I;npwd45Y~T-#5W9DU6KyV8#^CYh8#6MzUB$=&T1XZ}
zn_lTJ4}jH{kd5K_MYAjc!>{^haYY_)b`~`}rQmD4?5^q@=+;GXsLuy3y64REzUKY7
z$HP~t%=Hl1{24lQn-=uBuX!u(GKiB9LiHw@agcKJ%}B^pHuaIuR>uPD#DVC0&mr5A
z#A;?M6NIkh>`vd(h4cdCg}1uE0n?(t8NIHHT2PS=7eUk|l`;h~eLQl=3wpogJmtXG
z57-Y)72#{acW;QEL?~%Y9HKX7MH!w--0|_M95-Fbxa8E$)o{1;`jZYm9Tl&@gz}7k
zXYpq~DKAO&=JP0e#De&Zf*PerOUu?F+~%B=amCqyud27C;KwoF^9$;Qin<Aa{i8O>
zbHf>xRl8+Mc%zPl9I-qfv&z5d44u&Q+AlHy@7f)u`avh~QmE);r;#^mUVfcJ>!>T`
zw>Tx3J476oN`s!mj1&l>^F_hg7V^3Em^ocTsbF@byv)<xZjFkXiHvHk+OmPJE>Fj6
zmQqn-$gR6i76ur=E$NW6$rFaMnPELc#1ibaCG24<%Po!^dRyrSnj=DE*6s$@f|K?S
z2i83U-ZtIfOc$KRFA0m4Ox53qDGM8ReYT%WHu_dRpNkd$x^UA2Q?1du!~tw1Pa6(j
zjMuND<Yt`8`F^bcDdv-X0K_*7a|b1W)Rp!NeUooy9)?YkMyq%Sk0UTm;C?*^6l^V)
z4O?Z(Y(cmKm{5kS)_;1V=$ce8{+TlN;zJc8m#<U@0juT>1P-7wMU#E4M5J-=vucZt
zUDM`|y0-nj!`b4Ei;~bTz0;h1pZKDG&*WxeN+x7!+QJjKf_}uL^IhRpOq6lWD5`-e
zNcUbkKe2K=xvhP3;&_ZEdqh!;6+2q&GI%yXp40l8@m(dXs;rc8t35}>-okYitB&cF
zXF}}RU){?3wsV%A?H2ADefY++y_Bri+v;}<5g;+c&gN%no??4IKtw^9QYQnD59Cq+
zhe0608uyF<K%o;%(%aR6QDnbQqt%jbAW_GvP?bO0kOr7rZ4L0l=l{4xztlDHnNP=-
zUB&OsQf|#^7UsFdrKHX!y1<}m|J6$2#Vpod@wzJcrjmH)$Q?a=vDaW{X!!#muzMxG
zR5E1Kv*zXSLMrYwq|LEoU&`j%8>g(7EW`Wrf!~;o-@1uhDWe;C<n;V<hqa*raq0=C
zZ$U*_fF~E>tat@drjbn?lPmL<0Y=YaFRQWVuolr~WsG7U!o#NVvaB>Z7n0-z2CMs+
z7#a@m*t2fGKxQN~eQhZ4DYwBJwT2LIGHZ|ubPkHZPhYA3qA;N?xAT$#(Y6BPXNY^>
zcq4=$ZrfgDNaK~14$8JI!Bo)(`}?^U`qNHY>t>sQ7NR(b!SJK2^@26^Ihm~r9PgVp
zy4OFkQ!Lf|UeVqf;7APNe*FhBo9s;XIX|nqnEv2j6!7Ylc>&%*!sm<pEc%*-r8D}Y
z*yV*&EL7r~Hox?IieV3>gvTV)y&=ym3+NK=RXlmOI4I`ao9kh3+TQq*rJ6Clen))>
zrXYlBmoCstvFBCV?K6tEW14M{3lQ1Pt9f>#<mS0#o6AG&Lgxf01&5eiS2sF;MNJ9E
z9Zd7K!#ZbVL(*|z{GJu;`F$}#u&?DbJVv9&%=<Ae)tQMld;q84cdgFUY4Q$Ng7#dy
zK;HWG!%BYub73gQ;%IcEOTQ~>L9kK{A6wW`Pz41|_QzMw<+1H~5ezGC?m@5_mR&bb
zdpB$xYBWxBi4{z24Az|TZNfaif9{`sq2F@&aHA@w*r05?77g?f++MgPlny*)d4!5P
z+Z-%rV>7jhw0DcsM#r|PM^&PGO<!W}y9W5l+<-E*-)d<<$2#V7&NTj<cer0xUd|L{
z)cDQ|wSuQ%kXDfID|2@%EidEtvUhj)vA18beP=Qvx>(jps43~ok<kB;%>x{~7kLAP
za-NaRG^IbSx6rN|13Ueol|LwgzVilQOD?N7ISAj@uiZ0TeO~s7P0A-5aG<3%rAChl
z-#gO<a|=4Bc`uo<$PO0nSmCF>27dEd-2sC>ay)6e9PHF}B~<8&HD1$Or*{lH#JWu_
z@Pd@t8-DXf&irz&%aChXK1Ndr)@Z&k@kb3^hL_NfWHuSLngrl{R^*yVmMis`P+`f}
zm}u{HKLs$BY*t9N&u@WRf4^vKv1F@MFAvWON*dAkQ)u?xdfNIzBtWz%^-uenMMxID
zrewSz^v5<BG&g?f+AAKjJOE(3Eeh!uL&Oz}*P1X9Rm6!gtcYhEa6aL${p*uh<O(ZE
zDH?Yt7o{6Hu^&EMawks7T3&{`d$(QeUU*IDkDDKjN<N3Qz?Ib(RGqp2Y(QPgUW|6#
zv%2xn#qmXuFMr+5h<qz~sfvwcLuf`ELKD$lebsxBb4mV{SV6j9sC?bcd2fO7h)m4g
zF;iBkH3BgyE546I)lu8=oG!~eCxP7-$vWFBvA@3ve^Ze0NDcq&xq#NWfFb&`@|f`V
zLt+mcIm+nfC#^cqB!Rar5e=`LsR#7%&%zB2<bFh8e6+3MTR-Mxv@|kYPQe-Ii#zy4
zoC<E=HsC`U!=L9Mt*<dv6bWT8So>Tz)k3@$USjWm<Wd|x3c$8wqo2}Sm;cIEGvN~Q
zWV%2GScUT}L_9Rm?zTY#A8IAzul&w1vAgUTZ<?|Sg*iDlZ(?5S{jvbYUO$G287_lT
zaQh5jbHv~Tvw__2m<&4IJ3~c9LfmZC2lxL<1qt*F@iim)u7Iy^qNz@wu0y)rWeX!O
zZ@_%`HXKf+7*wdU3n?po^8nDY>Ei*XVs`!!+CZ2qK%(*f#&9EDvZZ8g(~a0^Oi>xk
z$f7q%+0Ngvu@qCo(NH+CWu5lf!I?HI>)dedoARu@ud1Imt_8+4rY^a?jA~D{40?CZ
z3}HmwYdti6Ls6{JxKcSQ-hCkW>2__mm{=apKy4DtkT@&iv{MhwtlpMaR%3iV<+|K<
zZMH+D%rlNDi7pNkb+x~5sMcc8tT5udP0{AC7xg)V1H@FbyoY08Kg6!Oph|HgcUh=2
zluDG^&QSJM+3>i#YKN;}_r>&>3_K5=^}PaCU{t^F>KRC!_Iu~OczQ58afip`2rd<3
zI4%{5p|Gqk?9Npi4e4{zS)XhLI#I6-Xfz7}gQKC3ED+S4y_rkHYKV;w`DEp!Q<qh{
zlt*Q#BDCNo6+bRHxs=dB9M8%o-tNyD(e}!LWYuJ5kYn;g0aTOC*dwRyq$yhX0y9i*
z8jRch?C@LQZX(Cx5)2v2wtwEYf_pC{%l^7=f`81K^^0Fg81>58-+&y;XPvG7sVMO4
zD<{2+O{xgbCck;8_GrX&#ovp5^eqWmsldg%d3w~!i^YR{?S{aCfKj})?{NS7dm2`U
zuYQpzz}>s$oqSE$g`69z4sMMa;H{`QaTl7aOFYZA$vFj4yl|{T9WRmM!zw$|78Ap4
zpx5c-1K2WKDZm$Kbs}g?$NucNz)<FS`LBe+;TY1JQ7CEVs!SdxC%tv?zgA%Wp$AI;
zd9mfccnb9&nXJHiEc5|}nmRqE)RV#b-!j#|6=IkBlHI#2wZ31OANWv4FZxvOB4gyY
z9zB14lq4>--o3jEbv-ledeBQCu#NL-BdMwq4N$-jRcqZQWwk$^>z3{qil7$<`7Uo=
zJe_9Iej!o~&y(ohT^m`TXe%Y|?I0YuzXLhfX1%leLC%)v#f9b@kQK^t4^;!1GCFr7
zL@TA;ojzBvB=C1irvE?JkN^3HhyQWe{_ky&e@0Rj!@*xARE8M<!<R-mCcGFf!+J*Y
zNMKhStYL_Fh5&amE*^fy`h|KeyUf_^0}~(L-@6Wzm9~f+eP;gW!RP^Irnfk|Xr1Cu
zt}m1Y!^JJYgZXyugyXcqOVfWPxs%>RAO$Ngl-a_|p1%@VespZhlb&~`4e{&T_kd!W
zejGQ=+oYeEXJd9e1L~zM&jaOGnGJ^Ww>ExRi~#Bo|CzOpH8hQOrie$JV?HT*<oVa3
zN=ojl%xTQZA&YpL8rdi1G!V@z+&)mw9?{oL^V)&-@e(a}!Ak6&EnMo>5<6&0q<V+N
zDt+_z-1UcdpZ45jJ_uZPI<R4Yh~NI#f@A5|^n8<lE3ftdH*cr}NIjfWo+s->(bFCD
z{{nhxtLVVE@5-gfQ&@ren_vXNZhPVGHmBZQ{GtsDn*)8l7Cc7#Z`I0wzDO%}6&0T3
zqsfDt<^zk<;N#~1^5QCaC3lh%enyv;tPd8pSC7ag>i-3?D89JX3dS*6VX{|f_m%I}
z{-mIQ?33RGU`jhO@>Y2D;3?L|(mR5b*}ZS`QI6A^;Xnr4mh30!_(UxENPyTv|LyA$
zlf;F&RUwEtd!3LrsqIXi;QX{hyq}B;JXA2C#Jj+=l}8*3^RxF$#aklkxYyCqYre`J
z(s`1dL7Dx^=qO>0+oJ#`Em^_Wi7t*h#It=YFH4+VoYJ-aZcmuoR}R_WNCpqoRTLPi
zOmtbcm96Tz|HhlCxZ~~TuxIz3-<cMY6^5j`eS}Uq{`}!g6wpy#%a6LI^`P9F7ScS}
zhnOF9@Y>QovRos6j>OanrHqxs!W#a#;hfuwshfC#^kVKj`Nk_RtW8SKB69av^P}*m
zukj+BB^S$j^TfBRq(l2>JMONxudQ4>>Z)&33db~JEGC>)j_=J_eH}8LV0#vTHt>dr
zjTYw|<?cDX-7{M30kD0brhb|z33G+thJ>7zEtT1%yIe-yJlsxqjxJPWCq-#uaqhSw
zGFSR>A8^OH+ek`yZ^CThzAG(<cyD-vPs=XNrq-Ax{@#8X*Ye6|@i1;PJyvKLWAf3*
z7<PZ7%g$F9%XEUkO=xWsEt;EU++?vZ_ToJ!!_!6e|80%`0R$fQZRf7C_fq(H_q34_
z&v@F)w~jY9k`BM+uJ6qw^$Ofo$rKIuuQqeFOi3|P0p<))YbPi?ZsB7ZJ3ngvH;hlD
z*kV$;>u!Q1w}j9Y0U172)>rxiKjMAfR{NuUE2y>9pO~)kw+XFR?x^BjDB(m#3;d7`
zoHvZLCrIL^4_pwJ3Ju)(_$4JLbTVXrYMvmq=rm{Fo|Gopt#a>1>*3JH$o00gLolBJ
zS@{=NFbT6#J1aB*`a<Z9h2}@IyK_l(<T?_2uv>-y*tx9=BaJ(|(x6;^$TZWzUJUwh
zfnn)DgtNbYc9Y2`YPa7m^`;i}^u~<uYGz`1m<7WA$C{*)U!T?+n!xic)qN}gER=UG
z{_E^Ewa@HM(1Ex|#&F1S6G>XMP%QuG#bFF-;@CTW?8}ZXCp|EFAsZ9Q+xks+o&m;1
z->D!$Q(;Ff2&_U<j#l4%nrwMvc<EIbdCo=%soIB4JTtow6{J&JuMe5G=w}tSa)2)b
zG_kN5tNR1G)4u%;y{}A-AB|M`6Y|piMVyjvl9rF_n7Mw(^mp7G?I5e0ZJ1c>Q4y4i
zgmT6PoCQL?{C7m4OVp4unS4yPrHxuS0{{6@h&h9(a87*Y(eCV>2n-xtMRoe6gW7)L
zSEmllJN2GYdqh}jXY|EzH3Ybxd%!A3!qGy*tPuS<$w=3q`6aJBPCS*byJTgB1HZUG
zvJcA<pE!MY;~BQ_=y*BKxS(mjiIIWVc`|a+fTDxp&5tp2X}I+K=Cyjsum=%uVzZAu
zSM`%;+roqlJ)R1&12C5A87PFwx_#e!J(TN5&ZF5wk9RUUC((Z2#&bBn-s?7s!aU&=
zV3A$?=qFf`{)urAtR&<dU3HgBse9!7W1O_nvClI6I|kbJ-*|KA@4s6_rq~Nhah`F$
TA*b3$e*aBJ(@>*a?H=$i+R@h{

literal 9826
zcmcI~2V7IlvN%fUQZy8$7X_p$)r4j!BGMvKq+2k6G^KYw0t$#gAQTD3pfm}B6hV-p
z(tD6jKvY8Sy_0vM-|yc4eebsa{k^wr4rk}g&dkovoSmILQE&roMtV+q3JMBFo$H!L
z6ci`1!0#$8B>;Jld)|wJ;=~YK&sYm+QcwUuC<O(Af|8Pg5=23{KtV~OfI=yt2nr~Q
z0s+*D6DLlbJb4npBcqTDh!O<U1xgT!a$$jzL;_J#fB+~N43q`X!UBjyqM@N-U|=|P
z>J%6ZW@TmN<Kq($5RjFXRa8_2_yG*aOvnWRMF15AMN~jhC@6}cPcE+d`my@1K*j0D
zwwjojSXo&i$Wj8>6bN!36uA?*pnyLF3b<AvPy|E;P)R^%S8|DUjm5dfwz}eoF)=Z*
z07X}z0x(=Gt~C}%jBN!f2?eD<K>>1PiU1X|2;_eis0yGGPy|wHYAViEALr_di*?1d
z5^+RQ1%jdi0j)p*6+y-#7eWOAsH6%Kp@Kwejn!|Bb!}}0&`GT%5&;Dzpb&%#prQ!B
zQOW2)ArVL<BF>fA8cS>i2$L2lDHcGK3xE<A0M!E51rh}XiIM_PF~Aj|3(z8S0D2N}
zBw{Ox2y_CJP38&k0f>=Er0f0E0l>u4J-Tl0K|#S2LH?bHn_7E7LBUU<qX{$iO<&50
z4(lKEifB6H@MxszaeAVix;=|U2^GyySj_uyIeayOODU``;!Q?wNlHQ?dep0yZe%zL
z92xp4*ZPw)eZyf%t+eC$nC#vIUY&aM@JFGz?T^~~(>CKR*PB71{M=8MPx7<qoPeFq
zrbG%}rvYi9m}sBz^RTeOp!}jp&#Q3I+#gulum1yKi?%w0d*e9ZXPuTebt>;UBvKD^
z3I-F_e~RTt3v0kpI%omW*6cPGR=cluwDdBLG9ao{xxb6%px7GmTt#~tJvosSro0o^
zR3q>q6@`r$cYkjN4zi=QxQ%zL8pTDa%7C6=CHYgt9E9CZo<#0%FJC!_REGoPIaxNh
z1;Uy#?e|t97*8MUu8<Z8%e7s;&64XwQw!3XyzL4O39J%3#m{V)#ZnJx;@!qb^2hrl
zt9Lj0(P_0|=Y~}diz4ee#k{b?S*2}i?8D}Vr8BK}_pa?dRaz{Z2paXdrtt(Xkgul!
zX}eLw!_rTvlipQGJsQ{eJQNin;e_YdOuoCwQ9s7SBN5D!M>B)_(J-C4)o@(d!@aQj
zk%*YEWlVv>7vUqyu<?vqTjnRABXy&jUbNNPYkMM_%n|*)>nRHzg_&}8)s<6(UHeYL
zQsnR=FELyrS$>wmzeWGxT|T-ImaaDzCd%sTeXuPn8==o*?T6nZY`;<asWw>Wv!`fC
zdg$JrRk{aCQsO(4XYi1dB{69_GGBT}i`66oTjN`K^zx^D-c<E{(VHvnJtKE_!o+R;
zX+8(oeii88+@$hiMmuXw!H9N#EPI#HNw;U;=|6b1<IOxB-?r&BYrQ-@XPbfcz&fkK
zD81@7)kJ5Hm*!lv)DK@W!6>!itj+||=e_m{>8ys&x-Tu4J3dAT5_Sg}3Yb2*JU0DJ
zHjn0l=Wu`T7UvI3*Q0~N^WuKQkGTi!U6&*L1B7R;jszn8wG!&b=oqS7YIiqXyrVgb
z2=ix*&F7SSzs<DlM!P7+sl38AXG&{xr^nL!YiE9Fn1AIOr>mNcG4v{Ji0Hc26Vllz
zke*);eS1Dv+tfAlcp%k?CVELa%@AG;_3qi#3zAf%+4hJo(8ViV<FA|VnUQ|rSDUQf
z$WeD$g(YNnKc$8tm8g+?nUjCE;!4kYVK;Xp7IfUeo)0o^rBqHm=B%(fnlIK<&tYOC
zm?@Cx*hovUgf9_#>8{Mq-V9k<c>4sZ486Xo2Zxx0T>CM(lNogYIY|uvtYl`TvmP46
z$Ww6zX6=3*z9V^#YAfk&FS7LM_ijBA<s#~-tf#6whT4*Kn=!EpYlp2WT+TdsMAVJG
z2Gd)N^Wv6?*k#)+>Df%7vLX4)L)dS<ffiPJd`z}RJrKK*S9HkI#+^6l0;YR~Si-lv
z47S$oiii)?F&Di)4EL3G(PADka!TemJHfkEiC%1!ug}yZh6q<q{Jg-NBfqt8V3y|V
zZMDt4ZE^FsZ>fn-=bb=*^bYljZQb>^aOvRsXrtQQa^!wHJG)#K2j7MKL7N(-@ENZw
zc`@+*EBT5=#A07&A5-|_sf&iy%8}`T9kmqnOi~f5$KO78L76b7aN7|CD29(F=1jk2
zI4^AA4yZoZhrs{%`bx0SrI-@KoSK!$^cUkR`sahJt*p8_8GY2@y)ZMA^ed6*r~sBc
zg>a^{gSC1#B{VCham}rpKfm7jE^MGG`i0K3GyUQPOfU`f;`*e2$I<GO=?FKj;~|?C
zub#g6J}zsP&E(=WT3*eUjGr4!J*8CNW9tBQ%y%`ZWn6=2c&sg7J|%Svy2y)ok7?uC
zP1Lm>8(JR#Z0tFuCSR#U?<rUir9xKNtl351;Tql7vjcjey<b<SB>-h82ss=+6yCGd
zKt8nUlA8g^X@F54=p-a@D6Bd8qS>IUDwQ{N)eU!t=M2c{5ia6<YeYi_hTmbk7FHA+
zXz5+O>`xi)Nu}i}bKJspd-uk2eJCd@fE5B4V$zmD{kt#FfAc;2uhH<a@!GMnUo|qv
zm0ro6rllRdAOl9~WQB2;_-Hx`vapnE*a?G}>%p8Jv7-8*lSuCfW%s1j_qcs`o47v#
zh0ke?Er52+pY2mH0Z~U8j4$ntwC4tAKsox&m%!xfRTU6bmF7QQ6#lia|6++5)Zm5S
zgjR-j-GpIq)O%DadSRX+BWhwP9LvAJzfs&++)>;p5~9S5L>7iByHoLKeOo&J#~)b!
zAp>@!qG*5F`QV!;K!A|mGN7(1#nvrUZ{y4u7ZKAsdwz<*MXYW;i)eqZ*!n*HGW?~z
z8|qE`Kc23SfGo;iD4~E}IG&_>r1{g1o|6H8u2@VJc<cgE!U?U#>jdLzKuh$gQFml{
z7FV-h6{Yi(+-|IxQ5K^^dWS2!UyEhwr<3f!CvIG)ogc11AHIXoj-D<pxN47sTYIeC
zD~XhBM;kv;$HxL@6W5Yr!&DRO?&WeNaETK%V0aDObKm1E%jQ~+KpaO19c&BTtAkM<
z;ije<=gzEB7^#&}_5dU2MSOx^%#|rVg~9lWqN+F6a{AOlv7lBSzWn;j+;ztXe_$2+
zaa;{6fI>Ioby+ua_zah+K;ztX7lWxQ)!`^vR0r7eT9b&Gao_Qyu3Fmn4_L$aq1@zP
zLhOv39Nzfa03Sh+b@-f}KhYn=7$ci>b9Fe7e({uy$}dZ(Qit_M(^Orlx&a$sGkhL~
zOi#1Q!M@NrS#=2jy|g-47hdIyVu;6`-u!{dm-8vX&=HZu8&nyKHV=a9yk!q7WaxR*
z3_~+ux!O`@_{5vnKHuNC_)fNUv-RJIL;jn|EisvYqtl^*Al#0NAv-RAV8;cNm`K-_
zI$aQ()5<H|iY(=_cG};9dzmKkb)CA~m=lr!kD*&{eVmQ`A#7sb?ZMk5d77mhY-bYM
zZJGu3Fb)36yY*(rRr+_-BDcnpsBkXhJlQku3X`v){<QS&BY%ySAUEN!1#LS-eVxhg
zkyKtt684(iRlx2UFcbK{j@00S!^qzs>Czc<Wqnfyh?uEl-;K;`qffCJf=bCt!|X{-
zf`g?GQV~Bj4;4TFR#D}BQc(ssTXI<^NAU|C-P8&Jhlo}oOFB;HDfy|+haMLl8uyd<
z0gn$a6vIDaE4XOiQ4&kISO6zmG7y$!w>kV25Os0)f$B`!){{<vTzIP}8}yii9|g(y
zd3IlVPPw9vZ;rQAgV#S;JaUj3VR1^`bz@;AK5I(_ji0voW_vla`uKa{+DX9U+}(v?
ziZ4>F`kwgg)$gqUSP$FGK|Hq82r+%WjIN31l)spbJ3A}~9oNlCBLZOgw~kOfNWpRd
zjwl~rMk|)KEBTo2nG+n<M%P}X%Dld;qzJC{Ma|Jw3)Oe|J(daXKy8Tv{44-|<{RBV
zv9qF*R-H>CAS#GFBn^wEakKS}IP%?mdy8*+2aJ3u7)R`4x;Xx6umT}ss}ZS(Oa^-}
z*zh~<V;qD$R3ya%)eK@FO0h1O!Orz07P7KBR}jt{mJ&284uy|PXl*~<lT}-)@wvSX
z;;9b`R*<^$;*E}7u$ph3V81tVCwwS*!(pH#99xlrZ_fiKdObr>Qf|cv;^;kd=?9X_
z%B059Zvh@&gtC-$XuB-Ebkh9RkS1T%fW9)w<wR8%U`nIZ?ut)So9j*1+9tkpmft0A
zGxw|cGGv@bIbE<nBR8BHLXSjRK_F<X<<pYYu9d>okmpa#Hs<MIFayJG!P#9ITl)6n
zp!koNkXpba0X0Np<GP>8V=eE!S$`TIQfqyVDy}Q<Q#XH~kUiLVGupc`WtvzID10En
zgHEj8`}xZGP(5AvR_*SA_&TBGEaGHpGIp^VZ5!0Cd-Ki3Kb5^wd^S&&IKIm<b`TBN
zGY*g~abhTTAWi9M$-8^som%+OV9#~&Z|~xojyNtejq<yH$*u(6h)yH%RI*(%DTJe^
zevso`Vw>6e0Uc~XSVWTRYhu|02yT(j^xg3v6Riro@i*}@_iRS1%5vXEDU_niSB(t2
z_4MrrO7u)aEDk41bk*O}KFgOMG&4&{iQ`l2CYcXepFM}`z)8eP^QrhR4zJ4`klfo7
zE->uxxgD*29BWG3sp>o^856dSa}>hS%K=l8AX|LZ9PE~+Vj3!Jnq>}R4Dw={#4-wK
zz-ez_l-(2RGIB52Yg>hl4&J%5?gSSPwhm&4wbTdOHZk{{V^G_tpxj~<@F_uihEPpn
zy99h5zi?!b)nOF$aln3y5j2^tDc`Wyw*;fg&>jrWro8#l?B%0V-m(+l3^F{^3{5%O
z{HS=$s>ckz-QhR;>Y{3Hect|bzfTH&#khJbc0x<klP0TQr*hBED?VKdj}PJ!<3d>Y
zP<8dTSMHNxW_W4S4`Z%ga_!bnDt<w<@L%s4r1Fcls)AHty^Udu8h9`(U_3#Q#z<;2
zq-h;5Yl9wtK%^XU@R)__RDal_;B|V8+ML46LaBs4y7?l|(VM#xR=d3iE2P!%l2!V_
zFr=OqoGmVwIg0e*Diu9!K}2c#6K9mJh=}J_wxqrNh|$6lwXSZM5xa!jZmweGqk|^u
z__v`C(kPd6T}D11=M|+(MyrWL72me8u$tfUH{}+r#m+B#%e><)huP@{I~KV`+joty
zX3E*G6$eJH1a7A6*TO<BMJmWeV?!@sZ!?c_m)@s`y{&U(fbo#HBQw)^1Vl-L+)fh*
zwW`sxrmAUJAm&0UJSh}|_i?_61sADr5ew_&?8&pb4KBb-AWNO_Ve$1E@KL)0<Z--q
zDsuU3^TzrYkHgH+2vNDGdc{$sNx2)&KbwwVF*DsS)k2U*fvS}+S;}2yatsoBx=NLF
zN`D&1hp4E4-oDhk_o6Lt+WSI-p0X-wgs#L2Lb`F9wjiv~2YVa`Q#6Th=gXHCpU%mU
zT6jTT8Qu4YqVi?rP>?Mi+~0ZCKxB4zX@jHapnjlj@+2bRYU~*I$g7$2dEm`n^E!p>
zb%J!e33h$-ygf?EoJT0{mMmpz0@j_Uc5yuCVt}Wr-wta4$4KQQQQ{$jKM!0^jFftI
zD4gK9rUf#v(Qr&JbdA4NF}v653F4uHx%8Dj!9pzk#zk=ViRnOxzSG7g*b0}&unp6!
zjDAg;Dir2iYZZuxw133R?_kz;%wFs7ehtQV_=lR<G53NXkFVn41U>yT;Y?MCm5b4V
z!B;z7&v8Y1@1MOo4|yTgT6w~=vH11lXKVdiH1-|!M}kjNMHA5bv;CkX#kb>^cfags
z(7WD=4)wPn?xB;)K_<2sH0Gz0j*D>K;%hM27`iuGxLZmCauI>_<typHMlQ^1(T-ko
zk8QhQfovBJ*0n;Kx-(*OzL)H=4p%i1<5g~3Ev_|f#_|Nd;+TM}<Ojs3Yj@8(obO2R
z#C?!JuDiLDmx;1xHZ^9shvwiRO|FrW{pe_2-Dnlzg1Ozys24uGD)NvD&2EQr&fyw~
zC`Cf&`Po>jW>4~Za*2ICuD?fD$!D-pzW18<?W2*E9gcw73(;!ErphK2&)eF^nx@0P
zwMgF0a}*gbx`M_Q`q@8*dnU54hb){$4(jo)N#|}I)HdZbHK~H-u(`?Ud*xYW&TDzx
zgxsm~W2-9vb6FbHGi94Ka=Z9SYbZh1?5hoX9PLc9uyNKoDoGK*j%1xufq;l`!xZWN
zut1@X+TA&-fYsA#R=kC!JXpr*XA-6~%6@6STxg<5IC#CSaxd`kwHupXEC=Xq%A#p{
zmVpr?aW_97eSSsa3rNL@yS4rW9db~6+hXg*U11l9nM`LR$0*M(A*q%xhV;JO-mAh8
ztZ!%QChCW+^K^ffe-9hna>>TTBb~4K`?7a-+Z*jGQ8Vc}@W*lf@^o<l{e2hgIYUG;
zJ=kGWRyAi>eQxLKbSpzNm1iW7)g4RWskgf{QRz;fwJ#E_0`fGj;=NHD1~_mJurN(_
z)ZEYREOf6LZ!K|A#>rAvwZ3Bh39&zI?EO3&t2fvV)xj~<+sbEpr%TZnUvJmX6`4I^
zo7`Ja$J5LdSh~&>64r0B`q~`Uh>F<<myV{qz}~AGZ%caOmMQ9u-fuh;lWua+p-9Bt
z=Q@54S*0+Ou8(gkHWdqrM9M;!uT<girY{Q}K@Yo4XVP!t+h)|1+W20<9U!70NzF{h
zA<GO8Q<!d4<C&}|!^qZX0L$tse!^I;Gu*&PuW>7KG~FW@*0N%v0FS$yJ92%#s8Zhk
z$#wBrkqK45^(vn+vz;E3RTipBy|ekujWwUM6{Z(8vca35AtQb%ecJba$mBwu`18)q
zIa_uMXo|t|n0HxxTtt0o2!BR~Z{lw;HB^etm;(>@XpeB~En2EsM3odSq^V~2CGCDp
z`s>q<KvZQaw88cCG3vmaNd29~lNU013L)+utDVhiY)~r;VNQ>Jqx#aynv2Qy<1}G?
z_ba?Hx;`B1*apcR;(F;JBN&5S*YN;*Nmj2uG=87&yxFn)h!Kepn6WzOolTz+l40O1
zd+zArJ3VT*)4tlN@77oQqa)r;^7Su|G#7`EzGTbUwUnkW#k-^;c8}+w9_+R=<usJy
z!Go6~u)Q6cyhTy|>*TG-8stEQ79;%ZEk+lH@P`h5Dy2CJW%E~m()?Poj%9*t7*Wi3
z(6qaVY(5q84gP*A=1rnu(XQPS?B$z*`ZIy07kFb3Odm1|=^4)!tT+^}b3NPi%W*Y7
zy0?S4Auv0=s=wAZRH#<xInCjADq^CRJ$R+2oZ<Yq1T4?p^oI8bY=z^tzZG2e(f!jw
z+5wGJ@As2;hd1B8NRv&vkZ)$GYPBJyKCYTzl=4JU=<90tlY}zruj^vbQ};V+zsW@3
z@4$7)U!7^5hejW-ulK&LF+SSb8emmQ5}U34vAUIpR<q{umsA0n+<cj?%<pg&?gnqG
zmB^SA?{d0AU(Uto@bmSMr>V}eCRmN@#I4s4;fl+Q8fnux*8EOCk<HtY1s8m>(8gEc
zwmG8@VBn7nY%^oqcXQVWGxn3}cj{zcaj3De%Fou6WEXh2?p+Of_NYZIZxU-*)Cf_k
z{7#i1Eb4#>?XH-z;;fQ`2_X^`a$aQSTeHe7T?$NdmrAn2VD%bO)IHXihjuUZEpz=)
zH8KNr$!PZ{r|XKO2+!ILRbu9VEt$4kev{shH`#xhV8?m;^iR%O-6rIHVQD~8+b$+w
zA_<EgUtx~Ovt{0yx0H5>9ocH0v0|&zg!O6v8C*U<Z4}K(7<7MBbddo`##`OFYjoeE
z2&1Quj~}p{XVmk+D{^^HK1Dh~8BhWaK}cv=&haZ+Rp}HFM@bRfYJ$N$W>%>0O#kJB
zX`_&+J;<ziZc+n&-!Pd_RA~WZl#P(F5^Hz|o6v1vrI)Xhig)bxq@k8?qg36+U_z$P
z&T0{3#5>DRc3D3e^eO$K^2*fdRUF{EhfkZ?av{iTR-P3A6{0aRndk8n$7^7|KB0&2
zh4)*tK{*pTH_pyElN;rr3o4y*_Gjw`09krYmpk}~;;?o!^D}Y3duzf(rZ%HWX))Em
z90Bq)-Ss!F2m=)7I0VvHtNr#+e>1+1)}lK10jsjY%ackGts{fM<z(KQ$nM(~$5$MZ
zkuB4=?%1nAHa7in^1a&Kq7GO42I(<QOWNe-Q>=jdvV6wdK}|kL1hz?9<IlaM)VuE=
zrU1F@*~;H%WUITg3wG2-FA@;$yfB7&9XQ;~;HL;Knz)E$A4I>v9%InEZS#Uv1Y~#N
zTw#oInNO2l3+E;cCHiQBUWLZQvitR9au>tT7nI`1p9{^YB%APljvTGfBZ27ZS?9M{
zAcMWdp28kbYg5k`m{1PH@e3asR*c)-s_mKXaoBho<3Gq}44@~sixQn7h4WVP(xs%W
zfWc2CL5h?8iDmbdaEBGudWO6ux?wU57S}q-%j+8^b9JBE93(V(fNwJ;x&Owa>F^cr
z2!D6p5hHk+{SDZp#a=8O)J@;si|7|%rsFLRA8eG~rp^*GHta4u$%bUwH^L8#m1`h#
z&(4KoFQD&JBB_O@E(PjRX@Lzb@tYo+l59ZeTa84deR9TOtvL}7QP`2ZAxm+G2<mw*
zL5I5cd`oQQB}7wtOu*eUYv=(j_XUt-`NP;>x-vns+xDdf^dtkOGsX$Ch7bZvtFOC8
zVEZs-17zJ!GjKW&S_YAU71%P4jJM?QUC|6b%X<??4(+>G<?23un<tZ{q|)cseYi!Q
zg1g9Wo>}K#w=iTb=To;|w*tuAOrc*0K&U5#n^@Qixc8%S&hn3>2Pc1Vvr`9rq|W~j
z<nBYH)fbGHcP&{4J17#GJE!t9OnaiOZ2R>ukPI@m@blG*Wx;hRz26j{W9#VqlVp25
z94yGv=8EMzOm3VXp9Un8IS13w56l;Osrq{d&_>JItJ9wJdvD?iis41Hr~ht*gJO8{
zdlG*)5<y+Yf0Oq4yQf0`EgSQX4v+o@t&|;hIx-!I=j|;1nngK>^bS*YcP3Owba>we
z)m_F(+JBso<!Py)J{pc_a?=1ZW~sClBZ@S+juzXkqz}F>5N7|D!W^wWtNGNh&?F!y
zxFn(^L@3e2xjlyQ1jwzQE4Vll>L|(FdHgfMk?D5tJ;o<k9{xB@s)y@hi33>`OV0z}
z)?}tH)j9HTo$`;4ro36)QnAibP6=d!WZ0-{D(FqK{M`|3`Ck2tvao|T6H(9-#Xn67
zvHicp`Oi<<{zh5<hq>4P<P`9KOSTlzSv1b6;fK@Ev@;URZ!eG{GCQfO!7F_%^B4@I
zG{9BLFvSS_B7N`TQ$1sPqlu!kt&h2J^&f^8b^<5^62*VpvM!jMVie`Gg&v{9^`nr`
z?$%{V$!D`W`^jjLzo0a)KG@m_pi4^td0i6<xOCep;Ta|@G^2qW8A>JSf;~NUb9em=
z&Ck_dgyG|5-8<_FuA0lL&89&t_I{ysoY`z+8;Di2@+iI{q%a~QNcu9rzrXfcn<Jno
zt0k6Kr4CbhB{G>BIG2r;0eNXB2`apaEbIXG=G;-D*7$HvIUTqsunE*eohEP1wFTNw
zm-|Wwb5U*q_czY;^DLfv9@g!AgI!MdFR9QRI*TuQM!CP24%A#cFx0lBAG%plJCXW8
z7R{OX6_l~KpDd+f1x}ilGL;RrLRn=3i#ATLc}VlY8_<>;pw}6J6j6tL(cfVlkk9@9
zHc<0uEZenC#r3PMbpP7_-6yHE%9Z}<fpi!9W*IrGu;*j6pxI-*cAS@*1|MLRt$bG`
z)bAl>@5X56C})9x*&)PU$K}ZQSR=u<V9UyH&2F1IMZU2?o)#my%xFmJ2%m^8|E8gE
zT5)5NsQ9H4T6}T1MI#I=tLR;Pfm1>hr`;&IX5P1f=$h5{i`z(TS?UMZi1qQ$B6gdX
z-)n|Z1qJHNWzDqi>B61fF;A;K{6M{x`NPOf?lxSyoUS0J_{-NIbDG_?9NGFiDh(@x
zV;5XPv1L8Z`4@xhO%L8Th1=3+R=v@HSH>B8bW6^eZLv^LfG&`~1z_2HnpxC7{m6H}
zW$S)Z%gqSv&eMh=H-lr(_tP-+G=slk%O&u~^9OMux4ANpXGW`j`d^E{x~jl8s7xlQ
zYAd}hG?c_A%k~MoT(3w)Ge6CmYyGuZFjBLODqDHaFowxHa%>sMLFJ0UN3f8hfu4P>
zo3gjJ3}^LTPp5N9&Z6~I&@s!buoTdidy${|n_i^r{0n&e_Y_LC1tuQ-n)U(k`&@@o
ztfJ>$TMNjx9^&_E>7+*A710jAofr(We;AclN=Qk5E$_#?!JCepSMgtUj8ZtH2bGfg
z@4!|Vx9FfF0~KeIA~J1iTKBdvpBdR%d!PK>PY?e2w+R-AF%oV@D)3Se<d}Ha78a%C
zd@exko|?k*ydpEp(q?Lqr0jC>+2$`Fzjg35T;g{q`2+ianxo(Mb3oMz7y}LP_ytxZ
zuSf;@@sVH#HgcH!7`(Y+TB8u$vb)j2Qhw(uUM7rgfBr#n%*1!;KM8<0e<l-})u11D
z>Q!KTHBASGd8(chdu^2?9W%ud#W1xgH(7%^ckAO5lTX%q49+%l*v>7pi2>X`V0Xp=
z(pRo{Q;o|QD@)syE(vbev9Wj_W*$^f28x3>i+lELd}R0?Qa@Aid~`Xa#*q@SorX4k
z!N-|0iC!x&>!pG=8LBTR81km0GeU&(OICM=M3|)xBB-J4Eajcwkp{+GJ^QOGVz3d!
zz*o1ZyGGmlR9j!AMZrdOF-Na#%G4B3v$@(wWC1J$KqfASOz0bQ&?WjdMy_S2T&y9U
z#|QPYHrmZJ(;!gE6BsdoH5HT=<?tgZ?!K*U@cn|ff#)Fb`XBW3CN(UqH`QrjIj)l(
zh0sK?^<00>05!}rj?3uHy}XtBpf8W8f&^A8q{!2djeYf|u3k_g=5+tkMmXqbw{g>&
z#TfMKiF%==REmhhoe!!-)Jb86B0Z#o6$So$E?_(;q|5}<GxlJAM$Qk7&p%R|yw(Fx
z$cqA}5D%W7@oX7Bcqv|BKooQJbz05FWx5r7T()^{FoXTw8IF`GGoY6R_C7aic`ldE
z#Y9s#!}5@>KREjtXe|(;uqJi*akQK8+$W{QDMLoL_SyajSy`QeC{m)K+qxJB(tzKg
z3K;0%^D>XMf>>kpGR?8%C3Lp%x0qXM@-^MbqdZ8#8?<KdN=Ci|Q`xoC*)!iBPwYAN
zKNK$Ubo|jD@+MdnlmUEJv-Tg@_CNVBr-ej$HviK#&T*BS6hP6@GSDnizk~cQm#s}R

diff --git a/docs/sl_plot_files/figure-html/unnamed-chunk-7-1.png b/docs/sl_plot_files/figure-html/unnamed-chunk-7-1.png
index 626d52675731ffe159d5af917f1a856c14bda92a..74d9fea7496b870c1bac0cdb079e9799be91ed42 100644
GIT binary patch
literal 12125
zcmeHt2Q-{(yC|8#AdEzd7Ez)G38F?BA|i;9=rtjFOE7xb89Rs`f{?+8go(NZBf4x+
zqK@8zL>opBWpw6#$lm|I&N}CwbI-kN{r9eQKkt||&s(1Nefs-6-*fm~O*$HO8Zt66
zI<4C`?~#$6K?5IE2nc}K<?<uQ$jH0lItCiRPckw9s6a+$fBX#sk%7Qupd~U8iA+I(
zOu?Q^A%V;uXjpP`@-t`7{2BrR9x(6+0t5e-KwuJR2?SbN0+C2y5ZNy<7<iVBJC}g(
zB`}FZMMXtROMCY0Sw==iCMG6sZf+hP9w{j)Sy@>CJ%H>O;qhayU=Oqe1$(SQLV`lV
zxbE@euB#iT>khO6-MBVGLqiJ-3;W|u1Eb08kLM&DPda`QfIs^L;6K(rVcZ@IG!ih`
z-964duE0I6&AnhYHa0d6Sk4`20DzRBK$f5Y%s*ZNn0Acw_zRnW1=@JRI4LbHt-xKk
zAkMv@ZMI;RgtaHb+AClafM$O@<oFrKjsuN^C5>ZAq_#NSwl-iasf|P$Pf!?7uph?)
zEn)n0-0@i8A&rwrvjy(6ZE>@0z^bGr5ZMwKbV4nFmH^F`NMvLr5E%&!22cWv0&5*F
z56qk`AkDUsW`Rk^*Z?HJN+c3Vs_9WXz)$MOw@tms$haboKjiUqYj$L0m&mkk!VLUS
z%NemXoXv<la~nDi&S1I1jLT6azF*E38EHpznox#0Jn{!UXJz^s`ARjB&f;9h)-;2t
z$+b8}VHmh;g#Z%n8$75qx1Q+Ft0}P0t?tesC^l@|c)S{8KdCTCoXjsKlst-4y~+6{
zmr?bS1v%`TJ{4HwCKm(KIfN?w=D>drC{;mrpSfkiu2J^%g%qr&;~CmWn&W~zV|k4Q
z#Q9$XlsiJj3r1vSf0OZ?xi7YQ<uIy!bg%9<g;MF;^g)`!olis%(&!U|cZRc(=pWNm
z!%&DBg*pzAZ(7tC#ciR2HN^?|U5C}-Ry=ty%w3eqLh|Z3W@leGyCOq6U9BB5B;>}6
zHG>xsA;AkA>)VWkti;x()ykmd*Ly_cGp@NQZcXHd-wqiKT(j~9C1hiD9)(58X6*#;
z?r{)x&GYl7Lh{?vun{{i#nD0LA*;CpY%4m<j~CJy6&UG`)TCFtO44#)S0+15ziyS~
zTX_C~CSW7E1lkpep4*S_k6$b?#D4DoKK3yt?9xIkzrWhyy1!dkJ6+w#Z+gSBZag|`
zTRa(FMM|IZ?zWv_@fZdN2k3uZOGjG^t4Mi>dKk@Co`b0jhyK3qv5=spU4K+LGmp4F
zQ4+0^bJJrUTXOjHO&ZObjE~&UBkDbkQm4C^l|pQGveMM6;3EUu{&W^xRw{R3kg`j8
z#KAzQ*2}kFhP5kbV5I*0NYR?dus)A-Fp71yL2G4Y53wHpU`IY=rcm__Db<(A#V(V#
z`x-Vk>)xvv@28LLd?@YcIYFen5|*y}UUO$JJY}5td>Vo17r!A=pK)MSrZkZEIkcr+
zokaB0fcHIdseF&tyU>@d;waW5{a82Skg<HEfZtqmPO;!fDJ_06V5r_lz5ZparE5v!
zlS|;b?8;I6oyfg#E7y->x!1+uE0-dzLn=ov67I{MpP=oC53xE|K1;B!$Iv=gGZlqs
z`%mFWQ!(fd_af@8T+iCt*)?5&u}&_&hzjW{Z$kxLeZ&cYHQ?Mr{`>*$qqFQprN1^J
zHK{o!d({COtryyUm}SJm4(ll1f@>90=T9l?GjHB3;{tft`9nT*&O8@8=vRH)w{$nk
z`pdBQL4(K9-8ra?Be1B$opWM0ZPo9G=D$wyW)i?-w-`vqfoavhy>4Yi=Jy2a$NYR3
z6m1%`yR}-8Y;5Exg(Or^vFTM&6uHhjI9tCqbRaSepgC5*CXC;LrisH`UJnU4t}V7V
zOeM%n3JE|T0-~R7T1!(FzI*dsL*AgrQFCHRvgn0|4Y9Lpm#f#hS?^`+H9Eh^|5{k>
zG`t8KJbE;0LkEjKa|3LM?xI$ZDq!#V>U!|qWDB-9Jiz-|YJ}?D!n}EFQfn+Umd=vV
z+sJ+F-m7-W20Lzpy2C64`Cu?EfSeeN^MPsk2e3T>A&2^vt-9$w5*yw!Hov_acPW0@
zr9j0cCG8RhCOcJ~%_1^LS?sak87*@&zbn6a^FT#rEJw0p7s?)#BaX3UnG$fUs1@{%
zyN=ijOmix|VSHDB6{It+;5g?(3)54@ou3HOUiNpkCU69Nw=2>h6u{yTxI5&s@v`8G
zk}xc_nb_*0E{#aR=8n`}V}U97#r}Nr&KsHGE{_*{tj&;nyXkDx4exzWZ6a2$<Srre
zsjC-vojC${9P2c6Sf4Zn@Gq{77FLT2STBX6k%U{$iircqI~t{o@FPapz41w~B#}=D
z9SOL!hAa-ZYb|D%B#SXf(nq0XML=gKaLF&~hImD}qh-yQJ-AC~%`Qfh#zc^PwrlxM
z0qM}mYER@8F_L!46V4El$(Gm6-MMg>9)eg{5?dnUnMOm*OqbrfEfDyhyN|VuYHYd+
zd@wWHVwzqKM{kv-Z8i*n-#JKqLCNqt{vmf2Z$zn9_OvF^oaH<1UnaOx5I^>(zT%jr
zIJn}?XybU&#`6{@T`@=BDu#h5dyt1-ch(a1pziRU2SG?)tl*J{d=qJcL2eUmD9z#b
z+Ve=Z%=Ljv&W-wu17-OsG{3*q|5qFMf317@|JeUkj{W~G%F_uiG(}HcF5wRLdng^S
z!3Z$}@i`!UQaSG7MEQ7uK0dao-OJ#24`y|MP@;)?Z=pSsCctj9U2tPR^;Ss`C5-yy
zKwlpqkCw*yL>B63^H+oX*4}Ze!_VC61}}@tzC;ge=2RX%g9J>}Rx9uEfG?je7Dm0d
zKGo^L2rG#Rc^lH_%Om7joINoYe!e_=I!D{yvB5Wcgt`miEebAeJ_+HH&=t>e(KDcM
zZ6u)Z%?wc3^?yrDJ4U85KhaaDGAx>?R~R<*sVxmXF}F?~#iu26)l&el7(qzoYUu#B
z*6H!alRi&Kz$%g;y*lHX>vK9H2HCwDDs&LEQMT8L9HNia#kqb1@hn80EBA491+c5b
zd&aU$snhAs!jxPhS_B+ru7Zh$T<ovWqm2v$W&dvux<-?Jb(j6u30to?_OUYzaKxaf
z$1IC0(MREwMW^SxM$4}7izW{s1XD$68Ccm<9*n~>ZUo##8II1ZP`70StSd6$lyLvu
zK`Tk<z=op*JVQC?RKzO4b^ENt^BYw7B!2&O5QIQ?B4EB;uo8jzLmTCW!fw071{hrB
zl!q>m0Bt9Kyw3Wdi*L_m2{pL&-*D4c!q=4!o*pzDa3KRuLw-w3T%GURv|IgD_=DCR
z^ywKsQX!oMxl!72oji_$r?Z!6M0{XVzo92iMW<LCb8)&P-xB^K%!m9$b84#5Hme(v
zsCsRwYtgHxI^atO^H?m9pL(@g_j)0O>2I9s@N2cva&H9gL`?nMVnp&DYhFzpdZT8w
zZmWK0?OR|^=#N!Fu*R_-`HI1sZsPup)IA<RuGDQiOIbBZCP|!9$q>w(^v3={_T(w+
zPTl2+m>2UpeuJ3(NBsIIfm}IEdag&J+JXh2>P#`;!i4WNEgJGuI@7@x9~~7i46vTa
z#0opoN;k17bVt)+HuTH);b7wL=(e;s6LZDl3zLfL2JkhK?AwAPyr??-#C907Zhn$S
z&@UJw^4I4+lY(mgqA?I1`uB<<dQnFzVB(n*8ZPl*>VI4q=JyXfxsF*{!o4gHGNkqh
zwpXP70V|yn-c}|SV}|~Tpg2W`M7&B${|;;PezYoF;xCqqthxy9b(w2<?&u&p;tu~l
z-vRe*V}0IALnHzo`fDt;LKZ3Kr{}7%L(fs;lpZANSOZqlk>QcQcI@{Wta0f^lh{Hk
z$sjg#OZ@Ue7Iy$2U=_B}R7I8w5eT@)=~5?=$zMVN$a33f>kK`560xTgzDj#aQv|Hw
z3I6O5?AMO=sGYlMo}sNyEu<2~a^JJR)GnBjDQ_G>c1j;%p}Un!WG71u>*178?!)A#
zOd%kRR?hEf%1sp0o{GaDMbShhd56yA>5_-wL$QAzO&R^`Q2&m)&ak}9q>kEvDI!m~
zpaH*eljq8*as7w)wA8>&>)^5k01-Ia%ZWcCRL%Z`K32xa{w0pr*B-1T>{uffQ~?Wr
zY<>a7tn&2R5OHr<fc`~=u8C#uZ$UWv(_I>~zC@il#{AnUW=(isnA%@dEua<Ig2k5~
z(Zhzpr^F3MS0>I<)Xh|FCxM~*KdJtLt{<VlR9XiU2l1bKSZfcD<rDA(#eA3_a=JTN
zdQjL4DUF&AOHJJFK}VKS-d*D@mHS{MFP<IXcL0*|`QM}|KHtCQXIAo?iklYa$Cedv
zoEffe+bVe3jF^9ytz?<>f<HSCUT#G0G4?_3aqI*&X9XJC{l!aNCS+eDJMXNG5c_K&
zW@Yep(xHVF<lH#<rBBN)cSF?X;H~A~y{b57oa+Nfwe;1`CBFgUq=l=q4&B_KgG6cd
z(KyOHRyj6+>-uZ>W~Rk2Py(q%LMSCIC1<p;j$t!Dz1n(3?s=<P@PWLnjJE{1?p=AU
zm%uKeq6YtXUnBJKro3!Kz7-_j!z@trh2YTCpLDK=pGxsxKa@>T!MZfO%<fwx4UlvC
zce{054rVY=-2H~C9swbJ$TTy(#*tp3VCEXMhbqqfTbtKP0XiVEA>Rj93LT>WW(0Fh
z&n2Tg_r$wCU#X{++d>5@XeD;&NKPKxJN}46V?x-F_*RQMNHfbzFE#D+Px0x<bRn*-
z2EqkoOO}@kE1|jVXwqdhnj2cbeb9OoqIPOBhR;jufPZ<N!*kvx{g+!AnB<3hS3HLq
zH~UvRX4atf!*lXh01!ykd_{l<eOb;SGqp1}Rnn;cwx+2`vtLw{H%273jyQV=KmK8n
zFMnB@zko04{<h+CbSihl3<eW9lbpY|DiQt?Jxh4-l}Si7x37tNrplDjQ$r`0)~7B%
z?tZ%nF+;iMb$*Q~OEW80buMU(Dksh~UiT5a3NF$dzm9TaHbE#Ba#0nRDn1Ro1eiom
zn@63GR3?gvB0E@`!urcYF`(g*j7B8}1HG7Xw3^Yp*1e_Rn`0t>?4_7U(OcO1p4o;S
zn={s8Vc2S>gUSRwG9Y`j5#UXRyYE)#ca@;xab1G(9S-$c)^xhBv@ksBu|4VHo8Pn&
zp}=n_3~zn(qcA8^Ew3L|+WGs56+4z{L#bA^!#zNpNZ><Fi@`<OI7NI)$U}w9AC#9W
zsp8RrDxVN*lix62?xSVrJ(lmLEW7$^UV^C{9*vewg*5mf@CTF^-{7pCCP)JpuU3>-
z$5(^;ikceNY62GwTo-7iH%a`?hnSWG6Dc);UczKKgZJX^jS^~*YQM&aY8UlZ#SzLP
z%g?cH6vzE*=ZGl`FAHetcrX^(p_U{+^^0(ktPVO@aN{}rS3TJF<TcR^fQgZtWgT>l
zJdU06+g_2ZNP_yRTDM@2d3BE_x7CH%$%D7+-9Wg?d>pP`{`SgiWsYA<#mU`$O9R?4
zIV8r;Q6M>4Lk2Vdq>umFYA3*pnUl^H%`sL^n`)2_m@8W^8qZn9hDbXuzj1e^m0Ljt
zeuV3R-BfgECn*N?lxuhT;zhfU7?9Xs;es)|V;zs^H@C9By}NKv!w6z_>i#)y<3w|~
z-)AL1JpA5ld~~$jyP&7?K2*l>G(1|VLfd)xuc}osnsvU2spj?MDhf|6RZROK9!ORC
z?wkQ`Jg3(@tBZ8lq%YrB!i!1Jhb)Frl@^^-!+Gkz9}#owOt!EL@M7x@wpR+*KBm9&
zXW6h<V?$vqPXY}BJ6`B*sJ0}!B;iJwfTUj|(nw+O9a08LAyHM$7^~as`VB)d5x6>N
zUwbRg7uz|_iY%TCGxFwi81<us4c{z#n#1D#OlU}jbqO6WK8ixjmR-O-%T&`pyXFEI
zuwd5mx!ZlrV)nuW5oF4J-t4@Xvq^7>xKFqHZ**+qwY+MIUHHPNMWlnOe6Ac#QdD(%
zla}{5zgQXu7pn;`_<fmct#kaL@R3SBzAOmk5M9)ry5TonU47#fdSgGiEN#USez<_}
zlDvNiPgHz}C`PW`M`U+*#P8!q=pG-)$9q)}H|}v_QLX)!!-w*JQY$o&vJ=*H2Tj>w
z_-&G_biiWKUSUXb{&|>XZ&-^vGN;EsodedPuMF>wt+zLWI4>g4&{PK$!e0;=R%3QJ
zYA85^yK_NB-q{a5-B*g9%lb@s#mG@)*cBkqN{&BR0GlaAJr;ruQK86S?$FWZJ!)|$
z*UXaYVVJ_&j12RH$cVBKQg0r_PMnETaYzC5_gd=VYyM{}-W3ZlTiH)aZE3b??+?-6
zLd2wCxWP}sZD|j)Cq3bR?5hQLr15I8`qvm&nEj<kWp=%3E{W2#PcUVc@KAM-LB+k(
zE=^R~@*kFYDDA~Lcej+`-r|yCe#eCc_~5TRhTJ5oNKo1POBHV&&dXw(8@UJYs(0R1
z1yQKp&Ae!S7=f+_)V*AOT(6$kQ^gxxL$U-fD{vvvMc*8~<{8QZ=mSJ2t#SUZ<j;YN
z!g9LOY$NlKaT`ILcX7G74ANi#0h@r<qsY_<_`5gY<-IKtB<1ixW&ScVL@Nha`Ln##
z6)D5F9!eBK31~X)QhEYioV-K$v%Px(Ll?{63xkOi9_HQ8Hg)#V4ARnad#KkFj&150
zok*W4Iy(5^9SXHRp>#UV!0tzy1|97Dc-#{DijNv@!As!2Kc5R)Tlvq6S|1=|`g#y{
z|L(V0q9M?iUgNy52QbAYY8YQnRdt?8dvyoamljqBNccyuVj8m}<xzO|5)J!j9J(U9
zrgZ$%6TAi2G>;>Gta)N&8Sr7nI(A6tTA9sD>lotqVVEg};qaeV#3Or&e^`HK3$(37
z+V)gQCR593<)aKs-0LfZ-dH2^3#cQSrW4gHp{>`~du4q%fTM`sPgCvCd6zJ@bHln&
zmUst_Q1VI1O{*6&9~S8P;mh{Cq13#wuD!|x<2&)Eo72lcx_~Sg_fKh2)8O+46TQ58
z8VgA@24d?5mTi3@S-BzCvE<v=@Xwb7UUk@9Tb1O(I8J<^T~0#hg1RIpp4nG}y1W8e
z$2wZ#6!2S_p3}8qeIHB;Env9Er5Q+U7K4Hqn8-25inNJ@vYHEH=3eftt+?;26tX10
zGt@~$Hp|dB*9g7OK{Kz;^<Ueo?R*KPbgC{(x}KWWHx!%`$uUkJC+je7m%$aW)0`Q$
zBb;8=KuhG^-5e=(MbR(O5>5B7NKUt4!)Cfh116qSYV{Smwh06WdA{<Wyx~fsNahPl
zDX`V5(0y3*_3A&3vlF0F=E!XC&z@Rl-L{0wYqq~bd&)j@<=qdDt}I>t7U?xKZmM&;
z05np#p{A5=teAeKLl5tt88Ff4GevQo%Tb%vnJd7?-Bna>9yQnfW<*Q6^>T;1)B+nZ
z+MYA-7JOU?3R?z9&~32&UKU~3AfnS9`xNetz5{n*Wlu$4m{!aIU2S($Dt6t3rv^!D
z?kH17Y29=1Cc7nXW|#a>)S$ZpWT?b3O&s;{eEweEy8LU><@FYKs@8NVQ<{6olx<U-
zJk=|qL59P0{;tj4_L-qBT>X<bZmz6yeJEXSINLO<Z@#{~BKOh~Tb-HxdZY=*ICY#9
z-cus~;GJiQL|WPYr-c=v>QtwhA)PuijI|1{o2#r`JE}m?o5@mm5w<J~wY(V3m*IKq
zX5e=#E`o*PwCj({--Nt!Q=49A^b(XYhg%&5A1DknQd1bgU?NbJ%IU0Hv?gZUMY05!
zSZECBnG|mQ3Ea-QDB~pYPETHz1vOgOVfiH#x45TiE4(&h%*LJpmtbiQxo%WzOLp_k
ziO9?GS9Arq1hg1lUdHOe<&(Y;->=LxE56ZAUj4BWcbJ-%Ywuws?w9M7VjBq!1Ds9z
zhO`8Ilf*55ug3cj1)?>Ed&$NB!xip3>h}TZ0+JuS^Iv74eXGkWK60l1G98|Ejr_AZ
z{SPw@Np!!=Qs?D`0nV4_Egf@<BMY~hPB$!r$3EXHm;Ahc>&f+?l<WB0K;{8Bhb#aF
z64<go<dW2D&UvHK6eHg=Um4C610w)j=kSG4jrOS+8Bgz_4xMOo`eH5{dI^Em#RnL$
zA%5R}RC?IKD6^f@1;jA$)E)%H8p0UUd-qg4tKcOoijFn3^B>v<o}FL3nvBe~iRqbx
zUZ2flL~x)&P=C~heEvFO^te`jxW}<QYIsA-{gwlFVYOn+g53Q>zSM5~`@QRWdIjQR
zlI`knD!_KRb+1oqt#2~;fA8|kFInjvEDYTCPFbwr&C<8pdEX!&+c{w8Z<@c!M9N@S
ztcF7fssR7GMz3J-yYTmN$%hsqP*RMbAhE*6$`Z4AuP5H~@B!s$ApL#F*g1d@G7iBX
zUewk_ThX<*hFLWK91tc-ZJaZhSiUv!22N~n4q|PgzkhaZ0!ULidR=^NimlH=?|8@!
zSkdcc_6>)P3$BwKV&SQ`=n<7sT8XkJ8?L76TGz?)d0E0Yp}>RxxhThBllGnwC=Q0o
zd$A3jA3{ZK==6J=)jlk~{AI5KUb2qL-{1H$7x~_wFIB2uI?H{|Fk@fHq`>=wY;sd@
zfU~ho^zfbFnH{I)*m_RF0RCbWi7sOFF`7PFcW@FRBPY|@_i$g8p$g5x(m7dV`sN8~
zX8O-=@k(n~PL+2an>TT#@)?)7&&G32u+jU5zYjpCE+|uh)&efkO>8ShZ|eTBqM1mD
zAC>IE5P%B}f|>fz{Yj8>wKU!lY&cPmQpwdc{K3g}Hp2On?Z+}HPEI8S&U|I>u0Sab
zVUvNnkVDwBdEwBbO6!-B^QOx+^AOTU6}?>?7v`1HMJ{I*-?(<A9wCY)c70lB(0-yD
ztEAZE>I<|@gp`s34tY^YM1p?g?Sr-JTfjx^55X!0p8Ty($)dLei{s?kVTOOI;WC~k
zdTDxRgZ$s}a72!b%44NQwB`&4KOVl}nD|~3Ex3h^nXi{O?(P*#{hG`gU=PGF#ctBb
z{Fr8jh9oX7&ihDusx%7`j$Cyf%s@F&_3_)-WlGJojp^rgZmb?YtS{q;%|)CoyWYbU
zat!fksWLJJ>9V(<9tatG&0W5ts2NX3)jIo9*yH_gQ{m=3SZ$n*l9m`TmUx&XqU40<
z3DIFy5!FMDBPM8V_>g8czLN5FifpK$tx;RecrGP>XJ1d}4~kPt!Zr?%*9T@d7yDo9
ztUibs84}4%9^ajH>SeOo*Yjx(wfs~gA~2t~Q?!2M)H^*Wo7&O>MMO1}dCPV7!LT1c
zQB)O$Zb)>lN(4R|$-h{>pt@mDY~C?34!jZ~eEcqeMuBk?;nj~UuP4q&HV)ov^%j?s
zl`z3E@w)H|)m-k&<{4|TVpIw<u0P&=gLugpm)Q|+_#zm;2bt78SC2qNCl8L1_pIkK
ztkJDa8oCv!-aanc^L3hLIp!(g3^KNbLk+5HSL7?jBUzAU4HPggAU=ta2XaiUS)#Dk
zhZJrNWl4Tzf*m@U=j?1HK$>Y~3jQW5zHx&U7yNfWzAaV{Vk@d~>d(9~uzw2`TL<QJ
z=qB(!2$oE$)p38Kk#{Dd&2*|D`^nixBJ+t7^L1C<SbU-bJ^a1RbaL{Vi?R*m#L!*C
zTV%>8(|&+kQ~MhwRrd*(+!(Y~=+>+02J9p~P?Hk%G8+Ecu^-jOHxk_p-xa#qdW9OP
z04Q)#=cqTDAf);vP?0zgueI#%TX9;$pKM1}p#6Cq{cR<MF^3k8C-^HR9h5#7<QUA4
zYFC4pkqW<TOQjUPw0{1I`PW5Cq>p;p(@JT4X*FY7^&(^V4uhl2Pwe~+!=$%sHoM$O
zZ|?#m3iT9U&A&0_rbIJ)ZnGVFMGA3ZpsH%;{R-)KA2nsy7p!{+5xkf5FOk&RSxqq8
zx5}Q{c2(87s4FwoL@BO^h^t>-lFLHf9i(GZR1$ly^cd5B?24rE>-DmPMap%`n@%Zo
zbER1pko;AvC1Sasuj(&n)Uh-&5NsC_=K2R8MRFxnyEW<lo^)WiIMWFspUhj_aMLEf
z+Ev{|+awH!i@>^Q1i+RhK2Kz@8~}IdVEq|S&rA2K*H)8c!*>uatPZv{pPtNry)Zo&
zR{4l3J*uwn%gsr_fl82=z)BH*K>Y-5A8ILyzlth9(^_a!DcH=XFjFtO$1^yr#*_MG
zBn>PW2qaCsiY26;_gYP&RV_z-6gDg{#(6>=E~xdwj}qc_LG-^InuRsS`m3(%ho$EO
zdBRH^DvL`uzYM<V@C-j;bF^n>T;4ov?GF5KM<IZg3POkmiWmCbd(w8q3niT>N8_&y
zZydHU+c9p=KMaBNPbh5Asht^Cb`4AicwAuQ{lRDXJj%m)eR><$!gsC$%#)cbd}$zB
zK=5f#=9qYxH~_rgF`17d-dEmCa_rm_OiB9_@Q&ljUNfI$Ofb;j?N3WOw6G$eOmUKd
z`$uB(zYo+*-|#MUAB6i?`Q`S0-o=F7B|o8>oEM97yXGBe#9T*v(~(aGG<uQgS5)Hg
zJ*PHOs%s<L-!!wACu9nt>|SvHR0>*9c{5JA;4V-3cH=AyIWh1Y+Z+!@0&rBezzt2T
z8b>Iz9^9bGhz~+&`bXb5G_Ud~$l6oNG~xcN5Qe@B1T`(FU2t+GxNC6Emr(g|?VGdz
zQnQ8kNX?L@Y0o7LBOr>`9I!lAN`bem0t-VsHV0d6gE!3lYZ8;91Cf;m5abxZav?AK
zbbehgK1}tzy3!n<RO%FdZ%}K)fTCk&=;S?`I4OrrJAwYEBG(P6(wD@grHljToBGpo
zXrCQ(8;Au>SqMCiCq}7K*x~FNj}veY2bgnBYdQ+T5hxENW*(B$cIezVXKO0~ST4nc
zQg{!ezRZ>+P%+6H_y6B3nf#wCzWkR~T4_MXE7x9SuiO2SSa}I3-{l;a?>4_Tzld2q
z=-XuhXYk+^#w^{1fD)h8?xPS=-$HVag+~!Drd9?~Sfba}r=!dx%e`_|ay&z@R<`pr
zdHU5CwrUCInrn)dI2>6U5<#{X?DuCFSbfjRHI?DK+n=M@lws?%RB`C&3gkbwEpbaZ
ztLa%P-nA7-^!ky|n;9nOc}1tpJf{%X1bRv*h1=sRambcjz{pKe)Jg8W*z+GZ89f^E
zgw56E{+?{Apwpl6P(Y#gd#`O1;7$3v%y0Qi%K)qi6kh<!ketV5$Qf6E(c$lBbnog3
z<lW6wKsZ14e7ruIG+k-i8b_BI?DP0u?PSKze1zPE<3gn-1Qu=hE~QfEW3~5bOjdMZ
z+L(bU>8<;5olxvdhmIv+=QC;9U0GC`)Pe=2IX<o;S)wx@ah0zP-9Z)`pVnyh#T`HL
zX}SC=Ki1RkE%YtSjXm8?sl0?at&;%BrrpE#_uAXyn7bRw-S*C>sc()u02ul##v{MG
z4`LQfi!?edR#7r~6aV7^(7#gw_-|JAfC32}+luzj>9eyxxEQ=u&d3K+fhXcsyC=zE
z+k6RSzN)xG$bZnasR#dTMDag;eXkb^dmT@99ct-1nRg}E&+o-#+weMnKjux!MoXoa
z1lY|V43wdj7&hB6MWs1+t1|xvJI;vDtTpF|@}<9B*2+Dn!H19az$-(>d}iiFi8V2r
ztfalINEs~gsDJGyAHM6PZykbLf6Ck2LhM~A3gwA)3r=*B?(Ov77_WjNu{Una9%uQi
z4k}1awTy8~5+q%>pmJr<<#fmS+TG=^AlUfD27@0puVvz;Z`+P%@iH5JEnZG>4N%+$
zQhhd8_gs%wx#MJ%&dBGGknSOh+uAtK(wvd3@g3z_DOY4mEzY|J(ctejUS*Axsm>g~
zRx--@+ePoSm0V9Clc+?94G>$H$9h4*2;I>AfswVIX}b}y2Gluzo==tAlJL;hJnIp=
z;XuIQ={Y?iEu7cHWgnpQtv@_Jy4_bhy5s?D1%^w}{B5%4QmV>I0~e9={m{seVA?I_
zSOkvlgalg#xTSgi*M88;U97Qnvs$_O8e+$kvx1E68Q@enVyyy1=j$=OBiNH^DB0SK
zeI6kj7Z8&74Lu|(QsI&iFX1<IB<8;Y2#--DEsvKR2CaFn_8a$Hd=m2Ad3{9Ub9~1a
z<B~P|q4D3)JTu*C{PG8|-F2fxeui>$Ra^oOg|5{VYpZZ{1_&8`mS<t~nG3X=E5!Xe
z?A#DAK^?Lu=+J)c$Y_0hRTURU4pR?j*d+P_kPkuRuo?<LUe$22#Voc5VP5fvmcl^Y
zbM9bqH$GY~WG{Ga{h15!9@tb{{AGvG$GV_I*6olji^PK=DApIs44@NU$gqiNNah?B
z1=pp&@`KeetrqzGu;g8s)QgH&5}sm49&K+V51X?wNI$v_+l~UTE|6l-f9j3;hwL)i
zVqQ%)Jl5SeVcyIS2n^Y-%{-umB{h*Y#tv2#2j4vvqlK_bzD0XUwM5GwP~C#BVc8Z-
z^6l=e?P+X$5Wz6q3)MNWv7-HIf%s@%bCv=)+WCQ)waVWOZsD2@ZZ|xs@)Kh!gaj0r
z%(7-BdT{9BlO<fO0g`2dlf7P7v44+^4@|B)n0toZvs+R-oKwSnn0bbdB+CX5Rxj7_
zRjU`h;ml`U8<Aj{uHe+#TbJdo+qSp|+2h?Ek)Z_WW(L1*FeRUJr2=Bs>F<mL>VM67
zmoPNIp3Bj93JdNP--Ca!@K}Nor~5~ZNy94E;b@Ix>=exPT>5+mHry|N*o<w#x<vYG
zKR{_<JdSNwk&|~W?oT=BWC<D8T4aXhS&9Wq^%HGM5Kqq1AX$!?ch2Ay!YHlEgz7qB
z;-2X1xoRO(DoaQJ^FG=RSo<N^P!QQ}Euxv28Dw31;B@bzWWdo(%L{&~&!k%yCtm{Z
zkY%Xj{?Lb*ZN_xjuI0u{Q%z(YXnXR1;q=qXBstx?i|rid5#m*4LbBNISk1W#R3SH)
zx1;rra+h5N5QM((c+ybk2G0T~l9w0yzbfGWnNG}*KpROP*uK<`m>$0-ucdMKX0h4>
G<o^IQ(LwM4

literal 12205
zcmeHt2UL^KvnWE4CQX`BL<Fe<A|0fJA|h3)1VR+)QUvKz<U>G3I?_v&DhMc5k)k5K
zMXGeAhCo0{fY5S3%J28T@Bhwy_uO;uedoNg+2s4OyED5xJ3BKwv(NQ)HK-|BDT#=P
zs5Nh@84wW>Bf+mSISE)|lgHypM0BcKU)x9>{7Xax7RnJ3*&aSgNQg)vL?nwuBm^Qk
zIU+e*BDokMTQFChI(3SenE0d#378<@hXextE|Ne9B#R^@i;E-#0)&L<q!<FG#ly-)
z@VN*f5Xi{LsHmvUoH@h5z`)4J$jQmc#l<BqE-o!C4R#N9cG%%zvX!$1bBvsAm0V1W
zT+FD>VRF&YiPCWabCFI|tFf`Mg@uLf;h@3RM7D=8F^52hDF*!5#(=+7wlSl&RbVE7
zz%DLPE>T4;QLQdTGm(*zQ6M@OFoOkz7&)RCIS~F31qgQ7=i#F&rV7lXF{6Z(l$0VD
zouVk0qSl$B8A6pUQI)M+RScMI51SmO(W+4}6RHTKRRlt7lum0a*p|>rAdJSyjmFrH
zR)INY^tjz&TQCtu351y<mzmb6nN|=hVUdJr5khiAEs&NV%@zqnL<ABd0t5nf2_gk?
z9ij&zXNm|jt%Mm6=&(1i6A%-DKoD=VZU@(s;^9rRM?^#%;fLQ-(X*>IL_`;fG}WL+
zKIzzu=q&ao-+c3_GZczX*{$ZEb+2&@-|LqzQl()J`KoYD_g6O=rH@)CRD|UmeaGhS
zY5n(B?0g1*OvNX13V~k7gV7?y__~Rn>5#T(o%}%R$}awim!Dl`b<zBAVF?C<af(vr
zVIR)(CJMHvB7bpH?jrxCg(t{oIV8ZPIGTUAAgYnxL&@rU?y$YoRn8RZ+P95opynv2
zyX3ciWPYdXe{M^ns{dk>Ck&}8!FCQXsNfTWc)l6_LYMGH;W<|UL)YmrBqLVy3^W6T
zhveGpS&?JZ%7eN1)gPZ#)#pp4J_8jPi9ZL({rC@{)U`xS569*^J!J4*fK!{-a^Buu
zI<R;HWd2ErXTIAcUBXG1@PrEuo6RA;vl_Wb2DyBfyv9V<;gpI0^v;JSKqSPJL4y3>
z7?tY{R8O?swM_mk)ds~iVf;D;u4w7^&SqG2fO*3K?CEs>Lnj#|rN2G!qH#TE=XXtP
zn_Q;VG&jMr{=j6v)daK9rI+y8DTreVE(fhN3tX<@J-=Lk>*35>20uNCZK_qQB_Rwy
zH>ZQwezxK*4rCUzBcl<xo!0ux_LckhcAa<b&*)!2zoJz#b&75SmZ<P1aJ$y)`mCEJ
zdjsF1Mipb;n7`VJJ9d$7MUIQ%iqsG!z&&=#M+a4Eypke4J6gKw$_)gT5GZFkf6$jB
z)^G#`7t6l={k(1Y_6;|eou8ZnsRHyX)f}|o6asHwNMR_HE8?)b{H1zRDadM}HC0r(
z0a1_rjX&re;+n*9Uc2nD*>$Vf05ut;^3aA!<fdQz<pO2JTuev!d?db8H)6$`0m$Sp
zy56T^1T0M7SzcjDp~uw(BCz){=nm1(ew;^r`OG8dZep101Jh^k1?2eaL@#~IUh5m?
z6ba(Mz^9b%&&Cpb(#ai-$3~pZQ5t6!S~(@>%>5hK&Q@G6s-TG;`5mxBW;2mT1>5~8
zi8lxwo;?-8P75H1Hn?^zC~hltM@*Z@m(5WX=+b?s4SK)lS>O%t@DRQ-xg$$oF@@o*
zFQ9UCWGoI;t#>t^T;YYh%9UH|TC+bV)D|lSh}8D!yxJFAf7Mwm-TaaaiW1%M4*Zr*
zJJRxLNmiKCY(F9t<(RaH2=^Oe8IWCyZ&%^AHy*g~_L(FUH^*RvVxUG$+d{^r^Scqd
zQ34{7d>#96_J%c$#rtvxv!e|f2Ugk5As5m025M9vJkp(m(6N;mit-K}MEG`tTt`1e
z2`7TQaAHe+_?zjPu;1#yoRU+!X;XvK4Sj{}i__1&plxn}g_|D&MvB6bskIfesn;cH
z+MF0FysY6s;tFp=1Fv(f$tK4XrC`G(HAM{~@}8oKp#SH+j-ax^mO`$Vle;vj+i@Tu
z)mz=Vdy>#sqxl+M8LUPbdM1dUaY!402#VYKEDPQ0df#j~lyu<EK9AgN>F57$C_`4+
z+L0DzN6W^U81+a8wU22v`4)38utm0DWN*cT*pCLLr>{ij%-r8@S3gNj4x3z=Hs1PE
zgUk1Lvoz4gJM-Jm4fnX~Dg$I-W>#mYUpZH<9ye{lfw~;)Sm*ddfsm0~8sg!65P2F=
zL^aYI;d(Y<?y+^lUZC_vwAB|YF-21xFN?5tpA0|#rwWRJu7XF@)xa)uBx%RZ(#LF9
z1(OXGo<{O~#Z7AgH7(FING?8etN>Z2O{<h!TAO;C&ez>i>MF(uPKfecc;lqf+M><y
z$JukvntHnFIhm^d090BMft3-36bEtTg?*f>jobKhps2tQUy9qhOI6sAohPKJ1N8du
zra4UwAQGRCsC(_Rcogqtzk}~pDw*JJMf+#(P+B#UTtZ9s*8gltsaUEMwVr*jdZWmF
zeYFNTP`T~;?ovU3uw_s~8odXi$EGbRfjhO*;TB)}efzn#1lMw<JOl^cwoyj;rH?Y?
z@_mKMX>EDU%~*IU+`7lM?1om+3l%5Jv;7KbnuIFe0`P(D3xh;5C(}B{4u65S>4f|_
zeIm*J43fjxWE^jtNY+|OAoEV@VE>a7>Fo0WvTxyCP*P0|;pOMIdN4&WR@hT|_Dz-g
z)(@v&#c!dwrGQ~kZ#{m!_ou0^6lD{MIY^~a*Qx_0e_{CFCEx!WRL1{D`Cq4g|DU0y
zn>KVMgHVs#IUt*Fo|aY&MoJ#pFjL8ZC963wA+MCUT8Dt@vmF^RGMUIN(MV^gXe46C
zI&l8mc5ctb0@5R5vFo6M{2n+_`R%3`%CBSu{m!TBCqA;9qAsHcR=2x?Dj;=^mT(Tj
zIRJKSTK#|otd`CrU|>%KwfzUKp-8%ZaA&ui_0VkEWzp^n+_msME7$u&n8GUJ$dcoQ
zJ|NM#%|<S<n$UTAB8v9{;P}r5S2@KC%UXt`!6xgW-1iu!k)FqG6rpaH+m6TD$%o#j
znr3kmuBSL|sfrq%H_G)TD^E%NdSup}C(W3|D{teQ?QqrV!WSU9)>3~$xX>@?D}Cq^
z;y~L^qT>Ii7fs4kF+A(Z+%&0DB~L@BPaiEF4YR};s-P(Z2~u1ahWh#6Pk_3!8^5GE
z56%K!L`NgA)IymDx!EW-?7An~MAy?oLynhdh<?L;6V<YgSC>rEJb*wOj}7u6x{a{j
zwYi0*MN^lIuFP=c>tkknK<;-tSwK=@r+%+t?>un&*gh{6L4O_X)y`fRFaPcA-#-P_
zzhz6Z1=YvSjF%7Je?&fV%pg8+Xp;bXk*?y{{$Ira7~X?2InpLsdzRzvGC;~?mlfT%
z{8@sbZd>H<E>$PH@H>0IGPH-X=_JUHn9YY8s=h8VB{pzdZpZI^79Hc^iDFd_=yt8!
z#XO$M`mE%$nf*|Si~sN_F;xkPWVjtc1{FvFj}fZJFX>fCvX%NW_EM{40mfsTOi=ZF
zd)ce{oM-+?a!naSBH8~L!QYt1*r2or6W{ZLfJZ3(<B51e>Too2nqq%ZvwyiWhyw@%
zj*c^>T<F;=@;fa-ez1cijsRgJJ#tE@FgSb+aG_Q>A9z7%5P?%?m7akfHy1&Vmpjs+
zZ6uBHR?Lc%B95yU`7f6T?{XDjSjP3GyA}wlsEfz_g7%qn%SS$ebH@|%gmwk2O6x6t
zjuz`=Jf2i-4RWg1Ff#ySc)M5tLVYY;ELBly`Q>&>apT+b9XR!i_H;)Ye3cbw_r$8z
z`EqweWp+Otb(1+R2FXk?ky;{i+*f}Y5*Bhi%FAf~1MhDgA&4y5^?y)ak~EV3gmAUS
zz$LoiA0lYeAiZf$pj>T#7qlqaoPH_xBP-44uhOvoPh=k;RoLzd=RH`PT|y)F&ywIy
z*szG|*7Tgi-+hNuINFA){6zz0=x3wXCw-2|L&e5RNREc>hD0X244pcnjEpvlM7w&C
z=xCiml32e&DK&X~K4G~cDwuiosYdOu#~gSMI1tGj^*q@~aFqSOy?vikIrc!B{83TI
zkVWJ#!uh|G{?oyCRS-xNhX!TZXdw2BXqEOl?8>s0zWJl>9<QM>MAFTBHD(*(U7&oz
zzmkx;n<B23&1(_APY_c%npF1%<B=T49A?VWpGy4V@4rLz{e@62`>V&xg#lhXLbb34
zg&`mO&47_t9_wcLT-dwPsLJ^5L=?~&mC&XJY`rqI^u4jSYw@pkRr`xRwQYaD6E+2x
ze;%<vbzTxK>z_vs2}Mec#QP{fv(-*^zA9=knYpRo_zBKI=mu>A_QJAzdfTOy`ZWxb
zpK1O}Q`(hVaVSH64F8vr3ghhXNiSM&*+Gxb;ffPuYY{4X=Oe>Z^dmY!f538bA|O?{
zM%RC-Jh+cp!u_2Y@wD9|CUCP{14T#;2~eVY=vDAWK1XD9o?d>1Bx}I`NebuZm(whY
zAO501zcGkt)o5zCQgbu99zo#9LY}jQrGPENkx9lw`&KQw*H2>}^P@ZQ)E+mg30@pf
zSAJpF%<lTY*+H`_4d-Z<vyk!6%c&PxZ}VO0*o|?qcDLH6zH*n1W;p}d<TSTL>JjM!
zq^8YP<bC9OOY+eb(A9#<!tg$TBi~A<vGikQ6wR-C3Yc~!@`|y&(?6tN+_UlT2$OuI
z3>lVqISr}cFg2TzUbZXJr6yWW1)|x^iRTGVv948A^5N@<3XAU7IMSXX50%1F)K0`6
zYv7O=1e=B2KUcsay!*Mdp6}q(Zit-{<rV|5sgDY@z`SJqYZq`sY30V<L3v_Njn%Bp
zL}nf6TShnRhKTg60>~p(Jw$I*dgT&CAx(i*F@*w9Ids)nYM>&_Hqk+{`=}N&0!I&K
ziTHTGgdwHNmLwlVt`FsZsDYmd1y-O?64Ryb^X~TK@gDQ>gyJfFxY1mt@0ZdIXb%_d
zBQ22FhfPQcmrrX8Fgy#XYz3V;Bh13po<}Rb9D*cs?TCsMTfdq=S~-61FBnWzEVEIo
zpHD_kRj&HQ0(DTis2mEc`4WDpYn^{`ANC@;-CF9QD8#rA+nuhs)6(N%o)b8J31p1p
z<z8=4sEZBfN5)qOrcjSDKo9x%rT;UP`~{FDfJ4U<NR``{kc{UF5Ro8*yha9vf0k4I
zs=#2>Pg9N$9Hlga1DdFitl#z9cON!DUd@}vYc8^ez%M0&#Qf8lvQlqaUxQ!cQdE0g
zcYGci6M`Dkdh)uaPMdw^ib7Uf4rX`<;BV?!gdxBFQlyZR1fp&TFIsp%=LbYC{CRES
zjQ$8XAMK#1=zgYo6%^Xoo)J1rzW-n+YiO1<7xQV1P6BcUs`;I6<CnAewIH#M3-N(o
zW<>13<}H+^#HxyZzyiD#kM4-Vte@DST;|IeoJHFcrJ#Me9FMF+^DOXnb#;A0{}@Uw
zRKL&tYIReVe1sg_IRWQv%OIZG_iH2q7vk|5RMSa{MN$E>2Z7V(+03+n!8Iz${a`;W
z)SSbm>YlfLYZG{uz+372Vi0HIEp62PjHsspl%p}rRL9xZlWTULO3j4)*0E^frtovv
zW59_z41)ITg6jlpG+`-z=kYOCwvQ`-N#!i|(SWA?u*Nmai*pP15*FW`uB8<3vVAvE
zH-a{>M^ElK9h7puEK010>vO%PbE})YSS4gd4x<))m7l8>kUQ5trqCT0-d3V*OTst#
zT{PUr(U2O}oHRX>*R0?+>GQP3trQd#O07WLtx9$Mt>QFiX^`R4KwHcl72=IBi!v=<
z%%HB@4n-FABdfw9#C|)(ve0=LUt^PThMGQe-+LrR<3|8GhMN^Wu&y;3ORgHmMx(x$
z-UJ!Z5)~$-nN*SdssIc0mY}9IaD4^mUdLCkermMKV7WFcDnt8dk*VJvprl5;gGV$3
z=+cOf`xZ@TxWB3_lwx`H7Vp3V^KFqJC3lQ%RKlcFz6lijE#DbGD9ir?k}=6up5l^a
zh(jBTr@RdmXsZ;T&FY=<sF2(3ga=uJf{`q!S2n?p_ljQ4lF5T9&==Fp;1M`a!ZpoS
zSSA5<uk7J{_P(XzEbF%TMW`^Dq2y3ucQjdss&AhGs(U>-)qKrCprD-i1uq)&Tl7}(
zbJvt+>f<Jo!T2VpLC;GC(~NJDyJ1C09@1j(xRE?JRs9I|9jF%+j<8lDtqf0r<)0KS
z^VWw>Hu45eUMO(QI70J>FGXHcc!+|wIG)iM^@;?5&HRa8qY<y%@S=T?OaYY8=-$?!
z2;NDYaCsWM6P9wxjK%l!t4hl!$r5Z`r*#cb*H{A<YCD#}YORbeAdGF~!@El2?>V54
z`C&UCC5?l7nX$Qk?AYP#t@I(UIW2P!${`64hl@m-I!d8IBNy~nc#wK#2!*Yb+4#pF
z&`F#F(VFU;y2|?`2~V@(R(R}(mgykQ5Z72F^ZVEdD9SfokseYU(#Is>$Do&yK9?OP
zRUd)uNL4|d15rgzXkKb&Q5WltkZE?D`XuoW_ec7B<d5(a!RcArY?X0#`l9%L7lCHb
z$`+tv4M5hj61~cNAz1NDx^w0SBWMT4Ggq7+3qVfv=VV`>P*#B05N|1?U<xAvNf~|W
zZ>UE0B`O}6VgH^fjD?rwZq;gVEAS?skp%2&q%*hP|0&!{hvm7by@mpp{Wrid;zh0H
zXwy%dmY01$0k1&@AWz8t6V2D&Cw>WVm&|R7BWhTaN?NAoT3Atyu*b@4ik*psT_?ZQ
z#-W6WBponq1dv}34=H1->o%sNSNP9W#vA2c9Z6EU`Z8pVLXhA!>+a=yd-O`jrN>Df
z>mRuIFME?F7~AjN%ew}pC=t0@If+V7L^?`+wZF>$^o>^NSpw&5b}s%Wc-WI?c!yts
zusb9b3$51_W>zZJi3mWcWK)pm&S-qv<|}2omCoEY8HF*V25nn!jRf0~up1+@0>!Vp
z9)5j?!)FOl2zr_GC)0-ciV%bgyXI=)UE(ozMC?H$IxS(;>19Y>M`!;Wcu9%(T%I_u
zV7l2NLxSPiej}u>i|Ok**JA!K410x1D5z%GsVXFB<RaG6yHk;lo8#{m)(n{F`Z>(6
zpnF5t+j!dJqaNt&6`*wd^&sjDlNs#K4YT}=I&C9|eyD!Ui_d8`-|hRJ9p8Ug!QcU-
z90_0=t+nWaXUw!G)+=S?I3_!2RIJG^sAEPRB}BWQ5%+D4m8s;ltZ2kOKozrMQiNsC
z7l`^vc3PjtXy7066HtOIuaIv{m;fteeFi&~wRc<%Ma{X7Wup3TvHPqA2zIuenUq0|
zAIjj+Bdw{$JsqdC4EFQ7-5-~VcrK?6=IZau!xM6;D~TcO<pWmoq{Y<zX%w5kGja+i
z6@_={1~1X5uRtVmvv2sd*c?g8W$cTZOekS&NKwRTTJcwQ<z>qf*;oDO!!cJ_fUst%
z!zzT)qt_(3S)V7275w4%@;uU!uE3k;D=N#|c-Tq?SZOWD&%w7;ibV5xa(VChJMYEc
zVZ4>6a~)p&x<SWZ_Ni8Q3Wn_+F@&Sqm>9rxDB!Phc8!|GZE;7edDX`Cj_URXN-9^$
zT-0K-KQ(y$Zcz&}<p}C~^wZ47-#Pnc?9LxRbwm-sVG9!n)%`N%9Sl#TyJzf7e`aMs
zM)F+9YnOpp|3^Di@M&e#T?sZBICK%0{!VGV_FTq@@Xf9o=Br6Vr`vQc;GQ7Af}-LZ
zFxZ{*!a`4Ybd)31__d?GCQZ<V-u6p$5~pQspxCQ{q*QVo=b;**0e+v!$ys08lH?27
z*YOoX*k&8^Nz#0{KU)7JfkYf5D+5HbcqtpzxRpj^2i}H;BiTO$08$ye%p^Z_SeLQ0
z&_?Ypo!aG|Y?etTP}mrunlE1u)o!d!?waBFcB(T^H*Wdo{5dl03s6}J+D~6<^_zBL
zmP-rtP1ckbT8Tn0zRK|=1_h;VmMwk4%bql*mm6Ktp9)nT`w9mZKS45o>dQ|{+g71s
zov!j>$|L58)CLXWLqVrT>U=><lob1A;E})$_tu7(>Wta7wS$LuC`PW)lLA%9;V*B&
z#kK8?sGKGF5uBwBlY|8emfoZ$1Ng=gyq9Uh<BC#!S|s(E=qgCTk(=misSMP~%JM%o
zZF&dK9z?DCHVNdr3=V7*T%SBY=eM>t=1FZt3UP*l);Uvx+H00etcAuBb6D2O(0cAm
zNv~PGR~v%AET6gI?%@#>G*@%FkoaU2a>Axo#`!NDIo?=Ew64MSEK9mCkidLpBP_c{
z*a~K;!!W&XEfjC)K4osm`Y0l{a2BdBol2cvfHdg2F5Ll1qm(c;wm;a&l<{U~s_8bT
zO)c8}EeyR3ORJ%U%7gQCpcG7ll|Mtu$aX$Q;?ez?+X%}$4{VFcjq~O!o{Mgf2I8cj
z@Ya)nICGF|7Plv^7YVkj&{8h&T3SYAk!L3ua%->=dLDfD$T1N+8$|Z)mPZ@_l9-27
zlBuAC-;=2(%Hsir97jRogazjNRl|#^)L@Lv{rn(Zm%R1zEF;!WQs0#skkl(T9GZH3
zO<zeE&0yb7Rb9sN*5z|tG;2>1YciQRN|o`Qz=m>wND?%YB0J2HxED6=GbA3>wh3ZQ
zVA`Lekg)y2oupdR;x&UxsfENwJL>7*vOrN&%@qu?-}8=JqTnu1d9-jwsbaw}0vkYY
zw7jbSj9>0Ci6=47W}uI|oy?f5m%E*v%(-PW+uaA#?47`-=KKAEM(s^kUh(<f^Fqp0
zMaJ)(T@g5e^H3b?sY|CrUb8nF-?x*G&bscq_H()=3VX&&S5Xnw=-?%^LNB5DwRedJ
zJ4%A{>g4Ut6*mdSWI3Ad;5Od`jMrL2jF}4Td&u5Uj-PLZlH=FA!${3PQ<@9JF;$SV
z2QMWH4b-pM8vrz6czt-@`0e{OjTv9tbSM)ys<9W#gG1VOR*QC*hx4!xr1`iD#`b?J
z8>Ke-zZZ{LFV;{Qyw67_-x9^aAY8Y-Wv$FGdHL*KRozTf76L|BwCCGfA6F|+xxROC
z%YT1!U?m<T1;!o;+y1Is!dyYemlM50t{MH@viI&)8QGu8e9y_!3y~W<KMs5c53bNi
z-!7&Q6g`i#)URwk=+-m~rWw!)dh@9#oX<vd;pg;}laXRto_C`*&BHf9Z@il1H&Y|3
zithftmxIff7wpR45_BH-f0wtC8qQe4Uaymvl}uUc;?38^>hk7i2Kvv>EcZn#)k%-0
zEn%0JyQDsa(}KhkXJT-BY4<tbYs*Uy`!=fsJ2l{R&5TTzelnGEHK1Ed8_Pk>HvVBj
zD`PI@k8g<v<c7x*cqPR5@GgM-jWvuqz8A+*HJG&__rY0`-#KL99k*}0tL_CGYB^Yt
zFK^$sMX7px>SIJ$igxmCnMWChJ?vKya+L3zS7D-6cTfu`a>0B?HfV$aN)qNf@_j|V
z<kOZlQc>bi+^*eokGqr1>LJ0tfL$|~=l@kg+p9@AYDYc-fRa&wAD(V&MCq8>`WoV#
zhF`WeY1F>Adlc&jMG!olM;AA?<u7whPdK4G1!h+-pUqm}O$wpDQ66l_<lz=~ry#Z-
zL&GDfKl!`9yBC!guYV+Q`GnAym>&c>yyqdCINz{+hnomEoeiGh=_)q0Y3e$leJPZ<
zoZP0S?xyUxGc~xrBN+uA7$qMjwOv{x{&iJ4DUO*oP3W)72CnhQ*(XmdonsYC%GLe~
zbm;(5?GXl!V)8p*rqBKr3^SpSV}HexOSv1ndimsr!7t~t75t>e;;GuCl+bKYpp5bq
zz+7%uuJ;8f5b~u)jx9^)vmS`jf_HqWi{`5NXr3le4jQr;iDD}YX7ZY>2SabP>?NIE
z1l=&8m?=SG+VNMDgw8U~71qME1EmDM4G~qh>@6~$%)UTQW2|jG*aD?Kelvk~Hu5F6
zET@DI^`FgSty2gT4yS$V{u*U5sb1B|?MZK+ywa7|VHfR2d_<?`l!fyRv}<2A%|hl#
zd>bSEetmuTQJx}2zro;GMc#(uHoOJU`ogist)uq2Nc=<Zo_8F~4V0lrDzX=7XA19M
zgM6|$Wnr1!4}^`aez^4)WS6iD$-M%L%UZhYt;S4+soU4>RRSU>-;10-T2=<8irOY;
z4G}+qeF?)@wU7pBff^$usAb0uMNDg|gCrdqxFA3cC_jxzg<aj^h3Fh&`zgOo85z;^
zhtrBL*m1QBt*)JK!Tc7FKy<-gpQs-chPm2N0$%)8ao{t%oPH@wHfN+!z`N6>=u+F_
zfomsvr=Mb3SxS6iK%f{#&@sxJF)bftFhAl{*Cgc5jB!a|X`V<2Uk}rase;)TsY3?0
zCGlo9QiQt{%!i5$x;;T=pqzeT&-Pz=D{j!E)X&79y3KDd^~Z|>R<a$#vL*moi*tYm
zh3XoB>sV_8B$62Qspv^mCf;ejYA6F1IRjO~fg!;=4<*=q79r06nfogL<aR#30%OQz
zRQmpIbnc?*ddi9!`PWk?+J4|c|IFZb-$$?9udOQR@XA~~VzfNu&g+N1x=9*W=6yRi
z{d=Y<X^uHe0Bt0EL6lP*Zp82_Z}t)G=4LAc^)wiw05@hlBWNkR-&&n|J!UA*cF><g
zUZOH!_O5>Tt>2E|CsN-DzjB5ndRO1l574r^mw0NZr!=wSY5VoH9Ipw#&-_P~@r(&?
zpG$jpQV%Q?-<{9482@FauzY{QuTkNz>iqZ|M$wu3@u9n_pSt5=rD{1pq7C`;$_MS9
zsGyiZLrw>321+ba!No3%2`eRi;W~OF<Ja*HqlO7w_Ebj}06Pip(Af_j%@baNp{v7}
z<d?bz+NqJYB;cMuXZu349OSg(vy3D-i`bcJELVB3*tp35F@Yx9C&(=&8R-iRtIzEi
zK;Nol1)tj$FuKUu0lINu(oj?YIZX91ytmQ2ovSzJE%Fkv^Um4uGZJHIRQJ8zX#8ez
zBBg<MuCB%o^b>B^kn6}@W_cKzQ}<ojqf&An?iaD=TAAaF+9>Yh{uI~KeNl8R7$wfx
z8fq9eXBkvP<VIuI_u=00b*(5KFzmS1)u7}u+%IT<yX0D~P>;WaoPY-t)4YC(idanZ
zoL?nl5zz;l{<VJvle?<d-+*8hN|UankQ25p7a2-4h}eD>6wVhK_vXSYE#27=3zOH}
zl@kfZPkh1)1D$>zJBy~tK|hN_i))rpj|`hsq=y7IZ~5?qwYRIQt9O~ueOK4{{=U!o
zx*2DcmX^UE>~iKv#!{DUJgQD@L*ekg+A}VD*~0$!ZEBBfqIeaF!Fy;NI{roAIYk{b
zF}To*ppPMD_)7qbgo<b&CkbvG3_naz!Dzf-(@3qf>p&Rep|6YW;}+2TF^<vb@N9h8
zz>n~4yJ;kJD@=#Z=s4u1an>U+TpL~!plh7!eKqav`QxxcB63}xll=Uo{;OR21Q!4a
z`s=`3Yci?GB8|VD<EZ2Km@4YO_{H@VQmoOF%Ch}OV}Pzr5*PZO8ts<sD|i?(oL*sU
z-pK1baN)+r!z{yL8*;yM|8Aq%1Bw?v3;);m|8}_0Yuw6Rsw_!E0$Kvg8PzOnp4ZzX
zatp9)bF_~{A<jM!H1<)NqPx)dT(`dJ@qGBi-o52eBy}_q9A<O9?qiUH(@M^wX5Pa0
zUJ=)Wt6NZ1UTB)=fa!TXk%NWe5BtvYLs`1KiC(h7jbmg`whO0V3i>?5ALTAI;G+kt
zvHo!mf*)!-DA?x|$w&VDiFrJa*kN0pKd@Wyk}0X*9;!Uui$9ZKWaXR0Akzt&5(}$Z
zvu&U8-3-)=qh3ntg1OseUM6L$jbnz;2FBtacI!d=cWYO93xxed?TN!bApnzXj#>QJ
zoZi&vx6Ah5NOTZVnNqHQu5M|eatr4>p0+q$c*5%O!Snv-u}9GOlE@3}P-&m!#~1C*
zx1<+DKfBiXoEL%K4ypPMQfUQ&ZcM84P?`6MbGUW8XhS+EdH14y<K=UY+CItw4mSci
zd2vFT>$A6lro%tc0#etBH#TKu58UR9b9Qf5x{l&``Vy=h*gg7=Y899^3R7(2mveLQ
zQ=^;z1I_&f(OJ<gqO~ax;Sz|QD!AS?9f3qIUl5KHxKt(eAG_6geDBk~^CLd1eitLk
zB1)?mFxz>*nDb-0!p4W~d8<vFQ0?Qv(I-f;>A3|ksu_q|yOC%^S7EM<O6DT%$}F|C
ze2UB<0h-Tnp;JO1c=ucgu$6?;cY^?`<U0sGQ|G<NrOA3~sQhV2<arg;&_v0|cElPf
z1j|e(VM`80G+0!vdiN-91POw^e(qhpo<O7e^*+uQNj>nlSs@1|^}_P&*+Q%_3PFD&
z?8=tBgDUFm3P8}CP}jsm+#f;=P#r1H=liujz?)Q8?f@6|-uaJayBE=IC^cwXy4oBK
zRDpkVJL1iOI6$dnGm9VSdHMRyW5O5{mYZp#Y~*?au55Xa3R<2`z_#xVj(XVN?H~qc
zB!C{PSbalFsHZn_k`msxk<=EnRC2X6fQH8GI8TwS!+y;bej6XT$4|~Go`B4YY~aed
z28h(C_%$}IRqDr(`(?Awu&l(TMdm+R3&v6%wJLKJHx;g3U461KD=JbkAj(FD5lsY4
zm_#A!YUGy-2C=`KZ*w>@*%;P63s<y!HuUiFLeXU4_OiH{0D66Jv`XxveJ2Vi%-flB
zuz9PBD(f+1*cj@$GC>M81}FNO)YuB1=xz+a8gV78Mzo3<zOz9Gjq2pEL+Zoye~;cT
z3`L}e!19wz9_fp>OYqGjL3P`Fh8rEZ^qSx~(*N9`DPn;AI@WPEZJ{K|t~la>K3&Bb
zaOf|Q-`<J0cQ(ls++GP|9e&rWUhIYnMJBn?z(_&dH}oaxjSiGccocRreemn=YOFVw
zG_*|Pv>6EIzP^SgpXfYjpwl-5?9IeQ5E0UzIiJu6Xu|svo)oH;;c}&(!tO-83`m1#
z2B<P>rHkb$GvvMAlR}gD(Y#@8M@;VzJ3{rsyedi-qRw-Hjxp9lSzoR96qH_*3@qUI
ePZqQg$WYz}hO(X)?}4|pi8R%9)k;+E0{;SQugs1B

diff --git a/docs/two_way.html b/docs/two_way.html
index dbfeaccb..1ec8dfdf 100644
--- a/docs/two_way.html
+++ b/docs/two_way.html
@@ -478,15 +478,6 @@ <h1 class="title"><span class="chapter-number">28</span>&nbsp; <span class="chap
 
 </header>
 
-<div class="cell">
-<div class="cell-output cell-output-stderr">
-<pre><code>Clean these cache files?
-
-two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.RData
-two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdb
-two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdx</code></pre>
-</div>
-</div>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2">
 <div class="cell-output-display">
 
@@ -551,7 +542,7 @@ <h2 data-number="28.1" class="anchored" data-anchor-id="introduction"><span clas
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-3_bb5971ce07d8d8c0b8943589b38c4d73">
 
 <!-- html table generated in R 4.3.2 by xtable 1.8-4 package -->
-<!-- Sun Feb  4 16:25:02 2024 -->
+<!-- Mon Feb  5 09:05:50 2024 -->
 
 <table border="1">
 <tbody><tr>
@@ -746,12 +737,12 @@ <h2 data-number="28.1" class="anchored" data-anchor-id="introduction"><span clas
 <p><img src="two_way_files/figure-html/unnamed-chunk-4-1.png" class="img-fluid" width="576"></p>
 </div>
 </div>
-<p>We have separated the income values into two parts: an <strong>overall</strong> value and the difference between each value and the overall–the <strong>residuals</strong>. This can be written in the following algebraic form:</p>
+<p>We have separated the income values into two parts: an <strong>overall</strong> value and the difference between each value and the overall–i.e.&nbsp;the <strong>residuals</strong>. This can be written in the following algebraic form:</p>
 <p><span class="math display">\[
 Income_{Occupation} = Income_{median} + Income_{residual}
 \]</span></p>
-<p>For example, ‘Healthcare Support’ average income of $43980 can be separated into the the median, $45265, and the residual, $-1285.</p>
-<p>So in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values <em>relative</em> to the overall median.</p>
+<p>For example, ‘Healthcare Support’ average income of $43980 can be separated into the median, $45265, and its residual, $-1285.</p>
+<p>So, in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values <em>relative</em> to the overall median.</p>
 <div class="cell" data-small.mar="true" data-hash="two_way_cache/html/unnamed-chunk-5_4a4743b3e9246aea859a9b3f2be216dc">
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-5-1.png" class="img-fluid" width="384"></p>
@@ -785,20 +776,20 @@ <h2 data-number="28.2" class="anchored" data-anchor-id="anatomy-of-a-two-way-tab
 <h2 data-number="28.3" class="anchored" data-anchor-id="analysis-workflow"><span class="header-section-number">28.3</span> Analysis workflow</h2>
 <p>Let’s first create the dataframe.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-6_f5a826f622c2f91a29ff02f720232988">
-<div class="sourceCode cell-code" id="cb2"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb2-1"><a href="#cb2-1" aria-hidden="true" tabindex="-1"></a>df <span class="ot">&lt;-</span> <span class="fu">data.frame</span>(<span class="at">row.names =</span> <span class="fu">c</span>(<span class="st">"NE"</span>,<span class="st">"NC"</span>,<span class="st">"S"</span>,<span class="st">"W"</span>),</span>
-<span id="cb2-2"><a href="#cb2-2" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed8       =</span> <span class="fu">c</span>(<span class="fl">25.3</span>,<span class="fl">32.1</span>,<span class="fl">38.8</span>,<span class="fl">25.4</span>), </span>
-<span id="cb2-3"><a href="#cb2-3" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed9to11   =</span> <span class="fu">c</span>(<span class="fl">25.3</span>,<span class="dv">29</span>,<span class="dv">31</span>,<span class="fl">21.1</span>),</span>
-<span id="cb2-4"><a href="#cb2-4" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed12      =</span> <span class="fu">c</span>(<span class="fl">18.2</span>,<span class="fl">18.8</span>,<span class="fl">19.3</span>,<span class="fl">20.3</span>),</span>
-<span id="cb2-5"><a href="#cb2-5" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed13to15  =</span> <span class="fu">c</span>(<span class="fl">18.3</span>,<span class="fl">24.3</span>,<span class="fl">15.7</span>,<span class="dv">24</span>),</span>
-<span id="cb2-6"><a href="#cb2-6" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed16      =</span> <span class="fu">c</span>(<span class="fl">16.3</span>,<span class="dv">19</span>,<span class="fl">16.8</span>,<span class="fl">17.5</span>)</span>
-<span id="cb2-7"><a href="#cb2-7" aria-hidden="true" tabindex="-1"></a>                 )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb1"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb1-1"><a href="#cb1-1" aria-hidden="true" tabindex="-1"></a>df <span class="ot">&lt;-</span> <span class="fu">data.frame</span>(<span class="at">row.names =</span> <span class="fu">c</span>(<span class="st">"NE"</span>,<span class="st">"NC"</span>,<span class="st">"S"</span>,<span class="st">"W"</span>),</span>
+<span id="cb1-2"><a href="#cb1-2" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed8       =</span> <span class="fu">c</span>(<span class="fl">25.3</span>,<span class="fl">32.1</span>,<span class="fl">38.8</span>,<span class="fl">25.4</span>), </span>
+<span id="cb1-3"><a href="#cb1-3" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed9to11   =</span> <span class="fu">c</span>(<span class="fl">25.3</span>,<span class="dv">29</span>,<span class="dv">31</span>,<span class="fl">21.1</span>),</span>
+<span id="cb1-4"><a href="#cb1-4" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed12      =</span> <span class="fu">c</span>(<span class="fl">18.2</span>,<span class="fl">18.8</span>,<span class="fl">19.3</span>,<span class="fl">20.3</span>),</span>
+<span id="cb1-5"><a href="#cb1-5" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed13to15  =</span> <span class="fu">c</span>(<span class="fl">18.3</span>,<span class="fl">24.3</span>,<span class="fl">15.7</span>,<span class="dv">24</span>),</span>
+<span id="cb1-6"><a href="#cb1-6" aria-hidden="true" tabindex="-1"></a>                 <span class="at">ed16      =</span> <span class="fu">c</span>(<span class="fl">16.3</span>,<span class="dv">19</span>,<span class="fl">16.8</span>,<span class="fl">17.5</span>)</span>
+<span id="cb1-7"><a href="#cb1-7" aria-hidden="true" tabindex="-1"></a>                 )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <section id="visualizing-the-data" class="level3" data-number="28.3.1">
 <h3 data-number="28.3.1" class="anchored" data-anchor-id="visualizing-the-data"><span class="header-section-number">28.3.1</span> Visualizing the data</h3>
 <p>It’s often easier to look at a graphical representation of the data than a tabular one. Even a table as small as this can benefit from a plot.</p>
 <p>We will adopt Bill Cleveland’s dotplot for this purpose. R has a built-in dotplot function called <code>dotchart</code>. It requires that the table be stored as a matrix instead of a dataframe; we will therefore convert <code>df</code> to a matrix by wrapping it with the <code>as.matrix()</code> function.</p>
 <div class="cell" data-small.mar="true" data-hash="two_way_cache/html/unnamed-chunk-7_14d1690872167f9cd651a876a342ea16">
-<div class="sourceCode cell-code" id="cb3"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb3-1"><a href="#cb3-1" aria-hidden="true" tabindex="-1"></a><span class="fu">dotchart</span>( <span class="fu">as.matrix</span>(df), <span class="at">cex=</span><span class="fl">0.7</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb2"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb2-1"><a href="#cb2-1" aria-hidden="true" tabindex="-1"></a><span class="fu">dotchart</span>( <span class="fu">as.matrix</span>(df), <span class="at">cex=</span><span class="fl">0.7</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-7-1.png" class="img-fluid" width="288"></p>
 </div>
@@ -806,7 +797,7 @@ <h3 data-number="28.3.1" class="anchored" data-anchor-id="visualizing-the-data">
 <p>The plot helps visualize any differences in mortality rates across different father educational attainment levels. There seems to be a gradual decrease in child mortality with increasing father educational attainment.</p>
 <p>But the plot does not help spot differences across regions (except for the <code>ed12</code> group). We can generate another plot where region becomes the main grouping factor. We do this by wrapping the matrix with the transpose function <code>t()</code>.</p>
 <div class="cell" data-small.mar="true" data-hash="two_way_cache/html/unnamed-chunk-8_5a724aeed8ecace6e93a367317113d23">
-<div class="sourceCode cell-code" id="cb4"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb4-1"><a href="#cb4-1" aria-hidden="true" tabindex="-1"></a><span class="fu">dotchart</span>( <span class="fu">t</span>(<span class="fu">as.matrix</span>(df)), <span class="at">cex=</span><span class="fl">0.7</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb3"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb3-1"><a href="#cb3-1" aria-hidden="true" tabindex="-1"></a><span class="fu">dotchart</span>( <span class="fu">t</span>(<span class="fu">as.matrix</span>(df)), <span class="at">cex=</span><span class="fl">0.7</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-8-1.png" class="img-fluid" width="288"></p>
 </div>
@@ -814,18 +805,18 @@ <h3 data-number="28.3.1" class="anchored" data-anchor-id="visualizing-the-data">
 <p>At first glance, there seems to be higher death rates for the <code>NC</code> and <code>S</code> regions and relatively lower rates for the <code>W</code> and <code>NE</code> regions. But our eyes may be fooled by outliers in the data.</p>
 <p>Next, we’ll generate side-by-side boxplots to compare the effects between both categories. Note that we’ll need to create a <em>long</em> version of the table using the <code>tidyr</code> package.</p>
 <div class="cell" data-small.mar="true" data-hash="two_way_cache/html/unnamed-chunk-9_42f9c831a6011131f3d0a7e6519ebf81">
-<div class="sourceCode cell-code" id="cb5"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb5-1"><a href="#cb5-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(tidyr)</span>
-<span id="cb5-2"><a href="#cb5-2" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(dplyr)</span>
-<span id="cb5-3"><a href="#cb5-3" aria-hidden="true" tabindex="-1"></a></span>
-<span id="cb5-4"><a href="#cb5-4" aria-hidden="true" tabindex="-1"></a>df.l <span class="ot">&lt;-</span> df <span class="sc">%&gt;%</span></span>
-<span id="cb5-5"><a href="#cb5-5" aria-hidden="true" tabindex="-1"></a>  <span class="fu">mutate</span>(<span class="at">Region =</span> <span class="fu">as.factor</span>(<span class="fu">row.names</span>(.)) )  <span class="sc">%&gt;%</span></span>
-<span id="cb5-6"><a href="#cb5-6" aria-hidden="true" tabindex="-1"></a>  <span class="fu">pivot_longer</span>(<span class="at">names_to =</span> <span class="st">"Edu"</span>, <span class="at">values_to =</span> <span class="st">"Deaths"</span>, <span class="sc">-</span>Region) <span class="sc">%&gt;%</span> </span>
-<span id="cb5-7"><a href="#cb5-7" aria-hidden="true" tabindex="-1"></a>  <span class="fu">mutate</span>(<span class="at">Edu =</span> <span class="fu">factor</span>(Edu, <span class="at">levels=</span><span class="fu">names</span>(df)))</span>
-<span id="cb5-8"><a href="#cb5-8" aria-hidden="true" tabindex="-1"></a></span>
-<span id="cb5-9"><a href="#cb5-9" aria-hidden="true" tabindex="-1"></a><span class="co"># side-by-side plot</span></span>
-<span id="cb5-10"><a href="#cb5-10" aria-hidden="true" tabindex="-1"></a>OP <span class="ot">&lt;-</span> <span class="fu">par</span>(<span class="at">mfrow=</span><span class="fu">c</span>(<span class="dv">1</span>,<span class="dv">2</span>))</span>
-<span id="cb5-11"><a href="#cb5-11" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>(Deaths <span class="sc">~</span> Region <span class="sc">+</span> Edu, df.l)</span>
-<span id="cb5-12"><a href="#cb5-12" aria-hidden="true" tabindex="-1"></a><span class="fu">par</span>(OP)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb4"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb4-1"><a href="#cb4-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(tidyr)</span>
+<span id="cb4-2"><a href="#cb4-2" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(dplyr)</span>
+<span id="cb4-3"><a href="#cb4-3" aria-hidden="true" tabindex="-1"></a></span>
+<span id="cb4-4"><a href="#cb4-4" aria-hidden="true" tabindex="-1"></a>df.l <span class="ot">&lt;-</span> df <span class="sc">%&gt;%</span></span>
+<span id="cb4-5"><a href="#cb4-5" aria-hidden="true" tabindex="-1"></a>  <span class="fu">mutate</span>(<span class="at">Region =</span> <span class="fu">as.factor</span>(<span class="fu">row.names</span>(.)) )  <span class="sc">%&gt;%</span></span>
+<span id="cb4-6"><a href="#cb4-6" aria-hidden="true" tabindex="-1"></a>  <span class="fu">pivot_longer</span>(<span class="at">names_to =</span> <span class="st">"Edu"</span>, <span class="at">values_to =</span> <span class="st">"Deaths"</span>, <span class="sc">-</span>Region) <span class="sc">%&gt;%</span> </span>
+<span id="cb4-7"><a href="#cb4-7" aria-hidden="true" tabindex="-1"></a>  <span class="fu">mutate</span>(<span class="at">Edu =</span> <span class="fu">factor</span>(Edu, <span class="at">levels=</span><span class="fu">names</span>(df)))</span>
+<span id="cb4-8"><a href="#cb4-8" aria-hidden="true" tabindex="-1"></a></span>
+<span id="cb4-9"><a href="#cb4-9" aria-hidden="true" tabindex="-1"></a><span class="co"># side-by-side plot</span></span>
+<span id="cb4-10"><a href="#cb4-10" aria-hidden="true" tabindex="-1"></a>OP <span class="ot">&lt;-</span> <span class="fu">par</span>(<span class="at">mfrow=</span><span class="fu">c</span>(<span class="dv">1</span>,<span class="dv">2</span>))</span>
+<span id="cb4-11"><a href="#cb4-11" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>(Deaths <span class="sc">~</span> Region <span class="sc">+</span> Edu, df.l)</span>
+<span id="cb4-12"><a href="#cb4-12" aria-hidden="true" tabindex="-1"></a><span class="fu">par</span>(OP)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-9-1.png" class="img-fluid" width="576"></p>
 </div>
@@ -882,13 +873,18 @@ <h4 data-number="28.3.2.8" class="anchored" data-anchor-id="when-do-we-stop-iter
 <p><img src="img/twoway_08.jpg" class="img-fluid"></p>
 <p>The final version of the table (along with the column and row values) is shown below:</p>
 <p><img src="img/twoway_09.jpg" class="img-fluid"></p>
-<p>A progression of each iteration is shown side-by-side in the next figure. Note how, at the end of the iterations, the <em>common factor</em> ends up contributing the largest effect. Also note the one abnormally high residual in the southern region associated with 8<sup>th</sup> grade education.</p>
+<p>A progression of each iteration is shown side-by-side in the next figure. The left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-10_90374ca398847c87af3318ada6e07f19">
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-10-1.png" class="img-fluid" width="1056"></p>
 </div>
 </div>
-<p>The left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.</p>
+<p>A few takeway observations from the analysis follow:</p>
+<ul>
+<li>The <em>common factor</em> ends up contributing the largest effect.</li>
+<li>Between <code>Region</code> and <code>Education</code> effects, the latter explains more of the variability in deaths with a range of 7.43 - (-3.7) = 11.13 deaths per 1000 births. The <code>Region</code> effect explains about 2.3 - (-1.46) = 3.76 deaths per 1000 births of the variability in the data.</li>
+<li>One abnormally high residual–10.97 deaths above the overall median deaths–is associated with the southern region and an 8<sup>th</sup> grade education.</li>
+</ul>
 </section>
 </section>
 <section id="interpreting-the-median-polish" class="level3" data-number="28.3.3">
@@ -924,7 +920,7 @@ <h2 data-number="28.4" class="anchored" data-anchor-id="implementing-the-median-
 <h3 data-number="28.4.1" class="anchored" data-anchor-id="using-base-rs-medpolish"><span class="header-section-number">28.4.1</span> Using base R’s <code>medpolish</code></h3>
 <p>The steps outlined in the previous section can be easily implemented using pen and paper or a spreadsheet environment for larger datasets. R has a built-in function called <code>medpolish()</code> which does this for us. We can define the maximum number of iterations by setting the <code>maxiter=</code> parameter but note that <code>medpolish</code> will, by default, automatically estimate the best number of iterations for us.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-12_b33d0905705eb525559f39c2bdc77e3f">
-<div class="sourceCode cell-code" id="cb6"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb6-1"><a href="#cb6-1" aria-hidden="true" tabindex="-1"></a>df.med <span class="ot">&lt;-</span> <span class="fu">medpolish</span>( df)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb5"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb5-1"><a href="#cb5-1" aria-hidden="true" tabindex="-1"></a>df.med <span class="ot">&lt;-</span> <span class="fu">medpolish</span>( df)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>1: 47.1
 2: 42.9
@@ -935,33 +931,33 @@ <h3 data-number="28.4.1" class="anchored" data-anchor-id="using-base-rs-medpolis
 <p>The median polish ran through 4 iterations–one more than was run in our step-by-step example.</p>
 <p>The four values printed to the console gives us the sum of absolute residuals at each iteration. The output from the model is stored in the <code>df.med</code> object. To see its contents , simply type it at the command line.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-13_32619a5000872bc3f93103779d81e8c4">
-<div class="sourceCode cell-code" id="cb8"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb8-1"><a href="#cb8-1" aria-hidden="true" tabindex="-1"></a>df.med</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb7"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb7-1"><a href="#cb7-1" aria-hidden="true" tabindex="-1"></a>df.med</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>
 Median Polish Results (Dataset: "df")
 
-Overall: 20.6
+Overall: 20.775
 
 Row Effects:
-   NE    NC     S     W 
--1.50  2.55 -0.35  0.35 
+    NE     NC      S      W 
+-1.475  2.375 -0.350  0.350 
 
 Column Effects:
      ed8  ed9to11     ed12 ed13to15     ed16 
-   7.575    6.025   -0.925    0.175   -3.450 
+  7.4750   5.9250  -1.1125   0.0750  -3.6250 
 
 Residuals:
-      ed8 ed9to11   ed12 ed13to15  ed16
-NE -1.375   0.175  0.025   -0.975  0.65
-NC  1.375  -0.175 -3.425    0.975 -0.70
-S  10.975   4.725 -0.025   -4.725  0.00
-W  -3.125  -5.875  0.275    2.875  0.00</code></pre>
+      ed8 ed9to11    ed12 ed13to15   ed16
+NE -1.475   0.075  0.0125   -1.075  0.625
+NC  1.475  -0.075 -3.2375    1.075 -0.525
+S  10.900   4.650 -0.0125   -4.800  0.000
+W  -3.200  -5.950  0.2875    2.800  0.000</code></pre>
 </div>
 </div>
 <p>All three effects are displayed as well as the residuals (note that the precision returned is greater than that used in our earlier analysis).</p>
 <p>To generate the Tukey additivity plot, simply wrap the median polish object with the <code>plot</code> command as in:</p>
 <div class="cell" data-small.mar="true" data-hash="two_way_cache/html/unnamed-chunk-14_09c5df91ce09cbcd4b168d3429c6f89a">
-<div class="sourceCode cell-code" id="cb10"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb10-1"><a href="#cb10-1" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>( df.med )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb9"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb9-1"><a href="#cb9-1" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>( df.med )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-14-1.png" class="img-fluid" width="288"></p>
 </div>
@@ -972,30 +968,30 @@ <h3 data-number="28.4.2" class="anchored" data-anchor-id="using-eda_pol"><span c
 <p>The <code>tukeyedar</code> package has a custom function called <code>eda_pol</code> that will output the polished table as a graphic element.</p>
 <p>Unlike the base <code>medpolish</code> function, <code>eda_pol</code> requires that the data be in long form. In creating the long form version of the data, we’ll explicitly set the levels for educational attainment and region.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-15_d311464cbe1865576659f04c00e2fe0b">
-<div class="sourceCode cell-code" id="cb11"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb11-1"><a href="#cb11-1" aria-hidden="true" tabindex="-1"></a>grd <span class="ot">&lt;-</span> <span class="fu">c</span>(<span class="st">"ed8"</span>, <span class="st">"ed9-11"</span>, <span class="st">"ed12"</span>, <span class="st">"ed13-15"</span>, <span class="st">"ed16"</span>)</span>
-<span id="cb11-2"><a href="#cb11-2" aria-hidden="true" tabindex="-1"></a>reg <span class="ot">&lt;-</span> <span class="fu">c</span>(<span class="st">"NE"</span>, <span class="st">"NC"</span>, <span class="st">"S"</span>, <span class="st">"W"</span>)</span>
-<span id="cb11-3"><a href="#cb11-3" aria-hidden="true" tabindex="-1"></a>dfl <span class="ot">&lt;-</span> <span class="fu">data.frame</span>(<span class="at">Region =</span>  <span class="fu">factor</span>(<span class="fu">rep</span>( <span class="fu">c</span>(<span class="st">"NE"</span>, <span class="st">"NC"</span>, <span class="st">"S"</span>, <span class="st">"W"</span>), <span class="at">each =</span> <span class="dv">5</span>),</span>
-<span id="cb11-4"><a href="#cb11-4" aria-hidden="true" tabindex="-1"></a>                                   <span class="at">levels =</span> reg),</span>
-<span id="cb11-5"><a href="#cb11-5" aria-hidden="true" tabindex="-1"></a>                 <span class="at">Education =</span> <span class="fu">factor</span>(<span class="fu">rep</span>( grd , <span class="dv">4</span>), <span class="at">levels =</span> grd),</span>
-<span id="cb11-6"><a href="#cb11-6" aria-hidden="true" tabindex="-1"></a>                 <span class="at">Deaths =</span> <span class="fu">c</span>(<span class="fl">25.3</span>, <span class="fl">25.3</span>, <span class="fl">18.2</span>, <span class="fl">18.3</span>, <span class="fl">16.3</span>, <span class="fl">32.1</span>, <span class="dv">29</span>, <span class="fl">18.8</span>,</span>
-<span id="cb11-7"><a href="#cb11-7" aria-hidden="true" tabindex="-1"></a>                          <span class="fl">24.3</span>, <span class="dv">19</span>, <span class="fl">38.8</span>, <span class="dv">31</span>, <span class="fl">19.3</span>, <span class="fl">15.7</span>, <span class="fl">16.8</span>, <span class="fl">25.4</span>, </span>
-<span id="cb11-8"><a href="#cb11-8" aria-hidden="true" tabindex="-1"></a>                          <span class="fl">21.1</span>, <span class="fl">20.3</span>, <span class="dv">24</span>, <span class="fl">17.5</span>))</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb10"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb10-1"><a href="#cb10-1" aria-hidden="true" tabindex="-1"></a>grd <span class="ot">&lt;-</span> <span class="fu">c</span>(<span class="st">"ed8"</span>, <span class="st">"ed9-11"</span>, <span class="st">"ed12"</span>, <span class="st">"ed13-15"</span>, <span class="st">"ed16"</span>)</span>
+<span id="cb10-2"><a href="#cb10-2" aria-hidden="true" tabindex="-1"></a>reg <span class="ot">&lt;-</span> <span class="fu">c</span>(<span class="st">"NE"</span>, <span class="st">"NC"</span>, <span class="st">"S"</span>, <span class="st">"W"</span>)</span>
+<span id="cb10-3"><a href="#cb10-3" aria-hidden="true" tabindex="-1"></a>dfl <span class="ot">&lt;-</span> <span class="fu">data.frame</span>(<span class="at">Region =</span>  <span class="fu">factor</span>(<span class="fu">rep</span>( <span class="fu">c</span>(<span class="st">"NE"</span>, <span class="st">"NC"</span>, <span class="st">"S"</span>, <span class="st">"W"</span>), <span class="at">each =</span> <span class="dv">5</span>),</span>
+<span id="cb10-4"><a href="#cb10-4" aria-hidden="true" tabindex="-1"></a>                                   <span class="at">levels =</span> reg),</span>
+<span id="cb10-5"><a href="#cb10-5" aria-hidden="true" tabindex="-1"></a>                 <span class="at">Education =</span> <span class="fu">factor</span>(<span class="fu">rep</span>( grd , <span class="dv">4</span>), <span class="at">levels =</span> grd),</span>
+<span id="cb10-6"><a href="#cb10-6" aria-hidden="true" tabindex="-1"></a>                 <span class="at">Deaths =</span> <span class="fu">c</span>(<span class="fl">25.3</span>, <span class="fl">25.3</span>, <span class="fl">18.2</span>, <span class="fl">18.3</span>, <span class="fl">16.3</span>, <span class="fl">32.1</span>, <span class="dv">29</span>, <span class="fl">18.8</span>,</span>
+<span id="cb10-7"><a href="#cb10-7" aria-hidden="true" tabindex="-1"></a>                          <span class="fl">24.3</span>, <span class="dv">19</span>, <span class="fl">38.8</span>, <span class="dv">31</span>, <span class="fl">19.3</span>, <span class="fl">15.7</span>, <span class="fl">16.8</span>, <span class="fl">25.4</span>, </span>
+<span id="cb10-8"><a href="#cb10-8" aria-hidden="true" tabindex="-1"></a>                          <span class="fl">21.1</span>, <span class="fl">20.3</span>, <span class="dv">24</span>, <span class="fl">17.5</span>))</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <p>The <code>eda_pol</code> requires that you specify which variables will be mapped to the row and column effects.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-16_e9e1b42d5c1c6d97e0de8cc86a753169">
-<div class="sourceCode cell-code" id="cb12"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb12-1"><a href="#cb12-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(tukeyedar)</span>
-<span id="cb12-2"><a href="#cb12-2" aria-hidden="true" tabindex="-1"></a></span>
-<span id="cb12-3"><a href="#cb12-3" aria-hidden="true" tabindex="-1"></a>df.pol <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education , <span class="at">val =</span> Deaths )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb11"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb11-1"><a href="#cb11-1" aria-hidden="true" tabindex="-1"></a><span class="fu">library</span>(tukeyedar)</span>
+<span id="cb11-2"><a href="#cb11-2" aria-hidden="true" tabindex="-1"></a></span>
+<span id="cb11-3"><a href="#cb11-3" aria-hidden="true" tabindex="-1"></a>df.pol <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education , <span class="at">val =</span> Deaths )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-17_0485061db5138b5f8809db9973d13722">
 <div class="cell-output-display">
 <p><img src="two_way_files/figure-html/unnamed-chunk-17-1.png" class="img-fluid" width="412"></p>
 </div>
 </div>
-<p>Here, the <code>eda_pol</code> function required five iterations which explains the slight difference in values from those generated with the medpolish function. You can control the maximum number of iterations in <code>eda_pol</code> with the <code>maxiter</code> argument.</p>
+<p>Here, the <code>eda_pol</code> function required five iterations which explains the slight difference in values from those generated with the <code>medpolish</code> function. You can control the maximum number of iterations in <code>eda_pol</code> with the <code>maxiter</code> argument.</p>
 <p>By default, the column and row values are listed in the same order as they are presented in the input data frame (either defined alphabetically or defined by their levels). You can have the function sort the values by their effect size using the <code>sort</code> argument.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-18_a75fa6025b012257c3f986da05c23b65">
-<div class="sourceCode cell-code" id="cb13"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb13-1"><a href="#cb13-1" aria-hidden="true" tabindex="-1"></a>df.pol <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education, <span class="at">val =</span> Deaths, <span class="at">sort =</span> <span class="cn">TRUE</span> )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb12"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb12-1"><a href="#cb12-1" aria-hidden="true" tabindex="-1"></a>df.pol <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education, <span class="at">val =</span> Deaths, <span class="at">sort =</span> <span class="cn">TRUE</span> )</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-19_a4c8ef0614833d803082b2ce2a30b5b3">
 <div class="cell-output-display">
@@ -1004,11 +1000,11 @@ <h3 data-number="28.4.2" class="anchored" data-anchor-id="using-eda_pol"><span c
 </div>
 <p>The <code>df.pol</code> object is a list that stores output values such as the common, row and column effects.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-20_c867fa9dd2b6b52aafdcfef896e2312d">
-<div class="sourceCode cell-code" id="cb14"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb14-1"><a href="#cb14-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>global</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb13"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb13-1"><a href="#cb13-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>global</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>[1] 20.85</code></pre>
 </div>
-<div class="sourceCode cell-code" id="cb16"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb16-1"><a href="#cb16-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>row</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb15"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb15-1"><a href="#cb15-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>row</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>  Region  effect
 1     NE -1.4625
@@ -1016,7 +1012,7 @@ <h3 data-number="28.4.2" class="anchored" data-anchor-id="using-eda_pol"><span c
 3      S -0.3500
 4      W  0.3500</code></pre>
 </div>
-<div class="sourceCode cell-code" id="cb18"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb18-1"><a href="#cb18-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>col</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb17"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb17-1"><a href="#cb17-1" aria-hidden="true" tabindex="-1"></a>df.pol<span class="sc">$</span>col</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>  Education   effect
 1       ed8  7.43125
@@ -1028,7 +1024,7 @@ <h3 data-number="28.4.2" class="anchored" data-anchor-id="using-eda_pol"><span c
 </div>
 <p>The <code>eda_pol</code> will also output a diagnostic plot.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-21_da3b4d2d15c439468dd98d9b3e10f4db">
-<div class="sourceCode cell-code" id="cb20"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb20-1"><a href="#cb20-1" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>(df.pol, <span class="at">type =</span> <span class="st">"diagnostic"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb19"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb19-1"><a href="#cb19-1" aria-hidden="true" tabindex="-1"></a><span class="fu">plot</span>(df.pol, <span class="at">type =</span> <span class="st">"diagnostic"</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>$slope
     cv 
@@ -1038,7 +1034,7 @@ <h3 data-number="28.4.2" class="anchored" data-anchor-id="using-eda_pol"><span c
 <p><img src="two_way_files/figure-html/unnamed-chunk-21-1.png" class="img-fluid" width="288"></p>
 </div>
 </div>
-<p>In addition to generating the plot, the function will also return the slope of the fitted line.</p>
+<p>In addition to generating the plot, the function will also return the slope of the fitted line in the console.</p>
 <p>For a comprehensive review of the median polish and the <code>eda_pol</code> function, see the <code>eda_pol</code> <a href="https://mgimond.github.io/tukeyedar/articles/polish.html">vignette</a>.</p>
 </section>
 </section>
@@ -1054,13 +1050,13 @@ <h3 data-number="28.5.1" class="anchored" data-anchor-id="two-way-anova"><span c
 <p><img src="img/twoway_12.png" class="img-fluid"></p>
 <p>The resulting row/column levels are the regression coefficients:</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715">
-<div class="sourceCode cell-code" id="cb22"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb22-1"><a href="#cb22-1" aria-hidden="true" tabindex="-1"></a>M <span class="ot">&lt;-</span> <span class="fu">lm</span>(Deaths <span class="sc">~</span> Education <span class="sc">+</span> Region, dfl)</span>
-<span id="cb22-2"><a href="#cb22-2" aria-hidden="true" tabindex="-1"></a><span class="fu">coef</span>(M)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb21"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb21-1"><a href="#cb21-1" aria-hidden="true" tabindex="-1"></a>M <span class="ot">&lt;-</span> <span class="fu">lm</span>(Deaths <span class="sc">~</span> Education <span class="sc">+</span> Region, dfl)</span>
+<span id="cb21-2"><a href="#cb21-2" aria-hidden="true" tabindex="-1"></a><span class="fu">coef</span>(M)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
-<pre><code>     (Intercept)  Educationed9-11    Educationed12 Educationed13-15    Educationed16         RegionNE          RegionS 
-          32.215           -3.800          -11.250           -9.825          -13.000           -3.960           -0.320 
+<pre><code>     (Intercept)  Educationed9-11    Educationed12 Educationed13-15    Educationed16         RegionNC          RegionS 
+          28.255           -3.800          -11.250           -9.825          -13.000            3.960            3.640 
          RegionW 
-          -2.980 </code></pre>
+           0.980 </code></pre>
 </div>
 </div>
 <p>The regression formula takes on the form:</p>
@@ -1081,13 +1077,13 @@ <h3 data-number="28.5.1" class="anchored" data-anchor-id="two-way-anova"><span c
 \]</span></p>
 <p>To assess if any of the factors have a significant effect on the <code>Death</code> variables, simply wrap the regression with an <code>anova()</code> function.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-23_ce64700903bec89d35ce4c76b73761d0">
-<div class="sourceCode cell-code" id="cb24"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb24-1"><a href="#cb24-1" aria-hidden="true" tabindex="-1"></a><span class="fu">anova</span>(M)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb23"><pre class="sourceCode r code-with-copy"><code class="sourceCode r"><span id="cb23-1"><a href="#cb23-1" aria-hidden="true" tabindex="-1"></a><span class="fu">anova</span>(M)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 <div class="cell-output cell-output-stdout">
 <pre><code>Analysis of Variance Table
 
 Response: Deaths
           Df Sum Sq Mean Sq F value  Pr(&gt;F)   
-Edu        4 478.52 119.630  7.7539 0.00251 **
+Education  4 478.52 119.630  7.7539 0.00251 **
 Region     3  57.44  19.146  1.2410 0.33801   
 Residuals 12 185.14  15.428                   
 ---
@@ -1100,7 +1096,7 @@ <h3 data-number="28.5.1" class="anchored" data-anchor-id="two-way-anova"><span c
 <h3 data-number="28.5.2" class="anchored" data-anchor-id="visualizing-a-two-way-anova-as-a-table"><span class="header-section-number">28.5.2</span> Visualizing a two-way ANOVA as a table</h3>
 <p>You can view the output of a two-way ANOVA as a “mean polish” table using the <code>eda_pol</code> function. Simply set the <code>stat</code> argument to <code>mean</code>.</p>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-24_53efb0f64413d89e047d527343fced23">
-<div class="sourceCode cell-code" id="cb26"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb26-1"><a href="#cb26-1" aria-hidden="true" tabindex="-1"></a>df.ano <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education, <span class="at">val =</span> Deaths, <span class="at">stat =</span> mean)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
+<div class="sourceCode cell-code" id="cb25"><pre class="sourceCode r eda code-with-copy"><code class="sourceCode r"><span id="cb25-1"><a href="#cb25-1" aria-hidden="true" tabindex="-1"></a>df.ano <span class="ot">&lt;-</span> <span class="fu">eda_pol</span>(dfl, <span class="at">row =</span> Region, <span class="at">col =</span> Education, <span class="at">val =</span> Deaths, <span class="at">stat =</span> mean)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
 </div>
 <div class="cell" data-hash="two_way_cache/html/unnamed-chunk-25_b9389ebf43a5cb11a94361e7db6b0a52">
 <div class="cell-output-display">
diff --git a/docs/two_way_files/figure-html/unnamed-chunk-14-1.png b/docs/two_way_files/figure-html/unnamed-chunk-14-1.png
index 2691a1cecd7cfa83203ac8c79dd1a9c417fff53e..2e33439ee8e57f4fe2669209ede57863ff9cbd7a 100644
GIT binary patch
literal 9111
zcmdUVXIK==wl+3{4mpDe!jOaHC`cG`&KU(HgQP7WIXEhk1coS?QF4}?K}nL4AP7Tn
z6C{J=47b_aea_kEd_TT>pZn+bQ(e<tt7_G%TB}yQtER)WG!*f1?%-fxVBjk&$?0HV
z0PyP@iiv@Np(Do*0e=>?)b!-RUknT}3=CTgF)<7=Fh^q8f~f{9x-PiBY{hKBgcJh{
zkw`Hln4@j~XkaUbVGELNF|O&?7t$69rW#wYLQRcr4VYgc#W0YzU=l-uWU%#h74WJ-
z)_@6(1S_D?Nc2^WEk=#4SPc?Pw%4>j?wT6(brm$2U)5Y)p^;)}q%FDzOh`0H1KWX=
z>+1@ngBkkj3S<P<yF%Ce@pjz^EK|M<Jpo6F{hN}pI|jzxkn8(K^wN$E1_lg6Sx#Ed
zJ8d)FQFi)%;%igv$wDNHfOR*wL_Z{DQnfPGGWm<D4!&_WL1)g|)m3J-(_|v&i7%6f
zQ|nL&<PmqK)hhc#5z1i-3_yDY^6>)#{u}}Um|#S(8wd<+C`5^u(*CZox4U`uS>ff<
zAg4{o!qnX#LaCWj9a005%Vm$Qm@itJn$^CZ-BFrNtUTM=FbjCcVphwGLzMrzNsNPV
zQX7@}(%xLu!x0gFR6TIt>af7H$;E;Urj@#qz&xjn`aF8PObZljJANc$YxJ!l%9p*3
z1=Sn)!9-}RUz!dv;ZR&-_)@`**@sq{Kn*$1Kf}%X_z3kT(YB6!#eyE^B6B@zk_}m2
z?T-J9QpwlNt30%rVYHnMj>^q4otSCAkIN)=W4Oq*3wP{Vrr3Rgn#@^p4xGeVcm<`8
zQwtm~i&qOVHa8kB$?a_RWFQBvyJImeaT;@;`yl4h_Hb<U!MEjorG^9%x&`$zshPKG
z<xYe5G@J+S-a{WSE~b`jpE+91GHZ?}05cga<n>$W4t_sYtL=(`61^Z=&D}O1^KS`v
zxrv$U2hmn6HbsHnbcBnaJX;FCy3S0qA!#L~Zk(On*>hq4(k>m?pDtjd35|Ew=(A$w
znyF%kDbL2ch#ExM%)VZ{%XyYf`G74XwVBJT!qtULsmJW1^RlI@35{J9u6GzAL64j+
zuA+@B-4qY%YdZIg+#p~nGdxi=U7fzCSUd&x<;l@0|3?dFXVjwMLGbRk?n??_70Bte
zUP?-|oaUcQTVAT<NV9KvS&+Hl@8`BOwDo2$Wnf?dzD8S=dnB|}f*a3bwiVnnA{wr_
z=}SC0>Ns>8>-2NjT6Fb`_?s&Y$67^;ULQszIA^%;xg@9Rl-CcyEz3nkLq&h)HI=cu
zE;*+*?#Txt_~v_L^FHe~+$Cab!C~U+F!t=!!WCmL%TA22-O_1pBFk5|JD|-Kk{vPs
z@ii3<tr{F+_A&Q0(BF3KM)Q-T|1fQsUwY4$hmEKjx44|t>&rO~Evu|h?;Yj$$oBLe
z^E0~aV%Tr;b*DyzpBv_=MlJ>5`=kN|Z|_|6C+HpZSxgC-ASxatP1dP<4$Q^-uMJp^
zO6ILes0}f-!t|V6geVhdjN;P95?ikuQUja*T%Yfe+pNakM7UK6M|1_YtczdF@yiqu
zUa}qWO2jp3>zCIjz>VF%)lE*B)E@Xa0?o4*Cq;)c^jgE79D%{`oEuSAOZvJnW5=F8
zeXkEHJJUGvLUv;Y>N)TOAHzW-IO+)^J|m3GzEtpWd}`C{F>W9CuXl^(hVw+W^~qDw
z*zsn*RoAt-c3tR+Tr8deHki_@A@zliMob=}ai<#ydYoR0Imp?ixAQzH%Jr4da-QXa
zR0zF~UdJiSK;UF2z8F#L_0qjLU1+;9YI4?j`F@iiF|kxQ*m!^9o^b6Wt;EH;B9{V+
zeBo^h;2kxOR(4DzjVUZAeq>4w*H+?ebw#Cd=o@Z{_(cw0T>;~3eh(j*_T;n<%Ab}?
zsxyT=OvtB}xSJn&zc$#R2actp>hD=IGus<xgLd*a$#g)pw$8Z(n&*e~JSo{F$c-8y
z&*5Hn7z$rKI;rukq;E?tL!;@)alPV^`rAcAjS29IjSXEY`J_ZVJy@lyK8cdUYx}qz
z6=s{yyxWkeCb?d*tNx=jwHc0pj)1IOo75tx@j=TJxEAzM-b~mXMeuS_<-?!c^E%|A
zK#ZlHnF!dMOXZg|#S5#w=6BeC#F-lwXtMZVN`!hr!V_U#=34r>vZ+jXI}w;nbT?|N
zvdRZ~id_2#mlM=c`|c^1=SE}BhiUQOrJJ8q53B5{b*_Ec{2|D579s;Xvn`n)Tv~Up
z%r(r>E1We<^?Hctz<f;gpmQ*Xck^~J9G$mU`!puhj;91z-AwYpS}yk15%^SLr2n}7
zrA<hjjbCc9sl;iyK30VbxBjDwc1=55^?Q5y=!T=OOU_LtKY~BE=BS#KjiswtnD7xH
z&cApi_}SlIlCVK=NR{?mBpk(Kxn1bv@n97-o#2omP*o)?Wh6vU(?FDs#K~8bREZSO
z+#M2=Bq)#Gb@P!$nT)sZFJtY!hF3F1+qTS}O*OIdm~p#;z8(&P1HcKw!DI^o50DW)
zGN;$_k!p3=UtV%7{0fCaIJTEXA}^b~)tBb0Xl1E|i1OW=@{f0HWGf*6@%$$kR4)7$
z0!GA63wZ(0_7*B<U7&z4bi9PCL8hhyTAP~AH%o`+MWJMgKS5tf!RQ{-a@vZ&(iOs7
z1@Fx=Vt;U#5@7}7<3wPo(A}JoP*ZO4^7EWN7Z&2n(4~r_FNV*5ic3EApBiX8HSHJT
zO;=0Dv%oSjz6zDCwJX(*md55ldJEV2x0`tR$A=Zb)kfVkwGi`tkxyGIoQqyMsPn1!
zNf31tUYD;tOxjsFRC2M1qjzHTb@;}RB0tmObrZm1275uf%;ppFgh?UBHqV$~T1EgN
zQ?7a4v*Y!g@2X<4-!>goz#)9mrJBfbtr=^1Sc*@?#`z9w%7t4mIF=`26QYYq%3aF%
z4s<%X@bC~25=L{E`4%rfHqixpCcK3Zd+aZYKf%tP>rj6SxIuzR+6@7MvA`!HDDwIB
z_PdKYS~X4TD;k2&xqO@Gm&D&diM598At`tWG~DupaI^6Zy_S)T$b0AYwFfs4Z6qeB
zK}S>{9Q6T0sl@prce(?VybYIZu7m9@EEl*Q`|ns&k~FlJc2`~kCD*-&AmD;Y<78lG
zn1Al|f9U_09D$Eh68&IEI&dho(8XK7g#AmzUkKs+qafE2945v4kC`R>8+iCvgZdl8
zU$*vdW5z`Mjp489_$M0qCB`oc{gdH8fXZLO|Dj;QKPT}Y3_-j8XI~)0zmMw|!+%3Q
z|2D2awDRAXC=`xIbLji#vcZv60tk+(E5e1qECB6d81wjW@|npd0&cN-Ps>Sz^GiDe
zvC{c%9MGsT0Bm<lN0LZkR_&^7$;w1t@=$OwuCi-64W^!zXxX*Ql*R>NeyYm7Hn2dT
z^GB#>bREH6*V-XEV7C2FU5;wP3i>&mrDRdqvLyD&!kP46UcG}drNZYmC`3Z@om$K<
z53|nDpmq4xBIdiIoq#Z0?IDHzQPbT10co-K`z=Lbpg~{wSv)XoW%Bwk5Tsb3IMcHo
zkh;faHNK+-(j>6LizF?iE((^h*eLDU`%hMX{<Io1R`}D*0u<km@~zaZGD6n;=VGjZ
zlB|u}(X6H+)yaR@+NdA5le_!zp8omOUglxx>CGXC&K>RazsRH>q9J5#&atZF+O^y>
z)=$FOX&@tAF>ALH7;q)|F`W_cX6(C}w@k5m8_bzcBjqTaQI_)B(_-5mA0Ct6o_$OK
zntxKI!JR=_2h62;wQ1BK5HMZ6Q(6Y+E4%VPPz}T;NqzkVSGTI%mY1qXrWUd9`0dA0
zC%g+W_Mrwur9M(pzl+pT(oqJ(+w!Aui@`;9Uwk~yC?30NbcdKQ7f`>c2+Rz>b%zQE
zZJ)m)0yTS8@P;RZs?jyC7KH~WpW;-R-CyZy!~lYWe;P&iW~4qeB24mJV3obXvKgLz
zOE|nyMtN(75>fwZ6+UlWyw;liOv?E6(=-W23Y=VBDx&<R%)^J%GZgJYMRJVJLR}H<
z9{l7$!qI48TqSBZMo&Ch%t8t1S@xNqYny5RQ;&->wCrCN8+PC$m6VC4-`T}qz;$zi
zM9c*JMqG?0n8h_fYoiyZq);U-+FM%-l0p$XUoYMLjNZ_SyalWqtqW0q`p1rKC4UWC
zhs*%CbOXOX4NBH*@Tt4E_t=7}P#RxyiX~16md&+W{4+)f%U~Q1dN6iEwE!p0IeL^7
zaSPY<qaN%JfAPn<TAjS<+t7FHc4t6xCV0L3PuKHVn(@?v*aG&nqHZO)gg1fD^bwTI
z`~`2anEoT^s{=S`*DyI0P$w60hH<jpYX?O|VognlxfUu?=R-h;wO|V)ZvMazI@D-V
z#0Qj9!#<hPMQ(?ek(R;x!{o0qh$Wh>f}kgX)^OOepug+q?&t8*<ZmLkq+t`;*acTn
zDW!mOi}}<sK4usdQFlw``P^!z*l#x)#a_S<FBY$e^25RcE^N0SesdrjI1FrVI<J)%
ze9*>Ki~&p@-MeTBe=jw=EaiE+$L3;TsCdobvgokHv(F(=(GqK=3k~WDotD3sx0|}v
z_OUFM7imAEd8TguGL$?_EUEXyX5Ph3#FJ#C)GMAlJSh^#;SWf``O3TUV){Xu{<$<L
zXM{bjfIXL}h4JaK+Idy|*0~`^I)G@CIgXP1<g!9uLd3?~Y_~v1u-l?A(W<jb1|_3t
zbBjWc)|N|@9hFYojuC?;#kYRBtbcW?662Vi0iOP{R7lWYzORJSdCdik(s8QMa=(I;
zVmV&}0MJoh`%ng}V!d}bOu0Hoya^Vdv2gq_sh<UMf_R*Qd-NWFbW7tBRc{VPiWLju
z21==sl=-mDwozSFhzGIO`xv8)P%InWkB1#PSL9)?TX6{`dm{ppJope_(P?ZZx^?1-
zcUGK*nRr`}*xuriLjgz%bP&rVcfby6%{zF@?-4HOu)O)dKF*G&5Oc=tjHH`{kWexR
zzSnnqreKR~ck!P-ovc4)u7By=A@X&hkDRRQ>;Px$CP^ih^x3NB@7!>jBKr>WpYtvp
zjCWr~rAo@6jy{>dIUVgg08tP&PSad+(ysVi>V8}Hy*>UV35)-u8v(eJp#uX)R|wnh
zkgz}7Tq2+dhimp6$-2s17LX?jK@d)7R1Zt%a@X%?NPVC5zB}9%?{F~Sa(@BYj3qWi
z0d&sra<Yw<<GuBe{HTS;z{wWjc^N>@D%dt){edi$1H<?u<*N^<4PE~o;<)_PCIvQc
zigN0px{P!cO~lA*nI35B?)|9OH<WODv*AgRUVRWq?7ipNa3ex%8D(6cnW<mpoBWjn
z0Q^p2APqqj9*zc?vS{uqAq?#0RHye_^I%_0qUdoD<3?I6Psgq@WJJu~T=WmVg7>_T
z!((EpYw%Ee4AZ`f;$PG2`k`@tw_|SW)c)Hk#O$%l$H`_pK$ogVNJ%DDtyw}}Z=>aY
z$r84A2?_dB0#}SmEu*i}INz%!n&=+N$RT@N5;{VL^z<mhN>A4B2f2?&WheE-q?dnh
zC-Ih^6f-ty_Dk9ouBY>KMAnKSy6q~*SnOQFJru$_%JpT*&@u42v+DQqs!u#~o$6N4
z^MXup#&+=2NqCp^p2!X79)}Q*sb-NPXf^$!<jU|&Ga4^<_-+F1QWWEIYr@ZbsCZs>
zA00{p5~dqlTeRf&jLRq`^7x%_r5i3!WHo@LYTnz3m7~Kgz<H!Pba;bj*K0UpjTPxk
zQW9v%RT0~4aMEhx?tHkt8<gFt?WR)O=eaLj+xyIa<SKkd;%b}w3qMcRq5)%zjlkOi
zMh&dOGjr#b({uA9MM}25edb;Jiy$)X=uu-B-&4K^4Nb_BnMJoTFPOc%Wt23*Ifbp0
zF1G@wtHojF+1+=ZtsA#a(&4+Bn;A!~=iM(8oWj!Agayz#u(gsFQy>_AVgO}2io1%y
z(LguPJCc-PzokPMnOrCYTrDV1gvEHWq6EdKajknDaN>*FdowWra>AXC1Svmi`5>l&
zES5O|i3jHgIzO53DsLP{mT_sK#vZ$cscSrYXp5ZUpO+y*SW}B6Yi!<ka&l{C6AHD<
zY`BX$!1fmEzF$>Q;_+gzT^BWnb^t`Z-~Z<RjzjRlny<8D5EjS9ccN74Ug4I@`)rgc
zaF-Tye|JBhr{3P)9zI_eJinFWca#v5&=gKFA!H;+(uNICrQ1n(9jc7VsOLcpjJK}g
z?1=?`q6|z5j@k{}4T6plK=o!dFL_c1-M+cTTzDk=>l(w7a0ID*q1G?YvIbVV&MX;#
zle<c3{OPQ^t>#nT19A7n610hXyl7}W%mzP2j*}mZT&i`TR-yYca+5O6VYeZO=~xF+
z`Dy+=2*fR-AwR+RN#Jw1OY-z{QivNaq;P7;_0ENbfhtk{lj|TxQS=7Ej2%?3I&)6&
zG>glc(3R*{o#D*P;Xvq(h8_L06ZI^qal0on%({!jrz*#mZ<Ju}4~dMXmCXsDi)qRy
zApXPuD^R*Y!blRTD3YN~z|&?AvE)Z4eWDMcv=9e&?mV}M=}_fmK(Gj7w7=rRh5#7<
z0<ixEUw;A7|2;gcm5J<F9_rf1poXjw$FN}(DcTpnQCl~{hQ9ClhGybG)@Y)SxnTV*
z3a@a$;B1}T&)VD?f`INku{3OjAiTj)0s!A&L=c8fS!yT{GcOH;jxo|U>~Ij}`@!*;
zIN&H+V!i}z48-Xxr_#$QL&Zf9ZC`K7|LbVGT@f{K)HfIC5rn=5f)-dHkch7rRWiUH
znw|3!hsYwjsut^GP=G{Gs96B1l+)neEppq>Gf|()G87KJ$TNyVOmN%-#l+9q!kbg2
zHwqmdMF$AA$)KJ+8eeT*-(iZ?s1AO}6}j<gRKW<uAJ2cdjj{;axAyVXeU0sBJ&Atk
zBKaMLM6$HHb{b}hnBEzg=D-H@H<lUe$k<$Q*wH5KC9yEA&Opf*(MGU^<?=RZR2{zH
zS(>vSc%Va1{0L?-XyR}`Ivd~mT--ngmu&BJ$gp+sEv($(do!=cLdn?)Gy^9-cDh!$
zm1pfU;u_&HK1ax%1qQacy6{MH;~-vX%e!|c-V8#3oABI_6+xJMGW>ygV{@{Fka`at
z1wig}Ijc>V2w-2wX=cE|V}7AdGSEVQ60e*rY&B}^{bUCL`y0sG{SbN(1O9Qm`~QFi
zf5mma$_n>YyA)9wcm={;_caL-W>MOuWG~=>AF_o8tHVKHV1RgHPRj;9T;o)5B?+Vz
zK8JHsY3RdYiFkP&Fe260y5vNm%<Tm@9t*~8RoqSv7O)sbwe_|Xid_ENZB_gm4v|B2
zP>B6s0o%Vuy#fFNZe%hZXO4eL+Hef-^W81_)Hl2^JF@J#&u?*TYfJkw5K8-|Fy;UL
zBd^Ur583~1D*hSq{)b=q{~(1~;O=`jgub7gohY23qZlqP!%#1ukyD0cDp)0<XITa8
z5v7!?<~1qc@$u<iNT|WC(2W$!#;{npWMnRH>fVOyt4%M-H6)e^Wf0APSxaB9VfT$Y
zRu95rWh5fIc>Csa25;gU!FE1Phw(Jj-qPM*OSK6RD))5+1iL&*n1g-qL|V*0ux8pa
zi)P(fT6O=tKwyN@Cu^>!lycH2&ZN<{&W<g^{z8UUkB96!2)+(8Psx+wYRv5a4J#a%
z;jFHM?p@VyDrK#whAKT15c}{=7L`M>O~I6Q&b_ze^(rM)rSKhAfqS=dJaFcRzV3wU
z{EPfQcuC2XBqno=+jf?nf>b$9QZVq#@5&Q@(aaKk<B7X|$NmejbmUn1Y9ZSAJS+=G
zj~pdgQ^fX=HE)<kp{gQQVc%iw!c+VaV$9NrI<j@YLhYKxLAj~?q?l+Vg#|5Ph1t2r
zGVPKQRxI^vZe+x$Ju%DbN8G~(uUlR0TI1F<b#M(0urF_I{<E=zj|*h>?4NsYawFqL
z?FksqeXgt;1H`uZz6)|9Mx?9RsCb=qTiYqR2f%62&Ydc4j4mQHM6CtNPamYCYrL2|
zc>0GO1cT|Ll<`bZ;d|UJs{wgQq%zT%qGF(`QZ$POEnYJtRSv!tX2lXpkZkIqQr<Wm
zE&Pt7C(*c&zbHEtEJ~iwvcNvmCTP+hI(mmt+;*W>V+t;0(eZ@9=lI#t0SzVvoAK{%
z`i(3h*LGmi;Yq~Y9t>7Ud?FGk7FUoc<oT3-l@8`hSitdoh&-%RGmBkqRw&H3-v-YZ
zwYi<6-!iD$!U8{GmeSTqgX)ngOn=pB5Lv#-rF9~TdBki^`f*N|Dg#o8>wd=Pvs!p2
z9l}KfCHT)%qQ4!_{Kuire;ft<PZq}Y-&z0TmG<H#yl8%VwsrPFUyX~#d&9YNtN?LG
zI%{{vOAgN}zx{S|Nq&-(?6=y26T;%0PC@vy#;g3KY_^J*T<&Fn^I+CRjkGXjgn0dt
zt$y7=g#So6&ndBG)?ol7_9rP@%3aon%{Wz2Cb(qV?;oG=HogiRVKCKCS_V%GDx={f
zEI^O$>~sdsOHS5}r0N4J2gV({Wwq%h7b%6MGfY{7h9yV8UPf~J)JHD@g8FMsA>rE?
zouv~yJfB<K+~ihcE353p%@A@kr)AmW0Cr}AgdvZG2yw|U>AE$!O$T6e5jszn$?e%0
zxoJ8p?MHSL>t(*sMqHh|QCIIxy<Kr6gl68l9~LlJF*W-r!m3H*Oxtl1C2H`(sq_Go
ztiGTt^z`@%HZnVw#!}HbxvJ4TNX0CiJdKrVXm&ZhZiI?!L1eCpJTHDZYss;zGNaPE
zB=?cO&VCZV*15T7J%_KO!$x?;y>>0saoSRSj!ivB?c+-PAU4Qpru>#%+k*6Xo@&Gq
z{kGDkYY8AhW6yPrHw=u_OwT;Tgd#4V#>#h_rS*Mrr;;ox+NJ6QO!La@PF7A*cAS=r
z7t`k2!!uR+93j0{5Bo~-WD$$%;`damqZ2o341|>sI3x3+gfTHRvL~iwwd`8uFK1tf
zh;_<GEn&C@_C)<OXI0^R8X6=vOyH6>%<r47HzMAb7hgs-<Tg0I+h4-=xtJpVXQzp$
z&21besRI>bmWfOB%Q4DwX@B8T%0hUh=8@%ZtYtCwo*tRA%0C=lr57DveI`A*!RfWo
zNiCU^>0UBaQEI;zkI9t7DI?C($+g=U!^2D-%bd1Zl&(FZ6%=P~++w`T^|><59btK)
zLaY^G%&w)=WH;ZUukR_gfyL4AuHw<If%3RH=~*A}aOoLKg#2Z^mps3P3a}*cb~j%+
z7_NY!y|Eg#u5_Y&uH|uWsili5Y=4%`nOeY{F~et&qiZ#V?;aM%piyG54=?^9K;BIt
zKg?rF4)h%L$!PToZpIc@XnHFsqu%=)o<3`^B<qC2AYy|R@%jvVTpV+^$p#ygIuGY@
zvX>k?1cvH8Joh%L-A?&!bKrgRq*XO<(+9O6zNeS9^1JVJPjhzTor94NkrWmqE6Er8
zbPCJa`MhV{(w*epP%Uel^K88jxmJM+Yro^XtM-rd9-r0K$dEm03Qy7pdNQ0%Cs%)x
zDLKp8=_Xg`=cQQ;M^4~MZ@wl|$=Ot&q~yY`61?;N6s?+cV+|{X@@#NGK&SnlGe5Jr
zfLSv<`TmaCiE2)g5K!=~S0m&dJjX0)<Q@@q{B9vJTdSwd*`t+!;TnKSKsl8TUBV1^
zL{u2Wj1Ti+jqC|62tk>wN~^b$C@NK8&svM)+_Wd6?byDUtg~j*g-vV+ULIUY?zaM+
z(`g(zUkqSYG;Dzje)Ht{{tCi~eg6mMh&QABmg7+C`o$+UdF@)T04CoALVF22;F$yF
z>Od4v-mdP~8hq=1(`;uWM)+G{t&=w#5S=}tc_C<ghPnUo#&l$oP%ZBnnWDC**g3?c
zFQ$B-EI~j`F+agkX84nPiVOI4g!=Wj0J!(aZR<zh>qT&)dd-aL=X6qV<FXcO%#0%8
z#y@jt8pnpZ$-28I#&L_t+3N3?eXa3fw;leb^ZN6sYU-sif1gH3I-Jn$yq8D`Z`ff0
zKKU)eIH~3-jOr7&*3M0<ldmexznQD1J1xM40P^%F>r}~xD7TiHrzjIdtStB5sjwAC
z$$`)1i}Rm7laj_f3ZTMBluQZr;&bYbbGhoB`njoBONf-H>k_<*Enx=2JYU)0IWd{M
zSx@X`quNtvAsJomcRExd`~uUeI;y@sB{X;~ZY@ojHp+XQPLk{gHQ(2;_eVz#ZYN4r
zx94Xi(-kM{@-iX_ND+G0J^8W>Q>uyeAKWYw^P+Z3?Q7^aoxc5Od*eC3C!PHvuJ7I5
zGBebKN#2Zj)|yL`oB!sK0%D{-s>$wghoI(p8QrciZ8K+Y{mM^LCE>$eUGX7}vlY47
zjDbn-EZ)A#ozBID!R2|coM-W^pEm5AD)1O=)T>0P%_nf<5*RiG2D?Whd6pcLBg-h+
z*qLnnL~Z$c=$B@P8f({e%4WLdUnavFrOa&}?&+#+(UdLVde4p}tRt*nPM9Q3?k0<O
zZ>}=vP}DnhH19T#$f;56b=<0EKK8JXOn7(8eyuCwD}!4Aa_Nmz^9P-l9Pa@j%&~at
z4tFOfAd$`!yFjtPm>My1n(4;PK?7Nfu*nUfZ||-UX(!FUO<FGXp$#9}fj3M~Ou5Ti
z`MHAxe0c_bvqA}jc0{dD2{mjyhi`b3Xfo<aFn=U~Lf}GIgh^3xxDilm@QV`+3}tx@
Kxl)<OFa8To(x8I?

literal 8904
zcmd6NXINB8uqX}#4j@6&h@_F6M?p}6aL6EGkeqW4vVdd(M+M0YAPAC1B<DDQq?HU3
zB`6GG1<6TrhCAr)-Q9QZeLvp&-uJ!!`t&)ctE;-Ys=7{9&xC2HE0Pl5B*w$TBUM(C
z)5OCA0hbp99}f>tQ;r*qyM5D8)t1NI@$kg(@NDtK#PGy$Eeg*TS24J*%Z|%pD`tzU
zC^1|o3MGcZwOHGq2)1H)wm7gY-X;99plngNim}BFz+h}Kxb^}ihKI7nRWTF}d<n-D
z3<`s*SQHM5#iFnm7+XAytr!M{tG1W0pBDy$y&QtYwHKI+3oJ?ui?YRHa218c!Eksu
z$Yr^}!Ep`t;sQqqH|_$9`T2H<gzF=0q?N%fk?1!i0}nhr##fium6-W08$3K1p0b>@
zwomGM8mT|_zL!FNxfXZ-{rY|}lL0@GeV>VF?ESqCEzX<b)x*`Nx6Uq@wV#8Dp5bxF
zK`8{<4<rUu*}_=_kgT)uPbxsq07`MZ+s-fw*cBum5d^FRzyJ{F3S}>WAsd<LgOPPf
z*YjE-s9<}12V)LtirI8_DF^c>#N)vJi{i(nng@--)@Hop{vPM(ph1*rjrCoa2EL8k
z2vfy-pypLK(ral9l)qUWRcpTe&ctsjZs-}{qFLH^qz-zJmR;%($qI5MO$6FUD}w>X
zOW+<K;uG8Ic6B@eorwJac``(eoO4QW8tfEV_Eb@LQ3nw4_x<1<oKv+vZWdwmC<eyH
z`q@WJV9VWS^L%dMst5&qP_g)gnigY+0qlrGDe%xS08qnqj>dg4zv^485ntXw5ZBm6
zb%JjxcoUySDJTQFt8B9qJY@VqoJy*rac*;5d^qehZAxpvsVwFwR+ZOvCO5@PQbJqR
z%~^m%-L)^x9^1$IIwfu9<Yc0jH=WOs;Dfk7zvYzFy?wq`rvVJ{-7japV*Emj#TAA3
zjX55ArFrKj&ljK11&F=AiapDOHhb(CB6~+ZQT-O=>N3es;3vTsQ|Di@PJ|5a^9@{E
zs7tv=z&8G7o1b%{e9cj5%)A|LvW{kayloipeY!yx#_x9)b>i<d_n31~Vn|fOUj|lZ
z;Pk-I1nY2=;IOw!C{M~!syB}?S)FuJEW+Xt=CnuT+s_)S-RdWRaig;rD_^@l5`&UK
z^F7o@NsE>ff(C&+J9Z_h`g$*xo9Ep9z2@PL9S*Gvdvm}s(~jqi5wwO|gUP2F%Hgqi
z|3P(%!7N$n11#5|6v8tol^{zPfUYPOYmJ#Fi1Ez`kZfe$&9?POLCRH&iibY<ksIJ@
zGCA=j@gT!?o}l9)f=Ns&eQf<1u&e`fx}_e@8<IX`5NMNK^tKLqJTL$5UfP~muYJgO
z*POi+EToESfc?ZYP#4DoRgD#!SWLZpJFonZIu(enxOKZGe=*`X3?AOlw>^C4NtU<I
zu2|7&=0iWj=DH|==iGN*bMA2ZZLJG(S0&1K!7%UYsP#l;HHbzyX{xr*i@*8x*~+@J
zP++bfqpgCbDTSj*&07*)o-sa-#`(=lM1G`Kv-WVIwat7SA@X6QNW@3!y4AZEU+%~_
zk)7LnCebO6=M{`kK164VI_qFc##}rmLjZAqsen6@8lZekydMdY2cLm+A{PTxj8w#|
zI+hu3of2!`wcFKID+c=9zVzz@Xg_3CdKk5Rfv|bi!)d_rO+Z}<VIlf>*ULnwvMvoc
z%I>ru9U&fJ*`NizBX*+9y8-D5>h(N|do$6J_O0Jj$%}qOh4sS{L*ST^@ZKu&=G^03
zsKV<3pI<-fyQU3$0IibLtV<F3L-(F+#+wQF2Dyo_etLZeb<RrZ7w5-yXub$H#Ed3f
z!)lTrEOXBkt;|X<ngbXL%x5Rt^;&MvZB;)Ss1+&}JIf}mU1kjtTwVb(F?HF%yo8}|
zI4LhB{p@2_loiZv<zWsxJ`LBvR`-#kCnsm3N#&NW?*iTVzD4z^RSt6wSM|hARpxB1
zI)O!pfzjQQCpyjJl;1|*j7}ZA4Hh?y^PF*tu1^32Hz&2|c#;!wtk=8hTvu`mxe>o*
zc#Ed9%n4*=%3}BEe8FEmr=&`97OC^OqAxqH=)}}&avfZt+L2Ou@(ZysLHwvt7S`x)
zc7u>H>8j`ao3Rk?L5?WX5zDvVI}PgI`&SB2&(SLFALrQmMQ;jsOliWtxRWUguHPsC
zwpUUrPTV#qxh~QcN;9;_X%Cc%nD$6&6AW$Am5a$t_y>9#g0w+(_vi@@lmjKJRs2ke
zvN!yr+-hi)Ch>I33cX6$hNC|cSNWaqiuF;tZDwo1DjDNT|47Xf7ZzfO&>@JvS#&?O
z7hCVVzOr?YAb|4l$o`{(F;JpL#V|$DL^z<7`|+w1DYL}cTew5xn0Eo&a5xe|9nw@d
zY1PWTafd|v#KVTHu(p#AwW)Z=nON6thlcCQBL^c@X?7Te_yzFEow!gs$nXN}_lS)3
zjzc)c#=}h(tw7tlYxm;vp~6VWd%wA8CLWp+L67tF6cE%iVEP;MkrGT}ad*tq^cKpa
zxy)kMuC;yC@(>>+dO$+25F}z`oPEFe>L7*@GQwXj*EnhZArc7$P`!|*qsVi$q~O8_
z?WtV@*#PLKuu%>Pfl8RhOdCvt5WJFd1Kjfrn4*-u*90O#CLYX`l#~QEZ&p5q;)l6~
z!3U?3-!dunp2ST2?#g3j+(xTZPj}a@X3mA{ltZgi-Ws`$9Xg11ui(5usE-AykzbRi
zOQ;2f8O?AUGgj0HEe`)d{|6^UbEpiZ9=dL4pzDeM3V!|UEN(fO#BAy68pUO_jIKG~
z^^8whh?TXGpFc(EnAKr~@085WUIl~LEcGnLT3JKPf}<j8qn1cM(GKyg?0@HlP+v~6
z=+gMvHG?|nWigh@1*T!lLe91jb1Htk{_uw=v+|mk)IBNWp*(fmS1r1G33jVD5jD>E
z%|GY1B&jkqT_LuKsontp>d7Q|UC~hgK>`<;G=118Pq#8|Zzm@MdH(JvLA%h-ijTw#
zLlRlzBWFRE-{J3!f!Bk<Am3MJa<`Dbv||Zh{0%wJfPeXQb}PKSn!^OSdzYmK*|yC*
zF+6fh!`Sj(rpfAx_!Z<Vr4hQ{30?SuDintvCV<ihtL3*H(m*ezWQMMyd~f{xKi@{@
zhK7RnFZOH0Bbcv&GjZ5I8Td00_$LD}ls9g%lz+zvKP~4O7`#n}BMd?|w8Aq{0BrL|
z1Q*+1AQ0PMk;Q+rqQ5}@8FWx|iQ}|H^uG}N8ISyf;Gb;#n;?#jzvsFn_=}By6Z~g@
z^AEHCH^D!5#NPz}wXQ!2{(CMQhySCXp7RX$@hR^&`;g>{Q*a415`1`Y`fb%w7y*ut
zX=-&O2ZyVeAvHZTkxX{Uz^n})&dmIX*?N_WyYCvNb95swx(r(oFq}1H<pTMlrA)dq
zY0Hk)UFXb1f$i-$f$vgr2`g6lw|OpESNr)w%gN?`nYt7*OK_**>>5(xnld_~;pp-~
z9ySi96gHTEg@bX^Zi;A39LB1_+-_|ThMES}AD{UjluDy(cQ=FAO)ug`%|BhJyT|zb
zcxuMw;h#jV+_dh;{Q_`X=GHKLWyA2j)X(%;Psi}Kmgeo{C6-?sp^0_q=*E+Y-RmIF
zCTFFGNP(B4QcR4E2r;w1Uk3NtU%=Vde|OmPc=MCle(4E^DWpn?m?%TNzCYpzuK;eD
zY%A{3GO%KrX<t+8Ut458K&+c(S%d=*Iol!)vw~IlY74qiuvApbsijhx5b%63qdAU}
zBiBQB9Sc5x0XWbr@hhv;d#91nW<ylm%r)$g)0=fZ!$vTRei^6x<nKtc9Oje)jn&&9
z<7cm(t{=bIreqT--wa-Mm{^vDEe77A{Ic3wG;Mf(hrZ=L1z1zAso2if`zSC6OsU{$
z{B8h&cKfD`_V00z?#+}zPemU<E`^rSbNE!d>|o-{^NM*Xu^CH3<m_iXbbGJtz3Hns
zy}!izJ=s^RW+|_uml8OJbE)i0HLGw0HA}2Dg>-VB5>j@~YhSPzUmfQ=R(6Zg=Q~uh
z0dTx@)K}H8`C)fdS*-*E=6<B81_S+Pk>2i<D${Y{;#!K=lwrP7h-0#vy~u=V7g!yc
zEb-lv#}XR5Yr*p*w_ht#*ca_?c0|}Brb$;nfLeJkIXP+3bkOt+tUaIcwwGJI+^vnd
zf^oAOKGJP=lUqNP@bWOS?af;B_wK7R7S*rJ+_rFozRxq%C@OY7NDuoX%8dpp^&{2(
zubsIhN_n;#+l{z!^(J@YV$0J>{U!WB&?VBZ9j!bdGPo1)ak0{R`<tYxV)`$FOgD#O
zD#7?+@7opO&e8diTeGt0UCNi;BjvNQu%fFs@1&OiIQ|bE@GYd132`n)hSuH}o~|7u
zf_jegYg<C7P}8K#{#kh#9~V9R0m0{t*N228J$G+DHkf)?mf8weyVvK+PSM316|?^J
zAq<63IQ#<!`5w=AgYJ6a?=3?*==mC6XtNdU5gu~oApXMdOzWzoxsEzTUZB(w9PDWM
z5;3!85}d}~ZGBNwSQwPT9&e>>A&LVx_ni2~ogTe=I=)<LbQr87Dvdrq>#ga~S{G0_
zjFh{#)bVB0uE8jMWhZxA+1u?89gQ1GMN<Plb|unn;c^5yf-Cz%)6!@|g$43&(sKpl
zFBB)~E;VtM5vy<dB>lsAtaNE)VeO%`kHYLmolkYc@~I+WBM3Pw<D-yi4&M*gg-|C?
zS8m0;vI%;>%1pOQ3=Su;5bc~AUmZzLJ9BEj?g<996RiH*DgSg{$}xL@Lk1&)3;)uU
zKcQVZn@%ZRhzcI>3#PEoLX-Z}^S>iz%h5czlko1+weQk$UHDsgsOA`6a{97f@X}|M
z`){%0OlFsQ>5durwF6rsr=|3`Qkm}BzFF+y$}OXDvEs?ON(a~=NBJflY-)_PM3z%u
zTZ)Onn?H7=Cuwor4sw^$7|Ij}Kz(=UKsX_EK}*DIxIx_<6dS6--=MMZQ=->1P>vK}
zR_3Kb6;AU_KR8kLXKO!Ql*(3?pM<f+H6Q9ceTpZj=5X&TmfVAw>FKpcFj2xZk${(g
z>-*|w`ovY$<oZ9j2OV+FC%*RG;ym1KbM>3vL+nW?G-%34p^P`nC9vyt4N~s%QIbmj
z#m6t&3jH4YPnYJs5g+$nn9#XY1JfK@T8~W^SMQrnf1CD6Tc_>HtN}8@g8_$o*KlTM
zY?6SPVKASGDns*)pB*Hp4u;-~FP8_ARvsYqHTG{c9)>Dw@A!JBgqV08(Ac9JFVaEt
z!)A4WzJ~2!CB4+hw3LH%GBu=fi||Z<{VYY@?N;&CIFQ8yl=SDqJNQVJkMPP9;gC*t
zih?r2WBI!RNIBMHG_`%S!V|)LsH7m0*8SQeNY(GpE3Qr4@9zRrT1mxw+|t0nV$XnC
z!jPrVx%+b~9eU@x>?iq=q}R6N2yT1<ECWg7$}&`^<i-aJ(T~(@An6rXqYx5&O2*R>
z&27gg0U6<C?L^L5UW3E87v`|ycjSU@@Nw0P5A(Ech+ru5hBwmi^Iq3u-pwS<qJOXr
z)-)9_<+iq2*I4=UU;qqD82!Mq`^N|XVHcp72_5fa^j8!ut)%s>xrOWkjrSFPrp+b=
z3ljJ>O=7X)=cY}~$$M!%6ajVJb(n9M9cJbTUKFKlyiGP(GrvMO)F*gNU{KI3B1ttc
zaZ{c?Cl~NoO@W(SoLV>|M+#+961=AJ1AE9F8L=kl2*LIubi0;_O0w9jVffe{d71ll
z`-EB^fpyt*(74WTi}+QOr9QVf1UNeN-c*!y3n&I$eQrE_*r#=(wmy6u^vOx~$ZY3)
z{X#fKFG>+nqn4U-p{G+@n7-vnt0YOKbe=zjID<>^4uFJDQ}P-fzTICvFZFG3lo&5$
zaVuR832Po`HX+cgj`mTVCH=Nt$)gv11Dw~gL=#XrqC=BIIg0-ywF<ga?XQO%QIm+N
zw2s@azfet9Y%Fu;W-=Uo>%~dYl~E01pSR;X3u8qUSyU{KM86QxY3pMw-R1o{?C>Rj
zyq4X{*qX<PXLP*7%1PE4*){xQJbr^yvDt)3a*;J`DqWPZ&U$w>>MV0Yz*5l}xikQ6
zPEI~bRh4`q4y<LC(<mFaT`R|F;z<8$Rl^9)TLy0zO?f!I(e>)!I>{2A+LP;s8=M!y
z;O!^yj_r+=?WLuq!<7$;FB<lIE8)FdUxi&S#fUhkmw{0hBh0O;yUQ4|7e48OSuQ?L
z2=O8F^cG?va;2+Sq1(vNT{@-LX&VMxD?I+125b|=BYX5{#s^^ck7r}H5Ncw`cj3e>
z&s{M@PGG$|lE=BaJDQ30192OfB*>-geJ2F+9Zu0H7`<+H7euhx;Z*s<$}u-a4ox}&
zr^xfYOj%y_X?G|o5-YH3{E!p@J5Ix$Z=6|Z>HY~-6i3#+zy0S+XEo(*O;}1wsZHBH
zggStsR0%qV`?R)%3^BhF+2XmQYBRD46^T6OLaw=_#MnGJ$DNDe|CKHMj14hL=%pzi
zrf%1y;_F=JfaMji`^F_kS#l3oSlYSmI15riG#Z-bLJ5(>`v>O#+h`dbRS{5AB8^sS
znO`u70nnr^3;O}Md*8>!D=bV%AjOK8*#eAg(4xN%o>hvBvwuu<8S_}QE+JmV=?}ko
z{!0iMeQ)G8o2bFFT^%Z!L1x4tH@4@vY)|oCIxFt8fgi>|7Y8Kum_wwHZ&@b9f?yQf
zANxTr%oL$<Fz|EW0p(;%lXehHBZj)B6h6uf8R6_+cOp3;1noVfI;Z}5#P~l3%$NDi
zU(x=5FRMRT2e+}Kn=|!6QEz~`l-w9zTy*iScikd!E53%Dk^EypnL@25R{;RujAL#J
zhkioX^dr<iFuu?-h;l1tA^$5Zg%W!Tg+6)|<z9W41WD^Kw&?j~*nuU@k>q`5+&k-w
z+r+$leBg(0K&#Fn`R0?s`5TcBi9y2aP!>0C6e_2v=5ygtp#Z6a0y_cn?LJ9tEp?tV
zu>;nyH7^UZy~V%!3^;!VsGS5W8CN4Ym?K<bgdlg>GD+Ba4eUu5rE8FbQKd6*x!HVx
zTRf=#Ji7rLrY5@{Yym5GXr>5T1kGFTjcvym?A+Iwg~?ezu%Oe{XF=o$YzoW_yarmh
zMj70LKN`VQbH+BIw?lqLqVTDv-qNzm9E}Xbop`a7H}Dmg)HQ%tuHb?LTzYf}+1(D@
zRLk`}WPngZ6+oV;ttbFp`@hST(0ygq@zxaftUpqZ_pUG_{RBf<#%F_NaB-cN9JWFG
zI>@(^U1K=6l@R26_0OY%5Dgdw1Qh!Wpa=!yi~*Mcf?1G{CBQ4sSXr*I$)NXZSz5FS
zu~dtCZ2h4aoOOWh|2%a5m)a``K*-uEzTC2#yPRJ8$i#VS-4`&q0+o&gXCoiQMO$Nb
zB4mS5N!&|dnodty2DTYl$aV|m-JuhQV{VQ|8S*{NErAWZ-Cz5V669<5e>~hg1qu9}
z4E~oC^8W%v$T~PY&Zo?AVpc?+n7aa}PIG4Y*b&phPQM}%c1<3gVvz0`pHZ06&_EJb
zzDFbyKz(~0SX8!wf%sR15GP$$9T=5Cf9c1k65ZEiVOy(MwbB*uSIXP1dOMZAp{LGD
zW!#C+x<f<}VyzTheGPi#v%&TdhNKJ=A9%+CIK`4E$vJ5!O9+Deyq5a3*G#hCn${^J
znI6RXm0IO@>(<oVtAw{S{A}QYh);9dmCGDd&f)Cl6&C%&_%A59T%;0{y&pLcXJw>G
zG$QB|UHk9FnQQS~i6`|)XSxv%*t|ebB&Kr4H}^DkH`S;-m3^*O4ptTE_4PBS04*oi
z<y8s5tEP)<6lDGZSptP^^n5>*j{Jk;JUl)FxSUHC%H?828`W3W>_!&|3Km6>Uo(M`
zZn5r-uzll1g>>%h;u#@(@-uc{eW@5+nC^+M2ABpeS<JH;=rr>cTnipuqfL7U8L?e!
zF9aq#kiAnd4Nk-8^W%EhZHBNhbKzn!2=eAaXx09+u}4Hn=2>-Rw-=X@(vXqcDrvS=
zYr_I?%AiX5HQPD-G|n^&$m`<xI<MmRZo;pU65pARPAtYazwSQz-TD{Qx^#rMbS_3{
zFSc`4I^cPVN$ibdoPOlcqs$4_Ed>(H<WxKF2Z;=sT{wO!lMAG?sXN%?;mfNly2cPR
zqy0RkftU5vmy#|Lc*gnHj`%O<4S)N{|KC7lpuYIHw6h({)$O}S-<)dYGWxNc6%7IK
z^VAd5!{%BwspSZ^<eT(NcHM=q@Q9R?h+bD1ohI+1K>SkdS6!$KO#6HOn4XaTc28hi
zIkzcEQ7K9c5{r770d#+7!`{?J%YQaRKY@~V#*B0B#?yXVX=!Ls;b4|!W3ymENzBhr
zCExCHYe_e_ACxE{800k|Kks=UnLkE;Ejc9-K6%SEA1GX-WH`2KT4B*J#LqKv{d|w}
zo#nRNe4NL(Xdiz9N*nqnlpzV*)3N<j*OtdD3hy~bySaO4NwjxaN4O=;Hp0T!)yAd$
zDLuPW;0_C+pL@NGO`Fuc$1gP3;=EGZBp2l!;I3_VytV^JWJK)MtK<^zEnLxd{%|K#
zqUk<mmrOTVId5j~#FRL5MT{mvu0dOTjSXjsy8?9ijjLIN7SG(B+3I1B^h)b@uZjY>
zZQlyM+s&AD&-Qcjoe=ib3w{SIi+=L>wBv5-@{yMQJPUlBVX!RMF>EoE`>FDvd`*e5
zC>8X8=_danXb2>TnUuOuMFBe7sZx4(_#01rde8TWih}e<JcDZIzSm>uO4HI;Q>&9c
ziK#Z0WR1f#k}*P?1-Ge{bZ6yFR|2Y>Yl1P-#93XHtPkX*y{@e{c0D$NRlgX2UL)4d
z)8Pmz4djmgVU}xXI7@Ni?#M7H_CCUzlQ+xZI)dF){6VLv_)cY2=3CoFpa*I<tz*H3
zIvsWLO*T2%B=az9BizE)CNG23Bqc&Wrd7zrb#KX<#;fj7dzB6cWvI`SmrX=L%??o)
z{ZW#iGIRR0)L@@%V%xM5r&yYdjvnd4<bQ8(>Y%eB-P4;-m@j0VcJzz((6t{M5WW(1
z*NLE~;=p*s$kW%Z#S}J5nsB6vc^H2F_N$rg*9JbJWd3cPaT@NI`4H`W<AV1b!XN{p
zQ0D<}W3~z2Eg4VV`KB?tupg!lF7)E2ybn%NJ&T5`hl^;G(#m^DPRt3{2sFFMf>+-3
zCji?gf>c!!ef4ZRvrtow>q_&RlMU)$A~W@gAV~FaE}PgcADwSTFIwcG$}W0(FxH>s
zc<t`-OBRN}aU_>y&Ysh5Gzig!0|PUGX*N<~#b!K+@dTo50$*C&sPyib3ky$mZDgGy
znPUl{3*zBfP0;;4Bzm51`IVLo{g&afs6T?;=Gy3vro$K!n?FVkw_+_=<8>2Nn;zXX
zuaE+ISKH^)q>moX<IEOX40&Q9EZ0}6S4L$|YhSRRHer{=Sz6s)<+Hx~mVl>C`G7~N
z0A~oOXx>fL8^qen!48d}a_LW{gvcHzz4Dm16#Rbf#o!9txWpMfUPVwb0gs`)f?_9a
zSL7FU*C;@+FL;Pi=yMU3(oE@6miBi4%Xa|D`wY|to7eQ|F7~2vHHhG0-GgEGcevkf
z?`s^l*R=6!>_r-blDE8?KnA%s*|@pq;+(#x5y>KZW0!nI(R-SZk!(_H5pl_kZZjRM
z2uj#Hw#K3u{Gke2V5iNBVk%9TzKPu4Q6V==txvF(rCCUy)xZe>fevP%`-FHT-um>V
zVLeBlsXn_<VH$0*zBS?KeoMhwVvlhW1H1QL%S|v3Wi!g^%>vyx$YAS(pG6eN2D%tL
zEmE45f758<hfkn`P>_n(baENh(xYfI15ns4F)N0=8~)`&!@^{2TECHGHJS4_zg>lH
z(C5cHG2}_ZM)SSWV*>~ZI#zF9b)@DJ|1NJZ?e*5sDZnrg7WC8|gGh`>@aAX$fBu4>
z-#`tWX<*lj9H(Jz6b8}Z*Hm<9;+I$W<|Bw`Scfc)YvL5glUzk&lMr^am3p=yC-B4l
z=Dc^Pk=vYjcvp~@{{=8vjdVs9`4lb}({N24=X&=%<?WkoYu}t(mt`^*rQ{E()f>o&
zvz#1`Y=0RBhzZ*5-nu@=+G(sWEL5naXrov473D2r>|voRzBPY)=qvyH?dUIjgV93{
zH3NA~^reh5KFzx5UjI>{vd>kB)6LBu112GOL3z>-DkYKq9<5XD)cvjeqV)A~A6}ut
z$}NMy1$xPX1H;w4)8|tI`n1>CCf?fni!|j!IY{Iu?9yW2)0>5TxkEq0r;(^UvG4eH
zJ`A2UdDZ3s^HuYEFipf2A>@AG2LViCZqg`&_%cC*^GeSiQ1NlKx7YGWHMwhQoNtJ>
zj!)j?NY{zQHp2Jwiw~fuO;wvcx2g2ML_rJXzaPUo>FWF}5`1`<i=j%!R(oT=v8yEv
z?&KPH84F8RG!zwG<acDYN~4?Z+xp!QjO6kcl0c3mg`R}aJO*I4p=4pTC@Jg%jzrwc
zQl&6{EuJ*YYw~X2`W8N@e9mApO2hjNo;ZvGZ|_tJK`-|kvXrR;4_B1s)#XZL%%A@U
D*!3Pa

diff --git a/example.knit.md b/example.knit.md
new file mode 100644
index 00000000..525282fc
--- /dev/null
+++ b/example.knit.md
@@ -0,0 +1,444 @@
+---
+output: html_document
+editor_options: 
+  chunk_output_type: console
+---
+
+# The third R of EDA: Residuals
+
+
+::: {.cell}
+
+:::
+
+::: {.cell hash='example_cache/html/unnamed-chunk-2_fd93e819e7915059036d51d67790e90a'}
+::: {.cell-output-display}
+`````{=html}
+<table data-quarto-disable-processing="true" class="table" style="width: auto !important; ">
+ <thead>
+  <tr>
+   <th style="text-align:left;color: rgba(85, 85, 85, 255) !important;background-color: rgba(221, 221, 221, 255) !important;text-align: center;border: 1px solid white !important;
+             font-family: 'Source Code Pro', 'Open Sans';
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> dplyr </th>
+   <th style="text-align:left;color: rgba(85, 85, 85, 255) !important;background-color: rgba(221, 221, 221, 255) !important;text-align: center;border: 1px solid white !important;
+             font-family: 'Source Code Pro', 'Open Sans';
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> ggplot2 </th>
+   <th style="text-align:left;color: rgba(85, 85, 85, 255) !important;background-color: rgba(221, 221, 221, 255) !important;text-align: center;border: 1px solid white !important;
+             font-family: 'Source Code Pro', 'Open Sans';
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> tidyr </th>
+   <th style="text-align:left;color: rgba(85, 85, 85, 255) !important;background-color: rgba(221, 221, 221, 255) !important;text-align: center;border: 1px solid white !important;
+             font-family: 'Source Code Pro', 'Open Sans';
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> lubridate </th>
+  </tr>
+ </thead>
+<tbody>
+  <tr>
+   <td style="text-align:left;color: darkred !important;background-color: rgba(250, 232, 232, 255) !important;text-align: center;border: 1px solid white;
+             font-family: 'Open Sans', Arial;
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> 1.1.4 </td>
+   <td style="text-align:left;color: darkred !important;background-color: rgba(250, 232, 232, 255) !important;text-align: center;border: 1px solid white;
+             font-family: 'Open Sans', Arial;
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> 3.4.4 </td>
+   <td style="text-align:left;color: darkred !important;background-color: rgba(250, 232, 232, 255) !important;text-align: center;border: 1px solid white;
+             font-family: 'Open Sans', Arial;
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> 1.3.1 </td>
+   <td style="text-align:left;color: darkred !important;background-color: rgba(250, 232, 232, 255) !important;text-align: center;border: 1px solid white;
+             font-family: 'Open Sans', Arial;
+             padding:1px !important;
+             padding-left:4px !important;
+             padding-right:4px !important;
+             font-size: 0.8em;
+             border-radius: 5px;"> 1.9.3 </td>
+  </tr>
+</tbody>
+</table>
+
+`````
+:::
+:::
+
+
+So far, we've used residuals to help diagnose model fits in both univariate and bivariate analyses. We've also learned how to leverage re-expression and robust methods (the two other R's of EDA) in helping improve model fits.
+
+In this chapter, we work through an example that highlights the importance of exploring residuals to reveal additional patterns in the data--patterns that may not necessarily be observed in an initial model fit.
+
+## An EDA example: CO2 analysis
+
+Let's start off by plotting the atmospheric CO2 concentrations (in ppm) over time. The original dataset was pulled from [NOAA's website](http://www.esrl.noaa.gov/gmd/ccgg/trends/).
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-3_8ff541de663eb986fb7aa84d57d9e4a8'}
+
+```{.r .cell-code}
+library(lubridate)
+library(dplyr)
+library(ggplot2)
+
+dat <- read.csv("http://mgimond.github.io/ES218/Data/co2_2020.csv")
+
+dat2 <- dat %>%
+      mutate( Date = ymd(paste(Year,"/", Month,"/15")),
+              Year = decimal_date(Date),
+              CO2 = Average)    %>%
+     select(Year, Date, CO2)
+```
+:::
+
+
+
+Next, let's look at the data:
+      
+
+::: {.cell hash='example_cache/html/unnamed-chunk-4_18cffa525f59a03421c6392b95970664'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year , y = CO2)) + geom_point(size = 0.6)
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-4-1.png){width=576}
+:::
+:::
+
+
+Let's see if plotting the data using lines instead of points helps identify any underlying patterns.
+      
+
+::: {.cell hash='example_cache/html/unnamed-chunk-5_55c2b633da90110e2e7c31caf6a481d5'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year , y = CO2)) + geom_line()
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-5-1.png){width=576}
+:::
+:::
+
+
+We note two patterns of interest: an overall upward trend, and a cyclical trend. We will first *smooth* out the overall trend by finding a model that best explains the overall variability, then we'll remove that trend from the data to explore the cyclical component.
+
+## Exploring the overall trend
+
+We can attempt to model the overall trend by fitting a straight line to the data using a 1^st^ order polynomial. The fitted line is displayed in red in the following plot. We will use `ggplot2`'s built-in smoothing function to plot the regression line.
+
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-6_2161d4afd86c476bae6977716b12b4a3'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + 
+             stat_smooth(method = "lm", se = FALSE, col = "red") 
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-6-1.png){width=576}
+:::
+:::
+
+
+Next, we subtract the modeled line from the CO2 data and plot the result--this gives us the **residuals** and can be thought of as representing what the linear model does *not* explain about the data. But first, we will need to create a regression model object since it will provide us with the residuals needed to generate the residual plot.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-7_a35d55aa4f50ac91d7535d1ce418686b'}
+
+```{.r .cell-code}
+# Generate a model object from the regression fit
+M1 <- lm(CO2 ~ Year, dat2) 
+dat2$res1 <- M1$residuals
+
+# Plot the residuals from the model object
+ggplot(dat2, aes(x = Year, y = res1)) + geom_point()
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-7-1.png){width=576}
+:::
+:::
+
+
+An overall trend is still present, despite having attempted to control for it. This suggests that our simple linear model does not do a good job in *capturing* the shape of the overall trend. 
+
+It appears that the overall trend is slightly convex and has a small peak around the 1990's. This suggests that we should move on to a 2^nd^ order polynomial of the form:
+
+$$
+CO2_{trend} = a + b(Year) + c(Year^2) 
+$$
+
+The fitted line looks like this: 
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-8_3a3326053a34672abde81f4ec6b7a77f'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + 
+           stat_smooth(method = "lm", formula = y ~ x + I(x^2), 
+                       se = FALSE, col = "red")
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-8-1.png){width=576}
+:::
+:::
+
+
+Now, let's look at the residuals. In helping discern any pattern in our residuals, we add a loess smooth to the plot.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-9_737f2732efa31eb98a846acf9540f805'}
+
+```{.r .cell-code}
+M2 <- lm(CO2 ~ Year + I(Year^2), dat2)
+dat2$res2 <- M2$residuals
+
+ggplot(dat2 , aes(x = Year, y = res2)) + geom_point() +
+           stat_smooth(method = "loess", se = FALSE)
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-9-1.png){width=576}
+:::
+:::
+
+
+This is an improvement over the simple line model (which was a 1^st^ order polynomial fit).  So what we have learned so far is that the overall trend is not perfectly linear but instead follows a parabolic like trajectory with a small hump halfway across the time span. However, we can still make out a "W" shaped trend in the residuals which can hamper our analysis of the oscillatory patterns in the data. We can try a 3^rd^ order polynomial and see if it can capture the 1980 to 1995 hump.
+
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-10_b5a0f63a1435b46624cbc8528f9f1a7e'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + 
+           stat_smooth(method = "lm", formula = y ~ x + I(x^2) + I(x^3), 
+                       se = FALSE, col = "red")
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-10-1.png){width=576}
+:::
+:::
+
+
+Now, let's look at the residuals. 
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-11_b72a0542c1f88351317336ac149a8bfd'}
+
+```{.r .cell-code}
+M2 <- lm(CO2 ~ Year + I(Year^2) + I(Year^3), dat2)
+dat2$res2 <- M2$residuals
+
+ggplot(dat2 , aes(x = Year, y = res2)) + geom_point() +
+           stat_smooth(method = "loess", se = FALSE)
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-11-1.png){width=576}
+:::
+:::
+
+
+This does not seem to be an improvement over the 2^nd^ order polynomial. At this point, we could play with different order polynomials in an attempt to smooth the trend or, we may opt for a non-parametric fit. When the goal is to *peel* off one pattern to explore any underlying pattern we should not limit ourselves to parametric fits (which impose a mathematical model on our data) and instead explore non-parametric smoothing techniques that do not impose any structure on the data whatsoever. We'll make use of the loess fit which is shown in the following figure.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-12_83a89c9aa33856f9a0d1116388596410'}
+
+```{.r .cell-code}
+ggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + 
+             stat_smooth(method = "loess", span = 1/4, se = FALSE, col = "red")
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-12-1.png){width=576}
+:::
+:::
+
+
+At first glance, this may not look any different from our 2^nd^ or 3^rd^ order polynomial model. But the resulting residuals suggest that the loess smooth did a better job in removing any decadal patterns in our batch of CO2 values.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-13_6b9fcf514f270f4e9f3bef4be83df413'}
+
+```{.r .cell-code}
+lo <- loess(CO2 ~ Year, dat2, span=1/4)
+dat2$res3 <- lo$residuals
+
+ggplot(dat2,  aes(x = Year, y = res3)) + geom_point() +
+           stat_smooth(method = "loess", se = FALSE, span = 0.2)
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-13-1.png){width=576}
+:::
+:::
+
+
+## Exploring the seasonal component
+
+Let's now explore the cyclical pattern in the residuals. Note the residuals' y-axis values: they are three orders of magnitude less than the overall range of CO2 values. This indicates that the oscillating component of the data is relatively small (the CO2 values have a range of [313.33, 417.31] ppm whereas the residuals have a range of [-4.34, 4.34] ppm).
+
+Now, we may be tempted to fit a *smooth* to the residuals but that may not prove to be fruitful. Instead, let's see if the oscillation follows a 12 month cycle. We'll group all the residual values by month of the year. In other words, we will remove the year *tag* associated with each value and explore those values as a function of month alone. Each month's batch of values is distilled into a boxplot.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-14_34a9ab0e1daca67c09ee77a017a7e443'}
+
+```{.r .cell-code}
+# Aggregate residuals by year
+dat2$Month <- month(dat2$Date, label=TRUE) 
+
+ggplot(dat2, aes(x = Month, y = res3)) + geom_boxplot()         
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-14-1.png){width=576}
+:::
+:::
+
+
+It's clear from the plot that the oscillation follows a yearly cycle: a peak in the spring and a dip in the fall. This cycle is explained in part by the increased land mass in the northern hemisphere relative to the southern hemisphere. Because plants (and by extension photosynthesis) go dormant during the winter months in the northern hemisphere, atmospheric CO2 is no longer being photosynthesized; this despite the southern hemisphere's photosynthesis peak during the October-March period (a result of the southern hemisphere's smaller land mass). Other factors such as increased CO2 emissions during the winter months  may also contribute to the oscillatory nature of atmospheric CO2 concentrations.
+
+Thus far, we have uncovered three patterns of interest: an overall trend, a "hump" around the 1980-1995 time period, and a cyclical component. Note that to effectively explore the cyclical pattern we had to **de-trend** (or **smooth**) the data. Next, we should *smooth* the seasonal component of the data to see if another pattern emerges. We may, for example, smooth the data by subtracting the monthly median from each residual batch leaving us with the next batch of residual values to explore:
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-15_eda46418950b965904f820dc8f0de69d'}
+
+```{.r .cell-code}
+d3 <- dat2 %>% 
+  group_by(month(Date)) %>%
+  mutate(Resid.lev = res3 - median(res3)) 
+
+ggplot(d3, aes(x = Month, y = Resid.lev)) + geom_boxplot()     
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-15-1.png){width=768}
+:::
+:::
+
+
+All the boxplots are lined up along their median values. We are now exploring the data after having accounted for both overall trend and seasonality. What can be gleaned from this dataset? We may want to explore the skewed nature of the residuals in March, or the narrower range of CO2 values for the fall months, for example. 
+
+We may also be interested in seeing if any trend in CO2 concentrations exists within each month. Let's explore this by fitting a first order polynomial to the monthly data.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-16_8696b7ec21d0b5f901e1b7fc5a1fa3a0'}
+
+```{.r .cell-code}
+ggplot(d3, aes(x = Year, y = Resid.lev)) + geom_point(col = "grey", cex = .6)  + 
+     stat_smooth(se = FALSE, method = "lm") + facet_wrap(~ Month, nrow = 1) +
+     theme(axis.text.x=element_text(angle=45, hjust = 1.5, vjust = 1.6,  size = 7))
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-16-1.png){width=768}
+:::
+:::
+
+
+Note the overall increase in CO2 for the winter and spring months followed by a similar (but not as persistent) decrease in CO2 loss in the summer and fall months. This suggests either an increase in cyclical amplitude with the deviation from a central value being possibly greater for the winter/spring months. It could also suggest a gradual offset in the periodicity over the 60 year period. More specifically, a leftward shift in periodicity.
+
+Let's fit a loess to see if the trends within each month are monotonic. We'll adopt a robust loess (`family = "symmetric"`) to control for possible outliers in the data.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-17_877c39917518a898b62a09cb5cdb7629'}
+
+```{.r .cell-code}
+ggplot(d3, aes(x = Year, y = Resid.lev)) + geom_point(col = "grey", cex = .6)  + 
+     stat_smooth(method = "loess", se = FALSE, 
+                 method.args = list(family = "symmetric")) + 
+     facet_wrap(~ Month, nrow = 1) +
+     theme(axis.text.x=element_text(angle=45, hjust = 1.5, vjust = 1.6,  size = 7))
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-17-1.png){width=768}
+:::
+:::
+
+
+The trends are clearly not monotonic suggesting that the processes driving the cyclical concentrations of CO2 are not systematic. However, despite the curved nature of the fits, the overall trends observed with the straight lines still remain.
+
+## Exploring what remains
+
+Now that we've fitted the monthly medians to the seasonal component of the data, let's plot the residuals across the years. We'll make use of the robust version of the loess given that the data may be quite noisy.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-18_4e96c68db86bc64e05e956e9304ef83e'}
+
+```{.r .cell-code}
+ggplot(d3, aes(x = Year, y = Resid.lev)) +  geom_line(col = "grey") + 
+     stat_smooth(method = "loess", se = FALSE, span = 0.1 ,
+                 method.args = list(family = "symmetric", degree = 2))    
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-18-1.png){width=768}
+:::
+:::
+
+
+Recall that at this points, we have accounted for the overall trend (which has by far the greatest effect with a range of over 90 ppm) and the seasonal component (which has a smaller effect with a range of about 6 ppm). The 3^rd^ set of residuals account for about 2 ppm of the total variability in the dataset. Note that we can still make out the seasonal fluctuations if we look closely at the data. But we can also make out broader patterns of interest not consistent with random noise and not explained by seasonal variability. Some of the patterns could be explained by the southern oscillation index (SOI), for example,  which is a measure of the difference in atmospheric pressure across the pacific basin. When the index is positive the resulting winds drive upwelling currents that release additional CO2 into the atmosphere. 
+
+We'll create a simple overlay the SOI data on top of our last plot, but note that a scatter plot of the two variables with a lagging component would be best suited for this analysis.
+
+
+::: {.cell hash='example_cache/html/unnamed-chunk-19_af66d480a9a97d8f1f14f998181dd648'}
+
+```{.r .cell-code}
+library(tidyr)
+
+soi <- read.csv("http://mgimond.github.io/ES218/Data/Southern_oscillation.csv")
+
+soi <- gather(soi, key = Month, value = Index, -1)
+Date <- ymd(paste(soi$YEAR, soi$Month, 15) )
+soi$Yr <- decimal_date(Date)
+
+ggplot(d3, aes(x = Year, y = Resid.lev)) +  
+             geom_line(col = "blue", alpha = 0.2) + 
+             stat_smooth(method = "loess", se = FALSE, span = 0.1, lwd = 0.5,
+                         method.args = list(family = "symmetric", degree = 2)) +
+             geom_line(dat = soi, aes(Yr, Index/2, colour = "red"), alpha = 0.3) +
+             stat_smooth(dat = soi, aes(Yr, Index/2, colour = "red"), lwd = 0.5,
+                         method = "loess", se = FALSE, span = 0.2,
+                         method.args = list(family = "symmetric", degree = 2)) +
+             guides(color = FALSE)
+```
+
+::: {.cell-output-display}
+![](example_files/figure-html/unnamed-chunk-19-1.png){width=768}
+:::
+:::
+
+
+The blue lines represent the residuals (with the bold blue line showing the loess fit) and the red lines represent the SOI trend (with the bold line showing its loess fit). Note that we halved the SOI values to match the range along the y-scale; the intent is to facilitate the comparison of SOI trend to CO2 trend. There appears to be matching maxima (notably around 1975 and 1988) but we also note some opposing trends such as in the period after 2010. When the index drops below 0, "El Nino" events become more prominent and upwelling flows are suppressed. Though this may prevent CO2 trapped in the deeper Pacific oceans from reaching the surface, "El Nino" events can also have a measurable impact on land climate thus influencing the rate of vegetation growth and, by extension, CO2 uptake. El nino is also believed to increase the rate of forest and brush fires around the world which may also contribute to atmospheric CO2 concentrations.  
+
+It's important to realize that this is one of many ways in which we could have proceeded with the analysis. For example, we could have started off the analysis by removing the seasonal component from the data, then analyzed the long term trend. 
+
diff --git a/example_files/execute-results/html.json b/example_files/execute-results/html.json
new file mode 100644
index 00000000..cdeade25
--- /dev/null
+++ b/example_files/execute-results/html.json
@@ -0,0 +1,18 @@
+{
+  "hash": "e0ea20c732c9a2b53fab033d2b69fa12",
+  "result": {
+    "markdown": "# The third R of EDA: Residuals\n\n\n::: {.cell}\n\n:::\n\n::: {.cell hash='example_cache/html/unnamed-chunk-2_fd93e819e7915059036d51d67790e90a'}\n::: {.cell-output-display}\n`````{=html}\n<table class=\"table\" style=\"width: auto !important; \">\n <thead>\n  <tr>\n   <th style=\"text-align:left;color: #555555 !important;background-color: #dddddd !important;text-align: center;border: 1px solid white !important;\n             font-family: 'Source Code Pro', 'Open Sans';\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> dplyr </th>\n   <th style=\"text-align:left;color: #555555 !important;background-color: #dddddd !important;text-align: center;border: 1px solid white !important;\n             font-family: 'Source Code Pro', 'Open Sans';\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> ggplot2 </th>\n   <th style=\"text-align:left;color: #555555 !important;background-color: #dddddd !important;text-align: center;border: 1px solid white !important;\n             font-family: 'Source Code Pro', 'Open Sans';\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> tidyr </th>\n   <th style=\"text-align:left;color: #555555 !important;background-color: #dddddd !important;text-align: center;border: 1px solid white !important;\n             font-family: 'Source Code Pro', 'Open Sans';\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> lubridate </th>\n  </tr>\n </thead>\n<tbody>\n  <tr>\n   <td style=\"text-align:left;color: darkred !important;background-color: #FAE8E8 !important;text-align: center;border: 1px solid white;\n             font-family: 'Open Sans', Arial;\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> 1.1.4 </td>\n   <td style=\"text-align:left;color: darkred !important;background-color: #FAE8E8 !important;text-align: center;border: 1px solid white;\n             font-family: 'Open Sans', Arial;\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> 3.4.4 </td>\n   <td style=\"text-align:left;color: darkred !important;background-color: #FAE8E8 !important;text-align: center;border: 1px solid white;\n             font-family: 'Open Sans', Arial;\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> 1.3.0 </td>\n   <td style=\"text-align:left;color: darkred !important;background-color: #FAE8E8 !important;text-align: center;border: 1px solid white;\n             font-family: 'Open Sans', Arial;\n             padding:1px !important;\n             padding-left:4px !important;\n             padding-right:4px !important;\n             font-size: 0.8em;\n             border-radius: 5px;\"> 1.9.3 </td>\n  </tr>\n</tbody>\n</table>\n\n`````\n:::\n:::\n\n\n## An EDA example: CO2 analysis\n\nLet's start off by plotting the atmospheric CO2 concentrations (in ppm). The original dataset was pulled from [NOAA's website](http://www.esrl.noaa.gov/gmd/ccgg/trends/).\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-3_8ff541de663eb986fb7aa84d57d9e4a8'}\n\n```{.r .cell-code}\nlibrary(lubridate)\nlibrary(dplyr)\nlibrary(ggplot2)\n\ndat <- read.csv(\"http://mgimond.github.io/ES218/Data/co2_2020.csv\")\n\ndat2 <- dat %>%\n      mutate( Date = ymd(paste(Year,\"/\", Month,\"/15\")),\n              Year = decimal_date(Date),\n              CO2 = Average)    %>%\n     select(Year, Date, CO2)\n```\n:::\n\n\n\nNext, let's look at the data:\n      \n\n::: {.cell hash='example_cache/html/unnamed-chunk-4_18cffa525f59a03421c6392b95970664'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year , y = CO2)) + geom_point(size = 0.6)\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-4-1.png){width=576}\n:::\n:::\n\n\nLet's see if plotting the data using lines instead of points helps identify any underlying patterns.\n      \n\n::: {.cell hash='example_cache/html/unnamed-chunk-5_55c2b633da90110e2e7c31caf6a481d5'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year , y = CO2)) + geom_line()\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-5-1.png){width=576}\n:::\n:::\n\n\nWe note two patterns of interest: an overall upward trend, and a cyclical trend. We will first *smooth* out the overall trend by finding a model that best explains the overall variability, then we'll remove that trend from the data to explore the cyclical component.\n\n## Exploring the overall trend\n\nWe can attempt to model the overall trend by fitting a straight line to the data using a standard regression analysis procedure. The fitted line is displayed in red in the following plot. We will use `ggplot2`'s built-in smoothing function to plot the regression line.\n\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-6_2161d4afd86c476bae6977716b12b4a3'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + \n             stat_smooth(method = \"lm\", se = FALSE, col = \"red\") \n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-6-1.png){width=576}\n:::\n:::\n\n\nNext, we subtract the modeled line from the CO2 data and plot the result--this gives us the **residuals** and can be thought of as representing what the linear model does *not* explain about the data. But first, we will need to create a regression model object since it will provide us with the residuals needed to generate the residual plot.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-7_a35d55aa4f50ac91d7535d1ce418686b'}\n\n```{.r .cell-code}\n# Generate a model object from the regression fit\nM1 <- lm(CO2 ~ Year, dat2) \ndat2$res1 <- M1$residuals\n\n# Plot the residuals from the model object\nggplot(dat2, aes(x = Year, y = res1)) + geom_point()\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-7-1.png){width=576}\n:::\n:::\n\n\nAn overall trend is still present, despite having attempted to control for it. This suggests that our simple linear model does not do a good job in *capturing* the shape of the overall trend. \n\nIt appears that the overall trend is slightly convex and has a small peak around the 1990's. We can first try to fit the trend using a 2^nd^ order polynomial of the form:\n\n$$\nCO2_{trend} = a + b(Year) + c(Year^2) \n$$\n\nThe fitted line looks like this: \n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-8_3a3326053a34672abde81f4ec6b7a77f'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + \n           stat_smooth(method = \"lm\", formula = y ~ x + I(x^2), \n                       se = FALSE, col = \"red\")\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-8-1.png){width=576}\n:::\n:::\n\n\nNow, let's look at the residuals. In helping discern any pattern in our residuals, we add a loess smooth to the plot.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-9_737f2732efa31eb98a846acf9540f805'}\n\n```{.r .cell-code}\nM2 <- lm(CO2 ~ Year + I(Year^2), dat2)\ndat2$res2 <- M2$residuals\n\nggplot(dat2 , aes(x = Year, y = res2)) + geom_point() +\n           stat_smooth(method = \"loess\", se = FALSE)\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-9-1.png){width=576}\n:::\n:::\n\n\nThis is an improvement over the simple line model (which was a 1^st^ order polynomial fit).  So what we have learned so far is that the overall trend is not perfectly linear but instead follows a parabolic like trajectory with a small hump halfway across the time span. However, we can still make out a \"W\" shaped trend in the residuals which can hamper our analysis of the oscillatory patterns in the data. We can try a 3^rd^ order polynomial and see if it can capture the 1980 to 1995 hump.\n\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-10_b5a0f63a1435b46624cbc8528f9f1a7e'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + \n           stat_smooth(method = \"lm\", formula = y ~ x + I(x^2) + I(x^3), \n                       se = FALSE, col = \"red\")\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-10-1.png){width=576}\n:::\n:::\n\n\nNow, let's look at the residuals. \n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-11_b72a0542c1f88351317336ac149a8bfd'}\n\n```{.r .cell-code}\nM2 <- lm(CO2 ~ Year + I(Year^2) + I(Year^3), dat2)\ndat2$res2 <- M2$residuals\n\nggplot(dat2 , aes(x = Year, y = res2)) + geom_point() +\n           stat_smooth(method = \"loess\", se = FALSE)\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-11-1.png){width=576}\n:::\n:::\n\n\nThis does not seem to be an improvement over the 2^nd^ order polynomial. At this point, we could play with different order polynomials in an attempt to smooth the trend or, we may opt for a non-parametric fit. When the goal is to *peel* off one pattern to explore any underlying pattern we should not limit ourselves to parametric fits (which impose a mathematical model on our data) and instead explore non-parametric smoothing techniques that do not impose any structure on the data whatsoever. An example of such a smoothing technique is the loess fit which is shown in the following figure.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-12_83a89c9aa33856f9a0d1116388596410'}\n\n```{.r .cell-code}\nggplot(dat2, aes(x = Year, y = CO2)) + geom_line() + \n             stat_smooth(method = \"loess\", span = 1/4, se = FALSE, col = \"red\")\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-12-1.png){width=576}\n:::\n:::\n\n\nAt first glance, this may not look any different from our 2^nd^ or 3^rd^ order polynomial model. But the resulting residuals suggest that the loess smooth did a better job in removing any decadal patterns in our batch of CO2 values.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-13_6b9fcf514f270f4e9f3bef4be83df413'}\n\n```{.r .cell-code}\nlo <- loess(CO2 ~ Year, dat2, span=1/4)\ndat2$res3 <- lo$residuals\n\nggplot(dat2,  aes(x = Year, y = res3)) + geom_point() +\n           stat_smooth(method = \"loess\", se = FALSE, span = 0.2)\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-13-1.png){width=576}\n:::\n:::\n\n\n## Exploring the seasonal component\n\nLet's now explore the cyclical pattern in the residuals. Note the y-axis values: they are three orders of magnitude less than the overall range of CO2 values. This indicates that the oscillating nature along the overall trend is relatively small (the CO2 values have a range of [313.33, 417.31] ppm whereas the residuals have a range of [-4.34, 4.34] ppm).\n\nNow, we may be tempted to fit a *smooth* (as Tukey would say) to the residuals but that may not prove to be fruitful. Instead let's see if the oscillation follows a 12 month cycle. We'll group all the residual values by month of the year. In other words, we will remove the year *tag* associated with each value and explore those values as a function of month alone. Each month's batch of values is distilled into a boxplot.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-14_34a9ab0e1daca67c09ee77a017a7e443'}\n\n```{.r .cell-code}\n# Aggregate residuals by year\ndat2$Month <- month(dat2$Date, label=TRUE) \n\nggplot(dat2, aes(x = Month, y = res3)) + geom_boxplot()         \n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-14-1.png){width=576}\n:::\n:::\n\n\nIt's clear from the plot that the oscillation follows a yearly cycle: a peak in the spring and a dip in the fall. This cycle is explained in part by the increased land mass in the northern hemisphere relative to the southern hemisphere. Because plants (and by extension photosynthesis) go dormant during the winter months in the northern hemisphere, atmospheric CO2 is no longer being photosynthesized; this despite the southern hemisphere's photosynthesis peak during the October-March period (a result of the southern hemisphere's smaller land mass). Other factors such as increased CO2 emissions during the winter months  may also contribute to the oscillatory nature of atmospheric CO2 concentrations.\n\nThus far, we have uncovered three patterns of interest: an overall trend, a \"hump\" around the 1980-1995 time period, and a cyclical component. Note that to effectively explore the cyclical pattern we had to **de-trend** (or **smooth**) the data. Next, we should *smooth* the seasonal component of the data to see if another pattern emerges. We may, for example, smooth the data by subtracting the monthly median from each residual batch leaving us with the next batch of residual values to explore:\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-15_eda46418950b965904f820dc8f0de69d'}\n\n```{.r .cell-code}\nd3 <- dat2 %>% \n  group_by(month(Date)) %>%\n  mutate(Resid.lev = res3 - median(res3)) \n\nggplot(d3, aes(x = Month, y = Resid.lev)) + geom_boxplot()     \n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-15-1.png){width=768}\n:::\n:::\n\n\nAll the boxplots are lined up along their median values. We are now exploring the data after having accounted for both overall trend and seasonality. What can be gleaned from this dataset? We may want to explore the skewed nature of the residuals in March, or the narrower range of CO2 values for the fall months, for example. \n\nWe may also be interested in seeing if any trend in CO2 concentrations exists within each month. Let's explore this by fitting a first order polynomial to the monthly data.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-16_8696b7ec21d0b5f901e1b7fc5a1fa3a0'}\n\n```{.r .cell-code}\nggplot(d3, aes(x = Year, y = Resid.lev)) + geom_point(col = \"grey\", cex = .6)  + \n     stat_smooth(se = FALSE, method = \"lm\") + facet_wrap(~ Month, nrow = 1) +\n     theme(axis.text.x=element_text(angle=45, hjust = 1.5, vjust = 1.6,  size = 7))\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-16-1.png){width=768}\n:::\n:::\n\n\nNote the overall increase in CO2 for the winter and spring months followed by a similar (but not as persistent) decrease in CO2 loss in the summer and fall months. This suggests either an increase in cyclical amplitude with the deviation from a central value being possibly greater for the winter/spring months. It could also suggest a gradual offset in the periodicity over the 60 year period. More specifically, a leftward shift in periodicity.\n\nLet's fit a loess to see if the trends within each month are monotonic. We'll adopt a robust loess (`family = \"symmetric\"`) to control for possible outliers in the data.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-17_877c39917518a898b62a09cb5cdb7629'}\n\n```{.r .cell-code}\nggplot(d3, aes(x = Year, y = Resid.lev)) + geom_point(col = \"grey\", cex = .6)  + \n     stat_smooth(method = \"loess\", se = FALSE, \n                 method.args = list(family = \"symmetric\")) + \n     facet_wrap(~ Month, nrow = 1) +\n     theme(axis.text.x=element_text(angle=45, hjust = 1.5, vjust = 1.6,  size = 7))\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-17-1.png){width=768}\n:::\n:::\n\n\nThe trends are clearly not monotonic suggesting that the processes driving the cyclical concentrations of CO2 are not systematic. However, despite the curved nature of the fits, the overall trends observed with the straight lines still remain.\n\n## Exploring what remains\n\nNow that we've fitted the monthly medians to the seasonal component of the data, let's plot the residuals across the years. We'll make use of the robust version of the loess given that the data may be quite noisy.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-18_4e96c68db86bc64e05e956e9304ef83e'}\n\n```{.r .cell-code}\nggplot(d3, aes(x = Year, y = Resid.lev)) +  geom_line(col = \"grey\") + \n     stat_smooth(method = \"loess\", se = FALSE, span = 0.1 ,\n                 method.args = list(family = \"symmetric\", degree = 2))    \n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-18-1.png){width=768}\n:::\n:::\n\n\nRecall that at this points, we have accounted for the overall trend (which has by far the greatest effect with a range of over 90 ppm) and the seasonal component (which has a smaller effect with a range of about 6 ppm). The 3^rd^ set of residuals account for about 2 ppm of the total variability in the dataset. Note that we can still make out the seasonal fluctuations if we look closely at the data. But we can also make out broader patterns of interest not consistent with random noise and not explained by seasonal variability. Some of the patterns could be explained by the southern oscillation index (SOI), for example,  which is a measure of the difference in atmospheric pressure across the pacific basin. When the index is positive the resulting winds drive upwelling currents that release additional CO2 into the atmosphere. \n\nWe'll create a simple overlay the SOI data on top of our last plot, but note that a scatter plot of the two variables with a lagging component would be best suited for this analysis.\n\n\n::: {.cell hash='example_cache/html/unnamed-chunk-19_af66d480a9a97d8f1f14f998181dd648'}\n\n```{.r .cell-code}\nlibrary(tidyr)\n\nsoi <- read.csv(\"http://mgimond.github.io/ES218/Data/Southern_oscillation.csv\")\n\nsoi <- gather(soi, key = Month, value = Index, -1)\nDate <- ymd(paste(soi$YEAR, soi$Month, 15) )\nsoi$Yr <- decimal_date(Date)\n\nggplot(d3, aes(x = Year, y = Resid.lev)) +  \n             geom_line(col = \"blue\", alpha = 0.2) + \n             stat_smooth(method = \"loess\", se = FALSE, span = 0.1, lwd = 0.5,\n                         method.args = list(family = \"symmetric\", degree = 2)) +\n             geom_line(dat = soi, aes(Yr, Index/2, colour = \"red\"), alpha = 0.3) +\n             stat_smooth(dat = soi, aes(Yr, Index/2, colour = \"red\"), lwd = 0.5,\n                         method = \"loess\", se = FALSE, span = 0.2,\n                         method.args = list(family = \"symmetric\", degree = 2)) +\n             guides(color = FALSE)\n```\n\n::: {.cell-output-display}\n![](example_files/figure-html/unnamed-chunk-19-1.png){width=768}\n:::\n:::\n\n\nThe blue lines represent the residuals (with the bold blue line showing the loess fit) and the red lines represent the SOI trend (with the bold line showing its loess fit). Note that we halved the SOI values to match the range along the y-scale; the intent is to facilitate the comparison of SOI trend to CO2 trend. There appears to be matching maxima (notably around 1975 and 1988) but we also note some opposing trends such as in the period after 2010. When the index drops below 0, \"El Nino\" events become more prominent and upwelling flows are suppressed. Though this may prevent CO2 trapped in the deeper Pacific oceans from reaching the surface, \"El Nino\" events can also have a measurable impact on land climate thus influencing the rate of vegetation growth and, by extension, CO2 uptake. El nino is also believed to increase the rate of forest and brush fires around the world which may also contribute to atmospheric CO2 concentrations.  \n\nIt's important to realize that this is one of many ways in which we could have proceeded with the analysis. For example, we could have started off the analysis by removing the seasonal component from the data, then analyzed the long term trend. This is the approach taken by William Cleveland on page 165 of the course's text.\n",
+    "supporting": [],
+    "filters": [
+      "rmarkdown/pagebreak.lua"
+    ],
+    "includes": {
+      "include-in-header": [
+        "<script src=\"site_libs/kePrint-0.0.1/kePrint.js\"></script>\r\n<link href=\"site_libs/lightable-0.0.1/lightable.css\" rel=\"stylesheet\" />\r\n"
+      ]
+    },
+    "engineDependencies": {},
+    "preserve": {},
+    "postProcess": true
+  }
+}
\ No newline at end of file
diff --git a/index.qmd b/index.qmd
index dbd1588f..364776dc 100644
--- a/index.qmd
+++ b/index.qmd
@@ -5,7 +5,7 @@ This book is a compilation of lecture notes used in an *Exploratory Data Analysi
 
 The base R plotting environment and the `ggplot2` ecosystem are used throughout this book. While a chapter is dedicated to the `lattice` plotting package, its functions are not used outside of that chapter given that `ggplot2` offers many of `lattice`'s functionality.
 
-While great effort is made to adopt a consist plotting environment throughout this book (this being `ggplot2`, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the `tukeyedar` package. The [package](https://github.com/mgimond/tukeyedar/) can be downloaded from GitHub via the command:
+While great effort is made to adopt a consistent plotting environment throughout this book (this being `ggplot2`, for the most part), a few topics (including the q-q plot and the median polish) will benefit from custom plotting functions available in the `tukeyedar` package. The [package](https://github.com/mgimond/tukeyedar/) can be downloaded from GitHub via the command:
 
 ```{r eval = FALSE}
 devtools::install_github("mgimond/tukeyedar")
diff --git a/intro.qmd b/intro.qmd
index 6f7af06c..fda20cea 100644
--- a/intro.qmd
+++ b/intro.qmd
@@ -126,7 +126,7 @@ Many journals now require or *strongly encourage* authors to *"make materials, d
 
 Another source of error in the write-up of a  report or publication is the linking of tables, figures and statistical summaries to the write-up. Typically, one saves statistical plots as image files then loads the image into the document. However, the figures may have gone through many different iterations resulting in many different versions of the image file in a working folder. Add to this many other figures, data table files and statistical results from various pieces of software, one quickly realizes the potential for embedding the wrong image files in the document or embedding the wrong statistical summaries in the text. Furthermore, the researcher is then required to properly archive and document the provenance of each figure, data table or statistical summary resulting in a complex structure of files and directories in the project folder thus increasing the odds of an irreproducible analysis.
 
-Confining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document--such environments are called dynamic documents. In this course, we will use the [R Markdown authoring tool](http://rmarkdown.rstudio.com/) which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown!. You can view the  R Markdown files [on this author's GitHub repository](https://github.com/mgimond/ES218).
+Confining all of the analysis to a scripting environment such as R can help, but this still does not alleviate the possibility of loading the wrong figure into the document, or forgetting to update a statistical summary in the text when the original data file was revised. A solution to this potential pitfall is to embed the actual analysis and graphic generation process into the document--such environments are called dynamic documents. In this course, we will use the [R Markdown authoring tool](http://rmarkdown.rstudio.com/) which embeds R code into the document. An example of an R Markdown document is this course website which was entirely generated in RMarkdown! You can view the  R Markdown files [on this author's GitHub repository](https://github.com/mgimond/ES218).
 
 
 [^1]: Tukey, John W. *Exploratory Data Analysis*. 1977. Addison-Wesley.
diff --git a/resistant_lines.qmd b/resistant_lines.qmd
index a26b0fb6..b45ef4e9 100644
--- a/resistant_lines.qmd
+++ b/resistant_lines.qmd
@@ -50,7 +50,7 @@ coef(M)
 
 The slope dropped from 2 to 0.86 because of a single point!
 
-If our goal is to explore what the *bulk* of the data has to say about the phenomena being investigated, we certainly don't want a few "maverick" values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are the **resistant line** (that builds off of Tukey's **3-point summary line**) and the **bisquare** robust estimation method.
+If our goal is to explore what the *bulk* of the data has to say about the phenomena being investigated, we certainly don't want a few "maverick" values to hijack the analysis. We therefore need a set of fitting tools that minimize the influence of outliers. There are many options out there; most notable are  **Tukey's resistant line** and the **bisquare** robust estimation method.
 
 &nbsp;&nbsp;
 
@@ -59,9 +59,9 @@ If our goal is to explore what the *bulk* of the data has to say about the pheno
 
 ### Tukey's resistant line
 
-The idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. Two half-slopes are then used to join the three points. Note that points that share the same x value are lumped into the same batch which can lead to unequal group sizes. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables. Such plots are often used to help guide re-expression of the variables x or y or both for the sole purpose of straightening the x-y relationship.
+The idea is simple in concept. It involves dividing the dataset into three approximately equal groups of values and summarizing these groups by computing their respective medians. The batches’ median values are then used to compute the slope and intercept. The motivation behind this plot is to use the three-point summary to provide a robust assessment of the type of relationship between both variables. 
 
-Let's look at an example using the last (modified) dataset. First, we divide the plot into three approximately equal batches.
+Let's look at an example of its implementation. We'll continue with the example used in the previous section. First, we divide the plot into three approximately equal batches.
 
 
 ```{r fig.height=3, fig.width=3,  small.mar=TRUE,echo=FALSE}
@@ -71,15 +71,12 @@ Mr <- eda_rline(df, x, y, iter=1)
 plot(Mr, model=F, pt3=F, fit = F)
 ```
 
-
-Next, compute the median x and y values within each section. 
+Next, we compute the median x and y values within each section. 
 
 ```{r fig.height=3, fig.width=3,  small.mar=TRUE,echo=FALSE}
 plot(Mr, model=F, pt3=T, fit = F)
 ```
 
-Note that we do not include the same point in any two median calculations. This implies that for the mid-third of the data, we do not include the point straddling the left boundary line when computing its median value. Likewise with the right-third of the data. 
-
 The x median values are `r Mr$xmed` and the y median values are `r Mr$ymed` respectively.
 
 The two end medians are used to compute the slope as:
@@ -111,13 +108,13 @@ From this first iteration, we can extract the residuals. A line is then fitted t
 
 ```{r fig.height=3, fig.width=3,  small.mar=TRUE,echo=FALSE}
 df$r1 <- residuals(rl1)
-plot(eda_rline(df, x, r1), model=F, pt3=T, fit = F)
+plot(eda_rline(df, x, r1), model=F, pt3=T, fit = F, ylab = "Residuals")
 rl1r <- line(x,df$r1,iter=1)
 abline(rl1r,col="red")
 ```
 
-The initial model slope and intercept are `r round(rl1$coefficients[1],2)` and `r round(rl1$coefficients[2],2)` respectively and the residual's slope and intercept are `r round(rl1r$coefficients[1],2)` and `r round(rl1r$coefficients[2],2)` respectively.
-The residual slope is then added to the first computed slope and the process is again repeated thus generating the following tweaked slope and updated residuals:
+The initial model intercept and slope are `r round(rl1$coefficients[1],3)` and `r round(rl1$coefficients[2],3)` respectively and the residual's slope and intercept are `r round(rl1r$coefficients[1],3)` and `r round(rl1r$coefficients[2],3)` respectively.
+The residual slope is then added to the first computed slope giving us an updated slope of `r round(rl1$coefficients[2] + rl1r$coefficients[2] ,3)` and the process is again repeated thus generating the following tweaked slope and updated residuals:
 
 ```{r fig.height=3, fig.width=6,  small.mar=TRUE,echo=FALSE}
 OP <- par(mfrow = c(1, 2))
@@ -126,13 +123,13 @@ rl2 <- line(x,y,iter=2)
 abline(rl2, col="red")
 
 df$r2 <- residuals(rl2)
-plot(eda_rline(df, x, r2), model=F, pt3=T, fit = F)
+plot(eda_rline(df, x, r2), model=F, pt3=T, fit = F, ylab = "Residuals")
 rl2r <- line(x,df$r2,iter=1)
 abline(rl2r,col="red")
 par(OP)
 ```
 
-The updated slope is now `r round(rl2$coefficients[1],2)`.  The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. One more iteration should be enough to stabilize the residuals. Giving use the following fitted line whose intercept and slope are `r round(line(x,y,iter=3)$coefficients[1],2)` and `r round(line(x,y,iter=3)$coefficients[2],2)` respectively
+The second set of residuals is added to the previously computed slope giving us an updated slope of `r round(rl2$coefficients[2] +  rl2r$coefficients[2],3)`. The iteration continues until the slope residuals stabilize. Each successive iteration is shown in the following plot with the final line in dark red. This took three iterations giving us the final fitted line whose intercept and slope are `r round(line(x,y,iter=3)$coefficients[1],2)` and `r round(line(x,y,iter=3)$coefficients[2],2)` respectively--very close to the actual relationship between the two variables.
 
 ```{r fig.height=3, fig.width=3,  small.mar=TRUE,echo=FALSE}
 df$r1 <- residuals(rl1)
@@ -142,13 +139,13 @@ abline(line(x,y,iter=2),col="#FF8888")
 abline(line(x,y,iter=3),col="#FF0000")
 ```
 
-Tukey's resistant line can be computed using the R built-in `line()` function. You specify the number of iteration via the `iter` argument. Usually, five iterations will be enough.
+Tukey's resistant line can be computed using the R built-in `line()` function. You specify the maximum number of iterations via the `iter` argument. Usually, five iterations will be enough. But, the iteration will stop before the maximum number of iterations is reached if the residual slope stabilizes before then.
 
 ```{r}
 r.fit <- line(x,y, iter = 5)
 ```
 
-You can the resistant to a base plot as follows:
+You can add the resistant line to a base plot as follows:
 
 ```{r fig.height=3, fig.width=3, echo = 2:3}
 OP <- par(mar = c(4,4,1,0))
@@ -160,6 +157,7 @@ par(OP)
 You can also add the line to a `ggplot`:
 
 ```{r fig.height=3, fig.width=3}
+library(ggplot2)
 ggplot(df, aes(x,y)) + geom_point() +
   geom_abline(intercept = r.fit$coefficients[1], 
               slope = r.fit$coefficients[2],
@@ -171,7 +169,7 @@ ggplot(df, aes(x,y)) + geom_point() +
 
 A bisquare fitting strategy makes use of a non-parametric model that assigns *weights* to observations based on their proximity to the center of the distribution. The closer an observation is to that center, the greater its weight. 
 
-The first step is to run a linear regression model on the data then to extract its residuals. Next, a weighting scheme is fit to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as `1` then are modified following the residuals derived from the most recent regression model.
+The first step is to run a linear regression model on the data. The next step is to extract its residuals. Next, a weighting scheme is fitted to the residuals such that the points associated with extreme residuals are assigned the smallest weight and the points associated with the smaller residual values are assigned the largest weight. The regression analysis is then re-run using those same weights thus minimizing the influence of the rogue points. This process is repeated several times until the residuals stabilize. The following figure shows three iterations of the bisquare function whereby the weights (shown as grey text next to each point) start off as `1` then are modified following the residuals derived from the most recent regression model.
 
 ```{r fig.height=2.5, fig.width=8, small.mar=TRUE, echo = FALSE}
 wt.bisquare <- function(u, c = 6) {
@@ -233,9 +231,9 @@ In the above example, the bisquare method does a great job in eliminating the ou
 
 #### Built-in implementation of the bisquare
 
-The `MASS` package has a robust linear modeling function called `rlm` that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented here, but the difference will be insignificant for the most part. 
+The `MASS` package has a robust linear modeling function called `rlm` that will implement a variation of the aforementioned bisquare estimation technique. Its results may differ slightly from those presented above, but the difference will be insignificant for the most part. 
 
-Note that if you make use of `dplyr` in a workflow, loading `MASS` after `dplyr` will mask dplyr's `select` function. This can be problematic. So you either want to load `MASS` before `dplyr`, or you can call the function via `MASS::rlm`. An example of its use follows. The default regression model is added as a dashed line for reference.
+Note that if you make use of `dplyr` in a workflow, loading `MASS` after `dplyr` will mask dplyr's `select` function. This can be problematic. So you either want to load `MASS` before `dplyr`, or you can call the function via `MASS::rlm`. An example of its use follows. 
 
 ```{r fig.height=2.5, fig.width=3,  small.mar=TRUE, fig.show='hold'}
 dat <- data.frame(x,y)
@@ -246,16 +244,17 @@ plot(y ~ x,dat, pch=16, col=rgb(0,0,0,0.2))
 # Add the robust line
 abline( Mr, col="red")
 
-# Add the default regression line
+# Add the default regression line for reference
 abline( M , col="grey50", lty=2)
 ```
 
+The default regression model is added as a dashed line for reference.
+
 The function `rlm` can also be called directly from within `ggplot`.
 
 ```{r fig.height=2.5, fig.width=3,  small.mar=TRUE, fig.show='hold'}
 library(ggplot2)
 ggplot(dat, aes(x=x, y=y)) + geom_point() + 
-       stat_smooth(method = "lm", se = FALSE, col = "grey50", lty = 2) +
        stat_smooth(method = MASS::rlm, se = FALSE, col = "red",
                    method.args = list(psi = "psi.bisquare"))
 ``` 
@@ -264,7 +263,7 @@ ggplot(dat, aes(x=x, y=y)) + geom_point() +
 
 ## Robust loess
 
-The bisquare estimation method can also be extended to the loess smoothing function by passing the `"symmetric"` option to the `family` parameter.
+The loess fit is also not immune to outliers. The bisquare estimation method can be extended to the loess smoothing function by passing the `"symmetric"` option to the `family` argument.
 
 
 ```{r fig.height=2.5, fig.width=3,  small.mar=TRUE,  fig.show='hold'}
@@ -284,19 +283,16 @@ lines(dat$x, predict(lo), col = "grey50", lty = 2)
 lines(dat$x, predict(lor), col = "red")
 ```
 
-The default loess fit is added as a dashed line for reference.
+The robust loess is in red, the default loess fit is added as a dashed line for reference.
 
 The robust `loess` can be implemented in `ggplot2`'s `stat_smooth` function as follows:
 
 ```{r fig.height=2.5, fig.width=3,  small.mar=TRUE, fig.show='hold'}
 library(ggplot2)
 ggplot(dat, aes(x=x, y=y)) + geom_point() + 
-          stat_smooth(method = "loess",                       # Regular loess 
-                      se=FALSE, col="grey50", lty=2)  +    
           stat_smooth(method = "loess", 
-                      method.args = list(family="symmetric"), # Robust loess
+                      method.args = list(family="symmetric"), 
                       se=FALSE,  col="red") 
-      
 ```
 
 The loess parameters are passed to the `loess` function via the call to `method.args`. The red curve is that of the robust loess and the grey dashed curve is that of the standard loess.
diff --git a/resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.RData b/resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.RData
new file mode 100644
index 0000000000000000000000000000000000000000..dfbc38a46b0e41bb73634e071d0d76e75a3d36d4
GIT binary patch
literal 244
zcmV<Q01N*giwFP!000002CdJrPQx$|2H>Mf2Qu*pVG0aRnzl4<q-=<-3j(PULXm4<
zY756iu`PtEzA4XwFf1U%$Z)#*m;ck<UT+u4HUWSL;%EZVG@LNKzq=t6AfAM90x_J1
zy~#(k$~tCTtCd09a>gYV()GIV#;_g*;nJHYQqJ0C+0m+7uhs&uD%w?omsl~nW2@y%
z%y)}Wc=n_Gt*-0zkaN^JwLQ~1@7dU7ZuFR?l3Ceg|EXuk<QpW<-VNRnq3od9>oGZh
uc)a+nbxNZxI<@yBl0Q*W=7ZT^9$u7ivYAu*WqeNf@BIThwCe+D0RRAMZg^4v

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdb b/resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdb
rename to resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdx b/resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.rdx
rename to resistant_lines_cache/html/unnamed-chunk-10_41f87f969de578f7dc1e7a8ba640d2b3.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.RData b/resistant_lines_cache/html/unnamed-chunk-10_f05e07280210339891d5d97d22ddb550.RData
deleted file mode 100644
index 964e503a8e142bef17df133efa94846ba712f09e..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 243
zcmV<P01W>hiwFP!000002CdJ*O2jY_2H<hqJ=l|vP*2rE+BBtXTIfx@d65+sL`rPZ
zO)!n6Nf24~O??(IdQrrqhhgTw{2z0BwX2d{0ss-j(F&q<IAMLay+#xuUWIT1F`R~d
zlP|(5>zHx9Rz}!<V1pEebdxT;F>DeX4bqz@RN{WbwZI!fF)49XHMA*t&6^D;g!9L`
z#-Z@+NBLXZw&@`sgx0B@nAZ8kmM(LP7g;Kqm0k9qdUi~{LG<k1>>c9D&YHa*lk@wB
ti{IL)w6Mjf_I?rQPZX8;Z1$Ij7sZ|I2&G@f=Y;>>KLEqwEZJ!R001bgcQyb3

diff --git a/resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.RData b/resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.RData
new file mode 100644
index 0000000000000000000000000000000000000000..963fdee4977bdb38685f0a17abcff493d3376b83
GIT binary patch
literal 244
zcmV<Q01N*giwFP!000002CdJ*O2jY_2H?2u9_-0SsHf^7t!YiWTj))^?L`z8L`qDi
zn_wDClOVF}oBAwb^rDDI55vrV`9J37YFj1S1R)fmI9i}+8BVmkyS>IMgyKaAM<_<e
zVQ=yotg?<7*K1|K_MCAEg><7XyfJJ9fw}bN2@}#cK&zDyHL2mEqyyCJvgB)8lFR0?
zq*WCPPkxlYwQZa3a}HXkc4S)TBb&R-%^tE;GAq06KlSX8e1rJeyU9B&l$|ttJtU|1
u4`;u%L20nXpmu%+{3nV@KAGM5{zVBVJKEG=#^;3p-ah~r81+JF0RRBmmv#mK

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdb b/resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdb
rename to resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdx b/resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.rdx
rename to resistant_lines_cache/html/unnamed-chunk-11_7e538dd616e025fe6922c952147b2533.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.RData b/resistant_lines_cache/html/unnamed-chunk-11_b19fce4230a230eb339f211b686407eb.RData
deleted file mode 100644
index 0b2c9bf653f893b452056f6b2951b1ba818fed4a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 243
zcmV<P01W>hiwFP!000002CdJrPQx$|2H>Mf2Qu*pVG0aR>ZYV^q-=<-3!+jbgd)ee
z)E173Vp|AReN&zVVOT&FBg3z|TmDaXf4j@0T?7CDguw)Ysb68beYhhlfN<iEGYH|_
z&rLd_k;XD@Yb7<Bnlmmi6Sh~G)0*|z5-yy6CY06<U3VN8^L)m9u*vgvH>b2IR>fkr
z#Ksq1{3?Gh%Q8Ns9F>Yq&y-4gHdcup9VW40MpVgv>d7(s0m+NAgR`WSW>D<y7+pR-
tU7c#3RA{nJ?%jywPn6Jf(EIDdt8A^PZkENj@fH8y$0x2(TUluV002*na0LJW

diff --git a/resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.RData b/resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.RData
deleted file mode 100644
index 76e79273e4053ec956936fa03e2a1384b4858351..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 335
zcmV-V0kHlbiwFP!000002CY#|OT$1A-F_Y1lRsfCLKDoUO>FD7(3^PkA_|34(zux<
zi`#6-ZqQPC^LL9IJyc4M4h-|bn|Z^Vr~BnCUSfn$2X#Ab)alt2^<JJIC_|{*wnYnd
z(S?nVeg#@+6Bj0uq5vK7nCCFe%~lTUqKLPUP@dPt8x1DW-FP;R0~Sov5gV~7g9!`A
zX)p_UFy*sRVi#T>m$yFW^Eui39Hb<9tn<a-Kgk9Mj5nLj-ml0H1?4J%1J1HiD&r)n
zM`F;<hqrTGazipu+o)8cFpe!T`EA6n%^i;ILdBspWI-xF73P{NNK?TD6h^OtwMXp4
zU(-^Ra2_45y%R83(n9+cBz?Cz8RMfcRMn=e4NZhDWxPA!tJT^$l_?bx^e`1!T>(9-
h77hHe$lU$ANKC#689Ou_joW{GeFM-e^-&Q50075*mVN*L

diff --git a/resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.RData b/resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.RData
new file mode 100644
index 0000000000000000000000000000000000000000..78c31424593ae0a9c6f0af0f16fe8d4f33eab0d9
GIT binary patch
literal 346
zcmV-g0j2&QiwFP!000002CY#|Yr;SfU8^3tr~ZVk6ijFmO{^vg-b!!1lokY$xY<mS
zrE3zh8(NY4jQ-uyO+8q|V+V%$;LW_*w=a*Y30`4@P#5*OSE$?9DeAwyKG^|6y(?XG
zP!C<}`0P|5xl}Y)q2M{lkWrSwC{sHzs`H%gAhuan=kK;V4cR=Q@!WlgyqLP4Kb`qe
zFrLgJU;utH_VvP>)AG*OVzD3xhk+0zqcU3#|C4OkV7%RK4^BmXDQs56&|tx%idK6g
zO-oTI&&0>Xh!cxYkjAIAH%)R+QYdy|S@2vLy2Rwzpiz66p}SBqC>2?f%1OAoV+AA$
zXB=`R*Y3t5dg8B1QIv2Q?QN_xFe`+H4l0NTX8Q(=PfFQEt;$;2F_)#F`v%{xH^#Yc
s2^Szo2~X<^?2Gc*u2bfzdHCS5%9dUbG%ZK#`h&iI01!Z)^dbTP0Q+5~B>(^b

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdb b/resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdb
rename to resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdx b/resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-15_7494a1816f080868e5824f192c16c90d.rdx
rename to resistant_lines_cache/html/unnamed-chunk-15_c9fad914b2da127567b8036becee7f07.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-16_c70a75f3fef1561cb7ed8a2201a63220.rdb b/resistant_lines_cache/html/unnamed-chunk-16_c70a75f3fef1561cb7ed8a2201a63220.rdb
index 9080c93f2c0aeb01ae9dc3499dad50886a0166fc..226c2675999790bc91191cbf368a73553ea8020f 100644
GIT binary patch
delta 311
zcmV-70m%N3agA}XS08^kc${5O+e*Vg5S?x=+K3|h5k5(<2o@1Rv=v`eh=sl;n{8d1
z?1t=y)KB#*1V5m<NoPZwhhfh-%<P#n^8f%Ga2*1UXCQd9kLl$YfSfl3U*FWJsR6h!
zH19zrRzlXIC;NArt@XV@L91@d;>PHt!4KcX&Clp80dUFAv`2rlSSkFHSf}^5=w(i|
zb!e$JXw&n)c)Sf~ij^wNmpqpu4WA^fawfD2pSk|5l5i4@uEu>+5$DXB`Y1XRK@lD<
zc*dF@<i`uXX6Y-dGcL>=ZpGEqv>_X6ZobrUUZ6ng6c_%*dk%Ujk5ow;BPxq88yuzW
zzT~eLw>#Em|H3M}cyG|Nff6oKE|%TyOwdeP7Q|YYJgIb-&E+b(w!N98E7pej2e>6t
J<g<Yw4j4`-m!tpy

delta 313
zcmV-90mlA~agTAZS08^ic${5O+e*Vg5S?x=+K3|f4L(Zn@=!zs(H4BsLM-$(*=*y|
zWVd7|q<)j%;Yauzz6#Y%x*OU&413ODX3w0N2LRxJ>kx1}4Z)keO)f?N<g6j)^>v-<
z8h{H!{T@_eDP%2rvVVtcjrSS_t-39X8>5p3KYYvI>(8$#fJ=XNrahX+N|`T-b(+3L
z&vS~_p{1zNrssYBcpJ_XD^*xzypZ9Oq*cKLsxagDUM1l;y1E?oEk#@~Yv~)&84GIQ
z;ezL^=`s9x!PhK(VRg=ho-;dfHPLN`4Uy|FF)mg{Aa!ci{V~@Z^fDf)k~T(Eu0CvR
zBW?F3f4#8XsWvS8_ua*NgPskPaFKG6b-Ob`b7@%+BbGd=u*>Fh72Vk0T+$_L!~6q<
Lc~eode;^JRqClBJ

diff --git a/resistant_lines_cache/html/unnamed-chunk-16_c70a75f3fef1561cb7ed8a2201a63220.rdx b/resistant_lines_cache/html/unnamed-chunk-16_c70a75f3fef1561cb7ed8a2201a63220.rdx
index 8c5cd586bf329d37a1e609e78759397d4ebb9291..e0d4c27afbdb967ea84fbed8c3345e2a85f21c86 100644
GIT binary patch
delta 37
tcmdnSw2f(kE7MH-iSCI!(!ntc<uvMe4u%)8PTW$(af0i6P$3fo0|4{C41@px

delta 37
tcmdnSw2f(kD^sMxME67<@!*(+f*N%^2g8flCvK_YkPAGwqmYS#0RZJ23-AB{

diff --git a/resistant_lines_cache/html/unnamed-chunk-17_2a05749d67b8200d4ea3d0f35a10d198.rdb b/resistant_lines_cache/html/unnamed-chunk-17_2a05749d67b8200d4ea3d0f35a10d198.rdb
index ba27f502e4d6c1d9aa0a9414486ee06bff412f47..5d2ea4142934cf015f9358ebce38468ca046186e 100644
GIT binary patch
delta 314
zcmV-A0mc5HDWEB^JO+O_c${5OO-sW-5S?z4Y9or^FYx3^f+AQ%1V38wqCzb6nryap
zX|fx#8`Azz5B>_lA5h(-v!Tsl*!LbY`{vEm2LK0Lhk)Z52;Ssld_DvqCpE#hZ|c}o
z4_p|Scdrx+AuG|5`?s1c^_@X}qi)LL+UTgp_uu*T&%@~#fJ=Y2rahWQO5vBpI=#Pz
zFH@?mLqoMe>yG!?<4rJ8tWZHV=b02q@FZ!OF`-rP%=Kp(2cz)vV%RkmQO2xkA4O**
zD8l_2Pg&iA{BXvXEO}*B%7vN3t+*PSHe>_M&6hgLaui6F;KILn&t50xfhuTiL}k9R
z!BN`mOa3}>+hZ-QcQ3q+cLqHhDCQ#JV&3k~1Wl!7ex!B5<5IWTT&}_^+nY+dU`?2R
Mwk=b3vu6i64Y&85i~s-t

delta 314
zcmV-A0mc5HDWEB^JO+O@c${5O%SyvQ6uq51v=K${8(d28u_z*fXbWysh=p#G$utg4
zW=iIU)Nk--{2dqmgj=CHNoPWv#bwSp+&kx<I|~570oNhmcp8E?eVv?*0LV#0%<Jnq
z)-?bZhWg#B#6rkg^kn}A*$Qtp3R-nj7B@ym4Zi!5zn7oi9{_(Y*_!rf9xG+OB-ZKW
zIeMH?v<@vrjn+Ny)BEdis#vMQBIAV&A0({`CQyYL$G0j8$I-?4sBbCaf>}%7h|XA0
z1NY}VXHAdchjYGS=@YASF7%w)iK~fjGi-=le~EFiGy<tpv+j?%=Af7HK$WyHqH_6e
zV;gC+FZt_*?M^MV-o5WO-Wl|4poEK*i>%w737SjGf*7&nNrhcDm#gT?_U4i<SR3Xa
M9r9DDvu6i64F#&3bN~PV

diff --git a/resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.RData b/resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.RData
deleted file mode 100644
index 59bd17678154b19732ee0587fcff082a7df3010a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 413
zcmV;O0b>3iiwFP!000002CY&}i`y^|)o!wf>eQbwbq}$@a$@f$b<Fy(P<qRy+rmOA
ziEPQSsQgiV&^00b<AqW=DJ<RgSj1=~&3kXq%)Ed5aE%`@LTG}flS?$Yaz}La@xwck
zA~d~pmkTsSFPz^*iff?_ZOvASmg{Xv%bL$?)5y7PTiS3&%G$PHNStohX%gRXy5z;0
zS1h?n*Q;e3U#Ib#MI5ha<pf_oiC_H4vJ4JU$)yC{P${E^s(faY<uj<MuJhUd%sx9}
zyxZ*#k%CiBQg)0VF{1`<2{=ciN;ygYF&qNC0T`cU<HG>o;V~Q$xic41r_ko^{yxjp
z--r-;EppFoQ6cnKOBMG5+{@1RXW$uA)_J@Nq3mR?_JzL)Pb*4-0OQwi#~7HJgX#*a
z4UFH%v>2Ta8+E36iZkyIG~*Su(tzT7S2``a_8Aj?GhKLCF1!$=8S*3;3xn}fKS*ay
zZw+BW_mU1r{OZ$Z|9LYiA-SGcVs8~E|Lh5gqrTk-hi`(JI#1H{IOZ75jls`f3v(In
Hhynlrw+qN0

diff --git a/resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.RData b/resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.RData
new file mode 100644
index 0000000000000000000000000000000000000000..fa7e68113add5585f92b282b7e5c95b55ca37aa9
GIT binary patch
literal 422
zcmV;X0a^YZiwFP!000002CY&}i`y^|Rg>&tb?Q%;x`)_cJ5IWZU9&zcl-_dbwy;o2
zB3q-_RQ{+W(={Re>7{Z~*nS<07>zXZ<~=l{cW)kE(FaNhnUdLbLZ(;tNUlD-e;Xu(
z%qI5ojLgWj_1jRPuC!r|*~zLwy(?Hz;-WOQT=Y%DYUDvt_RZ&Dne1}DUdJNG{AMGB
zDDWnUqZQBD>u7^<9L1LK`4jo%I!#kJh6PFqx@J;_HB;H#s2=A~GF@i#|EWGdQM%vn
zkD-FIW>B;oPn0tQw*gqkLZK|B`{)lI-2#kZS-UX6H+b|%L}tyV)H$`iyT4CU^*6$Y
zPFI;@w=l2tm!2tfJle_DxEJ6BQ<T|q<3rKPOdWDJ^3N+=c^;)N;f`}KC4y@6UK<#n
zPgy=X7q;qB<|yROZ)lE!_0oXCgKeFz+U8sdqE$8~P+?R2!UI2fEO=N)jt|ld*~%N+
zMCsFXg0?qZZvtNFPO{-dUwr)J{y7>^Nz@Bb9eRbqKPMC{!>&1a$FCJPWwuI^)2K0;
Q{S@DS03!w5&XxiI0E>vvPyhe`

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdb b/resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdb
rename to resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdx b/resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-18_98214ea5eb9efd2489658138170116af.rdx
rename to resistant_lines_cache/html/unnamed-chunk-18_bd557fbeb46fffce48702dba906e7707.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.RData b/resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.RData
new file mode 100644
index 0000000000000000000000000000000000000000..27a4ed948996cdf11dee1a968a7b778893ffe2f7
GIT binary patch
literal 382
zcmV-^0fGJ>iwFP!000002CY$DOT#b}&AuMYlRqKuWi7Uy+uYU_`Y_NvxfiD}5b3fe
zYlCT1lN2|`{*%8@OdT>2AH5LnJ#f!Gx#!;BEC+B20RRoqY}7%cWlGR`e3-dD0L{7q
zHP8fSCeJ-d6;m4LI^ry+DvEKO(r&6V-YxSSXOy^cTIMfqZxUVmL*E}xdXx-D{qcB6
z1|zZ_T@CPhJR<QGHUrO3!)xzB5TLymQ_hjfFy~%|W!TZOq#cxEm4==FRPP)hT&-4n
zPoghPHx`5*AZKfd<<3fyf(zZZ;jyp?)(*l{S=(^ypk27LZFGqeDzc~$EZ0^AAv%Wn
zqmEQ2gifuD>QoREqWN^O2m;A72PtasY<jo2bx<t00c}Z1+xh1Ij3eK}GEt_FoBgdq
zv5I1nw`S_K#FDmcyV?fAlZmb<bx~@UFja88JHU&lXY03v8^)>XZdg)E>i%h@+w+P%
cvG;F`=rrv6{-M&Sp1Iw}C;n>`fjt5M0I$up>i_@%

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdb b/resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdb
rename to resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdx b/resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.rdx
rename to resistant_lines_cache/html/unnamed-chunk-19_48588591ed562775d36db603ab76dc0a.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.RData b/resistant_lines_cache/html/unnamed-chunk-19_5736d0c7f23d2dcbe1a6a29ebaca245d.RData
deleted file mode 100644
index c6aa71e3f81129330fcd93bacdb2f1a70a44cbe0..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 404
zcmV;F0c-vriwFP!000002CY&-YuhjsR-5!to%R#7Tw+t(X`H4_4L$_6p4Q9KL17F>
zkzQ<3$#Nx`)r9=;T}tJJ(NW4ydm!HTB)#tw@6*>$_cMHt5kdnr92}#;iHGRq+ucpP
zKxlaEiz75dr#{~%2CT4-)~=AE23s)7DwtGG$w^z+Q~{4!)z%O3^tzZ|%`W*lyV|BR
zo^rN<DZQlWHEbxO>BXFT!Vj<HN58TxBfErwl*B43WumCb$Ii4cCKa_+KK`HT<2}af
z^?H{W@>?@zn!_GTu`$$iL0L9ZyEMcH5OC@uLcs=4`BOx?ybD8eMoQ4CXtbzZ(3hAT
z!oSfKR%z|3K!K|?Cpj5OHHwG@4{w%VR-YrnwCwjw1Ks@GpGnvGI`vHdB)VO$R#|4G
zdY8=rA4Pxq|Bgd{LQQG?J?RG-G*<L2J|!DrA6sf*6o&m+Fn)C-)~#z=7jt17NxMD%
y`29!l){3o=U?*Eqwg%#N9f_w&Q<vfHr{J#2)5T)nYxK*1g69{#mJ*+a0ssIRoW+a)

diff --git a/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.RData b/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.RData
deleted file mode 100644
index be0382ccd93c34dd38d55a34259d7056b930c85f..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 170
zcmV;b09F4ViwFP!000002Ca>~4uUWgMz8z~cJdL}nD~<jg~ZJ`IT=mZNV(jm#L~gS
zWPEjFM<2lHJKu87_0*NDV*ubo;CtYQ4k5hX&ItzyJa;w_z}D?0eUhE*BFxh3$&l?)
zprTAIv(8py#7tv?YBi6f=yTdvrKE#wxS*Vmh}6`jtY{c&KA?2I-H#jFwvApXlGc$D
YRvqI%w&FKq&hIjxFHCfMB<}zK00iw*g8%>k

diff --git a/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdb b/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdb
deleted file mode 100644
index 9fd2f85dea6f0bf038332de1bf1ddac0a8fbf453..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1370
zcmV-g1*Q4`00@0}oZVGhZ__XoPMTh}icJiVc;Vu0n)<R-ATg=RxM)J#BOr|--YPeC
zT5E2c9XqszKg~O$!Aa9Lb<@H#mJ%oDeBXDD&vD|fP0O+ztLjuNr=}mR+Rf)Hw_|CG
ze)+BEik@w&YVD@;Sl@o>YpSn$(eXpyDu%JaSr0Hwa@XA4yv03EFUJb7A>a5$p(i9w
zL790rrb}%nF~n*l;uDzZ)RI-=s`g#XsN$0X#5N%NBMf2N7h%AeujJ+|7L3Yk*T^Sb
zLYqrf0<Lo$MLe&DofyHLtD6r7VJC<~UojERDAk;{Xn+~u9+qu?fC2l8LWzGr!u~Dp
z(=Qa{LN!yI78Iw(m8<L~C5p8W52>6vn#q!2CmYC%TBKznL5bv^UIf7kw*%1HhV(W`
zN5o}ScTV1(EX|LS?av3LtIRg6(XV<SV2IO*_Y2nQKn=Nxq|(Qcv8h)OO_c^{W2L~*
zJ4s97-o+S{a0!zs&W%9$R7w{1-yA83>Ct+1mgUTH?@Be{8gIr8V$QoGM$}+Sb~}-f
zEZ>GJYvnXhTSD)E7<FYt{oJ>|)L*YaPjAgWh&Uuhl*Td1hC!%d&iZCXwr`?*!G&4V
z#_?G;4D2pV|43b5%2mAmxF>*6@X*U>jHKX<pwWOSiVoQ@5}<IX&YP$>0ud@Vz(d9-
z9%@~S7<`J}3qsK+5Uo?x`WVp=UE@%;3}%E0(S7pLP#fiQkek-ud-X3!VEw^gpjpn6
zeWxCJ(eBWp;hxpN1x#2hJ#-e0&(~Z3Wd8MJt$z2j*y^XrS{tq|E<2Z<nfsaPp7-+k
z8joPO1)6UNWVmf>L$|iJXxWcbbO8+W|D!EsUuB(8h5bS9DHe7wKOVgNNG;M2lM=#%
zIiYx<mj?x^V#rUNhl{`Y9}eVRO#lE0ka(QkRZVZxFc?mowOuPVp$U$Fw=wmyL?AJ#
z%J|TPwkv1@iCg8yPHXDKp6$>U{xo;Qf|I6e;-rN$mJ%m^pZ9q`ZGY)mmStNzcGI$3
z`qOHC{&eLGEWM(Ce(SlZ=Z3Xob<=sSU%&Kor=NCF@I$|v#$tz(k$_^6i&o3MDI8IJ
zIadN2^qp^5jF`kJC|h2RyEV6+7-TKP=|U`dT1i>4%zYaZtmvWuX&8|G85EK0vnZg%
zS8}r#_ZrRDj^R%lf+Q@e0k=4m3fBl4&kd69wOgjSrwHL!Cd$q{$WyXcNli$i6}S|q
zEiu>A!=ejrPFf)DCUrqXFvM~x=p_Y(65I6#rWK&A!*fwk!@mcmi=cvTAhaRF&NfP$
z#j1wSK6!hxUVfZx|30V<IqO#=hwXrg5Go_^orwymiNw-}-00~NqNh>=E>ubwd?#rt
zoZA=*#T-OrigUPNK9-V1<2Of2#Q3P1opm}h--l8ysK%RigP79cj371H;@vK1lBi`b
zmSUwiP+Lsz3N{-`j{RJ=zvi!IU<Cc?Sg<%khLz4S%7&rPf|QI+j~c#-@)>1jPCLhE
z*)XtOoE}I+U&=DRaX4ZEVc~(7d=4a|1cBLvC=3os$eB<uQs+HT907}z6Tpzrg$MdK
zEEYZn?-|12qhS40(Eq@31a4p?`-Ucm2<bX`si}?hImk)#@4fmLq#)zTU!a-Kl6=P=
zc;OCkXo#0Na0EmomL53c^Yg54y!5Nu1W#7`C@cEApT(j-O)3Ssy0{!%4wm9)rg&9V
zP|-tBOa;zc<IoT{dK>DtwOH%QoPrBMApPG8RJT*x2rKAMtm;9&$MwF1W9;R(Y*GCv
csZlssDHQMcdZPlXSmYPnqx%#74^Hb^=3?fkP5=M^

diff --git a/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdx b/resistant_lines_cache/html/unnamed-chunk-1_0e263fe5f98ae08dcce973f6ebb78bcf.rdx
deleted file mode 100644
index 184258b476e73f1486a28f428b51a6cc47dfd986..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 158
zcmV;P0Ac?hiwFP!00000231W<3c@fDeN9rN0YUH_?mdAA5QXj})=@<JA%ULBbq}Z}
zGm+wAc)yu9wFRJIw1O@pMR`2zHd{cgIS^EFmKhUFvrb&S0F$x;230EQTuUL66)%ao
z7#_FNNdC98X92wP6G%z%$#;+pmWz4*a-EB+(fPYOKjT9&tfwn^>YCYU`gZUX0$oz+
M7ctB&F7*Ha0HOXtv;Y7A

diff --git a/resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.RData b/resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.RData
new file mode 100644
index 0000000000000000000000000000000000000000..8d8e76a27527c91a6d7402d958d8a3886a97944e
GIT binary patch
literal 383
zcmV-_0f7D=iwFP!000002CY%SPUA2THMAVoCqBXC(nK^VO-m`2d{_xMEf;o?kPu28
zXOdWJ$C2%5iK_k|UxjcN2@qOtJCZeT<mY*wH#Zk|Gkk{;LIX4$?4!Yfhv?w;*Hyek
zXt?i-Jv2n$e7;T$SYaJ&TqZ>WHsg%fFsYrAldfr)f+FU1*ZhvtX?DWWvuVlai}Ey2
z=Vy7b065QQ3!ctq`TTtD8y>zl-+NlER%DZKkdj!%q)ZeubmUA2BT_S4)6xG_A8j#S
zuh*NzkiVKS*9B~`6uDuh538z`+NBYG1!2M5m@u&6BYhl`p7v2hj!6YtWvv#C3wI?Z
zZ{fe`GOM(9b*RAAx*(JUQiHX@_#^RSyb=>;D(l(O&l;9Y3E9)Y_R8NH!Gq|_=N9PI
z_a8qm$AoY#X<(oTBC?wj<9Bmo-MO}NaUpCgS--_c_YdJ`XG<Z$PD)XA2I7Aj98Z(B
dsiMsvQMj6>%jI^bu{(aJ&o3+sbE;JW008+Hv>X5c

literal 0
HcmV?d00001

diff --git a/resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdb b/resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdb
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdb
rename to resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdb
diff --git a/resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdx b/resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdx
similarity index 100%
rename from resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.rdx
rename to resistant_lines_cache/html/unnamed-chunk-21_0a271fc46f5b247bd6ee9b36c233b494.rdx
diff --git a/resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.RData b/resistant_lines_cache/html/unnamed-chunk-21_f34299528a71404319578f2d9f21372b.RData
deleted file mode 100644
index 2dfdc6cf72c408dedf2095841a3293db98832519..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 423
zcmV;Y0a*SYiwFP!000002CY&-YuhjwRg?5ko%Rzn_Yj-fPOT)w3FuJRdfG1C3WYHo
z#g=VR$ug2mYeN2dncToyM#pyO1EKFjAMZWBr<+fAb9e^<0Any2kHGlUmEiRD`*oB8
zFd4b#1Wdr0yT8Vo8E!0XY$kZaOqSEUX0zH#G3%O!N>)U9-8J_SPO@^o!0YuAr*xGp
zE*JA;y<DXwF4iSZ<}18&gdbkWM|88<pnaS(A&`+&h*(lhrdD@sifU?VGJQ|==>fv+
zcDs)?de)3`Rj>mTe5a}I{i<q(vN(Xp!Y`-|5oN}IB#$BLNgo900#!`OtW~_R{?J17
z8_uT9j8w|jzGSvm1tQ23iW%dD=xv;%8&-9KYV<t!n(j3WBiC17zI_f+t_1Na&HCk~
zBNetMI6%&a!+%@(i^y>>rn)k2TDZ0QC6!$C#528gubSsx5DuQzt~2&%`JaxDmNhH9
z01fMh@Fn#~b++wnRB+P@+8^M@A3yy+BQLpNW>)g5(=2*3`6!9orV92Cys$OFX?hqm
RhT}fl(=QoZ;SBBq008PL&a(gj

diff --git a/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.RData b/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.RData
index 487eb42b95a4cd0f34dc297248cf4bb404058ec6..aa998dc2c9919f4cedd3d3cd31e9efac474dd6f7 100644
GIT binary patch
literal 836
zcmV-K1H1emiwFP!000002JM$yZ__XofCKG73*sX22TWfI(vq}E%ckriO#>tZh|56Y
zt+?@NV(QqzcG$|azYf@K({>Secwo{ZIli5X&-r54ef8jN<i2$s$7wjt#$~6mW}430
zo7a!LEyrnIHl0gO(^)t5Q(uCjN@K1EjB-$e1Sc5;na){Ia*lH#UXqo3?1h67^t)ka
z)V&`?Vb}}%n*cr1A<1YI^*2cr8GE;uwy)iY;~1Uz2{48-tg_wqKlIf;b(iKnQR<@9
z9-*pWcyj8#v(L${wS4OCXgp+q2-ev9P-3Zt6|`esAw>d8QJ(I$v@D^85{8vB9Xs7Z
zN>3Q<wvH&#S&VS01-e7?LP#6LHfrs;Xh&y&iD{UYw3QvH6g3=c4>Owbn88SICxQtX
zBbg5I-L3uxs!G`J-&?gj#K}07qU0taD=J~wHL}ZBO>4y)N`PyS+e0A<81-&(jFe!M
zpredxSk<yiUOpqiwKu{!Ws?}S4@D^xKnH>VdLc!71GS$Qz|kS*s$J78Fd-(9v32!b
z^K&83W+U$Xiln4z_7l<Rnic&7G3xkRkk_VXIq)PVv{W(b7suPJJwysNk!UB-*#)$7
z11(JpCUkg#?R;T-wtslIU}kE2PTKDD;M~zeK_+JpQ1TO~1k14m@+%no9Rn{4tJfc6
z{2{v~s139)DQ4%JSJ&_QJxhpO@c18iM1Jpr$A83Q(~tc7oduBDiDurjgUmGS?QzeY
zT|@0X)t1`L`{lp9c@J{X*ciQSigD7gwR`qD?pz(i3rV@I4X<_lj^8zEx2J<=Cm$cg
z!5alq1$jzy!AY=R6c5ZrI(RA)%z{_J5#=7ELy6@i==o7FwxK^f))EJEf8N}|ndsMS
ze5&THIid_q{drzi=iIq9|Gip~sERvZ`=yzi#+SLaTUoa5syuu&@le6%-G-7$B{j|B
ztbIi#k`}u1KHY9A1E@xt_Q$K5#abJ7x!E6;kHYLWoK`N^F=GQ8oT{f``gfxi>P`Cz
z3<#J#Lx3lfS&ZLgy3XtuZd3j{RG<6})rH4Zu8V|!4`m(a^@SNfQFWr{jApYQ{I>x*
OpT7b)`SJ~z4*&ou1D$gK

literal 836
zcmV-K1H1emiwFP!000002JM$yZ__XofHT^G7Q{v35176bq$O#ScAK(`G%-L(L%;?S
zZ^eyI6H_M+w!>DY{q=#}Hf<LTHYOgJv`CI`=i+m|*mV!~J_q(^+p?^hRj=K#YRkH5
zEr0s>%Gt22`W@X_vg+1~uJ>I5l1ha$)nhaR*^6+LfS0J0c}14t6o?ZgMK*N&-T=C7
zzcpyD1%dB({O&qHhqOpE7zEvQ5(L`b<GJno55q7-CvF6cp#;lhyZH}&HBarid50G&
zFO);5%o!e?+F#6bvTZD%+FJ_u86biccD@x@C~gGJn3D@0fs{0hw;M_n&_EHxQtFPG
zZXl^f47M9bl&B;`xKJEDrD@KE31Sm9c5Jkz62L?^bW51ZjFgHBj+KKMjkA!!Ky5~x
zaS<XB_wloh?kXya-|aqMwA{zhFc!SXbV3$Xe7~(_=dX&^f;SXFra)}=xgem`+xan)
zoKb>~5~^TP%Pe{R40xuT0Zu6!g{XPR3lRZ&!3m)Ef;U%D^IZ-ZI>ec5Ry1==h)!f^
zT>aMkRLC*e2s>Ai6f{mQ5go5t(jO3_mb(FIWqOhWM_@t=8KQ1}yxG`6BxfUmwmg;G
zLc1~0;y7nq`M20^7Phy$hlev}x;E#e>5dQ1E!F2_bp8M(mp~<03<Z#@VC=RuyudGC
z*T(oqc5_gxXjf3oZZ@yB+jcvK5V_^?Kkx|L&MlAsh{w7cxNEH$kjaUr-;;w(H_YvE
z$DUk6%{|qW%FX-3zr1<(QczeMeWHtYQZu!E{yJ{m8^U`*GgTR0Zn-VDt<|242hUHw
zei3?~BnauHF-^I*o9BD_8tv`#2s7`%JEEDxXkTD4@;Ywd4Nc%LkCnjQ)SELke=hcA
z6P>L1st+gwU7t<M;+#FT=6;n65@oTcD_@$psr{U4+ofgWuFS%B9S!B#v|E!RDy7Cb
zoV4%CNYGrB-p89wCIIC~-TZWwvsfujF4eoE^pWemhU3!Z3TCWlf|J!WjQ?y@LVaXD
zfF1$8V+dr?XcFUvL|2&kzD>&ihUuH@GoATcq&iFY??6^zKA4$tBU$Bn!&ug<!C#Ee
OI{O8nbrLL;4*&qgLYLnF

diff --git a/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.rdb b/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.rdb
index 2bdfa73a971ea1ac53f790d0d68e967e0a8237a8..ad115d6c4fbe17a2edea40b4e9bd557bdc4f1221 100644
GIT binary patch
literal 320
zcmV-G0l)qL00XpmoYhfHO9L?w&3@F<1yShl=%%6v@g{zN=%I)OZ)KVtcjIQ$B?)T(
zyqdL1SwlUDClABS&YR5JdG9eJgd`+QVv-DONe1(W>&dAt#x`P$b-5clv=Nb%jBFm(
zI8$7jpgox8)BMOj8-F#wgEtpvbgofp+LXLm$%3A@?IjqXcPj>h-qTkuCxR~(s5L#w
zk7*4{fmd%v0d;&6N07#SRtXL2fGvIE0&RYG(Z@2kEq~U%2_KpJ_h>^CeYn?|-`vr8
z9bW7`d?npyq80N~4H|Iuo@R=-#<Od)7N{#k-$^Tk!lPgeu&P1n(P0a$hSF1xK!`<m
zoDOAR0(2<DL1h}TD6mCYpk(XKjXOOZ30_vFll(WX-u}haEo0x;t>8ad8QQtOU6V5%
SI{MGtjKkx18TbjR<E8Eb+?p2v

literal 318
zcmV-E0m1$N00XdioYhfHPs1<_O+Uu8N(iL=jx|GYK->^tLgFwXCUKj*%&ehlRwWV8
zKM$lVsY)~saN}Uv^>h5{_Z~AsNJ7#iCdt5-WH5iYo}AiZY$LW<o7<s78xcv#$mU^*
zGsUF|+Jk96&5!J}@mKRZcyn<^=Ngr!)tXludS2I;V1V9j7zlb#U%8wJzEq$ZdXgX0
z5|#q5-i!k3*d}g$8uvLRRHy^4^oa|!`Q1ey%iOm7S@$M<WbV(SElu>{UT1!DOXpR1
zvDfg8bf1Y<%uiKlz}0)2DP9}Tu1zCQ7l^)-76>bkf-%5~3Z+MfHLw!ao^k|2EZXCA
zC<7CqLm3VVQ;Ee2Ym_ULtl8eU)6tRO>%z2>|HjkXzkAy8^<C}c{>jMD%>8an&UEPK
QKl3sUkKbkACj{N3Mve@h;s5{u

diff --git a/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.rdx b/resistant_lines_cache/html/unnamed-chunk-2_fe5120f1633224257ee4d0dcff357d33.rdx
index a3f17e1fa5683df4d4646d5f0a801a54947f62f1..2e9e48cb3a3ae19ac11777a5a119c5c536c2a6fd 100644
GIT binary patch
delta 21
ccmcb>c!6<(EK~CGiSjEs(%Gurl^7Wq08vv04*&oF

delta 21
dcmcb>c!6<(EK~6DiSjEs{s!o-Rbpgd003C?2NwVU

diff --git a/resistant_lines_files/figure-html/unnamed-chunk-10-1.png b/resistant_lines_files/figure-html/unnamed-chunk-10-1.png
index 275a24ffaf1e0461059758a3fe52dadc90992ee6..b6658b225cafe633e3ca29aca9b984e8d4ca9cb1 100644
GIT binary patch
literal 5898
zcmd5=c|4Tgzt@;y>`Ox^yUG@kr4sW9MOns9S<1ePL=5R6d=o?Y$`+<YXlz-shLnsg
zV@pWFSh6HzOJmG^xZnHxet-9m`}@7_{oVVz=k<P`d0wA$&gY!-S>ETIxr;GA&%r9h
z%D}+DVW6*T#=rmrb{`}o0|SGZt_&RdX~q~@=o#%6KO-ZYk)NNDAM_>|;c!McA|%=s
z>=v9K4g$ds5)uf01Tqe4?FV5`j3eL(L>wd}5^+T6P0!5C%*)Fo_!$v!egqtDw+Dep
zAVMG$$n?g>Mk3CLi1Q;7pdOHnOeE8Zbo%J%D4F0#Cg8|K2m~^5uZ9d2I#f@l)9DNh
zbRv#UCeX=5Iwalgv@6zlC*BIJh2@&Q?R5qQ;keyrU()o7D+2@H4+C9oi<^&@va!zn
zHJNe3(iiz3`pH~RkAY!9riYw@Ho?XwBYoj?{~Pieucqye(VmUO=g#IDDEG$96|Oaw
z?{~e(02VEC0wZGF`v1?tu7?kGTUqqC7QQ#u)FVQ>+Vo?=b%Q)oD*f}gJ{V|R&!>ZL
z6np^;+vYnV2h<sP3#?|oQ&m=l?ciZoVx>ueq15sPR3#@&^Y~j7@l3?LB^UI`$me0o
z7DT7nituRCZEQ`oBDa5)Qfz(SEXB!ZJ#r|8cR1#T%d&kol*{|xnEoVXR&-QvR5j`#
z)X$3Lcdp3xc1vpL*2YMbCHD?_xgOy)xi%SU8B~1knsYiVLtB#|QY3v&Bln8e7lngt
zUZ-|k^MT-;kdG+)Ql8HOPXIdI)oUw|(p#k5A9$f-JeZ<NUtXdX@#d8`8=B7eYQUBK
zPpJ|HdRDD^*M;6B?qeBvp3cF)j-Q$GPe`}yf9Lh{AX~>~hM;#nU}TZnbcJtEZvl{^
z-b$#r#3<Qp>lq)B@$}G*i)mX5pitm}q0b9p6L2-bXF!j`P`|O}MlG`mTVi1S&QjCD
zqoT4adGF?Zv4}cq6Wy*jNe=wz4OeH9!em%Yuk=i*6Ammfgz$atdLi?otIivgJ-_j6
zWfSdSDPDV+6qfk)Jqa%RHobplA`>`QmT1wD=@QK5V(rFOX(d^sbOwyq%L{MdX+&-R
zBqfAw3Kl%-7D3ZT>D#aQ7>kFHe(V^$gov!Nq}(gd>zhrY9fE~ec9qgiiAZ0h%WkzP
zKHS5a&`GW8*7PP_<d~N)3Uf>)^?al#cNWCFzT-Qv*G9rFv@UGDH<cD^OH;dycM~Pb
zTgZV{qgvI9LvUrq%1!VR<h^KAfy285t`zlJ?vUJyvkd!12dV8QqZ+-At5=?n+*R;8
z`C6g6jIh=%f7O-f^P;@(X8oQ+2k(7qxzG|%M|<atf`+ulNXORxZqDY&hN9pn2j%yy
z6)S_O`0d!oK%b{p?d|z_e5eS;aclcTf7TpJnUUGBru>BTd6h<c$RZdp({OR8b7br^
z8ZDq|rH&llWHc(Kf)CvWvofnyPwgaG>*);<I-QJqtsvuK;8D8TV#&b&J_PW9;5+dT
z9(skA6XNK;&d$n(5Fd2MwblX)i9W{;D+R^=lJUX_IE>{_M5!$+1lBbPgDok6{2L`d
zW+x}d>Tyewn41sy=O!n!CSc%*7)IS{Cw#OzUYt~5doN(*U`HyN%2BS34|pjuRb>BQ
zPM(AoatgYB^Jxrl*jvf?d-sLtK0G6g=6q18?o>nXS^R_Gg#Mou${qv&TXmI1Lv7>x
zR1u5QmNR?#muoKvGmlkpz+&=y<QJQ@j4$IKqGPnPE5+IF8J5D9#@mMFFhe9JP@+E{
zVBQGu0fRlR|1@KQ9ZtNMP%+JcojFw6g9Mr0gBp6-PLE=jD!Sd+$^DK=XXCsRO$&8p
zVZwDopJd(-zeqg%^*2Nv?Ra;2`#r)31TT+AgtLG2Tcr;h(}kh;s^B<l{Bl1fDTsm{
z;`KyUzI<8z;e)_zvReI!InBTvuXm!SX~{+^QGW63ZGM=&gB8rTYUb;bKroj1&e#Qt
z?WfW-+u#SK4(OhW#a>Zi?C()PT-xtv@ewITX$M;_9TTxpuD;&@tjc2peMLSu^^{lm
zxyDM8a#X@g0sA58>dR&kjbiC_K&@Je$@JT-Zx`~S*$*>~Xz2LxcnnEQ2aZx41{Bke
zNMjnKEI-;P2wyo4TQYdN>0oQqt!D3cDgwiclID7xYn9|~|90*%vhpa$_*0{3=Y;*a
zDu@@1xm!Qrfeiy??j6Hl+}ldW-W|~feLVT&p3bGCC0-h|UE~-&n#Fw(%LO^2^_{d^
zuA6s4;I+j0S1;R2uX~(iwUBTT^oD(RJllmbM+SYxk(N9ysuMNgeK#@S$4!GedDB+o
z72NPlb5)V?K`ipwN;1rseQrl3jG$VqH;)k#*-C3_Nx=hL=`p?vGNW$EOCvtHPMpst
z?rx<N07{$SqJX<(K~>+6rH_YpoW3;oT}y={;_LR0Ws0ly&)ci>4h3!bZJFN31E!@h
zRZhRthWI(tL>XCFQR`j}n$bRkGtIoNZe^XFHEBY`7TtI%*!b%USJ0f<+wU@MoKeBn
zD<6<#N>2b2XmLk_H^fD|K4F-fxW$|<aT`#M3>)7+#(Sk+ts7Nggnw+$v7DuXpwO+}
zm#BK#(wF_Qh|_f{c85*DN5eTLzK#C0SrfHwP|X?T;m<!9AF$n6bzJtGBxX1-TBFrl
z2{%;De+~gF?#Bg?{g3J1mM>y15*t}Ei*9Q*f<F)}0k{GR_kk`<^4!#uR|T_x#VNR3
zI7}PEjg;Dj^ck0{%E;dXX~w%r$gS`88J5WUXTCzY%gSY&&JN47Yci)IQ6iAaYTzjh
z1pa~+9sVQHfXvYHfEFx<8FYDnj8yP<{Dc3I9Mdj_=~&mON&+Ud#WDieRAm2{08*+C
zMSQeM4*tvv(~~d)yFin-e80&X9@+4)oz)a4MPG-*ZfF(NLMd65`y8nFaFoxAn^8}~
z0Hg@iP1)9~B2jmx5FO5Q`ElceFi_(DGa!_mwy|L;0-))is*sRU18`=TTy4p@@np&@
z7Pzl(hR;ZC6=je8oaAjL&X#gl<C2?b80FW<q1RdW0)h(^k*Eq9YFA}@K4s#}LOMwj
z^K8Q$MQkxVm;DNL7aAiTSRX9)`fjU)Zir3QJc~d1Oo0Rge<46Xf)5PtT`!k~hSdX$
zYT7OkH+1;<3n6`V8CJDan*72|OZMHRJONtIO=c}jQ)ai$8CF)DN22nfM#|<GqkQg6
z0cjxv*2;!crGe$+8V>=y{xca8WhbsSYiebosg55KNXaIjK%(}T^?%(#|AIJ?I1Ju;
zUCH(7^&f<Y+clb$6p4nV-kDi8&+k_zwm?R~0W&^j=kR*h9eTbR%j=3|AX77ST7<wZ
zo)<^0r|(|P=ER-H>o4U?kdmBQU)X2352tvqHs2haCLVW!j3iDfJ|()?8hQ*<Vsyi7
zqB|(B4-^r{9O~ot@cU3x88sJ<AQZi{8yS^^$LmPIjEqZ{<bAGYS7|JupoEg@<DUCq
zsO}5SH|LMGuRw970+%g=m*?3Y`t1q92YoK>)!zbrXN9eDo(I<IDGCBk1+a|b8OkN=
z?5C0>ZUb|%^0GI{MZh8>NAzRXN<{FJIQ>i*2lbMGZMxyw!49SfRT0qT37f@duC-Ju
z7&ajQ7g`g(`&7abd>F~OnKNg4zX%AIa~6=2N`}Mq_VVn1m|_0{2mVvj&^N$4DrP<9
z>{2pO$S+Qg(epx!gO}W02hKZ5kfI^x-K_AT2ACk%nxDyFUb?BmZfFpO=XsPchs=29
z&Ig>akt7w3YR4EQaZ7W0B7?9wqpOn*_mAWz)g7wxUPpqH$+5szlxk>2u-kn9>%(ec
zcYpwWU3~ku8**%&&U4k(r4-L^TWx#61qDO4ZOKU6Et6Z9r>`iUKIZCj_5O&74jy)S
zFa43RFREMT`hvOjkGuko<mWatsvTXP@p`nh%m!=qK^sBz5=JQuKiPBo@Y*|wG|cfE
z1p8Mg9%)`3zJkV&mfb4#aAkASj%v{&6bIrFAU|^8C=w3Uda%`}m4U4QM653n<&z?E
z;-k9(*MBP$HfBhOn^AbIVBN|sZASHEweXQ@taVU`%yG{?BIbm*c_x#b5#@FI4he}$
z)J0tS^2pkDWO;0FnU?rz8rOC8wyB}W8+#*)gAjZ3LX=#7To8Vt_E!D|kMtR&)CoTj
z+73YYpNNT*H)I0M_ReCgT(I_p%Xm`|5c>-zAQsfd|Gp67B?`7g1IknU9u|Lh&BNRz
zwzzOhPyfmuIgkG#mfTf?5aNRt`zQXnX&kwkx9OOZ5zXOXr>Z!1E8T7Q-7Qyt$lb<N
zPvqKbtw*y#w7h*Huc82DP|jY(UBfcJ(^m1u$sZ3OMwCIiaDLU?s;f*&lXIw(bsP>(
zo_E^~6&Yk@!L0Cgv#TrDa$HSH2-bCvPR2nl)5hCY7>*gT1qAxOh*q#JJ+x;x1Sn6*
z>zph9mGmaib9Zb`Pu9vZoL5eO-!@~41OLY|W%sKHt?STrke6RN_jdex$3wROvG|g5
zn!f!A4A!nIR7|x^xx-<DH@*J=c%K{C-=>GR+*QQF;_@ooisb-|Bla<?%d5;zZ+lDJ
zE$o*w+W0rg3Bb(cH-j6!PM>T)73k~XYioHOmrqu34IGtmyP8|^@vQ1%wg>zHi~YAV
z-j|gZy{{sr_V3)npI_48sue<`%(x3iBK?{yK1;l#0TC%tz-rg?pt~Bp%x7V+3`;K^
z{B-Wy*GI!Fq{J}Uz18ZmvDD%O)BCppZ85fcf9%VDIPgE+4F2oQ`JbT<^)L2h6%#1>
z+8)Kc?xfW=G}PSO^jn9)VrB~vbu~YOL${Vj5wO;&bVLVD2Jym52@YdUKp#%kM#4G&
zBhEZ5n0R#0lhZ4X_x)u4T7YnpRMKjbPtJ%A1T*vhjI)1_IaJQnhn92D3gf0I%1gh5
zN0XH8lw?!qRv3*-ZnbSZWw%baAj-aeLJ+&fur|&Z)5t8gPT4ot#LODO1<X$~k|McK
zzeH{ibTZ@VBGPM`425Z209_L^hh;ER6urHJ#gjG}o;heS&^Cd`%lq_Shco<I2G5Q&
zCWrmsDHQYk+Y#v>e)RFp?Q~YicZxLCJn*W`aPyDQ_%RmrbvVnrhk`~MR`^T~(j65=
zX}xFa*Gu(}+JcQH1jii>KCi8H<yF49=kv|&qH*I5?X=k!bocMB<L(cE!J|rBWBH=8
zg-~|f(x4PZs#bJa<41Dkv6Cm5yEAv{g@SU^eBtF<EaSBn;-+9%R{%vd^2h2KdOwwX
zxx0nxtS+41pv3lVz@1ZO`^3EuOW4_++0~@Om=y!NRMB^mrL`DIQ;>hX!CA|AT!t9_
zGY8haFmdUok@jlc(24W=B2ng!OC1efU&6UXju50|NkxL2+y2Ae95On0>6HD_ikG?%
ze$-)hyYV=tU$og*tJg*GgEv_8k%mUb=pxFA`8+*6$LLcL8k_s2MdigQmwvISsLSQ^
z>0YLXp;Ii+$zv4W4ELGiW9sZGA0Cer={lM}6wL3oFl%Kl)^~uoq*x;^8e@0H1dMlT
z-RYcC*GfDvVa=l(d5!Jy_b%)xZ14zn=d#L!1Ja@_O?T_<bkCrJ%x@|zG4j1ha1XsG
zR!^r?&gsm<GBkNgSv=M~scdVPU(+VjG_&AeezZi;^zc_IHwO+CNE}6j@x|#*EOpey
z+LTkJw5*egQAkugcGI_puVRoJ2`gsuo)|<-^?Y-b+h>ox4S+T4Ut&wpA<Ku0SRx`G
zh%N|y4%s|~0$Z+>Nc_?(>sG@x0qZtf30V&#QeqH~Z4eFB+?P+X9Y265ZwvcwmlJ{K
z4&SKT|3sIcD54&+Zy+@;dyb(imGGk+*b=f~R?v$4`R3vAl9<p3NzG5WtG{l&=WwGI
z9y*pJR@0E>JXms`-+dhOe(<JZ!)ET#3LjD6il2Vns-1y*u+VZ{k_(%~m|!anFs>XD
zdvkcXt92giX)*m0PYyly^u|TG5UH?h^u`eAtYfuV8D@9SW`qt8p^t3p(%UtAKYWU8
zieRa1pi)Xh`+J&xsnJ#~S6o?>D8ArND<&!SKR30%ZgBs-@2!^wx7c(}ElvvnVrVaa
ze%khnjw^teiQn^9|I^6xA|lL4^2M!-O(%L7*^-#xl)QB8_AS@#bU@5MFjRz^9TI9N
zmaIPQpOA>%rz3_~)ya}{Z06Q~W2pVqc!C2-?)ki+-jT!(r@Y^`S`S+D7J!918!u)g
zQBS|;1-GF)mCxG2UL^V6UHo{U3_BQZD;(I@&vW$cK5)CHux0k8V;3~9%>MTgJ;G?-
ge@Fm-ZLq__YV*Z>>3G@hzupW6dd9jXXRk#48_IDw*#H0l

literal 5251
zcmd5=2UJtb)+WW!J0e9P2ui$&0)j~OAVpM=C{jcODIyAnOOYxhfPf;+ih_^`B1%9?
za7Dm?qChm1pwbK>N=KRyAV45_3HRN%yl=g~to5(=uXom*lQZ9%%$fQ2-rww*8_45_
z#YL1v1Ox=ckJwtB6c7Ld{96bjARutkY8RCE^9X5o%G#cPq3rE5>`^Ft6z_?*&mi;a
z{2KqtKxN=jJOn?S!E1!#6;uWvBWLgsGOuuRa&n4_its3Vd<F`SN8!oC_+f5+eLXqD
zo}7Uq<9V%y$-`VSmrJA3hViIje8w=DSMYpzm^;knas>pq<P7dGo;ytD@*sX&J}f!v
z#o&!o_;=gWp#lQiQusG0b7bzkfPifJ5i5&Rk&mY70hTlyrDQK7P2vvW%Xfe(<^JSm
zqq_zg%Umw8i+o=@zCxeb3Mb{WSF5gBrxYk3Q5QZ{3bN2$5_z*9oNx^TSA*LM3CaA&
zygu{>4tgG3xiEF*4InEvz7%T#_}T5n(X1_iaJxOY5UwSVY^RM2VkTgAKXe8Ri_e>B
z7DIhomO<L7V=j!iU8#&cJ(K58v<`&GT>hW|Ui~3)hLCw4AY{9wHQGHq1UTTC`CCR>
z4!-CX8@kM^ThFak%?X36d}Tmp4VU8h-C6<VZdf?{*iLC`UALwX`Svd8aI>d4)K?f}
zaR|tglG1=e|N5#I2k4~#Te;k+fQ;Aw6j-Ja>SQ`fTo`OzS~JVW`i2%gc&^duaJ2ZQ
zD2>T-GyipfkEhp4_17rE2y;qd1+xT8ATXKn6iwW+onTn_QlF7JZa-MbkJd3}c~}?x
z@oQe_qoqwFwb*x?45X1BGx<aPH9K?<;JDL8u5A;SwZUIsg=RR06WY!>A{_wk<ZW+*
zV&Y37|H9Y|!t8}J$P0iV;k#6LpoB+DjjU~<sta;RwA~m#(Myv;UiHanjD9gx4Y{=F
zxLF^eY~yt!U5WaA@_-;jDf*Hna3ft2*>UBOA0X-b8LgFwv11ywOe`lr*pG0t(ja@g
zjynY&V+UgBF}dt9Ky6Z4=LFZ?vGtVq4qW|(bW(e;G2tTgK`>ybI%=(JQnS@G{uXA&
zqqnY@yS148vzmLmSxtw5sc$zt_=I3+SzIAaC5gsFm_=rM&Tg}$II=4hsh1kCXv5!S
zlnW~c#N9T91)mW7a@u}&NTF?H5lZ{8hL{?gEQoYgA=P8$o9>`tFK#7aRwZ{i0V(18
zEmed9v@6H5`kJl+l!C~(5%X8Eo^s{M_WSZM5@PQpVfqUSBP`oX<h?>}lFwTGmV%kz
z7q8}?EPwt8vaR1T47xzI_&8QMlK90_$3OuY1;yhpR)6u)18q}CR((yVpwq;nh8IpK
ziaj$;iaUXRtq`qbc5kC+U&2^a#-02&Ot_{wWn$BC6#o00J;gD3X6Wgi28kep!qbab
z>*6(a8J76#E-Hy|BiL)UQX1(#v$g4L@r3E&2{Rk<x{4OhF=`~NS}jd)1{%36H5jhz
z1eiHo3zsZRKHIAfZ!3g_v5Y@tS)RI5v>Z>e?;w?0Y*`YrWj+AWX}FY>&b+Q_iIcJK
ze!fSqXqhL1%mxut9JQhV$xnIqtUXU76i}tAg`lF>5?@SPY9db36p|xcK67tI$tow~
z#b9?Aj)nzD2BTfqsfq7REaQl4&lJQE6Qqi6qmSQXMAtu$y*URQnQb;?!SnhSwifiO
zObu?IE`!;475s?8IXv!wEYdGUMrMCD6^@RSAKL@Ra<>LSpUC9fUOgwbfYfDy=Q$8N
zVX3UCV?XzGmI>4n`ewar!8u>)KP&sh5Nkv|6=R#S2rg?Z5wwl2<9=Qr9z-8{&i0I8
zbzu7^1uq-H!hV<QGHwxOmnD_@%2NIAMVHGlj9P?Od37o3+3C=&D@1vjb8`C=nvYa7
z%91g;xloN<6p$H=kH`4RN?e~j5IiC;)f2p(vKMY;{fB(WsTS%ef==f*^vv_Z6MTDQ
z8`Ak#6-Jobc<F(wOwr{dvdF7Y4T=e_^jFzIUQKKCh5ANuJoxb}WP3jXIQ^@T<CYbY
zJ_wQL*GTsrfH~=`-LsggKb7l78>T-df6aq<2)NNJMkf8dSPRk>xl=UYmd-MhrWTqc
zU|<cUQ7IT1ZH6Ck^KH;?rNI(+uYbUN3>}Z3{YqEES=qr(<y$t4b4%pGN8kGbBSs5#
zxeSWzID=ynCbI!iyq8+S#lrP|B5i;h55)XC6`EN2Vk-?Vjx-_c?uQ4|Oi~F4%lq*W
z6djMnGEq>GdwmoC1AQ%RDHQK-n0)@%y#aC51^w~c+sA+#uEPEiEc^f~P@A3Um20pa
zr(Y^qy&V@UEv4ZMjwVxSCD6Oqn=ndaX6c|lue8REzxObsr{d}muz}6$I4cTK0eMAj
zZn`UaeSKlTs53FZ3b=SbNEc2N{i+xy(q@Fz+X->=#CH2s8A6KTIIBQdb^ZEi{%GXt
zSc9b|4@iRzr(<OJJpViGv$3+w@hl>pHL?<;jl~SA!%q)@&L{o4z6|=v?No<THYC64
zFi`ax@=@eZ?Y|FRU8!A3pyx_53m)XTOSr3pkG?|!#M#^+e~vLL`V6eFg2#qzR*Ye<
zIj)NnYj!8bM-B8rru7R+BTzLfCg}%((x&_lMmn%zhNA$ZM7{gPz4Iqb8$wiHy-0qo
zmln#S2O2gsAQ>J~EBdVUX`JJRrgbPuBbD}p-D)G;_a85ysJouEFD%+1T0z)<X}-ir
z<cz_<%Q}THC3~Lp35}=F=+%&~dCOukp{Af6-s-rc>Nr1rd_G}3x*F?!ul64-aF-!p
zUr2+BPV-hcy)I0D(P$g#1zjNz^OWodq&4n*7YMiu<|IFdeTmoVboAYayT}mbQFM$0
z^gWqvmd)B71#~e1Y@~|6T#FR-3D&kXwF}ej`IK!J=G+Q<A9UU>@i9gNdRK@~;{Szw
zerC|rg0Qmz?vKsByb4au#P~)D-rf9bf|Z(i;z1f_cLyV21uCZs`Y<nn(E2r__#f0^
z_ofBrBF9N^#=yZm=!}=#egBnY@FkL#59_EMI6BM*QhQd8ULLa@ci3+q?#F|dlK#DQ
zIm!X=jgU&t;8kamN}wv$yZ5FDiyr_yBaBv;jtz&Y+SeRZnlGU@|6#)4BwY!_h=GTz
zgWu#>-PbXnbY!SgBTfNw&b-L4TOsvpuP-s;|K3B2iTg`Wwi(;U1ZJWbhVbDJX+O9`
zAL6EOGiRo0xtLw#T7-gX9NU(q{JDekIwWX7`*Y-#$g@I-k@?GfG3hWznY+s;!WJGu
zc6jf@EnP@)KdFJUda6X7@o*s(M<IAoYJ63UR?71MuY<VFp!6FU_`^%UHWl-0_ETH0
zpLnqQ3XsmsZ^lf0<4quEgeEo~?SUT8mr)9FN&7>}x{}@#T_zV<pS`IP*F$lq0%619
z7ABD6kA)G6g`l!>hshIPbG`UeauxTFWw)8N%`J4G1^I60g@6l#cKpYC#)d9cjqf9^
zvt3x;iFYXL#VGUEo8H}Pt#A2~Ng+y8d+3xXkAd|sQ*9L+kfAj75*JmxIvtYkARhUB
z#~ARzRftT&u=<LxFc(9*iuV{|C!%ltSm(Fi4Xyq<9nqgFf|tzZCC(+B)-1zzY2<c!
zu-lZRV-NGUM|!!d*4ea<g$>r!aLM!3k&r%4=4by2zFm~|L);8Jx?X=H&1JR@AOeHV
zw3h@A5;S<OdH@$9cxqdDPG@O!d%<L9T!GUM0I0G$GZ|i~dd>a-uGCe8yhx}SACjep
zrwbv(EkQNM%xR!4Ap7Q1kdW*gLssn%-PN`Ujw)1N(GMJA=z#4q)P8CvLP@=cxj%D!
zZ6<YJPkgg)u-uYMr!mr=eN-Rx!Mh{ubhXyQC6W&Kb`x4<{0RGl<xI0fQWECJWXH6F
zQ>M_IDYch3>)ko~wdbq`trUdF+lpp3Rde*{7YYd8a2)-5eXN&%ZNt4=n;{_Uw}{=H
zf2`<#iuYgkSO49z{J)TWER*nwgN4d5bTb><DRF!Dw70i+5V3IFa)vREK<L=A1$z)H
zjWllAitOvyiCab306)L2_B|8b4v&QYeVg}m&-FXw*D|8ynsqqRTdx4_wsx}*AR%m=
z9&Y`h@LxBAsk5&Rd-ZXgn}=#%RhXeWMl}1}clrIMIHw$l;^b2ts%lQQE_6O)-03gQ
zJhx_mOe29x9aP^g2jCQ9Ag);Rgt;C-cL`Qu9t#~RkN2JuKNq_y)a(gq>Q#QTx*(m_
z086bj#4JvzE1<>Ye1ZffKOffNC?T2$1iJtKIuv-yOCf$$-+$WL{UdFnV^CbqOGIk1
zX7(rd7h_Fz)XmF3oWJ!DUE)8ZxjK7OPg7U9SJ#KJ>kX*J3s3ebQ+uM;v$-B3p(`u3
zLgM4K9`P5r3+TC6BD!mm`w{(>Wvz}|HPMZcty1|74=Phao6K7;2g+Of19fq!gHdF2
z|4L6ZBLPLZ$O0ME%RXkGOzOn+=MVK2&nM0nk7N$CQ2R;~8m3X3{DSE5VJcOU&sReQ
z^Kw}Olb$nZC6E*22Bpn#@CdaY>7$S9LNyH4=RK~2v)UxZ{A+0Lc-&cP2(eqVL!iN_
zuKuhRC3<c~SsGdO(I2?E9=;cSKQTis*YO7T+NM*--DVAyRHI#|cDhBa3-sSL$r&6D
z+k*6&_|6dGjY;Vv-S!)+Z0&n2QB3q%ziZ>e9%EBnkx2+I2T<lNdhNjLNjyvY)@7`N
zyBGb+e_Nwz_c^1OsIIL^225tIqs9_so-I6}MLeYFaSrJ6?OMz(4ziT@$cuB*>{MMl
z{y6Sc`DMXsEu)_e);{LAkYm@TUl|JCdJ|Ne8@cPOV99YmaB&dyi#s}ssL&V<%;eZo
zCH&cR3CZzH`bc&~Cqem*i6*DT6P)@q*1pX$c2rItd1cpAW9a&_*3YA(Aw7&%Hry7d
z>|gavrnv<g#!FGdeaaG?-!3xe8J98j0RV8TAL^Mr5X(rE^kO?Qvferjsr0*WV-cXH
z?=#zz^WM(v9l9o1O><VG*(=BH6S-MnECTgB6gVewZWruJfA_K3i5dyHcb*mwhXTnU
z17a>(;K!{LtxoCP_v(Iz03*7;M-0l$C#p_MHIpiU5&1}&A?eptCM;s*BH<<Yc!Hrr
zXkfOoPHKQTvYEaNf7^qd6%i+I{-$EPDjlhDRzGE~zUNjBsLR1-&NM4~N!QkYSLE;~
z*TgJH%jk(GZ(<b74!cEd*L^e1?u59ZpJOkIzuHoX;%F|jdg6AjigsAV1aQ_eHd9wy
z7!7xCa;6=}3mUi{>w4C27N#-FWnv08|MJx1&(QemS;&8lA|E)d6Ls!pleR*@B7{jl
zgLY4+hhkunFtc*b)5M=2-wgr4<NfG~2<hd<#zG6=aY?L0uczX{olv>bw6Tl5>^+&n
zpiQ*3^vc(g=b%r1NBi$%LKHx|`u89v)m~cy-|t(X3)jd}NF5fjWUNp1oe<(dj8BK&
zEL$M}EJ6%XubA3vC5uEvz}7R)ctPbZv2WkG<q@p64JtQUYaZLa?gs-U^)*~JT_6n|
nPWUz5{)>wL(}CG-E~MR0Z)vf}+=6#nCve32xYdh8=Mw$~TNO>A

diff --git a/resistant_lines_files/figure-html/unnamed-chunk-11-1.png b/resistant_lines_files/figure-html/unnamed-chunk-11-1.png
index a7a0c06757263b57bda5f77de0f7e365b61a71b3..38d5d42b0714017caf3a18edfec17502465ef6c3 100644
GIT binary patch
literal 11921
zcmeHtc|27A+xN^E8CwR4N{oFcOCd2sgd!@EWGPEzOWD`4lq^{yLd+=H#!}W~OH?Cd
zr>w=;cVVnE_nD#Z?|0wN^XL7%p8I*dp7T16*L*(bT-WuvKG*fWmUAKuFKaV19A^N5
zK+L*2npZ&}C>jKUpkOp05a`q8g-PIFqoJOWmOkZh(btdBcX82o0j@axm>B&SJTOEV
zpd2wSF~Es)0S0k67aSo5xZ4Fdslze27#uzZ7{uda@W7Rvnwt9N%^RGHJ}$-u7ZXEy
z0*A-pfs=qE04KSwt_~lgkB@P|<A8^NVFI2&#*@i|gM$Q|3jr5Hzyl|afTzw7fP)Oo
z6UbyT2t>xmkO??40Z#@-DGyPGB{MVTf#uNO*D-wv0-X$}{DEU9R%}5a1V~p?-N^gp
zLb{`Mk5Xc`f!ncrX~BG%;TAepp2<SAEpLuLp3xN#?je(n9k;~$+e##7rZ;Qa!xyuj
z6bfu@ikUuh9)N&A>`f;@Ae7Aizy9}V0DL3iGcTF+*{yV^a_tvxuVG2v*MFf>Y&rNn
z4X|gbV2*QMgG`XI$JC$IkXM|S)6`Kza4*1&t(?WC`iVkY-@uTIOm1`_6sWIOt$jGf
zk<*?NCMru25IoI@-`#F<M8Xa4JbB$QXzQ1#SZ8Srx-k#4?`D`L?eJ=@tp!*=pCyJD
zlkx%`r5+Gt>{oU_95r0o8arREo?K9`mZHyTFiKQhSYnM1RbnVVyp+F34+`>xmfeFI
zO}`%NOeQV$Vk(d3(Y@m(6Wzcb<3kfmZP_Y*&~Zf4)j@Z+r4`8ikUDhq5eo%mPhy4W
zYT-m%MX8QNa*(n(!Y^Y%t8!+Mr$On-o1P6bS`#Y-tO8A%>+V`@drh1acQEych(!9W
zRc(@o&F*P--)M4=Z^fKsjoV6?niQX#@^S4RRt<538@$6+OhrkYf}?9aP`0i%-4`>L
z!<);DyY=(dJ595;Rl2RuN@87%@-{yXxO>G~aW`F?&t3qJo6$h6v{6z06FGe_>)!q|
z+3#Gta|>?I*ahgJPCjb!9GdVQr~47^9VvDA)s~vrVd<ieD9|=Br1oC5YN1M`k>AyO
zxo^AcNlTuW3(9l~6SvzhGfejfk+cH>Oc?E{jEolZN!uSexM1q?hup~yx-6FcyaO~%
z>%YF|&+r?UP8On%e|`DlaXopZ<XBe)w5(eD)Zshgl{JSNfoC)oVa|`;GQ5zBFg)y@
zt9Z*Sftxd~R^ALnRdDu$7ROV!f`d^vO0Cka)A}_k3L!^4>h3RrjcfD54aj@sT`yOr
zeL0NZR#8cYsWR8Q2saeGOINEWjaKJt6Vwisx%A7CM%d$O0p4Tco1Rsh_3t4x!Eb4e
zax?4B`c{`Jbv(Q9Cf@UC!B(}MMqs(TjNLH@Ys-*@1;8lYGf2k_)u(5+GkoeWqYp5X
zQBlCCZQda_<nIA;4xdFl%rs`qwb*#*RUv@*qaJk9(3P?Q*H=?{q}^x_ed?&^cwGgP
zS2L}V4qKfQcn*;rKfmBRDYEyx15-K3+jepK0ZV%^PN=7CEu{*Id;GGksKCM7k4ob~
z>GTow%o=TvMVNDe?%UN-li{Te)a4y7^7UA4FZoUKp8`|*;oJ24D!5*v%LZuc)cg?h
zDDZ&iBwoMI_}uo}@<Wg6OoIA>QRmH9Df~M>iimj^q6Zu{Nfg5@wm%m^1GUyh4eR~b
z%Sq2!-}S%Sa}|le2l8}u`SNu1-71%A!+1PgLs}%Md?<2doI69+%a4m+5|luOEbpGz
z?4;9z4C&lBcC901RX}CuCEvKby?+w)aZ^*XwSfi%*#79$gq#cr?eatg1VUT<zjH+&
zg2ew)E6Mxqvh<T}%3kZ|ocFT|LhtkWy`_i1QRBa8otBi?rdF?c)-*7&k;6KNM^IJ2
zsK{n1DE1RlyQN<Q>u%d79e?>brX0P9+`GcH`nyzSfzDOMt<Eh%zz`w+bH#wySqfKJ
z*NitsjV3>J%IL@Js)eH2+#YrzXK!9N3rL86hd$HiF_y3wi@?5M+SE30xrcL=TjhwG
zSva?SYj^q2OZ%0~U8jY~bm<s)u)PfmIcB!8Xx>?E;oiRy3M+O!mmMQCC4to+T#^+)
z_Qp#1E_)bp^FcZrCbZQ5v|xk6DxDs>)o-?VF#cSB`jzB#T_*mPC!8-I0lDc>n?5L{
zS~rp;EKXkH(SCxu6@Sjh%{061^XG{-TMKW4CgmCJ%$ut{b3eC+D6i>c3tcrhWmMGr
zKCjO)kvwooFnsk7N1T@1>Fbd>o8$yHH|Sx4;44~px0Sa0Za)5-ch5k?Wftp=`ZtPH
zXX%r<Udvp`=APc;X_ijrG%?BX70vNG70}>La$vF%>5?Td<Ze#-J|vdp&U6!FsI;EZ
z8s)TA@~_7nMz&u-Ip(W$O%9MA4W6l6KY8?%S`N#auKN7C&PIjw85yX1S-4zJ=nUhR
z)mSmN!An`M@$823+-2FHG3%ZFlkQ@|TMD|m31_s%m{`b(FqfYiD(f#V_&Fn^?*_2I
zZrexO=&=yI-M%s@^qfDoP0X<JC5bWH2t6BDii3hVPGZHaulEs~QDb`CX(ktv6=O*8
zlGtoy?Lw73x~R??`rsFvZEm=1K3xg#giEYVawgBWkM%^_*P19I?gNdDZ)=oEza882
z$J^iG9b5x7ZtJl&V2^HGZAwgc*<SJ$$WKm<4jz19T(yQ$#g?pk^bRo%!Cf@1Ao{B=
zIw(K$Q-z3;#g}R(UIsP&XI%v2_`?O3w{(Bpu(bHj*iyhK>J`il-zV@L!Z03#U^-pP
zvU8f4J-;#Uk<gZNI7MJnLHAP13*i&DOzy*6OwG=w{k}3CXz81X`eOO&{jN%s&|!It
zw{)rfD=gZqE;(LP;k(!D;v08q?HagcEr*1|U)(iFIHiRehn4_Ve~+ul0DV3reORH!
zv}Aj_qde*Sq!S<FuC$EIw=5eAWKvi>Bp=^=l3lvtV(=|<A4|w#i#y+)`0m6@tnL1C
z=Y$@4k!Ecf8Qv0(uDL&}eoS3y9kmg{eKd|$M-0)fzMQG<nQSIYfK89DG)q@@o^Qy}
zz2kD>@F4~lQzZDxR((XWRRUe60plkv6niq5NlKne|2yR75)=8xxLRM>k7lJ$P`RKl
z+u9FWE~nC_DZx~IjtAQFjiG}ou5oHCawxrB9k|V6k;c4my6JMHrcZ~T#ixam6hGJG
zL(HF91>=4`lpjDoGxHoci@gF-etTHdp2Y_Fty%S1{EbVY0bX#qm!8Gojd!EXVs{Ca
zmc$IW0vvE2yV&p`!OHop=N;CZ{ELiyl!sdLRM}$LM5MObOi+#`Vt)vpKLdWb&qxEi
z5gs0>SvlY2*KmPeunI0r)VZ2ah@PKnSA-0VWGL2uP}OB9wQ5w_xhq|2^=av`m(-~)
z5)H!oXlo$JUjn<Z$MQ!Z2FQHeq6JWh@AxBeeq_Mi?(uA>e4PSMyd__mxGRB0pit+d
z-;+|GqV4uHo0v9``Tj5+d9}uNjuNvC*K_P=IT47@n>*UREn|gTRUq)pXG`QZ6_&u@
zJln{ip7Mf<ZDATn*Ed0OuA`~*y8a>P5vD5%oIH)lKPj|-K&4jk-@?%$d}6Ntk1>2$
zO`VHb%@gNQ4e&%oi)2f<AwN{8Yi*SeA@rkCRR07?th29VU^a~jrbAnsRz~v|?GOl#
z`I?=8?Zf2<{I04Kv32w~jC0vv0Z>c5E$SoCoI>03Ud3Z@!&7n@HC*J`iOkjV^tcza
zQATReBhk@+>~?X<;ebSA@oxN&WOyMA7ryvhW1O~I9=7}r$hCr3ivN_%0?xzw5O<*D
zwSS3|+`HD_Y~mTKVMfJYK%!d~BSTEJI{`-q4iqwj?J>xmD=w@{>b*W{gF=b_NDCx-
zn>K#mU>9I}Ow|*>E`jsw-uTW3ac2=hy9WN}EMQuJ(Hdm}W<_Q`49ynr%C99#5v$0j
zG>Axh(%W_mzsiU8CZy_I0mPpC9$Z~7N#>&2nm0ZW1e@~k*J5!-&^hL;gSB_mD7zEI
zpb9+H?ND$$JhFEf{8Sr=C17ydF-|fHC2bFc5CqoBM$yM@{<n38Dxx(+h`(Ah(v+g5
zq1DOhMixHo3JOKtym-?Q?x0ORfFMlt>K431PkDXWxPa#PQ|gjZMRIn>tJr++at6BT
zYV9+Lf8B^YZ9xoKm~U{Df49%<m>hw(zWTS9=da3iqcX}Kb?Chv*;C8KNM+C|96d0d
z@6C)m!%Nbnlv{Nb>}&_t(;$vr9A0|2O9Orbfu!msru$+qplZG9a{x_6(m@qcL{-*N
zEe?0;eU+1fw(T8$9@<|yU4e;A&Pr@*l5+=jLmndVxMc0jH?}AC`E%z&-K{MG7{JQ+
z$rWaF>t7sz5ZJ~Avp>p3^JXn}IcYE85ZD$1SoEZW_c-SMQXsFm<pzCK=1bZz)3?pg
zftkG=WF(W%=KLjM=Ww-9=O+@uhC3MI7GjK2oY*vY?^Vz8T*eILXtGpB(PcX&#<x}W
z{27it8dUX}RT!?Q^e216;KQmdqrDbOUCbZ^5@{6p1yZupY_OsBVEa%)K<fJhr;S=I
z_m+|RH(&e5&#;=0zHBx@*<qJEr^doDQ(Cc8=XW}jXW4U#PYF3Bj37(QD)6sG1QZW$
zOsg2R7S?a!jk-jfO>6OA{Uiir2{tUDK{l06@i$!;EshRP=Pa53y&bnGH|J>@nbUE(
zm;D~{ShRp9qN?#X?@y^}N}PPYEC2P9Z0CAgia)K*759{<F0<rglAP($0{0Qeo-Hm$
z@w_tgw0$alI575f&<p-kk961!y{`1l@uo)tcZl3hsnMCn{A>+LVch(Tb1cmceJnH4
z%?K;CN}#Xl9yoVG!ffdJgH{WaST(Yg)o>-C&mGerQ+n*h<5=T5DEKtJ^`*P=%e|jF
z-0bjaS;>~AtZ|QKm~1PtG=Nofq>mJT(0%)oHjyXeH-^nYYH(z)T;Bb?XWC^B6H8fw
z3}PIUpLXs7%7dGarupy%@)O6O){qA+0zT^;=QkkY+Dy2tV6@YV?D~6I<&w}uu`0&t
z#h3G}=V7_Q{m4=W)BeG$Q&&gl@wZTulik{F3R;t;R=U4?W9O5~zXTM}zw6d1a_u8X
zVfl@xeX6fA&7p59?aHT_z8$ocCysn~WePEUt21#|3LCrUaVMoX?D7jm$vw<ZST6T<
z{{ZLF$#XF1k-XiPv}Gf@v8_wAmy#6q8UZcDHD?^n;j@Q{-rPFInEQUrw<BmZbF%t(
zwO7473(^Gd@^kQy-R0JW2G6d!G}$eN>5rRMf1V%$+G$Eg_A){Pn=0r3i3Gza?|?r-
zmf*tX><94!BK)39f$acJJD6%y{NX19KG5S@W#If$G=~0U!p87Y%H~})sktYBn+uqM
ze-^ux9DQrIdp-KekEOt=m^XK%rRE~{=V)&OG3X7tsOX!QrKW_<ldaYeA2emT0Mb8^
z#-@cW1tLMvL>SCo?uzGZLjlyNcKZnA4j8a@HK<_7C)5yWMm{acLz4<05x+`&*Zq3D
z>SOPm*=J7!VQa8mpPk4BJn*yA%|2GDe+ve0_byf43UZ$6E-9jd3<7N9Ml`{sloiNR
zqlhS1r!eQeJ<%66c+S=kEpZC47K{(L2OS~k*Bzi6>&*L#WJ`usVM_#-B5+E==(0gG
z(@oDK`y?FYxC4veqa^~JR18s0C=3F0dV`7}hF@%Oyem>F$Eorp${gF#_HK#UM_O8e
zHNvN&pd)$~1jfHWKkqioOS%%LxCH_43)3;~Yqe>rK0;swHs2p6dg%cVNsM){Bx4^l
zxtm9jcg*@Y_sP>O%pqH4wsy1)TOO-ZHDw#T4&i4d#dntk?<1VDq4!kwtL<QwjN4gd
zPNMrlp4t`RJWDnT8wuh%#h3(Z4bd0=c3BlJfG|TI@h9I#quIb<>QEdXHl5V|4$JY6
zb~fFP7+!w@lS5E-@q`y98bqZDS5YAaqaW<=*GedlA!%R#fe7sGzMdLBO8$s$ki3xv
zL@z7oO*(f4J6fLv8Mq;JKo4%%{$H89r6!IXTQjhL(aUq~vr8XP+4!Ths(tZg=Kk`A
zj1(~pe`22`F-K5i&z%cRjfxwr9VLFdYJSV*I}3}$&+J#`qXsM3<|H7nC!Coi%H&YJ
z&?NwQjbk6KBzJ#-%t_F|M7h)w7_E0-Tdnd76D3NZWiy9{N8UR<Juq6Xpj)v>f5}!-
zBfl9+i~N<XV@dv%_UGRI_J@NPMbKz!+_qkGJ2}P6?86?*JHcTxmwLK$-0@H7N*81J
z0w2|soODi-#F{_Y65mUlJ-aqv!(o`2{yBX1>!5Ant8RRLF#>^**4z=9OB&9ZUY4{l
z3+?#Kal`s#i&jpYv86f+rH9`z_%7v#ULV^kS7of=^X=Ll{N})Q^LhX+82s+kgG~`+
ziSy6UUAf`(I`lv=<}|cPmjo$Ej(vXZn1G$ZL;Vvgq~;1+11oxb(sw(nBR7Arc{td}
zU`JME<^56%(L*AfyK58`h~I%y0$SMMOy`7k2rc2~9$=(bR*o3bQZT8Nw#QO!(!18>
zGpi(=?p7>rX(BnKCV~N)Xit9qtsQ9Bw0y0QsI<kIb7w+QzE5ZcZ>jGt8|Yq;@{8NJ
zQ=4YZDS$90NMeU4tc4%lI{MVqEsWmgZ1S5RX=&*R0K;s$OSF}wfE2{`{CCKJxtd+c
zY;&{J#u$tp@6JH>mv8-y+$x)AJwzMkf%1tfM|&p4rquWVbs#=JXX)fP<+iir``T<z
z0Ax5>5cWMD0MTmyf@wA>QbGNX3}y4kiDzfhgYw-FTZFC>fwyw>L@F!sceG_CcE9OL
z9^c;j5z+kUBI;34ojyD+q&X^gt^V76#d9Y@>>4VnN6pH-J)ASLb<aB_WTK;k5C}ET
z3+ywUch9jrp?wDtFUg)!Djr@H761<?0$#B>U6}WkoplQ?fhFa<nv|B#-Vu>0aWM7T
zPFYjTpiigOptbpcdX^Mxye$TGZ$7DupiFwo(Yt=eL-HWc$^*+^lEgXrHBfT<u0(&T
zC1}7*c2ZqfDvb$%g2zT+-J2*RW+MEgPnpwMibFnw+C1I4!G1?%9L9x5XbW?O3<qQa
z8*6!r@o1jEF64vx8Dwe>v}%YWDH#1}c<&9ub(I!C-#S6?b4FH6OOuwbx6Y!D!9;&i
zwze5)v0mK*XnsIRNzYAf86+qlCMUkFbh<;~^$J>6tLn;Ag0SBD;k4H{Qj$jz6VKMM
zK??Ud{<YDBtn`KTRNPAI<ZmQhho=UmT~Wf>A$X(P?mOv<7xgy+d!yA9xqVrOifl)s
zNdygV@_&NqVsnADe~0PYm5$MKGXH`QSgY@56$AoNN25Qz{)n9YONyIzyYnv(RO@_i
z%XxbhzWtH_K42naIlCPDf&D5KJ!u<ie79z22P>nVkglBaiI+Jj6QF;_iZxJI!ZH8C
zK@Gz?@8#KVn<66*|9uor=xuq0Mx)>eEF9{yULsnS9=9Jgpchc`e(N)!fxmKvMKPNH
zYxRhp;y_G0P>LMr2Y5cQ+tS3u&9b)OpKXJQf_ibuj9@J(t$!kf{n_=|^MtnOU@8RZ
zUuYh-3_u{@P?){A_}=TqupVlV>h4%xe)rG9I|R$NwTJ2RfG!gnosBjANAC*3bwQ_m
zWUZ-20>fj{Ni3^&U-sjo|IZU7^^sOCYRVrcaxWYsLFI#I8U9DX2$`~-e+c^<F7d{T
z5SB{mEYmPcqgPu_ggXoMnLy!jbjz_#>?QXvi(p6Z!VQn2P_LEG>_#_76;xTq3t^cj
zBoKmKHm~M;Lb=LS&h9;`X--*9#j$q`w5do@!v#V+)vKPjeph3}rZrY*9a>fr=((Rd
z5Hxody_m>Gfbk9c+{WCUN_USWb&Su+`t1Yg<y+T_d3Fzxd+=xZq8N)lJNm)5iN{or
zmD8E7b3ma4=x%9f0sDhm@4(?S+Cg}2m7l45R7RcGU}(WM0|fFQGhlu7X)0$BGh!}m
z*H*gH30&x~a#xjZqjl!09u<YFI%<4P+p9;z;ocepkejBZ%QT_tZ5XXs0}*%}<K<$D
zF9fZT8xXmNt5GJ8ycb6}?)kVqC|!eS@KYl$OcXoWn*%qDa02hCy{5#5)5`kz^VGWQ
z<$JCTmQ~@0zLj@=U_MCdhEca%`O1zqg&*D=wNPuJZ!q-&t;adNcKU|y;yTAA0R5M4
zpW$3+;m^wm04jeyMDLnO6`U1lw(Nzub9Nkpj0yUI*SjZoN-pE-hsI!Rc>VQ7B4aDs
zgAk~pfzklTYA@aP{P4V^-qTsxd-IDrG$Zb-OoQABnyXrqklE2jr@B5KAfZOK4`)m7
zI^LCH4-Puaw;Wb>fIvC$8<xj_EI8foMSokq?6^>PV5!%F_!8HJO}Ye5A8Yz)&!4;Y
zzCWbB9^F1Fd38&f(VoaN$sd|3gX0gqwP?3dU_OQEQjam?b6vIb;v1Wr%a>W`0*9dQ
zJjaxxJ(q4v`?fswpwt|VGI4c5w}`<t%_sbr0IKHJ)$VWjus0|<Ho#r+x~mU|+w|Kh
z4C|q;u#XpJm^DT-6iaQyrmi*cP`TRqeNvblqJ=6%1GDWR!{k#2<KCOIyp>OB`%Dfg
zGv;O?y*e-6wO{{|Xa?iM-Yz>$Nq1==XWz~+Llwd*E>Li<)fgx!EP}Cg3eo!mC{%dG
zDjQr_#*S$}?K?TZ067k%o{@BH4su|xZ>Jb5)~g}s4}9wrG|}dyVF2BQao*y9)|1YK
zuK+iV6U1stWJ=6^M2d9wNm39+7jp4|%nyAZVxEWM?zCzy%B-4_aS76k&JHiH(|mQA
ztsec2>9%*|q67$0@bh+>ZSHX&R9p4vFmGKZx3fqVAp7}5^q4B^N=X1Q&mfxPMa>IY
z3gp#Ef}P1RYkJdtNOqo`=$aH+irYP+7ws~Wy-C*dS(iINg?0;60+#?ne%F7yEfgra
zDB#NkKolL&V37O^efayGHNM9n4>Si45a;4AO#ELAj%&~h`aQg4{SWLp&tO_+mIA*L
zKL1S?w-=*;0qwug)1jX`C=;hBe~1#Te8ImLWn?Hgv;YYS+C89>$Ot2?9I!K#!df*V
zw-06%C^Opof*49-JGLAC@>ypP^(NB!$XipAejJD4W{b=LsumlgxJW67pwJNPH56B1
zMq~vwTx4EFEw|eoEb=KNBryB+0u^mVkHB}?K?nN9pkHkPW-fn-(z!4Z!FuoU{v~?>
z)l2jB&S9j0s~r<1*%yN3kM70H6dR&Y2-r=iQQc0@xt$dGm&Y;>=&~A)^VWEZ!1qJQ
z<HO+7q=u+^jf3fFR=7niH`{Fy0?>naG7Y>}7}oY$O44N9Nw@~X6?2!tas$`>^uV`Q
z`OWG$i}Jkdb~?voa#XD-PInR7vq=YGFsc&;JLir!k7&Ez@&p4ViDfwY_?~7hV4ODJ
zC<!kniZ?KWQ#FHSLEAFlfXCnC2OULp4v2V8{qiC)PKT`{dx1DqUl??YUA4|d&FA-9
z7TtA@M~A>E6G$+{Dg@Kx{!2?i<7$9bCJNO%I|Xbr-BAq#{8(4ZbT$do@SsyHtWPn>
zP6ja)z)G7bV&j~#_^O~Ec{aFXd$JvHRC1I0G`(rsU2Epu0zSlLJ85hpu%lWVM^0i_
zeOq+;C8mJyAnYmM0#MW44=IJQC(S5c2Na#)H}fQf>w~GlUi}btl#@LhTu741CqelO
zviB867Lvc8(}Q`T6$PfN*9^QTq!7j^)W`54vpz|WqQ&)llRuWeR|7So6B><Xsj8gM
zK)1H##HOZ612q*h9KOs)Od96s7#N}-E%N?ycK^0dH#Y><rOV#3ojn0`+kn7s*4I<1
zH$n{Iix+0M&EY|z-hJZ~!j47Gsgs+-O-GqyH7V__q-MEUv8!;yvQ;7aTvPH8IoDqk
zo<Y}yz5y<$iSl94;dpk_Q~%8Ks0V@kufzrE@qs16(55JCQn||a;j$m2TWah#Ii5iY
z6?a~9YQIFGvnUgNpAa=10*r$6_7k2}E?-$i;MgK+uQUW|<o?E7SkKQ*lO8%vZQ?#g
zfH}-(L>hy7V+AfEv_Jm!8d`e$^J|lfwr(8cwc3Z=K<^uJ01cdi*wa9|O~-~&wun>*
zmIbs}gQ<%tD#(j&XuwXgSVJLz=fadB;uw+j*@0F}*Yc_lOjLTmeafee>I>N}AK&)L
z(pT8;>Yk55OX}T)F;1Hvv|-~Ra^{F+vlsDaIy?6J#3_&melaq34P(!X7s8qjs!ha!
zhXIqdQXG&-W1y+Y0;Cvs=6jA4m6yZv1l*cnP^Wcj>lk3-lH4}rxAS=Tx6&Obq+-9l
z4Tv+L(bV7HYppPR7NwJBZ@;e?Zg7gUVN^F<p-Y(OKyV$@;NYLhOi!2CPR)U)^ZRXC
zK+S&S#&b`{f8&B)jz2kqSN|u`x&k@Q3_XGas(l`vtY*!hd312Y0!oh;v2PUiD*9cS
z2d!NAvijeC^RLi~gTC@dy8Ty%6hr*md#0uNi#kBJJ@^2^fy(=@E?}@t?EgiY?8%(8
z!^MC*kh*y%A6;&*E90$M7<sVu<u=`?*)&;QHZh<h@lo;yLOQCf>cfZk?`sN>aUL3h
zu9o>bH6#MjwC-=lghoTIWVKb|aIT}$nhf^c&5twYgP`Cy0$2F8sH#LnmgTKx&z!r&
z_P@R%Jqi<LilFj}b5A8i>!w8ty9t&9A4?El#A9Z^a;R>ewc~vT2$V;?2{jO=UV*-D
z?mFeE8(UoYCgK}eMIf*47!4TAYr}|t_5QfT=WDy<=3M4SeTs?*#IMGAsL`$GKpLs5
zX)s#tELv7q1qOp<Qkz(nVa}aQbpMt;+6R;#i2Q<<F>KypGwBtLQCmo1f$3&2;4SS}
zn@slo#}@>q)!5W%O5HIY2FsP+{<l0*046GU;|W)+^3>C<S@G5E9phI(d79r$1YQP8
z!ycr>g`+j%1>=F#nkFJAf(csT^mAeB{`9qQp$KXd1hyIH*HS_BE&o=ff+S!{7~Qvz
z7YGu!BWWQJHNr@VA4HD$TJ5ZRVR<lGDR>|DiqL(Nmp4PZ&Eaqf0QJ;wv;>}0`#Irh
zmj8Ae_*jSGOO1$(W<7^>t^BSvwIs~}wl!;YN*Wt>%e;Anj9;yaU4TX63g|57S*V^@
ztzZxO^7v>aIetQ0=@&e%X)jh1v-9Ia>Azl|xgS5c;j0qiis$jPJpIgo9Vb)bYVBIv
zLdnj@+c015Av%ri4e+nnk2H&($#nrmKiV;_)JipQPr^I+e>Y28R!hE}@nvPX7x|l!
zpa$=%WB~<1dG1$MuPvxE6NBUG0zjJr%joLiH?A!A-m`?QEzo@A4W=7fkPh%OYz#nT
zx$=TYuyem$yk-VNk1x{j1?+&9wSR%VsxOW5^xWr#%?#3^kr0;mgXY^C*vC64ol!N=
zF01#);l-{>y3_wzCe_^E|ARyTfyyc0VS#G@+ppGD<TW~0RsRj!E(@3BwJ(b3C1Etu
z!qU%${0HdX{pKK3O33Qb#a%CGoX)UoL4>B{o9#cf_PEF?_Knq@X#YQx74*M4`+p-x
zrbyQ8<fxUwIw1+y)TA4`6YSx>aXQR35t`hOwo5Z(L`c=9@vb9f4(Hc?OyL}RKO@h$
zEk-$4*Sx#=i70VHUMFi(aZ;22vD}`lrBbXKCvx|kO!QuZm*R<~zB6D+i!{<s*Ay;C
zPo=xR)=%XuY0R<ZTUv=woe}fO$2ke3(>htV*dn?(m4o$nJZx`v64P4Bs_u>y48AT~
z*`B;vd8PQm<Z$fjiBkP|k83p!uvqBz!)#*7ny=QhE?f1UTpW}5h?~1<4kpXg*NB~Q
zu5&5i)qZ<VaUlBJPW9MML`Hh0kM;A#QFx>}|HLz$#F{45kx{jbHe)4n+klK~q_x8B
zk5+RSMaS;jm0u1Q4(te>vPbd16J`^Vk%f==T;ty1G;6Q<skiWE!}q%Y{|%W8%fSRr
z&%URF>_5N}J-a6^@n2bGqmjM5ds1thb89k1al&q*BqF>xfI&u^`P;ijukoVYpp^QB
zDgCsM86IE`oh%E(yi9`7<4h$`;NIu_rP-f-cH`?=6DKB4zn|K;KJsJ5fON)~nJq#w
zUeqT-{nVvnHFcG<7dG0{kb}nTfeA@=BR$Jb{*}m_niNJIK^Q)ibTyw<fpa&|=UNd~
z)UU2y%~#sWtkR*9Ynb?5%+(IU7NJ5R1%A(4znyPqT)7)olNa0hMFN^|rk$Mk$HfV%
zJkfRzShWbSYPYjqBRG@6$&E#2FM&X{hllzK&yRi$TAxf*ECoe0VJIqWevvk{duZ`P
zFDJ>Tn};9Mc-py3KBqZK8LjyZL1A@GOa(I{@zpn4ZE-Hb$C`I+eR|>H%{p0{IGsTz
zwuooRO7XF3U#smNjQj|9+;zhY{BCmq<NV`v4sB?@A_!f!R-KrfX!g10UOPDFj9H4Z
zQoXxj=G_#kc`vZ3)=EJ1I7$79NadErVydw~ulg$24vy!QVe*{p)@`JA<c_f23?hCO
zQ^ig(EAWynu6lFwsq*rqvRwT+m1POP4fpv~78Tc2x`AIlC<{dV16{$3mIUaw`6#^@
zLG_ob)~{~M!VJVUSzkytQBeOJs~ZE=NV&ePO_HSiMx4klJa1;+K?5C4Zu<|c^G@sl
zEy)FDHnB8K{uqsbcjfKR6$dRbB<(9}-R*T+WPj7T(2v$Tfg`^Pxk!lk5?#SNVjLh)
z1so1SvyL4Gfv}waldh<vC-N=tIa;*sg{d4z92LCE>_&%(I%7Tng?yyh{}nwbB&Ft5
zS>OI-<o;I(G*mMmu?Wg~$M5TJPUZx;#_0$(okS~qD=v67>Qq+;T0RtEq%j13@*1BK
ze(4qGkQ?YXBAyAjMX7Z;b0bh524ZVQ4T16Fo_TenOd4p-0Sy$-3s>o0`5Xk3PL>pu
z&@iy}^0{SIC<qZ>0q^h*#B|<?D3X7{Kz;6swXwfrp@$5Hjt|9u4EQw8!Kt<B(e^sd
zN=_$>ZR{|L%kI}Q^Wrb?HFbVt0E<7}Fp*Hy+qUObgI+^XM@rs1UtoUsm`4vBVRRl4
s<WBG5<3&9zydm_6_<R57zO^GE%ULwJ2P5fffhYme)w--%q+u2EA8=6xmjD0&

literal 10993
zcmdsdXH-+$({~aAgeIX#5rrsTK%^=~Y7RvOuM|<FNfYT9u1IeQ9f1o-5iSUcqM~#S
zMY@OxhzOTn1e9K+MS4k|lYsaBpS7MZ?|MGG?|QQiA!qhJduGqx^PAZ-=YgUAWj5wx
z%n%5KO;<<T2m*oQAP^XUpo2gl@AVg_!GBK;uim(*NBv;*^y2j}7(ER5ov#<)0^U>a
zsGoRDd_D%G<mY4ZC*#3>81TZxQ^_syAf*MoC>a?U&!0cf$LQt9(>k_H=1+nbrLL~7
zC0?&39@CN!cARXPq_j{d!^6Xq`IyQ4_{kRV0y}~&lt~JO0)bFk;wh8)l*twfNTT+o
zl7CCE21SQ3{h?!a9|AcMMg4;&Os(2OASj5gw#E(L$BS96cHNgsosL>5N#4@={p6F}
zw6_uCFulhq-~eSg74|BxFXj9-NG$8$F^qd9$9`9`<M)hlK?o47sZ0m4;f2E?w^1kv
zk`4;R@gWe94*&o`F~DFDStJq?9fE@Ztp6W%k%+FY4;GIZpKI&r;)h;FA|;}Vb1$}?
zoh!fzAP_u_F9t}O%ICkqVWH1gCiJeU?%oLA3ckrLD)gL4Cxt?pGH2F}+}{ilN#q0{
zjWE7e<BlGE%+pb<eVz^zjc`H=P8IjLK9G24WSaVVZ4nzYKJ)#v$)JE1AdciP9MoK@
znmwz$AQNi@Sm$4x$-1Bkm?zGK7FK(+hrrI89W^jue^ILt2R);42?!F36Xg4R$N1CC
z_UQXYlFy%!Wk<ppo|rTx*XN`A;mn_NxI2S|cQ6;}bXYWDLvma^K0>o04XQU8|D64V
zZeJF-laPq}q~Nj6W$fJqHb^ieFSGTYLJjqrCz><%tTlkNTN^Xi+|3vYna)6agJk?|
zWHQyD#vM88Ih5xN|Bx)9h54f2x36`F4dn0{)1-2^3}AT*7CIx+aTt9AGFnY0z1<LS
zjl`Co6d_czH&Fr_i;sS`M-e~`ez%OSN(?v_Y^ka?HN!mp<|uLjfAo|nA+x*jw*tuZ
zL1rgQ)`pAXiCl(dR@50k=QTWPh|m!Tl|DV8cN~dRkIPeha|(60g(+I`9why;2QovD
z4|nead~GpB^bxc`SeW2ICwdHkeB=laK6QTuf)XYOIjWvRKz^_=Ks^5MZS6}6FmV)T
zmx+RW*Ltn#_^m=Q$1MG>jGCIBAhK3baj}qr_0G_X-|Wkzr4!>{2u*o3U3kT)>z>^9
z`^XHMu-1_?H_T;NRm#Jw)7;fz4)|dAZyY0m`*xpKsC+zdIf>n_Lf3F(j~H8)QFe3m
z&ZGpPI5*49s%&h}Hw?#lFQ^AS?b2uNm;CTGP9ZFKJhrhIX?XS0o?VecVX7kkHuFoD
z#ecW=!g3#GbZ|PXWYta^J@2})vH8X;=*{AA!qb|X)pV6dkBe~%LDjj(ww=|BVnne9
zpBQZ?J~jF2Zl+zMh!qbO-N%wL7dWcg1QHqt3$g$YC5;p}`U}l2!$XxylG)ZH{UUi3
z&kjbS4dzyl?fu~3d)M|CZ7C9tJZ|R;g{_}B@O*x9@tky`H~e~!t9()B`my!;C3uq7
z&Nj0XFes4Ube+6?+gu%)C}2Mj`07HvZ{U`rEG$oD6Q5aE>l*8SiPz49*Zxa{ptbe=
zd%=Ew1rZ)K^u)92g;-@eHo7_4HRhLlQ~uc9-_5%4ls`T*!aQ==GNtWj)s**Y_@ITc
z<tHuI7p<#LOjuaq>3y1|*RE+CFV#5`FU2lRzvjeZUqBr!1e?db>;s#-w#M{Q;D|Y|
zXnncK&*#@ouKv86lqBW$=^eii`PH>s#OK~aN`Kb5qvIX@gpltC_*zqVS|(c690;#@
zJ`L0_BOIF1Wg!e9lNXLW(*W%0UOq_g{kD1M^dAoK?E-cJit*&XB?v`oLG=?)Im)N9
zP9-u{iP=fU=}IOx-dd{A+2D7561TToWD|#&#q=uR@_2r>4(GdYmhri&2ouh%-J6&f
zYKIN!7cYJGJf7=bf0eW42{N=CIC8#HI=uM^_A0WQyswO4=k*jknL{KQoWC(p5k8Np
zX<K<RK79I&<*n53sGY{t@b+)bZGN_c1iC4yM8<GrDZNL!t|K(!-eu%*7wkD`4iU3)
zTrN4^{luxut9O$gDa+(L{bAYg<gG(g*I-<N=5qOSQKmcoyiHSM7bR9@y6Ja;b!Bow
zGQy{8m>9Kp{qn=cJ$j-|{0;P1V^*e)Y!Tad+zX~j0GR8MiNQmf;ni=Qw_IB1iBUV|
zM;_i!z&);fd!abY$amkAQ-t~DNl~BAv!T7P%9^z$SiH9^Z#nXHT<UmlShpoYOr}3!
zUrhb6I*j!G6}>SN_~nt<dJk$0dqqE~giu##St5x=3PSg{x9+43&r+u?+t0;FceK9%
zj|=r|aA4OI;th|*IY`m*Svbi2^_aeNRDjGMx63N>A%0qG8Jz7a^53_JM27~4BbpuA
zkwO;H7sm0sl`JROIggw9E&jn!-1za!vGLRP1l2)5>-X)>ikqX-Y{%N7Mu$)T)}Oqe
zQ|T~MNSARsk+Ba-e>dd#w1;=>om1)w89%a6ZjnPoh6~NM!nxTGu|8!#BMA=!XKVF1
z$G;1;%d5Elw$>979i@pFf+>BT{>t;<at!g&-t<|5m+Z6n<jn3xUVTfSrV3qU)wP@|
z2S;@l1zl8YgiQ6tqzpHDxj;&wC}B5~xKxaBPrA+HcHEI7Vb61QyL+XG>5?)Q;`uq0
zZ45oeGD}{vSXYS8b*FfNwsNeocAv-x^^)GT9N)!xT%bH#BOWzGB0KrGcC2GLI-ib3
zr#EbiK2N|&Oq}2QN~m_Ae9!8v#Nk*cmW3AO+lu(W-#^BSg#zSV3u{^dz~Qe6q5Frw
zZ~is)&+i69dB5+nd&I|PGVJN}u_@{>=ExUsSNVf40S`L4b%@=Ufd)fvMXM2McnacT
zh#Wcyekc69@RgsDSeJs{f-;f_9rQ1onUjkUvaAWQ?^7l#{7z_X?br;y)4bjMtou1+
zB2&5aeCF#Nzvu(dM4?!IxYZuNBYMI0P@aYsU()TJzBao#i|Uhq9SCvh<Gu4i3sbMx
zI1E+K9eK7gCrq%pb6l|yS9E!k?4d6NZ4#aUnDOeca~c(!yR4KSw+m?)i)exKwy*X7
zEm<vU`!9vJzuzvP-r)T&k=R`J!{@Oh!}(^eQ+f=ra}5n^0ol8)Q?a!9&<jtr#y0Oy
zR9mK&2_%`7=unwY3MjH~JMKhgA;dVg8H~a~!DKxC%xuh+794sLczXvSCRoW}l(NRr
z+2!|bt~dlMPPhHI_mE-ddn)Y&#rIgtFUlLg*}3a*xf3)2%;nhC_d#Q{qpj8NADhsK
z7J6C>^Cj<O-h|q~&qVqU5~io#uslnrNyDR<P`8JK>M=quUJ-)Q3lrb^?M+1?oRkq_
zMmq?nC&vS}#TRfQ2LrZErejr2G?%m9D>^E_1|1iQ@Ed7%#UQqyXcOSLqI^}7ws57u
z$GwS7xxG=Qz4-1Jnkpp28%CFNb}DCrfa?bj+UV$8v2F(YtakiZD;!Du97^M_bpsf#
z9kbhJgg%Es+eOl5<%9`YwPV+xCE&(Ga1P18dzx43MOsKVlRBhsx|BD9J~9ON=$*~N
zlpI<1I`PB-e|V@{tt!)5`C;1wJrFoLy~@_lz&yS!HF}@u3CI=pOjEQ&cAk34n$m^-
z<hs!;08e2;i1EGeUP;BiU))!JRJSDHaeYz(1>ywP>@%tZztqy5hOe+5AqSgti#EE)
zPdCQliWXM!e+1MgJTJBYTuqkOPz0U18LBfMDelSNFV+vf-xhTgT1M7QtHVGGsm@mg
z1}YkD2W1;>l|EAEu|wY-l=(K<ZKL+GSNmv?ShlsEinf>EeGzM@F<nH5da6(zK2<V1
zVc!Iw>HawQeO$PnKV`OP@LasrRn^0ecXzxE<ekm264guX(kAQeu4#ek2mvUqTj}T+
z*+?M=OKx08_D;3`6-Zw?<W0oryRN1TIh$+lE9PvMAQd>te_Ik4#wYvBMJZjc&%UUt
zQA#exF{J2CUr}5XI!ecTqP>~aC^FK`tMamFu-C@(-kOiwbZqjs3mNdz#gxU;g!n1D
zRiX{kJ~7>_B##bD+Q>8Sz82>*)y)!ZRx$`zcXrKgN11=U=^<eSoXJGTau{w0^vUD<
z<B9xN8=J3KhvBMl{8t>$le&NF{DUVt^Vvvo6T%7T<@<!uV1#ApbtaD%mM7aNv52Xi
zYedTrxs+pfT-|5?SX9W$E2?p6u?AAH84e_FXxX-@=Kx~ovSquv2&&>jmx-199chC9
zhZ3e^a5-(Ko&1Xy?WYJ=TP=YK$EH6%Afa9@JC3sQ3p=LsMxQcI{KfLpe{0Q5QSafl
zgsIV;^_*%4#tHQ>rq>frQto||k_4~y(}DFyabAELC)w<?!~o4dbhyX8moNpPm8TP5
zz3}0jHB*)hMtg`lO|^opC6}%ApJG&dQettc<rVx3&GJYB6CR1>5hjTH`#+8(a2S@Z
zo#!zeobZ3MJFV4b(CEGy%qtj->9iy&I*vR}AC6rt1vf0|XeZr7*vQ$?AGPdGC7S_9
zcCJ|yea7-C?x_at7B4_QwPi|!L6;?~^Q}7@e@26b^mC=d!=;Y{M1V`>uw$5!QcLuP
z!N=wBc-{KV01>j8e!KE*&_r5p0*!^43@oPSM~@1hYOEc5{<EtjCBv(U8iE$$LQ7K2
zO3Z<@wDnQmzd8Bsl!!KhGAul2g5cb7v#=`tx0}0kD1tVMFgVGX70YQz1Wk<-N&}Qv
z1i8dgthd?K14aNK{?@5HIH78D_cYISV!SC0*qNm=3e$3y_SGLW^%MxxO!!%d_rm6_
z9qY}uS7s&!V9blqftsoAm$hlS^zk18T4`&<O*DguG%4Z`T0c}3S^jJWzD}~hVyF)2
z(zAsjpL*60dUaI06efIbb>GT$fXb^d(MI@`!5W1Z=;{BVO=BSD_+~v}CnM_su<Wmv
zQ?;9X09Jvm10YOzE7N4-j_XWj*(J-$_&t<9ge~D8UTVk5vPi}4P~0idnTB$#RjJGD
zxuGy5dYT^Wb-#ey*2T4t>wxvcANx7w4nYT_tIk$XUXqjQvE03Gd<U|yFbE)Dtt4b;
zu!Ym`a|)QtT8Nwu^9=s@w-ND42@QK~whW})_Pdcgd$u+_5*(jHsepMynD8W6u#Fh<
zwv`voO<g0_<%Oz#vY$jZ!?=hw((u_DN1|#x>=X0RzgVMbgSUp^NX;}P{V@2G9rlU3
zUl?FXQ9Op^g9TDWh+z-p;`<yb$>-2;Fh{2oojHCA|4v#~3s50z0Q?6!n0!@xejZ<A
znAC1_Fv^8OpUCBj79q)P)(9G3-EP&uyw7NH7lqR_#h#9fNpnB`l;FU=wL0B8He7#z
zwbJP76Zx-e!~x)q*m^=}hT69!Em>q|fA@<fKT>9Q19MwG9XLyTYs4AqqHrWv8-vXb
zDzh7-Q%;An%I;UGlS!{-X4qpf(9}hI2rjthOpK%b^1|+5=atI<@UROEP|^b}bGMr{
zzkZmo7@3&2Bud51nDj<{`n~u>{AF5?+fFCQuUe}d*xyPDC^xkct$^p=`sxZo?)nx-
zPh2+fI~sy}X1ItiaNS6J({P`JkwI8)yi;Caz2(VjIb{roacWjzJ&FbyP4P8V$G(K#
zjTyhV>3%lX*6E<tc6`Mk_>KjUon+nnb?~SmdWCoiNSc%;d?&s37q@%=!@0;dXB0iy
z_k)80b_|5ebIgTq52_U2@OFM7y>{7<vw&6_NNvqEzni>xqX$8S-f)$<oVI3emKNf+
z9SZYw{0xBs+!gzu=}W5vKfkV5Z@C-~BP|B=M`ykSO?U>M5<ChUvQYP~_pm6hYQL;r
z(F&dv*ERN64D>F^@1lYngH)P}E&(rE%z)jt<~*c_nVdq)WhvYH*LG+2_B1Ig_q7z{
zcM;9hC_@1}*X~c*8Q-YA;Qv8G-GeE!3vDg_XdEBtvcYkQ{(~|>wZ$9=0Ec<&2cGZv
zjnS0v=?S;qJ1hvzJ%*pk%<zgz?Nmx4;x^I}QuUrDTMrABr|Db1ruM))9M?ft_WXb|
zJp4ek8B8SNTq0rSY!2TqKfPqLJ@BwK;u7#2TlX267}6U1@&`F(Rj!6F#-U+p6I&6J
zTw&5XEEoH_q}34g8_2}t0XYwvhz2$6I`A@>c+Lyg3&kVjBEnG1esDW`{3v)e^Jlcj
z%cGr36?xNAUuJeirQf_V^YIp*6B=d8qQ63aLq0@KQpk1fI`gcivS>)l3x|=x*wfxk
zEwDmZS6OgbHaU;?)G1UJ%?=D<c~j{99KJSGa)w?cXb4*QI5|mz^%qj3q+gGlGS$#B
z;BtJM{8yt-v|nZ*+B9U>$@~Hv>trx(Q=QOj5qc||xeWlmXOqtzT41p*u&(*R$E2Mk
zo5o<s0An85|BohPu9waB`!#!a-+cIvKen2o7e{5Cid%C3!ff2u%(EZ_(*C5<(r`=5
zb;j-!zB?P%&4JO8?YFJSKOub>9S{~SZNM@joCYKY(bKeh23Sl}(z@MpWa$AS{m_>R
z-%J2i9%#!W0S1s_d@Ae5p6r8L?+^&-?M#bhcdY+`B11Tj+TK?j4uwF7sWR-@Egg>Z
zjjuDIR-lW9O0d@@g=x(t-dePCfFW|HFiqNRtNAONGcCN+cv)^$SF=Z&QhkbLy=pbd
zLbRb;v&KsWvN%1r*Vf>_9zmma_1l#F6yA3^=wIB@MBZ7jH%6flFc`B&Vqu!G?c$*j
z$Qv;8fxcW})9RDdybD4MF*8&CuZ*Zti+X9tg(=yBk;DVf5bD3PKsvY7*Y+Q72_k19
zod%1^i1`PR<?!C?C+`t$Xjt6o76<w@7FZ|>MW{?)OQ<}Y^tA2wDLeLmL@_g6|F_A;
z7`<_*{)~nqY<i8U%z-1?Ciat0Vt80-{*N?evlaE$OokT8w{Q^~JJ=A2P#kWrq);e8
z@fi(*{cK16SxHhu4fe)pB6?JHyLvZp^U18=@*f2sNqG>c9}X)wn)v*FIc#T@0csD0
zWqh`4?6_)mr+p-k58-ru@+=DGtWc@#7}uqyynpfQ<kgXxA!et==`2B-3!2mc&sGy7
z(&Hj_by++rpq;8$<7kfZ@$6=><5sRl8V=KOWw%Ck_)4xDyIOsQ2LlZeJ;t97`meB%
zo&WaIdUT>F*{4xsR>(buH~9-8za|C%^uOWNJVz22l1)rhh&Gu|eL)x*l-Sv3uQ)#|
zUVI9f$g<zp*6*M|KBm#nwr$-zatsWQ9`6l(390p*kC{8@GSb)Py%8*=^_@+LyVFI6
z1$~aMXWxDGyb~vUGPJv|4ct=g0MPq*uXWf+wW2=F#V=^BWDRyIk$N0q;5MuP!=1dp
zB?+Kl$qDVvUf<<TCLB!eg3u=Wy<{bogxjq3US>(r2UMqhJICcsSr1-AN`Xm#m)}*u
zm}}Nos6b?sl=mAJ%7(WsQeMopH>}<Jk)9yK@BE^EJ|Y_N^5mvKmn9$oKdrj~8)C~W
z&b@28Km8~H#b1fp2u3?Hxc$DQcp7G;xdiiH<9Eot%(VY|e{N%&qM-J7wryWt38F0O
z`W-34h+}#_zKrJi{u=Iyz|JwWX|Hr>iPfA0vjqovk|!lK$}JW^K!;3mwXt1l+VP?G
z(dVu;*JT^f2f9$q9cj*sSR~!xqncU==n6Vy(l~ndO;b50NpeKTxpMNW6O+E&_mUNN
zSvbZl<?lMDF(6?vsli`hL)gelH%Xs9{<pJE>VfofYwR$8RL}@4FZiARt&A>&*v%a?
z7N=$Y>2^X{P0R()w-b0KhBx8wuMF~s*C{PHv>JWMeGdgAX$t@J_i*RWl`L?%c(65#
zzIyj&?Vl5K!`P7{H%+ZhfX*jlq%zh@*)CskT2(U|_wn`3Gc+?@d-tRt;l%2iN{xL@
z^Ke6fov@hjvMUGCSX4ZT6Pe7*5_u3+M#XCac3|-6i_{@L5GLFp+H3}^$&5QRP-Duo
zT!u+rz#<o47B+6g1!J0j6vW6#5$JE`Oe3a@l;ch2WmL?UV-jm6+Vrn?=Z58e7sWTg
z`{t>k^%Gs-8a~q9`hxcecxuPS+ZEoXf`1<TMm_uN^|(!_S3rGrePH8-1MH0yhc*QW
zk6*0cd}Siy`pf98LAa(oSks>!MW46Yz4}#xk7{!Eu$a=bmzMEL7SddbEDY2$X8^SQ
zb__1>`^<z2`+FWZTmt}(w)eFO2h=x0To2*E__2?Lv@q)OFF?Byh84N}3k_pjc4BMC
za&3Oy?+&4Pe}d*qy4`Sa8t73ElEp6j9O_1xuwa;AjXdB!R)h21X=4GomPn!YCZft{
zC}(>M*lOlFVBT1Y3uU7WG!D^Fy+i`+m2lY06nL`UIN20Rb1B~R+%?-;htnj&n8)@{
z9ROaPF;sT%JUf-e8B`>G=1}f*ZY24yKMzN`2FyCDA8Jzr`W+8BMD`6hcRRSZC1|0o
zyFRcwg#OSTssYA)io%5H2s_y*{DVyTFwlP8wSmRa<*V2T7*qpUfOt8&Tk5|_bP9eH
zcE~~-$ifbIiy{xXutB}ZwiCsMhm5@8ANtx(Uh~!(-Cw_cjoZLFcr@5+ch~vaW7c}5
z$Ty_<h8WyX;g}tBbZe~Jwt3Zy@4aLb(R!t<5bACe;4qvKf^&-n8N-ISEv$|Qu8&S}
zQ{i0!-ZLla!XEdwH3dYW@xfeD<0kP<)6dtG`TIZHlj~1>38Bia39PU22GmDsCsQi|
zGfP^#_bj<PimTkMR32+x_cOND0D4Jy2z5v3DNec!w^u0@HeGkgb!J*0i+l2_CQk-M
za9IDjS372l>k@eL!{4~dnevkF?JVDwHt<l-i!`v-)|g`(%y1k&GwdvMLc`hbr{f&#
zJ^G%ZzgGG5AS**~A3`T7f<^3kaC%Kk_8aJp&5B4c=NzZ$LtOv+e7_codW4ZMQou%M
zeyy~)E82ie<a-29IVb!<Z~6w=nP>khhanx!yTOFG``pSVbF)@HSpY8p;G5QxyoIC}
zCVPE;dceJ-9IF8g;&AVxzPfIJ;N6(pQ57YXPT$4=hpSIo5qDwcCI;^}&t{u3rhr~C
z(C{V^%cF8a@}{OE9gLYFnRoDwl(%H^Cea4o<>v7~AI^OiRJwS;Ed%ed!1VR*6_5;;
zg~UxoYA-TFFa8dOWmW4P)z-bmi18o*_7aTUOVV?3SD(Cc=x<8=cu}dI<8N*-stY8F
zz>+RrYd<3JW!U*OmJ}pfdPa_^<!;kQeRV{pj#%EHZKGd_Othu!8z32X6Em`IOQoCA
z5{!|jps9M!X-wT&fk=giB{ykl(u*+h%r5DVl;V*<niaY#o~DAb$!V~FS5v?L{6`aI
zFY3NJE!HqpMLZkSR+_82uw8aSCva}ys21=V43$<<i4I&-&+;2?e4Mp0+}Ru$Jj`&e
zAzlXKd%zL}xs=aZ9n8TUW=H+ua;Ap$-nY;O1KN!TnaDL-y5=^tR;-U!x_V*+y0w-m
z4u|(5#||mi0nGBMJ&%Od4rm;Q2Q!UBOU{CM1W6o)Hi1dVrZ51EPLq#(3=;Hh>=E9U
z@y>kq50lyH(#(KmpMet{jJ8}%2bteaVS@k3@#_3(`3wvj>R*1BK?z<qJ0mhm9z-4F
zjKw%R_uI`jjZ`Z7oj4U%4^^lKtE&IyJF<Q@P%}A)8A<C@oJbh%Hh7{R*Pv}p?SJ$|
zO+{Agb^S^XBLWWx1NYa#YJqilp<kKp5cUHVgy2FOegPSR>00G&@cn=}>bn49e1~`g
zo<dQ-0=WO_`FD)Jvfbape&xYe8V-}ehBCjr0+`AT`xW~A$JqbFGsrEQ!~FJtOhNzF
z<1{x)UV+0hdFRzo=iJl`IhK9cQff@)F<|C*UPKo)<x!SS&+_3Szd~Bt%nUE@B5xI@
zrFj2ERq>E}a80WT@XKzZ&$-pzvI^ezC^7;v3*BOPqpVL7JWn$}yY-X{O8=BKQv_4>
zkthN+F3fVoe_|i&h#8->+aDQfS5ZTVu|9yENt^BQ%$&S>RDsR%n^WGP-q_NsOTifl
z`Qxo)*S~<E#Gfpl=uv4NuE*!e;#78b@hi2azvRl*i&f46Tf=bg7)M~o3^zWytfpY=
z(me@Xq-pBf@Q4!Lm~4<Y(w>S1lN%R-=Tq%$aJZFcNR9{6A5c7ADy1KMcjldyvR6~e
zBSjTXdLt>5ShEsfHal|pi~!IsG4M~UsC&-z0J*e*5W_m;>nU1sZ?Gh};<+ydE8R=l
znbkmuotDs!YfhSYu`?$=;jnA+CoFHT`)b{$<P(35#I|r%81uy>;L~r)@}nZkhNeU>
z;>?8Bn6iZK4KS8Lp;k_AW-Q{@=Tq+oY$RgmMLJj2P4$+hj9I{$coYxP(Q5wzFN@1G
zfTV-oBfOne{+#57IVt#QX0TUE?+<)}fp?|aqr8F|e*kDO-I$D+x0LM*XhetI!#9Kv
z$WjY8<SzP@L~0!ypI*0CmIVy9`IG#%nts*6G)kWKW?^sd$QJoZ{e8x)c>W7oHfYXu
z;mdy%y(SPhORIhwTt$EU&4fG4V)|yp`UKIwmTS4p9iv}ieSuZOKx;?S39SwxDXjoi
zqh&()vyGb_KA;&YEs%FCR^ZR2!#5`AP<T4_XA73QtCi=#>X$TOx7xjT_(FEwzG7f#
z7q8~-Dm1Ypgt2SAXy4cAVI6WPfgKlkL^ZL<XR%o;b}gbaI1n;<|67P>tt(p4{MmmW
zvh!5X$x<O9$o6qxl;!eJLKM#&%ai>rNXyJSx;g*;VAWC`Ys6wRBcRSGsMBA)G4bT$
ze;1iu^8X<bppbO>|J6G{Ua+d&h1{oN*>!uW3lfUCO#x%9fraN*x~tE2Ow?1TB@e4@
z%3)S+2aiBJTO8A-)6K-yJ@V>ZartNlrqco^reCzZBi1)lX0(>bKS&h+o!3G!8ecu-
z?~yVM)IV#XyjmEN&Oz_SNJ{S+5XA#0Ua*5lwxyrlWkb_gmv3KFn=um(hFo>%hDRq8
ztLm8;lcb===nIEckdNfqfQ&zV?wasl@G~hJGYAUypD)QDs;UqYnW^6!JoZ7)k_(?1
z<2%02<#G&!4WR2cf*$3*aqrV*X%pj_?0aD8wCm$Sn(N4nzr5^HU2lDQP;^1{WPZ#F
z!e#=gQwayz6_%$}?=h{oR4J%^qpZhfk~)`W99HhZ^2vnuXK(8zvG|xY$DpsQMw`Wm
z#=~dW#IQlC`T3sY-7@R1Dg90#aSgTDuLb!GyEZ@mF!Zm7L>__Z$|e3_dRenkysS3i
zaK0k7s@o$wF>JjxKmYq=lg#{!ET#=qVilH)>2w(^Lxe18Kb5vR&9As_yZ+`u?s6b!
z@nyF8*NtPj>wA=Z^4Q4RIl2L&L??h+ydy4ePJhD+QonJ#+k3rWVgB2C!IXfP(AS?^
z8eds|qIdgy<lsqes53_m%TgK^eDVwLP~L8rS<8P{bT(_xyjk;j^hd`T%p+JxI8JrI
z@``*&QR6bN;yQCo)zt17KAUBrFKECx9}p46>wT4g!*rDsZ!phdcINXR8C(23KmMZj
zl0dP<4cnjdV+u<zrct?X%^2WGz9?tz&ce<4-nyz<i!Z|*XuMKbLynepE@f?+TQL>~
zB(a~4faM8h{}gyTTvWG`kV)p;zE$LxoUNp1B>{z<2?M%B3013ewH|I!t^Gl2=P{9K
zzG~ZBj~}^9Kwxv~VSte+0UcE2)Ar*nzg5v(e-I{2F_*qz=VYSz2kO4;yDw;!eL~T`
zyL#Duch3s$suYWUpCbr+wcA3p;SxJb){R!I*!K2mi`{=(sUv8IZU3En$Wu)O9l884
zDLC3p1#Yx!rkv=>)Dkc_uU>cWy5-iq+Bu4!!Z(w~!R}XW=*WBBwVjchP(KaS6sJxV
zymWXii$imijvRJ;tJEY@u|@7`Hg3=_S;SrYF<nT?@2FRtog<8^Z!0Oe0jV#VIk$Fg
zIbKAKEaeAQ$F1nk&LMRM;Ys39wle9Xikp=Eb+mmK8cWjK*_B=wgbOw=e`Kq^y`_b+
z=hDdo-|1_E{jbdZ|M;yyC(g{LBR%Cq8M_gl7(fzk!~)CE7Lp2rKz#vJ8H(TxdR<YW
z<z+0GRp0FLgEk>`*bq*q@}K$!_mX+v3BX=4K=q!HTg8Xldpme>if|(~SjH9p^9Ba7
z<7J-efD+t@9wf*II@OM_LQ#q0$j&<${q~B?lW=&K8jM8PnL4L-pV=0bxWtjjxR5vH
zRx@)1?6<_x=?OxQzP__^<1NH9X1H9c@pgV$d2OJeCV(<V5gxeZJz)8{U}CF4V|hvb
zkF9J`UmGd75gjb!W0hIuwTOiE?^@|}Aw4*p$i41AkG+W$oTkl5w_r!3F?AbkgogBl
f{;yxAB(v`dZLG<`bLhdhLLs^r^|gyMZ9@MGzK2x&

diff --git a/resistant_lines_files/figure-html/unnamed-chunk-13-1.png b/resistant_lines_files/figure-html/unnamed-chunk-13-1.png
deleted file mode 100644
index 8cba035df35804d2028dba8946e4fd0db49db1e0..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 13456
zcmdVBcT`i`*C@IYNI<%Z0#bs<f(imE3L+*!R4gEtqgapx^?(H_ih#5ozzzb(hKdpt
z6%`Z|DT<JQA}DH56i}1|LJ=tmO;Y!IE1q+|@AuvqZ`^;ramTn}?~u7O%W8A3x#pZX
zy?&j$uGSPS0D$i5Rm(R5Kt>-40!=ma@6U!Un-LJY-s8^|2n1j}02Bb60q_T)0{{rd
z+W=>0;Oq~a(|~{RcmT)SxKRMKp^UeoblA9gI#D3PR-vd~{?7jBN^|xvc1}xkPDAf4
zZZ;jBZYiE_xt^+5kf&#gXHbx55PHw`OsPd;{GHK-DAW8^uQc@MpN8Ix{fk@tiy<OV
zp$DY|rQ`;s)CT2tq#zbSo+-JtDYYFbwJ^;Yq&XvE75#6z;<VzHv|^an(vsE!bAvo{
zYddl~&;^VAL9xGcaT>b(ixC!jwX_tsz+%`^3}J1GXKhMQZ7#YHV^|A2Y9VY%b8boV
zZz)DsS_?u)1c<BZ1<_v%gdMp-9l0qTwdndSq@$w)q6;Enus97dMJ!b85pG8=dWz&A
zu80nygxEfDL_<C<WYxCA0GOXt-GtQ6!M^~o1gn?3{uz0#|N6e&W=&Uot>ddsZ4AHs
zc&TuYmP2Xn)#O{ndkD9TGlZw<ro{p6nm(_R^G?q^Mn5lL&DRW5%EAurEV(rBu)lF<
z>tX7t2ju$C+^3^1pNqa}{Q-c%YNkvV0G7!tB>l#E^tS8<dONm^0D$IkB0|t2p(Yrj
zB}1QOh!EHR4<TOIr)3EWJ$9ME#sut3-iAbMyvGd_I63sM_#uvD?CRq_@|LnI{=nmr
z;nvfG!2Vg}>6cQ5f`TjWOfMsxC5gY=JuDw<E7aw`1op{Pf~4f!nm+{m1B*I2Da6Rb
zy$|e+po=G!5g7X|T53-cYI8a7{+vjF)WUgibP_k0*_$0)Aw5_yx`N;N!tjR{P_)!u
z+>SUfeirxsn8T`zcKxXIN{o=(Qoe@7DD@NLd^Z6BW|k>B**1{a34QyHo1Fd?9N;H;
zeg0Q|W16O<<mxEy6*uJst)lE_KuZUwm{?2ISeakafJNI-wuemkx(!Gu$Aw`Bp$&wG
zfZ1(*@0s+Acj%~LPln*OVP5fROi4m3WVf{7Z)tYHMv$?t|Nf1|KukL}yzSb6Ronag
zIv!8IiYE+f-WD?|^-%tFhG$Q+u%vAwX!C7b%p#|4ZJeEW?-Fvz<pD)>x$^zji3DSy
z=ET>J7+Xs!kao1rdG?DS#MDz79+U}xuJj#Rew7%y=9^EP-&r_miMlv=-T|d!Y>}8h
zAC4N*4W28N@|MB(oI1B(grCB_-S6wviojQ&)(x)is<G(O=y~;B+V|?7EJg;6qVLJ1
zl|#7)6!~ALCS%dtM4VYH-mu*TTe!bO$GnLU6AP7+rPC?uiKA>_0^A})pBYbUoCNTi
zKhiVYl|wyyE^?aJ?shdH<|^}b)D<mtQ83BkR0LrudlI8B6MnT-FH^{HuXchsQP(@c
z9-P=PhZXJ}nf_rqfYa&?2ImF%4TU|5y^I|xf}i7AswU9Bke)Lmj%w0RL+fdI@are_
z*aWR9kBUH}-30hxuO2H#&7P`xEs$^`LyP%c%950%>*D7NSuZ*~ScVJXY+!PCcXkv1
zA}C1j0$T^h`%ZU#OuEe0DEKLQ_A4d?wUG>K+6K<=QM2q#`~%i(gD3AwWt7LMap@e%
zf%nAvQ@7b@{>bm-tfWF}S89M?j0HXJRKXW0Q&u8jqxf+C<ddg9D;&22#zDJQ?q`0D
z{$l;Dc3UQ+ak(*Qlcsn*qk3P~S=`Y~|0Sn9Z;SzBvbs30iIJ1kMX@1Eu9J=tvW!f5
z#45Pe;krg<{@CF0EVg&W_AySVGf?b!yB$qTQPhu2xLr$NFZs~UVa%AuQjur_xcfuc
zj33(~4@-Z@&P#TQUuDyKCT8R$R&uKI#xTPHe9jsCNq!(OjKKDlY0foDxNStJ(7Ld;
zO0}NXFLuk5-&kmFL~O%sE<9xp=~6ol=urlxelx)g=s1@E7d5=XN);gFb~N6bq4md^
z0AftHi5lJRBC){VHp^I{pL1FFu_mkYID7bHp}pdXgX!KTMGfbB-WYVs)E#-BrfAv#
z(#M7tbB)*}6L4uk1=3O1+%K#_k#2uJzWGChj^&w?%fv=HpzK4jzEc%v!`Dt49(#j<
zADGQ*YLV(#1_x=F&Q$XQ#w!!iSa3B9U4M}v`NtI)^-xVR5FVr)a#Rsd1@M*0?nSk&
z0_>2ii-X^@w1uaw2?tk}0EKB*=K$MSA*YKJj`NMy*CAtJJeh^*hSg#XL@|xHGsgP{
zIOYZ--E*9{oMD~Um=@hxofRCGq^2l)pC-uxFWrD-MbkT1#gg|0iX3nY;jZZZPLM=o
z#7n&ht4;#(>48udmSb`i8nVJPLF$k38j^@BmH&Qu!Z#pMz~4!}j-PiWXd>+6aR@uW
zWExtXb&G9zzg(#5tkq|}#2sGOZW1S&sn4tW8Uqg)WAh7UbK!nC&fR)6bv$C-dF|Lm
z;tv=8*i223IBQH^>$EX*anLN*MSP(Lc@as%=%*=D4iOCT8q^1_e^+W%!C;)-H2kwB
zIQ&T@iI_ZKQ>@|T|9XM0DVD1k<D0Uu!+~P90^1Gk@cq*|X(Z;nZh6~4+^{*NMqW4`
zblv3-?})t<RammO2oj<b2ZK{a@$Ay6;bW#EiAnNB)TU~){%=R0wqN2HvNYc6f4nG<
zDSn>YJ0DO}MTE#g*+gr_fvej7T4K&e?D05ps>WH8{dRm4m^|G6<nbh9b)h35Fq3@-
zs#`Y>No`t5;+V;_(8+jT8?uJ2Lq~2y*L^H(H)>>`+O=F#)=PMCTqEk6iy^DVr|<TT
zxceQ$N{O)`==sM0cg+`_U4Dfy-b$^VZ)~ctVyj)%vMiU%R|O{!3$AV?s2j4p9Z1}g
z!j6}0i3>Md++a1>C^)1anhkGQB??tE?BkBv8wrL|+B=yS;qpl@V9{UzYTAOP$k=wA
zwO`!62^ifz_M2F6GrmbQ>IJr;uKbY&T<%opJ7Fuw#U9c8q&#r_cYoht6&mXoPxN_*
zmXrG7_r#%e*)~hhC8SR^li=0vgeycv{t$mX_#i>6q*<3FSWq;~wfl8uRc(nj?`kU1
zUG^^yo4UY`O@8(ku_1p>ieJe?t9H3OpD`}#U;U=IS8aGqlPq6qVX%1!J2r+UHE)c)
zeh$l8*o|h?u_)KI=2!4`Rv>)iW8d?NugG#59p1%RwCU}W!<8Nc+*{_gUYqWYdJ^7X
zZ_ceX05fO%C%&aBd6b$$*E>eoJIed}hgaB|{59sKgL^)1#F94x;Z9}lGSy-Z`TN5V
z{|Qi(tnfk{K28N@dtTaeIi`Ex{G&$E$tGk;1aap-x)74G;RS%US##0S?=b)=^I8WW
z+9!CmZ`Q5{Ra3#YU44jn^oOdqNC!71XObi(=GO<k2&a&!(}RfkQnuqi!~<Eo836BJ
zdH5f>*Ier=n2H@|2maB}(yES41k}5xn@j(dWv~1bpqX2^cd61Uk!YYt5U78B3}EB@
z6^Ox!#f?i_x@T&#?#=R#dwW_0@Ym-T(Q@sy#k5H~m0l|C^INw}i>_Hy^hKHaF<>AF
z-?qRzVI3MiDSIZ8aQ-dj_-CTA@`QedCAf1VZY)O_5-|97_(~Ly;}1_fRKJcUTuj@5
zWRVxEcJm|rq0ouyT!&8s(3!SMG#W`Q+ZN+}9xE?P7^LZ%E4@_O<(d*c@cdI;!<eT5
zIG@J<a<BAz1cIcM_cJPT_EHT`!PP&0V2@Fkb%xrXMAf-#alH?HknX3@)_BJp(R7eF
zM$Y(QDBx7W={eBG=&5Y&iFCX8Lj?885nVd)SQdN4u6SI!TUI6KwY6&wfJb1@JHA!a
zZbR0FSzsz|T0EBW;=0D5D>vi_!J}ZdN}Pap8Z$*YNT=N<YR&?|`!rcn*F%$;p%(Oa
zoVMRwHp6ZBjsnzES=&UG0UV9xCUslzsw6I~PFL<3xcZm65Sy@F&Ku?@jIxRK`XtMj
zn9?TAtkZ$}7!&>;)jB*~8eA!(b<B;4fQbj19>$8>L>e{>VnrtD7@UK2B|Ce>C8X2j
zGyF3kL4Zy9DrLJMkB8gaQWqLCn$%jC&SH~T(0SC_l~>j4)t*#ono9HxpJ|Eb+&BxZ
zSKuuL_*k5Neo103Cii^H=j#<Wrh<8DSy$E&B%w3x@r?Cd2~V4oc3UpdY<8H)Lfhmh
z33>+p3jPBY8FKx^K|*0lT{^u8Jin~13C|iLRUsH4RjCp;3<aib>ZajVyU)Yr&pdlE
ze#Br`;||6m=v9I?pJY1#)vgRJTd!!Ty6|z*EYM~Eis$Xah5QLRD%ZF4xlzn>1>3uF
z2`|c)a)%j1kWgN}T+PC)?JvUZDTL=*#nd$q7;!}pbWWtyot#~7iTGW19w!b~do{%1
z?aT5K3XPi{?o5Kx4I-6iY`}sQ9%XVXGVHq28Wo?ZU5P8oL^CuB`FMt>$_>-WUIB2q
zpCw{pc3v91XU?gtV-IiBt#vfHP|HJ|fP3zqkIx2!2B48S9U&PPO7n9;1%9%x8Ft#?
zR|`Sl%2c3;cvYVQ6dBbac<*dhezDQJxP@PoHAlIZvfTh)wtK(3J$`nVGhBF`JmvYA
z>mqGUHSVD&*T|>f!{$hfNQRg{MJUbRXPYJYmY;uaJQoz0%{^Qx;7r?+snKerD0%s#
zhi0<<PQt1H5Hrc<+X7(YUh^lAh)&$@jvrHpb01BGMej)?4w1-5;U02$PfCR0%~2MS
zUShtUX*;9Ahb}b}B=HieG`OLE6$i-c=NTm%!)hJQVm_L*^I<3Wg#}bTHn9<jo2al}
z5JP$JDcBu9;6gT-(XdQ;yh)8Y(dtG|5AK-tmvB=u)@ea8aqn3WaWQ|<ckznY@zFdr
zkv1-x%->+ks^ZL$=J%#BuZ%jDByxp>f_Q1Ry+iDa{34&HH*bSml6-z=@S_U5%%jw`
znfsb0xpKz}%2u9vrI;O3+<qcBexWqK+nFT_>Ta~dgoB`&D~&5H3zl8t<i7sMsM#^T
zofFO$NnNAZqTw&^PGpoXlsaZYiHH{kUvtXj`w51!vj-SAW9OWz!_Gy`5PW!lJ^htP
zT9IH~cNY5|T+M*PiD8{o_ID>w_S5FIM|k>^c|LvL^YG>GIHbjBy`UX8kf;#4ZX#UH
zR}v>4CKUNp^gefb5J=j-fOO_rZ%qL>sq8*9{FxeeVWsQP#X@m_en8v%>kXaypA;==
zY7!Cht6x*OPq%~p_>SQNn}GA9M_|qpd>pId&n;uCzR&b=Id48yC)ma`tDT?HPgjin
zl?bbW#AW{+mJ{ADEt(CkU(m8FxB>Rp#3G_kYL-+@3A&9ba+($`_MFT6F#~T!%ir)0
zNzw~#o||0M%DMm>6<-Zm>ulue^<j<rg!=Ro;4)>psq*I|xJy6u3&(sg*oRf}zxM8b
z+jS2-bg1Tp67=NxA~j!^F{jpkIF!{a%GM#64x_y-SlJy7E-tA2tSISfx&y-Imvq@=
zUCdET1hMznq;u!l<jZm1^VB~{N~S|kZE+*!Mp!<%i$=<tv=$vnNDOs)@c!<2clVy7
zg24sS@V0F)HZYS^n`W>w=R!DPM(>R;Zmc7-!1X`v$n*b(*5OLS;C)qNyS}$;Y~V~7
zv3ZV9uK+H^afSobZ81kK`7b;3R~fcT%+DCbC$1qecOyf){oYPp=cn*&;Zg&j-0<6Q
zHI4LHG9Q0r^fmdP*)~94G#qYPiD8YZ&EB$npjEYJJo$+B`wLI5^qvI9^m(RxrhpHM
zHXDz1@GT|1`%H4+VmSwymaV<CmB>+j-n|}FJoany(j(Z<F7D*)BkWSNbS*te6rXRL
z7&`%M+QrZjU=#W#vRw(0tJ3#nj$@5`WKR~;NR!X-vcU7~78|I}-LthsWr$>tHpY-i
z0;B7q!DYbX`1N@#tiO3SHIXPjb*UzHtpS+mw@*vJaJ=-J^oG04{T1odVDJGQ0b@b2
z>X{;op?bDzF!&&PX4j~C=90yG$TlM~i8ig;$=HKtYs4=klh8vkF|w@UR7;T$)Q!)b
zjM`WFu3#iJSvyU@|7pnOPy=moGcB&)i9XrusUU231d?oO+d(4<Y^UAA_V}>I@Pl3i
zMQ_!iK@&r+Ws2v!UyIkNq&N3-F89ytZrNrWckbP<$e{*%#o+hRd}cJBF<FoYlgef0
zoHfn1s2Rppujk0Gn#{$|Y8QNkp$AvO?2#*FZ-l%p%CKbRY!>{SH_W*Q`W)HI2qOXb
zU4QJ1DK+^r{&y&0kvyM2*yHqVo69irjSo*Aa5*KC+-@Dt|H+Rx<ia(La<40tyAd(g
ziX}|yapI46Doa5dolB{48rYElwyy5a%$I)6{5Db^=iYoD>y3af1=x&UWqO6x?jAmA
zc(x%uSmkA0liU&Q&QW!@8XqoOe4RJc@~qo2icPV}-1f@t5ozl$(Q;M49>TkdBI6mj
zxxK2bUDf+WFQrCl)7?}9vbB$vo{|4+FgxssSH&S}lIr9?ds<cp|8D~>oU=&cMRDi{
zhi1dsEY}O#mYO3Axj)L{4r#JBf7%l9SB8CDm&?;$c~Gb(qPX~*LYmqxr0Y_^<gWf_
zBKh`Ntf?NG!LyIF`L^6$a1@-<C(hiVeEkSYlDYPa=Um>9f;p-b>!dPY0@AuT<(w@f
zEv6=NR2(L;Ua6+Mpc!)mHjR=!xiso8%xr+Vy2_FVtW;_qp>%)e4jwB?#+vTa2|BLO
z3LN~mbz=m(%xD*F;cn=-Za9C=RCIn<u~y{oDu)vICI_t8kGIGVY|a8FvdTc%zoXb2
z5a01Khp;G+a$g!O%HK?Yxm!gH=?SxiuwPj;XFYJMkD6Ssu3DeWLMXd}yZ7Lkk}FB&
zQ7$$SuvxKVvub)}sb^xBuYFjW4$<0kn9OxhnXq?wuXjS`@h0|5BUVjgYSnkfiVy5x
z7r%oQ_>O<+<f%~P-y^@MD3O$?`g3C=$lf{5W%KWO>StWhp7~wC(<9D2owoGhHO(K*
zi!IUoDRZ{>a>7xt1<SzhX&G`2?vw1__|U(m$}d@h#`SN>SNaF9(5@YC%jpTs8m<`(
z%!*hOO}JKv&Ln;Kjt8TRXPPc$V%}3^TmpB0R1LWJ4aY42v#o?qPIsyC#DdfJ8dS4q
z1#P>K38|1oY=|Y2n7R!ED&2ck^-hNijZ1r|Cx`{=(^MlPNX6V20Qe$wD4RhhG1cz;
zo_r(t-XGu^!aTXL7T3u?T-jj&b_;^Y0&Ld%`(9Z<XSaiLnvkdvi$c&dOTDtx8^B|i
zv+CJ%aq!nR12Ih}{d>)N&{bfGbW+UakS1ubpsQ0ql5Br$(r?KX*b;|dWat*s5}W*r
zC>bznYL$z(!OrO9FT#o$BjeKA_!G{SS3=;EPT4n`<yg`xJ2c2^*s~@1L29%ee@EYH
zh++d9@c!{%CMw2W-7G4lebo|dE*Smb$X6_CmfaK$DPP_nNgW}vG-3F?J`yf(k5{Z>
z5PVv-&kbNxp0`9uEp~lCHqDcO4A?<iISXb+3aBf+347RT*-b4yoTZn7)oL#GWNP>!
zbNH3W)rHkz|N1jlqcxt*R)rc8Q8!;(`ZrFjh5e6Ww4KJ821`D6-_G-ZtD?cye#X-_
z_g5QaZ@>Q(CZEHskA#z9xk5gb_AydNVE<h@7A3!4WJPTD0mJTo%`tT~5A*l5p%(3w
zv&_W|PA5OKv@o(uY7@6I_Sy|u$>#uXF~5dmH8jnWWS}05K|K8VuxP0Mdn`*8Sg6<z
zVuPgzf@SVeMDBQ4lo7|%{}}CZofmY;BH%7QchOf}#h6%>q*%o}0vLRZhFj10C)#+>
zmX&>diJd;#i1oRLvTwZL6qLF?3yq-G1@}fjO8=Qj`R25l5<oMMTt+ToAAexdvuV%%
z-{HosKEQ5W-Izi*VL+D|tvE1Iz=A$O758gWKVDplpOHB!@25*s;d@-T@N4U*pJz_r
zvrM3F*niBA#KdIoD;w!+6;0lQyE4Qw%BPwh@6VEw@B5?0{12EJ4A0qOHH&rRE~$QS
z=Z=_fCF+E%RaCtQi<cUB`)>GCczGkfW9j}S@h}K)P#CqbUkhXyF=V=GIreF(j!#{T
zLw$_cYnDOU^~2R;L+nnDCN!k;h#^)goV>3Z&m#v0ZIV-!H6OC5DdS5>Kcww)32&Hj
z4AaW;0sZfZhyH5vO6dT1GfC&NugSa@>x$0=qu$u!$~tUr6X7}L*|{`2U;W#vZeoay
za@ySP_%h@}T119j$dq4q$)>KGJ;eX%+M=r{`Ner+_Y&jthlaXuU!O6Vp;htsAwuA@
z3C-mrsbQKSuQ27B`a&^^Hxk9o&ty(7Ug**hk?1eH_Y3LCJ}qu|T?uOqAumI_wrD49
zv9o$<J2Ez1yX;cp`?!pAnm>hxlwk@ysI0Lr!KC>;#$3OGHmbqFOTmQC#I2{Z(d<qT
zoPoO*)jEKi(idoNz4{*9qoydXC~}B+i*&4^;vqUCm9%Mz7u7|OBN}KQr*qw)p0%$w
zzN774?7;wnvQ7hYjFbimexjASl!#W~<Mtu}N4NE7w?n<3Q>JQLO_4<S3{4U9iP-2S
zpcX<?jq^3JD8B2W0Gmeb%>hxu6$(=$K>}vyl23#g;_Wn2y}s9P>qCH<r+f*xqo5>C
zD@)@cWo)i12;`bJyc1wcGZCq?aMN%1V1RGk<SD@BR-k9k+P3|+yaRm4mLp=0o@lhh
zT4gfiog;N6diltLJsEG=$cZTK6=1rLmDZ#XJIw@&BL8%HunF}J_GvyiCL8+@F-ejC
zvTn3|P2Em<I!Eqn5U3Q4ZL;Ohbn%3DAAr+%>_T5M%ry{khAz@zQ1m=9Rnh(WQn0Qs
zvakE*(ywCJ#dLJ2+w(&dZXhXxk0i4st#>mB{^(4U^qLyG4&KcGtMS<IhY8SM%$Uon
zqqXWKltB4d!h_;X<$699aqFr)NrIy?cXRdHA<@%OqQWr&zM02r#vAp8Jd8mSxn%5-
zKD$EG%2mrc^g;s)IipmjA70*6p$@eqcCq`UKjuq+q+cKRt7}Wk(+Uk+#)985N1-m~
z<Jk16%It9BEveB|sv7*6F`LY~SF&*7+<diWS;!Yza4TGER}56%ice@A-+{O%IU&3|
zK55AAWsDYnaV!CTOuv+B>rNfv2T89U4ShD0Dcbdsw*M(<)*HC2yeQ{RvOYrl!w&xC
zMcQBih-fQ{opRzjzO+m<wq49lgg?`D>=?9BLR!Df51iT>;|6a18noLr=!rrJ?I?DV
z&;AIuzQVY`;IZUB`~wc!`3)X{1pK0%iEl;R8a4WAjLb@|ZYl;z1m=LJrw)GjlcENj
zo(mpc5V8rDy9Pf4rW(Dm{R_wf=Ll)$W4h{HG(y4h4h_1($Y=az6!SS$X+*LN94y+&
zk{A_5E&{VyFe`Ipc8Jmn%wIzx=vL(1tHe&c#nX2J*hQ-$Ww}h{(Fkehf=B|!r}kV^
zAhE+<i-#6Y3n)HWv`UXPBSC|RPkgBd?vd!S00VGS<?L81wBKV_&;ug_kkEwJmI6~n
zk_BN%i?x$BLlb;SB*2?AaK;*Z<RpxMG^*Jxc{-K2d=ltkxJQCh6oV?|S_o#{1<j)k
zr}_YsUi*uunYIz!f?CTpfZMWSY$Yq1XsPs`<^+rl|K1D7OYLrgQ}9TwE?BuD*$2TC
zDFdOCUy{L#KV0*$Vld&kEl80Et=tdnZ8zSMS;0*%wn)D2d^OhJe@|<`UQVW;$S0-U
zfuTJo^y^u51aS;aCxUX97qdkBg;(Y$ink?9KQ%)68!q;pOt0weo_-4~Y6}5oC&#fT
z@yu@XzCEBm<i258e!yNDY;E@=bd<%R82K84=Cy(7X#-@g)W)~WtLi$Vn`d@%Nm4*2
zuRY*XO?6d5-+O*yYoWKMiZ!WX68(`7#?Zcfx0}RzX^IEF{0^Mfl_*ovGg!lk;$aCN
zoyb25cWv9IC>%06HB8BeI`K1nC((QI*s3jT?U=&wXdVBolPN%FaN$5qxX>XMna9sd
zX{Dj}slK*zc$mUy)i7@+-6T~j>rf*vso{+$dp2vPnI7xU|Jbi0pWY4Ytl^xohaDJ+
zp_MgwjfY~~1l@X8Az?kEI_Y3lFSef2y>@#S4cFcy<(=dfIQCDBGvuDxgwJNZi!=m-
z@f;0wOPV<{ryU!g$u;1N>C*0LOmlrL<|v7=A4SaR)2Jk_!gBGj-Qr*Q)OAL;I%s&h
z=1_i&x*7f|wsMrXbxDgF8!QqAf=~bLC5JlPO+7zj(qJkiF2=u*nvb=R3jB&Sw3rL@
zH0Yx!(l`2v)Bflxlra8y#Zmpcc@I>S!OEfoO;m|^Ozjfq^t;2#kjeG_BZ_%<#Ed2S
zF3xLs%5|9=DDFMXN=$8;!oA0xKEye5i5M9h{q+7$<;}67rjPq?dLbFkxbZ|u>eYwp
zOSSW9r|m%MgWS|yv=<Uh@ZC=8pN^sIa=E#WvL$#Ij)xZ%#i@^+|8VFg?+_tmM##h|
z_!OBkXV&3LpT6pOY37o(6I^4j?UbH|<mHmo4T}geyN|T6|BC-HR>=2dT9ddwblts@
z!+U=*R4y`^?tnR=71>~7d9g+sQi++5!*{pOTkSKU5r7F#RkZ*pFgZm_@a{oLMIg=&
zstZ0A{XF@tq&IO3T*`c&_X30ClH(_pZbtg?Ba#A=FBe6MXz}w3v~)=!N9`n$Qd)jO
zMCPbZ+@y~T4Pk!#GsRfq)Itls(#l?Q%T1y2@8tL=S*Lf)8|IHv#r&5X3x~Y;?TWEu
z^9l((WsQN^f%-#Jel$qd*P$VA$KpOkOSNus7KP=-XUj#}+5Xdf<z7sKJU8BPCWe0>
zJ16W9hVSlJyKdJ(8v1j2-4v($5VsFpBrJsLuejSiJV@g&G>hNe;`r)Zo7D6g0%OOy
z;%1DP$Xpt31bXt#F{Hx{WK7k-Ma;oHA$_td!~iR`7T}g+ULo`HGYG8uip)h$WdmS}
zpS;`zXX_-KZQh0kV2{KEBxe>&dT8-F`{Glq<N2IBL%vPcgfF8DW=wggZvF#PH>N%q
z{D={!ek7ZF6XEl)v>f4W!7cb?Z|Q`vG&r6Kjvx;Kaon=^8QL)oS=Q-ZGOv_O?f57e
zg>+)Qkz$x#Wx4lc=5BD()D{H$#&t_*C@-h8wEi*q*D&Mu<$lM1Px<2Le@^)_uSZ=G
zRZHOP<b+E<W}{kzUYcZ~4X5T6T)lNRYoG1hLG8KNLkqn3cbaYu`)RHV?x8%rm3kn~
zF=m+k5GE%S?{(Jx!JtaYZ0kgazeV7)bWBBK%hbYLd5qj_IP+(OVu@bFWS$GVns@E^
zlB9z#&Tkw1j1piS6<$hyiHl;0{QznHfj}qSCrz1fSQ!$*k*1_hr)%Ub)h!6;{a1AG
z&XNQpwEFcTJ88!g>E`ynAU0KQ@o&~novsn6i#$-3D_s_Pm3sKMFO81;WN!DHwL4!2
z%kK}HN1yP*U&Dc|8$fKFxO!jbCC<ck_U#jYk?C_B8T~@{eTLH+i`ms>Ad`1yd=|10
zEyBOyU$~I7^p!S~yKxq4e8EDnCO7&5^-ak*VZi$_;cix0wJmcY9OO^I6xOJ9jggxG
zfmE*@K|~?G%YmaaYH;BK;){;E%r}#MqcIfeLlpR6@D7lu*Xy4oGUL*&Nz={bG`$G+
zbicHIHCq&M-yu8=1C>1Y_<@pseM43V>Y9uys6MR9+V{a%`|!^S1HZ-iAm4(faIZ_E
zi}|{k7ORjI<rfV8<Pl$=_EO6Wq|CIMAmHfxO1v09wWNG=ExJ=Nnf~HRt9wtk5*^Q%
z&aikq@wJ$*p|1#-6-^i|XNbgiLFt52{YEnVKYU}^hEjR%ELj8oht4Id2||v>fSf0o
zF7TE73Eq-EsU1+GUss*M>;5@|>jht%)AYB1v*f*;SFyx`ED@!6lfd^!j^M%<%R(>3
z?+m-cb=^ZaO05sQpPe47_u>frGB#f)s{IgwtGU$-%oRL_H%j|yC;jS;P@~sr04dEl
zN7-$!6XizGtmy>Ia!N`azMxsh7?3Q@PO7m+<J8T5v0ZWfc%nf{A%Po3(|RxC`5EgZ
zAUKym$5Rt?@x#XC7g^w#a4#rmO+A*4U=1~tFc<o(;Nux8*i8lR0tNB_7oQQ%u~2(s
zBwvq=<o}_E_?acE<c$$opW{5f4YS?wR04v#Rq&tJhS@Kij7bPTg#<EUrwK2^8Oe#E
z1<ydrmHtgj?x+c9_n{HLM}9u6xTdh+vb=<)pqQ2@>=4&u??@pNHiED7%t5vJ()O~L
z>EF&$D2^nMtNh{AiH%e9v+0}5LWMZn!8fsAOtJ?3(HRQb*^fY}&C#yAexG?kGKWt2
zutmDUt_d5$9P;L}RC>hTLET>y1{CtnnF57ndG~>s2GN}iWe6|Wyi|xi#S1AR%Mq$-
zH-Fkw7U!YC<?L*2l>gqtx4ImD6j3;I{moL&AkE^v#0nNM4-!!1JczU&INO^87-g3p
z^C*3#>rJJN;>(L|rG?Ks*-^Y;Md~SQJiQllG4Oc4$?H)uxcRe&YnerGU^)Z*^Tr{C
z<@f$*>JAh&SMzBdDZ2nA6n*#KN+Cp51vQzfU>FtMuWInra~YVOg;n&a{6CS-WVaoI
z9ZN1MYT#Zcq-2CFQj$u00!QxE;JouoUlyspDHYJ9E0Lnnro1-<Y%qd^o{8mZx1|cd
zSJ>&F;VEAmtkRdYF|_q0yoyb)F-0mFO<@CJ{WTN-zec`1UO&F?mcHUZWgL`7kl$!j
z_Oxb+N;iRPq+28vmWG8nO4Cs6GGBX*bJ2!B`JGnEHikyAoO2^nV<n!d_nTXm&$y_`
zzSsl?u-HM<ieNAQ@Y+UUS9iW*Fkh`jiDhD&m+I~5DvvttM&e%NI@?=-L9(FQ*G%n;
zD|h;M+g}Y00OlTgr;jgWK82k%YC{Zt+ezRsVIMaPO#iP0UB?JVF^I{%ZXciy(x_YH
z{Ma;%amZ2=3U?nSaMdsCu@)wEUxnienmNR2u13g?^yz{jOsj7+pS!AF)$apptc!6I
z@<tilORSYBf!90*<c%~ib0KkvVWq;?0b6AE3K~@O)(FniLG<(UMpX3Lh~891?;MEW
z_4PUk)>gsGY<|PK2<|1azSGX{x{ggckr1xpKN)nuC(T`q_#5^F#Lq?>G)hlDddne7
zX(W|AEd<|tRL3E@`Atya8-l=L&s0x*v$0kK9j%U=z!K^*|3>_(mZL=bBP+1A+mo4!
zO?p-JrwX2l;IquLDtOOc8<r?8w7*=RJ<6bZ#8U~^6@~H|gG&-`KO2uzC;q!MZ=khs
zG*p#gOt#BP#Tt)pYHnj3e`G)7{~P4;(+VTetzh2JtAZ+y)^5LzVUxI><(55oPGwna
zy8foD*}z#EaNY5wE^4oK!_8dqm>2({w||5`G=FoHE$Nl(CJ-j(xyPNqJjO_PWIykj
zwk0fi?xDq<;-JCxhaH>^$#T2c(~s;IeoY~m-B|*CgE@u2mIE!WJt~$f8Rg9hp4@=1
zO$xC0NV!DROeo=C*pgOh#L?P$sCH;P*r_OdlTrNyd#LW1l+p_-Dqx)Ai>=hs_!Es#
zyc3N98P)n|Mk~(4ne|7eHg`6SVH5OOl)%yn$57?sO!TGt0mVePk~v4SZR_Gmz~jVR
z{57^fHLx=PSLYHk0=g<4JqLhWa~oUXNJ4YGga|zRj$=c7W7PuD1okIL_+n*^rD}Q+
zbm}PT*J?DEm-T`D=}`ERgEI1M#`+*TNuvRAFGSpt-IF*b?L&y$RET;g`AUM1e-|^=
zlK(IJ;L<ITQ5xf}gOID;a=%hJ^Yen=X<4fS3;-=QQOp<40-VL;W`oqldJ~Zs)io<N
zCgQubs@gL<TMw1bp!j4FNHFY#IdPk2i2u9bG9z;_a-&k&yfgVLB}U6*!<JuHYyuAt
zS5O89(oqs(&NLPXxhxFp9Vl(C-IRHSa*SP*$_sEzVsklWh<64mH#(vUIk?Q4L^t@;
z9Ti*K{;z}E6Z~zp@BO&AG;9()cQ-X91!c*bP~5>7DP>8=q2arBG~`e{l>9XK%`1_Z
z=Kd5UWGy0Uf{1(W&t)EuNTp^()T$R`x+6OJYpe$rg%zMZk*kmHsU*wsT3`;zzySC@
zx&gX0UT<Sn9|e+h)QPYWFG3_T)Gq$Yd8}%<H1qi2QBaqNLI%rU%mZ3<GgKgzN7J4K
zZ95&-E3|L=*{lcc0vk*AwrF#D*acsWtW1p*%+<k1qy9BYbRna{%i~Ot{LVERKbOv`
zAG&gnA2v?Wo87jCsYRc1ktkTRp0nOR8fA;Ogmqr&vkYnQKuw{)@S*QS<7u&eF6c@a
zOxjgZlLtPTSa$29y4rn57yXvKs9p~Z%s2z^xRMiyR_g!u!&@U@?637sQevd2^Di<b
zvo!D2qk>dKjVg*m%sP_Ho_Y9kd-OlQf{_-_0sa?<8;K-XF<2l?NtC23iH0n(ktNu}
zQGJJ;4+ROuH0)T|7dvDPF#?hPOIyJBrHypx{{V^8PE?Q0RQsQ-z5b7C?wNKhRg5l|
z(+7t!{9QOI`Tf9+2rV650V%jp?piR~R*2h)KaY_WT3&qF{Ag1(c+Q_o!v}*?;XQ4^
zzBF-m1r2_GFhXiIm)MeZSbg4+Ib)hmW<!pWIkjYNJ?EB*I2BXu=)l@lC+8SLIH4Tk
zCoA>g(LrKMWsO>EbuN<&BFoE1H_SJXS0s8@HrfdpH+VZr6$jIFS(Vu8X#xtAl)Q#7
zNn(eCc{#C3z3(18iDc`2QI9N-9Sw(^7Qg-YW>JK_AXqF54;c-21}E?t?^u|^UE+=R
z93#Vq$!O0Q(T7oGP~+~b*mzt`Fx0vO%6&zIH2q54=JOH$F{f`bG5o%k%-xH<UR{YD
zgPO31wnf5z20qH74qMaCeK<e0I-+#6`Y%W*Fpf&6QNj%N4w@Vq94}67S&FOkUFzVm
zY~>6q5*&|DQ+4<&v9@;sCXYS(y*odByrYOk5YLe$?NHMv&ZXAQE&VDo--A7Sgr93j
zfW`_Te+pbTncGXKVV#SONF>wKCP%`9X|T{-pY<TFJAOQnq@sbWB#Ad40?#Qu)IwJ^
z=8yL!IhCLJR@3e_S<VDvN*hPSYv&|H*8p2=V&EuE!)8hJqFUaapB}aqV+<;+%$&AL
zL1ik06qsV6X57|1+F5>!F5eXgbovH5fkD({O?)sF^X3t!#QpkN1@%v+N(dB!QLyC~
z{D(3fJA5GRS<JUu7kx7*slgQa8BGKoPTaw31R4{(TtcAz<Y?QS$)EmIM$7&ITL;E6
z4B3_|e8-)^6#5!)tyzZlk9Q9g6TfA7QQgS&k&O7lzio=Ak`?4SuarN!6DrZNV!MPK
zw#~Y6xVc>Gtv<`|ytH~P+^HZg&7VFy+<eV7-3cnevf6iF=mfw;-pc>kUoHHH=KPO|
zW=>RvV^)0VEEnu<5UG10I}<s;CN|gliL+-#O?iGm7Rxdb+nI8dn}F%j!v}hkyeoGw
zuEtTAWJTSpV3gSP_a%7;AC(adwyS9S*~Gn-eu7>N`d&5sFJU3d@sRQp9@u$sH0(A0
zdB9u{97KA31z1i*91f^B=p}MI-m8Nv0>&a=c@9`KflV-Ak7NFa=#0qo*9hV_eEs->
z$%yJOqME69egUu*9hFZtQ2mHQ)$0GhAB-q4|Fu;oyPjA*L^B3fuUNPI;WB2z{{w#Z
BHOl}1

diff --git a/resistant_lines_files/figure-html/unnamed-chunk-19-1.png b/resistant_lines_files/figure-html/unnamed-chunk-19-1.png
index e31448cb9ee91951acbf038383efd11a734133bd..812b67eab82551070187954e5fbf679ea94abc4d 100644
GIT binary patch
literal 5133
zcmc&&dpuO>|9{SmF&T1cUA~lN5^I#mYT0Btm1=A&mz1SKWsx$}D#@6R(oMxw(#>VI
z?4n89Xd;(UHjy;5r7Y5r%ZP*-w_%vyb4I_{@1O7Y^?UtZzuTE}<~h&j^8Q?&&-0w~
zoHJgVHq51%PyhgP-5G8^01!|BkoGx5NI7!PEEaa=c>U<R4t4=>0w5GPIRPj5&jF!)
zdwY9G!U;~HPN5v9P`(qV)dN469v&$kOr{4D{_{LiYC~0;p-vzaio%1#59KSN5H5lr
zDa;feGo_Zv>q>!|On5>9FNIf|0x7ldRC1gEC)5e*armvARwa+=!DBLcDNJ5%7q3gn
z4+Z>CCq5^X&u`_o!c)mtDr-|bYEziCJZ5c|vR0{V<v6wSIXJUb34g6hWfzaxRh!aP
z3jvh<{ryS+AP`i8qBy^cr|g1yI1<!`;!34*{ciChm<f$&hW{@Bn4ZEfB(;0^X8`8$
z+}&3D9?lqOo8H~pXi&5Nam{me`W@T&o$u+(_7NS@4IVkZJMqW);`28y6d#;XDnru6
zLFQ9|nTx4y@s&cIV)qL#JKuR)Y)rZF;iT?rN<YDT0GvKepqWvy({x~V^Ivyj$h~IH
zcFL%>o+ksp$r20zXOa~}0y!>XKLq3p$F~5q?|+6YvtDlUZ3BTLRV>gvw;njPD70XE
z{us37Dj?kQE}}tu!h)*sY%2ID6yB){bOC+A?5(6RD%%D$K31HgoYS5}I5P?sWkC;-
ztKB2<p|ubFg21~lAKGah%;{?Ox<pi^rA<0E4H!q+lcXndkat|3Z!{-fT7I2G>z1D}
zI{g9Hw%kGcJgc3%otCcBW+qx>pB_M<L(K$UwGI}tio?tfNgORQn!OE9Y_Jr9iv#GR
zgd-$=mNSvTCw?5uH~72s5Sg=&{A%EmmDi6xu>;z)X6>BTTpzA<b7LEH8E1WECF&)k
zPfQsPJ#V3lsi2M@tCsii@>v&xSweksYR@Kv@dwwg3Q#>|)PPu{c`Psm-ROEE2Vjko
zT<_qgVNE(%5_CtbB;2ZC1M_!@F;kUBKS?%AW<dwz5;Og5%<+*E43e~`5Kc5SI<=jK
z!7y6G=F*c?trq>9s@0_TelpmGk8OMaEdwV>H0U*7OjHxRzgT#0aJrL7YaWv$$z6C`
ziX`{oZ5)#Pef(2HSS$(`gYc(h^!|W7q4Cuh{VRk>nEVo$nrXV|y2>6Q?|VFC&xN9_
zSgk%Iyvq6s{j3)Gte+m5wQ|7VC$wNI6tkMYWBOn2PLj5=BE&<#1>xQ<)4Vg$DA?^K
z!1FTS@Tbnj!$evKO!j<(f9&}J7D=(rUUl}12Zp4#g%v6ODqYIHz%n93{}je&Lau%+
zc8F<8VCY9-hX&zL>IY$cfhB-LzYE?}4v}cy3y_GzZTjfV5~OkB(JIVsn2;xLbpYnc
zI_Om802wks@pxGcBoNVfIhcczXA~F}taEKIIAz{iIf!WwBf8j_qPfyixWVe4y(aox
zwrZJf6&VG$<?lvXwbp98?l1_?z>6|dKYT``e!~)xGcHv|*Bu|U0E{#(WZg{sd@#>q
zBdW&&YTN-&x0zpDVc!+q=#n@%PT<g+k>pV#x0hT#$_Z&5*Akgzi^gvd7-@IF`G5(;
zYlQgz2;=@hyc&Jz<u9?MHK7P2t}-w&oqdrw^6Aoj=hCANQ^AUGuk^Dzz}!mo)-wXj
zN_(Bb+LAET*D-Q@T!3)yp?h8Okw?~^E)}JvE}6d?r^mj$t@GKL%*jLJUCtmT+3DF^
z1e>(KzZ6uczIlD&!j~x<K!iW~#L^Ch9Z$b%>EnimxVYHK$8n<w7O*~g?3GpU0Rsop
ziVV|~uO$!4K!mYXwj1Ih4Cs6<&+m`8cX(dR-mJH)#?miS`@fESwNNzDMWXG0HTHU;
zsC(oa_FU1}36>*SG<p2?zWDmhR}~``*2~4KUsxNUSB_umtMhEon}h0kcU&^#%H)x5
zz@2huQ{Z~i)>Wsk{RVp7OG^f-xBS#k*c)aWhSgL{$3AEXKg{TiCz=%vcRe%acC_>x
zzB|M83zpRt*`kvE!ua!^^{wTGh84#P&f5B6J+=bB{H(F<vItg8V&>jhKg_0nF6!8n
z`n8};kf1=kA|1p-OfT*pvRzRUw&u0R^du~ZnZx}}BPTZlgl>M`wcQj26oyQvS6vq)
zyiyP!A!=M~g&>+j1Ew#Mg`elEL&94B&Y~$?qZfTU(OACI7zHgi{$jfVg6RDM#a%mq
z<gGm46!>h3?)~Fe{ee%G;2|n|Fm-{FG(ZbA#L^^#OLd>XYKxdS&aL*mLOK?!t180z
znrc#5nSCzvU#My^B#8=;@Kttrg%x-vxx{_GgN|tL!b@dlQzF9!+MC?)$0_P4A@a~H
zf}`f2GKi2ah^&SP0gAhsIKuUG9HCFJEX%pykn?HQ2VrHyJvjH}>cw*6qixf>4}t?)
z^geQVtam#BwIceo6KN9cPd4Z>=D>BxnHVssF@xkjC;i?^WXxNOE_Ipb3ZxW9oest#
z1avNz5oxK|Tc&A%m_q*d;%<E*E|F=`z`9V`Wlfl0n{9<GWDaWA9M_?bg5=uI1!0i-
z-NC}`aFQnGEBVk_I^9G3tvU^y$brZ}pW}TC5__YstLCvXH35%=c(gJbGK-a|Iz#wO
zp6>Xy+EYSW!zXjhGud)&JOw67bGWhsUs>r%swknH;0@irXj94Zj{1(Ii}B};pZpnS
z#{R;f9~^0iujK4laG}9kKGeN3ZL&~QpItFU{g_oY9Hfk0!=D~gyeX)za@0DY)`G+o
z(%D0gV{MQEnFg!c3ggQrZC@Xa?LQSXN9*8b!OWsMzWA#6i4N8$9Sr($?sS)C5Y_@G
z{MyP)<0BF(6OhWITOt$rt>a&bx_rk5giF^%u|yxN4mytZQ!nnD>Q)?LfnrCovSZ+5
zzV+nt#@Q-my9kz1!MBppprhNZrOfwOKvu;F<urfLf_oyXFW}Qu-OtVO#>9(5h*v>Y
zb5Zu2Hm=drZTp)>+8PUw!iC0`8Nvp|^%B{xsXAGGd=xu#DeYG(7|40_)pSiy_f&m+
z>B7Vu7VstaW(uMb`bNcOw%uj<K}wGKwzKe2eIo{s?SXh}q7J4YT+FUWA{oNRo(|2u
zg)L8;0JT=!%h_pfh2;S2@n1EQQ_SumffWrkAD8|%YHtg;OKu3+J^`*W0%)l?<hf`1
zg=Pt?Ja%{YQ@<bj!vd@9xxZ%%Gha<!Gm6&A8<v#i;s6Rl#K@&aNE_11`}p=3m7pEB
z#?MBD#734)e5w?y473}F@|rz;a3m|PLH70W8^7ZK+X*HEqbh{xIlb-U(<-+Vh?636
zw^c!Q91?|TFJyPgkTg3kaM^=X{IFvaIS-(!GeY@dn@CUd48V~!xg1O34^Vm$ch0P|
z5w=U)RVoM1=Xx#3E{4&gGuSS<O8-7tf6y`?#?D#EHDtZQL-!{pv!r)cP|;El@yxOS
z=h<@8Pf_J8@H3M4?JNKr+r>s>ji40=uGwcxYo1U5yk22lvk=#iS3|0JYPC66RbJ5?
zQ40Ga4j+dENHvs5?roW*l}PtM7n{1e!;lhLpg^W4caMNM4<Ryysw~lr(7lDMQk5EL
zIo#3s24>ldFw)o2CLgRxRsT6o`6&-`C~Vt-C&dD-mVRF2<KI0Ul|l}mdYj6FzH<rT
z&elfQ$?nXe8~v}PFJ+67mT5lK4`vD_ii%R}NnGCJk-ueq9d&*i5a00~yYIpTVFa%1
zzM}Wz0+C$WM1BT*CC{3mX%UE-s=racGGnK_d8Fy-vo^x*(ayclV>$>R+Ph?CKf0@a
z)^hd3o;{_V-}?{$C3f6%EeSl%P5p~loUo{n1=?hh^Y6Z-^^lw(!L%?yFjFU#E?V~@
z!ckc@mPN^#6K+cl!(B5HdEb4aJu!@raT>Dhvohu|wU<K;!g<DClGvL%(*1lD4}ZAq
zs5CruHMIy2SF5+@(QCg>;>35`V6s~<=3T0X;+@!KhJidS?`WG%V9a+nC+9~Uc2#i9
zLQgcLzI(qp(HuOj*x8J;8HiV>&f%yd485W?JsYA1^HCGbY!=Q6B(GF#S0QTvIE<`n
zE}mmiJi3=f5J&gngEwO8Rj%@rE5_c+)daIPd+oWkmO|bs{ZWCVFsh;=m+-xMV~WaU
z(Kd9Mj;qm2ye@-~2R)tpaFnk&*erJ=YUWyr^K_89SuZMxjWcz!zC{n(4*UV%60;~H
zb2+ooi)>M8weSR<2+>m1gq498)<RftdM+${#JR56)>Bkq;mftf-U<W34|%97h;)fl
z_gX_bf`s?i*<<sTh=}N_rq7UvS#X;l8h?gwee_=mCoz+ws3T+tlk?={a-0;3jg^Z{
zQ4NFTB;UqK#Onvr5y0?Kt*xGTCjKVeRvV}kYvK~b6-K_}?A6e8m9}WzB`WyMw@O#E
z?)B7VB+U!ih*D;k)f^Zo{%$(81kgt1l@!28s4OG^pX@>2{}p+`T;2V8DX8@S$NK+9
zz!HD%)f_hdMib`GrJJZBj0AQHDfy<mF3fb;Pmn~yNhe7_{~@fWW&_~$4(<uU`~bQi
z-@*kUS#BHfUE4`g$vM~e3TMse#lzwM{cUY~IF@o{+e3P=g9)myOZpd=1sVNw`9I%;
z{~*P(61JyX3gY40rXs{E-F3S0Zq=w|dQf5`l6mFzyP2BXRioAZ$5Zc6oF7b6%(Z(X
zqQ8-s9i84E*OXT^QCyyI$bKd)PI}oRk+(W7%%|Nw?pe=2(!S&FlyfJ$BZeyf3aY9<
z;2?jOJQQsc_7gkw8`u4)to%s0TKEBQ-~VAI;mZ1BG7$6aawqIY-Hs5JlWS~1g2sI?
z5)*uIL0<a6$3jcbor2<PI<ym7mVSS1?RWI&Zz$q%$?NBylx=Pj_4>z5Vl_u+8o18#
ziiV;3KEh1gLA{W}1`bQTS~7loP4?}+_Gaa$1N(c8ueUL-iZ!N|<t}%(Ij`OBN9@d{
zITpnaQ?rH_F!Xu0VySvsTV`Hd$+@UY-8*!bqV;EKytVD$ti6>xyoVT2rfyfJS56O(
zF+NmTViYxE?Xn-O->X}FmOB-ePO_=*ds9`nB}uRSPsF3}mgP#j_|+W;g15KVeOelP
zP~F2+^r>v;*JPxOkgEP>3ui}S-=>nb@x>N8r~g(*-SmN;H*j-9boEI8wT}7ovo{a-
zm-RU+mn2jDuh?l|A#vOF1=kf)!NaqT0{-V+^FW<c8fYOImDq34Cen8PF0pxNxg4Ca
zUpY}OfA*wbLkpGum^Gu%^b7_*wOxwtF*SAC3Exw+hh!Q!vw25iLzH@)7M61@<1yP`
zf6%|_9tBIfmQnS7a!~Sg{?Yq3yYzvEtmOV?s{=>o5jobjp?<-sZCQT;^XH!~pZi$2
z$#WN&*FF4!GIOFSe)T^u!~gUv(SLkDQj#B3x+i7ig*4%x_1xEOa=W`G_}ISzab#`5

literal 5692
zcmcIoc~lcgx3BI562cZXMI0nL2)N<C1tg84f(it2Tu?#90YnI>IA92*#RU)tqN3=i
z5S1BG7IDOYAP`Un&{3k`#x9^RB1>2UgygFZe&@aO-XHJGH|I4?y6V=wzkBP}ty@bh
z+hx5r&4dO3&~|ck*bD%Q0f019Nsz+Lo)HQwn(R$m*1{?POaOcUlL?scR{(rOix)43
zB!a;7VfqM|J|d=|&Y5^P&d%}99F8*w{-!&}SNNzTeVD)pvcg9o@)0Q^6Tw0}@tpW{
zPJ9I?y^YW3$3tNbd?778KD{D7y)C{1zDfZT2z;1OR3NGo)G5<B&gmRZdORn+qAk5m
zDe?g#AErp)BNEk#>foysDU}uR&K2>TigZpzo3cWwtP?QnL;|9*P6_|&l*+brPFqEM
zTLlDAc6N3u0f0bI46+jKZRyH3C`TYcX~?crDy#FJ?}g6L2zK0Y1OU@$;vY%)B>fQp
z!*@;&_FKZPbzKklu77G&Hrd0(1N-gRfPHRY3@PyVrTpUqW$Ny=E#{4R@14H(D4p_a
zZ*MhmT6`pH$p3S4Kc(cPO}k%v(kt84uWhGq0_PkO`#>CU6Hw`DvH$nyzzY23xKW=n
z|5*vQrfDlc&AWr<07QQ{*9Zr(V|6qPe>xth#=u$>B9zWJ#NUZf1$o7pfb3ZRH`!TL
zp#Rv_$%y_?)j~1P1=snUvKJqDe31clrg*{9byaC6erz&}?AXY90ItjELPY+6CRruF
zW&lfzX$yKjMT5$*b_1cA8M*}LTO+ooQ;rZN3*>R{bc`hP)e{@2nskuIBh#@y#b1=(
z@@SyloWcdgmHjW{fX0~RGzL}0^BO7rCjJarEhWTnPu&yeimieUa9t+m$fjf4Nq!OM
zk-MSu(UVK@x0c3x_<fu3Y<0=#09s>FMW!AEnXdCN?=BY=aX-3g(&5Yo4f<Q)k+K0l
zpAvhpGaBsG77oUe{h;Z`Vd((buME-#PXm9ON5<b{HScqttpDAuL^Nd7N3m*F9#vcs
zf5|+H?ToZ=B*r6U9d2sp97(0W2Oca1=y&;690EV^cFF0CY$PYL4KcBttm0-3f$?v|
zKM`B#lI;<1!ASEOJbUyk()WZ=`~ht{I!x0hMs~f47&`Lgn|2L0l|`lofK0Q!IOCgw
ze6UwWXJpv1a1{DxdjtolwGudw0j)6nlsXX;-Zc6tU8MBOV$|xq8A@J;zfG8l&HaY7
z9{1x>>047YFsTaX7|v`oPShpzJ|u0C#<ouQ<1P}cVq1pkPZ;iL#6TuYxM#d4I-&p6
z{1GDDycUaf%!a3)=u<`DKAdLv&E##g1xYOvSWHB8#P{-qB?rlAS%o@Nh%i1#e(zOa
zz;IMY?goz28IGTUe}Jhz!|^Tf@3w_>5jbqR3(|iBho|xM7>;mgRxY233H}5%+-?_~
zu>(mPzpsswE7h^x2?T%z_`>r)3+xvGwxu081`Nt0by;L9S=7O#lW!7Cg?6w<$QM~*
zR%O3Ey5uockgXJ|MuS`-ZMu{&WmJo`M$K<<23D##LH1Lg{zOvq8zyRN$keeheJVXw
z3!%x!mchbYgeHy#dcsjYRo)5Rk}3zaEv+L(laZ)IQ|yMEE^OA!+O5BpwFsXrlNAMR
zz!^WPNo=FcP(xnH!;Ph1){_P8FZ+WL9$`lDF5EHlJgMVD`PxGv%8<b)gSQU21w=A1
zM|^waW>SaK{hC)vpLFj{v*w2>r=n!_m_IC+;?`$wxpFvJE?Xskp0T<8NjEgvfMJE%
z+QlLv5u14)ihN`4q+(B(B;!JEo=F0gy&sTMo&xS*a74i`M!Fo%%QFSf&0an;qq0-+
zf}~C0;t%ijg&+J^c+|h^))zY7keSmYeOX5%elI$@+hzF$;m(6=mj^i8MCM$0YBf#x
z=|vnU*>E)_47a}YTt>qNPstaM(!$wgUzP^#m33)qWpfx$H<E>Mf4Qw3Idm2yTVXR~
zsZ_}a?$mQ&I`Y%<`M-h!_0^BbfV(+B6p=@Z(_udfpF-;3Zmn<J6t--PRZpSSG`5u+
zV-KD^QVYG=ihgxX4n#t>t{Tp_o5ks$J2&rmZOd~*th04^^QWBlGq<HBh{?fFcd*+q
z95n1&<sq*dAC;}auhsHD?w*eABu)2ZU_~YtMPui)N1qIO)oI>_K{ApysM%Ofl}Hb%
zvf!|`M4{HuO6rhZ2Bv>DO%=X9F&}lnZEGTfnJ#!eSr2C0VqnAjWxkd^1FgADvwJbw
zrJN#J8MHULe^`TEQZ6m+Ge-PXaWjs5Zjg7NTXdGzQ%X&+&Tx~C2>(r*!q(QoT@wlD
zx^@nn4o2e4*6VOmviy_}?=|Qeitn^W=n*NTs1PyZ>1as~xvSDZ&_VG**_1_?yEQLN
z^T`)VC(D&*h@7DklXoW?)_RK!2N@=(9v!;4%Dx?Q=9a3Khiy2Wr=v}uM9jM7B$-Px
zMU!5S#SmFPh)jLzOUG*ys!NFJTs(;pBGc0i_FQ>Opvnouq?4`Re<!}bAxVqSl8)@_
zJ*V0Heukl{bq>-Z)1x)ldrwkTbCDTRJsREFbvt22u?~IVu}RwW1R@u?Dc^XXmdYGS
zO9Eh9SFuv9!HvJ;di{4+qT}@WsQDMO0kxhr<P}YbVH085`GLt|OIys;Xxfk1Yjx^p
zODp_f@*14+7kaX_)l3+8ZY|EZgXVlHAJcU4CWXwc)}WiO#eb49<O7tB5Bn`J!2r;2
zxowGENdAL#icCE>2{Ym?h%5z%-xx3)nBWJI4n;@8$Lw*&0g#j1&tu@sFB<e2YWR?=
zwGLpru0mFagyH^{UbVL${X2(5k1p47`4x3AI}OtmMLq4&;9LX7kek+hP~=IbN<**j
zYDNUU#~jd;VS2(a{;)TT4chEip99Zfpi|iy{5p4U3{Rft;|kMR^r);>7ONu(clbC5
zCI7X+tm*MZvxRtz2ZDYzp-N|93l&|m7`PJwCVSoyE};$glv31Vrp7)Z)%>hW6}aMd
z5M~XZw@TJ)bpjk6_i5^FH4p|}T7&ngrJ1E91H0<|XyP2qP8OopyUSNkC<p!{QQbH|
zuG*5VZ15=06@lu0-3tvE?%-5mcD*h;7+(M(`^>zW$DTESGBVW=iCRL&rprSR!zm2*
z4m9z1k<5W_JJa@j?7BI_mIHmhJqk+TF=Iso-y(Z7U&-l|^q;a{k7rlE`npb-G;DFf
zjMsbJ3BM}~>wRFW`N?ga^F3w0JUlm2wo)uvAZ>t|xo0F=`oM0JCFVRnHhJUe$i7GO
za8&l;#RUz)&ZaD5ZhMLk=v%R3_gzut8oYL3v@RuyS}3)Dn#jE@>xQW`SK$V?B%BCk
zd2Ukf@6CJtCdls;k+Qs(R#f&?Pi0s6g`XQ=Ol4FRB=yI{fupb8v&xFR=00zHZp>(^
zOc*;G1y*+KcoF$if&F}opi`NDMaT9OnP({Ee_S;iZrw{xJ6`2`VYF@JQ{nRBXGRQu
zWIbOEMee58$3}YdM-+XYS>Lm%cHN6<XbrjJI=@Cy-C0br{-i=l&DS>TxfOygIeQv{
zrpi2)+u2v`qcaM?${tVqgs9`lGPwUBQ{BFnw~Nc~S1#Uz?<V=d@G~5dcFA_USw4JO
zLr@(D=KU~*e`)akfCD8BuIMm`7n(IScBN}bdXb^2Sf>X4W=uj5f5@HGK}Y;25PQqF
zrPyx!j74im{6MB979%elYTDLlUGx^1GGIa^w6t}-85*yjH3)ZNPr$>-;_waQx2K7%
zu}r!78~zt$E~)0H?&QtNJCtmiWZ$WWWw)i6@n={3Fvag-p?gU*D5ET(N~YQU{E;$j
ziK!E-Ah&7BuL^hFJ^I3~-quL3m8uF|C@M=zWFgO{!e#jN7uF!yL26r})nytP%tsS7
zu&nA3-3j^?v@P;dxn@evsOu{1G<ayYv7^#;Gc<}}gL|axA1brVgy;ez%(TZ%wkdh9
z(s>oKL0_2lE*R}~N>|p9+Gvu-o|9TEsiJ_3Ca%C9Hc_8U$mn5Hqx?N@$Wn=(^`U+d
zPH&XPFDJmAai-V%yWF+S7q-IAI_e4=->nVxJbuBK#ZTa(OFVJg#^sINvX2wZ8p5HY
z+^+MNiXC)Vri#WvvL6o|4bWdU|Bl>uiQNI{O?(NUi7h)c^CQMdof?t~(0ALn%=P`Y
zYeQqvZw-VCNj1CUS|`A0Ld9l{$n%6#oIo3o`DPX};fgz;ZO7~qm3?~xz`Ww@d0%dB
z43tXcQJmb(1pD`>pUtb-Lir;tmJ^}#986`;&J@UJ+tDWo3&EDA&$0Qul@su_VCm51
z?~%LLcvlGVeDJ6@c0@j;<Kj$=|8(4Q)#Cz1Zs+>yn|XW_65Bz3ap+z5Z*U-RI`*KY
z`*iBfnz1G_YB;5MOGIb+7U(EC0vGH6@QYEXOHh`}8JnsIaG2$395V8vJaQ8Os(~j*
zYzYAQ*R0Evx9KJn4UnmEJzW1kRl=Yn!^)1Auig<b)=8R=i)Gf40TV(T{-GoH)qS_}
z^5sYS`?JByk^97;k-=SX<iGDomet=dwd)IXKevI(Xj#0j64~Nap{Xl0O$fZ4e<F=y
ztR);}dM+sn?|V>~3hu2?CUZ9;o5^VgX5KKOut~xb8KqpA3i>2c`&Frxr(08=Km-^=
zi{0T85-j)Roh2;Vi)Xo>shjS*_l9&#y6`PD<s_2-h{pU`_vfDD3HJ#BZOMx_x71j}
zovpewc7<loH@}TXwe%GBHu9Yi&q&4b!Aqz)!hWy$oM^>paK@E{*UeN58<A1o?W76R
zF+^tE35RADFkB?RHkBx9fSj^&m{r}O#d`+854}>}#~Q+Y#x~eT`Fmm@Th-IfBn(fe
z6kkSY*KB*NXLay{h7+=K4fi|+WgopW;LJEXNm%i*y?#3(I|q9;p{bQj6_=|>Gch_#
z1kDmtk<wmOAJ<XX^0s54PWLZfRhK}|{h>}jtLp3mYrOa0NJg0c1QLwKINh)jqG#eT
zP^%61-Zy|ZlE#IbAq_QS3O07Z7fod2ZeYt*TLa-q^ehnmQF|TCG{g*qaC`9Lp$)RZ
z3ZH>xdP$sdeVUNM9-I7_U`#`5q(!R6*_eSP#Qha~52&gfZFdLyUZ}}-V)sYPhv)zv
z2+5BcC!0f+5>m(GpUu$3&0sD5vaWHP1wkV_GE_UjRA}b^&zbt~9Kk81m_^g$vH$Gw
z{&y7p{i}h0fL^s&ynlMG>Q-Tqc>n9wba-@!_Y3=9uTzy4z|w|^5<qD1uwG^TKfd#U
z<tux*h)q#%UZe<C98+&z*HR)6{O4C56jDcU{?Rz3CPRZx!e(GvAQmhH=IB!Z?`Hms
zkoq0CX}A`*awNw@IsC6rC28R6t(z-G$Bz_(cdoy!l~%hBpt~Y6Ml@1&Bs=ccbOq(0
zyH@R*DPzwOyEnKp4&m0f*T=EOwwW1)UPO1L80NYLWffb;7u9G4ubkIC7qy+$-Er1F
zmb7Hfw8Y|FE=}7;Nnvgo*Q#>p$(fZ`j8g8(EOjIv_omH8a*Xki(M-MO)v?XCFsaVg
zZuW2Egusj#>K{Sg0R}?uF4akF7#esNH|y(Urh@E<Jt&*KHC;KWVaV?xjVnytBPu%j
zBGKp7U!;)nq^3=Aw^$vQy%IHL?Vn~i9x@Wq*d6toswrtTi!;ODm-%#Dxf5uf5n38q
zzSH=o=C6qS@LgNAM?1R8ltYO}7>*uhO+S$~1X=pevu^dyX;6EG`V~-Lo1nSB%yMq6
zR!{p~-K~z=NM?JSz8*N#a?wW`OUl`O!pb_TJH=l;&+1vVxNP=njpnC_N7k*$%*{6J
zyvwsGVZV=(bGn6hNI6^+pM}&8wXh}gw%K!$XV-%Z+s~b+#Jn~_ZZh;3H2weh6E(1J
z(Xq~gJ}<@6D{@DhvuCLE-^wpk-kVe`@9C<%>UF@^O%Ev@=<{@X*;%#qyD5eU`tWh+
zmBQnCjO}qH?Jro)8I58pJ*#ZMci)iuI-H!7$5*u?7uN_rATgk1_O?BpFBow%u(U~`
z*<LOdJqOAq`Vb}Wc;R4El|_(zhfU0RDm|@yrp?T?>w@-?snv0BXkYJtxN3|<<uEI^
zEBps6*5Qm*jTy~e+Z!}zV20+XgZ)4JjIzw{y$r|*e^3bTJ%Q6&7l*9Xd!qgY$av*{

diff --git a/resistant_lines_files/figure-html/unnamed-chunk-21-1.png b/resistant_lines_files/figure-html/unnamed-chunk-21-1.png
index 9547802fd6f95dc72a2037d5177d625be4b6a135..812b67eab82551070187954e5fbf679ea94abc4d 100644
GIT binary patch
literal 5133
zcmc&&dpuO>|9{SmF&T1cUA~lN5^I#mYT0Btm1=A&mz1SKWsx$}D#@6R(oMxw(#>VI
z?4n89Xd;(UHjy;5r7Y5r%ZP*-w_%vyb4I_{@1O7Y^?UtZzuTE}<~h&j^8Q?&&-0w~
zoHJgVHq51%PyhgP-5G8^01!|BkoGx5NI7!PEEaa=c>U<R4t4=>0w5GPIRPj5&jF!)
zdwY9G!U;~HPN5v9P`(qV)dN469v&$kOr{4D{_{LiYC~0;p-vzaio%1#59KSN5H5lr
zDa;feGo_Zv>q>!|On5>9FNIf|0x7ldRC1gEC)5e*armvARwa+=!DBLcDNJ5%7q3gn
z4+Z>CCq5^X&u`_o!c)mtDr-|bYEziCJZ5c|vR0{V<v6wSIXJUb34g6hWfzaxRh!aP
z3jvh<{ryS+AP`i8qBy^cr|g1yI1<!`;!34*{ciChm<f$&hW{@Bn4ZEfB(;0^X8`8$
z+}&3D9?lqOo8H~pXi&5Nam{me`W@T&o$u+(_7NS@4IVkZJMqW);`28y6d#;XDnru6
zLFQ9|nTx4y@s&cIV)qL#JKuR)Y)rZF;iT?rN<YDT0GvKepqWvy({x~V^Ivyj$h~IH
zcFL%>o+ksp$r20zXOa~}0y!>XKLq3p$F~5q?|+6YvtDlUZ3BTLRV>gvw;njPD70XE
z{us37Dj?kQE}}tu!h)*sY%2ID6yB){bOC+A?5(6RD%%D$K31HgoYS5}I5P?sWkC;-
ztKB2<p|ubFg21~lAKGah%;{?Ox<pi^rA<0E4H!q+lcXndkat|3Z!{-fT7I2G>z1D}
zI{g9Hw%kGcJgc3%otCcBW+qx>pB_M<L(K$UwGI}tio?tfNgORQn!OE9Y_Jr9iv#GR
zgd-$=mNSvTCw?5uH~72s5Sg=&{A%EmmDi6xu>;z)X6>BTTpzA<b7LEH8E1WECF&)k
zPfQsPJ#V3lsi2M@tCsii@>v&xSweksYR@Kv@dwwg3Q#>|)PPu{c`Psm-ROEE2Vjko
zT<_qgVNE(%5_CtbB;2ZC1M_!@F;kUBKS?%AW<dwz5;Og5%<+*E43e~`5Kc5SI<=jK
z!7y6G=F*c?trq>9s@0_TelpmGk8OMaEdwV>H0U*7OjHxRzgT#0aJrL7YaWv$$z6C`
ziX`{oZ5)#Pef(2HSS$(`gYc(h^!|W7q4Cuh{VRk>nEVo$nrXV|y2>6Q?|VFC&xN9_
zSgk%Iyvq6s{j3)Gte+m5wQ|7VC$wNI6tkMYWBOn2PLj5=BE&<#1>xQ<)4Vg$DA?^K
z!1FTS@Tbnj!$evKO!j<(f9&}J7D=(rUUl}12Zp4#g%v6ODqYIHz%n93{}je&Lau%+
zc8F<8VCY9-hX&zL>IY$cfhB-LzYE?}4v}cy3y_GzZTjfV5~OkB(JIVsn2;xLbpYnc
zI_Om802wks@pxGcBoNVfIhcczXA~F}taEKIIAz{iIf!WwBf8j_qPfyixWVe4y(aox
zwrZJf6&VG$<?lvXwbp98?l1_?z>6|dKYT``e!~)xGcHv|*Bu|U0E{#(WZg{sd@#>q
zBdW&&YTN-&x0zpDVc!+q=#n@%PT<g+k>pV#x0hT#$_Z&5*Akgzi^gvd7-@IF`G5(;
zYlQgz2;=@hyc&Jz<u9?MHK7P2t}-w&oqdrw^6Aoj=hCANQ^AUGuk^Dzz}!mo)-wXj
zN_(Bb+LAET*D-Q@T!3)yp?h8Okw?~^E)}JvE}6d?r^mj$t@GKL%*jLJUCtmT+3DF^
z1e>(KzZ6uczIlD&!j~x<K!iW~#L^Ch9Z$b%>EnimxVYHK$8n<w7O*~g?3GpU0Rsop
ziVV|~uO$!4K!mYXwj1Ih4Cs6<&+m`8cX(dR-mJH)#?miS`@fESwNNzDMWXG0HTHU;
zsC(oa_FU1}36>*SG<p2?zWDmhR}~``*2~4KUsxNUSB_umtMhEon}h0kcU&^#%H)x5
zz@2huQ{Z~i)>Wsk{RVp7OG^f-xBS#k*c)aWhSgL{$3AEXKg{TiCz=%vcRe%acC_>x
zzB|M83zpRt*`kvE!ua!^^{wTGh84#P&f5B6J+=bB{H(F<vItg8V&>jhKg_0nF6!8n
z`n8};kf1=kA|1p-OfT*pvRzRUw&u0R^du~ZnZx}}BPTZlgl>M`wcQj26oyQvS6vq)
zyiyP!A!=M~g&>+j1Ew#Mg`elEL&94B&Y~$?qZfTU(OACI7zHgi{$jfVg6RDM#a%mq
z<gGm46!>h3?)~Fe{ee%G;2|n|Fm-{FG(ZbA#L^^#OLd>XYKxdS&aL*mLOK?!t180z
znrc#5nSCzvU#My^B#8=;@Kttrg%x-vxx{_GgN|tL!b@dlQzF9!+MC?)$0_P4A@a~H
zf}`f2GKi2ah^&SP0gAhsIKuUG9HCFJEX%pykn?HQ2VrHyJvjH}>cw*6qixf>4}t?)
z^geQVtam#BwIceo6KN9cPd4Z>=D>BxnHVssF@xkjC;i?^WXxNOE_Ipb3ZxW9oest#
z1avNz5oxK|Tc&A%m_q*d;%<E*E|F=`z`9V`Wlfl0n{9<GWDaWA9M_?bg5=uI1!0i-
z-NC}`aFQnGEBVk_I^9G3tvU^y$brZ}pW}TC5__YstLCvXH35%=c(gJbGK-a|Iz#wO
zp6>Xy+EYSW!zXjhGud)&JOw67bGWhsUs>r%swknH;0@irXj94Zj{1(Ii}B};pZpnS
z#{R;f9~^0iujK4laG}9kKGeN3ZL&~QpItFU{g_oY9Hfk0!=D~gyeX)za@0DY)`G+o
z(%D0gV{MQEnFg!c3ggQrZC@Xa?LQSXN9*8b!OWsMzWA#6i4N8$9Sr($?sS)C5Y_@G
z{MyP)<0BF(6OhWITOt$rt>a&bx_rk5giF^%u|yxN4mytZQ!nnD>Q)?LfnrCovSZ+5
zzV+nt#@Q-my9kz1!MBppprhNZrOfwOKvu;F<urfLf_oyXFW}Qu-OtVO#>9(5h*v>Y
zb5Zu2Hm=drZTp)>+8PUw!iC0`8Nvp|^%B{xsXAGGd=xu#DeYG(7|40_)pSiy_f&m+
z>B7Vu7VstaW(uMb`bNcOw%uj<K}wGKwzKe2eIo{s?SXh}q7J4YT+FUWA{oNRo(|2u
zg)L8;0JT=!%h_pfh2;S2@n1EQQ_SumffWrkAD8|%YHtg;OKu3+J^`*W0%)l?<hf`1
zg=Pt?Ja%{YQ@<bj!vd@9xxZ%%Gha<!Gm6&A8<v#i;s6Rl#K@&aNE_11`}p=3m7pEB
z#?MBD#734)e5w?y473}F@|rz;a3m|PLH70W8^7ZK+X*HEqbh{xIlb-U(<-+Vh?636
zw^c!Q91?|TFJyPgkTg3kaM^=X{IFvaIS-(!GeY@dn@CUd48V~!xg1O34^Vm$ch0P|
z5w=U)RVoM1=Xx#3E{4&gGuSS<O8-7tf6y`?#?D#EHDtZQL-!{pv!r)cP|;El@yxOS
z=h<@8Pf_J8@H3M4?JNKr+r>s>ji40=uGwcxYo1U5yk22lvk=#iS3|0JYPC66RbJ5?
zQ40Ga4j+dENHvs5?roW*l}PtM7n{1e!;lhLpg^W4caMNM4<Ryysw~lr(7lDMQk5EL
zIo#3s24>ldFw)o2CLgRxRsT6o`6&-`C~Vt-C&dD-mVRF2<KI0Ul|l}mdYj6FzH<rT
z&elfQ$?nXe8~v}PFJ+67mT5lK4`vD_ii%R}NnGCJk-ueq9d&*i5a00~yYIpTVFa%1
zzM}Wz0+C$WM1BT*CC{3mX%UE-s=racGGnK_d8Fy-vo^x*(ayclV>$>R+Ph?CKf0@a
z)^hd3o;{_V-}?{$C3f6%EeSl%P5p~loUo{n1=?hh^Y6Z-^^lw(!L%?yFjFU#E?V~@
z!ckc@mPN^#6K+cl!(B5HdEb4aJu!@raT>Dhvohu|wU<K;!g<DClGvL%(*1lD4}ZAq
zs5CruHMIy2SF5+@(QCg>;>35`V6s~<=3T0X;+@!KhJidS?`WG%V9a+nC+9~Uc2#i9
zLQgcLzI(qp(HuOj*x8J;8HiV>&f%yd485W?JsYA1^HCGbY!=Q6B(GF#S0QTvIE<`n
zE}mmiJi3=f5J&gngEwO8Rj%@rE5_c+)daIPd+oWkmO|bs{ZWCVFsh;=m+-xMV~WaU
z(Kd9Mj;qm2ye@-~2R)tpaFnk&*erJ=YUWyr^K_89SuZMxjWcz!zC{n(4*UV%60;~H
zb2+ooi)>M8weSR<2+>m1gq498)<RftdM+${#JR56)>Bkq;mftf-U<W34|%97h;)fl
z_gX_bf`s?i*<<sTh=}N_rq7UvS#X;l8h?gwee_=mCoz+ws3T+tlk?={a-0;3jg^Z{
zQ4NFTB;UqK#Onvr5y0?Kt*xGTCjKVeRvV}kYvK~b6-K_}?A6e8m9}WzB`WyMw@O#E
z?)B7VB+U!ih*D;k)f^Zo{%$(81kgt1l@!28s4OG^pX@>2{}p+`T;2V8DX8@S$NK+9
zz!HD%)f_hdMib`GrJJZBj0AQHDfy<mF3fb;Pmn~yNhe7_{~@fWW&_~$4(<uU`~bQi
z-@*kUS#BHfUE4`g$vM~e3TMse#lzwM{cUY~IF@o{+e3P=g9)myOZpd=1sVNw`9I%;
z{~*P(61JyX3gY40rXs{E-F3S0Zq=w|dQf5`l6mFzyP2BXRioAZ$5Zc6oF7b6%(Z(X
zqQ8-s9i84E*OXT^QCyyI$bKd)PI}oRk+(W7%%|Nw?pe=2(!S&FlyfJ$BZeyf3aY9<
z;2?jOJQQsc_7gkw8`u4)to%s0TKEBQ-~VAI;mZ1BG7$6aawqIY-Hs5JlWS~1g2sI?
z5)*uIL0<a6$3jcbor2<PI<ym7mVSS1?RWI&Zz$q%$?NBylx=Pj_4>z5Vl_u+8o18#
ziiV;3KEh1gLA{W}1`bQTS~7loP4?}+_Gaa$1N(c8ueUL-iZ!N|<t}%(Ij`OBN9@d{
zITpnaQ?rH_F!Xu0VySvsTV`Hd$+@UY-8*!bqV;EKytVD$ti6>xyoVT2rfyfJS56O(
zF+NmTViYxE?Xn-O->X}FmOB-ePO_=*ds9`nB}uRSPsF3}mgP#j_|+W;g15KVeOelP
zP~F2+^r>v;*JPxOkgEP>3ui}S-=>nb@x>N8r~g(*-SmN;H*j-9boEI8wT}7ovo{a-
zm-RU+mn2jDuh?l|A#vOF1=kf)!NaqT0{-V+^FW<c8fYOImDq34Cen8PF0pxNxg4Ca
zUpY}OfA*wbLkpGum^Gu%^b7_*wOxwtF*SAC3Exw+hh!Q!vw25iLzH@)7M61@<1yP`
zf6%|_9tBIfmQnS7a!~Sg{?Yq3yYzvEtmOV?s{=>o5jobjp?<-sZCQT;^XH!~pZi$2
z$#WN&*FF4!GIOFSe)T^u!~gUv(SLkDQj#B3x+i7ig*4%x_1xEOa=W`G_}ISzab#`5

literal 5551
zcmcIo2~ZQ+*6!{ElCUKT2qKcWf{I2*5DiEg6$M9@QQVN#1rP-t*&!q?ptvC94K5|1
z$+#i`#8ION2#P{PB~ca`cG(SEAhHwkcgLyvYpUM+U;S0@bvnJAd(OG%eCOPI``q)c
z&fBy#j5GiM&~|j#vJ(Ix7y!UlA`YcQ=PistUo>5JxY?tx0KfnMKY+mi80eJ?_zBmp
zU5k=10>h8t$7T2l8QcaZ><D&pN_Gkkb_zzX0;gn=pGwk?0r;V;=)o2G36&@l#)2Km
z!O4Q)WKpo7gTvt@qr$=HiP8kg0#UM{BUyx=N-hK7`Y}*ZuCRgIpcDi<34((K$-x3q
zhoD0#^aF%`3?bJ~C~Ocmpr=x(REm<FM9IM-L9nPpDN-sMxQqrN7i(-#qQ3^EvO^Hu
zAxiELp$e3}y}e2RKoy~4C@a?9Ay9Upa+oGm8f8~1l~vE*`=VfwPCD!l0f705*dI*k
z96AC3dfOeh*ttb!^f$#EYJ8)wcGB+W&6*;M6x$x5_OJYvlATuEmvuhd4`jTVXJCC^
zp<p`hovI!PymNiS-WO^4-7}|uZMz;*E5CSiMZt65N67LgxV+D+po4byuz4o&oSHuP
zh`*3F#|{4`?gFyUbrwZ)`QIC*WJx~f3@fPW<Vl<QmOTJ8d+@{x06ahTOdmnsOf_i0
zaGN4XjYb=q5keGhB<BD~bSNy&0q~2P|DWtkG4S}hzyKtTiPw}I-wMZ%h*y^!@6y|X
z_8`|>ou02YiyNtIgg(?yQ@AYU2k6Q00=~(lzdk=!9^wpd{4O>t$*v-U@5aQYuoV@O
z{?1ti+N@)C<Eu9-cR-OtD(+b&sbp|O!b}93*+hqzoJnwcg5pY6>>{^D$O`-I;nxaX
zGUZJo65YcKMe;t1H(=bI!0#+#X5!2@^*R~J&;_+9RXeX~nnGCzGHl-gBSi+FuP(n`
zS1T_@wgaxi_l$ps`sUl{s@k6dgzf=+f)kSLvJ_tP@Los+^m-{=et$N9c$bCe<O14p
zD3rAj%wQ9V8NhtrR=|`By)K&vb-V~!vlY&MRC6_@<4#;i{~i&Ok30;TwmN<3*&k~4
z<IA`h%FIi^0o%kMvdkIa@g61~?~Ei<V-N;!>0i%LNW8Uy0~S2yDA4p5Zx>*~A`<8E
zENN6*e8MHMA(x8v>#r#~HmGleMK{F)VPd3ilGz(Fcp7zZn;}i~*OLJ)i46L-%W-<5
zL?mx0AJpjD4A+ep0%rz_HsR1zP_9us*M^aj0DIKQlThgNKIqL~PwSyAa@29wQlxDH
zMbS12Ug@G$LBR5;9+a}$P-xeK4E8use$joJUWxVa4ay=qj;j<En(*5Xk$yP07yqQQ
zYP{qc3v=%wDd7G6iSu?77&67(fZ$N)z2fz`Lv}y(y(|VAQghDMA7>}q{g56sEg2eh
z6FgeS%G&(R7P8<h10BZ(mz4ZklvegZ%5FUHpa-a=FQI*#iN&uU0Nku2PPFWJtA0|&
zca1E0>pxcZ0HLV@s!5PF$9xR*rqAV%{7iCqQ5*`i#CPwHO*o8<s#LrN<0d|o>r!@J
z2Zswss}B7|js;G!es6!d479s4kJkNBvpY5did$|CC!Z<~ibwc=fSLV4sI^x}aL%C7
zB3h;v5ZJjH##axG&1VzM#?=Ok79XFk1H*<E(4fGH0%3f&9c27{A?@o-k-DrE<COVd
ze70fgID1l~wGYei7*gwu_IsS#$uW#87EhdtB29sDCn{A5>tzGCiW}-QDKn!#9E;aA
zwgNO-tMF#76jh!-A{kw^mX#~|)Xzm;v`~?J;h5f{uk90sKBaTcA)CBruk)HK`KrFC
z+NIPkl>bA|B3<M02SY=#&6g2=g@(lZwb&PNwNs4@!qU2t_NdPMwE%d=tpd5qu5DkW
zu)q`bELQXVsn<F`DXKb6zoaZZl0TDxK*tEK*;E4>$F3BL-nmNJ^In>|mu$c*RBD6v
z)qyt*+HX%-s2i@~UmWg9O-~o3E=fBY)%|3$qcQ~2$Q=p4WkeO1Yl{v@xJa%`g^M6X
z?j)XW?>zjfr>3-X^c)fws7d@<WlVEG8N4=n^yl8|j89L0JUq~r`dF$9X$U?V;bQ3i
z$S0`28j^(OZ%7;bGBDfKC+C`BXFHLy&;cho_%JN?kNPlA=URf@vpxD7A6;=*P?FPg
zcwR<Cmlxhc$Q)}rbm8GkMUt`PZJWhQ^#J9TX3p(^5Cfry7i+9$b_s{NZhBSU!BcMY
zr!9`3CW;=0E57Uc6cRr93*Mi@>rwe-_a6ec3w7LTQcuPHndtBP2@H&(_m5TUX!S(9
zH+xZK*$<U6hO1A%@w6e%BB$wD>y@78KmkE41a8y}#(45BKZ~N9N5&PU(sv<yp0x<F
zbYgNNt!&qqyvi?F1{-wh@Y4m`<jR8LV#NY}S$%A)=K|zd9M_9RYmu6=<v+hJBR^y3
z5}Zlr5LU&6W;1%XsZeOX_}e|U{W3z#d@N+?Pz@K;AZeBnuT&+%$SS-4_4E;FA-^{5
z=@gc_IhNG!h7jU8q_NXx%xF0x#xE!$Iy~nb1IF^FU~o^(%s_x@pcR<PzODuMxzE0+
z^0nFW^p~#tVjx{g*@Dfzk>&WCEL2U}Om({0wH#g<M<k{L^II(J5Z)`m(PJAn%Q%6X
z#<fC>T;P>-(mZ-G`z1kKq!y4_>+~bT$CeU1(2?V&G!K<8GAa2b=!Xt(9xa0m&XRO-
z4vlMt(UXu2O!_(dSN2(awfQ+Dk0coqkQSm-8n|0|X?^5XZOMLoN3>&I<P+s^(Ago@
zS+#02jE(=PpqOthO{|&4^@Z(<TZ>YF?wJ<wJ~mK*G7Z@RT07#yEG;rk`*J$Xd-ggL
zT!MTqg$o1FZ~etX?FvojGdS}ybSk-k2w4;+{;)omONIU*WtI`-o8dWN&8qo<-WsO-
zR)fN^-|~jmC?ayv)d*Cp9k`*1LY`M&Ah(C{dOHbLSoom8QvZ+x2tpJUqz!nW#z*au
zH?UC%3oAx)*FXztyi*fsgoZP(qwDJ|*NA+~!7#S{JSwUyx%fnP>O#IEVk;UAyD9Go
znIl>9HKvzDOy~F03)V4<2(q~@u*1j;b`$F}E>z`z2B*C=5lxJ*V&h_d%yYo5eUZ*B
zQsyXXtCJ$$WWAG~t11%4(~fnx_xLSvf&O^msc2+WZ5CzSs~IZZcF-BlZmO5P8*6y1
zmmsd1o*zB&I6@g;X)F`_9zMYDzq?sXP}gmQ`h()`JcH?j`ftg$<CTl~462ymybB-N
zyn_FQ<2l`!LuKn2YDBI)1nGTEMAD=!#rq5=-*pRtx8sh65_eZ7;Zw^h?IO9$TEr$e
zV{{%Zob>^(z@-gVyi`Ql_go?`)OmpOs@Mm-ML#fVCudSl(8G_sO8*_X_LC0$i1nL#
zsIf7PDCsR$Jm2@FAPRS(G3K2bQnt-WV#R-YQ|i$-HF5OMn7O!3<BPS-mLjJ7nor`<
zK*`0noV<`pWbZ8<qC9mu|2g1=cyadhQEiF~$GZ0BLy&?ZvD>}(R!iN+SWXoE%SuWG
zYCTXSPbp$XE5=H8O|aXniWeWY_>hQ9KER&uj6Z@{MA0f5Yfw#np9_*~O1pEgICc|C
zGvnv*F4wwj1i+jup~CT~q8dk$+zJo(UY5g)2B56Ku^!XABfH2joY*~}qE#W`yuHmC
zth-OxQqUZCO2Hn$6d=BEWy|2r&yx=bd77ecrVmgdpSj%L&mr4;@0*mYrgh)AsN(a4
zkJ%=QV^reVP+GoX@l*Cjd?s78$$_4VrnJ#bD@*Mj**0PL$WO$8S}B$*PZ=#^hm0hz
z$c=q{N3>nX8p?=fFxL{kkxngSf=9GO@hM^O>9`$Wz3ixR6wOe}t6#bZgFFU5uQb3K
zv9V%Ca-fP?T=A>Nu1XtVLgOdM3`v=s{6?Vhi!}b6ZdH)XtYBZ(_b(U{H7hQs%%FY{
zHxMgKT%S`%MygQ%doQ%EjZ-1<Uc)AGj?@Lt2QIX$NR*S5%XGfzBe|K0gRSrh(|HU9
z=KjQ<ts;8Qz-`VPWK;AJ^-SWF_WL%4m}GVoUe9}if(H8`i>FclrQjbpyxj2^ihhT>
zLy5~y6fzneo@YB#-0Jp38E6CEB?T;PSAohU^H=f?efYsM4<7kQ?)pL3<k#Pz@4_U>
zu(g%56BfV)@I#YkPesefZO8r1%=vnff&2n2GBkXEd$Z@y%LUQO^shj__v9MPh%JDp
z%X>>cx?+CslHMtlvuJSQi78dnVqoJ`rU&jthPiO#LlcwO4MhIEh)dVqnIiy%R8|a^
z-d_Rxr>Bt50@WSmwJ3O8Aav?t`bGVWqZ8lS+9%~~&~ow-)(IY{De>TChkIU29kG+-
z?6!Aq+<CxuIOOrd6${{wweW7{T1I9E(9aWTo`4TD3w;C0pN|1N|FzM$Cma*1N%7q@
zGJ73;8Go;bGI=N;FN?A<w}*3BKe;m%Ks?T<!#umxWh)AUPbA#i%iQQikPfGQLM@Wj
zC6aJb#r9BBUPi48v!oUK1ZaqD*6i&{twGxjjU^v<Ka6PKIDQzj^DH4WWF%mqduC>o
zpr$um5`*dFPthERt`TqFv{YB(25*$g_oJOg0U9wr8}6g9a@A<v^vH;!JBXL9BEH;T
zkERQQtYHkL{Q#P08Qqv>M#`;na!+Jwx%~7i%o13NNLe=2^&bP#_}|enYjp9#q8J2+
z**234{V|ajI&o!MX0q0(so&yWHa0P%S$n|GYI^0S&(L01e<)fV1^*+RCvU7h(Fc}k
zn5CsW!syO0Ks|&ZaT%d8g=oH&5J6v75}FvuC-4F@viaqmx_|Vd3)fXBNt^PaybeRb
zfX0%C1RqCDNz&lrf5>k^*0D;ioxto%B1po~b%vy7sL7vfzKG1$Sgix2pBDJbuE;My
zy>;YLegc#PNM7YzgG=;aT?xAQp;HIi4A{e!-V!HNRD$c6Q5(camheh(fv)Q&&<)hT
z#3lwLfEg#UsUR(7-1nhv>Bue}$?)N`tN7a`U*%qS3n8$QocI8ACj~}(agnVCK1oQW
zCo07Pw~~4qM+$!eFRdzB4@Q-f1zPAxMy6=z&|1cSE`prx<sAVaqg>8aFk@;pS}ySX
z(bsIwO>k?(5{5b3;YdFFw)TInqWxzD@M=Ta)$?t0i2t=R`k!_B-*pMoF4uDXAjnr0
z??1u6tjA-ex-m}g%+C~buRy#SC8?@+EgZ!atB(7izu%`J8I2KumceJiNF%0)(gr8n
z)aLV_*jR`MjdFvV4gybW@oxZhg98WK!&-noxCTHsJ^q)lTL;;9;a_fwWOab(#Alwu
zR(jA&Mp7O3&wSS{0`^jmu?af~p?g+IN3Gn!T$5G0tW5pZ2LlnbU*T)1w<n4ff|QDa
z?I1S8+_(DTeQle!6#qQqazqz+^KwL}(C$1g?J7Bod@XhC$_(gr`F*9od&2z{8>)tP
zU70zLbFUF3Zb!Q2(QbrU6HorWcs&`urh8ZWd0JzbCog;ShI>n#Ik53YKoBA8NX%sK
z#DYEphJxh4zbAjZFJ~m3-f+8fzXW#|UsaQPEGty+hAqFhc-n8LiNfywgnbyKEM$;&
z+Grk7Hwz2D_YIdNy<ThEcd+Q&^(;?^eV(ML`4PSjo@PNMbkmANn$`PbL&Y0A*HGNt
zTV8%tGb>v0i=gc&Ye!ISTmV>~fj=4qSy}F8B)QCU?Kj@ize&bGJ|C_7bJD%=^DnG6
zWL-Dyf~nn@izUwEa!pgo#QucYt#81UmAAXY?u2jtdhnKU>$_oV{!@a}e93UrYWXF^
z3)z+`HFu!HVM{y)6%Oxk2fxkvcbirJ=T4TY5nprhR%CC1lrytikNH{W_D+04P5Z6!
zn(0zy^Qz|Q?ba8!&!X(15AHtY#Sw-c&La}D-@bg`r;~)Vrk!9lPw(;#BW#5uKax2b
zkFC)eBy(a$)r!xm$6s#(W>Gw9=GI9Ma^EhbJ?V<c^PclIrhd(n3rI=YU`g}jp#R%>
zoLZe*Zg_lcdxi5|QIB&Hk{A8R1{ZTY+;l7Kx^nQaxvf#t`B@aVlrR1=dbXG5zxU~1
fZQcD{GE0ebaFSi3pAlGM8?TP`&RcRf`NaJXzD4@=

diff --git a/sl_plot.qmd b/sl_plot.qmd
index 8667f68c..87314140 100755
--- a/sl_plot.qmd
+++ b/sl_plot.qmd
@@ -12,7 +12,7 @@ source("libs/Common.R")
 
 
 ```{r echo = FALSE}
-pkg_ver(c("dplyr"))
+pkg_ver(c("dplyr", "ggplot2"))
 ```
 
 
@@ -48,7 +48,7 @@ The singer dataset does not seem to exhibit any dependence between a voice part'
 
 Next, we'll look at an example of a dataset that *does* exhibit a dependence between spread and fitted values.
 
-## R's built in `iris` dataset
+## Example: the `iris` dataset
 
 R has a built-in dataset called `iris` that provide measurements of sepal and petal dimensions for three different species of the iris family. In this next example, we will plot the spreads of the `Petal.Length` residuals (after removing their group median values) to their group medians.
 
diff --git a/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.RData b/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.RData
deleted file mode 100644
index 1c228d7363d4976a5125f773e17db7961aaebc51..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 163
zcmV;U09^kciwFP!000001`BeDFy@NjVqjokW?*4vVqj(kG8tGyL)>&N7#LWXfE-2!
z76wir?V?wl6JL;%UlO03n4FQSpHY&VqhFermzbNHqMMvinwPC>7;l+kWNvC{nV4pg
zWN2Y(Vw99-YGIjTnv!anXlj(2k_I$K0Ljc~D=RC7YQ5ytoE(LW#NrHFbt>4QUdzP=
RG#6<6KLDZlkt*K+000-$L(TvI

diff --git a/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdb b/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdb
deleted file mode 100644
index 9fd2f85dea6f0bf038332de1bf1ddac0a8fbf453..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1370
zcmV-g1*Q4`00@0}oZVGhZ__XoPMTh}icJiVc;Vu0n)<R-ATg=RxM)J#BOr|--YPeC
zT5E2c9XqszKg~O$!Aa9Lb<@H#mJ%oDeBXDD&vD|fP0O+ztLjuNr=}mR+Rf)Hw_|CG
ze)+BEik@w&YVD@;Sl@o>YpSn$(eXpyDu%JaSr0Hwa@XA4yv03EFUJb7A>a5$p(i9w
zL790rrb}%nF~n*l;uDzZ)RI-=s`g#XsN$0X#5N%NBMf2N7h%AeujJ+|7L3Yk*T^Sb
zLYqrf0<Lo$MLe&DofyHLtD6r7VJC<~UojERDAk;{Xn+~u9+qu?fC2l8LWzGr!u~Dp
z(=Qa{LN!yI78Iw(m8<L~C5p8W52>6vn#q!2CmYC%TBKznL5bv^UIf7kw*%1HhV(W`
zN5o}ScTV1(EX|LS?av3LtIRg6(XV<SV2IO*_Y2nQKn=Nxq|(Qcv8h)OO_c^{W2L~*
zJ4s97-o+S{a0!zs&W%9$R7w{1-yA83>Ct+1mgUTH?@Be{8gIr8V$QoGM$}+Sb~}-f
zEZ>GJYvnXhTSD)E7<FYt{oJ>|)L*YaPjAgWh&Uuhl*Td1hC!%d&iZCXwr`?*!G&4V
z#_?G;4D2pV|43b5%2mAmxF>*6@X*U>jHKX<pwWOSiVoQ@5}<IX&YP$>0ud@Vz(d9-
z9%@~S7<`J}3qsK+5Uo?x`WVp=UE@%;3}%E0(S7pLP#fiQkek-ud-X3!VEw^gpjpn6
zeWxCJ(eBWp;hxpN1x#2hJ#-e0&(~Z3Wd8MJt$z2j*y^XrS{tq|E<2Z<nfsaPp7-+k
z8joPO1)6UNWVmf>L$|iJXxWcbbO8+W|D!EsUuB(8h5bS9DHe7wKOVgNNG;M2lM=#%
zIiYx<mj?x^V#rUNhl{`Y9}eVRO#lE0ka(QkRZVZxFc?mowOuPVp$U$Fw=wmyL?AJ#
z%J|TPwkv1@iCg8yPHXDKp6$>U{xo;Qf|I6e;-rN$mJ%m^pZ9q`ZGY)mmStNzcGI$3
z`qOHC{&eLGEWM(Ce(SlZ=Z3Xob<=sSU%&Kor=NCF@I$|v#$tz(k$_^6i&o3MDI8IJ
zIadN2^qp^5jF`kJC|h2RyEV6+7-TKP=|U`dT1i>4%zYaZtmvWuX&8|G85EK0vnZg%
zS8}r#_ZrRDj^R%lf+Q@e0k=4m3fBl4&kd69wOgjSrwHL!Cd$q{$WyXcNli$i6}S|q
zEiu>A!=ejrPFf)DCUrqXFvM~x=p_Y(65I6#rWK&A!*fwk!@mcmi=cvTAhaRF&NfP$
z#j1wSK6!hxUVfZx|30V<IqO#=hwXrg5Go_^orwymiNw-}-00~NqNh>=E>ubwd?#rt
zoZA=*#T-OrigUPNK9-V1<2Of2#Q3P1opm}h--l8ysK%RigP79cj371H;@vK1lBi`b
zmSUwiP+Lsz3N{-`j{RJ=zvi!IU<Cc?Sg<%khLz4S%7&rPf|QI+j~c#-@)>1jPCLhE
z*)XtOoE}I+U&=DRaX4ZEVc~(7d=4a|1cBLvC=3os$eB<uQs+HT907}z6Tpzrg$MdK
zEEYZn?-|12qhS40(Eq@31a4p?`-Ucm2<bX`si}?hImk)#@4fmLq#)zTU!a-Kl6=P=
zc;OCkXo#0Na0EmomL53c^Yg54y!5Nu1W#7`C@cEApT(j-O)3Ssy0{!%4wm9)rg&9V
zP|-tBOa;zc<IoT{dK>DtwOH%QoPrBMApPG8RJT*x2rKAMtm;9&$MwF1W9;R(Y*GCv
csZlssDHQMcdZPlXSmYPnqx%#74^Hb^=3?fkP5=M^

diff --git a/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdx b/sl_plot_cache/html/unnamed-chunk-1_9d27599af8b18542bf589d5de9a52edf.rdx
deleted file mode 100644
index 184258b476e73f1486a28f428b51a6cc47dfd986..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 158
zcmV;P0Ac?hiwFP!00000231W<3c@fDeN9rN0YUH_?mdAA5QXj})=@<JA%ULBbq}Z}
zGm+wAc)yu9wFRJIw1O@pMR`2zHd{cgIS^EFmKhUFvrb&S0F$x;230EQTuUL66)%ao
z7#_FNNdC98X92wP6G%z%$#;+pmWz4*a-EB+(fPYOKjT9&tfwn^>YCYU`gZUX0$oz+
M7ctB&F7*Ha0HOXtv;Y7A

diff --git a/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.RData b/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.RData
new file mode 100644
index 0000000000000000000000000000000000000000..3734f719fd47ab1df7d2c7645c8c7d7dcf80ff1a
GIT binary patch
literal 814
zcmV+}1JV2+iwFP!000002JKeePTMdP4zwL2(zHpufY+OD5=q*$9bF1Y2sR0A(hv-Z
zyUw-U#H$l$wlnAu54RU%v)hKY5e&9*F(e}S|D5yroX;or;oeEpKCvy!Dp}>yvQ?_+
zu2nhy^v>y6R(V+umaMY1s@pwRvR=x#>LG|C;zcTEUX~;<CfGqymJA)g2j7r7Y9qfr
zfPTG!n=QZHc|Cx5V}sQDe&e;a^L%D=<wp<%;M_%oF%Ur+ZPo4pqjq7>%sM<%X{H=Z
zWy;{_!v1W&^DSff!roM{&j`R!LFa1*h2log%sHvxh)7A3aI30BMydcYD5V~l<tmVB
z#K>0llwuVH0A`AV7c@?}P%u$lP~En{riuu}x}$r-G-f7OROC!KkkK#+7#XN8;*5&`
zh_DY|cG~M8FMhlIYTj}mqG2d_mgs=YsrY_F%g(BT)*Ko@BvC|k`&?k6)f?#<kepEr
zP9v(wyq4MW>>KbzIRh9|HVQ!Ph-U&3u*)$42ZGnuLG5Eo5^w|)Su1F!5Mv$4z(Cz-
zek$acXaudhND3N8w}_7SEa`U=fV$fuabbB914lqiGZ}z(de*IO1Dvvv0GpnQ9!YyJ
zq=ljRZ}?ZV>DJ_&8IF^1Q}sC>EhZzrg;xy4P!N0<Cfjw*U(?U4zh?5c^v$?h2Rnj7
z_OK~yxDB^u7{ZTy{11FI-PRl*lLXTBByV)bTzuR1<OVfYtSN;@!v1|c5_&OFP#as*
zMH?@f)?R!$SSv$vAZVfr)0MhgcN<!5Z9KWSxW5~C$C3!?#UYJ(g1wzI-P3o!_kknG
zyhHDlCJv*00maB`xlM0qTz-3|1oWnO&J<w5>x%JD7SPHA%7|_+r)7T4o?3Ii$T^9;
z*wei)O<+ntr`mRI*}&y-_@@1#JedwlQlMOF9K}ihi9~{?Dn}n@nT!a@XUgUunXf{n
zG<UI1iyR}>Ne06lauqVxGtS9k7{)K8f~(KW5$Iu}Qw5U*jV3-`%jqgJ2it`FPgs5b
sFRWf6&hvT|@SCVC()sktjEiKE(Few6x#;}$1X`EB06-DZk~<6l0Kq_pIRF3v

literal 0
HcmV?d00001

diff --git a/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdb b/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdb
new file mode 100644
index 0000000000000000000000000000000000000000..ad115d6c4fbe17a2edea40b4e9bd557bdc4f1221
GIT binary patch
literal 320
zcmV-G0l)qL00XpmoYhfHO9L?w&3@F<1yShl=%%6v@g{zN=%I)OZ)KVtcjIQ$B?)T(
zyqdL1SwlUDClABS&YR5JdG9eJgd`+QVv-DONe1(W>&dAt#x`P$b-5clv=Nb%jBFm(
zI8$7jpgox8)BMOj8-F#wgEtpvbgofp+LXLm$%3A@?IjqXcPj>h-qTkuCxR~(s5L#w
zk7*4{fmd%v0d;&6N07#SRtXL2fGvIE0&RYG(Z@2kEq~U%2_KpJ_h>^CeYn?|-`vr8
z9bW7`d?npyq80N~4H|Iuo@R=-#<Od)7N{#k-$^Tk!lPgeu&P1n(P0a$hSF1xK!`<m
zoDOAR0(2<DL1h}TD6mCYpk(XKjXOOZ30_vFll(WX-u}haEo0x;t>8ad8QQtOU6V5%
SI{MGtjKkx18TbjR<E8Eb+?p2v

literal 0
HcmV?d00001

diff --git a/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdx b/sl_plot_cache/html/unnamed-chunk-2_a9e0c5c25fa201d342586fad77e0b216.rdx
new file mode 100644
index 0000000000000000000000000000000000000000..0335129990d7a4d6ccd6da081b0ea3839f5c367b
GIT binary patch
literal 204
zcmV;-05ks|iwFP!0000023<}~3xYrpo%Q3O5Cr`WQ@8x+)+y*-&`s8L#7I|hwVz+D
zu23}anBl#ddGF=|fC-jqfN84{?Ca&^r2xie7IY^HD+L4QB1Ztrn0X7F=}52!r5e^h
z<asOWtgG80<BV76S3^_#qnK6;k5{93cr;@N40yz8R5BWb#cofdG%i_@BpBp0jI#y@
zrk=f)B%qzidocs8fxDz6f4aGZah|Ndv%FR*HR1MHVvmA<8QwNsk5XbWJ^cWqHcqS>
G0RRATr(0V9

literal 0
HcmV?d00001

diff --git a/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.RData b/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.RData
deleted file mode 100755
index 1e5b130ca73e774ab5826b374455855087a3a83e..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 783
zcmV+q1MvJGiwFP!000002Gx{XPunmQfCFte5oy{a{(#q)ZW2k_($bQ)NC>tGY0?l3
ziMP(R-NvgEXSOq15PzM`P8-@rFc{*6NWPzo&-rqEa(KRNpWBvY6|7=m-71vy)GD2Q
z|Ln9atGKQgYgW<P(Bq*iSwCi6^$|n?@d6bxFNq=;66~NLiN;R7k1-jxYNXlTt+mNu
zw}E!6trlwS42F%JR<%*pcHS*)7B79@2Ujj4jDY~kpjUYYAC+r+Vb<Y^iWB8vDq{wx
z*Y*$dUG<FRYrCu9fDwS9g3hl53dN0}*>hsS5s{Kcqh48wgp>hdP)fZp$7LYZl#yQf
zf?^f;049oq_cV;TP%u&*P~NjaR|N!OJ<&5^2D6hXDl$<HWONkyj0{x=amIxY#ApCN
zw3}NXYxQRH<Fe%eMB|a*Nu(39q*AZfwCtkGX)SpJh(wBr&VUO{w0bR`0LdA};3A-k
zENhu7FTNp<lrw}OWm6wiPI)2_0S6ota4dLb3sk<vBm$=}l9ilh3^CS;^o^@~&Ci7#
zlMTP|7)e1#!2_b{oh7{_KB&5F66TI)IdBBTG?6}N#*<EY58#+h1?YMzNZENQJhMz`
zcGZC6=_*zH096ddSP=Xej?Jp3w_VS=Cv*HKyalN(urDZNFB@3Rt+@?D2rq!?e#S{p
zOvUcmv(h(jgK4?f?dUmPw|+<z)W$Y-)5Z&Cv{#=z>-Cr%3mU21cB$%C-I`Y0OgC2#
zza049nIuAb;fRLZ+mGWz{bYGxIfBeP@h)iOFgg%WOudG??Tt;qpC(E`Z|=>Rn_r2!
zWTKNfU&SG1M2|P~wtQyKt+_wtl0??*`OVj6ZVG?q+ID8yxXZHeTSr5AG+!2^K$%pU
z!`b|mM1saD^Pbk23<$|~il!p7Q>c_C7wV$Oe8jrM;3#vs0U7I?;AB1x>BF82^{x2<
z`k3fK!6ZV{S&VlQ-C*XoHYxufrbka_dh2hQ>TSC31DS{U=GKghWS-{>V_D1xe>Xns
N<}c^bv~}<Z005Crdd>g<

diff --git a/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdb b/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdb
deleted file mode 100755
index 2bdfa73a971ea1ac53f790d0d68e967e0a8237a8..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 318
zcmV-E0m1$N00XdioYhfHPs1<_O+Uu8N(iL=jx|GYK->^tLgFwXCUKj*%&ehlRwWV8
zKM$lVsY)~saN}Uv^>h5{_Z~AsNJ7#iCdt5-WH5iYo}AiZY$LW<o7<s78xcv#$mU^*
zGsUF|+Jk96&5!J}@mKRZcyn<^=Ngr!)tXludS2I;V1V9j7zlb#U%8wJzEq$ZdXgX0
z5|#q5-i!k3*d}g$8uvLRRHy^4^oa|!`Q1ey%iOm7S@$M<WbV(SElu>{UT1!DOXpR1
zvDfg8bf1Y<%uiKlz}0)2DP9}Tu1zCQ7l^)-76>bkf-%5~3Z+MfHLw!ao^k|2EZXCA
zC<7CqLm3VVQ;Ee2Ym_ULtl8eU)6tRO>%z2>|HjkXzkAy8^<C}c{>jMD%>8an&UEPK
QKl3sUkKbkACj{N3Mve@h;s5{u

diff --git a/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdx b/sl_plot_cache/html/unnamed-chunk-2_ddef71e58918eb94c9077c76bf467040.rdx
deleted file mode 100755
index b57d653dc6adf91c590ef21f4c733fb573967385..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 204
zcmV;-05ks|iwFP!0000023<}~3xYrp9alXh1VO*U)G${s9fR%#-IjHC#Asc`kA8l&
zen8Q{V}|!;=DnK-05&)_0oyerxYx_cPXWkw66S6htPKcEWgP(=GVu<q#v{!u?98zF
zA<w%`u}0NB6I_%SlzpXwL657_7v-QI{+>yR1&#2KW>JcH7K<#TRL~?Z;)I5A$SUl)
zdG=b8!0c?j7c-bO@RpR;pKdQ<R!`pEd9F;#nebXHuthDtjHs)o#jZm+KK%edgA1D)
G0RR9DMq20q

diff --git a/sl_plot_cache/html/unnamed-chunk-3_9187cec471b10956d63ffc9a30e6f07a.RData b/sl_plot_cache/html/unnamed-chunk-3_9187cec471b10956d63ffc9a30e6f07a.RData
index fab7d80f8f981be205c8c35a85431b9a60eea1ef..f8bca39cf908477759f61672a9e728eba3a2772c 100755
GIT binary patch
literal 3142
zcmV-M47u|kiwFP!000002CY_kIFx-C9!o;JNu;tp#x@vZ8A)T8EqfD@r7>onF{3f2
zSxD9_Nli7Og(%UcBx9$sym((rQ`ss-jID%9LaC{~QSaOPUElS6|9!vfdamc3=iKK$
z_c_1w$AfkZKuQNlLm&__h`5+2L~M=Fgsk!NbvCqsK*U9bjtE2?A|-swAkbI}J}MGH
z2SL2hmxVw?X%GmkSZIqn*xvW!n+x7W6{DA98`OZ%Qxg+6O<+eNGNb2}EFPbF$a%h!
zbm_v0#44bHp<T(nWH<diBge`wQ>KHQ-}$i>8Jw)zxY%;OqqOnc4v&*{tpoNKi`&+&
z=sbAj>UQpVbW_zvPL;mwgh&9o;&|9yae{u1OO0}|YL-lWPAoYAMNz`0?|fv6$%Xp9
zG%dbC-GV1(TiRbUd0R;5f5sIiE)K;>?Hwqv)bHm=E0u)KeLm<J1<{ee#(G^EESUs1
z?YV!zu)2!#%KhDg-|n6Wo0ed~X9<d6CReh0^O<9ZoT;AtE1hUvB+b62sPg@q9D=!r
z5`r=;`(biLD?{e7bYEQ+)0B#N)UgZlWc!<zWTmg)+Un|EvBwFYdP1Tr5E{GspS>0v
znteHm3bd&5P!X8ts*83=F?CqSWC}ZXkIxeH8~fja+dcieMy_4<-i$1hi2L2#aZAX7
z#hc0g5BJK6M)U&E<Ej0}?B!j#lUGkqn1x3;H#Vvk+M1Q@56%;LQZzM-3QoF+d?Mj|
z5X(L_rGlJrt?YfdxRQKUYGD7AsaT0~X<!h#+$O?@l`0cF3VPSJtF0NqU*#@(JkCM{
zpE~*SmUxHA%vjkTEKgFg2C~jW)$DcMmOXU=bNPhdI}${QSCz9j61WaQ!D5SZsFNR8
zP`z&+y&F%<6d$;??~8*XY^dq(x7~u8wk_TKPa4abc$XFX;cs~3=#E6MdgqyX1>D2?
zjyr1)S2fzim+3S#bLm58OL~<{-wtd@+1~mz#C$EvUyRSOfhzPKDs|NlGTrl{-YE_u
zxftV66BM-XJ!O}i=CYbGt<p!n{r-3H432(XNSgD0-?Q8D4@ac9{85qIr9Ltxd7TE+
zH_rB=_D5HIdoSgG3AkYkYfAoH+7*kGh}+tc<|dZpQL62&e77uT6l6p!sSH+z(2)4E
zZ`{XGy2TEGUNPfpH_LjeZg&COx*{552URkuN2k7g#l{7*KOk*K!@9B0227?(pZ1Ku
zeQ^51pZEi8M>pU|Z}o+Oko9+*12;jTW-ajw@~PQOn=AI2#%xj9A<EcH`WF09^=&b*
zKQ9e>KR6q49J8>4w(U>O7T$9DK`74RL&CW{c8uBsze{I&;Q_;^bMJXqkM1jd7Cfz(
zlfH@9aPG|3fS{d5?~kIvW!PjY@}BOxi>DJ*s9_8(@A$wg(`naYKaDh(zHoBBSD)lt
zI_Bl@tk1U4U`oI}6>8GM*?%Ui*6qf$a<L^3O!g93ji)XQ2&$5u)<PCt@uA1^2)j`*
zWuy=LS_^r&I5_9442a%1UBRa{lX;$R^9%W#Ra44RWTpYp(m5L&qE(42i`M5apmw4v
zw2rNNVo{TY-g=<Pw}-l<V>LnM=fHyIQWU)0TlVO2td=4vZ1MIqX!K&a<k7=sEV!Yg
zikKEPtCK#NOw3kMFvIx64ybjaysudFXny=e){pzG>SYO8exh{`KXnMl>+8_q8x+By
z*5DK@;}A#Y{-z?UhP+P;=Qx6S-d=ylDqEER-A&ObX|~UNS>rPIw|9LCRK@sK1Y0`P
z+h#2OthGl^Ul9>%@SbrqW|s!*qWcCee_F;g-r3*Ifrzehcd~Z%o_f;oxFA)IZ**af
z$$|S;(%j|W^xY|JxLnJtyigfh%nEKDb#Z__8Ez~cO?9`5%^juL^nEw>?@rSad+uOC
zHg|qLDI>-%vf3=j*gck0MA3Ax3(tcD@5Nhb56<|os>O>eHhy&NDYudFgeDH__$H&@
zJx@-y{I2YqK`WkSS%iI7pH%mm``iLA5tuMqA7^D{w~U7(v&C7J#Y>@(3fFNs4{|d|
zFvHs{2MYFMzgJ|~`Om9II<@<+%?<dHw(YR`^i(-(n8dxqJM6ou+Ork;#S&;DuH&kb
z+kNz!)yI=Cnndu!D~~m|KMTxTPz%ql9E3FV4lrETKbO1}Mrtr?s_(gX|MuM7jEo#o
zKfEvHd}pZ3nkyb=1+M@p<69{Y^Sh=$1!vD4vmdbvw9cdLYsOHQ6gFs45+7QOq`k;9
zeah_VXKvtL1Hy97+ts8<^q*;g)+Sk*R7A6VBKAP@qW_fa#@EW&jeN}4b_3*d?`kG1
zxMLJJ2AQz;s6y1!`SU%?6EozKSQ#^Umz=DCbzeg@Z@u?WEGprjOtCG>6j^`M0J6vu
zN6@*4)(_H-KK(HNEzZud-O)Foio`~FowB3i{T8e)ro}1rb|$t4rF`Qn)-T2nK<#?i
zD#)Tg+~i>rPqk$%TrYAZM*lEvtYo#!Dvg+7boO>~bk8+J?B}!7<`2(Z-f+t|Gw)&6
zd`BEG?0bM07$e{tq|CHN2LLdp{kl>uuRQL~8mEOvO4p5Jo*G@%)L&DlxT86cBND*I
z47ta<@6=SVYY}k(tlJ>9GjSG1U7yD8U$xAxTiaaq)+Vhrz@zi&y^Bl@fga<fT+o%t
zk@5n?G_;>>n|J4+=kVZi<n=bOh*<?E)B||f$_9g;jkdrFQNqojBEc`;%rCOr-b$@G
zZx2L@H+4l#>#G)TQ~Z2EKPg?8S$*E8y#Lu-s43-QXczzMNdMZI#uqKe+By<V;?oC<
zFa05NwdDI9blTF*8*aIR_t338b9nvaz{+zNSo16^iaW-;xoPu^#0|sS$lZYL*)LMc
z3!WWRyWo}Hl5&5DvaE>V+>p`9&m*Y~Mh0(|cWj{oUQ2PE`HHA+**4YdF}TA`$)8e!
zN8Y+L-`;z2{to&Sxb?8-?}IOnf3}ahR{r6h)@g-$H9`@Ds9tNGef!Aw*?mWUPqu8A
z;#^<yQ~rRtB&S-pah=w=Gk$r+>6-B%)TJav!-h7$-STDblGe-#0?{Bo|FZ0@X#J_t
z!9hBS@~$$GD``OPw#PIwr{Ed4U-PNEt55vKdjzw5jk=*KUf|UIz|LkGx3jl5{?$ZV
z?MZICDNc+Q`e?+(#xQY1(#ZOAu3Za@E%l6a?!(uQ20scqyVD~H67JsF8fdvCWaovx
z?pa;H4zX5>r)q3jZhVb(moU8b?gRE|6eavwyIUtEG1pyi)HyeDo?NN)LVbZxRxxgJ
z)UY|RPe)r8+p3593alK;&$y={&zkL57?WSr#9OBHRq88=_7lfCJ#=)ex^1;aU%h+W
zc&|3e=!NL!m?RN%xyMm$;k;98nBxUS@9H$zlbre;g~`^lS8bbyVY}B!FUD$re{v*#
z7h%3}<V?0KYbknPh$pc(TxA)}*35#JDLEwsIqDp-Hp88`HDI0Zs+8w=FwkuGMDL&E
z$uRNF@(cc7UcD}x;21wHScbX)3NJ#K;s5ck=ZK(_F;sFC1B1ijh@cUX5lJ>;QYhF+
z5O0VhGARcPk(eDO7Ta+k&TP9$n2GU@ZRU7$B!Ph2fkhgF<^<#ISRs$xKb)fFC=?2a
zL*PI%86aZmL~GsuLk-;oY3b0=&^QDQ_`z(5i^78m(qvK?4NHrK;i=?Un%*xrJbbmD
zsh+g7aC^c*8enAzkg*H~2?wH3KR-#+Ksthca5Vz_1=6<B2Eu7kOe!WU78V^P1S6<e
z8bj|#KpOb3Cz8p)GC-Ioh$mqwLf;yQ{9(d~ASs;4(1ZVvyuS__q?7PWELoUGKS*Q1
zuwnGSG66&2C#jyEu#KM$!G3Cn16Ys_J7oPc4hLeb|EAH?0}NJ`hJ#U&m<SSs0n%Vt
zGL?w6Hb$7iV@P-gQD~V8Q9=-1s2oFQMn<kqjKHM)(hmQTFLa?~5(R|90bJCoKqw8w
zLw}~mlCfbh@DNp~hfa#3z<z0m{_2PhK!wVG!hgtNfQN*bRpCOeU($s(5`lyZZzl{~
zE%I+;*IT`CY3YBq$uNq^pfVYTcoLmT#>OT{YXpVB{@yJDi44+>2&8Z(4K)03D`sed
gpi;v1;(kuS%)&Tfm3s9N?(VmL0idF{8Xye-0KvON>Hq)$

literal 3141
zcmV-L47&3liwFP!000002CY_kRFdoVCY*^*W;R(Var6WVq=GXJC6$?)A|{?3KtQ2T
zkRddO9LjPkHFHi$&D18%sXVBOW!7;ZZ>K>m=NvLMr_8B~b#C{!e(T=<?z`5vzP-Qw
z>}NlFzx$65k0YW%L=XS~kO9cb00A;`QWGHOLO6sp1^{G%QfD1N7N8`3gHd?0Kb7T&
z;?ihTslNdL0CE5TSiaN-4h)YqHH=I4+(V_56OKhgwN4tVdWVYA;)b>+a4!l9;Es&g
z89A3Z%jV`|#brImCwEo>+^Q9<pNG8ft2DwoZu!T#yECprw=UtMQ-eT$XUwJd**+ap
zxvxB9=crxV;?GeHz4s@?n#UwmR96jr^u&9%rJLB?Su$;!%)n7?U<$6Kug+}eJFQF5
zlwnRDO;*2JtSK*K4G+xEn!D1(6%vV)TFV@iW_m^b+mL2(w0hk;<s<ojm3tqJcKT)b
z13=pg`X0(EgPVY}yJ{giV*-!h_{Nvm_Q~?W^Zjb~uzkfSl~H5l2F|0?he^2z)SQCe
zMdFi@xV~$VjB>`Rv9EpVha%Pc5i_+Gn|C=L5py`+yvq7>f=l}Le%6#}*{I1E+Djht
zS3jov?c)!;F^mI^lO8ri=0D$2*&uoxQ7ZpSZ`;7!s>xk~)zRAzJ}>%wK`ig~Z?FuG
zt=j@N3PoJ2Z~(SPzI?Z6-~Re#S4kZ%>-Iv%CzUR(gl8reRq+=ySj&dM{N{kk@H6?{
zO+C|LpJs6QRCfiT_1Aax0f%0`>1Hgtnmjp}zHd`5#vlEg)1T{04F(sSPa(JgCzpXj
zMdf)5Ue3yqvoY371%SQJCFge_EZ0}=+oo<dv~eUd`>9^jbV<x>zc@YN%@$i|TbZ>Z
z?DyA99UR{C2+}!?7~2n&w_VohGiN{JhP@o^&nihERMcp?=Dbj}SGgKD2my{h&oW>e
zfNdu(^9<@!Q<NI5$mSC=+}E>v&=0;Sm)A2VY*sNDI+NFR4AqEgJ9F^ebL}cU0TR2)
zRzZoKoZ<1jiF36pf8-tiVliQ*Ua<%NrsCVYnI+8nZN?itdPlEKDg!OQ=^(7WvB4p#
z<6w6fwNfGBrt&a!#cVuv_DSacPL(fmT2;BSmN%}Tn~VY>j-9u`+~;2)Nrn00k6_%B
zId>t2jID{OStW~0B`Hf@Ez8}>m*x01PqeZ-Lgb28J5q0T+E?8(QpnubIT484*gQO=
z{O7}v0Jz((BY_Qp>V<n=G&iiP-tQc2iUOAU3NYy%yz1)B1$P3ABOZ%STp!c!taA~R
zU!F8W*UwMTf*^n9R1LTZjzuVSW=!ewnlD8{?|oGgpO0gtl53_uLPSD0nQ!YNUbsL2
zu}lN;d+|frnB6><SK7qJ%++TrRu6WZeV(P*NB=6j?ROiE9J$jTR;p!eXX3z3*BmgW
z?<RJ+uyJ}UQ*G)r*a6q9BPPbC9W$+Q9h!nR9v2aa4^=7Q2gEE@9%+0;CZwLaO(H~-
zp+L%F(eA#ic;)B^qJ*+Z{lhUOR&{yH6=i);n`>=DHH&tU%8AR<<Jl*!6PlO}DjUVE
zLLbMxmM?qMNt@pY#BEEyFj-61?Y8#=SbKCar&F?|i&OigDLH@3_?alDGa_PdVzjNp
z@{SF+QaHWB1E*L10t619!#1ZhIMN#u^WJ&(*-&ZQz!mo5Zls4FUe@|?xP=5l;L|sb
zw8p{~HH>u}@1FmLaQF=81?hfF&Q>lWjYYS{ztBEGDr_?8hYoX#<O?w^`k-&i$xcJ}
zn-OzUa-ZWKhhESkHlK7mv(zqA8e1GAI%8=}xTjYw&KlH(Eaw`FoLR|^3kBu<v|ZtJ
zBLvP)&UgFr94>C!7xN4d@N_?~^x?Q7hIh8+YK@+x=wk3Vm%b+@fA^*i{r8(lh8gX4
z4mNHOK}~(+*W|k+g>hEnJw_O8q=p%X7G}W)d!%SCgd8<~Rd74gFJDEHt`RP()<dOa
zzcGxAqS-vcdH#wW>FrKbPhW*T>ys#=FI)rHaS+)=$5j=Z{<Gm%WF1srn3cdh4fv*)
z{f|hB8!=4$3LH~lnVPJ)C5|*_JYyH>Z`8YfUs|59_CircKQexC;-biJlM-jTD`o11
zwl3}f_d4<2)!$5GJ_oZMvBp>*iI?gzBuzXfIMW+$n-<bQd@r&5NX#2P6%Sik8UhRT
zeMMVdGxU>-7>`0Ywixf_oy~4t#x)M4;zY}%PUHIziwR|^Q_1PW_aHA8Mq3PaT<zV`
zF)u#xXb?85bpLjxU{GW*GCCb1DbqbIN-1!)iGHByQTzK72|sZt$T?&wX;if;UFHB`
zunPd16^IUydmM9LSwk&ezOym9aT2W4)9fAq59uJTr~#ht{Y20%%@~2_#4X;8cqD<}
zO+XyFmp9vWc1JQdyn;lry8*V$Qt7=cf5f|WlUh-?A<(YeFd)Qq>Y)Cd?G*cF*9F{B
z*vgxg^WZZd@1k_eFMvdK%v^#IUiH9Dxlm!fiLK~Fw21`lw&I<Bd2$3CrO<-d?67RA
zbA7rt>teWwAUi7vlfQU2&DAs$$8{tIePEgh04ZCelJLQOb-igy`Yj)LQ$jM_EOG=p
zJ)(aoc|2x58;kEq=7gr!wlVt{yLidn2@7?OU!Hcm10*4yo}T9$bVdky$iWe4rc;wA
zu~FRDuw8S4YpC}zrCP5aY7+Lz$W$+W-D9UR`Q1T(;S{eg@JWtud#ntGj4%Br*lK-M
z@M~nJ>=6G>1F){6oUL1}v%`=3=la>~ZOcijJnixu+r1<T?W2-p-POm3NaH2xvgRpg
z0~PLvMNM5^Ja)-W$^MUXUv;jj#gy4<*uSMGMYlVd|I%XJ|Mn_wTCsAvK)wEHYtOo*
z7FgxhTAV#k)Mh6~#A1)#K|9)Puz2#}1b*jc_r4H5aMK4o&{`<GF&h-~Q2Fa0xaY6H
zf0(vsYHA2JZYcQVws1jVLTPa##CGA;r`DqDX}3JbNL%EE7H-j_>zmJgOps&4YBp}3
zSdg_YxSmu9aQ-b!hZnH@Ef5a~N;A_KAb;&QDkPzj3hV=IT%5hTzs)z2(`OK8s`8z$
zSjPtcavt2$2vx!?C>t(YKcu^Bo*GCLxSM-A#Fk+*&)#LrJY&rWJwM~D!Mh7izQZL(
z4R`Ajm6K-;P#7PjE&{x*7Tbi?en-YOTRnXHxivnGa$C8b8qX<Au9%GSZHPkZCB2G1
zUFRl9DOHfUp>?q0o=e9leL7{+AyF!QrXO?K<#@B2J|YGNaM2Kr?%ZZ}0z&h+-I4pG
zCf6#8)%b?+)ivbVrCt)&J^t9G)(d^wMk@KFN9=M|PLLtyRAt$fPb<z<zi&Adw7pTK
zDPq3C9UVG0MpzWT_r5j3{?d8)*ZnSI8BMKlitMGsO_g<wfZX&$cNSETzrLEpuTpkP
zR<-7LC5R#U;!<Tb(A(@1=1~aqzR3MZ=~#H9pN2`sT(Lpb6^pJ;6yhI)-J!PB4^R7;
zJ*8;%&uur7N|uBrK^|eAwz09^y9EF5Uk``kGQHSL7SD@9rqF5o=sZ8>KEA&{*^fp=
zQs{jDQ%JOziJq|$g+{>`>3Qqvniv>T4beV66caL9muBdrYebgvDF2%iSZZo&3JFG0
zXiO%APUh0h_x=xR><tBhNF-7)iUax1jHIxrv``R};msj)f?!lOGl&EK>H7Mv)zgQA
zKwO5uFO37iA|XsNkH?_UOih1$0&!?u6gOZk0{I)HWuXP}<*@i{FYh4OX_gd>Vv{*M
z`1b$^@*j^MpGW4=VD>aBgX}N$%^`l@O&FcV@TK$Mi2suJ_rcS+3@V?@l;&{*I6N5H
zoBMYr1PS>;3WrPE_|XvThh_wXOyj}=&40uZkRbDa(ZJyloi(MtG?t&&Nd}Kc<G{#F
zHl1v)i^3oT3@VQ<we+PZDTpgo?#1Q%`K?XNhwuMWJK}r3)P*t`{xm28LSd~5gmP$9
z=#SJOCfOTC3uH_6a2YIr*iY@ypB-@_P^t1C@b7YXv_L6lO}Lcnr*x@}MxhbX+wrEY
z75P77hp$~Y2=wo5LbCWgHlK&2GPrCeIVcpg=Y$9BU%TbQVA8nzd>Fob4h{LARt%|!
fV*C5TgMUl`W2_sxM!oh(cX#!lrO=p{APoQjT5J=O

diff --git a/sl_plot_cache/html/unnamed-chunk-4_c31935faa3125f3844ba51b516baafae.RData b/sl_plot_cache/html/unnamed-chunk-4_c31935faa3125f3844ba51b516baafae.RData
index d042ec9deb87a437546c3b6af0e8ee75c4261463..1ff0c318d8b51359d320cfe470a423eaa5d45367 100644
GIT binary patch
literal 3168
zcmV-m44?BKiwFP!000002CY_SR8!d&4n>3rBO-`OyMz`X)C2}YN1Aja2vQ7z+>l@h
zF$F}b6cLRY0SgEYf(=C^bTE_w9EwqCDhfhqihzm;C>r$zXPlY!*8BPHT6f*O@7eqN
z&i9@D<6s;Ekk9}q1OgF*h>M9r#MTKz$T~k?X9EieL|jyuh(N?4Qo^saAqGdmM@Jdb
zK@cy@Wgrky8Uz9_5ys*Uw)g$`=7M+8C76}CMpYp6)a2w16ZnzHte6Ewi^r!Pa-Ody
zU%GH2sTycxXjO49+0A^<%(e2%lI|oIbbV|?2B)YrEw!HSENl9<!{cOq+o1i$lJ@nh
z+7BMNx}AF-(_FooQ>`a6DH4FGJRWvOoS>KMQma&=k}chk8%It=QxtI-J0F>1^I*O&
zO-rs*x8aF7miAXo-WJjMpTmoimWJb{_6`<W>J4z9ilw3RpAULQL$u|tvR;=3OC}>s
zd+#4GsHx_>a)0;WmpdoIW+YgMIf4S1#g(ktdgj<6XR0Uvau-GiNwcplu6n;NmtgLp
zXh<26`7pJrnJN7k+FxJIG^Ju6b?$;Z`Snd}isILA?ez_=xZ{LRy&*A`hU&Wpp1l?u
zo_jfk4z#HDP!^cysfl(<F|}F8q>H+CPs|bYng-s2zk2$2k6!)Fdn>YBBK~)C$88}8
zmTsi@Kin%T8rcWHj;9SAvzK$_PF*=YiHeAHZfa5~vPG5d56%~PQan9}4o<#^d?Mj|
z5XU|>t&E&>t?GNZw3>2OYH<IwsaUCVSzr*R!Y0y(l_niL271?ZsID8uU*Rr!JkB-@
zK6UctP4P~V+41r{IG&_JEo6g-3hH(JwmtO$^96+8I}=5SSCn!#6SxjR!D37E=#w8;
z(S2_oy_-nS5+A&|?~8*1e7O0}x7~u;_H8}<PwFcgc$ZcCk#Bh8n9d}x2ItuZ`S6GL
z9e36pu5PkPDA#Um;nIiCmi8%?y&c??`fJ<M5cBnDe=$DC1}5KksLWL_$aK$(2B&z4
z<Wj6dZBWp@_mo|-8Y`;Cv??FDj{D!mGdX(oA?eQheb1T|9F9zNxmTIetu{I>d5s3w
zGtTj%4#ZS`doSgG3Ak<xZ%+AK)*XkGh~M6s?k1M(QKsdsbf-Lb3}i$uD-TtL(2)4E
zZ`>!)IwcN)Ua=FZH_CgfZ*>D^-H}akL&{myqtjo$;^KqZACR_VVLiBKgC^5uPkSfc
zJ~(~h5BvePqZ@FfujWEw$i~~wfm>iORBM8~Tv`s(=CXa3F<Vq-m@+<_u?;_5b4v^y
z$WMpe56&?>j$PbAGy8+Hjkl6<5EgFnA@N*3J6839-=#Bsh=7sPd3U{Q#`cvx3!YKP
z&Dg?gJa=Y$K+sO3_eU|{3VbRJc~@t{#nXw()G&socS7Lhne?l1pGI5CUN|}5ZAkVl
z8~1W})^A&+KP}*%3N`8F>^~D$=XQNYsl<{8rg#agCejuM1=T4|>mf_7_|RkdgxzSk
z64Hl#wUs<l5}f;08pLd#spQjI$UM)t1x5U=DyikE(ldZ)*}RPn(W=yyMeFw$P`l8T
zn#VRgv8c_)Y(LQK+e=;6wwfgKbKybrsq$X#t$TDiR?ATows=Q6EM}=f^5|g{3t`}>
zET&1#?xIhn5Ob8}QCNTY0o5+F_hpM-jgOzmdhx$hzbqxoO}6dfrwxbm`a9M6`o(aV
zH8>5=Jj9W{zopo!G5^!zIgVg~x7XjX+EzJ0XG;tk%Jx|(Z(8C0@~&T=s*uoT$cBb`
z+l(iiwf5-kFDAnD-!pE+?owx6bl=3~&q$jlIQ!c<5HZ#6PS&p8(@z>77pBSbjV{bH
zISAh>n!DVa{@X>3zt!=oE>wk<u!7shTpZv}Mw-gT(%h}$^2TU3{ojrKd(t(<o;z5O
z&7Gf5NsF<It+om>caP^5Q#2gxBJv@@d+}CUL$f}t8u4O_%^zKRD{Q1aVM!y}zA2b@
z&r?z?zbpA>(n@An7Ga;&rqq1qKer-E1tyHP$JyCAtrMZh9C21v$#N*9(scsCgWL!b
z%<{I%f`a|H@0FQ${tIeRP96U1^8&u4n;ll0nXX`skhr&bhkduyc(x(GSOU$&4O|s+
zhmUTH+C(x|g9v_j<+1M8XMuSudhyxigOJ9)L5Azb=aM(WNR6oGhTgmPZ_VGy%*-VX
zAo^3!cZIsFyX=7~d<94u-%Nd2&^_}hIA{Kt{is!-bv|uh3zoVpze$sl^w457{YAd%
zQ)ce~a})O}5SDx1t~OO-;7lv5F4@YYGKTFFxd)aX^M_;)zE0Y1^kadR8z7f=M<Yev
z9V^e#&w{^47ondnobO$koF$*cNu%Uka<c<Ad=1sO`QAgJxRie~)wVcGWaABe$P!E3
zkj_1{afo*G>4$}H@pg_Kj=llaBsSXXlpPiCw`g@SJzl=AE2%9g^&4NIVJTq{X4lJB
zMi$?5lY>h<)snVwy~vdqyJy-|#cG{X97SQZ_jYk~&NW8v=d;rn4$uF#>85X1{=@8r
z&Uj$N_W&<2R>0R!oo$N=0N_mf4P}~M`P`kgPK%EeuNlWaHM*jqx2|4cM@t|_B!G<_
zc298MsUdIID&hcGw?pb?<1LK3KaJnNVwqFFzNPxDO?q2^N7vK47n$k;UB*k<pvzOE
z6@?1v7(d%~@2(-wk)f5SYwco@bMj8;2Z*rMP5Ql?ZGlyygqwb4qF({ZFRI7hO0^|_
z4@8PLeOXoWt0r$t!b0HyDMN=@bKa+7;MrT4Ddl2lH~;JC!1~#y7p=$IJCjTjGKNYn
z-IKmj`u#R0efh?9w>-gn*mj;dqG4)q^*J1@eU=@~9p~NHvUOJCy1^~vZou~J7b&Gh
z&rYgc@M>Rag+D||M#Nx#*y!Zv(X>V*{WmK+wow7E<@l}w1$2*0yUMlL@Wah1pHhQI
z-@3Hi+Iw>0Hs%z#{jlfnLobehwvWDA@!_uKY54|KLNSD>R%e}a>&W-HeMf&!vFwoI
zTwC^2`hdM8t5UytgXXz2e)%OC8VMlGr8HIDhPLpl<;%Qf&Dj$KqJBcbZ!$My^rpv#
zhUg^9yQ(Cvq&~UF9^1s6Mr7W4&8P0JIq?hc5!~`M`nrmEp;ONTJDZvCoqc@?uO{2;
zPI5a;!^LQ!k49Z=43ah_k8V8Y+P%2c+Q7)*K79RX=%b*kCnJg=;qINIj*(qPc3tT2
znbQI64A)EXRE#YvjIXlp5JtA&dB8r6rbImJaO<KZ<+%%vI_E_#kgF75s4eoz%Erx(
z>NY3#X=};g+H}!hfz?9=nRnIYSaSpN<8n(Hc+1rODm_Kf0pfU<hqks=kFDm|t9Or^
z?$#w6y%60Rn=E23`#8Eif_G{ibE2^LUA;Pciqo*8D8+j2if!`<eD?<EQk>TJCr1)?
z5f++8&*aFkmSgsXcoO>}lvglpjci1@qElj!qxKPNRQQRTgVqJEiusNQ15vvt`~DzL
zg^6#KTlD|(>UH@f$M|vK3d{wNe-Xlr_^-R3qamG)rIMo=*l=7p5i}w)qR2)}3I!Jh
z;tj%yOv(WR6gC`bvIA*Gz~PW4re*}B1qv00GcyS@Gcgat;RrZTh$H(CrszF18V$r7
zhJ$1>K*Z6B);j+O4xL0OG&D3c-jD|TKsE@E#)FAa4PYk?#4$jC5gQFqz*rzWn#_!%
z(9u8yEt*LMgcKwk1rXk6|N21#=_EW8N2WsoJi!F8G5|<45*^U8(SicNpEcO9IQSka
z7)}D|y1>tsC?-Ql0|z|+1hoDO8SVozaAZRdkP^Wl>LS)Ee?FL>Ou}ONK^g;&3!}q<
zf7b&Bf5GYM3W=aXF)knlr2UXX1Od7M8CbIofC3Q_YXMxiV+4Q$>F`5B%s*QZK%6lC
zn@b3!5ByL9Mn_>INel)^gX73lB2HLkY=}Ytu_U~Zc`Y$ELjXjO6hUOHrNYLwKDtmQ
zmd=cd!qMX31m-_V5kDY>DU3{_fH1_G(`y+G#KZpTjU(g2;NT&u&|^9&ngai!8d#GJ
z`<ELq-8H%Te{Yfj9uj)<KSY@rA`yTP5?tf?c_6xLQvikjGhznOOa_(7Fu;@OR5C6u
z5vm>(0{=O11QHpf8xcqmOd4qLzvj-s#E?pf(2f7$iZv2xp120R_6i63+kXJ_WL6wC
G4FCY+vMVV7

literal 3167
zcmV-l450HLiwFP!000002CY_SR8#5Jj&v}Nh}cl!7-38xiG+k6iV_tOkSbxMB#;A%
z1`<*XNRgr_O#zWEL_h>=AWfM75){#)M6P22lrBXCq=__daK<}#ee3@G&RS=kz0bS%
z^SsaV?jNrMfrwQgDnK9*Nr;rB1VmC=973d>oerZ6AP^}Dak35~1(6qjp=bxPKZW6k
zW`iI_oNs_YBv=p#JYO734GfPpHH?e)+()OBI~|XPX`C`p_6ilG#SLvuU|-@DAna(d
zGt$m;X3fpVi_3aWOzy0LxK_(rya@TwSE-M;+w!mT_hwx9u3h}crw1jtoiUd`WczeX
z<-YcaouhPZi$71%^E!|aYZ8-CQC&6g$-}{;E#1)a?vhc{WCnp^372&#eSLO2*M41s
zx+Hz_ShDK1Vs#llV|ZYG*2D!AR)|FQDlKy`(CDhn_aXJ*Xw|y+ibwPREcZGVZU4*g
zM~J2;>;sHZhA@O?chv$~V?6iZ_{LZG_Q~?W3;inh@qNW;rBMUa2G-*<M@YFy^qef_
z67lIsT;KIbS~+diz}F`AW0CTMh?!c`&AaT53Rx^KPG$Xh-enydKMU_^si?`9noI67
z*FL5D?dJ}>)r(UYCp~J2%zv??vO(}9qEzOW-nN0cRl|Eu=Ev?l{Iclt6}i0Izridx
zwr&elKNNYr!d9X^^40rAoAx)ax=QK@S$7sPJ}Y%;Bs@1Xt%|>t!C2Ol$Zrmq3_qLS
z-PAK3_IZZjkm@GOxA^wHKH%`Hx81Zw7sIEA()Vx5#rb1@wf|#%sqWx{<7p&2;MB4N
zUruq}l#{b^^jwU^QUPS&3(<ugNVD~o`?skY4{aQY%zlPxnl6cX;}?hF-)gafwUt@e
z!GC*0*CIH097Q>%5o7x$WUQ98`b?P5*<r6n`?E?CoGNP6U2<N^*(hC$8w4aqUu5Yr
zb)i-hS2()$sVVY}=46uzN%ouBJ=lj|70c`C6PByE46Vr<T6!u(m7O^b-E-|qJpm%?
z%2r;9wY1)eyovL*E5GNR_-Z;~u3E9j;cdnDd1EuU#k-8R7-~naWhxCTv*{4LzOlhJ
zs^d_17^PA+;g;esY{hsyb@plIflj5b(i&B{Qf4==Vw>~>0lUsSQ1*+jKvH3T_+vQx
zRL(u1khV23HLGNCsU&5|vt_wE`HD2R=BY+@M~HOMYDenrPMfOx`m&k(J0}7O8=Hq`
z6#sY>5`b{sbu_RcP_=N+%jSl4)dw7djnERMzC2ud2dBDvbHUxf;)o~0lQ+gRJL{Zz
z<yR(+vGwy4U=Z*}PSt=b?|6iKXU3E^r}=Uu?EW`-;e|L_D!FFr6CmKbN`7A#@zNQ9
z#L{(zAB2yjVs>*Fo@o;sGgqIlm_OWc?nRbdAN8Bmw%;t(a-`3=n=6+w9f<?CTymhe
zzFYX^!p7;bOqHoKP+LN?mXH{mcHF4OWoQc4ctYSre5C9heo)9z=8(omBtz;c+eCaU
z87ASqShTw@D_$}Bp&+4bQs+oaiFsY#az$Am%<_8MP|c!sq+;Uo^mz8k8%|C12BnR{
zR=$s2Udz`#s-(?tdBV0OU$~SR<4)U$0lW>inAIs-(k7^URu^5kZSY)>(-{%5FEQH6
zc6rB!+bOJG{=qXVe?kI>&*Pg@8tkYIiFxlm`Yb8nHfV*7up8y>=OAVAB-~U4IB}^P
zM_Oayi)sd1cK0rPN7{ZtaDucyC1)!Zk;bB1<6ml?Bo#Ip_QQtRMKXoB79EA}%gOdb
z51Ns4Q_^4Jo`hc1AU2<JJ-gH{SsGg$BRFej;B+5TEzBC!29|RT1dfbkyM==CesEVf
zRUb*PmiFDgJV%I|_QgGi1Ux&yDSb39hvS^9xmJS_6<rD*XH)m2<nP|pq4QxANiU<_
z+Sbw);MLSeeoMYLQW$4G-lLDhN2(dKz%WxL)ICLgA>^3B>w-I(e)&qGbhU6nH3prM
z{Z=nB3bcGo@YstV>FrKbO<#pQ?-R*kFJ6b%v5?tByHzF2{&V41rEHa78kfL5bh$=X
z{Ev!?8*y}p6$GxpEHznfOB`v=V8%MqU%z+#{<J)P?Zu*uepLM8#3g~>CVAF$SIX2&
zO>M$K_6_3uYrh)Bd<kaS;SKOUB2VSxC{Q@YJKGy>l@`)K{2(&>M9dpL9S>hw8iMk5
zd<9$H&~%cEXpci!RyeQaoz1RY1~s;%;zYA!_TvYR2%XAOr;^i$?*lIvMq6}uT<hJ^
zF)uv%co04-|KLs~Z&08+GCCb1D$_nANGWi!jD9HRUi;fq5jSxt$T4IoX;ir?UGkvQ
zU>8JTmM1t!?y<{#Z2>cV_1;qd<|(LFPqSM9BBX=3q5^rg@3WI;X~qa5CvNdp#A6ZS
zUIOy){k++(b32mR;T0rr>zh!sET!HnGDp2yH>nhL>q%Ib>ji`uO&!vivzlVw>bgic
z248u*ashhw(>=6y`9%dm9X;1c-$D7{E$L8xy`h!hWVE3O>bl~Uer0k58YSC;+-$pS
zq;+GuHtSNjz)5PB7bbJ*T$+nfCV_274Ejhn<UvxlMkP4}_to{L$?LRy<V^9&2;;~R
z{Pc*<;pFj{`E0yHM=~okwYH7kN880o?oL>!v-|q2+YKTL@$m4t(4aNql!qD|fo0k^
zc@P_geGS{yC)j$JPbt-yewbm{XMH0~{JJOhWiq>i{v^oVSm2WE-u0O44jEkjmABR6
z8gFl8r_>PlZi7T!M>$iwT5E?N`;Yar+1r+rlsTH^H@AC=WZOqY$=a(=4wJ@9(xpsN
z&IQUo2#cD!vUvQmwY<&m=f7!PSBWXJQnPtSO^R-}H~FQ-qW|4B!n9oFbb)I9v(}z<
zNiFcot+fOjj-bt2nuy0Azl*iA++h0j<4K2|o89_CxDuN_I!IXX`8Q{SVjd}e`<?LO
zHS~9*_Dpp(-o_0DpIsL&%1+2HPJ~!3y#Cx;bR+Gy#~5jg4Byl>dUSpB`A-SbOnA-4
z%@Ye!76mtw3L%cahG}sEw!f2bfCQx(s|}F9_3Ias&`AY0ftJpWUftj48_DT2$g@@X
zj#n*WgMYaIZE1wb;}#V4mMtDp-PBJHB=X!$JZxjj@R{fCF(scfX80ao2o})Y1*hH<
z5~GH@wTX(!v$|-Uk9?OCqOBI+gx7pe#y6WkdiSL@KF#}%Vml?CRhV2c8Rgp$g~BAg
zjy_Z8%1bGgmAt8OsN%kJ$0&6=Wz%6nDs`qGcgFcdvx*Kf1`csn6O8WMW_%I=-S2ed
zKCQ_$k76{wb^7KK^89iy3GWtv{BrBXK23e4e9~iPIU^@X4|lq<?CR$g$Ex4991hyv
zsMHiO-{6J~9UF666n^l!J;D6id1UVa=dp~YR)n|I<s(g%b+mxo^uu=-lu&zLPdco6
z?-s3U%<oDN0{OyHMHPj2*(LO20R4f$?P%#(c%z@1Va8msZq-%Ou1+-aUxVGDR+Nv=
z`sh8SSk*6WH<L=1_$5K^VIEeov0l4)|L3kpK(pzdOge+(=}q>gg8Qi)Kl*;IzdzXz
zq@cX1T>sN3oToPyV~ExDA(OEf9bF%+0S@Oy*2Q?~V)VSoWFImp#!>tSQ{t(Skr5D#
z_6F&6fJ$alP4@jiaO?|JP#}>=!Dtrn0~zJbpn#zYdjSg;Nalb5hsOZ?K_1}EpmY8F
z*+zgbi@{|AVhS4B9}wSX|Ng-O*)$55OlK<q6dw$LM*%bzjSXm+YA67}Up1ayL2ySV
z=uHFJ2;k?6AD1Jhfde*w0h;`c47US0WIEa!^!MdZ5y-X5pO3>&CUG%4fW?86z1VQz
zzv}_i-*5<om`Fh^<_PEyvVO>+f&d#u2i9x@6aZh}wE!;OF%lqyY<Qp;^RHGU5G0QO
z!zBjN0)8j~8GfFpXdDj6f|Kb?Dp_2mjm9AX9*rVqUQ4ufkpLB>`BFJ+skm{ik1dwz
z$>#d`ky$}-AMQU&kv|~CDU43@2VuxHr`IwTNP+#`8$>62!NEYL*kd-0;Sc|z8d#GJ
z`!6?Oh&8!d|Jfu53>16wKSW{BSR^2Z1lM?e9tdJ>3KSIn88H-t%VBakC<=|uq?3a}
z751EThyNTn9~vEG@Askka#<kif6W~VgJ$~sB7%RoVuHo$g|0!bz2bph{WsDFqO3Iy
F006U~EZhJ9

diff --git a/sl_plot_cache/html/unnamed-chunk-5_e930bbfdb7e1af934707bcd46bff54b4.RData b/sl_plot_cache/html/unnamed-chunk-5_e930bbfdb7e1af934707bcd46bff54b4.RData
index 363bdb0a2cee7a5368ff05af28c4708c9db96ed5..2b7fe0a9686f7b6b2e64e3c22a885cd30157d9e6 100644
GIT binary patch
literal 3129
zcmV-9494>xiwFP!000002CY_SR8!d&4n+in5fMbCT|x^GY9eCjNRv(gL5d+EHv|kx
zOrc1XBBD_vU;)8Fu%U>A4u&$o48^E46$K$QML<Oa6pi}Aytd}8_x`=R*12czbN2V`
zy}!GET(n~lLOMtq0)dD@#KlA*Vw;2}WK)2@v!Mk9A}%U)L?Gf2Dd8?-gvOHblo%sA
z2;zmlECeD-gFs+qLR;Ly_F(|uT=0QXhF(i(Rs+J%PEX%9g&mL1iCt2%czX6R=jD3p
z)yt<-YJp~kb`AHc-Q3UYe5-&QnQl^1&*u(AXqsxvO8cemik2VyJkB(B4BKBR>)gDq
z^XQ4I+r^i$t+m@ZwfeHtB0=ctQ@H!$1pR!MdgU_JT$!f)1X41Jtc1<l|HKSa0QG-u
zR(6ZJ3s20mw7+5czJ$*I8c~w6GMXrLaJbk~e~2TkR35(g^{6KWq9cEU^|m5ZG8Jyt
z|L}-mT`lL0`-exr+&_(*lVHIY2#R11SF&#B`IGU^R8Ri39<(lkW?x@g^Knx?!Q4a1
zh&(3yX=Yt3Tjr_sU}G)QjEZ^EeE{-o@4NOirSCsF8=G9QrwCvA!(ywAG!6{Ccq=x#
z@OlOnY*Fi>A}}vd7wwi}>ab4Al=S#cEfDluhTemFJp+5kZ~W@L6HzIV_?x-ouCOC3
zx6=Y2ACwb~9sr=HGKNmt%e!)CuAiGmMn*fgw5XQYBFhhl7K%J8on1hMrd~ljlW;zY
zWuKi@K}@^W47^@hPrD#Be0bJOtlYUGI0Ri~6YaywkO`dty&JmJHjU%2b5}f`<{E{b
zJ@fjGc(=&>WThXLC#hHu+2Wy!eA~FouQ6z`i11r?vIz0Ia^7|V*C8ZSY-JI3=JPsg
z;N6oCQ<*v9!*>pSb5Mkhw%-5YE2!_>)yMy$v8IW4S+^hifj5cmPVs7To^Mi!c>K_D
zf5Wlb7Mr9>o#r+!ee^>4fO5tA;ce-AJD!J`Z$<@*@i{h7g@O1ASN#w(zgJC8i4e(^
zIEVU>kV7BI2jn!@)J$kKKJr};e~M>w^c%x6oe%q8*i&>YI^E^>>a<?<@ma~6G?>0g
zo)>i}w))3MslcniEn8S?+SiKS1cXH5?(R%Cu~d%=ZExlKmH87OBYIV3q$Z4pz+ZUh
zK84aPa|rf|n^L=7*<X9N7ueGq-I6e(l0!W)`|Ue6F_irYVLO5A!@d|covnD@KlT36
zxyygxkFXuxfa3#omy5%;-g6G#0fi#llN97L@|ZT)>~l=mqOzmp$@#2Z_|dw%V&G6=
zCiG!wp3y1H@;=(0KRCO1YgtF35f-14FBY=n)E)&~JwE^s8ar3;z`JhZP{oVTImP^}
z9lYj?=XVE%>^J^+0u8RgW-<^DbhlhNm#jj?F|@psg0IbG-bnZ|-d6F-$@xK3s(;0#
zm&1!e+Y*CW0rzaUX+P)id0d0rtvTf~OCFf!C9s;xSRNMCra5hfthnOCPZkn<Q7~nM
z5Bo+tX{;<X|GNx`-ac2&r?ruIp6`oF_&Zh8E7N7>0MUv?8ylikxhsn{7$~6jpsKY_
zZh2-=pNrmoq}9Klx~gL}P2%UnLKf2%yxiOU^f*?lF=V!QS0*%erAqR|F(eCa=%^y5
zMa}J@&!iFaR1}byK-dwr9+dYri+;_|Ur73iztp}iC&^ED`0+DFBY1<|8hnFN7}Oe^
zg=NQcWFGD)wQ4T>vV4&vSmGTFbgZ>i3DVsWi;`yhELFCwaew(Rs6bUr>M&wUhkM&h
zCS9=h=pQU4LJdALZpR(aU|n(F#^uk+m?b#}+Bp!>weC*VuHLiHnx7VD$nlLYFETlB
z{~DUR{JX(>CC$G!@M<pCgqN{GJ0@HlV9&-{Dkd`Atr7|*Xf}gCO#=HewZvXJSdh$}
zU(U#gu}iIX3bK7C^GnH^4t9}+kkEs8EA5eaA6A`ssm1osuKiUuGM><sF&+Oj^oN&e
zX_h~g{j+Ihb1VzoSM?cnpT)23@N$7EqvL6AZeIITI3iD+Ra3Sa4yksXg7YA^Lj?1@
zopPYyF!pD4wq4+odW=(7;O2s$Z<%|Jsn5+;vBsjf_jt$rchq@yAih}wt;8){RZ^Fa
zUYq(<Dn^qCetP4v>F!s7c{^(P#kHf5=7C{`>(-Z&cW_b7$kwL*2M_Nq-p|g?j~apx
zreEp_ciD8!16lkAkTSWG{<x@j?n`Li;z|2)t6=Lw+MzZKbyZ=T7CGgy#dzkcLbK=0
z{vqZz?hOE!f61;sU1I2bJG3Fy%CtI`?Gx<>EsXs`vJc-NV>kY}NZSpNFSxInrr?fI
z;27k<KB7uc&zCOsuT9UB&R}Jb@-F$gL0i6uYu@?jp;%hZKa*}-nj^CHwgF^?C2mCL
z#%~>=op}Cf=|`fSW0#|UP;C?&<#pDMiVs+}x{{fwFwm3I5t9Ccuh_JbGz_)tXR9De
ze|M9INj%q<v2eY@m6-V5tfhw4zMwRY#ONIC;pkp$jy}w1XD%IE{B_$M|D3|dxl7%N
zz?lCLUT~a%Z;(FU5gP=+nD$#Lw7d$r`|F*SpD5iliF<B*T~mKkqvF1{V2(%-8#C&j
z<i1~1!LD7z0kH0bG|VSj825gee0be5uW@r*?R%Tdjv$Yo=MSzhH3WK$*K#4(X2z?E
z6*JKRww>NRBc5X;YcV%F#iAD!oKTP8xb<xY{o8GUb)tluL3MIK5i%gA&)!O{t<Vo5
z#hbmRruAKmw<Bq(cql4Mmsxkor)ucMd#D-tN_a2-`}ol2`IcAhCp)`SOp~%k%C7z{
zbG`iMJ#^;k?OSdIf{)PMJac%{%<%e47+C)zm%^Ro-QKZtUgDPFU4$=Sd*Pdu^0H?)
z)h={>pu8#&qAV+7xHxKj=IeMyv$4UuwSBv&fY)kbPmv<3PqtI_W?aOv*0e9_q2upe
z+U_1avvd!A7TkTz^S6;#r@q=#Zd84Gpmk26NsUknA*wf6=iNR2bK%g5-_k6*q&PQM
z1C&2uuF9!4Zr`GH@q9pGS(auJ2z4n>*RY{2?X`Seu&OnGnm{y2D*9FSPOSdy#K;Ie
ziu|D_g)3=5>a)kRFlXV}ci-}<zICU6;XQ#_zD3<q6)$$`dt_%b7qNd}AnDC?XTuq8
zmsx}uE&R#2i;ZE*w$$;h7hQXoSK6BxS=`5OpNxDK^z>!L5G35a^EA+MtB9V<gMACS
zfSu81DW0l{WtGVd)_ua*?)#6}=TPLx7hP^W<dgz;!3pPrm?ct;(ku04K1s!-)ltLd
z^dTK>S!{<M>N~I=UzGhoL!PxTq%bMJqKUUmAFR<=5*;E=_IT*%SoPUzO}zQ=wB<oV
zs_`q)opGrm=5kLdosqn=o0wC@r5_qK*fX4_eI;qu3)gL1$6&r&q*oHOe?B{&bbzqb
zGJZZ!mbDstD9n>M5UH|;W^3lcE0vs*LmYLETO%V*-x;<pa#bpHJQ|GjogVmuG=mf0
zDZd=}?akZDX^zR$;x(uXpztb;8TlXodX7eP5{62mFfb9=2qI`qWW<n+nPf6H2E-di
z5Sip7hI=sJK7<JlN5JFuf~Hu)J_K^F$zEIp9%+sv5cVK(NFk5hzd1!?Q79CUXcPgG
zNB|K_CtB<NA9Cm>OG}4`hbJ1*fIpcHBPe(<S(;7)tPFuDS`;17w$YXbfJhpJNyXq2
zV186EA_}DI0spw5Gh<?~!Z;9sk-%7x1OV0mi4qAD77>Ld!+bynmSp4sk|P;JJw3P(
z@Ym;nFIor?zW*8t2LMfAKP86BWPo&lK?H#)G6SR?WnyWJC=v+Ju;fVauVi#84aDOA
zkzGirrzb5P8M&bkj81|BSdb2j-?-f<5)LE?&A%h`^Z)}O5~Rdns1#um*oM2&7X!<{
z&|@eR22t1xgGkw+_O$o&L!oG-7&sto*cx!Q_waKP0)+ALBrFaF_58DIp%j!zJ?I8g
z!k@=}f3NLd#~XrfWMqKx4A}py3=RmvLPf2Ce~JzVBEWcSGow9v8y`(t`ri{_NMSOB
zVj1G2=u{FmAz4}@Bn<Y?`5*`-qZ<>VBAGPM@V||Tp{Ws-9I2NW7lmgKt<B6Wj4YBj
T$Tya70)PAsBk>2m<_rJ;Agv(F

literal 3127
zcmV-749N2ziwFP!000002CY_SR8!d&j&v}Nh}cl!8evQzL`vwPC=mexsS-v?5^_nR
zfrJzSQluzKQ$VB(5fA|zNK+<&1VwZxk>^+drArY3X(G)RW?otI)_ecnUF+Pl_c{Cf
z_TJy!Kdv(trz?k(gFqnS5D9THh`6N4gh;x%T4@?WAQECCXA?vMA}iXVC}%<diSCbL
zfgnlbZ-GF>m=FlOP-IICjZU;QO$rY@K&4f>o{WX5oiS7-hVwHLMs_B#E^~_zj@0-$
zNw)>_*4C4y6@90s_tro>YNah-hJ75UHo!RU_}hj1bM8Ek9^R9)!(yE7xGNuX{kmrI
z-+0F_ka~6{ULffck0iyL#wAtN)(n02cJ}VbG_t<8V%##Fg(X?TrQOTloZHQD+LWX!
zPMbcFs(igvRf<O+9a@|>bq57iLZOpV+X4(Uz9#i!L^U*4x#5GnP2umA#1pYjKaGBZ
zsQbV^!srzUBWP|<J)kkc^$JaFevRpzt{lENsPq6cP>NC*H`Lt1d=hjVpN~W>NNZol
zJsV3HxDidQq^=v1?bAP%C_aput2f)e&(TJ}WD?ocjTg9AbnN{teP<<NreCSAcu8IV
zoauj<GxSbBL2eTNxGB2u<(}#${?n*(sh|2gh8EV1?z>u?xclhqvfnr4>i&Qx^U(N)
z9Z-XC<c%r^vCin%AC~Pq-@fiCYry8*UCR2R(4&_0!pN*9@p2Y@RbQ;IHE=reTw!lZ
z-)zK}IjnQKr!>#<`-jFrtJm*(smtz0&yHmt-j<IJ(EZuzx6S2x!%Hq_k*vTot71GE
z`9(8!-kQz%ILnnH$f1|Qi+hmfo2w7+QZ^acIu@P#T)SnqEbgs;f;R7Vn=P!P!qO4`
z%UhZT*4f)e(<K8JKPV<;yQ(o@%6P$wcs)LtQ<mgfRj2Bn_e#cI;d;U_AU6IoM~|Tg
zwVk@k)@w{plWn#jm`;ha-p(J;ee_MfvXM4ry^hY(n7*l@uY^<Do9EoS(5cWDD733?
z=a$(?>Ypl@x=_FNYr&~+W>Xf*RR^5kRsC2rF^5~e&w8g#>FT#mr|L>=I|grTZgPm}
zI@TLOs+LZ=Ek6odGnq`Ef0liuTj86eT1~!$`K@cZEe64WWA|Ms>*Y5frMNKi37mB%
z?><mW-I<)8Q?|TPmbT*4w%VI|RgzQpOf9!7OtNIXEB#Klea!;{>FmSZQ^DA+t)p}D
zzda5MM0o7832q8jE<W(8wP{oB5tmS7lvp{Li_Yv~*Vb+?x))p;^;B^B=7f58gB!Q<
z>a>Y&<Kh$;0{oU&GvvWN8714DHKWCDy%G(3@Lg7LF@c&+sGIo=@Od8MKQ=|Zaswdo
zG(Evb!DETI{cO5V#?;pA^%rXvkM^8@nIkhm`7W{R7i*O~$sjKa#R`TCZs@jq9uz%r
z8?##6JUfxCG!q1Mz_w}#aPb)@jqBV;W?;>y_^!CeioTIY1$0F=esWAatdX=!$kQdj
z#C(@a_7CJF%Evz9Csj=A9FHrrXed~%su+M--{=^rTegdqPhOp!%sqY6wT0HCuvO5`
z^K&d{`*uJXzx^Fo(6K^>OPJH|c6=Pd*z1-uyM-%SSfwwj!i#qdU-0v~qoNKa$J#oq
z?%8rDjoHsT8npI1BzW`!rZug}k<yf0@WFe)ngs5GR@n=BHNE_uB`lvtnh60{4rS|D
zdpvwu#ZbfX{>2|ihpz~Bh}P%ST=^3GL~MKFEA`X(;ufPp*eI(+su<m-Bllx9)oJ8m
zD{^5*@@vA=@JnjA)-xXGRyxJY<4fcC=gbXVA86MKa)z~l)qF#~3q93wsi<-g+!skP
zKw|AA$-7q<unDtd^b1Jf^CRr?$CEN>_W8Q&b=ty`%b}Aj%7L`P{oA^9K5oP7XLZ^+
zSbG56y2j}5srSc<6D%hC4A7Wp6%!^HVa9-ZrKv83oiKb;bT`|-P(hff63MUCMy2Jx
z(~ph;t)F1M4`Rmpdy|zj*I_RPgfhC9Za^ED$XuM`x`OrK`N(S$4vMc#%HZC59OJ72
zHp0?oG|hPpfi5ynPnFq`fL}12vx^Qe=-+%eqkva`sU&MqGjVz9GT(ojEOWLeZRVA_
z7WOFXCho)apN-?bhB6#6h8RDgkK##9P%yzg*B@z{5!QtJC^Y|!D;PbS2wz(nf%0_7
z{2gzpI;kbpCt*xmG;wurt4EJvoddo!+5Cjl<dNe7*NXI+)XdQbz^kS4HoZO9`*(CL
z3Qj*6hR@4Byj#s3=If1(&xQ#rw1W6)Mef$Ik7T^+e|aY4B#(r+gsr5EE7oL+A9Wq>
zfym8s`9}$Tj`?paVP>yCSR33r1J&qj^$bLWb>Y^OAkPndaaAwR8bjnIEZ>fLB1GIz
zLRvj2nD05iCzTahh4;0)1vSr6=)WpuLu}usRMM+2W>={n7-l?kOlQG%hH<;+67~dq
z?cLf%=(*4LQCgLk<oFG=d{+Z!#iO?+!+DKHw*1qvMnb5^8Zq<g^cXZox(&JAVbxgU
z=4^e=<w(A(#5^}b>hk#vcjIg<%MlmyiDtxwr0tAJaSk15=+BVVY5T;U;Smrf(PNm|
zF&(Sa$+*Q_jB{5iGd#V%gEm0j$4>1{T553o_Po~<A`J8P_P*GpG3HvJIXni-c53m)
zH46rscB@XY^tC^y)oKsIj3T}m7;7hPdg@dmwLj!{tjx_N4&L#7pM~Ct;gz4cJ1wts
z4@P%OjBxHXi8XXpGPG(n_V}}Y+dQAUYc)lYtzLO+w~tV|b6l9Jwf@u!KUtP3VVZV6
zSo&c^%*@s0lUM9y?SH-SUE_vQT!pQQ{d-DEY^RgyPi>Zi@2_KLWvXY3lpCM7_iajP
zgIDjY$J(>`9d?p94CdrLT}SIJX3svIcHX<)b0CZ(w(XO%m?e*QYd$3IvHbU6u`l01
ze>LvRR#o9{-BR?$W9gFgl<e|UnC;S=FYP5aGwyg#;CD#z%sgVpH@9B+oFvJB*KOTC
zwIpF#bTg$G;_`EZ20L)~dogE7NQQ~Z5aIivK`|bcQe+=&?dC%4{ju0g$ecr-t0{E3
zW*Hy)(?w`oGfWn}B(J|}`IzFVdUhz8>uKuk5MP1GK7XGf{(?To^Ztspgzhgo^8uS2
zGuo?#lTV%3L!td-dt4D6^_Uin`Ue80)#CB{ukDE$zIWw2Nr}wj)T-$ia#M_^cFLRB
zpau_aTDi3NEwy7+58S%ODYI$YtoZ4axj}T0+o@J19b_CF;-<nM-@D7?Gyr<t?aF^v
zmv0e6Z+_?c-97BZm3}<NGx6k=_Dcim1`37vCyYvZUWh*WY<0!8FKaF}zwEFI+1;$r
z61CXmsT)2q;kqpNNW3$}_||>=;1Rcptd@3!uf&z(E!7Rw!2C?BdrJzM2j5IPulw#7
zuB$EXOA-Kuf^vB!x%atcv=adBA>Y%cd?K>hU&SbEp;WKtnpsab3i-F;-f&yer{@E-
zzH(jVuN}8i%2s$~Azl&Qw(;@Aecb=}*TbS%G#>_y&i3&o_)@^b6t+L@Fee~@;17~C
zeJPxPvzmH7ppmW?k?2Pv8i3jaKO<eVftCT$mxR_Q`uXXhiD(gz{J%NHf{cxgfl!n$
zNTUH10*hjL=>L%8P`I2N9*+-2F@ZmrHGSzMFkFsB12CEZl}Tj*YG!J306=EaISe0S
z2;7AM`cgp_0{F)Ti{tN45XFH2oCXGgGypIKXmm1MR0Nd}0Cxo01RBZ?3?Q>92n13D
z`0Hci<SYV+-hYim0>DAQlJ3vout65Urhou7fDJMOIRqw~N&^8VA%G12m5jw;f&|h(
zvWo~22st@2c|#vKi-rUUAPXM6al26@5(p8Qe<BbFKm#CybblWPU6cgA;coQBCa`^2
z{&YH<BI<=rp>I&zA8~OpHfGZNk$|XSQ^4wooy##1KolQLBM{**`#-uCNkJzgU>i&!
ze;m8~S=+ykHw4|t$OePi@c&sE5)gq!ikbrd6deipg2ARbC_Ti+N0XEL_e5yYIc$+w
znj|WVK_i5O%N;oF1^?%K_=zNA9rmM=IZROVzm18eHi{8IMuc*yBsRrVN8b=-7`{Qi
Ru|yNN{&%ip>4)YF0044aD4qZS

diff --git a/sl_plot_cache/html/unnamed-chunk-6_6d3fd12613d9bfbd45d59b658e228128.RData b/sl_plot_cache/html/unnamed-chunk-6_6d3fd12613d9bfbd45d59b658e228128.RData
index 3fd75a18707a60537d1f354c7d30411595139095..7e626887d596462cef87947cbc356f8164e93494 100644
GIT binary patch
literal 2879
zcmV-F3&8XriwFP!000002CY_CP!kLi4ppimf}pez5F(u<Acl@K=~a*-Er|g`h=G7o
zBSl05M!-T-iYQGW^b(4I(xP+$X`v|s(gXyIa{S)I-Q4r-%+7w_&hEE6`?Pk3&QLCA
zE&u?)0$^of2C%RlK>(YhgR!Cp0Km$8M3?}q0M4Vxqh#lWMFjXO1tO7%BhCu|FyjFL
zaNZGSHPG#Kq^mR51M=*4Z#ReoJ(K3=3sk{({1SpUgfvEyK2kpKM?HV`AhHVB5Ol7R
z`dn}6Fg{hwF@dKOliBsN4eCY|Yuavo+F8={=b}YoUE8pJMqc}|eVGq^re;q*2RB!p
zqEyN8&NDgNRowS3V@1iOn$(Eoi6!&Yr{2ayz_CJJahLia9%&$lFOa;~xHAZJil%<P
z>RNUn{lF(Xa(g0-^U83RrrZ#POQ_Iu_28yu06>O6pY*N7jU!3{(%*YSvAT-#)qMTK
z@v;ZrOY9_t6_g+{fyz-W{OH~-W1J;Dr^`+jir25nt=wcwMX6f|DPbphe=O`v$McME
z4c1i=AUKb{&dY#L7rwU=g?|5Oud6rpx{uoHcMq;mlDs@L{*7f~<;w!xMWf0>l%bv`
z!Q9D7kRjdU$?me9TS3V+4Xq(BSUPo2=fAKPhL*C2y;V0n<9=hifavt`3LmrI01$LP
zX6T+izbSR$<->W{bwA^#Cb4W?Sm8Cdbf!<aiz{%qs0`>QcH^5~<fKJW=)7s=z?bcP
z;$zO?Yl{$;LgNw_SG#f@KO0gEkJ}8=y0$}{Z5r{Cx@|F%tmKxI_@#)olWBRj)ZUB6
zAy@<8wh)7Tt2<*~=e(MUdfOSngnlWKatcK?aCKwZUWF(A+=mZ*?^~aXO<)}^y86pN
z5IoUb_Q#e{(|)Fhz9+dWg)rIIpZtSR3GR%vsyAM)7x4MmYj~+Pw5mxbyi}&4g&H{V
zxNtzEWNr9l^o6!jclBd%Cl)$I2P80XtHe~!6=FYCZxjaL*bXtMado}AiM`AxwJWZI
zue9Os=sjeOr^wa0#~NRAc&wHg>KASDu7cPtF}=v~3J;c3NwLBW1y}sp<aBxte60&^
zCLWY@--fb>o$ZV@V~MgTIcF_WR+>744D#C%9jkQ5LlKX^o6o^z^9)?9LgvH^O8cvd
zyMb!meoeQ>L=$j#7k~Zs3Ued>fa=b8_jrvDt1gy|_Rp<-c=+r+;s)8!40vat`dOCy
zi8sbBr$HcCYq$V^ObS6KM?XP@%*;E1on4MQgP5o;W<d_6$AWs@Qk3p{Y+b~wy{DX^
z?Z({%`Dpxzc#=*I5&z)${Lz4d^W?*{M(gUCt0m)ZOM<C!r)dpO9-Vb|y`;Q(*ABT0
zUWkD<%5rBsj1a|n2T5CpyW}jz=HK3%ZYh~EGH$GoawwU#G8iA!&6ZzeP?J1W`zhBR
zdDoh~UJ}XEq#=n`46V7CtzkwL(dZap+Z5q>FCAqI2a7;$$oZ|9$vn5z-#kdWQ%e<e
zd<%wVxt5tt7Z!^yjpkVbGMB9C=%BR<O-cAcCkCzyULk#t`;$gZvfbGm%?|yz9T}~8
z3_TU>x*9EDW!`Fko}#tmk0rBq#Dapi%Q^0b!bl2=hN3Lexa6+D1tK~{Q~>7T1im5O
z1-H)8=$HDrhmi|AUiGCA!$03<Pmh`Kp$&FQ(&cl(AZ_F#IQ|xer}uQORzv#U))NY2
zgLcKquu50dS@v`=oQrI;QQEXiJ-$9DfD;UFQzCPDTI<Y)Ki0PBAIwFA<Trx~LM}^^
zGR#j>=}SD2aAPMu1GHV0xskT1_2Q?7k*pX#y7IGC0!6{05^v7`eeg|o!;4y4<+Do9
zJd#`6jEMpG(_~Z0OpLkK?X(%Z&fuYnQ%|fk%Vz@(jJomX1s)c1u9h$(-gY)M7b|6;
zcRd~8b_JnzZfx0xRLz>Jaq6dOf4L5iB`9)I#(`+J{+USBJQQ(=$LB4PG`tTa79?y|
z4_Xxp8LB~TBgx4rt#h8x6joAY-i{}r!gNl71}Jc4EYpPfkc?|yhZXU9P8$;bMjcMa
z(wu+As)b4{EtZoeeW`C~p$@03E!&{KG=a@%ZmJlj!{&U8#9Wkz6dL*Cs|8!}0YkkN
zzBQh66VNa)9AtXpGe?oPZv(8kzQ3`zc(p7(KGk<fVKDk>m!}C^js-01E09yADEeb&
z_tKtQ%IZD+X)PD+bo|v858RHxNoj24M~&&&sdUIFp?`>Ql9~_nPJOCZ6U{#Ks1;Nj
zrKMUCOt$f}2c-wU=jcJy^5{+f%sgiX<WDP;A_|y$2vFn`z?<-F_~^#d{@wXyOrjSL
zjNc?R*_r#dr&Q6Vg<x(WJuzB0H-YIyfjnTF#HtiXy>(&?e|Pl9#-A`f!wy3S=PF+^
z+$u>Ahj84|%7_gU80d;@bB+E(7p&h79|r05lSQGq@67nY?4##+G)yz7>@)8mO_ik9
z6`^UEhs>2OitLjHziV`I>_+J7i<3nT3F#k`H#)<BlMXj%E+GuMeDrc#urm-$(C03Z
zwo0d7sxjK?6MCf*GOGMiN{+2g@M4P#g~^%hF<~BVeo0C|ua(IFsND{zT@KSw?%td2
zeW{sJcdVsqO((X^*`jN-F@qq<I3M(d&oyUZx;#rT*3MD4-MVYca&m0f|5ZDS-->_{
z{DXq`{z>`%Q@X%?G`pF6MTBD}%+bF`UrW3t-5$V6Tg(xc{w+;A9lnt@<QpeTsD5fw
zJ~X}tf?zW|yXn8DhmI{bO|{-@?~GIpj~mN-{*LEm;o%#**qwscW@(H~&{>+gLjA(<
z{%0_<W;{87I!h}!ExgSBTCo^v3)Fr5i&JFFvJ<E0wm(o<?gS9wWl~(7P)<CUj%iSq
z|Gs<i3=U|u6V{a}2=C!-7kd@r6WUDNi*}n{GifQllDP54E(v)y)bj1v)cphffc)|w
zjnWSV>cvsH0JKD{c1rP`!<DOd-x4)DI4Q4o97TS3Jm(XuJH;*i<dI`~UYt}o5@b>s
zEvbXwxS;tZZAW_f0SYZ2p80~eC|GWBW^63b7rR~=N#&5o^yqsu5f&BVi@(uvw$%@g
z)B3=g-{7ysShI|JKIrKz`CJ+p2>&|YUYkhmfcUWBJ^Q9jbQB{`Mopi1V%oj6-C7?M
zNB#J%Z|o<dt0&GM#cpn$B5B9B1MPY?*s~%F)KfafNfT4iELX`Vm7yljmVF>Ugk!Id
zcbIiyBh$<oca78hH!zh#QxaQrjHpVpp`^}(t1{<!z1q&he*^b#WyUv3@{?AE1ZMfS
zr4X9YgOzeZ%tPqeE(;kMtsY(JnXl_3O^vlt%2Uk3AyG`~d?Nwv*J(*?gt@HT^*TxN
z0;T?9Hc@-!rEc>i*p{1X`}VoRPj|vEqc)nRAEoe;c7m_ETcQW9i|*QyrIHm&g^VIx
z4Q1|V!+ahT4Qpqb3Z)y~bb;B<54^`Lc(V%gZ#n(?`mJ=HqB4@T3o-!;Ot}-T|Ie>y
zs1%6tz+nP{Jbb)-&`4!;kUvJ5fW><GBN2)|Xae?zqPmAV0*XSYLey2Eh>PARZv;#Y
zp?1+*T}=ZCfoP~gj{Zjg-+wfjSmAIuFign@iNOHTUV&(B+5f`~*$6H!PfyP<B|Px2
zvZ7A_0vW;O6M#gae0_Y8*q}hLrM|sA9FE8Mg9CARq!$7h3B(|Skr)MFAm;q}f7-dY
z{<E8603irR2m<~$Q49=19HEH6wcyLxASB)gi3>Up{I~s819Aa@iV!7;3Jd~+{F7Bx
dQiVaG>T1BhT}K1{@uPeE`4=@~dz5qw007k)kU#(c

literal 2878
zcmV-E3&HdsiwFP!000002CY_CR1*pkjUiN{0%Ajjh^V1T3ZaFfL<FQ0Bq$|7f}o)$
z5ReXnQiVtdArui1DbfT(3yPqW!1@sBReF)$U7q{#_U!l0IdkUTIWu?W%-0xUa0nh8
z4*&pQ1Ay3o05<kR2w*qCYDmcg03hHYIRXFyxDO*(+Q{08;Or<(CK3sU{1^ZLbOQjO
z*@qZ3J~i9iIM2FNEFD*d)ejZ9@=#vD#+Q*8F?l+Q{EV6-X5bLM%5Ji*+R~z*Upjnu
z>3k)?tcp|pi_g$#g&f-8)W4n-t(wx!`sodiCV=jJVbMcrcHPSvJ(l6?g#I&;PY5WR
z8&ToPVNvB(mE&`kMwT5(3Yu?s6`PlmF$7I0r)f#g<FoFDN1{a8NK1EULh<>c9CYWY
z@r^ZQQzEmR#WECZTNfcJzTo&hDe4_6R5!@0mHk(l&7Dxg<5NEY;#ML<BF?2^3gEQ<
zT8P9f)xtZn=^MIpsca%-Ot2U|nlH^iBQJH#t-<3qK0{J^ofGy9_h~v}^ktAknZtqn
z1Kot5c>?bOS8G*HUNF#Ny1Cg<D(at5qv5)a>b5JO;H56{T?>x*xg^Ky?&H0v2%dR-
zbz@NWmva@3jE{jO9LGmG#@7!Nim+;T3g7?QvD=i~yXe%Y>K$Hp3M}U<`LbLO*ctR~
za7VZE`?vmrI!tQeR`LRW|COj#1(nLkXUWccC}4Jr>r%ku?1ARt6~Bd5j8TF)CtZDe
zu-;YUTkn9wj;X?@TS?dXGLTM)tA<~XmdH+Q89$OFyFT0l(z$pyR4D2DTK-|`yE%Ys
zUsxgMBvp@ATt6eEG<jk=DD5+>d8HuiyJG~5{<=+Dq@z^b0DA8`NdjYJsU>BchzlPB
za%k^Kj4HddlKsBTjHMPtVasboP1C!$bot{WCLq9>FR8LFvS97S=M>rcggEXdHEZQX
zHuCqiONjTIyk+&IMa=_bvcyuR1WFJmcs|`|V7-%n*p;PI(M~PUVMpD~T6|Kw{~_z{
zrplt4Q28aJ-tylYN~%!xAIZHi`|c6V1P25M-z{i;Q=?vR_pJdxLIr2kYu+i5eWm$?
zwNEKG`uI25uT*A$RA0S7G|PEH4EhSe<S(0$*xc-Z1}OPqdJ!bo;dD$wYQfHKLENrY
z+ui`}IlFt!rz>gQKJ0l1-3f2{bSsPHI8(0oEqY>3v`nq?ey#R#6*Ie_<=N;dlzXYG
zrSVAB4P$RbX<*3%Dl(~?QdM;_=dEXc;78{D%vtfiIumNy^Ccxj{l+5E3-UF+a@>rn
zAIRO8yeva$i4GDe-sWb8L^vc^*DTLL7<4nX-$w$wOdx=8k}PwGSq%!iNO87GTs)C-
z(7Lbo{+$1pRIX9`ZP1x}n!@Sq9u{f>r7p&}@z<v5VC3j)^j>b$%4~|@vIkfX(;~sd
zg(vDO)|gH%i!|M3U~$y~wgESp&H@zt{4|?SJ>d+Cj<6O1+V13C98Hbn4SmmuDqVu#
z4l7Wr%i1e19Tm}h*)dtOqZ7m%v$ryzc0Uu_Olssm!EC478DzC>UJ}Be?4>e0b{{}N
zs?LQSL*r;&M7~=eYgYy%xFE_3c_ZJ-Nbd^_ycQFxt+#jX*qb=F5&BJ!{l5U7Q%}$>
zag7G{jWJn+mZO>k;u&zcE^|Q2!qEt%{xLv>1;M)8pO|hBhwcc=OBfV|{Fc=FB}Va*
znWLrg=HX{U+atTg@8ffu6~;uS$ax&O$Tm37?>(B~<hvHh^=0;75g&b@Uct3IG<&?;
z$yO4cAI5mBDvvFORWVa1WFUJP@(g2Vn!#31*%<LcfW4d~Mu+{u*}Zj4#L5F?E5P;h
z4N6J%JQtGUUlU&gW92>bo+sO1ip##p*9{-y!=sWrb@VjNAk>=rplw>wbZ&&&{IDDn
z9VD#eM)Xs00b9h0Zu#7i@5w1lam?mtB?$*Gs$kM_X}zeRV4`LN#_}?HdSoC*DCt0?
zb(F=0c={4t=O&qkGdSSa9P<x&0n!ubQYwI2%DO8)chX|zHz7$z`(nr()dU*XsR;bK
z{HjinlibMB>xo(P+NXKRV^Wbji_aL2eB5p;{c+1(;xd?<<V@UP{8h!UU*0YTXnC|9
z%Su3BipZR$J{}3sPV{NS4Y5?`a9LB2BBA@clVCdh0prwn2RJRyp~1&Z8)>t5zQwFx
zzD5t9AESE5aQ?<^Cbl$TnU*wF4C&gMX_Gw{KXR&jgL%JU0=mZiuCRhS!H}JvS@B_&
z%6Ks1a!fTt-*Z{i-uuLIkD2r`_Sub{5vWXJyNR9X2k@*>88@wm4KjMvMO3~GYRbKO
z2$mRbF?SX7>Bj8~0zO|`z>1e7Pm85T?7R+aV2Kq)Noo{lt@Zn#qmcv3@wPgzz^bYI
zBhNXsY})w*^9E2roidcGkK*zz_`3G8%j^E9m^;w@-u)2p<GCVfnX;!mj5<;VR?bM^
z=4*CedcA@+<9?_D3v9M;lk|LP8XU~oCV5hCPf;Rsr8f0h00RqJqxx|?^G`HYOu>*1
za9%%23RFPc>EKu+@6o!EL~eN7Ps%dgT1+Wu8oe?N*PzXZZKR=%x@m5{3AG)hQHKi@
z+CbD+ox$ek0doM$$I{X=q)}oTn<X_dEs|o`Y>8`Pjy9eZT_mGmb8%I$F%bp71vy1n
z<dKhtr5qQ%{=#r&Zn@(PehjP0PRd7LrJh!gr(O=~15LWWZ3NbJm$}GPNt|;ee?7XE
zc4jYDfFfS@>Z}!uvvY<;lR5aPfuAo(0x8G&dvd<>3toP{qaUrqt^480w!}-puu^Sd
z-5>U`p`C`x$J^A$e#B!|xGGk1gz7)H4<CtbgI1ib#pqHP9XjkdG+O^H!a(zw%BP?A
zjn1DmAN6qu^8GXds?+JO*1W>1dAC1czVv`UD0ZfZ3R6!U%ULknddj)Ty|d_}z16eO
zo|l>U#&Q;aii56V7CLjZ<;h$Wy9>1D#L2}ika|vLY%aj~s-FbK_3RIz5x^@^NqF3P
zdrU4DFCCks>#1pCY%}nCqscmHRq}CVw($$~aPQ+G;I<|aZsZm(YEQk|-dyz2cnsBC
z*-|gO6rJK<<ighKyh^wHg;57z%y~G7i3y$>kiqfN)?}rTcHI3~v5s1FGg^Gm8r`B+
z{o_}AWTI^$ZzmzrEtgil6#SquSPB-~6Y5cCMvW`sWP5exR(Y{W_l*5Y9G?aw!G3iN
z>0xrWMG!6-1_hW1GiJ`8QMwNyS`>C?e5%P%3wCbm#crGWv__BM(dLo*(d|!1#pU?3
z@eM9z&got#<fDqx7YqBwmG@3*c%5zHZw}mOG)MT(&SH0%LpE;~T{in}U%p{7o7~(k
zW($hG-CR-U;F^)7@pg+}>T=JL(Shwn*1?sH3sFo+HnW6RkmpBQ0qG8e^p0V!RWcjU
z<S49=yq+&x`9h_?Pg?R{69c~5grA>BNy8-wp<f-ZVheWZ1zr|@mfGRrHW#S>^Xp-x
z$s{Wmk~781*4oydc-@}jNV@Ls<YetgBuLrXyE{FSLRp~*2s;7{j)EZw3O05&1f(oM
zR>1}(D^G;O<zeu{{}I6ZkLD4OqM{<iTiTXLB0=n}$@a?E{tq**`SS4K@px}(H^?7l
zDO+a((U-^8nP_L{VCz71qL87wH;j!H72QaVP_l~~(V779gOG?GM3N+gOcE3OyPb#U
zpWURK-6<~a6v%%QDKdp{h<yLlLbaSIL^oTa3q=g_AN!*Q;ekM;;L>mzBpeC<I}4MB
cArT0aEaXqu;efyW@E!;M1_621BXkP@086@|`~Uy|

diff --git a/sl_plot_cache/html/unnamed-chunk-7_2eb9368a33f85e5ca3bb37b49231d052.RData b/sl_plot_cache/html/unnamed-chunk-7_2eb9368a33f85e5ca3bb37b49231d052.RData
index a89561e43e66b25f27b56823ea1997733004bfef..ec5d9767d196018af8fb773d223093dabb5e1ee5 100644
GIT binary patch
literal 3183
zcmV-#43P65iwFP!000002CY_kJd}GEA4_85CXvea7~5csWh9MVw(LzrmY6Zmn9&&1
zEF^1|q^6qCLUcu&l8l|ka&fPvsce-Z##TZlq106G=+?dOeLwfl_xXID&vVZ2Ip_O5
z-*e6%Ka7Jv3hEDqKp<ieaWPSd*czb;S>x;DWMB?~h>Hpx5r{ZMO8AvVVz3l^R3wrP
zf_R}X1A&OrAP{)5(3Y^bx#!C_6TFQo#w^D+r~;v<CMIqe!;eH{M$apnKRWe*^K2#Q
z(uEU=RX_tntCD-kcKTaJj-_v=bO$-V^Fu2tC|RX(vE_V6Y2()&?kDS72kb5ux2;{#
zzW>n0_1v@QrmBscDm|GA5r0g@aoinof?keujZ(2nmUMkiEI9#9QN*V2d}tDq3-ftl
zQhc4d1y9Vju)AvfrjXA66jqqHI20$fcc8#Rub%@|ED4?abkHLTqAhoo^{O;TG6`YQ
zbMJsbbrt8O+uQrU+&O`pmS7=f2?}5)SF(EZnPZ2Xs2=>wofsVy&90`X^4*#of|<J_
zk}@pwesV=KL;4Z4uda$|LJfJ?u?zBe`|Flu#V=pm>grvv#|a;Mf}<;t>bv@%z7iXn
zeKCm+Ft2h~7MSI#iFQaawOPlc3p;m@&l2<+``>`uJ^Z>xuKwz^8C50`_nVo+mf!=6
zH<JAx?3ERb=mlWMQ~QtE$+>VRubiGR4UceYY*Z<<F)i62lqd4IXlfQ6lynjGSi<Qb
zmVIhU88zWj+52K~CHbt>!2T%{u@a}!fIv*Sb%Zx7RXS)C^r~%FT{D8e!d-NKl!XjB
zb@Ihc@eYxhv9di_o}@wzWSzT;>8rXed+Pk>@(I6nB#02NC}nRXaP0$w#1`k!CqJy9
zdtX0%JD!#)K5%p2XL|+sP}7~Sy9G6ETe|rl)t5E!&MS7qU-3rK9f_XxPBZoLVGr&(
z?5sUp)o2}GrrprYr4OAg=~XIyGq53Ld+U>6v$beHF+Rr{Cf|Fg)I~4QWY6<@$2f@O
zVvK!FVBo%YlwGnK%c@4SN^iOLd*8$}IC^!#X-@ln&Th*;9FgMudqr}W+Q^jTH5y#c
zDBF|TA6@bFos{1t;JOXGDfv@rS1d{*Zfi%Ht5}kIsg{@0owA%!kP)$@JXje_L*dW9
zb{j|Q6x#=Q#*C}pDC?=Z)dg(pifD`-RL-Oxo%;L*8yCcWkFpuXbz`3n7*CZx=^1}>
z|MZ1F@CVoquE3Gr>I((I>u);+Y=Xf|TjJ&AQnQ)Xm+dl**rGB+l(CugE%>48TVh~;
zUK;FPP&V>-$ifcVwm&#qc+2SrVPWR)6VBzaV^r_^UOLl@@E<;%d)KRabYJPyplOAi
z^i8~mb7!{t2kta{cN7CI!zWWwcXifXJe{CS#W6I!;sY*Er(KQxIMQ7D+|lW7eUeY<
zn5X^IKAS@QDFOFXsBsTx{~27Z>-A}+VhbLa>?yDuPhA)gR3$sEg)F+@LyzSVcBA1+
zC~x-F7V>a$P|g==5VLW*f=_EE^E}?<7xFi&q?DydPXnT*bJo^G%MuqBt<O(D?L=2-
z9$WX=ye12?^+1zP4|Pe~a)Qjyfd|f|$a}iA?9t^|E=5w<;_Yd$=*4o$qlZmd2m=RY
zF->Y#Cw(%Rn5`^t8sY~(pxTM{x@_K~@!=y`FYcGB7bRr5iPk;*)S)n5UxzwhzX%Sq
z0;k{^hd9#rHWgVm<b7N?#}Ul)_WC(g*(m$#Y>Gxh+1~SIjmz9$-uB5;72;cwY-p&L
z^;rB_EBBthA|g!x9pgsKE_K#Lw+&qWw6saQlb@|U5mV*nXyxKH^|;|tL8>g@@WLFE
zgYc=OxyilmyIt7uYb~$xLS<+%E2wqU*&hCQxUqCJ)y*<Cca&z`_sz(!J55vUnY}sL
z%<0*rv>3a{a<d>~_gGF5MZ?}UJP#7I7jLOGIOEN#7B4d2_`#*8+*;ZLmN=~KlZ<)$
zEIHZYo03lkt$3Pcj{BrGspdWRsRdCYFlMwq%F4=a84pEei?b?=mqH;GF5?Iu<VK)i
zhPPQ36zs=-tH`kRn^%i;Z1-E6>;E}z+hMiosdCmZiF=!O*k@C<M=R>H1<*uX$5kP>
zd+Ro<jVFa@5W)8^-PhduBrt11FFd_`5Yo^)z;IdrO!6j<)L`0F-*flgt+_iH89AhW
zL|@AJ&QRwym)%VZUIJ1^H&Y(ucTIl`%APxBH)0uJl}Fpx970`^-=IlJd|*D3_B_wz
z3A3l4xq*8Xz~!8`tx1vSKhpxMO|mquh-Q07?1AM){~_6pua&kP`H-*W3drT&(MXne
z3z6sOXTsm13(-&J&-W}(%#crFrA_6WbF%!`eF@dL`OaOTsDytq#il4zWc>|&$RbM|
zN#`C~KS(?J<o*2DI9rEy2Os|`5*zJ#%9e`vU9h~E7AN1^nb;bb@|CYpzZgFNv+ZFk
zql$iam4iz>(ULZIxyY3m{oSOolGQS+IAR*2y|<I2bFLv`KcAg8e|YZK4L5x<^B!c)
zcf<k1J_mRKF#^7R%1mptKLBUitt-{^%;WB?aa?$)c+Dv0iQyFuy)|_TJDLMHBL3`<
zA-8z9of`7CEh6@SRU4#sCeGZj>*LtHD;C*xYn!XySf{o6yLUdhdy%Ow&}F=k4ZJ)#
zQeL2thViv&^XeS*7#>`Xyw)ZbF)QzgzK_7IY|!u7XalSeC0z9@5`6PbeIvW=ELEHH
z_CTa~Q<qgWzi9F{#m^V?lhSpV)#ts-`=7pnnNTi<cJaTA^sk+1eBN@bts~JmK7FwG
z((lq&O1|C3q%GaJ?wTuj2iwXsL)1?WtUQB*HBYmmxMRE<n>No#TsOFd+6~y8{Vb)l
z;L$;~4O;0fDffdY$%q)t4H=&NG?Ln2sQ-F-#}+E!xfIu#uYm5BX;Zlt6Lz>M`D04Z
z$Q$S8TYFE=-^QE*w;uNRZSeW=Pj*pP%irJCJS|_ZN+^O5)oQJ>ZyotIyYJ|4$rkNW
zoNG(IO7BB1$*R<CT&H>NjBj3Xx<)(*b1q3yx2DZ+w|J4eq&ahfK-7=V|5fH@wBFR{
z;2@nud0UytmDDG9+l4eTrw|#pUh%2Bt55vGdkD99g}$yLUf|e$-`09MY-ew8{L6{9
z+LPRNlQ1z_=))0bYlFlMNh9mexpXZow$wAyxes1F9Q+{Y>`sp)NVs`rt7BxBP@Nb0
zx@UC&TjW|Po{Eu0xzSbD9m4R|JNMbA(UkC~?XI1a#9TMQQK#I<d2*%VbF~FNS=p$`
zLEZYqK5Z=-Y^yH%3$Su1KjW^t9BZ~;eoSsr18<SiSE;8c+D{zobl29l?6%PyefjoL
z<K5aM!{?%#W0FM7WFJMfh4W6WVU8CRy{%JcPjc#a6ee5EUa@H!hVNbnU5wTG_V`Hr
zF2a1{$eC;z)>8DoU=Lz%xbiZFt&xQ&Q*=xSbkIIxWg2$k=73eci(;O`!2r|U6TN?s
zCvoDN<re%tzkF3T!7+MNuncns<evvK!~f^5=YXV>L#X5^Mo1Voj0hSM8Ifc|CWV5H
z1n~x8L?-2c!S)an5Vr$mW{yRn2<F?sZDCjx4u{%~Gu>f=GR7NiGZEs*{*5U*heo4;
zIAj<|CIdt)ooJ==f8fwbfI>q<L*tM%;5)KGSQH*ifNB6cX&{yX0*sg_fC9z<VNqme
zB!!L!!f8=VDj=jFVJU#{KKtW<2GU7*CYDTx0(gQkU}*r5Xe2tIWvvATfInkGaIx?`
zR4|ML(shBKe<GO-Aq^ZLM};HFASIkZ1gusaxHrhal9BG;k8}~Mp+6swKe?@b6aoJ`
z^`CK=pCt)H=?7^HI2K3$2a&-KC|zA)Jy4-$XOIHYzN;pJ0NsELtacZG0^#AS23#l%
z0boHo{E!gw&r}2uE42S&5(4Q1-vxtFks%Qz1_PwQv1BR{D~vKinj(N068^hHBc#zb
z1V98y;Y7x&D@<I?qYJwcLT5%sVrj8(0`qT`i0_a>7e*#gKp0|mAgdk?#KV5%#*(o(
zICzLE90i>eMS*|U46KTV{Z}twx~p>a|0<FJ9ujuuUql%rQ3yZ?39j<|oSW|IvOuAK
zZ=yjIlR;%N4Dcj6m5hx|fT{-u!+-82fkX!Bh6GYLlLi|6+j<%pBdL^d-MH^vu|lED
V5>}yCU*X<={SWf#5g%L)002VFH-P{E

literal 3183
zcmV-#43P65iwFP!000002CY_SSX1e?j&v}Nh}ckJ8(~Z!i9kXRMTv?C2mvIFlmxON
z(Lh3q0Vz@xr70lNg$Rg%4Wua(K!PGVl*n-`fYPOifHaZj4bFJxp8K4icR$a5_FCUw
z>wVX|*81@g@I;IPQ2_#hNJ69}B_NX0ViO|m>~t7q2!TjRh@Ev1DTuuI3q=#i{uG8E
znhk;!vA+QVkzhd}@O-f?GcY{X)G#jEb03{j?sPmFrg6$p*(+3#7B{ptfqjWrfUu{<
z&PY4YnKw5dFD~mjF}bq};#w_h`6A>)U!?)ge#^hk-<xsayLRy(pB|LpcE()(knPhk
zmHXNwc8=1uE&e=3-|Ij^tZ7U_MRnD{Cl7*0Te^|e-6i9u$qYQj3NGtX`ugm4uEV+n
zbxHc<v1HY2#p*JA#_+)Wtf>nqtPqJDR9fa>pz&3i??dXr(W-Ut6_4isS?+Z#+ToYs
zj}T2y*asM+3}FP#?y3c}#(3_*@r|!=?UUt$7y4E1<NAuxN~4CT4Xnp!j*xPZ=s8)P
zOT?!maedb#Y2~z4Ltop}k44H4B4%pMHt(`ODrB*|IF<G1d6#u<{VctwrJ^QZYA(6U
zT>F&nx1T%kRzFT*ob;$6GXKSn$_Bxch*FtfdfNu(R*mjCSsc6b@XMmlSLE_;{|58m
z*t#uHgHYu43OkAR$XD+dZQI|x>ME(jXWd!I_^i~Wk?`EetSbIe24h)YBELCcGW=|Q
zcT>-F*ykBMA=OQmZ~5(geZb*YZ@X!WE=ErerSIRAi}lC+>hQ<<QoX?i$J0o5z^P>k
zzMSH`87F7u=(!lnr2@#l7orP0kml<v_is}*8QM4!nf*+sX}ToljbEG&|5l4NtgXz_
z9{$@Kx)z?`aTMj4MvU#3kg;CY>N90NXNSES?awMnaH^<LcgcAvXRCBAZV-?deUYWd
z)Pq`2T;b@|r>4j^T98dAB-w9f_h24=RV=TkPgt#DGqfgeXz8mERd(hOy64)JdICf?
zm94xI8)^L$c@yVrSANes@zrd?LbYNK;cdnDc@uNE<-3fxI@FF{t5h0BX44^fePe@N
zRL7z2FiNFt!Y##N*ow(`>g?0Z1D#4=r8TN@rOa<$#WWcN0`{GEpzIf4fuzFx@W*iW
zshoR2A#H17YF5eOQc22^XUlST@)c=r%~Or+ju7dh)sEELowil?4P-O-cTNQ2H#QH?
zDE{#%Bmm*M>u6v@placsm(309st-5@8>1ykeR<gQ4o-FT=7PI{#Su@0CvS{tcGfxb
z%CAhCVCv^5z#!m{oT>p=-th?e&WtH-PV?nR*!^$v!V7V<RC3MKCqTe=mHfUg;-xbH
ziKXiaKL{U5#q8!VJkusNX0AS8v3R)S+>0!^KI%8AZNFKm<w&1#w@@x)IuZwNx#U2x
zeYbGSg^kl=nJQCfpmz9XEg>;B?YMD`%g_|8@r1yM_(<71{GgDb%pr}BNQTr?wu$%{
zGEBmIv1oT+R=i^LLqS5>r0$WJ5{tUL<%+UCnAP>Rp_)aTNX5kE>GAB7H=LU24N4n@
zt$ZK*yq2$fR7soP@`P<mzHljX#+|kg12|huF{@Lwq>WektS-86+wi#{r!yjAUt+Yi
z-SUnNw^LZX{DWs!{)7Y$pT{+)G}u!c67$}B^jT5BZO{r^VK>U%k053FB-~5{IB}^P
zM_Oayi)w~i_V+G)N7{WsaDucyC1)!Zk;bB1<6ml?Bo#Ip^}~kQMKXoh7F~t!%gGKy
z51Ns4Q_^4Jo`hc1AU2<JJ-gH{SsGg$BRFer=yYGFT9`Gc4J_vx3LF{9_6r5&{ot-}
zssR#jBkj9=c@7^p?TdX533zsZQ~GFJ4$C=LbFD^4RCFnLoK4-6lD~UXhwg_>B>jwb
z8#^mkfLBu=`7Qb0NMW4Cc#i=V7pZ2#0>jLhQ1=w|g^**0uM6&E`sFK$($&HR)jH^u
z?6>-nQJ~dhyvJVLNN;zdYWgbdd7nrQbMZQ~j)lx7+OH~E^`8sBDrKkq(xe3Lp~p48
z;(t_B+=!(URuI?%^VDRyEpend!x@`Me}mrj`_uCHwHJ#r`cd(V6PE;jo8(#3T`5y9
zHMQ{v**A#qul;Hq^Cg&Rk2A#ih&+{#qd?&p?`&_lby`RR@q@_x6ESc2bUb`zX$Z>K
z^%ZP+L(@$zqCE~_S!2DHcQ(6r8P?d5iWAL`IgB4TB6KQCok~t0z7M=y7;Vwpajkbt
z$Gq_5<3aeW{DV7{yg`B9$mn#4s7(8eAf>>?D*B<Ed+l#eMcl-pAjgoUq*3LnbjgEG
zgIy4XS)Sk^xyL^DwI$5#)q5+0o2Q^!J<V<bh>#BAiVEb}zRymYr5PiLoVdkX5syWP
zdkM(H_w#1E&h1EMhgXoiZEix%vy^(T$Q<=*-K0{~tuJ9yt{)I$JatHS&U%V@tLq~E
z7<}dJ$_41zPxsK;<rftMb@W^(1A_9wThgKYdLwJW$!H@H)OE!x{mSGBG)lGwx!G>n
zSnI}gZPul5fs@oMFHGjrxilB!Og!7381#{D#Dk=4jY=W}_to{L$?LX!<V^9&2$RSW
z-1La<;pFj{`D`4aBbgPNTH8kNqwV4(cPA{=*?)c3?FJErczAeRXwVvQ%0mr~z%m`0
zJcy0LzJ~4U6Ks8*Pbt+p{V=1j&j!Xi@#~&Al*#N4`V%jAV}VPuf7fH7H)MGESKe03
zYrMUYol-;GyA2X`9py~zYONi9>_67eW^Y?gQs!uu-`wsgl5HOqC2OxfIZPTaNtZHB
zITtAVAS`O?%Hr|MHuAQ=pZ}(HT_vW>TFv$yH7UB?!St6F%l>!Q@Y8aY(*>&a&suxd
zCAGjSx7OlqIf6DDX(A4H{4U1cYJ=I+k0%K`H@o$Pa3wZ<BuH5D`8Q{SVjd}e`yKz{
zHS~Am_Dpp(-o_0DpIsL&%1+2HPJ~!5y#Cx;bR+Gy#~5jg4ByN(dUSpB`A-SbOnA-4
z%@Ye!mIXJG3L%cahG}sEw!f1gK!Vat)CS1k`V9(6=%fPMKr3fQukP>jjpXzh<k_lx
z$E%jH!M|L9wlu=zu?vd&%a)I*ZtAB85_xW>9(J*1xXg3+n3B&KGklLPcuVN+f>ZDD
ziBZGd+C;_VSv@q?N50Dm(N>FV!fC!I<C-lVz5CJ{pXPl>v7HjnDon1JjPh-WLg^&E
zjy_Z8%1bGgmAt8OsN%kJ$0&6=Wz%6nDs`qGd&c=hvx+V<1`csn6O8WMW^xh$-S2ed
zKCQ{Mh+;Ipb^7KK^89iy3Fj7n{BrBXK1~Cqe9~iPIU^@XAA7p8?CR$g$Ex4991hyv
zsMHiO-{6J`9UF666n^l!J;D6id1UVa=dp~YR)n|I<s(g%b+mxo^uu=-lu&zLPZCzW
zcZ*gv=659sfqY@9qKd-1>=ODhfc`+>cC>UXywOk1C}XZzuj;B<S0@_zufgt6Ys$xG
zee|AEjOv%Rn@J^0{E{H|Fc0h4Sg&2Y|8v*FquF#%CY{0Y^d@^#!TnT@AALX9-=FLU
zQc&JhuK#J2fu}C$WrWc;Bx5i>hI*i$HyPvQg)#8L8tGzmDB60uVjRVPFeS!~jg5g|
zv^Pkn15`4bYP#?Lfn#5&f&z&|3P!VlAIK<g1_caN*b7*)Kr#meI6Ma65ApzS2A%8Y
z&o%~pSqv@{5L3{|{($&C`}YA0WYZ{IGM%jeP<(U%915VZXly{kOhW+x{)+MR3W7T_
zL2nw!MgTwm_;ER68aO~__@e2czb}Uhn65c+dyqq>qiud1A&_gKKOft_xJ~~q0{&0x
zf5s7hmLv{k2e3GBvKRY5h){n+ArRtv6vUd3fc_xshiWPauu*hit-F8%;Oo0)z{SFl
z02yS%1I37cr6PeKvHfo*F_0GULomqj^E^f4a6lHEOlMNb;wWu2776fZlphkc(b{@Q
zfC|!lshl-eoVb?97I(vw&Gqvmvx4A0+<#Oee?W>|7@g)1!jNkNS@T#R1@?Dt5S{D=
z2LqYnQLt$YfA|m0z?x{-|LO${u_jmR-$io3KyhdOizpp51__8E!8M+rb3?2xi-N*G
zn}}j?IZQ4GMWL~obaGIr!k&}v@Sl6>L!*Q2{XR5bE(=8cxAjEnpqc)@h~OVxF~wl?
VL)W0!Uh&?q{tp@+yVG0^0063LSPlRH

diff --git a/sl_plot_files/figure-html/unnamed-chunk-3-1.png b/sl_plot_files/figure-html/unnamed-chunk-3-1.png
index e9292ca6052f17789812c1c47d9e8173888dae1e..d1ef501b1ef51abcba9623f879883a633bb2d2c7 100755
GIT binary patch
literal 17027
zcmd_SbzEFcuqen3L(l-hCAhmw&;Y?LKyY_=_X$Bh2(H0HaEIWUNpN=v5MY7?cPGd@
zeD>bHz59N5ckk~0u_sMu=5$qco$Bg7Rn^rK`C3KxDH;hH0s_KQdAV2W2ndKU1OyNq
z1rfMoD16q4fB=TPR(c~1d<EJN5QGpAtPl_p5fC8=h-e6iy9h!;2trl}Lh%SzKxqVl
zKwvN!fO`aayda2(Xpa>Hf(Y3~L_<SF+eO?(MBIfS?gD=Zf44w@YZqt-D#-3GGBPq6
zA_5wK34o*RqV4XYqoZSBVBq57;^E;@P*6}&QStEb2nYxO+yLD_vha9W30VOpUdXCZ
zC_Y{&eo^`Ha#B`~Rd#Yxb^_{h<=B2rO-%y>1FOf!01yzY9?{|-@gA>u;Gb1IP&Zn|
zFIqJM<pIEd#D2VDonp(KV*8!S*JEO0Vgb5NKmqRc$Cj_h_5<Z1UI-yx2q5=J5uozO
z#p8dC@r^)Pj9+|6Pfss*QZ9FLDvxz4?_V!pe`vHqXtWY)j0cL<Bh=%y*tiIkhsKA+
z#)pUgSmpj$r~Y!M{(b=Cq5t7wF<xjf-fFQCDDjJbK|f*u*Tdq&!+N>XdVlPCKS29o
z7ZKr6(tuFW5O)Dl0<s6h{3y}g2Lyx%G&G=lpaX#7V^;wFdile8|HC?f3VC=ydjMGY
zvqOOD!@~pdyrCnY1*k4^y6y-FWD$>lpty}=O9TW;1o>AIZ+x=$17jYZ_xP^JQ*yFP
z2u4PdS`49zPr7AYG!=&+Zmfg-xt%CIV-`ZN+W4jmZ1?gTE!&!_q@(Z`U8(2g@^EBn
zO{cYPw(kc<cMpa;mk!zw_C!{&w!E9X1y+22r5_ISaJ2EvgAt%6T*uiU1cZ;6*qjL1
zoG)PrKmj2F1%iP9!T8VLL<cYLy^5$Nl1&THH97x^nz~?l{<Q_)C<IFO`34SA+<&Y=
zvfB=66=H(s^>~oI<QZfJ9lJE3MiEr7ZnHT5N}OLvX;KWde^qY-Y6+N{&>~$q)+iAh
z5=a;z_ZQJ^by(8C`a#4(UA|S%W~>T5Uu1Bq(cP`)*>Rri$&hT1KwDOzubWL@#D1xO
zY362CS6U1-Rqd@mM$z4U!3)<)yE}&Z_<P^6TqYD9#+<e`!J1f2AHy<%C+eH=yD|14
z)rIn=#JXyNLK=D_gHF;1jXyFK_lWMMb{vxB>Y&>ZY5E$@-yTNXy`2~5Fur|)iZd2F
z%E2f~2oiIk(%u(lY(}ZOF>j|&Lkp>0IpA7I<$}M<bOhD48GptffvyR(^)l<^4_nu|
z%qvR;B>J;s#r<J9(DEBTS`(_Jv9p`JDkuZi<^7#ZeZ9IfMuCz1AJe3L=I~&jnhriq
zSAK%=XU|{vN3O*l_tUVh3VJ9pHXMLES?%jCq<+jc7A&8b=d`5~EwR=VQq+gx+4+cb
z6fShnAVuSLZgP>xUJlhKLesmdf-rv<T^<UA6wdgWQ=W@hmM#nCcDMdmKw=Rj74T}u
z!o?Nu<uLyGxsz6|tsGh{CTL6Ga{qJVVw#k4LnUA00Eq>B|B{ie3mlZ}-QIyNFAED*
zDUBwwHSFMu7m_GkZq5x8Tlj^JWNn<VHYalYslVo1HOk}xqX|w%aBE&CA%)ps>NM%=
zfPi6L3`c1gZNUAzd@V?{x_@-1U%fR(B?EjmGLB#Ce%B5l=*L8+<t)NZV@Ut=Hm_ac
zg`|Gf%7)hRZ(Z`OQ~6)A>&}yx%_7~&%#mx2c5b23Z){hu^8L5{@rDCp<Cu@qdb(Y|
z#T|hz@)G;6A|k4eTsa@WOsgX2pR=WHPYKg*(XIkB+S-fTA}&h2#kDS9+#GiVQ^(1<
z`o#r~Q<^MwyBoMM!&!V^(#?n*C}>HuIHQB6%1i~%aoDd3j=01K#J^RvX4-Eg#BlPQ
z*9gj=bN(*6>Xefs()%OQm^zG>mR*JMdBU<><ipQmavbaab=M)yi=R{^qQ>lE9Ozd%
zfnZ<LdKp?PH5$0A??Hc$!aPB4l5QzhtO7-%V(yJnLdkZw`xzVU64w#cvH<UNeQQ$-
z)OUt6%a88Mfs~Ew0Pg1DRLQf9@ryq^k|M;uY)pA~w?^=%1*Zkz>IbB2LKgDGBuPqW
z!U}U&nKW_6hPKBkrn<MoB3>2ViQTz7JFZIdTh@#|n9lAfR1In;k>J2Lg64N=XY=bH
zey_-eeeT%gn&esT63e~)YIQoMa}e1pR_FV0sen3%{(<g3E+f*p-y!v#d<A$otuVto
zy;n_8vfQ_AyFI$#Lo0@nbC&bE33VrRqZF3LAvv}5%gutL4gXW;DDjqWg|Jud(u^dt
zI`WYZ8d`RJA3jig3iIViAiAf&<_`MWX`pf&AFoV&rMP!$-XdlRO50~u5avL(CUen*
zg>i0C@^CC-Z5`om-g8}$Tc5tmKetC|0RM_~=EK!yqNUk|ZDgcX^Nru8E<5>EAzrE&
zN*d9U&%TwvcrQT{Bc>bP_@m}i=cakL<W2?Z5L+N4Mc*u~SYE<nSHS>vBt@ZmAC6R{
z_y+-^FRGooDp~la8yN$^BoNVVF|lq#I<#g7Yqf<I3IoUWl4nQxz8fFY+?Bab-?!vn
z%2!`YNHOZOnB-h(@wlc)P8uQis<6zpPkNYpUeuODXVeMR@FF!p!520;ci(j1)KrKr
zIO)s~nyJ@flM`5H+tT!?w=N_L-rP{sp6eAY<nu-kq{wtCwXI0abccC;Hi*`aQz;{>
zV1+-b@LF(xnNeM)Qa-E6G2b?R^&g@qT{Ay|Uk{@zmf*VF`<15)>OR$~sb`2ni)ce^
zIhm+f9Y~hS9pwPT;)S9k><N<Wa21V|F7lxuIF~mz%6qZk=C6Qsgq8anZ&%=2KtRdd
zO<|+^eL6x24XtaD!VTN4W$G10;vdb)g4Ld$Y=blTh0{pd_@#<o1cf7Ro3Fp%gNzdt
zH%+<Kl*Fk?aA~ED`70%6P`|%fjbq-@4kl(gybsOjYf}@$VC~pvG})L&|Kq&(j+K{~
zE$YG*w9+<E-oOesH{%1iPndkA(q3Tv%A<l6cv10#=GgX9Axh%aD9ybQ)9Q0KnmC*f
zRrnxpIRp7G8Q|WWXTM~9N7gQ%DP1k7Y&*(=%8NRm1sPA1UV`btdlQK6DFHjDvZRn<
zn%Z(DsK{|*Cnq`cIZS=ERg}|FyX^wzkh4T*2Vqt0b-~Jt7$1zROW$4|$2+1^e>%t)
z2UTwRp?}$!55?EuP$$@p@dr%}WMy!<P?_*QDaxf_8DU9*v@`u;-%fT*xKcaGsX8Ff
zL-J;%K-9=F_x+s~_jV}qkO*;8`6t~)Sd}?^@O8h~PA_b-q^_WL!PL(1o3gn{qR%_1
zFkO&`x;XoRnXT%Z-~DbQYm|z@antSlGk^w*s>&ar1UMA7Ya4jAbX(`SHZ~f3^abIO
z5oVUK18d1LrQzzx4A(u!vejELJc5tk1wWu(#l?NzpgWm=XF<@Kctu5($=yAnBvxyj
z9+tW{>^l7OhC|kp;KpXTBM`QkP8%c2{Odj^2t10rQpRv!Vn=0r*ew~vHYXyHq~liD
z6xtwH8OV^TzJs^nx26Nr9x%j<o32KrNSJ#&1QyfcFcF%#wIxqlk6a5Q^QsnA4CvAd
zv;aL!ggS41%yywW{^bd0Q8(|G1nI(*cVX<8&g&(H$VFs7=$519Ny>H0_SqjN&5PsZ
z-vYFX{*oUUie^gGPh(Nh#p?(Ea27DM&ePOjD48b3+J#-~v908V(n(qPT+--wB9-At
z2FE_sv%)8pG;@4>5dto03f_w)_VqOX5j#Of{#@1$m+&*wTH>3GG<t`8t4@S~^V1kq
zxfb^Z9D_Do`xF1OSn9?m$;l7Rx@f`UiZGGmhvKYeKPua5MDxas3|Xg*wg6tNh0vx<
z@?Drh=^SBXb<A@<|GdIWY0!G^bH8|fdV3{xmlwxq<by~7r6=<VcB{(%dAj7%9JSC4
z)DHzgC1#sN7H<wv2yK?o@4gqwn9uAFib5(fn`NlB(R8YkDt^^EN?dOiHZ37lq_&>r
zx65UrH-Esj_TCQ2+1x{EaVbH0?xPzotn)gaRoUAybjd2s_c$4sa4_1K(a%H(7Fcto
zVz_#}B*!=88bHX>$Cc_=i<;4%xQ7?SEc^{A<4`7J{As^t%rR;BmQ<-9nhwwL<qW#~
zX}Zp^c43D0k8PGfqvpm;sHR3=$!unxNQ(N0F#b3e&pYc_#$1!F#2IAk=+qFXA-JqT
z^G}<s4f4jmJc~;Y4eW(lGOP9CPqPl^b!DYnuMHE*ce;;y`Ww*`>eb+1zBM*>G}h6h
zUIRPtcw`hMU@E$SE+K_pk2N&kqft?d;x9UbJMVB=8-{=y^1QIl5HK160@yVgK)Xq)
zAy8{UZZoSn2#W95{3+oC|K8?@1h`5Z?Tx*Jjr?mrvY}k9@f3HqEG^&OtomZR@RVbz
z)J(GjH9A<V>563Lm{8HsC1Ov9w;_Q?<{t~R7c%Vfn-ALs{a<K*@cq@Wd!cOw=6vn{
z<}se4U(Hz)RG-c<g;_-bHZ;!}B*3Xw@Vw)e421~61%nN=a_#(ZKfF2}%xt)ijje;h
zPx8VXqsic}$4UbCUd3Qby@Rs+cb1(B+dCOY%sl&Jr8P)jnExXgI|EpX?biR?zcT98
zs6MO56Hrs_KPGnlXWU)iZ4Q*?*nh0+;*^f@_u4Cq%f8mGJHIL6GJwq5<h6Ahxku~-
zJ5;i`Zl*s#o94Ec<cbxN0DC8426<COoz|Gvw5!4@X}6a+Uv&i4$N!X6uCuybzw-x`
zFoCk;di2En`OA|Y&T_bfo?XNYa&eFD7MhSn->1@;EH0ro0v2|7ikenZq$i*N#eW&~
z-tpXbBnKf8Hl=g`3zTriY(sSH8hSv?*e=PVRY;-Z8Gjr7ZRDJhg?)eP04c(doZdeT
zs5J>vKyUviJqA>8?BqN<plg4sCDXqH``GV)MkA-{3JDs0`CNOqH2zY>Ahw3uiPlIS
zncNU)HZYiHcBLu$*%^Z7XMoy2($7s@Xqj(*1dyRMvE?LqROLx=FY?QYZa|)E&uT=7
z-aoRmO@UoQHj08|KoTwe=o+12g^qg(uHm}0(Es^;k3-2!_h+;!Y(t0r(MQ_gFd-gz
z^7rG97=M+)M9(@#C6cu110-Z#&r1O6qD?gi#LJ~e5(70Q9$@>^eTtEV)g*KQi~-X&
zMh?dPUosOPM{xh2Md48jk4~Ol@py2PAc~-lHOrs#+Y|S7voSj4d0Cz2pI%+Y7wr~v
z63FwCx|Bb^`-yA&SplXHA_7!~bq+(3W<UbV;n61qJVVXHO@+9-ci2Ko*5$5`i^X}6
z*e!Oel$W1=WgKO8W$&XuICC3Fo1{~eTY*>fH_2AiSGCa=xAWm|h4jN77n8DVNeJnS
zVR1vjH-B>#=<<Z#1byr>ZgPH~Q%HfhzR(KL4llf;?$8`z3+p*T)~p)b!a99ZuViiu
z#iw;Q@I5BDJljjy-6I$cpNIl+O<@u6ndF&^ERuKsXcfmxl*+F8$Z3yfSaa%Yz+fPv
z=b7RtM%3Y!Zc|z}r;=C$?rjDzBJ#k>_V|F-F5vK(=Q~;0l8b<6OPm8$rctnN0@2sL
z0mweCiC!!w#PYyo{By9I5c%CofJq*$36my^`A3;;UxAG*<uha>|MioBf!0m6vK`#C
z{q)b$0q8*;J`N`imp)VE<b20R0b0xfb!9+B0KFL?*d>ho;Pq8as11vkp%C%22eKER
z1r^#AJk9w*kQ0=@BL`7xg+E2{A@oQK>#7Bs`7KOQukyb%*DNjjnR2K9xXd1hWKFOW
zNp4||FMq&~E)=E|u<-0~eGL{9Z`mzg+}CyEzzM>Sg=$xz%TVzuneB&P%x;;mI!646
zpSkFzLcJnM*pEp{QZ>5TI$KYVhbWa<WULx}a0`JhB7lqH2lIk-o+U!Zs5i`rDef`v
z3BO><!V0dHaKHCYpkhmE`~h}iOoBoJj-F_-CmmN#k(vLwOqL<oB4`YzZD(eaV5>BQ
z%d>*j>Yu7bqE2?ssH(x<)HSK79;}2jnxtz`^98lJ;+6+SF*C5z*uJ#s-$QNo*0o0^
zdivIwJRLeBev}_MBP8{d!C`$|f{NXq%Hv_D7+*4%K?;7<3!_tcJN=EODMQB*ciQ!v
zjWN2kl$9Hfq76BIS?&$(?48dIF^fR6?iP3POS_+WY04Fis5?MlqsYXGSYAm!@5Yvu
z#<aa%^lCQrqKgt9^mlWwi5*SEbeb?8CtB{a0|s2(2;+mI6(Al%RgVOWT%HcIwqOJm
zZ&cPw!1m(SSS5$(c~b1n)0Z&LNXxf?ZZW2&-WXUX>DX<>XLll*Ak;)#r2lpMot5^G
z+!{Wo!#d|E@G8brWRa*lk9m&l+^N%}Xs#>c*8kTFxa^2@KhP-<DPY%QWI}FjzW?Xn
zFBHuU+1B4bUcx{x^wa*FTxaD9<3CuU!ntY`t<kH9TMDUx^)IO)8_6=f-Z%{d+^Aj2
z5=&^v!>qXYIALh_*%@gHM3H+aP3&h{SA7Qf%mJ+fP}~bdA(kQahenuWAc|YEE{=Q8
zEpwAu-3$ZCGC?CRW%x`h764{m5cnsUlY%8E_^dKjzG5Z79C+srw#gu|F4dd5l@e^c
z_e`Z1aD79@(MDflSE&h?(AATmkO-qS@#Vfr`V3vs#m>6vlmKn6CdNv0z1`<mKIZwP
z9Xa5btSK8xXQEa|>>s~bcD?IZ5m<sjWdLeJ%NtXrk9as6Q(1jri1@-B>=o#`lexG*
z(nMf<o6ZH=1eFG`Mxi=v%7-TnCl147Ff{v+@g=pL+!S3=nNqIV)k!n8yPoEeDVveC
zzja2EdFYI8U|kst-mL7|y*k{V+cLHU%`I(b4fcKd0CQ8JIL%po6XW@nwvV{#;+k$&
zY`l2;sXok%jXJfUN1mWVw@rii-JLwE{}|v5Mtkh?wjf`Lw4^-jy=u)py0EX<6m7c7
zh=uMRc#Ps)>m)Cir2dXV_emY*uH)jh!;LoxQ{2)^d|m#8&7^cOk1fHkd|t(F^NGst
zkQ{$5`o0+rvOmTw-^pv?8)tk!a8<_?v8T;sEn}dX#=*Rwe4<iOU2^X)max#>W*ZCk
zUv(%`5p3{5p7?or0)?<;fYLLxMgcd-gTa;o?5y^4!&rCgou1hH6!q!BcF^udhDi&-
z%09>3&^3<fsMr>Aj@34aifeFZa0p<o8**skRO@i&j-|CA?PXZZn0$4USF{^Z_=Che
zg&7a>vzL7=tkX47%&^gm<E*FW^tLbrsu*kOyeVy|?&4GWqf|xyE{o>+AYWYZY=yv3
zhT>ecb19_P9x>G5b+h2F0>`@7=I_QOi5q{|6m6P(KYuMOa#JW}%Dl#1waZ4s_hZ{Y
zh@g;So!3{e!yx|)j|e|ql1i_Y=1xf0>cU4U8{f{SX?SFY-GY&HlyQY@qJ(;uVn&|C
z+r0w=8scB4#>b9Mi3e{)-FMDU8ZhSvjQN(fSt;I6Vx9LbI;8nHF>O$!f6%1ztyC;&
z=63)oo;r5tyz#AN*t4VsHRhsMPA4-Rb_*$97#n6PVdiE{i)dY#H9X9ucjJ7l-Q!4Y
zqb%G<Q=LdYE1zOOnUH*u{b~NSiXqt@zuWq$<E>;e=?k<!4%Y2M>9i`(X8bVEJH~_G
zA#NhNb=ou_1{JG(AsLbjr@VTJV%0P$djlrm&wj%Op9^O<ao-hw*HllsegZ?su=S-Z
zmMzmd_HeSg(l1zimn(j~u043u;qG+2H&(VX_r2c~Ev#S=JSsj})hr42B&e}}S3TQ1
z>;1&pRv>xso#U4jGzMOf!0M0Hmdl+g?|v2MI)Cc4WFpBSitW)d5BF|(IUkBnxB+>?
zNPrHN2M;^{mNyER{dKg=P(eoRZ@I@cE?OPMaC1GLzBcH$H}$>I?bd}odhF%~g=fEt
zaXw#soD55WU#)*rhWM?Wqg|l&RjQZN{_M*nuvbg;8^8MOddz^pXW`J(i4xmM6+UsO
zoudr_7lLA&1S=Lg)tOA`W(_6W%A;RpY%de)YwcZnO{HUJMZg6CAX;Txi&8LcIL^Lu
ztXN$Q5dyP*r|-zb8<ouNUXFGD+s?ZwF<WI8vUsTU55f84fI}b1kFY<j73>);q1T|g
zwh#%}oz6eL4GFf(CVR7#7i-2sKXLv)?u;c!;D-td*y-Phwrv4&BdbXpLy&@S?Q=5r
zouxmG)eKtCfO-XSBJ3lH{r%7zF#RRU&rfv$zZ#nfg=!V)KDSabxnH!BmYy7O_B1+f
zr5=Q=<!ky$dJ>lk(p`<&IWtTXa(2EK`5MRF;MUjF-!kHyqd2vV(eb)?$7lfAsIt64
ztA&`Xxv*_K{|1Q`KIy*1#!6#(CU1A;Iud@duJwAan_4wR`c2(7uY657zJ^2Dx~{ss
z+xMAPJ^Pu=2~+)6^wC`OCEO>F+sMKF&?k`S!wLrQ=$4~CK`Y#hgV&kWs*W~&<mii?
zfiki5HWlj7+!MpcUe{*BCG=Zye;n}Y&IC)Kw1RPJNQ5jRzL;c`1unOyM;5I*74Xq0
zUc`G`)`a60&VDLQWay4p(mMKB?&(?H**g;UuF->`<mX77DUY{Bg<b=BCv;naIfQk1
z*cSB?k>fZQf=Y-=)HgoBtA_TSl-aizNu(gKZvTkVq;BdVTx#o=J5#|&#RQK+9!=pl
zAVR9MvNH$z5ol|(V=mI>wi`tgK^<>4dG1e4B2=CI+T*7wS=&w1NLYF>Al%x;^3;l<
z)<wA@c>Rk3t6jnLnO(!dY{5BUO#p+-$Q?`uVxVNEw&u2Jw``qL9JcXZ_>xzb1J~_|
z0(a)YPfQ<v<sJP+Lz{j*DA-FZ($X)ZYmZy~8IqP*(t-n>`mCsCk)1HVZ3mJ;Yr^>Q
ze&{u~`o5z<)F?Z%f&z^P?@l(yl!we_O%YShJC!$aD&^JTpz!gkw1jBUJDN@2)&v^c
zEZLOe<~MTM*OdB2TMGqGwP8Inn5cSSc4oAv<8>a+8El(!t@R1Y2_Z@8H$Mx{Q$*V3
zD`M7Sp7-W_NpUA(TmE$s79^RYT6$HWmRirN`QDHHKI>$usqg}y^9$}(MAE>|wELa?
zriYWrfuGfa?G!rYwE%ZAW0*fO>E_+iN5-)~w1jMF`|@fT54_Wt;T~%J&4NhiqUhaU
z+}vMG0wyT7<C$I?vmzU7)y(deB;#5MIzO!<tI2>4WsDQE%Y%F0V(qxrLVe%Ke&F4d
z+6^LKkipE?_+}b0-d6O-JUL~eZw$8Hhcdca(?t5GT?aUCkOH*6i}`l`^iiV$^9vFs
zN!cv?{FFn8Dwt`Ntx%5G`pc;w%r8v${ESxXxc;c9*OD*O_1IR)3}2&xmitwpqNF+>
zg``H!6e^R$GM2%nZp?k2Tr8SkrsXSGWU0_%3q7U|EPMv<gj-!h4Mj7a0<n@A?nWxX
zVC_Tb5QOtyvK8t3>K&}toaLv@6A=uR*Zxfgt1n*hsF`2hVrs*RhD6{o&y}UAcm)E!
zgxH~UFlCNHvVIN_kq*fj)Tv`RD8qWK1wtpkRoBq`a(7n_{u?WxIrZSx)N<?UYSf{2
zzY>{FlNovzlTrJ^o##2%(Op9|G6$SnqEU}ygbov2Wy+VNB(9PPCird1pCYM!{WRf3
zv^%>K;M6{8V9EpTfAnr(-BKUSPcErlGni_hR4RdD_%{+&J)=E;ptLFpAK#Hop!33c
zxZp;|_?5u~NBh<4d)1F$RK2IFOXXR+I9shyl5{k+q_)pi>t96Dq3I+xGbs)bbjPk}
z5^x^)5DSULbxm_8+I}!Ri?A#}D=!Vbamg@}!J&%ON^Z7R{Eh0<cDEmwL)mod-JT?&
z1`97{*cBW}_3yjIY}IR9?l*m2B;eK`e`6`J`WCfW{O^E*)RKu!4lXO-yU9COgH=kC
z6=^u&cLFXV$~lz+HdxH(v?q=I57okMA5;~qt&x91NE$!AzO@CR^}XK#9Jv484rF~M
z)N}mbV8;JCI*<bR7eh_K7+@{ae|8~DS>bW_tKYo*cf$rO+*Z5?bKgR}|Lx}u{*f>D
zc|hYBt%oc~Sol+#d+!$D-j7h|x;J<#+Pjk{LaU$6FAKi7UJr{?Ar&>6zF$JO9IZU3
z&ksj{C>dnaDMy5FyXrO8cP56@n)sDmHlPM^_VFbl2PmovyG-Icr-cb%s7J*qm$?d{
z_$1*seIwnhZzpWM4<CX;hRN+@EgeqMb-q>VRkf~e2wjFtC~Vit^Bs_XhCUU~ElUW?
zF`jeT%Ox+KSxq@$z&Q0$E1TCZ9_aEALT^S)wU64kzYh?TJxsmY@oO>2G-EU$VSI)d
zY)Pp}#q^dEWB77&s4x-;I=FRoizuEs1N(q57ACJloH@1MVTDjku#6Nut;x#YBxv$g
zl<Ia*-0rlXZ!PKP^NgnAUpaIdz7Fbz=;TgVS>qZj6)WSprX0B3r&tEHLE@Z2e_#g1
z#^M<wO(RZW--r-{Ny!lFkgKe>@$gk8v+XZyg~Fgu#YQS`z89E4hAE<K4w6H|cgr18
zU!!8_z#0OPU!?PYZBZ@cUqP@voOs`>!E}7aqg6GpYvcC|HHg_MilQRjie6X-wW2~R
z0Hd9o10F5r+RFYQg?|)9)}uw7&WsgJDt}xz^vsHYT-WCM>j5Kw7WLhz*4`@`#JK5F
z(Qk!P>GuCPZ5D3LYbvozR^yhmIN7xI=qgG(3a{>8-ro7jXb6x?)@kfU>2YSE#>pIQ
zMx{~Mmx)E&9=uIJ8-HmFOVWAD2kya?`!Z#lF;E<07mrpPP*<lQurz33PJ_JnrcB_U
zT!3$P7Sy{geZ_-b%l!%PYk77P#j$Yq*aF?Ld9H4HbI<K*p#zi&s(1J<y)s27Hx)7y
z_0eyw`{Gp9#4F;r*j0FX7SBw)1N`8uRL?%SFz1A;&QICmPVTH(NtifuxW`l`J9nNr
zo^8&i<=n{2-g)72z99JUY66v<nlJ35pHAW4%QA@gchU3_n+2J)geZ+&p8#4RixTjt
zY*DEX+rFQHBbj}dX8=??>ZTS{jVOR3Sh$2fC?1!`7pRa#bN9kfw_K#Q@!7jJ(nuS|
zyrnr-z9lYhI6?xR=sh7tWn#^aof{3Z@Z4P&^sAzMN)cIHd8I@?wAh2*TgU(;V1r`M
zmIv-l3S3abM|*+W{)>BPG8)}yhU;V+_ekPWcF+rtbBGV~Q_`(VF{@O{Kys!wZH*<e
zx~b~kVUl^rQ#xZxpKCLRf(fV^sF;V@1YO$M7YDsO8by$fhoSY9q@Zf;n410Bn+e-|
z6JywyEAC~iz+FY-?Z)tFdDyO*jRLi;6Lq!H4a_nOU5sucv~0{lELX*q*V=EF-cDM+
z(f1QE8Qj8SSYR4Eqsldrq@HTtxYiSdqq-G7ZuX3Un3yI{{BG*Uz_tzXK=*-AJ55Yw
zi;`_v9uEUcqe4n!)s}6}Fc7}*b2FX`)M<;+J&|EZP%#+R(Jp%P66fd)BUVd?FiSbf
zBZykQXq}g&Zc*BXP>c8D$?R7Ux{l3dI_kI3EO2>zvracHHr?q<w8(?i`qqSZSxgy4
zw%1}9eClq)Y$^v*^ef4Y$$N0q?nx~+&rzAy!!gz6^Qm_aBHOKT`EAhS`0{?<at#WS
zaZcSis;LNzMvgAhPV(R^6rWTpdfA1RfcFp{Qz(xPC@muJ2j)Coht8?C+si@iEXN<Q
zc#}(V>(EJBQ>5%8yMCwh4+li8HWi4$Df@Z1*YfVgxK-CO6-q81MuqisO1l{8<~<!E
zu?59beH1I1d5ZF>QTW<etoen%G9A@vQ=e+WQcNjW&dCxCNbPgfOC9_Bp`X^cGDKe>
zwo(u|Qz=~A&^eQS@25+*+}D`c5w6V{5Rk|f@Dbyra6wH^4G|JWtusVxMlaf?k{G)n
z&mD1*C{>+Go=6^u=D5Yug{3S@d*3D|X<1pyJ-4%r*n>G`IUw(*t7~yiX3!)_x;IQO
zppQTT)(XCEN@~xsDg@1yDiLcR@#eSHxKOyP9$WA$>r^`f+YH2bZ6AN4HBYwLs7Ual
ze?P0wgApe}<>%=OpG8@MP8U%l-ISMOy7|o_)2mo}OSOye#qUH0zR$;R-JNth@EZ>J
z+f7eoyr2>xtAVmm3Td#P_hK(lgK;>sTX5zKP_zQvQ?s!bK0)n!6;k-+TDUF0Nsfk#
z;+nO*qT*fZEm{N}J})5rX)6b|dd+%XB+r_OA`N514?q0lyPDM?6>m<n*&yGI92wPN
z53h&ksH&&fdyg;Itw>JHpRcnpl+Q2KyaqJLd7m(v^r$=Q$$XCFg#0kds;KcwPT!%O
z_4T7cB;drUYmsMVI()Iys}O~gn)FS%$1l5YN9e2J*dBz*q)^>?q2Cmj3dP4-{^Ylz
z{*aO;Oh82?r}HJ`b^_hXnE~&#6Y&W_I8Ol2yPn8R83;36Ias5sp<ci~?vSLUEm>pJ
z>l=eA`TZ2b_)6^M=_R&{_7-6mvwl?r&g)^B{+ZU?7ApOPq=r)g<pFJLj<c1l^@#Ug
zGu23-Ohz<A>++rxQ|(<b`Upo`j#($;spU9Y*Rqx2qeTkQ$m!pa2Th3j&uThD&$B9b
zV#dooz3Zf!>XGf!IEYgY5e|{H-WsKE3F>DH-r6lSOm{Wa^Xwi}f6zSaO@=<q0w#Iz
zmYmMgywEa{RKtPRj(JTz&2AM3QCc-I5S)VT$zbv^62_L*owsu(+AZZ_%b3{`&R)c^
z^=qpEYsg8GYS7Qc+oc%7R&v$vRKh}yC9yIo$jf>(&M_;@?hBMly4d-(9s>45*5MJI
zNY=qXBnzA!P_$UxA9L4*UGpgvKg$tDN>er~jAs5S^}x*WwmUUI6B4k?Yb-{s>Urq?
z%{yXmYa#zL^={CyFVAPYB|Yl=&-K|2KU?|Eo!&sAy<GxQ?tO`!`!kes4sKopJ697;
zCEn(9Q}f~NTmZQG4ozKsOv6Q)@-;Kc75r(V``Vs`oA|8r+`(K5)L*eVtuDsb++(J-
zc3RfjmdAdCukAz=mviYRy4!yRU9{EM8@zn>gK6Cy`3GaUXW()4#N?CNLHxxNO>9mQ
z@DvjZH-Xsg%)yB#6WmBREMN~xYTHo7^2t?CZ;1IzgMd4on;mNNuA>||<cHz6r7Xt<
zQuE5$88eddLcWSsQihWme3#8dq5zcU^3b;Rp?02L{mLOrJ|jhziXKIQoh2Kz=CzY*
z0g$)-6YtHTaDiTf$_;gjx<Wdw`)}z1vK(-BoaGb_;bkK41_H&vAE^ozXK_;3GL-O<
zgKSALFIdbMy-g$mKSlJ}n7TaYuf%}qwvWf%ideO)kxN}NTX95PlUyg1=FAFqN^yB%
z+yc?enmEGvT2_%?GFt%2uStfr_zBp7tIQY$c<S?NJ>CZ-nA2QGjwmeK_?)=LR7jQ2
zMvWz%sTB)YA^kXW=|4ddFY2X%-+t`)Omh<OGynaOe5Fo^-7=$iVo(njlrrK#q0a``
zk~n7&IxXSm@Ft8)<zqBCJ{~TOKUa_Ru`9)ERPVet!{=!6r;bSd?T)IL6`h<_7lM_g
zk|N7pI29cF?w7h-Nn3xJO$g?6dBbQrn!a9Ed#A8(bK46LIx?+Aoo=FaHo1CVEQ%F=
zZ=Grzstz*Q=ep7qMp0h!FN1t}jBC;I&3X_Pw-epO&+qh7%094~80`*#YR+t&-)b`b
z_Iq75t5;02;a<n$wO9EAPiH$m231G!6AH3*9j&;ei?p6)K&#pEa-0IJ$=KgW8OF!v
zAv2aY9Ch)!0pIxe-Gx>PH6@vg%tpDNUFDmJQvutcB9eiNDE*!1gEOsuRVEa(PubD+
zs^k+>Gr+=RpSeJU5s)HV$$R6Cd}=>~w%6G*bZ~ccKF}P*ex6x;J|{>o>+>Sv*`-@3
zE82&EkTLdT<O<QLG$9i|qZd=o6DQqt@aVJ~B{8AdSzqg4NLko-pMtp)b@{2SKueqf
zcIq(iQMPG_0d7U*_tH+=AV^aHf)7Q_c7amzQL5Lo+a0`foL3GVxC{{K2=!?{cDSZq
z78Q9iv_Z<|<ae^Pz_;j}N?h5Ih;h`^BL|@_hObk*?H$%BuI3BHOT7eMe{NFaAsI}~
z)?pH%Q<{#LrlxjIb-dp4n0)i0WWgznr(#0ZhlEA*058gnkeOkBs<6xG9Zt<M?QA$1
z;(+~agu`C*#NNW9V2r9+9xKiHLEgi*fkkSQthBS)bTL^UfflggUF&l`#}84GvToHX
zCz48f%f4;V651r_RP1aeFC?X={tb~%6s19oPE8z(;<&H|Qo-|vuE2qs!xAaGmcZ=_
z{42G%ZhP5-L%v^kl2q(COCe>VK(&oO9bkX&vT=@2(&o8o<%zu{N{3m}WvSbbu*^xw
zW$mjxkK*wR&psws)xl8&ZMk*~uAE*D>rygnZ|Ph+LrnNI!~1zW#DlV$mG8Xbo-1&v
zt*1>QnJUF!PKE0%gt{8yHHju!3;9VlMv=@NaTIY}6ec#jhtB=PjM*>KR_Q!UTe7Mr
z8t85UTE5Wh@E1=e-nu<>XB9Qd9Ez{&Oue^18%wMyEiihb;Aq&MMbq`mJ?q$Ww>lg_
zeUv_mvd^#c3$2rIt@wir#3YP&Gi9Pe)mDv3%MDExyiC2HXvfY>G<Wx+QuP(?X<)_Y
zoEM+uE7KS*TC@i6S7YvcgIptxM>c<HhIg>xU=b@WEledcmLBKK6hF0lRu!!kWoHAn
z`cC%ZV|B%rj~W_zRLpaTV2;Z4tgjX-@!BMvZUB{X>TkfL-z#)zc#&t(8)3OR`CtX7
zs-Ng@q%4$*QeW*_?w5dCn_BrZhA%5xl^i6O(HkxBcSiHpV7JCWNjLf2RCkpkR}*w3
zXV>OK0y6f;G<eUlO`oj|tlAcJ4jYV=!`jW(ycbR|^k9it9{BX}pMMsl__Cx=Ssbqx
zq8I$w_6WaMv{oM-;BV{x_UpNRk`A9Yw~}3tqXFzXI$q`SWop7vh*2+#bp|zP4L=0g
zMLfFo*F10jkQ~~8_6f65(mt9DY(c-Utl*+aiWHx7b_>I^qXbc`Gp)dE)G|G+Ci)Er
zoCK*nV*LDuHA=yH`|YUfm<!6tELGinK&-Rm!eVA(rCXhY%$zVUvyS7g?q~aPFu_UL
zis5X$-WRHYW+?7+5!GWEOw+*bD%C)z_3>v%qdV0sCZ9|j6+)MJKx3appX;fr;fb=W
zyqLxn&ZLZ%KyU6Ze>-th!?us`c^7Ran%MTLM>QN@^Qknf4g7ipTknQ#*(lIVyvLPi
z36?<X@l~DS+u{op7?DrIFJHczDKmJg*Gn0%LzT-(w>BVJVi9q>D2PPcGcF`>Yx(W>
zb=Kan!aRMYl0TaLCGU^kwmNS~9|DOpuvOdZ!7&S>g&La(C~0x|FnaS7b+v7!kmTS@
z%iR|wb00tW^&nLcb9<pb1DDQXOXB|VUYhy|AFCbykyl?<iX&)9x{wD|eV(S-z{<gu
zo6cS-gG}W`^;48WJ^l3V&zR^~4dvDDQX~Wo=*`S)n9Tf)CjRzVw?QV2pR7ZQrAWTM
zu}2@0yZCufnv6(7;Q6d3CtBE|c!NjZ9!tbnBoJ4mZ3?AWkMu|XPmJX;8MnStYIszX
z@ZkR(a-Pfqr&?fu5B?2}{Eyi+NTAE-PrU!9gp&nrSQSI91J%EY+05Vr8e{C5?tg<T
zvaq{#ba3jwvF`sNj|V`$!~gGzBL6{bWyI42yM`Iq&igAL=Rcc>@xM+D`VSKlfXL5(
zN!I!Q-5iqtH&{1BBSJuE2A{$H%&Yn{yGjy;>_1GS`v1MG{tpfp{C_>n9#9~qV}7ur
z!xKoO`up$$Sq?NIAR$ya)8HqNc131VcK*DxuvaG~xYTG?iom6Da1!q>-%6JO9>TM;
zH=08f(7-?Ihq<ioUQs6Qz`DCMV+#Y*pU~kPyoLlyDAFrqce&|zR>Vdzkl;S|Ymf;y
zA$skSKHbyY9|Lt){En_U+57om{0~eGSiwtfTK4E^Ny2CV>!L_LqiDC#L$`RY)aTQS
zuW!+PdX#my>pnwt)m3_>e*wnM9;c#~ZlZb;o;>LgNyJCgvQLiUjWlrK7127K_LHhI
zsO><30j%=L8RQ(1y_R>$-^AHD)#7v`DzId6_l?LzA{>S^?B?_doxY&OVdQ+TGOOr)
zQ_;L>Ds4%GyoOmKwXKHk8aD4&8(b(pXeG$;?Qu_TDe4De-a1N?9c0#e-b~RW*m1{N
zokgbwQt{Gmvgkyri2-=jGLul=iZ7m@4W3~Yp&KG8XrSs!(XLM0!!(`3XGiQ3`bVGd
zh<GD4-2MIL^3rmE{qYZfX7DdD6`VCHURB>P(xx@6=i*|bodVfoJlh)Q3M_Or)JBd<
zE^shEsU%_PF||UGupfc4N?nh>Hi?pZ3C+h8ybdjzo;>>fZ`#q(9h3__543DXHB|7p
zvG~r*3;W{EYD&1~x5fN!U{7M1*P;M%SqhwUu%G?i8nOT;xQqUML+hyWNMAToGnqB6
zssxIAH%%%yLf|aZkP#)py9)(kS(8XC35hoG_c@(o?>vi)Y2gF{-?5K?ZSlRsxf^uB
zH7T?oY9vN7tLKc0uhaMU^SC&Hh|*P7V8zNVUPDe>JJ;7d^zU2T>Qp9rz4DSpSl+{9
zTP_)doZHHw1QB{6EcOaW6$FyiItxtbykX%yYhV>J^s67Mo+p<=xNa06Yg*<3n^&fO
z-x6g-w=wSOB7}@Xx0exlo%&9f7dkM<T*Y1vX5c(;hblX*V`s?RGE0$hR;EWj3nx(l
z<f_ILMWS`x(;lN@i&DuSnKCz!%(LMrwqs+}{Ghz}+*AVQy=<0u+Gl-5DOmXZZt>i$
z!)PpR=*3N2w{x2Pj010xnDOZ5@1g6+wK$sRE5c&3xvbAN?w{XD)Vq_Zr<yB;a;?as
zvd0i(v%2_xG%J?w$jS8yP^l5eDsXU#F<`$`r6f)LCT%e-R<2%VRKypSqO9iXvM=j=
zajEufWKO}>{~71V7nQer3gp6Ou@70_g<V&VJNi`js*lfKIPqQ7-peiKDdzl^DCcvD
zPW`3cMrXLntdJeWe0K}MKSG^O3|AA8lO4kSU2uTs`7RkPwKkksx>#~D1;U!D7yJR+
z#g@v}`(>>KD75msLe{aO^%QZe>a3!WMtmX?3*v79ZPwZfM?ukc>{d(IC%)9Y0*A^_
z+7L4-p$;KsZsANJ)(XU84^7(2t9l|kq7U87BV83<DyyxidBW&Ej!x&F$lJ+(5>V5$
zDqn2Y%^OKt?IxwXy~`xlIy@#;DRexMcoFDX@AuIX{L<M88b657qd(&E_HZJMA03UK
z-9!wHzS51RTzwMQ^IG{#4kU;+3hb;WDKafW(&!m3lGdh(^||I&zR0V~O>QgY)U%q~
zfSuAq=CZO01vc^Q=>{D56*CyN`AmaY=m=f(H+VlM<XhMC)a%+T>RWDCh&s!wAqXgL
zo^HENA{E!Y34Wm0calq*kDZt5IrAL<^)^-7W#s%=2sGswlCITSnf2>^Q~S!NSWPa=
z7KfXW`$b*k`;4=uG-ynv5${WbVo4<%&TvS(K(@+uR7)dN7g<T`aG}h~0_?Orgck)p
zC6nn5EW`ha;mnZgC?_nf#psc<#&zTo7yb6!`7N3zELCbNb*bAlbeyQ|lhj%ht{3zv
zXvNq5xT4p{X0iX$&J2`9E|^~A-*@cd(=d_KJt(zR;EChs0&WzEobeJ@1vbU-gg;50
z3Y;B=r(_a4?JUJukbWcM^1#R%p41)mYPI8_sb%+(MHUeO=^M$|wdK!>fB{#&w|Qdp
z4kqyB{n_t9|BWHC&-qr;s_SgxM(-3aHsysBPcjM&OZ&MedFK-bk03v^-h0r~FUUD6
z`-IY)JROw~OX%W{S{$m=^jn2&yPZA)YcU1BlCoz;#H(TZD+@FMik|R^aH#N|^_&*M
z%mOoz!re=20%WHClkfbWIC1y?>`RdyNkqxR*XUdjAvG3j1V}KKMXvD(Kmfg~lSQe)
zgNR5%3)c`)h_Xb150vm{U{*4UmoWGq@Bs-Fhi$Tbg#dnnAcOj!IjU%$1@1f@P48JX
z4oqtARF30H9p&mgH9Wg!IrJOMmd8t7_O<`2_Ce1&;15Pp?KN1!RlUQub7!qiR^o7C
zppXKnF29ekdR2fTw{-gF;#1kA2;{GmdZ0NX3R;EU89^6TF*e;B%s}6r-#r2rxv^@n
z5{#TcZ~x8e()l^Uv9vEPPRBpm7BijMa>}2pkP}%bGKq=Nw3l*;*>JAeJr^X&<$kSL
z&7qRFg_cgotMpm5j}g8*{NsK1r2G5o6tRaZjO*JAd$TqIS_?(g_#!0#@?PYpRt7PM
zeQO$Mc1$;yp0}7`gw>lA17c)((3Y87!=A$SR%46~uc1_R1H9iKN!H#y;i>9<n}5uN
z*l_lkDTe<_|705lDNBE3S@iNtXQ$3BvMCAtdHKcHzO>JUdx<66Bx_Pn1pdMa+mn%p
z(dEXzhEe4D9&{K#wDqjcA5M5XC{S|5x1)9$pC!xk#Iw;gGit)ijwRj^10p=WN|y98
zx2>VP_Q(R?v-3S`(wifE%tyb^JtR04S#xc4V3M)L(BTuaa9Qi+fS<fJnsy&3rolTp
zN8&mj74ClJ<o_%bWfU`DLZUI*C}GEW<|_VcOt~xECqUt~+nQ%Bi2adt(ad=kQ3ReP
zcg}39ne9>q!5!f9nXUK6bRx629N(mC@EKV?O64@{^+0+<r6+u}N@rpEA^MZ?U<^?Q
z)Y99qf&!tIBSsxI98mfkG8Svq``OGkNg9awg}IvNhNVXP6q|zIU3-LrNA=C0TdYs~
z@tQH9lJkmBYC!$AiFdY=N6Y~4Q3-g(da$(v$JlaGLW)1D$}++OUdavqd~WQ=7>>U-
z-{7v2GhVW{Si&WygVGxlz>vDt>z*?IKJjs|<Hq1^>fe8``kn6hFJ>AOqJ<n#l6Q6L
z4oqgmkn!~*qknBCL5}S!PAnuWzeo-ck^wnaPc=9Rd3z@;wY~MOs?p8Oq-k+4v?vvv
zwoHxcMaFb}&LQODA%@So;f+ZxvI3t{L-X;+T_GJ5$Xx37e$zQ<WoxVLiF+9ALwDQQ
zYEfFFm#nWxL?KvE$oci{+NrJS_PKNn)G{|#12`E>`+w<V@c%e5<FEwodkBqgT#ql{
zgdAeN!Mj+ass}erH|}011L$7vPdG8LkFH$S)-Bwwgs&HY)CCAcL<<V-LuQ2!@LVs}
z0Sf>kL_~}dB(7_7JiFbc>VeBi`SKBf79Q-*9hX<Fd_O=+37-J}2^D-EBN8t5egyzP
z0|-MQw<o^jQY%7%a}UEvw-ZfAx3e1JKUZ#h(k2#*Ig<NeU%nY<id?6l^S&M6K^FHj
z<G$|JHVG9G`HKZok?>CbmIo;M)otic+Y<sqhUQ)UL?~7e?28vgXB6a?!x(!R@d?sn
zS4aUc^R2p)2Me&wO;7frb1)1qfZ(p<<vBANkgVB$w}m9+8v_w}aqG<CAnqrXweSQ3
zLJ2<xq5BM(ZRr<d1xKI~8CoTr`F>W4UKa0KjsnYs6dFr$eD_cOk?QfiW|&v-ktu2u
z0x4suPv&6uqOz^9x?9o25=yvz04~Z6LFceXJAM!X5#~$S8sam~9RGzxl#K23mml7X
z>Gx-JRxb6srlJcTHcP<XA)@#MP=brxM0^lEi{F$9;<3BTsiK?C?sebnS1$*hMxqiP
z@l4JkNPz*sk6`+|qnM;uJx{^E+|}to54Vx4`jqguj|1}>g!?nQZ*>TX)p65i=k50D
zWD>{y+!t|lFuB+x8~B`)Yj?CE?7+D<>?T``VXcJ5Z$v~85rfBPp$BqR+U|eL&la1N
z=8PP273htg_ZMYem$ZEELi(EkE~ol((yNvpA<m><e4jsOR--HK!or|qT||Nif6_2<
zqu~sq+UssTT-@5nVz^E%FAh?lkL;1$GXA-r)I9VAghc|#`7Qc~%Zizf@rpRh%$&pD
z9Fr=njmN$x(*TAA(eD>1J}wBLI4lF0h>RHafy_6SSH@TT55KB+4rHjC$jO3sf@^&3
zu#Y~1fOil032@p6g^1DwfzkvD1p(#1^rqg^>s8>#0-iqpF2G;(j~_rciMq%>Zhj$;
QKPDkBt@5f$(j?@+0bu<u-~a#s

literal 16974
zcmdVC1yo#1w<ms@MnbRz5+D#D36=zR3vh!a5G1&}Ly$ml>p*}IEJ$z(?(W_Mr-ReD
zG}^dZqto2)-u1rs=9~9s-mLXs|EaD%taHw;UAuNk@7nuU1ihDkLvWYkE&u=o(r+b{
z000aH01)C182v<7=%^ZfbNyacMG}3Beg^=80AL1y!2lQ&0N(|`n}DDoAZP{%eh19Z
zxf%olVPIgO>267G6DAmZ_x6H`3C7$6-@OaIy9wR|gEuk3o9Hj_*BeZ9+C;xcUobZ}
zad2?%f`Pl}l4$a~n|C)i@$m5Q@$pGWNFF?RKtn_G^yyPBE-pSkKD0FG>TgB3O=f~-
z==@#KtXlB<cfs$|a<|D=PA*K&)>h6IeJzj+>sD1&)zQ&0yKM%#0AO}o?E7uG+w>j%
zG5e0bR-1jFHmgSG8+7^G(zhwhHmtxltlPF=IW#mh49(XTozc&_!wQzey3zUOyCCpg
z5Y6tEBbv*t6t{n>zgMI4^!MqT`1tq&Te$*T+k!CLg6`#l<(q0VpxR8Z`a3$C-BR7A
z>FQ~8zNx;MuD-eH4wLH+v+XXh?e0dGxaq#Rnf@*~{oQQ38lAsS|AYFr1UlVJ-`p%0
z*e-X6Eq9}N-)w?`TTP>tdKbKjRwY{ZXf@wzbn^xP&~>A^quJfogD$*WaI@Tfvy3i>
zd4sO}&#KV;Zf<VeO;OV5{>Qa{tLX>;RDri&Q25HeDF8eHq$OUfxF&5UhqgRccbiu)
z_vdhW7KO<eiuG*YNsFzZt|DJfwn@fjKrp*Z`x~58L!9z?rlo<d?;U@o<<aNgziSx0
zP&v^mFVohXx+zCGttPom#~%uE4IFxYm~CJ?y<8O-K&70<b4_QYrG<`}m9YT?1bs92
z47e-rQ(}Y!@EVCjh6bfR++nAf`bq$j5~nPC3bnAH<;5f?uxSqfGSWgP{xxwQ7~0@B
zw!qY11aoqGADV{Ssr*MVY05L`YgJ<l-~9*Q3+}MDYv8DcKD*ngib-x%=$9{bA8Y9)
z20q8wYt@Xez8@cg0?0Ri<||6H)_w!TL!92jpQjt>NJ5@=3g%ipP-HI-z;xwJoV|E|
z0gn^d4;rb^lv|`h?s^}{9qb3aIjB)6U?c1}Ki_KqOf;=*SMKHQMAf|2?n?de<Y}Pg
zje}bCGp7cnE1Xxc*KPx%T!2PTsz-xFsk|zxNyYwgCaWA9|7TE26`5UzL5rqISc2>R
zNz+j(hHcQqqw5TwF}esd2r6(~8_oG9R)5yZM&Hqb8suG&RLumL=j@{wg1}u*lvuo3
z$R6Y5A#trWi60}>eC2$vvJ?2UlyfI>SHLGM(puVunw##3Hm;&PzIX>G-i0m0YoK^x
z{619XSIfvIkqszCc;;f)CBNW@@6wZF8L>jd7b@`0l3&GG?<n2GgP+QkqG^osl%2}q
zUkST{xMZ@OaL(%c&9(z8^KGP?R>D`{RYya!6vszJ)vW&USLNMV^`k66_6wgij=At1
z7q}D<{Iv;%OOZ6^)1s_XM0zXi3u`RKBf7EUF@}jJ6P3kLHgO4Ok5DHB-;Q~(wu^xl
z6r%7E;<9aXJC85U*@^V{BikXyp0*XM0QQ;U<lad?JtZVQNs$3}s2(k|li3en5>L|e
zPukD%eZ9nYTULX}1f+0V(tgg~HyGo&(GYiI6UmHZ$>Y=5-;X!&vS0%$b`I@QPr&Tb
z+Z@-^8NwHX&OlASXJuY*OYyCIvBUSV80R>LoyHPHBgPqXTsw{_hkGtWST9fxk*NDu
ziI+TmggjX?i<S8a$wsuQDg0M!BG(B=rXo*q9v;E07P%MRECUx3xSXhkAWDbF%q>s{
zeubtjb6YnvonX8@HWYk?U^dV-*nQX7DK$#8d6(!2^g?d8tR?}dmJ_bAehq4lIL)n0
zXEc7%Yq4SqVrQcaQ)Zj2>IPCH#P^kd<$2IEg>Oa2=LN#0^8-8h;Ny~Fz1?DRmlQBs
z`j1W`3(+TH?=D?L&%X<bXA^19J)lWJG$A)TkfxA<QO57)Qr6+^MR4FUw^8uKjNUGI
zU@~)5JEw|hQk&+Aie7O%4>`sc`=JZUXtFf;esn``6@Zm5@E`XcWABO;yh}Mc5RuyW
z`KTmJgUf9(%0s}TE6Kyc<%(~DFRyJ}QUF1)L0jl8sLFq?7_UUX|0+@bQbZxCW&gX(
zl-)kfDV(8LC)+lC-$z5GUMuqeo*95?Qmr2@7<ByH?)rMblHN}Ah}@c7lujh|>csYR
zpdHTD?rnYwn`fq<0oWD1>=Mtz`pmH6+F#0IR;U~mABH{HPKP(nIO$1o%IflI+KbsO
z-@7;ez922o&0eAOF~U*lX#3*8F5kyNJpIYfy0qnx+=9yXo4oEyE{xScSG~Eedl~a4
z`q?dC*<wjV)6l{ly<0rw5=a$<nu<D3BT@GXLB$w4_N`rUZgb5YZ&HsoXh=%dO`DzS
zy$RB&4I<9xc%7nj9LfoGSlv-Z;Fh^znC^fRVlK}*#$5W$$-w!z<7dRFNXPM3mcFFh
zK-X8SjdW}nmDh8ct}!~1C90Z0&Cm{F(LTkTuMzDuznMbjjpmsdSshUBeKVrFU|~8D
zk*Bm-7&<3hHD1&K?<obW0B>$K%FFG?FBZHxoQ~d&Sv123ql$1eGMj7UX6a%J$3I(+
z_DYs;&ub)mZ{01`+{k~ZNlc6gPwg*h{`wH-L`qNlFumkR8ve>vBiU)yDf;btUv_)X
zxQ{~N_+2Z7Lp@n}iVIFVZv_<+_52<O)@C<%H5&sb2+VtxVSJQ12Gc|Pk-@Rc*z>vf
z+RK3j>Njc}EQOjZ(1X(^n~e`V6Hs`HS~UL@^;%ZA{>x-Jf&H?}zG2ub2vVf1F8hN2
zGh^ArgWa~5sh8uFm%b;%$&oiVXF=iLoRz&D8OcYKUoz^+VzLW$5R<7K*bT7-xBJ8%
ze|;AO6H`~uXmqQOt|!iW=F~SZbF#RBai9%43rG<ns&F&9zArBO^xMr;CAKPFX~8HB
z4`ST=(F?ol=yb+JMFB$QrmZ`rA2<B-uo%ynxhYxlccdY^(<>cXIA<YRcQ*i5rG)jM
z*fV-D^Io7Js0O4{Q>u*-=c5OzW%x2PGI&V=Vs6>QK@jFq?px!s6NGZUei@w77;eBY
z?kvM5gz+KaTpo3ij=;o;15IRL#YB4^MdeTeF;r!ISP;&AV*OF-msL=$#cCGz619eE
zs8Nb=CLAavS*pkCZy4;%3yxo(GsE5EQ6ub?43Ceqt1H<teFGs-W>ZqbledSUOyv8>
zYXOar&nTq1%%KcD#HC}DK2?boJ#h36;j_xG=H-`-4T>EZO0Ew$>;?A0#)w9SMuz4=
zCw!epxTu<Xj#Az==BH{xGDYudKjO<O+hNoyZ{(OCFD;6%W@53D30r=!L`EdUHff=U
zF7m}X%j+*i(WiMZ*70R#?xy@EOzzVbi`sSxr$-1bH?L1}V`}EhEuRvxQ13M%#7hRC
zz1>t&*t@L?oJr<S^!p^erW@IWW(RIpz08%X=C<Y-#Wykqzr|AfwQFjYxuXImGB)5o
zxr|WG<0i?C@PyUKV|ixc35Ox&xXkV!dYtfQRVT?BQhAO{WJ#q!OOI{3Yo<5VS#&d@
z4)&R>Fw`?0WnBI)l2M+_xxMM+*?zLd@et^`DSl?Km2yF5v2PQ~S6To56V@k4;@D^L
zo%!w}XR5dwyKxhq?5AoKO4H!mdHd>k?t+h7-6Mfh;Wtb%Yb{xk)Y~;)QGchtUo0`Z
zzfj5kR|yztUF8r+EE!<vx=ZU(hm}9<fBofhgcF(-pZ{wA063d_qe0^Ja+hr6v0$5v
z>suk!#9D{=dfgGu!ztMhqrb@@^Oq*Z7*lY6E!^VSAf5|3?>7+>T4_(ScYdVP9D&i3
zmQP{!)$OFs(~=u9t~t;ZO+KB9j%}dcgi7U&n@eYgKIZXAs~Y#eK`}B?M~AJ4SYpPK
zluU>VK*wLECg(HERg!7xWKhrzrI7*^qY5gQGe44gm+t-2Iu#SGE_hv7uU$t3t<KY4
zj%0zlr#+BV*uv`-Woz0ZM6V1}G%K3K6bK_3otdmdX*a{12};Iq-hRLDI)m}n>8wX|
zg-k0Zo#KU7+J7)d**#!kr$LBlc;>L~U)p9S!1?QfRHq(AxR>E3TxFy3F7v1Z?~Qr#
z4TtQC7C&RyC0iWG+`ua}-Du$+pof_o1sVMKruQ+Y<izd%v@MXBEnlQ%kA0vbV@f*J
zG@ENJ>gaa{wEbrm*)!-pV=5J%Z_mlq?;CtABh06ed=T<ah93Mgz+BRrQy`ZB{HJvP
zr9rrXh0ynOtE%5io%;i#t@4*eDFQUt8=V}5-$$6i$rB7-VJ+w5K;|1<7Zgq}PFot?
zNkO)1e_5jLz}dmZyQC%2mprXh#hw37q$@ciuRTtTnRE(ql8_vT&N0rO2U+S1Ib)|<
ziqv9WON_s5(PQkr0k-1imp%%0n%Q3i0>&n{faXRm-80zbL$vWsI#CETU(DaMb-?{^
zblhvieW2#%8PX&Mc1-^;V9zPRH)8AJw9toti`!KcU89zzSxBh9Gy-RkgZ!;RYEZGP
zxXXX2-ic^$R$XHJ5y)2g?^aC)9T%REfQtX^0bbMjBIQLxNinM@4#-yJFT!(j@cg0+
zt?qL<F<NN86}}vM3Wft5MmKh$|Mbjzq3U4zKPqKE=<$EvxBq3I{c9use?4SeD&%5p
z9_LOm8a}zpo_ojsJz7au61dHnh90V$4`d}k*bhPI5hh*{`@A(afv5FOslFU0xj~`O
zgcL?&nQGOg2bUt`H5O56;!}NfxPi<!GaAL#5-*Yv-~uiI@z2e;ef(Z5p8;b_lP7=y
z<F}+P0jfS9dw7Vu3~&1%k0g?Rj2Gt{ntYN=YCkAMj|Y%hdcS*!u4-HNT0(8e@}E>8
z03W&S@>;>|>rU26{lE4pABkZVf9_MBLI0%u$E=v?UeG*-BK69>;)>meBp{&M-ONRo
zx1fmMCwMpm20lA_`=c#-%zex*p)PFs40=0Ls<y@Tqi(>T;IV%ZOp6><U5fmn?)7g3
zm=jtgAne;6lMRg#+0@@RMX8H)F-3nD6YVsmd-tc7{PL;K9`iX&{KepZJ!k)${ThJY
zAri1e8{%!Lqm@gp0ICxVV6B`FRDJ#T?4bfdQ)tL=|K9F7odFl#23&vd3E{2at*dU#
zuVuD8U9_Z_wSMtP6asYOZ80=qWRo^2J$n2V3ncP^)GZ7MXCC8C(3MCI*SLr9GmAn}
zfl}%ab!~8!`CqJ+LVbkkI~9~55fe4HITD0s5ek!>v24cD`JU7K!fOaoylRRNsFoJJ
z2xO0m>PR_c1_2&wJQo$;0d38|f;=xWJ_r8ccGgOB)e2F(N&hg6QhiF*!fo!`-pyZ_
zmvbkEHH0#asr@+`;73GPY_w0I#ppfmq7>mkey7j67cCCPmeyZ7_@_DGPq@dRZRZ!f
zW7PHMewHR5=c4Y8{odmzPbZ77ia7WvF}Bo4{Wccj88G?n2|q+e1C7Tuu!6~Z1}*73
zszQawPoRd5Pu?jX&|tZesKip-lGj<q&XV4-AAH=+Ybo`i?zncSehB+cX%2xM38)t4
z-E|+s6KU6S;}?O^7y*>rH?V51PEx=}Fk2R{N@49a_?(=3`&^(VKRDmiNa3=xltd$r
zi5mum!uh=9Fb#(M<#Ag=;YnOW)X7hkAtk?eP($86L9@XUK9uxON?iLtG!4bU6Z1CX
zB%ru)d&`(=6~|(Ui%$Xgpyr-ZFXZJGZAr_;%vK%;#_w+*63k$x*-ez$0@M`HYidu<
zhmaR)nvvD2j$slWPPauQy0gerFG;UruSEnQZX%}ZW%UtlhfQ7nPoa8!BT`{>)_wGR
z>00J%d#m?pA-kTTkxcB(S2|rHM+??OjUnw8swJ?~5z)Jp6wnF(9V4840lxJ7w}E}M
zQh=kGohYA&fv6G0?KoQ}_7rLNke3_sk+>k3>iLs?&`!BqJB9%#rnluN;MgZNdO^be
zP<8h%54w*{thXiVcEnt!UKtJfH~$KNW>A6A6Dp1py#N>#!IL(n3*{5v$TF5u{~Q^J
zo+;}WLnci4pA=9?jwV`Z^B~<H_0U53P$SRvr{+=TAvJBv0QnwW%p3HYvE-~eN_<^E
zSa~741>%ixI>@rU3<C^mVQ;C?{t)>#Rl6vS_PMLh;CVVx+nfC;(XH-Xasay_qAkPf
z!B9}`hV`SK--P;Xq}C<q-@fFqf)rkdC(yBc4(?XhyWQ|+U>?<pr|R+X8SL%TzkM)X
zAhgE%hTbYqcHdX}7h_ZyJ6jp^p7E@$t@+}8gO&s^&ctRpVPd8}IK-(yKo9Q?<jRVW
z(x8Nr>5LQQye&A(`lH_-G{#HBpDTJxzlyHZ!%*~UytxyqSHo*d2c@jp_H@k3=*A~C
zu(?PHK6m5<XjtitG0tX7YGjSB7MTj*{%nnA1f@!GuRdi-E>7F5RwfUW)H!tI|26=P
z*)qB)`cwzGQ$9htGK?*VaXy0__pF7l0WI}L&I>}-0GWT!8+Ab({*ROWFquFRVd)kl
zf<O*nYjw4dRM7`aXBYk>xp(NLx>-e(&lw|f{iY%+bzHOoZA#=^TwRnDUaxiW0#Sq6
z<?MChvU!K5WbX0xjY01*wM3dr2S+}VGedh#>+6K;HAk0#9s%e|Z(;Q=LcY>ty!|M^
z+ntFWbxPk`?k##VtFES>B`WF~f5VL#H`bpA@Hqv<sUh(o;cy45={(~umNG{9oGfRJ
zF2hoQNy80$0y#V04`N-B^qOytw+Jr|TBmiI5QeHx6kW!eO<jGVX=K)#gB7sFgOl=>
z8RTV#i<OXvrkPcdf+f7agCDGK<{YKtwoFR-gzRYmtTN$9*2)27DnDkN`uceX?-7+w
z(8+qj#48eOpD5wcup4b2N(kR#e955%J|y`|z0$Kusj#9s%S^_Uc*5W9ZHvmUZDU+A
znHIs=wQK%o$?X(4&~!m2;mxXMGe^3qg2hVAI8n9glXwl9#-stGtQjkglA7a~35Pnp
zR3SaPQ|%Lnciu;D(_g5@yq}%6&KBn$hdHfNQrR%EderGrSIk?;)Xmk)duUYaZfeTv
zMb<P1)dl6N!~C+PO41$+j8)1u!yMD*1qM=CwHwIJH#Rg;1&^Q)vW_F&7IL@91Ttb(
zH067yyO1$D@Jy8+7~NSh7IeekqodVdmCYVDf8aOq+=`o`pS}-7@7M_Fm^cEEp4!+j
zZ`AuZW1VVkHQ3uv=P}ee5>k=<&JUh@MXBgU%p#MeIKAbD=?q8a8H`rmIKZT96Y^kB
zozpfwephRXZkT3<5ag}B9=1C2{FL^i@y?)scK8?XgTPM|=P%qu#N+3K$(psiOWNQM
zuJ<ZLl{J6PFr#2RT2+}Z$0Zk|GaoGe#z*v~k@xv^gD`aTZ40|vGv>OVelv`r&#KW?
zFtU7cp4x7NB#v}GUH#yEa9OxoR<2&KZ8vX9H+8R?3d`K2Fy-CxI$hSJ0+$$@rJtO+
z9+SZQL?`||#FRAsMf{qgU6#o<o3_@3#cqS1)JxNfQ&T!4A9106mkCrl9QzC|=<R{_
zU!Q%;UosWT(v8Lwtb4x6HY8GMNaU^_btq@^TLY+0eM!v&ZTP|mwVd?nq7>+z-14Bs
zsc4~{nM3uED0mkC-kpUN<oM`ZdCwO`&+%?l0<shfl19xTqrym>JN7olcvOfGqR$Pe
zT|&gp>XP#>Sb_Omu18B7d`-_SVQGTfISn-}o!7G5hK;5U#cjlsV_J@u3;Ix>tJNK6
zR)GU4;oY-#;EPNZAiS#fJvb@3hr@+WjF_Sr*`$l%bF7WX82F+@{z!KOAEAHMWOeh?
z`=}MhWI3?mGrC~quHO=G$#=57Ie%*Hhgn<Qd4#sT1|HjHZE>YNkdhkbo(Y0qzHiVj
zSO6Cmb?@AgwPDtdF&~<20jKfr@6u*i3*yvH3hIP@#;L~MUuXJ<FB-n*{Hx`vxm480
z+xdXa8$#r~TlClNpenW99qHM1*mU1O^{*9l!+`X>*M#tlFz+uKC%_)bP}>GS`&5NC
z|NnAz=Yt`Xwu}-G?LQae(b$5l_{D?v{kNdvmSp=<K;3~#wk%*Nk5T=db=8lo>5mwm
zIVaA)S}}C`oY*_2`jtmk5bJ=Bce<A8;ixO1CXag^H8qWkgJ;h(UbFd!2Ol>j6||GG
zoB?ca+2YW5va%28xEEiz#zY+G3>@Ip6xDooR<Pn_h45)c#@hy^;6qm!VZG`d;<8=1
zdx1<fBwC=EIpvDkjpvTSauObqHr3OAoU&Q)YCtw?#18{kC}yL%KSC@!@s}EtM1VxJ
zv1GZMXA?<RVa@su$uLM74{j`bTWLg<AD@OXV=u1slG@J1p+R=H#onN`esB?lpdNq;
zypO}iwm1Enuh;C^8-~?-;5Kq#NHZw~B$fI$2*mwCw#ljU_&HRr1~V83-xs^qmiV2=
zK@FKY(Zg&*P-7pzj)3&Wig~<ie=>o2`Bb#{f?TzZSs_g{U0~TJ>&M(&A`(Prpo2*|
zZorIxv9^@Vp|Ve0zG8k6L09XqQA&d=c|^j+XB$8-IMB5hPmL{=?AdkZWSFLMBJCs5
zvbPUL>2ym*Bs=Ae-x3*(chn2(7{&p7qNMLIKKz`zQP^S`MH?a06Bs%+Mg=%~RS&Y8
zfmmC*Po6>xTCdu<iroINz5X)L3+_CBl=_);otPfOJ~DINH%^lzgI-s7q@>xG>ORz{
zv@2!6BHe0_Z)}wsan3%K8mnw$RHbLG`v*5AIdt(UM7r;@cl<CWrAf3I7Bunb%vF9u
zSTF(4mqp1`KtH9hkfsfv1X2A)+&sX%Sq_ZI?h4&dFyBZ;o6Vak_qOjDxH0bO_n9&3
zUk2~`+zim9CSN91Tzr1VQtFJNL>0P_fmQDl2?~pYM1(}Oej|Hk@|_0EYvJFyLk$CP
z?b}wggjLOnflXt9sewq%bm8P4{)J~Sr}SBuH2;VI4cnG;>2d7Z8**1=v(MfM{F)U%
z0;S4XkA^O{lDMI7f-5h9UA-6Ig5{14#zjZ%e*%1^R$Q+|u^@2YZilx5(``GANq3>g
z1$~5!Wwp9W)e3r+{CcAR;()o*8}+H5Uz+#IF>lBs^bY_nUc*m-QM#I)HD9uy=^nR;
znrkkgU8Yq+A(6$r!RvEaFVHjobdy4g1k$mOmG_uDCg`LhgifAudG){>;ozU4-yB@J
zY5ASw)IE9dzP-bz=<kZ9D6PoILw~6ezpFsJQV)2-X`|@X2p;rk*}_{-_hmS8$ZL&F
z=FOL_Kh7FwR0aF=cpWTi0HG$D+Q(Yss!nb%*yP5oeYY34o=IEK2wLx!R%*=JXRTXM
zA%F{?>*{dUPrVk#v~*>w76kST`Ti2pMdqt<7==|()?J*F>AIIlLPc%X^^azs&feV!
zu$vAtZtE^BI15bx)2S!+8lzWqr1LMJ(|TTDwX`WN)kzwCi>|?w%@p$R&osGLv(yG9
zYJ8S0vyr*XciMW=ClH3w?mS4Y6<5vKCty!kn|8g?D^B9w&0dDu>Vh$K?v^SkHkYO;
zc5#SZzgg-6cwT5exlfM*56UAMI4l2_Pm_(*;d-LhMAgB&&1$of;mMu7T42s*`2z_X
zy|gaZ`W=LxSv^@o3e)*InV##y$Ad$z*)u8z=w*O+Sjt7S?h*u>6H2=!w)?HXEO5ZA
zsxMQMtR9%46PE>L6O@#O4J?skK%FGt2vPR9!3Md1e#YNBV<?MzIDMM%2UkLSy0n(b
zSJdp=mh-u#E$8bn7fyT(M16XOZtTTzXn?&Rw(BR@+ZjT=svb^ah2dA?0Zu|`H^gdv
zFRto6ciFpD#lJ@L;DGlgcpdHteS%AQq^+b#x8Z-rw&%&gRw?wd{xj&<WM_8PiO1Gl
zEb=3ADwx*2@Pq2VEy%6gUrsOYgp*aN|K%q6C+9?K=;wm}%4_uwvU|CG>H`51b2|qy
zmtH(k4+VLj4(QGA+KGxL_U+uLp|~*5O8<7ZJU}pg*gz?zN?W)BH6Kdi<8o}!(N3?K
z-}g2elm4h7A^tEgAbQcgxhuk#y(DSP-4s-9V^0;46EjWCh+$uQ=zuXhsF3RC<S0e+
z`=g@@jwc?IOcozR+m7QA+MmcrEel52BUdopGQ(VRsk&+pxyq6zoSWvRa>R%=X=sGr
z=1x{`vT%{bQVwO3m6gyIS7DCGecnnR9T0pqx^v>VWhf|5W93rn?O;z!A!PEzr@gX-
zlpnT{+VIPUnWglq?^G^b&+hHPk-=$#ftJWbQ=n4Q<f|W%_@DLf;@f+lf0o>vRDMQ=
zdP>v`$hVWEbrF<aE!j~>T+I<b#y6PGP_1X;iIXEcze|Y`_!wMq^5h-zP0-|P?NQDX
zoea8&F6OdLhxy0RMB*$jLO=%2=lP5fVbSO|9;h7E{foA~`j<TMDCHOHM_lxLgUp}2
z5A+lI$%5Ui+`kP4fRZw$UsBh~rv|Moy?%TyEpO_-0Mf~8<Gj99Vbisk5AV3k6O=V>
zN186VqaJ2x#dl~*XT`R?>*>WSH2IOS%aE^EUvb6=U_T>0dbAa^{?xybKw%giHzXLz
zQ5s&7TsKamB4ym~woQ+28C?|RhcG$Cc?KlfC~Gold4%|jAJ&It>Xb1-j{UaQr3p|R
zvVk$hA$$(^JRou=$y;YClh*(l;R9p+VL;hCYIHAJ>?5(<FCd#S!lq`@SLA`ayfv12
zQRyqOoQ1}aR#3WdVj=+0Y}{f2bn*<pRZMv@)559gRt7z7m*1C6NRqinSt1w8q{md2
z@x3apG}I4^qUT-r6PLTTMbYLd6>6KnUNQIEu!MUHo^zO3q-tu+T!*XDx-W127W3e?
z^J^x5ENSktS3-@?Xlb>h)iv?azsj>DyRg^~`T3jCVSS^)#axFqLT^N9v_wBo8xaRn
zP3ENDdDgRHBX`ld0dA(0exV|1`HaP!(;WHJBmnu~+f4k39(QPmvs}0CZ?a0GC#(6-
zdxCvD+B@%52ooxWTFS-d>wK)`@M&<=*j4cFb9f}3QlB{rPDfOzz7<hkx^`8xb*UFs
z8Uqlr+;z(vZiYsaQU=DCkv9b8!CA11Bst><8QTUrX@)mnW-~HSzlQePlo)t@tDSSN
zcMaTRHO<-CvNd~$`>oAjGpxbqS~CikNH#@voF9bW)&+%xc;%LVP20g30!ANf{lS2}
zm;D0d2=O`Btfx6Yq46o6rii=`JurBx7H48C>pt{}xXwXOBU~0n=_I!2EN!LAi6Ot*
zB6aOD6>JvE;?*N0`8)KpQ`%$*MDKk$!JCN~))&1o^TD*ObWo!P7(c*pg%qIjWGSCw
z;?*@DkRV|$*O475Z9Cy?bvC}9NdEl?;BD*dGaecpIIC!7-5k(5uuA9c@FkD(h`^mt
z^X9h_i|BLO>Ee+OAETMW`uoW;apiTKkaMhiv+KzE5qo?*gSyo$nxeQM!Y{gETUlSW
z2+N0`Hw>cdep^5IBH2fCFlx`LWWqHAA4emGTyXo3yROx5*WC`?V&I7#lW$LN5)V%=
z*ZO_poo2g+zy@=$AAy?(kB%ST(X%`qVCp+))-InL?qwB7py@+8ayIuTRbr>Fk=aE%
zOXA-}gsyExTS*G)w_TO?M0h<_<YsicivM~~`_AaM^PYKu7cV~$Iw@+u{auqEN&Q`E
zVZ=-7h4ysjP36G-xDv3B-d5UWj~g<Fq<1abh|j3=Ro@YBU;o{hYHO|hVbtZ8r+nb}
zaoM_gIim`N$jcE2KMW21!<S7hWxtQTQldG3GO0a0GeUK~x^h=!Lp2y$li^wQpLBgo
z8f>t3$V|?1G@bf67UE(g{KL+-dGXv6k&X_HJ`oVFH3-rpdm7qrxPO*O39AhLEGvKv
z<_pBJmlK#A{ZTxJ{;lT7N>C8XaYz|1LV@^Uq@G;^nt`WZhv%|WTIr@qd`mPwi<ZjU
zR*-1{m;G*Cd|cfJ(Uv%|c#i(|{gJh-O1gVj8l)A*y;!_k4}Z6DJcm&7@vg?3L~L4R
zB`H`HFwt+bgrw!tK==w3-mO`^=aH#W5?vh;{a}lLayItOzQr&=y3jsc8kt%X6w@fD
zD`842Vz+@5-HmFjU6r!=N-03W@p8jwNoPDj5>=hvTiK|6=v4cNK5ioWHJon9s`J~A
ztb<G=zf}OlO7SJ&+K=)J*1LoHwP=Dz^AjJ0l#ov;fEZq8NTSQ^%j1@X2VX=uG?k7<
zfs2IpUaOqDcj0rmW2@^@A2JmhD(SOzEd)Q(cRTqArPT+Pr!WQ{YF?y&DWgvQXgFNF
zKDf;b2A{ou6Pl=4Z2ivfp`=0$)`f?R`1H!jLz`X&j=Tv=s{woB&ATlTpD|<&oL>dO
zUljJ=V=ac|v%~RCrlw-jKr`@j<T*%DlxTIY`bYV(!$nZFiD`JG#hpDNq<N}aGU#&W
zP{fvTYwpRXgL2i1TGqo~DvmE~nXJiHvsF&}j>%KP5V-Z*lM_vJQ#0~s?I^T!haWY$
z?|pq;Lqg3>c1P%|)0HWIVc~3CfzmA7_<aP$Av?wv+OuHS4{MWbIM@UkkO>%4T30k*
z#({Q_To^jMv6PX_wq|GW)08Ji-nAFoP(7gf%>?UMb}Km_)az0T;^g?PWM%t{a8Vna
z9Aywo&s)YzMlA$w=<i3zRO+%^karL*!Cstx1ix0xs&P9pft@(e9ecz6eJ6~)<Xvpf
zQjd&B$WY6|ZC?&th>$4;26G>{*$lWjs!({fzi!v7zWZwa*!35oy7AJtb&F9~gbmL@
z^_jM@98EfoBL>K9)pbqV;spC_7KvKsn)mLo-J-#U2Hc@+pL)&C0N!hz`2*r|y~hKb
zoj5w6z6!&e25{%mVVyB5KhF&+YsRv;d(egx=GTy`qvR|zeaJdt*uWtT+Yo_f#iV(?
z$b*75_=M1CL-FP#>o=`&q)?kl3~GbavlE=N{_*zy(03J+;OP0{KD*}-584@~v3_3;
z9!O#ZHb2yRp9dq(&WmAh?#45GmG3dM!MkpZc8t)ELl}}+j>8RY-rpu-e}r-Pf{B+@
z1cll;3&5;Z=ywXOns)p80z)VDjXmgu&oRqt3Ya<O&AbD+ys6bL)WtDQ0LE8HR3Lr`
zYg~KeG`SHl^KgN6d_{y*8Ov3@hdB-iOmi{EvF}=$w*XuUu!!_y!wqD~5lR8CG5N`x
zm2qnEegzi86xbOEN@Fbd0K%`kN1!>X-veWt2fW|o`JpoXATa;nV9j8X2o&eu>bUB~
z8Gd+c+$*TtjvP6{A#D<;%Y_b@7CkGZ*PnFisTiI3sGaENV{B&(nqb}ZBQv*r4X~!T
zGdR2mXut;4`%sQ)$6^_;sQXupk>8MFhsxto9napaTE>*q`m*>AIYgk|(1Q2}+($x?
zlWWMKC>Bx-#A02>tJuX+H85uFCI6chP|*pIH;Y3pfBaKpMzy{u?)ZWA*L9j!4?|*t
znMKe}Ikz!wlUFbqHX<Ke4h5j#VT8jaqywcmrmDSrYXqcOvDJG%dxJu4^wJL7q%M^_
z(@6@gG-I6mJ<v~fSP_i!jF=)Y88xP-5Sa?aK*)85S7-X+1&73f#d*@_rj11bYq*B@
ziPX#f6>ksYp*D`{R$&rrWsw8Tl=L=v;W82FH|3ftc+<xL)T^$aPAo)jjw{~a!Q8%H
zT69!ye;T?E$T|o;#MGuTtejuQdZjSo;jx8f&~(*3U?MjclZ<~z9ae|JIP;55<pIZ~
zo)so-wr9s$;J9!oOb<|Qm?aG?Zlxc`P+L{=3yCJAUL6ZuaF_8TWCi$@1z_*4EL^*S
z$Kv@7gH7G6qV_L_U$ixci4RLsA=yN;-sN?=o_<M*qFb9K2Rzp<lUY~s5HKb#2p?L>
zclZ-jGf}#wTreBI0e3se7)OXSeL{bDSQu$bzerkOsa?oJiNMdGq}1#@Z*D@gr&Pk$
z`Pw|v<~Nr&+l@xQ`6SsCVY=;M>_X!6g$z47f#x1x_*hfJV4ys7)5sfW_HZ-3W8bMD
zB^N2FcSPcDVG#Mdhe$8-w=tWColKE*{h$QL)4tvN9;eL0v=fV84L;suWkGGdvR(<v
z=Wt5vKs7bu%G>;$CbMPYG4IM~knKaGci5LglTsG!=o(vMhSwFGZBZt`bw{jvCs1Le
zFtGl^+lIWQ602W=<il3+um`M*rQs@J>=9nr?odgew4<GqL@8z*&2Zy;g`menbTN-{
z2bB^vojgu|e3;*B<MImgOGd|pM%X>w8FpoZ7u00#$WP>2ztmkTD1ejs*iQMIDKl1r
zV#0>{dp%zhNip)%@gCA7HmVGNSuufoD@f&Eb}U-ROZ^I3p?fh;_-nvIFZ0~hn;Z7l
zU2jtM)%LN!XUd4CnN#GZp<*nGiLw`qW{!S~VCRhtivH%ijF0)f(a-Wmx?bmOr#1K>
zGe@-t<1-Z@<6aL8cr$0nFY;?%W`>lLZ><Qv`IWE43$|r$4I!-Ln!C~Yid!dl9r46y
z4Ty!spoRzZuB-*CSiXtK&Ad!1N-qXwdti0n3*)ImRSFu%UMp;7Bul>!YzWB&B{^)K
z#BLrt*Xh{C7xipzyEo`kv-S9FuGAw{qm|4oS;sfC-nzH=Xj8aFZKPzRQfueE<%k?S
zm~rnTo+}Qn>A@4?!-x-OGQIy~^56tB#MPluk7guNTD*w|c0aNsz{jmS9VF}7i!yB<
z%4HjfND{1OmalyIB#0|rVrrU)2>T-W&U>3Tn)SLgBw1Bjy4`{%LU(;<V~bc^e6I4A
zoJ`IOLxsewFP4neq#OEP;H(lG7*d^s%gxh{=O=zTM9iBQ*ltWQyh}Rq4huJB>+Hz<
zSsa^vDeAV~QP_cK7~D|_)<1;jeo>Ifi3z^Tk}j{ik{CSk>LnG}Tyi|tmOZioX&fFL
zfN5{}0r6osc|y1S8=-VEw#mmv`QV{yZHVUbI#gKEWtSam5U?W_P~PQjc&JzddyA<o
z*wn+@d$?e$NcZDnTne!7OUAFzs$~J4RO!dq{7id0Wcv2n(d{=G_RQ~%*w9kg$=06O
z-Ny!|H$I(wiD6&^C4zx)(oY4RV}e}*S`h0y)mRg$`^nEfJ)$*a>c>PVk!+R!Q8ugL
zmIXB86`8Q7es<Q=Urm=cPvfc{7Sd-9(-^lI$=!HgSwK*Uw>@;wK(EwnYEmal2c<rl
zjICek5Pr`pDX8TMvED`Qmr-mDtBP&;Vl+O%%qbcV25>AtuWU(2?z0{_M6C2d4pThb
zbdu-&w^Xtc2>=6OzpL5U<zZEah)+!3VlVV6_1G{TV;dNL;M14tga+l9L9|SDSW>}@
z(j|QXK&kEA4!$!1dsA|N?LmBv-tJG3ZBj7>C3GX|fd$+7OpYfH_&3FQ5E_}FSfji4
zsg+NMetX3P3hWa7)(pL4u&pUoiPv;|0r`6F{p>b;yRRmL%|44gTYTF(C#>3UA920~
z;@YoU`pyMA*@)f;oiJ^<QpL#|o8s(pQi(vF$^XQJkY+!{%F$@sAFV2&oKh7U^qK1*
zv~qzkJ#cCN+v$AkO8(OyF~%+h@hJGqJ@HQ<9W~(eG4_8%nDF4Zwnu5yGeG|aY70Rw
z5W#@;Uok~hO31~+Ki&Qtj61)BPR-6&NGDW5J(2rQh{G*l`=8t?EaRW=8z}z;d-*>B
zeg6}Wf0F+H8cY8F7Tf<BT=7lU;$Psc{+rm1|F@L!|5s@R4bY*L>W@2iJchSjGj;U2
z=4=NWX=T2d%Gib#S1UHNj+A4}z|E0PQS5c9V^N~qY0c)<#pH*Tb4z;#VSlW8tZuF7
z$0@1-31Vt5Z+Bv8k{<pLm8~hm^-bz$Eo+S`wj7JJ#W$yQUz|9s&ri0bxxW<rsGa(D
zz}d2{iWzu!FF+t__=%8>KUeRL@7VQZKvb1Zu;4Gc3#~6}D<qFLB;@Mba3)k;GW9-*
zTfe8k7PTpT2T9~i*V1E_<m2p+OZ?CiaF-p)XN<{D$8Y?eWi|7WytKBgg?xW<2DfrF
ze5-;dfkH0kI@S#S35Te(V(04vIGzau&>tz+H$M?v51Y>pndlZVs_#){`N5l*F29y=
zqlZSsZ3m-G3cU&}{wToi$S%HyfD(Jpv+OOg@1AdE`<ug+kL6E7>0U^yaG1`s%j$6q
z0bHIH2@I}lK*MI(ogt;q(U*~_C&WDI{RcH1v}ZUD?47E~Z#l~PQM+ISk)EF7MFx#F
zAiG%;efkMzt5Hc%s407=IXL=Cfn2_y1^I%8>`-y?*~g)ykjDmrv-erGSidJq90+}Y
zByy!^hg;BTaliSdc6xaV+FOBhm2A)Zm>&P8Tm^Q^U%ALg&S%^F^m#`yj|Gl9${2AI
zs~>z|Fojvc`C~AM@gm!NS=XY7&pc1&CXcjRCFJuJGra(~R)F@~9i(mi*Zin`$)TN;
z8*0FN_nEbas4ME13o~GrvX7!+=~S};TaV*HGZ*^0TOQejgbxsV_WWTMRa(a~RpX47
z)q@zu1Law#FSK<OXifWej#HZ*#BmSKxOCWWssbq~PI)NWVglX^D|*Vq16`G4e^g2L
zCbLYJx%;`RcO}2byNw{MD@bF+{c>w9FWNi~Hd-`_Wn40pQ0MZ~PjoN`o|ivku~`7`
zzmkMS?U##ERpEKL9jl%k#sHHK5W3s;<K;H@w%t1^W;>GZd7kh~Yu3d7Ok`foBY;jF
zP359NQYr0Id(u5BZBGVBPd&;XD;SkMQ|`m7rg^(i*z&vpY>^XAIL~W3$seWRqJLi(
zdCJ=R+P=5%N!hl06H7~lshW3-$G0xD8CIuLG7dXFP)3Rz=PfNQIdXT<d%3vnxYqH?
zrRXr%8B}aiBnX_C$~ijA9i%i3w+U{2pjEHYVbzRKo|`=g*8BF$BI(S*%d=4@lGs(J
z7rZGOgk%3ut8XmEO-kuW2rF*qa@YAx-AbJTm16d|hZ6MdeeD!3xohYTsy*xX)mfSg
z2M*(CT*0zvijez4B~h;a^l-V76<01!S9G1RP=9q7vOj{skDIPa^-G5;8ar0`{Zs9m
zvUw*B`tmuWCkz23)mw=y11xL!+{yK1u($D=2cBBxA0KMAY#F+w>Ds=0Xlx+ZlzJfP
z)#S0}3=VzZ6yE|@)aDS++ooW@mrOGx05@sQl^=Jmc%r)|0=TSQY7@rOS>PttY9(n0
zbCkGFyWTieFK~T3)+UkhCZIsbntY*zC(ryr8>{olh)Uj-DP0d#toeE||0+rz`APkk
zW;MQ1G>$lU;+<DvB4%i1eXwN0W2zuit?5X*yOuF<n?be<9utV9dixMD%cg3OF3X1z
z@fWFqMD|&-qz#{rU^^@_1)s5ApIIo@Oy)!p*pN=W<9C9+roD>c)_oksS}9e!FCtgR
zmuA+HwmAMB6f^yJcFW-bV4mKt{<3$$C5@>`%p4dgCbW@`l$<q7m0vZbI(s)YkOoTf
ztL9JlDC=h-lcbrF(cB>{d}k;N<PaM$y4($7t(+lGRQ>AYK^Aw<DX}F>0A#Ma)@WXi
z_JZNmkTCs0CWvG6nhX-PWLkgEH^z}K9jQqfh~7KRf`3ml*X_0p{}f2#j7kqXbWzsL
zl4Bw$l_pCdLPn1A6TJdFPk+EiRz1?ZM!V>vezK7F5F4Ba%^poi$=Z!)bEHc%pX#m+
z8^7<(a_XiO*eIGX%gH-YFmF4pi9>!4Pkc02Q%~75o$<*b>StNsz~s5BUPE6eREsHf
zpP9BUwS5ZyLCG<~xgvM>lBIewFaK(!jCEUY2gmzn`pZ09qoQ|18+_2G@eLnNXcctx
z_*cAvH9vPt0DkF(X(oa<HwULG!N!tigGAsm0W);&wX5eA`$GQ$IX85N&*4k;KJcLk
zml*N5l398TF!maJeBz5n1SYV9)Oh}tq4oczkp%w^5RHUT^NY&(-5Q&e!jce1b9*!l
z`z1z5S<25=^pU<!4TV7j`aGX;A)|#o`Y<2I7zsB&+At*F#HDzQ291XtV-kd+5#tn7
z5B_(L8;)R}?G%uy7x*0KY@HIFadb`zbh@<2iQN3MjwtTWdYCfjWlCRUU)7IN)S7Ha
zxFb)OYpUS0{{z0^yBb3}DviM$My>A^(d@cwl!fmzXwQv0lijZ*MNlBSEa`Wxp7H<q
z8S~2P$Bp}fPzPV-Px<=>kyr{X)h!p}Gn?84<}m%*M)%dKTkKd$-eY+Y&Jp32lR3#1
z$<V_k-UVGbOhytF!<iB70=!HQ$r+`W3@o|Im}fD2Codh3&=B;jf%%4RksE|*l@?{z
zdI~44EYr1GGEEKcZOzF)9hOoeeOhGnBX&B}55v*5-!oXR^i&PXW!_Qm(yMn;sMA$V
z{D~IT=GSf07;=Br=G-F1^suyqb4f7yU9`}``S`e1orm`_LroR8-psd*3O}^VlO5+5
zwTha9OW1S1UdirK1Zxm&V1m4N7rE>%FXv0t6mIB!=*=(>F1xMS&pY0ZuXTP>h}VVp
z+QCsD6ZeW4d`EC!@(G7!wfa(wT4G$<>^v>1v@KH8_cXroY0>?CD9bojpED{W4$VKz
z;9Z|R0<jXUsHPmF8-UPeT3wh`j}II^PA5ulcVD(9tk1cmDmp_qyGr^W&E{n4*pJZy
zZ@x}ufHv0ZsWm*6jFHVLFLu@9E9hw9cTk95nUibAV(r);>%ikNTzQ@R1d0;NC527(
zx-XX%yH1T>%4TTxHlclY?v2G`;gGXf2Hes;Js389X;ge^q3hK05S>ib;_Rq-8V{qM
zO<XJDmW7+C>;<`-xkL|1oeKXsy?CGUc?I`ak)wCJnyWfVYY*m+g!&B+x8uq&kC#|Z
zz5tR|EQTO<rB|FIKdwJJ8Fo&mYC124?s%S#hM?Vcr6t!oPOmf^r*A-uOT=9CvsJU6
zV7BHmpBtEr$R1U@@&s>zn^r|xMki`NVG%u4a!6GAMhaAYj?kkFamCU++LyCa{7sv0
zt@9zr=Ha!3t<DR#d_pJxocu#$KBp%oQuYq7RbTyZAtd&w7RimmbiEO2;!&}E;+Z=4
z9wo`~4wjgIx_%wV7SfW>>Xu(fx{^ZLA3j@I#ZK=#f@ig`UZhF@)q0<U%T7UY@4tJ{
z_uoxZSND_tmb0T^(dT+|sC7JrSA*v`>Sm{xUoUI9(UENL68yfpr_hlKm;M1W#+Dx~
zjRJ{%_Yip$7_WpgfPs`=eLXP<<A*zYM<KwaMC;-<QeI?^z@YN}EdecXGkxerbH2Kj
z>PY}fDMa((!q`K$#GIzF4Uyg1Q$asWxew8=e|9lgliGmvSpixuoCI5rmx)&R(6POP
z1Fn+TE~sdRexmSx-MAY@Mb3`r?*8OfTWZ_=gFSq7X+_9<gx6YP1<uY}G`#tXS3ncp
zE>{C`lLG3}%+%s6>J<xIvZbo)Wf1h<L##i-It$wp*MGL11H|pUqny|GQorXJbm^IV
zn2+J<-_+!D>L%hQ2c#rlx|HnBUnK}uh4P}+oMZj~(X=K$@4d5Jg9%->8H#HD6%*96
znbZF6p#cW-4FyWFk)dZ>(=QYz>&J!Z>fQ;EqJ_c~1le<_cFfn(>61u2gxK}UJz3U1
zvT5DdLxC$7$k7Ti21e>~gg0N~>Fqvu9E!bLh=NUpK8~e>y0wJ@ME$oCgX5N5k=B_4
zE4jnP_J*gIxj=;(<5-FJ$(7wJktjek%ZtF~Z2+J!zz;2CLdUhFK7yeR^7)v13e;@P
z{s7U;Efbu$&o2JIV!?$rNDHgasKsFtw#yoy+Ajdn{6AjrodKJ#$&3wbzD{#vlNP-7
zFvSl6h{n+`<AJl)t(2ROdX;$(;O|hv0ZA)KZ#ZU|-}H4*vtqiQ-ByhW{nE%tUe_U5
z`o|%I_GI6<f0Yvg1Hr_PP5t?{&q3@B_v5b9x7zD(5|>x>`wm#t6|PImN#1=*^O34i
z7-paZQCHp);+B5UEbvH^q-5e1p1;wrO4cx1I^61MNmz+8TpYNMXnllMS`+{iIiOmx
zrK=Y^LdRU}t_yc;>6|x*dKhnV;&P-QI5z+1XW#$bl=!a>%KuNqCpVx&Ld@3RRU+tr
Q2LJ%llJXM8Vg|nd17PZvD*ylh

diff --git a/sl_plot_files/figure-html/unnamed-chunk-4-1.png b/sl_plot_files/figure-html/unnamed-chunk-4-1.png
index 8639b65af331e5202174577ebe5c0023c40c21ac..b54cbc3eb41b0caf595fd2a2a63c3e9dba3b7a7b 100755
GIT binary patch
literal 10038
zcmd6N2RK|^w=gjnEhHp_=m|j(Jw}94qYu$b8pdcth~D1!5F$DWA<6_1U80ZrreO5Z
zqbD*#j1s+@dnWID?|1+E|M!01z2Ecv|G%v{X4YA2uf5mad$n_-5r*1K^qlk*6ckK4
zw=_&BC{AI(k1CW3#5fjQ@}Z!h97E`vYJxv0C_p5Pf&xiFMMXgcp`apCP?0ELFbWuw
z0+vXD1fiCalJeB4Qy?9ggxnxh5D<t|5E2!UNJSz+s3;&HmW&1)5ke$FNF-WXS_TFN
zMn*<fR#rAPHeOy{etv!#85soy1yCL+fGmXEkT4_&i7;d>EHM$5IB7s`Xaj?I12hOF
z2JtvEGc#LTTO@guAT<S&%#%oFBDX~F519yFYmteQ$XXCcATyfW;?eOX=y)8ugb)`O
z7Z3J`1_8vC#FyaWO9=5e5J-tIibNRL9l1xa7xECu|7sI!L6}UOB&DaPm!J(w(CCtQ
zbP0}7LLk*5DQc0h+C&hLWGZr-tepgbR7;wyC6RFP2Do@M4hNExa3s=XB5X1dIav!r
z;^d#CWOA^PCP^eh37UY5C*Z)2Nkl3NB7}+vDv=1P7Q7Nk6ci*X3Q)zMRIp#LFR}!X
zlTbn;;7A0J2~;*&CMXB&j6@>c8m0*X7naWRmX$XJ1$PwrLzytY?nptwN1>wuH}%h4
z$x6r>ZV!lRQ}hk*=86B7e~G<eBX_b9upf(w^NEnfH+<)uj2YrB@XctCO#YJZYnO7J
zUFqQ|I+prsS`L%zTOH<kN!7{bgSr*@7BYjo$Cp|r9cP1(`A$x<c}Wh}p%EYMSKCoQ
z1SI*csQvg21AR>e2s}FteTsnneS|+`x-UVKl>O4?@&yM&uXnakdM`Z(s4k8sJ%JHU
zH_o@2#D9gK%i*Rp<g!C}k9H&`!Yy$h$MP(ZNt*WpaJCZuT~HmNCXWmL&zSsDn`S?I
zdrB!D-iB=Cs(g0{<~ylX19+faBX$N8g6jA#pzp7*2<QZ*R~e8>xxmkdy41Mf0HudN
z7gEQ+z>Mv3p_c=6k3#?WIcL0nNYa{NRzcplz_w4^*k(6TaAcS5WT;!cyB&)C(akpf
zWUjZPMd*&o^C`Difg3BH_U(fyIlB8L(Iy>Fv#z{6vVZ5WmZnV0?9aQE0Qaa5I{wa@
zq?~a@gA3?#*)wdoJQGjH*+N1c*;no;>~`E;Kv!12YQc;#ev?{DBSyzvmY;L`7A%Jy
z2bx3q4%V^mSx3);l{PF=UdNwPGOk77`4o?Q!qo7RgmX1a@ZG)Ob*AHwp<%9?-P?|J
zS+Wj372OHZYnCs3@j*(Taf&ZX-3lca<1iDnP4b<SPvTkKG>m?KQ(K{;ST}xDCZ^D^
z_c`x`HyTaEy~*|HKXD1oVs(sxil*!aH5$5bvJQ*)!Yi7CWnUM%Lq(tZDIbW3x|o-9
zMM^Fi>?<p=1V5bb_7sfB>7I0OR1blN_g)Gz#-5?JLTkM1br4Mb>^Av|5$^j|iWycl
z7Hvcg3RnVQ9bM<o$c}#3BYgvI)++1ivCWYtSY&Idn*n$2*6Vl2<4qS;kMIlDKR3Rg
z4Bu?o1P-{qG}Kufhbszyeo_^e{Mqeflu7BUEBx^A*`>n`oKdgW{N#m~fkEYc?<zGR
zOfi?jut{u>j68o{*iVIM8q~Vm0te<=@^|)*rA{6w6?X7cVA``K-?(LF(+8@r)>ECp
zr?Y=+nq9kjoRvjh)B*SJ?rI&Rk}9nSwT|<XRjn|KCI5GMpk6rTJKpmc@r3s^3|iem
z4A(-M?|+&r88|q4ebwXhZU6Ph9zF7(cw0_he^Eug7ZSU`32j(eal%?G$Um?J7LhS>
zr$TW|%RQk6)~h5=cm1=k4cU}TY8Ov$pR8!%KSnW;+}L<Sl#GYXAtBOt5l-fI#_bi<
zyn)h%T5kBX*3PcSr-3`H+o@U3*_i0w)XOMULnvo(em*9t(pkK4^32o=t_Y_ZjKEP*
ze+RPa{M`dBqelOC^Vv@sFFhbc=vMW%4+C0VsY0lq7Q^h1`rq$=%ZRndd%E8I%B|0P
zi^oLrv%|a^EqwZ^%F>!?m>`nAfg4>*7<hejFWMd-Ya$$@EH;^mQS89{0BZdiML!>Y
zeD%Q1T<zILKjCmpqmy+cBOoNN!mg>&Zs#I2$ar0bqm8%c9lz95W?@R66oPBC@sT}c
z7jGN;Ia!n1e2ik=o-EvkyN&j?|JUEVN9kVohDUDd4n*#%dQfl2-<UT{<1$XHpr%z_
z@0|ZMrZQFUxB!o#=M(|QFusX#2526mv=L#_Y8P8+LlWzBJVFJ1IlmdVb|vsU6Grkf
z7+ngPR;tfXQkY_ZH&ZsuehT0kcnHK@ui}3<4pfk8dSrB>Q?3ux=|MTgZA=hhv#&FC
zbXjGux^MwPhLznF#F{VNY1dVPr=PT(rY#T3zNOqeKnt(XgeB~0#eQa)bu;U4V?Phh
zL=pbcd)<ibOm(mK`g{3U$=fg%H)NRH?Q82IX$_Ey`4Z*3hUv7oW*r>WnBjt~^3ib|
zW+E-)AJp@<M)co}4-zIFA#u;#4e`q(`Wtsyf!g{E=l7@a>a2;K4q+Rw_)Y;pkD6i6
zLpVZL9@m@1d?{59PPU4@Nfq7jvEF+C;y(OLb1aEY_<W1n2^R_uN5>!0hP8jaM|TZE
zjlKLowyyspll+e|aSIu_2Thz-6dNa{o4uu=ga^TW#XSvB;hE`I!yL|ERaM2`OtfRr
z$bW*b#Eerju&`9q5}d!h4|bX;$0+{!+u?3_b!xF4+?)P9A0LVt$HE4P8fdXI!$*Yd
z6Cvbl1|3jr(5|5j>LK+1sWR@Y4xj(sHTfwL)X#Zr`Ad7(*b*3n6Zp%wDQ2z%O$BTB
zS=X!rJ)Y8Btw61CVVqJ7TMy_cmmy3jG%G#0sL_A<%z-vmvS+kU)F3<3SZASM9#Vh!
z7xtT}@Za~SzD}LD_e+6i`<e38+qw}!!)drxQL9B~tD=M<)TV9I-k_y_mv;1Wd~(~z
zC+#yLZTsF&SLl|M1)P_k)4zc+ApKIV@+=6MJI1a&({89SU+`8#)al!E8D)rNP8(Ft
z{#Kyys%#{{9>z5G^d8pk{W3b4AH~Al*Tfcd{PV+ihmEBUmTEichCMzBg9pIP>oRB7
zKS=VS8XXvuoBaKq&$4d~5<YkIHE*WaTkwNueHrZfp@Psu_!>IUeIZ;%JB$%-BV?aD
zgOyHi+G%`&u{g4@5UNl|BszcLqz+lv?kjtNNfYu2RQa~1hDg-=jmY}Quq|rgxcqn(
z>B$01HD&@9AF3iE1_u%`(a{Cg6DOrSuhgV*nGWX~{lO?j=ht5GA_5QCn7w>FQvjOH
zoENmz>5OO-M5fLutaQB&oHskC>52C`pT#K!!NqBVih-u65q&-jh=ORL_ZmQ4D6vT4
zEqP6_+Ad0DlorM^!5Or~FZUN4J$6V`?EG)UIRE*9@~!Kfxjk*o|3=8eL$cmETtgM#
zlIZU0mLTr9ieA7eZ4jn*v;_E2Mz~tiA~AwRoPKFq`RYRZ{j-$tLwI(42%NP!I0!JL
zf^P-}KquJ2h3k`h1upbq`fP+6*cbm5h*?Ig1P}QP@%=hUvaArZm$A`-ppJU){kw3^
zHXNg+-ZE;kQF>r{izYqAHV>oaqKZg-e*PI6^|xs+&ix;wzGZZZnNo^_jbO=O`X%Uu
zNTtidoVbEkp6J3HKPnAZT!ysvX}yMy6)i;q7;b@*TAtxM+<Neit!)fTwYtNI`LGRF
zYOt4UD0of|)gm!0rq0q0{?KB1taf<*^xb9>C1fOiD$2P)X|{Fw`mPa2<hxxvXfYS|
zkagRpU65C?Pt!v@WseB}rmodL!zg8^){Vt=NX{yvZ!m)g@1m_PKBhcfZRoXMTUgr~
z3mXCX-VrjbEY`Cn*Bq8P(=qn9dADK)I}bbJLQaDgM-(dppH{~Yfec-Qf`&bDkhKHD
zCnj7Nw1qWdoPC_m(H35sjZxZg=^N@>wTX1o=D&jL1@!2aeAm#+n>4z5Z#qN44a^YU
zO}8`^a5${Ans7K9xTD^X!%{8oHG%D`UAi&N5k-9Ah4!*A!3RDtuK7_js+KZ}D=N{n
zF0OK~h-*8gx*xRTuEviF!~GzxOcYfqb9+3gd{X0!Rj`&2T3nqJUiijVkX|j|RBDNS
z-G>erq2A`~Z?YL-XC3Bd>!lT1+7@uK-5k)(nx+|^dF#lUL3+y!o#66Hqb^fCZ}!sC
z)hdU+b6Us`8xw`G<MZ<eEw2)MwM}+t)#GSy%fpiqRP-k6w%^PLJ~~1Mjwy2~miaqx
z6oyaXw8Z7b)caRMHkF8Tr1n8EQ)O`eZGY-E6=)zSi`%}gu!zL)vD2iT**baX!L*oK
zXS$yYzw2S4*IBi6o1dIlumXYKa=F)X75DFgJF@CtGG?RF-ZlkNX$>5Vwawm1v)~2&
zfI|($Cqb!g;LQ!T=NX_*Us9)?-P&nbUygdfK??Q^J45FEVgfupoWQPpkH3GljH`Z`
z!(krc6Dk7Rv0FQdc|kk!^kQaYj?&7sbyk0zxT~9y=KEz%$&AAq;{2+xc6^imE-SE+
z68>0!lObxNxT;?J7$sZV^G;d1qaIam>1)yX-UQ(q`omGrr?z9}_D%iU)p@x-7S767
z0L8wtGWREz%GD1IKea1T>sHq;op@ZgRepp!#x@w2BKCpMlb5KYRNDs4S-p)hlXc%x
zIWJGe<jdB@8mtqBS<`3Bo@xib_>Nmy@Xo+X140s6A8!=O|C!{_j&)lJ2CW`c`z|e~
zq6{tuosN2tPvD7~kh7JoJ1p5f-g{4H|09a`UhW+(FA|MT-Ix?}F)KD~NZ;mqO8z;l
z0_!&1)LD()tWmA(+!%yVd9M;<iKeX_1mr8H40lwNr>sIQDTpniS-V$`1owDWOK&C<
z*=4=b@N2T~rX=dMjhOw+c{{fmGU`3lr-$^v+V%CB71d-bl_U_5)W;8wyH`FOYM@R3
zLPgT*m<cprVX40BumaI!pOvii1s)_0OM=;3y9FR$!^1YDA0jX&a%D`N?V9ndU}Zdz
zDiUBGB6=yjN2mNY{@&$9BS!ll!_2c`B-*IB*J<x~*c{9t+uu%>`PXwyQL6k`RL0M{
zj*5HBwk}oHz&v90yQO>IxyP0EjQGw&nmH7kv5zMuT{L{Rt9yU9<Z+WqsfyXEmgA|{
z<Yc_+D%)jUVY_PE)YO>8SV}wc#4Vbb6q)y`9wzRL0vEQlX1&t6{AxmE_uLXTR_vy3
z_EPL4q9t=N^SCcH_seq3+(xy7<g8)VN>UB70XR+b@oVJ|dRX7$d^a7ZE1bVj!l9Lt
z`?dV5mErNqcGvQpa?EPjCV5R8IxvSOVNn>D6ti<%2?9%Ok2<bpr_g3Mu3hkd0?0dT
zH|(kO<+e-AG^!M?_jINRGdHT_2p-bGv7Mq!$pYw6<y*;2Z+N%1w^*L#lzx)Et<k%p
zRgkU`d@}TL#>??Q_Y8D`20I;npwd45Y~T-#5W9DU6KyV8#^CYh8#6MzUB$=&T1XZ}
zn_lTJ4}jH{kd5K_MYAjc!>{^haYY_)b`~`}rQmD4?5^q@=+;GXsLuy3y64REzUKY7
z$HP~t%=Hl1{24lQn-=uBuX!u(GKiB9LiHw@agcKJ%}B^pHuaIuR>uPD#DVC0&mr5A
z#A;?M6NIkh>`vd(h4cdCg}1uE0n?(t8NIHHT2PS=7eUk|l`;h~eLQl=3wpogJmtXG
z57-Y)72#{acW;QEL?~%Y9HKX7MH!w--0|_M95-Fbxa8E$)o{1;`jZYm9Tl&@gz}7k
zXYpq~DKAO&=JP0e#De&Zf*PerOUu?F+~%B=amCqyud27C;KwoF^9$;Qin<Aa{i8O>
zbHf>xRl8+Mc%zPl9I-qfv&z5d44u&Q+AlHy@7f)u`avh~QmE);r;#^mUVfcJ>!>T`
zw>Tx3J476oN`s!mj1&l>^F_hg7V^3Em^ocTsbF@byv)<xZjFkXiHvHk+OmPJE>Fj6
zmQqn-$gR6i76ur=E$NW6$rFaMnPELc#1ibaCG24<%Po!^dRyrSnj=DE*6s$@f|K?S
z2i83U-ZtIfOc$KRFA0m4Ox53qDGM8ReYT%WHu_dRpNkd$x^UA2Q?1du!~tw1Pa6(j
zjMuND<Yt`8`F^bcDdv-X0K_*7a|b1W)Rp!NeUooy9)?YkMyq%Sk0UTm;C?*^6l^V)
z4O?Z(Y(cmKm{5kS)_;1V=$ce8{+TlN;zJc8m#<U@0juT>1P-7wMU#E4M5J-=vucZt
zUDM`|y0-nj!`b4Ei;~bTz0;h1pZKDG&*WxeN+x7!+QJjKf_}uL^IhRpOq6lWD5`-e
zNcUbkKe2K=xvhP3;&_ZEdqh!;6+2q&GI%yXp40l8@m(dXs;rc8t35}>-okYitB&cF
zXF}}RU){?3wsV%A?H2ADefY++y_Bri+v;}<5g;+c&gN%no??4IKtw^9QYQnD59Cq+
zhe0608uyF<K%o;%(%aR6QDnbQqt%jbAW_GvP?bO0kOr7rZ4L0l=l{4xztlDHnNP=-
zUB&OsQf|#^7UsFdrKHX!y1<}m|J6$2#Vpod@wzJcrjmH)$Q?a=vDaW{X!!#muzMxG
zR5E1Kv*zXSLMrYwq|LEoU&`j%8>g(7EW`Wrf!~;o-@1uhDWe;C<n;V<hqa*raq0=C
zZ$U*_fF~E>tat@drjbn?lPmL<0Y=YaFRQWVuolr~WsG7U!o#NVvaB>Z7n0-z2CMs+
z7#a@m*t2fGKxQN~eQhZ4DYwBJwT2LIGHZ|ubPkHZPhYA3qA;N?xAT$#(Y6BPXNY^>
zcq4=$ZrfgDNaK~14$8JI!Bo)(`}?^U`qNHY>t>sQ7NR(b!SJK2^@26^Ihm~r9PgVp
zy4OFkQ!Lf|UeVqf;7APNe*FhBo9s;XIX|nqnEv2j6!7Ylc>&%*!sm<pEc%*-r8D}Y
z*yV*&EL7r~Hox?IieV3>gvTV)y&=ym3+NK=RXlmOI4I`ao9kh3+TQq*rJ6Clen))>
zrXYlBmoCstvFBCV?K6tEW14M{3lQ1Pt9f>#<mS0#o6AG&Lgxf01&5eiS2sF;MNJ9E
z9Zd7K!#ZbVL(*|z{GJu;`F$}#u&?DbJVv9&%=<Ae)tQMld;q84cdgFUY4Q$Ng7#dy
zK;HWG!%BYub73gQ;%IcEOTQ~>L9kK{A6wW`Pz41|_QzMw<+1H~5ezGC?m@5_mR&bb
zdpB$xYBWxBi4{z24Az|TZNfaif9{`sq2F@&aHA@w*r05?77g?f++MgPlny*)d4!5P
z+Z-%rV>7jhw0DcsM#r|PM^&PGO<!W}y9W5l+<-E*-)d<<$2#V7&NTj<cer0xUd|L{
z)cDQ|wSuQ%kXDfID|2@%EidEtvUhj)vA18beP=Qvx>(jps43~ok<kB;%>x{~7kLAP
za-NaRG^IbSx6rN|13Ueol|LwgzVilQOD?N7ISAj@uiZ0TeO~s7P0A-5aG<3%rAChl
z-#gO<a|=4Bc`uo<$PO0nSmCF>27dEd-2sC>ay)6e9PHF}B~<8&HD1$Or*{lH#JWu_
z@Pd@t8-DXf&irz&%aChXK1Ndr)@Z&k@kb3^hL_NfWHuSLngrl{R^*yVmMis`P+`f}
zm}u{HKLs$BY*t9N&u@WRf4^vKv1F@MFAvWON*dAkQ)u?xdfNIzBtWz%^-uenMMxID
zrewSz^v5<BG&g?f+AAKjJOE(3Eeh!uL&Oz}*P1X9Rm6!gtcYhEa6aL${p*uh<O(ZE
zDH?Yt7o{6Hu^&EMawks7T3&{`d$(QeUU*IDkDDKjN<N3Qz?Ib(RGqp2Y(QPgUW|6#
zv%2xn#qmXuFMr+5h<qz~sfvwcLuf`ELKD$lebsxBb4mV{SV6j9sC?bcd2fO7h)m4g
zF;iBkH3BgyE546I)lu8=oG!~eCxP7-$vWFBvA@3ve^Ze0NDcq&xq#NWfFb&`@|f`V
zLt+mcIm+nfC#^cqB!Rar5e=`LsR#7%&%zB2<bFh8e6+3MTR-Mxv@|kYPQe-Ii#zy4
zoC<E=HsC`U!=L9Mt*<dv6bWT8So>Tz)k3@$USjWm<Wd|x3c$8wqo2}Sm;cIEGvN~Q
zWV%2GScUT}L_9Rm?zTY#A8IAzul&w1vAgUTZ<?|Sg*iDlZ(?5S{jvbYUO$G287_lT
zaQh5jbHv~Tvw__2m<&4IJ3~c9LfmZC2lxL<1qt*F@iim)u7Iy^qNz@wu0y)rWeX!O
zZ@_%`HXKf+7*wdU3n?po^8nDY>Ei*XVs`!!+CZ2qK%(*f#&9EDvZZ8g(~a0^Oi>xk
z$f7q%+0Ngvu@qCo(NH+CWu5lf!I?HI>)dedoARu@ud1Imt_8+4rY^a?jA~D{40?CZ
z3}HmwYdti6Ls6{JxKcSQ-hCkW>2__mm{=apKy4DtkT@&iv{MhwtlpMaR%3iV<+|K<
zZMH+D%rlNDi7pNkb+x~5sMcc8tT5udP0{AC7xg)V1H@FbyoY08Kg6!Oph|HgcUh=2
zluDG^&QSJM+3>i#YKN;}_r>&>3_K5=^}PaCU{t^F>KRC!_Iu~OczQ58afip`2rd<3
zI4%{5p|Gqk?9Npi4e4{zS)XhLI#I6-Xfz7}gQKC3ED+S4y_rkHYKV;w`DEp!Q<qh{
zlt*Q#BDCNo6+bRHxs=dB9M8%o-tNyD(e}!LWYuJ5kYn;g0aTOC*dwRyq$yhX0y9i*
z8jRch?C@LQZX(Cx5)2v2wtwEYf_pC{%l^7=f`81K^^0Fg81>58-+&y;XPvG7sVMO4
zD<{2+O{xgbCck;8_GrX&#ovp5^eqWmsldg%d3w~!i^YR{?S{aCfKj})?{NS7dm2`U
zuYQpzz}>s$oqSE$g`69z4sMMa;H{`QaTl7aOFYZA$vFj4yl|{T9WRmM!zw$|78Ap4
zpx5c-1K2WKDZm$Kbs}g?$NucNz)<FS`LBe+;TY1JQ7CEVs!SdxC%tv?zgA%Wp$AI;
zd9mfccnb9&nXJHiEc5|}nmRqE)RV#b-!j#|6=IkBlHI#2wZ31OANWv4FZxvOB4gyY
z9zB14lq4>--o3jEbv-ledeBQCu#NL-BdMwq4N$-jRcqZQWwk$^>z3{qil7$<`7Uo=
zJe_9Iej!o~&y(ohT^m`TXe%Y|?I0YuzXLhfX1%leLC%)v#f9b@kQK^t4^;!1GCFr7
zL@TA;ojzBvB=C1irvE?JkN^3HhyQWe{_ky&e@0Rj!@*xARE8M<!<R-mCcGFf!+J*Y
zNMKhStYL_Fh5&amE*^fy`h|KeyUf_^0}~(L-@6Wzm9~f+eP;gW!RP^Irnfk|Xr1Cu
zt}m1Y!^JJYgZXyugyXcqOVfWPxs%>RAO$Ngl-a_|p1%@VespZhlb&~`4e{&T_kd!W
zejGQ=+oYeEXJd9e1L~zM&jaOGnGJ^Ww>ExRi~#Bo|CzOpH8hQOrie$JV?HT*<oVa3
zN=ojl%xTQZA&YpL8rdi1G!V@z+&)mw9?{oL^V)&-@e(a}!Ak6&EnMo>5<6&0q<V+N
zDt+_z-1UcdpZ45jJ_uZPI<R4Yh~NI#f@A5|^n8<lE3ftdH*cr}NIjfWo+s->(bFCD
z{{nhxtLVVE@5-gfQ&@ren_vXNZhPVGHmBZQ{GtsDn*)8l7Cc7#Z`I0wzDO%}6&0T3
zqsfDt<^zk<;N#~1^5QCaC3lh%enyv;tPd8pSC7ag>i-3?D89JX3dS*6VX{|f_m%I}
z{-mIQ?33RGU`jhO@>Y2D;3?L|(mR5b*}ZS`QI6A^;Xnr4mh30!_(UxENPyTv|LyA$
zlf;F&RUwEtd!3LrsqIXi;QX{hyq}B;JXA2C#Jj+=l}8*3^RxF$#aklkxYyCqYre`J
z(s`1dL7Dx^=qO>0+oJ#`Em^_Wi7t*h#It=YFH4+VoYJ-aZcmuoR}R_WNCpqoRTLPi
zOmtbcm96Tz|HhlCxZ~~TuxIz3-<cMY6^5j`eS}Uq{`}!g6wpy#%a6LI^`P9F7ScS}
zhnOF9@Y>QovRos6j>OanrHqxs!W#a#;hfuwshfC#^kVKj`Nk_RtW8SKB69av^P}*m
zukj+BB^S$j^TfBRq(l2>JMONxudQ4>>Z)&33db~JEGC>)j_=J_eH}8LV0#vTHt>dr
zjTYw|<?cDX-7{M30kD0brhb|z33G+thJ>7zEtT1%yIe-yJlsxqjxJPWCq-#uaqhSw
zGFSR>A8^OH+ek`yZ^CThzAG(<cyD-vPs=XNrq-Ax{@#8X*Ye6|@i1;PJyvKLWAf3*
z7<PZ7%g$F9%XEUkO=xWsEt;EU++?vZ_ToJ!!_!6e|80%`0R$fQZRf7C_fq(H_q34_
z&v@F)w~jY9k`BM+uJ6qw^$Ofo$rKIuuQqeFOi3|P0p<))YbPi?ZsB7ZJ3ngvH;hlD
z*kV$;>u!Q1w}j9Y0U172)>rxiKjMAfR{NuUE2y>9pO~)kw+XFR?x^BjDB(m#3;d7`
zoHvZLCrIL^4_pwJ3Ju)(_$4JLbTVXrYMvmq=rm{Fo|Gopt#a>1>*3JH$o00gLolBJ
zS@{=NFbT6#J1aB*`a<Z9h2}@IyK_l(<T?_2uv>-y*tx9=BaJ(|(x6;^$TZWzUJUwh
zfnn)DgtNbYc9Y2`YPa7m^`;i}^u~<uYGz`1m<7WA$C{*)U!T?+n!xic)qN}gER=UG
z{_E^Ewa@HM(1Ex|#&F1S6G>XMP%QuG#bFF-;@CTW?8}ZXCp|EFAsZ9Q+xks+o&m;1
z->D!$Q(;Ff2&_U<j#l4%nrwMvc<EIbdCo=%soIB4JTtow6{J&JuMe5G=w}tSa)2)b
zG_kN5tNR1G)4u%;y{}A-AB|M`6Y|piMVyjvl9rF_n7Mw(^mp7G?I5e0ZJ1c>Q4y4i
zgmT6PoCQL?{C7m4OVp4unS4yPrHxuS0{{6@h&h9(a87*Y(eCV>2n-xtMRoe6gW7)L
zSEmllJN2GYdqh}jXY|EzH3Ybxd%!A3!qGy*tPuS<$w=3q`6aJBPCS*byJTgB1HZUG
zvJcA<pE!MY;~BQ_=y*BKxS(mjiIIWVc`|a+fTDxp&5tp2X}I+K=Cyjsum=%uVzZAu
zSM`%;+roqlJ)R1&12C5A87PFwx_#e!J(TN5&ZF5wk9RUUC((Z2#&bBn-s?7s!aU&=
zV3A$?=qFf`{)urAtR&<dU3HgBse9!7W1O_nvClI6I|kbJ-*|KA@4s6_rq~Nhah`F$
TA*b3$e*aBJ(@>*a?H=$i+R@h{

literal 9826
zcmcI~2V7IlvN%fUQZy8$7X_p$)r4j!BGMvKq+2k6G^KYw0t$#gAQTD3pfm}B6hV-p
z(tD6jKvY8Sy_0vM-|yc4eebsa{k^wr4rk}g&dkovoSmILQE&roMtV+q3JMBFo$H!L
z6ci`1!0#$8B>;Jld)|wJ;=~YK&sYm+QcwUuC<O(Af|8Pg5=23{KtV~OfI=yt2nr~Q
z0s+*D6DLlbJb4npBcqTDh!O<U1xgT!a$$jzL;_J#fB+~N43q`X!UBjyqM@N-U|=|P
z>J%6ZW@TmN<Kq($5RjFXRa8_2_yG*aOvnWRMF15AMN~jhC@6}cPcE+d`my@1K*j0D
zwwjojSXo&i$Wj8>6bN!36uA?*pnyLF3b<AvPy|E;P)R^%S8|DUjm5dfwz}eoF)=Z*
z07X}z0x(=Gt~C}%jBN!f2?eD<K>>1PiU1X|2;_eis0yGGPy|wHYAViEALr_di*?1d
z5^+RQ1%jdi0j)p*6+y-#7eWOAsH6%Kp@Kwejn!|Bb!}}0&`GT%5&;Dzpb&%#prQ!B
zQOW2)ArVL<BF>fA8cS>i2$L2lDHcGK3xE<A0M!E51rh}XiIM_PF~Aj|3(z8S0D2N}
zBw{Ox2y_CJP38&k0f>=Er0f0E0l>u4J-Tl0K|#S2LH?bHn_7E7LBUU<qX{$iO<&50
z4(lKEifB6H@MxszaeAVix;=|U2^GyySj_uyIeayOODU``;!Q?wNlHQ?dep0yZe%zL
z92xp4*ZPw)eZyf%t+eC$nC#vIUY&aM@JFGz?T^~~(>CKR*PB71{M=8MPx7<qoPeFq
zrbG%}rvYi9m}sBz^RTeOp!}jp&#Q3I+#gulum1yKi?%w0d*e9ZXPuTebt>;UBvKD^
z3I-F_e~RTt3v0kpI%omW*6cPGR=cluwDdBLG9ao{xxb6%px7GmTt#~tJvosSro0o^
zR3q>q6@`r$cYkjN4zi=QxQ%zL8pTDa%7C6=CHYgt9E9CZo<#0%FJC!_REGoPIaxNh
z1;Uy#?e|t97*8MUu8<Z8%e7s;&64XwQw!3XyzL4O39J%3#m{V)#ZnJx;@!qb^2hrl
zt9Lj0(P_0|=Y~}diz4ee#k{b?S*2}i?8D}Vr8BK}_pa?dRaz{Z2paXdrtt(Xkgul!
zX}eLw!_rTvlipQGJsQ{eJQNin;e_YdOuoCwQ9s7SBN5D!M>B)_(J-C4)o@(d!@aQj
zk%*YEWlVv>7vUqyu<?vqTjnRABXy&jUbNNPYkMM_%n|*)>nRHzg_&}8)s<6(UHeYL
zQsnR=FELyrS$>wmzeWGxT|T-ImaaDzCd%sTeXuPn8==o*?T6nZY`;<asWw>Wv!`fC
zdg$JrRk{aCQsO(4XYi1dB{69_GGBT}i`66oTjN`K^zx^D-c<E{(VHvnJtKE_!o+R;
zX+8(oeii88+@$hiMmuXw!H9N#EPI#HNw;U;=|6b1<IOxB-?r&BYrQ-@XPbfcz&fkK
zD81@7)kJ5Hm*!lv)DK@W!6>!itj+||=e_m{>8ys&x-Tu4J3dAT5_Sg}3Yb2*JU0DJ
zHjn0l=Wu`T7UvI3*Q0~N^WuKQkGTi!U6&*L1B7R;jszn8wG!&b=oqS7YIiqXyrVgb
z2=ix*&F7SSzs<DlM!P7+sl38AXG&{xr^nL!YiE9Fn1AIOr>mNcG4v{Ji0Hc26Vllz
zke*);eS1Dv+tfAlcp%k?CVELa%@AG;_3qi#3zAf%+4hJo(8ViV<FA|VnUQ|rSDUQf
z$WeD$g(YNnKc$8tm8g+?nUjCE;!4kYVK;Xp7IfUeo)0o^rBqHm=B%(fnlIK<&tYOC
zm?@Cx*hovUgf9_#>8{Mq-V9k<c>4sZ486Xo2Zxx0T>CM(lNogYIY|uvtYl`TvmP46
z$Ww6zX6=3*z9V^#YAfk&FS7LM_ijBA<s#~-tf#6whT4*Kn=!EpYlp2WT+TdsMAVJG
z2Gd)N^Wv6?*k#)+>Df%7vLX4)L)dS<ffiPJd`z}RJrKK*S9HkI#+^6l0;YR~Si-lv
z47S$oiii)?F&Di)4EL3G(PADka!TemJHfkEiC%1!ug}yZh6q<q{Jg-NBfqt8V3y|V
zZMDt4ZE^FsZ>fn-=bb=*^bYljZQb>^aOvRsXrtQQa^!wHJG)#K2j7MKL7N(-@ENZw
zc`@+*EBT5=#A07&A5-|_sf&iy%8}`T9kmqnOi~f5$KO78L76b7aN7|CD29(F=1jk2
zI4^AA4yZoZhrs{%`bx0SrI-@KoSK!$^cUkR`sahJt*p8_8GY2@y)ZMA^ed6*r~sBc
zg>a^{gSC1#B{VCham}rpKfm7jE^MGG`i0K3GyUQPOfU`f;`*e2$I<GO=?FKj;~|?C
zub#g6J}zsP&E(=WT3*eUjGr4!J*8CNW9tBQ%y%`ZWn6=2c&sg7J|%Svy2y)ok7?uC
zP1Lm>8(JR#Z0tFuCSR#U?<rUir9xKNtl351;Tql7vjcjey<b<SB>-h82ss=+6yCGd
zKt8nUlA8g^X@F54=p-a@D6Bd8qS>IUDwQ{N)eU!t=M2c{5ia6<YeYi_hTmbk7FHA+
zXz5+O>`xi)Nu}i}bKJspd-uk2eJCd@fE5B4V$zmD{kt#FfAc;2uhH<a@!GMnUo|qv
zm0ro6rllRdAOl9~WQB2;_-Hx`vapnE*a?G}>%p8Jv7-8*lSuCfW%s1j_qcs`o47v#
zh0ke?Er52+pY2mH0Z~U8j4$ntwC4tAKsox&m%!xfRTU6bmF7QQ6#lia|6++5)Zm5S
zgjR-j-GpIq)O%DadSRX+BWhwP9LvAJzfs&++)>;p5~9S5L>7iByHoLKeOo&J#~)b!
zAp>@!qG*5F`QV!;K!A|mGN7(1#nvrUZ{y4u7ZKAsdwz<*MXYW;i)eqZ*!n*HGW?~z
z8|qE`Kc23SfGo;iD4~E}IG&_>r1{g1o|6H8u2@VJc<cgE!U?U#>jdLzKuh$gQFml{
z7FV-h6{Yi(+-|IxQ5K^^dWS2!UyEhwr<3f!CvIG)ogc11AHIXoj-D<pxN47sTYIeC
zD~XhBM;kv;$HxL@6W5Yr!&DRO?&WeNaETK%V0aDObKm1E%jQ~+KpaO19c&BTtAkM<
z;ije<=gzEB7^#&}_5dU2MSOx^%#|rVg~9lWqN+F6a{AOlv7lBSzWn;j+;ztXe_$2+
zaa;{6fI>Ioby+ua_zah+K;ztX7lWxQ)!`^vR0r7eT9b&Gao_Qyu3Fmn4_L$aq1@zP
zLhOv39Nzfa03Sh+b@-f}KhYn=7$ci>b9Fe7e({uy$}dZ(Qit_M(^Orlx&a$sGkhL~
zOi#1Q!M@NrS#=2jy|g-47hdIyVu;6`-u!{dm-8vX&=HZu8&nyKHV=a9yk!q7WaxR*
z3_~+ux!O`@_{5vnKHuNC_)fNUv-RJIL;jn|EisvYqtl^*Al#0NAv-RAV8;cNm`K-_
zI$aQ()5<H|iY(=_cG};9dzmKkb)CA~m=lr!kD*&{eVmQ`A#7sb?ZMk5d77mhY-bYM
zZJGu3Fb)36yY*(rRr+_-BDcnpsBkXhJlQku3X`v){<QS&BY%ySAUEN!1#LS-eVxhg
zkyKtt684(iRlx2UFcbK{j@00S!^qzs>Czc<Wqnfyh?uEl-;K;`qffCJf=bCt!|X{-
zf`g?GQV~Bj4;4TFR#D}BQc(ssTXI<^NAU|C-P8&Jhlo}oOFB;HDfy|+haMLl8uyd<
z0gn$a6vIDaE4XOiQ4&kISO6zmG7y$!w>kV25Os0)f$B`!){{<vTzIP}8}yii9|g(y
zd3IlVPPw9vZ;rQAgV#S;JaUj3VR1^`bz@;AK5I(_ji0voW_vla`uKa{+DX9U+}(v?
ziZ4>F`kwgg)$gqUSP$FGK|Hq82r+%WjIN31l)spbJ3A}~9oNlCBLZOgw~kOfNWpRd
zjwl~rMk|)KEBTo2nG+n<M%P}X%Dld;qzJC{Ma|Jw3)Oe|J(daXKy8Tv{44-|<{RBV
zv9qF*R-H>CAS#GFBn^wEakKS}IP%?mdy8*+2aJ3u7)R`4x;Xx6umT}ss}ZS(Oa^-}
z*zh~<V;qD$R3ya%)eK@FO0h1O!Orz07P7KBR}jt{mJ&284uy|PXl*~<lT}-)@wvSX
z;;9b`R*<^$;*E}7u$ph3V81tVCwwS*!(pH#99xlrZ_fiKdObr>Qf|cv;^;kd=?9X_
z%B059Zvh@&gtC-$XuB-Ebkh9RkS1T%fW9)w<wR8%U`nIZ?ut)So9j*1+9tkpmft0A
zGxw|cGGv@bIbE<nBR8BHLXSjRK_F<X<<pYYu9d>okmpa#Hs<MIFayJG!P#9ITl)6n
zp!koNkXpba0X0Np<GP>8V=eE!S$`TIQfqyVDy}Q<Q#XH~kUiLVGupc`WtvzID10En
zgHEj8`}xZGP(5AvR_*SA_&TBGEaGHpGIp^VZ5!0Cd-Ki3Kb5^wd^S&&IKIm<b`TBN
zGY*g~abhTTAWi9M$-8^som%+OV9#~&Z|~xojyNtejq<yH$*u(6h)yH%RI*(%DTJe^
zevso`Vw>6e0Uc~XSVWTRYhu|02yT(j^xg3v6Riro@i*}@_iRS1%5vXEDU_niSB(t2
z_4MrrO7u)aEDk41bk*O}KFgOMG&4&{iQ`l2CYcXepFM}`z)8eP^QrhR4zJ4`klfo7
zE->uxxgD*29BWG3sp>o^856dSa}>hS%K=l8AX|LZ9PE~+Vj3!Jnq>}R4Dw={#4-wK
zz-ez_l-(2RGIB52Yg>hl4&J%5?gSSPwhm&4wbTdOHZk{{V^G_tpxj~<@F_uihEPpn
zy99h5zi?!b)nOF$aln3y5j2^tDc`Wyw*;fg&>jrWro8#l?B%0V-m(+l3^F{^3{5%O
z{HS=$s>ckz-QhR;>Y{3Hect|bzfTH&#khJbc0x<klP0TQr*hBED?VKdj}PJ!<3d>Y
zP<8dTSMHNxW_W4S4`Z%ga_!bnDt<w<@L%s4r1Fcls)AHty^Udu8h9`(U_3#Q#z<;2
zq-h;5Yl9wtK%^XU@R)__RDal_;B|V8+ML46LaBs4y7?l|(VM#xR=d3iE2P!%l2!V_
zFr=OqoGmVwIg0e*Diu9!K}2c#6K9mJh=}J_wxqrNh|$6lwXSZM5xa!jZmweGqk|^u
z__v`C(kPd6T}D11=M|+(MyrWL72me8u$tfUH{}+r#m+B#%e><)huP@{I~KV`+joty
zX3E*G6$eJH1a7A6*TO<BMJmWeV?!@sZ!?c_m)@s`y{&U(fbo#HBQw)^1Vl-L+)fh*
zwW`sxrmAUJAm&0UJSh}|_i?_61sADr5ew_&?8&pb4KBb-AWNO_Ve$1E@KL)0<Z--q
zDsuU3^TzrYkHgH+2vNDGdc{$sNx2)&KbwwVF*DsS)k2U*fvS}+S;}2yatsoBx=NLF
zN`D&1hp4E4-oDhk_o6Lt+WSI-p0X-wgs#L2Lb`F9wjiv~2YVa`Q#6Th=gXHCpU%mU
zT6jTT8Qu4YqVi?rP>?Mi+~0ZCKxB4zX@jHapnjlj@+2bRYU~*I$g7$2dEm`n^E!p>
zb%J!e33h$-ygf?EoJT0{mMmpz0@j_Uc5yuCVt}Wr-wta4$4KQQQQ{$jKM!0^jFftI
zD4gK9rUf#v(Qr&JbdA4NF}v653F4uHx%8Dj!9pzk#zk=ViRnOxzSG7g*b0}&unp6!
zjDAg;Dir2iYZZuxw133R?_kz;%wFs7ehtQV_=lR<G53NXkFVn41U>yT;Y?MCm5b4V
z!B;z7&v8Y1@1MOo4|yTgT6w~=vH11lXKVdiH1-|!M}kjNMHA5bv;CkX#kb>^cfags
z(7WD=4)wPn?xB;)K_<2sH0Gz0j*D>K;%hM27`iuGxLZmCauI>_<typHMlQ^1(T-ko
zk8QhQfovBJ*0n;Kx-(*OzL)H=4p%i1<5g~3Ev_|f#_|Nd;+TM}<Ojs3Yj@8(obO2R
z#C?!JuDiLDmx;1xHZ^9shvwiRO|FrW{pe_2-Dnlzg1Ozys24uGD)NvD&2EQr&fyw~
zC`Cf&`Po>jW>4~Za*2ICuD?fD$!D-pzW18<?W2*E9gcw73(;!ErphK2&)eF^nx@0P
zwMgF0a}*gbx`M_Q`q@8*dnU54hb){$4(jo)N#|}I)HdZbHK~H-u(`?Ud*xYW&TDzx
zgxsm~W2-9vb6FbHGi94Ka=Z9SYbZh1?5hoX9PLc9uyNKoDoGK*j%1xufq;l`!xZWN
zut1@X+TA&-fYsA#R=kC!JXpr*XA-6~%6@6STxg<5IC#CSaxd`kwHupXEC=Xq%A#p{
zmVpr?aW_97eSSsa3rNL@yS4rW9db~6+hXg*U11l9nM`LR$0*M(A*q%xhV;JO-mAh8
ztZ!%QChCW+^K^ffe-9hna>>TTBb~4K`?7a-+Z*jGQ8Vc}@W*lf@^o<l{e2hgIYUG;
zJ=kGWRyAi>eQxLKbSpzNm1iW7)g4RWskgf{QRz;fwJ#E_0`fGj;=NHD1~_mJurN(_
z)ZEYREOf6LZ!K|A#>rAvwZ3Bh39&zI?EO3&t2fvV)xj~<+sbEpr%TZnUvJmX6`4I^
zo7`Ja$J5LdSh~&>64r0B`q~`Uh>F<<myV{qz}~AGZ%caOmMQ9u-fuh;lWua+p-9Bt
z=Q@54S*0+Ou8(gkHWdqrM9M;!uT<girY{Q}K@Yo4XVP!t+h)|1+W20<9U!70NzF{h
zA<GO8Q<!d4<C&}|!^qZX0L$tse!^I;Gu*&PuW>7KG~FW@*0N%v0FS$yJ92%#s8Zhk
z$#wBrkqK45^(vn+vz;E3RTipBy|ekujWwUM6{Z(8vca35AtQb%ecJba$mBwu`18)q
zIa_uMXo|t|n0HxxTtt0o2!BR~Z{lw;HB^etm;(>@XpeB~En2EsM3odSq^V~2CGCDp
z`s>q<KvZQaw88cCG3vmaNd29~lNU013L)+utDVhiY)~r;VNQ>Jqx#aynv2Qy<1}G?
z_ba?Hx;`B1*apcR;(F;JBN&5S*YN;*Nmj2uG=87&yxFn)h!Kepn6WzOolTz+l40O1
zd+zArJ3VT*)4tlN@77oQqa)r;^7Su|G#7`EzGTbUwUnkW#k-^;c8}+w9_+R=<usJy
z!Go6~u)Q6cyhTy|>*TG-8stEQ79;%ZEk+lH@P`h5Dy2CJW%E~m()?Poj%9*t7*Wi3
z(6qaVY(5q84gP*A=1rnu(XQPS?B$z*`ZIy07kFb3Odm1|=^4)!tT+^}b3NPi%W*Y7
zy0?S4Auv0=s=wAZRH#<xInCjADq^CRJ$R+2oZ<Yq1T4?p^oI8bY=z^tzZG2e(f!jw
z+5wGJ@As2;hd1B8NRv&vkZ)$GYPBJyKCYTzl=4JU=<90tlY}zruj^vbQ};V+zsW@3
z@4$7)U!7^5hejW-ulK&LF+SSb8emmQ5}U34vAUIpR<q{umsA0n+<cj?%<pg&?gnqG
zmB^SA?{d0AU(Uto@bmSMr>V}eCRmN@#I4s4;fl+Q8fnux*8EOCk<HtY1s8m>(8gEc
zwmG8@VBn7nY%^oqcXQVWGxn3}cj{zcaj3De%Fou6WEXh2?p+Of_NYZIZxU-*)Cf_k
z{7#i1Eb4#>?XH-z;;fQ`2_X^`a$aQSTeHe7T?$NdmrAn2VD%bO)IHXihjuUZEpz=)
zH8KNr$!PZ{r|XKO2+!ILRbu9VEt$4kev{shH`#xhV8?m;^iR%O-6rIHVQD~8+b$+w
zA_<EgUtx~Ovt{0yx0H5>9ocH0v0|&zg!O6v8C*U<Z4}K(7<7MBbddo`##`OFYjoeE
z2&1Quj~}p{XVmk+D{^^HK1Dh~8BhWaK}cv=&haZ+Rp}HFM@bRfYJ$N$W>%>0O#kJB
zX`_&+J;<ziZc+n&-!Pd_RA~WZl#P(F5^Hz|o6v1vrI)Xhig)bxq@k8?qg36+U_z$P
z&T0{3#5>DRc3D3e^eO$K^2*fdRUF{EhfkZ?av{iTR-P3A6{0aRndk8n$7^7|KB0&2
zh4)*tK{*pTH_pyElN;rr3o4y*_Gjw`09krYmpk}~;;?o!^D}Y3duzf(rZ%HWX))Em
z90Bq)-Ss!F2m=)7I0VvHtNr#+e>1+1)}lK10jsjY%ackGts{fM<z(KQ$nM(~$5$MZ
zkuB4=?%1nAHa7in^1a&Kq7GO42I(<QOWNe-Q>=jdvV6wdK}|kL1hz?9<IlaM)VuE=
zrU1F@*~;H%WUITg3wG2-FA@;$yfB7&9XQ;~;HL;Knz)E$A4I>v9%InEZS#Uv1Y~#N
zTw#oInNO2l3+E;cCHiQBUWLZQvitR9au>tT7nI`1p9{^YB%APljvTGfBZ27ZS?9M{
zAcMWdp28kbYg5k`m{1PH@e3asR*c)-s_mKXaoBho<3Gq}44@~sixQn7h4WVP(xs%W
zfWc2CL5h?8iDmbdaEBGudWO6ux?wU57S}q-%j+8^b9JBE93(V(fNwJ;x&Owa>F^cr
z2!D6p5hHk+{SDZp#a=8O)J@;si|7|%rsFLRA8eG~rp^*GHta4u$%bUwH^L8#m1`h#
z&(4KoFQD&JBB_O@E(PjRX@Lzb@tYo+l59ZeTa84deR9TOtvL}7QP`2ZAxm+G2<mw*
zL5I5cd`oQQB}7wtOu*eUYv=(j_XUt-`NP;>x-vns+xDdf^dtkOGsX$Ch7bZvtFOC8
zVEZs-17zJ!GjKW&S_YAU71%P4jJM?QUC|6b%X<??4(+>G<?23un<tZ{q|)cseYi!Q
zg1g9Wo>}K#w=iTb=To;|w*tuAOrc*0K&U5#n^@Qixc8%S&hn3>2Pc1Vvr`9rq|W~j
z<nBYH)fbGHcP&{4J17#GJE!t9OnaiOZ2R>ukPI@m@blG*Wx;hRz26j{W9#VqlVp25
z94yGv=8EMzOm3VXp9Un8IS13w56l;Osrq{d&_>JItJ9wJdvD?iis41Hr~ht*gJO8{
zdlG*)5<y+Yf0Oq4yQf0`EgSQX4v+o@t&|;hIx-!I=j|;1nngK>^bS*YcP3Owba>we
z)m_F(+JBso<!Py)J{pc_a?=1ZW~sClBZ@S+juzXkqz}F>5N7|D!W^wWtNGNh&?F!y
zxFn(^L@3e2xjlyQ1jwzQE4Vll>L|(FdHgfMk?D5tJ;o<k9{xB@s)y@hi33>`OV0z}
z)?}tH)j9HTo$`;4ro36)QnAibP6=d!WZ0-{D(FqK{M`|3`Ck2tvao|T6H(9-#Xn67
zvHicp`Oi<<{zh5<hq>4P<P`9KOSTlzSv1b6;fK@Ev@;URZ!eG{GCQfO!7F_%^B4@I
zG{9BLFvSS_B7N`TQ$1sPqlu!kt&h2J^&f^8b^<5^62*VpvM!jMVie`Gg&v{9^`nr`
z?$%{V$!D`W`^jjLzo0a)KG@m_pi4^td0i6<xOCep;Ta|@G^2qW8A>JSf;~NUb9em=
z&Ck_dgyG|5-8<_FuA0lL&89&t_I{ysoY`z+8;Di2@+iI{q%a~QNcu9rzrXfcn<Jno
zt0k6Kr4CbhB{G>BIG2r;0eNXB2`apaEbIXG=G;-D*7$HvIUTqsunE*eohEP1wFTNw
zm-|Wwb5U*q_czY;^DLfv9@g!AgI!MdFR9QRI*TuQM!CP24%A#cFx0lBAG%plJCXW8
z7R{OX6_l~KpDd+f1x}ilGL;RrLRn=3i#ATLc}VlY8_<>;pw}6J6j6tL(cfVlkk9@9
zHc<0uEZenC#r3PMbpP7_-6yHE%9Z}<fpi!9W*IrGu;*j6pxI-*cAS@*1|MLRt$bG`
z)bAl>@5X56C})9x*&)PU$K}ZQSR=u<V9UyH&2F1IMZU2?o)#my%xFmJ2%m^8|E8gE
zT5)5NsQ9H4T6}T1MI#I=tLR;Pfm1>hr`;&IX5P1f=$h5{i`z(TS?UMZi1qQ$B6gdX
z-)n|Z1qJHNWzDqi>B61fF;A;K{6M{x`NPOf?lxSyoUS0J_{-NIbDG_?9NGFiDh(@x
zV;5XPv1L8Z`4@xhO%L8Th1=3+R=v@HSH>B8bW6^eZLv^LfG&`~1z_2HnpxC7{m6H}
zW$S)Z%gqSv&eMh=H-lr(_tP-+G=slk%O&u~^9OMux4ANpXGW`j`d^E{x~jl8s7xlQ
zYAd}hG?c_A%k~MoT(3w)Ge6CmYyGuZFjBLODqDHaFowxHa%>sMLFJ0UN3f8hfu4P>
zo3gjJ3}^LTPp5N9&Z6~I&@s!buoTdidy${|n_i^r{0n&e_Y_LC1tuQ-n)U(k`&@@o
ztfJ>$TMNjx9^&_E>7+*A710jAofr(We;AclN=Qk5E$_#?!JCepSMgtUj8ZtH2bGfg
z@4!|Vx9FfF0~KeIA~J1iTKBdvpBdR%d!PK>PY?e2w+R-AF%oV@D)3Se<d}Ha78a%C
zd@exko|?k*ydpEp(q?Lqr0jC>+2$`Fzjg35T;g{q`2+ianxo(Mb3oMz7y}LP_ytxZ
zuSf;@@sVH#HgcH!7`(Y+TB8u$vb)j2Qhw(uUM7rgfBr#n%*1!;KM8<0e<l-})u11D
z>Q!KTHBASGd8(chdu^2?9W%ud#W1xgH(7%^ckAO5lTX%q49+%l*v>7pi2>X`V0Xp=
z(pRo{Q;o|QD@)syE(vbev9Wj_W*$^f28x3>i+lELd}R0?Qa@Aid~`Xa#*q@SorX4k
z!N-|0iC!x&>!pG=8LBTR81km0GeU&(OICM=M3|)xBB-J4Eajcwkp{+GJ^QOGVz3d!
zz*o1ZyGGmlR9j!AMZrdOF-Na#%G4B3v$@(wWC1J$KqfASOz0bQ&?WjdMy_S2T&y9U
z#|QPYHrmZJ(;!gE6BsdoH5HT=<?tgZ?!K*U@cn|ff#)Fb`XBW3CN(UqH`QrjIj)l(
zh0sK?^<00>05!}rj?3uHy}XtBpf8W8f&^A8q{!2djeYf|u3k_g=5+tkMmXqbw{g>&
z#TfMKiF%==REmhhoe!!-)Jb86B0Z#o6$So$E?_(;q|5}<GxlJAM$Qk7&p%R|yw(Fx
z$cqA}5D%W7@oX7Bcqv|BKooQJbz05FWx5r7T()^{FoXTw8IF`GGoY6R_C7aic`ldE
z#Y9s#!}5@>KREjtXe|(;uqJi*akQK8+$W{QDMLoL_SyajSy`QeC{m)K+qxJB(tzKg
z3K;0%^D>XMf>>kpGR?8%C3Lp%x0qXM@-^MbqdZ8#8?<KdN=Ci|Q`xoC*)!iBPwYAN
zKNK$Ubo|jD@+MdnlmUEJv-Tg@_CNVBr-ej$HviK#&T*BS6hP6@GSDnizk~cQm#s}R

diff --git a/sl_plot_files/figure-html/unnamed-chunk-7-1.png b/sl_plot_files/figure-html/unnamed-chunk-7-1.png
index 626d52675731ffe159d5af917f1a856c14bda92a..74d9fea7496b870c1bac0cdb079e9799be91ed42 100644
GIT binary patch
literal 12125
zcmeHt2Q-{(yC|8#AdEzd7Ez)G38F?BA|i;9=rtjFOE7xb89Rs`f{?+8go(NZBf4x+
zqK@8zL>opBWpw6#$lm|I&N}CwbI-kN{r9eQKkt||&s(1Nefs-6-*fm~O*$HO8Zt66
zI<4C`?~#$6K?5IE2nc}K<?<uQ$jH0lItCiRPckw9s6a+$fBX#sk%7Qupd~U8iA+I(
zOu?Q^A%V;uXjpP`@-t`7{2BrR9x(6+0t5e-KwuJR2?SbN0+C2y5ZNy<7<iVBJC}g(
zB`}FZMMXtROMCY0Sw==iCMG6sZf+hP9w{j)Sy@>CJ%H>O;qhayU=Oqe1$(SQLV`lV
zxbE@euB#iT>khO6-MBVGLqiJ-3;W|u1Eb08kLM&DPda`QfIs^L;6K(rVcZ@IG!ih`
z-964duE0I6&AnhYHa0d6Sk4`20DzRBK$f5Y%s*ZNn0Acw_zRnW1=@JRI4LbHt-xKk
zAkMv@ZMI;RgtaHb+AClafM$O@<oFrKjsuN^C5>ZAq_#NSwl-iasf|P$Pf!?7uph?)
zEn)n0-0@i8A&rwrvjy(6ZE>@0z^bGr5ZMwKbV4nFmH^F`NMvLr5E%&!22cWv0&5*F
z56qk`AkDUsW`Rk^*Z?HJN+c3Vs_9WXz)$MOw@tms$haboKjiUqYj$L0m&mkk!VLUS
z%NemXoXv<la~nDi&S1I1jLT6azF*E38EHpznox#0Jn{!UXJz^s`ARjB&f;9h)-;2t
z$+b8}VHmh;g#Z%n8$75qx1Q+Ft0}P0t?tesC^l@|c)S{8KdCTCoXjsKlst-4y~+6{
zmr?bS1v%`TJ{4HwCKm(KIfN?w=D>drC{;mrpSfkiu2J^%g%qr&;~CmWn&W~zV|k4Q
z#Q9$XlsiJj3r1vSf0OZ?xi7YQ<uIy!bg%9<g;MF;^g)`!olis%(&!U|cZRc(=pWNm
z!%&DBg*pzAZ(7tC#ciR2HN^?|U5C}-Ry=ty%w3eqLh|Z3W@leGyCOq6U9BB5B;>}6
zHG>xsA;AkA>)VWkti;x()ykmd*Ly_cGp@NQZcXHd-wqiKT(j~9C1hiD9)(58X6*#;
z?r{)x&GYl7Lh{?vun{{i#nD0LA*;CpY%4m<j~CJy6&UG`)TCFtO44#)S0+15ziyS~
zTX_C~CSW7E1lkpep4*S_k6$b?#D4DoKK3yt?9xIkzrWhyy1!dkJ6+w#Z+gSBZag|`
zTRa(FMM|IZ?zWv_@fZdN2k3uZOGjG^t4Mi>dKk@Co`b0jhyK3qv5=spU4K+LGmp4F
zQ4+0^bJJrUTXOjHO&ZObjE~&UBkDbkQm4C^l|pQGveMM6;3EUu{&W^xRw{R3kg`j8
z#KAzQ*2}kFhP5kbV5I*0NYR?dus)A-Fp71yL2G4Y53wHpU`IY=rcm__Db<(A#V(V#
z`x-Vk>)xvv@28LLd?@YcIYFen5|*y}UUO$JJY}5td>Vo17r!A=pK)MSrZkZEIkcr+
zokaB0fcHIdseF&tyU>@d;waW5{a82Skg<HEfZtqmPO;!fDJ_06V5r_lz5ZparE5v!
zlS|;b?8;I6oyfg#E7y->x!1+uE0-dzLn=ov67I{MpP=oC53xE|K1;B!$Iv=gGZlqs
z`%mFWQ!(fd_af@8T+iCt*)?5&u}&_&hzjW{Z$kxLeZ&cYHQ?Mr{`>*$qqFQprN1^J
zHK{o!d({COtryyUm}SJm4(ll1f@>90=T9l?GjHB3;{tft`9nT*&O8@8=vRH)w{$nk
z`pdBQL4(K9-8ra?Be1B$opWM0ZPo9G=D$wyW)i?-w-`vqfoavhy>4Yi=Jy2a$NYR3
z6m1%`yR}-8Y;5Exg(Or^vFTM&6uHhjI9tCqbRaSepgC5*CXC;LrisH`UJnU4t}V7V
zOeM%n3JE|T0-~R7T1!(FzI*dsL*AgrQFCHRvgn0|4Y9Lpm#f#hS?^`+H9Eh^|5{k>
zG`t8KJbE;0LkEjKa|3LM?xI$ZDq!#V>U!|qWDB-9Jiz-|YJ}?D!n}EFQfn+Umd=vV
z+sJ+F-m7-W20Lzpy2C64`Cu?EfSeeN^MPsk2e3T>A&2^vt-9$w5*yw!Hov_acPW0@
zr9j0cCG8RhCOcJ~%_1^LS?sak87*@&zbn6a^FT#rEJw0p7s?)#BaX3UnG$fUs1@{%
zyN=ijOmix|VSHDB6{It+;5g?(3)54@ou3HOUiNpkCU69Nw=2>h6u{yTxI5&s@v`8G
zk}xc_nb_*0E{#aR=8n`}V}U97#r}Nr&KsHGE{_*{tj&;nyXkDx4exzWZ6a2$<Srre
zsjC-vojC${9P2c6Sf4Zn@Gq{77FLT2STBX6k%U{$iircqI~t{o@FPapz41w~B#}=D
z9SOL!hAa-ZYb|D%B#SXf(nq0XML=gKaLF&~hImD}qh-yQJ-AC~%`Qfh#zc^PwrlxM
z0qM}mYER@8F_L!46V4El$(Gm6-MMg>9)eg{5?dnUnMOm*OqbrfEfDyhyN|VuYHYd+
zd@wWHVwzqKM{kv-Z8i*n-#JKqLCNqt{vmf2Z$zn9_OvF^oaH<1UnaOx5I^>(zT%jr
zIJn}?XybU&#`6{@T`@=BDu#h5dyt1-ch(a1pziRU2SG?)tl*J{d=qJcL2eUmD9z#b
z+Ve=Z%=Ljv&W-wu17-OsG{3*q|5qFMf317@|JeUkj{W~G%F_uiG(}HcF5wRLdng^S
z!3Z$}@i`!UQaSG7MEQ7uK0dao-OJ#24`y|MP@;)?Z=pSsCctj9U2tPR^;Ss`C5-yy
zKwlpqkCw*yL>B63^H+oX*4}Ze!_VC61}}@tzC;ge=2RX%g9J>}Rx9uEfG?je7Dm0d
zKGo^L2rG#Rc^lH_%Om7joINoYe!e_=I!D{yvB5Wcgt`miEebAeJ_+HH&=t>e(KDcM
zZ6u)Z%?wc3^?yrDJ4U85KhaaDGAx>?R~R<*sVxmXF}F?~#iu26)l&el7(qzoYUu#B
z*6H!alRi&Kz$%g;y*lHX>vK9H2HCwDDs&LEQMT8L9HNia#kqb1@hn80EBA491+c5b
zd&aU$snhAs!jxPhS_B+ru7Zh$T<ovWqm2v$W&dvux<-?Jb(j6u30to?_OUYzaKxaf
z$1IC0(MREwMW^SxM$4}7izW{s1XD$68Ccm<9*n~>ZUo##8II1ZP`70StSd6$lyLvu
zK`Tk<z=op*JVQC?RKzO4b^ENt^BYw7B!2&O5QIQ?B4EB;uo8jzLmTCW!fw071{hrB
zl!q>m0Bt9Kyw3Wdi*L_m2{pL&-*D4c!q=4!o*pzDa3KRuLw-w3T%GURv|IgD_=DCR
z^ywKsQX!oMxl!72oji_$r?Z!6M0{XVzo92iMW<LCb8)&P-xB^K%!m9$b84#5Hme(v
zsCsRwYtgHxI^atO^H?m9pL(@g_j)0O>2I9s@N2cva&H9gL`?nMVnp&DYhFzpdZT8w
zZmWK0?OR|^=#N!Fu*R_-`HI1sZsPup)IA<RuGDQiOIbBZCP|!9$q>w(^v3={_T(w+
zPTl2+m>2UpeuJ3(NBsIIfm}IEdag&J+JXh2>P#`;!i4WNEgJGuI@7@x9~~7i46vTa
z#0opoN;k17bVt)+HuTH);b7wL=(e;s6LZDl3zLfL2JkhK?AwAPyr??-#C907Zhn$S
z&@UJw^4I4+lY(mgqA?I1`uB<<dQnFzVB(n*8ZPl*>VI4q=JyXfxsF*{!o4gHGNkqh
zwpXP70V|yn-c}|SV}|~Tpg2W`M7&B${|;;PezYoF;xCqqthxy9b(w2<?&u&p;tu~l
z-vRe*V}0IALnHzo`fDt;LKZ3Kr{}7%L(fs;lpZANSOZqlk>QcQcI@{Wta0f^lh{Hk
z$sjg#OZ@Ue7Iy$2U=_B}R7I8w5eT@)=~5?=$zMVN$a33f>kK`560xTgzDj#aQv|Hw
z3I6O5?AMO=sGYlMo}sNyEu<2~a^JJR)GnBjDQ_G>c1j;%p}Un!WG71u>*178?!)A#
zOd%kRR?hEf%1sp0o{GaDMbShhd56yA>5_-wL$QAzO&R^`Q2&m)&ak}9q>kEvDI!m~
zpaH*eljq8*as7w)wA8>&>)^5k01-Ia%ZWcCRL%Z`K32xa{w0pr*B-1T>{uffQ~?Wr
zY<>a7tn&2R5OHr<fc`~=u8C#uZ$UWv(_I>~zC@il#{AnUW=(isnA%@dEua<Ig2k5~
z(Zhzpr^F3MS0>I<)Xh|FCxM~*KdJtLt{<VlR9XiU2l1bKSZfcD<rDA(#eA3_a=JTN
zdQjL4DUF&AOHJJFK}VKS-d*D@mHS{MFP<IXcL0*|`QM}|KHtCQXIAo?iklYa$Cedv
zoEffe+bVe3jF^9ytz?<>f<HSCUT#G0G4?_3aqI*&X9XJC{l!aNCS+eDJMXNG5c_K&
zW@Yep(xHVF<lH#<rBBN)cSF?X;H~A~y{b57oa+Nfwe;1`CBFgUq=l=q4&B_KgG6cd
z(KyOHRyj6+>-uZ>W~Rk2Py(q%LMSCIC1<p;j$t!Dz1n(3?s=<P@PWLnjJE{1?p=AU
zm%uKeq6YtXUnBJKro3!Kz7-_j!z@trh2YTCpLDK=pGxsxKa@>T!MZfO%<fwx4UlvC
zce{054rVY=-2H~C9swbJ$TTy(#*tp3VCEXMhbqqfTbtKP0XiVEA>Rj93LT>WW(0Fh
z&n2Tg_r$wCU#X{++d>5@XeD;&NKPKxJN}46V?x-F_*RQMNHfbzFE#D+Px0x<bRn*-
z2EqkoOO}@kE1|jVXwqdhnj2cbeb9OoqIPOBhR;jufPZ<N!*kvx{g+!AnB<3hS3HLq
zH~UvRX4atf!*lXh01!ykd_{l<eOb;SGqp1}Rnn;cwx+2`vtLw{H%273jyQV=KmK8n
zFMnB@zko04{<h+CbSihl3<eW9lbpY|DiQt?Jxh4-l}Si7x37tNrplDjQ$r`0)~7B%
z?tZ%nF+;iMb$*Q~OEW80buMU(Dksh~UiT5a3NF$dzm9TaHbE#Ba#0nRDn1Ro1eiom
zn@63GR3?gvB0E@`!urcYF`(g*j7B8}1HG7Xw3^Yp*1e_Rn`0t>?4_7U(OcO1p4o;S
zn={s8Vc2S>gUSRwG9Y`j5#UXRyYE)#ca@;xab1G(9S-$c)^xhBv@ksBu|4VHo8Pn&
zp}=n_3~zn(qcA8^Ew3L|+WGs56+4z{L#bA^!#zNpNZ><Fi@`<OI7NI)$U}w9AC#9W
zsp8RrDxVN*lix62?xSVrJ(lmLEW7$^UV^C{9*vewg*5mf@CTF^-{7pCCP)JpuU3>-
z$5(^;ikceNY62GwTo-7iH%a`?hnSWG6Dc);UczKKgZJX^jS^~*YQM&aY8UlZ#SzLP
z%g?cH6vzE*=ZGl`FAHetcrX^(p_U{+^^0(ktPVO@aN{}rS3TJF<TcR^fQgZtWgT>l
zJdU06+g_2ZNP_yRTDM@2d3BE_x7CH%$%D7+-9Wg?d>pP`{`SgiWsYA<#mU`$O9R?4
zIV8r;Q6M>4Lk2Vdq>umFYA3*pnUl^H%`sL^n`)2_m@8W^8qZn9hDbXuzj1e^m0Ljt
zeuV3R-BfgECn*N?lxuhT;zhfU7?9Xs;es)|V;zs^H@C9By}NKv!w6z_>i#)y<3w|~
z-)AL1JpA5ld~~$jyP&7?K2*l>G(1|VLfd)xuc}osnsvU2spj?MDhf|6RZROK9!ORC
z?wkQ`Jg3(@tBZ8lq%YrB!i!1Jhb)Frl@^^-!+Gkz9}#owOt!EL@M7x@wpR+*KBm9&
zXW6h<V?$vqPXY}BJ6`B*sJ0}!B;iJwfTUj|(nw+O9a08LAyHM$7^~as`VB)d5x6>N
zUwbRg7uz|_iY%TCGxFwi81<us4c{z#n#1D#OlU}jbqO6WK8ixjmR-O-%T&`pyXFEI
zuwd5mx!ZlrV)nuW5oF4J-t4@Xvq^7>xKFqHZ**+qwY+MIUHHPNMWlnOe6Ac#QdD(%
zla}{5zgQXu7pn;`_<fmct#kaL@R3SBzAOmk5M9)ry5TonU47#fdSgGiEN#USez<_}
zlDvNiPgHz}C`PW`M`U+*#P8!q=pG-)$9q)}H|}v_QLX)!!-w*JQY$o&vJ=*H2Tj>w
z_-&G_biiWKUSUXb{&|>XZ&-^vGN;EsodedPuMF>wt+zLWI4>g4&{PK$!e0;=R%3QJ
zYA85^yK_NB-q{a5-B*g9%lb@s#mG@)*cBkqN{&BR0GlaAJr;ruQK86S?$FWZJ!)|$
z*UXaYVVJ_&j12RH$cVBKQg0r_PMnETaYzC5_gd=VYyM{}-W3ZlTiH)aZE3b??+?-6
zLd2wCxWP}sZD|j)Cq3bR?5hQLr15I8`qvm&nEj<kWp=%3E{W2#PcUVc@KAM-LB+k(
zE=^R~@*kFYDDA~Lcej+`-r|yCe#eCc_~5TRhTJ5oNKo1POBHV&&dXw(8@UJYs(0R1
z1yQKp&Ae!S7=f+_)V*AOT(6$kQ^gxxL$U-fD{vvvMc*8~<{8QZ=mSJ2t#SUZ<j;YN
z!g9LOY$NlKaT`ILcX7G74ANi#0h@r<qsY_<_`5gY<-IKtB<1ixW&ScVL@Nha`Ln##
z6)D5F9!eBK31~X)QhEYioV-K$v%Px(Ll?{63xkOi9_HQ8Hg)#V4ARnad#KkFj&150
zok*W4Iy(5^9SXHRp>#UV!0tzy1|97Dc-#{DijNv@!As!2Kc5R)Tlvq6S|1=|`g#y{
z|L(V0q9M?iUgNy52QbAYY8YQnRdt?8dvyoamljqBNccyuVj8m}<xzO|5)J!j9J(U9
zrgZ$%6TAi2G>;>Gta)N&8Sr7nI(A6tTA9sD>lotqVVEg};qaeV#3Or&e^`HK3$(37
z+V)gQCR593<)aKs-0LfZ-dH2^3#cQSrW4gHp{>`~du4q%fTM`sPgCvCd6zJ@bHln&
zmUst_Q1VI1O{*6&9~S8P;mh{Cq13#wuD!|x<2&)Eo72lcx_~Sg_fKh2)8O+46TQ58
z8VgA@24d?5mTi3@S-BzCvE<v=@Xwb7UUk@9Tb1O(I8J<^T~0#hg1RIpp4nG}y1W8e
z$2wZ#6!2S_p3}8qeIHB;Env9Er5Q+U7K4Hqn8-25inNJ@vYHEH=3eftt+?;26tX10
zGt@~$Hp|dB*9g7OK{Kz;^<Ueo?R*KPbgC{(x}KWWHx!%`$uUkJC+je7m%$aW)0`Q$
zBb;8=KuhG^-5e=(MbR(O5>5B7NKUt4!)Cfh116qSYV{Smwh06WdA{<Wyx~fsNahPl
zDX`V5(0y3*_3A&3vlF0F=E!XC&z@Rl-L{0wYqq~bd&)j@<=qdDt}I>t7U?xKZmM&;
z05np#p{A5=teAeKLl5tt88Ff4GevQo%Tb%vnJd7?-Bna>9yQnfW<*Q6^>T;1)B+nZ
z+MYA-7JOU?3R?z9&~32&UKU~3AfnS9`xNetz5{n*Wlu$4m{!aIU2S($Dt6t3rv^!D
z?kH17Y29=1Cc7nXW|#a>)S$ZpWT?b3O&s;{eEweEy8LU><@FYKs@8NVQ<{6olx<U-
zJk=|qL59P0{;tj4_L-qBT>X<bZmz6yeJEXSINLO<Z@#{~BKOh~Tb-HxdZY=*ICY#9
z-cus~;GJiQL|WPYr-c=v>QtwhA)PuijI|1{o2#r`JE}m?o5@mm5w<J~wY(V3m*IKq
zX5e=#E`o*PwCj({--Nt!Q=49A^b(XYhg%&5A1DknQd1bgU?NbJ%IU0Hv?gZUMY05!
zSZECBnG|mQ3Ea-QDB~pYPETHz1vOgOVfiH#x45TiE4(&h%*LJpmtbiQxo%WzOLp_k
ziO9?GS9Arq1hg1lUdHOe<&(Y;->=LxE56ZAUj4BWcbJ-%Ywuws?w9M7VjBq!1Ds9z
zhO`8Ilf*55ug3cj1)?>Ed&$NB!xip3>h}TZ0+JuS^Iv74eXGkWK60l1G98|Ejr_AZ
z{SPw@Np!!=Qs?D`0nV4_Egf@<BMY~hPB$!r$3EXHm;Ahc>&f+?l<WB0K;{8Bhb#aF
z64<go<dW2D&UvHK6eHg=Um4C610w)j=kSG4jrOS+8Bgz_4xMOo`eH5{dI^Em#RnL$
zA%5R}RC?IKD6^f@1;jA$)E)%H8p0UUd-qg4tKcOoijFn3^B>v<o}FL3nvBe~iRqbx
zUZ2flL~x)&P=C~heEvFO^te`jxW}<QYIsA-{gwlFVYOn+g53Q>zSM5~`@QRWdIjQR
zlI`knD!_KRb+1oqt#2~;fA8|kFInjvEDYTCPFbwr&C<8pdEX!&+c{w8Z<@c!M9N@S
ztcF7fssR7GMz3J-yYTmN$%hsqP*RMbAhE*6$`Z4AuP5H~@B!s$ApL#F*g1d@G7iBX
zUewk_ThX<*hFLWK91tc-ZJaZhSiUv!22N~n4q|PgzkhaZ0!ULidR=^NimlH=?|8@!
zSkdcc_6>)P3$BwKV&SQ`=n<7sT8XkJ8?L76TGz?)d0E0Yp}>RxxhThBllGnwC=Q0o
zd$A3jA3{ZK==6J=)jlk~{AI5KUb2qL-{1H$7x~_wFIB2uI?H{|Fk@fHq`>=wY;sd@
zfU~ho^zfbFnH{I)*m_RF0RCbWi7sOFF`7PFcW@FRBPY|@_i$g8p$g5x(m7dV`sN8~
zX8O-=@k(n~PL+2an>TT#@)?)7&&G32u+jU5zYjpCE+|uh)&efkO>8ShZ|eTBqM1mD
zAC>IE5P%B}f|>fz{Yj8>wKU!lY&cPmQpwdc{K3g}Hp2On?Z+}HPEI8S&U|I>u0Sab
zVUvNnkVDwBdEwBbO6!-B^QOx+^AOTU6}?>?7v`1HMJ{I*-?(<A9wCY)c70lB(0-yD
ztEAZE>I<|@gp`s34tY^YM1p?g?Sr-JTfjx^55X!0p8Ty($)dLei{s?kVTOOI;WC~k
zdTDxRgZ$s}a72!b%44NQwB`&4KOVl}nD|~3Ex3h^nXi{O?(P*#{hG`gU=PGF#ctBb
z{Fr8jh9oX7&ihDusx%7`j$Cyf%s@F&_3_)-WlGJojp^rgZmb?YtS{q;%|)CoyWYbU
zat!fksWLJJ>9V(<9tatG&0W5ts2NX3)jIo9*yH_gQ{m=3SZ$n*l9m`TmUx&XqU40<
z3DIFy5!FMDBPM8V_>g8czLN5FifpK$tx;RecrGP>XJ1d}4~kPt!Zr?%*9T@d7yDo9
ztUibs84}4%9^ajH>SeOo*Yjx(wfs~gA~2t~Q?!2M)H^*Wo7&O>MMO1}dCPV7!LT1c
zQB)O$Zb)>lN(4R|$-h{>pt@mDY~C?34!jZ~eEcqeMuBk?;nj~UuP4q&HV)ov^%j?s
zl`z3E@w)H|)m-k&<{4|TVpIw<u0P&=gLugpm)Q|+_#zm;2bt78SC2qNCl8L1_pIkK
ztkJDa8oCv!-aanc^L3hLIp!(g3^KNbLk+5HSL7?jBUzAU4HPggAU=ta2XaiUS)#Dk
zhZJrNWl4Tzf*m@U=j?1HK$>Y~3jQW5zHx&U7yNfWzAaV{Vk@d~>d(9~uzw2`TL<QJ
z=qB(!2$oE$)p38Kk#{Dd&2*|D`^nixBJ+t7^L1C<SbU-bJ^a1RbaL{Vi?R*m#L!*C
zTV%>8(|&+kQ~MhwRrd*(+!(Y~=+>+02J9p~P?Hk%G8+Ecu^-jOHxk_p-xa#qdW9OP
z04Q)#=cqTDAf);vP?0zgueI#%TX9;$pKM1}p#6Cq{cR<MF^3k8C-^HR9h5#7<QUA4
zYFC4pkqW<TOQjUPw0{1I`PW5Cq>p;p(@JT4X*FY7^&(^V4uhl2Pwe~+!=$%sHoM$O
zZ|?#m3iT9U&A&0_rbIJ)ZnGVFMGA3ZpsH%;{R-)KA2nsy7p!{+5xkf5FOk&RSxqq8
zx5}Q{c2(87s4FwoL@BO^h^t>-lFLHf9i(GZR1$ly^cd5B?24rE>-DmPMap%`n@%Zo
zbER1pko;AvC1Sasuj(&n)Uh-&5NsC_=K2R8MRFxnyEW<lo^)WiIMWFspUhj_aMLEf
z+Ev{|+awH!i@>^Q1i+RhK2Kz@8~}IdVEq|S&rA2K*H)8c!*>uatPZv{pPtNry)Zo&
zR{4l3J*uwn%gsr_fl82=z)BH*K>Y-5A8ILyzlth9(^_a!DcH=XFjFtO$1^yr#*_MG
zBn>PW2qaCsiY26;_gYP&RV_z-6gDg{#(6>=E~xdwj}qc_LG-^InuRsS`m3(%ho$EO
zdBRH^DvL`uzYM<V@C-j;bF^n>T;4ov?GF5KM<IZg3POkmiWmCbd(w8q3niT>N8_&y
zZydHU+c9p=KMaBNPbh5Asht^Cb`4AicwAuQ{lRDXJj%m)eR><$!gsC$%#)cbd}$zB
zK=5f#=9qYxH~_rgF`17d-dEmCa_rm_OiB9_@Q&ljUNfI$Ofb;j?N3WOw6G$eOmUKd
z`$uB(zYo+*-|#MUAB6i?`Q`S0-o=F7B|o8>oEM97yXGBe#9T*v(~(aGG<uQgS5)Hg
zJ*PHOs%s<L-!!wACu9nt>|SvHR0>*9c{5JA;4V-3cH=AyIWh1Y+Z+!@0&rBezzt2T
z8b>Iz9^9bGhz~+&`bXb5G_Ud~$l6oNG~xcN5Qe@B1T`(FU2t+GxNC6Emr(g|?VGdz
zQnQ8kNX?L@Y0o7LBOr>`9I!lAN`bem0t-VsHV0d6gE!3lYZ8;91Cf;m5abxZav?AK
zbbehgK1}tzy3!n<RO%FdZ%}K)fTCk&=;S?`I4OrrJAwYEBG(P6(wD@grHljToBGpo
zXrCQ(8;Au>SqMCiCq}7K*x~FNj}veY2bgnBYdQ+T5hxENW*(B$cIezVXKO0~ST4nc
zQg{!ezRZ>+P%+6H_y6B3nf#wCzWkR~T4_MXE7x9SuiO2SSa}I3-{l;a?>4_Tzld2q
z=-XuhXYk+^#w^{1fD)h8?xPS=-$HVag+~!Drd9?~Sfba}r=!dx%e`_|ay&z@R<`pr
zdHU5CwrUCInrn)dI2>6U5<#{X?DuCFSbfjRHI?DK+n=M@lws?%RB`C&3gkbwEpbaZ
ztLa%P-nA7-^!ky|n;9nOc}1tpJf{%X1bRv*h1=sRambcjz{pKe)Jg8W*z+GZ89f^E
zgw56E{+?{Apwpl6P(Y#gd#`O1;7$3v%y0Qi%K)qi6kh<!ketV5$Qf6E(c$lBbnog3
z<lW6wKsZ14e7ruIG+k-i8b_BI?DP0u?PSKze1zPE<3gn-1Qu=hE~QfEW3~5bOjdMZ
z+L(bU>8<;5olxvdhmIv+=QC;9U0GC`)Pe=2IX<o;S)wx@ah0zP-9Z)`pVnyh#T`HL
zX}SC=Ki1RkE%YtSjXm8?sl0?at&;%BrrpE#_uAXyn7bRw-S*C>sc()u02ul##v{MG
z4`LQfi!?edR#7r~6aV7^(7#gw_-|JAfC32}+luzj>9eyxxEQ=u&d3K+fhXcsyC=zE
z+k6RSzN)xG$bZnasR#dTMDag;eXkb^dmT@99ct-1nRg}E&+o-#+weMnKjux!MoXoa
z1lY|V43wdj7&hB6MWs1+t1|xvJI;vDtTpF|@}<9B*2+Dn!H19az$-(>d}iiFi8V2r
ztfalINEs~gsDJGyAHM6PZykbLf6Ck2LhM~A3gwA)3r=*B?(Ov77_WjNu{Una9%uQi
z4k}1awTy8~5+q%>pmJr<<#fmS+TG=^AlUfD27@0puVvz;Z`+P%@iH5JEnZG>4N%+$
zQhhd8_gs%wx#MJ%&dBGGknSOh+uAtK(wvd3@g3z_DOY4mEzY|J(ctejUS*Axsm>g~
zRx--@+ePoSm0V9Clc+?94G>$H$9h4*2;I>AfswVIX}b}y2Gluzo==tAlJL;hJnIp=
z;XuIQ={Y?iEu7cHWgnpQtv@_Jy4_bhy5s?D1%^w}{B5%4QmV>I0~e9={m{seVA?I_
zSOkvlgalg#xTSgi*M88;U97Qnvs$_O8e+$kvx1E68Q@enVyyy1=j$=OBiNH^DB0SK
zeI6kj7Z8&74Lu|(QsI&iFX1<IB<8;Y2#--DEsvKR2CaFn_8a$Hd=m2Ad3{9Ub9~1a
z<B~P|q4D3)JTu*C{PG8|-F2fxeui>$Ra^oOg|5{VYpZZ{1_&8`mS<t~nG3X=E5!Xe
z?A#DAK^?Lu=+J)c$Y_0hRTURU4pR?j*d+P_kPkuRuo?<LUe$22#Voc5VP5fvmcl^Y
zbM9bqH$GY~WG{Ga{h15!9@tb{{AGvG$GV_I*6olji^PK=DApIs44@NU$gqiNNah?B
z1=pp&@`KeetrqzGu;g8s)QgH&5}sm49&K+V51X?wNI$v_+l~UTE|6l-f9j3;hwL)i
zVqQ%)Jl5SeVcyIS2n^Y-%{-umB{h*Y#tv2#2j4vvqlK_bzD0XUwM5GwP~C#BVc8Z-
z^6l=e?P+X$5Wz6q3)MNWv7-HIf%s@%bCv=)+WCQ)waVWOZsD2@ZZ|xs@)Kh!gaj0r
z%(7-BdT{9BlO<fO0g`2dlf7P7v44+^4@|B)n0toZvs+R-oKwSnn0bbdB+CX5Rxj7_
zRjU`h;ml`U8<Aj{uHe+#TbJdo+qSp|+2h?Ek)Z_WW(L1*FeRUJr2=Bs>F<mL>VM67
zmoPNIp3Bj93JdNP--Ca!@K}Nor~5~ZNy94E;b@Ix>=exPT>5+mHry|N*o<w#x<vYG
zKR{_<JdSNwk&|~W?oT=BWC<D8T4aXhS&9Wq^%HGM5Kqq1AX$!?ch2Ay!YHlEgz7qB
z;-2X1xoRO(DoaQJ^FG=RSo<N^P!QQ}Euxv28Dw31;B@bzWWdo(%L{&~&!k%yCtm{Z
zkY%Xj{?Lb*ZN_xjuI0u{Q%z(YXnXR1;q=qXBstx?i|rid5#m*4LbBNISk1W#R3SH)
zx1;rra+h5N5QM((c+ybk2G0T~l9w0yzbfGWnNG}*KpROP*uK<`m>$0-ucdMKX0h4>
G<o^IQ(LwM4

literal 12205
zcmeHt2UL^KvnWE4CQX`BL<Fe<A|0fJA|h3)1VR+)QUvKz<U>G3I?_v&DhMc5k)k5K
zMXGeAhCo0{fY5S3%J28T@Bhwy_uO;uedoNg+2s4OyED5xJ3BKwv(NQ)HK-|BDT#=P
zs5Nh@84wW>Bf+mSISE)|lgHypM0BcKU)x9>{7Xax7RnJ3*&aSgNQg)vL?nwuBm^Qk
zIU+e*BDokMTQFChI(3SenE0d#378<@hXextE|Ne9B#R^@i;E-#0)&L<q!<FG#ly-)
z@VN*f5Xi{LsHmvUoH@h5z`)4J$jQmc#l<BqE-o!C4R#N9cG%%zvX!$1bBvsAm0V1W
zT+FD>VRF&YiPCWabCFI|tFf`Mg@uLf;h@3RM7D=8F^52hDF*!5#(=+7wlSl&RbVE7
zz%DLPE>T4;QLQdTGm(*zQ6M@OFoOkz7&)RCIS~F31qgQ7=i#F&rV7lXF{6Z(l$0VD
zouVk0qSl$B8A6pUQI)M+RScMI51SmO(W+4}6RHTKRRlt7lum0a*p|>rAdJSyjmFrH
zR)INY^tjz&TQCtu351y<mzmb6nN|=hVUdJr5khiAEs&NV%@zqnL<ABd0t5nf2_gk?
z9ij&zXNm|jt%Mm6=&(1i6A%-DKoD=VZU@(s;^9rRM?^#%;fLQ-(X*>IL_`;fG}WL+
zKIzzu=q&ao-+c3_GZczX*{$ZEb+2&@-|LqzQl()J`KoYD_g6O=rH@)CRD|UmeaGhS
zY5n(B?0g1*OvNX13V~k7gV7?y__~Rn>5#T(o%}%R$}awim!Dl`b<zBAVF?C<af(vr
zVIR)(CJMHvB7bpH?jrxCg(t{oIV8ZPIGTUAAgYnxL&@rU?y$YoRn8RZ+P95opynv2
zyX3ciWPYdXe{M^ns{dk>Ck&}8!FCQXsNfTWc)l6_LYMGH;W<|UL)YmrBqLVy3^W6T
zhveGpS&?JZ%7eN1)gPZ#)#pp4J_8jPi9ZL({rC@{)U`xS569*^J!J4*fK!{-a^Buu
zI<R;HWd2ErXTIAcUBXG1@PrEuo6RA;vl_Wb2DyBfyv9V<;gpI0^v;JSKqSPJL4y3>
z7?tY{R8O?swM_mk)ds~iVf;D;u4w7^&SqG2fO*3K?CEs>Lnj#|rN2G!qH#TE=XXtP
zn_Q;VG&jMr{=j6v)daK9rI+y8DTreVE(fhN3tX<@J-=Lk>*35>20uNCZK_qQB_Rwy
zH>ZQwezxK*4rCUzBcl<xo!0ux_LckhcAa<b&*)!2zoJz#b&75SmZ<P1aJ$y)`mCEJ
zdjsF1Mipb;n7`VJJ9d$7MUIQ%iqsG!z&&=#M+a4Eypke4J6gKw$_)gT5GZFkf6$jB
z)^G#`7t6l={k(1Y_6;|eou8ZnsRHyX)f}|o6asHwNMR_HE8?)b{H1zRDadM}HC0r(
z0a1_rjX&re;+n*9Uc2nD*>$Vf05ut;^3aA!<fdQz<pO2JTuev!d?db8H)6$`0m$Sp
zy56T^1T0M7SzcjDp~uw(BCz){=nm1(ew;^r`OG8dZep101Jh^k1?2eaL@#~IUh5m?
z6ba(Mz^9b%&&Cpb(#ai-$3~pZQ5t6!S~(@>%>5hK&Q@G6s-TG;`5mxBW;2mT1>5~8
zi8lxwo;?-8P75H1Hn?^zC~hltM@*Z@m(5WX=+b?s4SK)lS>O%t@DRQ-xg$$oF@@o*
zFQ9UCWGoI;t#>t^T;YYh%9UH|TC+bV)D|lSh}8D!yxJFAf7Mwm-TaaaiW1%M4*Zr*
zJJRxLNmiKCY(F9t<(RaH2=^Oe8IWCyZ&%^AHy*g~_L(FUH^*RvVxUG$+d{^r^Scqd
zQ34{7d>#96_J%c$#rtvxv!e|f2Ugk5As5m025M9vJkp(m(6N;mit-K}MEG`tTt`1e
z2`7TQaAHe+_?zjPu;1#yoRU+!X;XvK4Sj{}i__1&plxn}g_|D&MvB6bskIfesn;cH
z+MF0FysY6s;tFp=1Fv(f$tK4XrC`G(HAM{~@}8oKp#SH+j-ax^mO`$Vle;vj+i@Tu
z)mz=Vdy>#sqxl+M8LUPbdM1dUaY!402#VYKEDPQ0df#j~lyu<EK9AgN>F57$C_`4+
z+L0DzN6W^U81+a8wU22v`4)38utm0DWN*cT*pCLLr>{ij%-r8@S3gNj4x3z=Hs1PE
zgUk1Lvoz4gJM-Jm4fnX~Dg$I-W>#mYUpZH<9ye{lfw~;)Sm*ddfsm0~8sg!65P2F=
zL^aYI;d(Y<?y+^lUZC_vwAB|YF-21xFN?5tpA0|#rwWRJu7XF@)xa)uBx%RZ(#LF9
z1(OXGo<{O~#Z7AgH7(FING?8etN>Z2O{<h!TAO;C&ez>i>MF(uPKfecc;lqf+M><y
z$JukvntHnFIhm^d090BMft3-36bEtTg?*f>jobKhps2tQUy9qhOI6sAohPKJ1N8du
zra4UwAQGRCsC(_Rcogqtzk}~pDw*JJMf+#(P+B#UTtZ9s*8gltsaUEMwVr*jdZWmF
zeYFNTP`T~;?ovU3uw_s~8odXi$EGbRfjhO*;TB)}efzn#1lMw<JOl^cwoyj;rH?Y?
z@_mKMX>EDU%~*IU+`7lM?1om+3l%5Jv;7KbnuIFe0`P(D3xh;5C(}B{4u65S>4f|_
zeIm*J43fjxWE^jtNY+|OAoEV@VE>a7>Fo0WvTxyCP*P0|;pOMIdN4&WR@hT|_Dz-g
z)(@v&#c!dwrGQ~kZ#{m!_ou0^6lD{MIY^~a*Qx_0e_{CFCEx!WRL1{D`Cq4g|DU0y
zn>KVMgHVs#IUt*Fo|aY&MoJ#pFjL8ZC963wA+MCUT8Dt@vmF^RGMUIN(MV^gXe46C
zI&l8mc5ctb0@5R5vFo6M{2n+_`R%3`%CBSu{m!TBCqA;9qAsHcR=2x?Dj;=^mT(Tj
zIRJKSTK#|otd`CrU|>%KwfzUKp-8%ZaA&ui_0VkEWzp^n+_msME7$u&n8GUJ$dcoQ
zJ|NM#%|<S<n$UTAB8v9{;P}r5S2@KC%UXt`!6xgW-1iu!k)FqG6rpaH+m6TD$%o#j
znr3kmuBSL|sfrq%H_G)TD^E%NdSup}C(W3|D{teQ?QqrV!WSU9)>3~$xX>@?D}Cq^
z;y~L^qT>Ii7fs4kF+A(Z+%&0DB~L@BPaiEF4YR};s-P(Z2~u1ahWh#6Pk_3!8^5GE
z56%K!L`NgA)IymDx!EW-?7An~MAy?oLynhdh<?L;6V<YgSC>rEJb*wOj}7u6x{a{j
zwYi0*MN^lIuFP=c>tkknK<;-tSwK=@r+%+t?>un&*gh{6L4O_X)y`fRFaPcA-#-P_
zzhz6Z1=YvSjF%7Je?&fV%pg8+Xp;bXk*?y{{$Ira7~X?2InpLsdzRzvGC;~?mlfT%
z{8@sbZd>H<E>$PH@H>0IGPH-X=_JUHn9YY8s=h8VB{pzdZpZI^79Hc^iDFd_=yt8!
z#XO$M`mE%$nf*|Si~sN_F;xkPWVjtc1{FvFj}fZJFX>fCvX%NW_EM{40mfsTOi=ZF
zd)ce{oM-+?a!naSBH8~L!QYt1*r2or6W{ZLfJZ3(<B51e>Too2nqq%ZvwyiWhyw@%
zj*c^>T<F;=@;fa-ez1cijsRgJJ#tE@FgSb+aG_Q>A9z7%5P?%?m7akfHy1&Vmpjs+
zZ6uBHR?Lc%B95yU`7f6T?{XDjSjP3GyA}wlsEfz_g7%qn%SS$ebH@|%gmwk2O6x6t
zjuz`=Jf2i-4RWg1Ff#ySc)M5tLVYY;ELBly`Q>&>apT+b9XR!i_H;)Ye3cbw_r$8z
z`EqweWp+Otb(1+R2FXk?ky;{i+*f}Y5*Bhi%FAf~1MhDgA&4y5^?y)ak~EV3gmAUS
zz$LoiA0lYeAiZf$pj>T#7qlqaoPH_xBP-44uhOvoPh=k;RoLzd=RH`PT|y)F&ywIy
z*szG|*7Tgi-+hNuINFA){6zz0=x3wXCw-2|L&e5RNREc>hD0X244pcnjEpvlM7w&C
z=xCiml32e&DK&X~K4G~cDwuiosYdOu#~gSMI1tGj^*q@~aFqSOy?vikIrc!B{83TI
zkVWJ#!uh|G{?oyCRS-xNhX!TZXdw2BXqEOl?8>s0zWJl>9<QM>MAFTBHD(*(U7&oz
zzmkx;n<B23&1(_APY_c%npF1%<B=T49A?VWpGy4V@4rLz{e@62`>V&xg#lhXLbb34
zg&`mO&47_t9_wcLT-dwPsLJ^5L=?~&mC&XJY`rqI^u4jSYw@pkRr`xRwQYaD6E+2x
ze;%<vbzTxK>z_vs2}Mec#QP{fv(-*^zA9=knYpRo_zBKI=mu>A_QJAzdfTOy`ZWxb
zpK1O}Q`(hVaVSH64F8vr3ghhXNiSM&*+Gxb;ffPuYY{4X=Oe>Z^dmY!f538bA|O?{
zM%RC-Jh+cp!u_2Y@wD9|CUCP{14T#;2~eVY=vDAWK1XD9o?d>1Bx}I`NebuZm(whY
zAO501zcGkt)o5zCQgbu99zo#9LY}jQrGPENkx9lw`&KQw*H2>}^P@ZQ)E+mg30@pf
zSAJpF%<lTY*+H`_4d-Z<vyk!6%c&PxZ}VO0*o|?qcDLH6zH*n1W;p}d<TSTL>JjM!
zq^8YP<bC9OOY+eb(A9#<!tg$TBi~A<vGikQ6wR-C3Yc~!@`|y&(?6tN+_UlT2$OuI
z3>lVqISr}cFg2TzUbZXJr6yWW1)|x^iRTGVv948A^5N@<3XAU7IMSXX50%1F)K0`6
zYv7O=1e=B2KUcsay!*Mdp6}q(Zit-{<rV|5sgDY@z`SJqYZq`sY30V<L3v_Njn%Bp
zL}nf6TShnRhKTg60>~p(Jw$I*dgT&CAx(i*F@*w9Ids)nYM>&_Hqk+{`=}N&0!I&K
ziTHTGgdwHNmLwlVt`FsZsDYmd1y-O?64Ryb^X~TK@gDQ>gyJfFxY1mt@0ZdIXb%_d
zBQ22FhfPQcmrrX8Fgy#XYz3V;Bh13po<}Rb9D*cs?TCsMTfdq=S~-61FBnWzEVEIo
zpHD_kRj&HQ0(DTis2mEc`4WDpYn^{`ANC@;-CF9QD8#rA+nuhs)6(N%o)b8J31p1p
z<z8=4sEZBfN5)qOrcjSDKo9x%rT;UP`~{FDfJ4U<NR``{kc{UF5Ro8*yha9vf0k4I
zs=#2>Pg9N$9Hlga1DdFitl#z9cON!DUd@}vYc8^ez%M0&#Qf8lvQlqaUxQ!cQdE0g
zcYGci6M`Dkdh)uaPMdw^ib7Uf4rX`<;BV?!gdxBFQlyZR1fp&TFIsp%=LbYC{CRES
zjQ$8XAMK#1=zgYo6%^Xoo)J1rzW-n+YiO1<7xQV1P6BcUs`;I6<CnAewIH#M3-N(o
zW<>13<}H+^#HxyZzyiD#kM4-Vte@DST;|IeoJHFcrJ#Me9FMF+^DOXnb#;A0{}@Uw
zRKL&tYIReVe1sg_IRWQv%OIZG_iH2q7vk|5RMSa{MN$E>2Z7V(+03+n!8Iz${a`;W
z)SSbm>YlfLYZG{uz+372Vi0HIEp62PjHsspl%p}rRL9xZlWTULO3j4)*0E^frtovv
zW59_z41)ITg6jlpG+`-z=kYOCwvQ`-N#!i|(SWA?u*Nmai*pP15*FW`uB8<3vVAvE
zH-a{>M^ElK9h7puEK010>vO%PbE})YSS4gd4x<))m7l8>kUQ5trqCT0-d3V*OTst#
zT{PUr(U2O}oHRX>*R0?+>GQP3trQd#O07WLtx9$Mt>QFiX^`R4KwHcl72=IBi!v=<
z%%HB@4n-FABdfw9#C|)(ve0=LUt^PThMGQe-+LrR<3|8GhMN^Wu&y;3ORgHmMx(x$
z-UJ!Z5)~$-nN*SdssIc0mY}9IaD4^mUdLCkermMKV7WFcDnt8dk*VJvprl5;gGV$3
z=+cOf`xZ@TxWB3_lwx`H7Vp3V^KFqJC3lQ%RKlcFz6lijE#DbGD9ir?k}=6up5l^a
zh(jBTr@RdmXsZ;T&FY=<sF2(3ga=uJf{`q!S2n?p_ljQ4lF5T9&==Fp;1M`a!ZpoS
zSSA5<uk7J{_P(XzEbF%TMW`^Dq2y3ucQjdss&AhGs(U>-)qKrCprD-i1uq)&Tl7}(
zbJvt+>f<Jo!T2VpLC;GC(~NJDyJ1C09@1j(xRE?JRs9I|9jF%+j<8lDtqf0r<)0KS
z^VWw>Hu45eUMO(QI70J>FGXHcc!+|wIG)iM^@;?5&HRa8qY<y%@S=T?OaYY8=-$?!
z2;NDYaCsWM6P9wxjK%l!t4hl!$r5Z`r*#cb*H{A<YCD#}YORbeAdGF~!@El2?>V54
z`C&UCC5?l7nX$Qk?AYP#t@I(UIW2P!${`64hl@m-I!d8IBNy~nc#wK#2!*Yb+4#pF
z&`F#F(VFU;y2|?`2~V@(R(R}(mgykQ5Z72F^ZVEdD9SfokseYU(#Is>$Do&yK9?OP
zRUd)uNL4|d15rgzXkKb&Q5WltkZE?D`XuoW_ec7B<d5(a!RcArY?X0#`l9%L7lCHb
z$`+tv4M5hj61~cNAz1NDx^w0SBWMT4Ggq7+3qVfv=VV`>P*#B05N|1?U<xAvNf~|W
zZ>UE0B`O}6VgH^fjD?rwZq;gVEAS?skp%2&q%*hP|0&!{hvm7by@mpp{Wrid;zh0H
zXwy%dmY01$0k1&@AWz8t6V2D&Cw>WVm&|R7BWhTaN?NAoT3Atyu*b@4ik*psT_?ZQ
z#-W6WBponq1dv}34=H1->o%sNSNP9W#vA2c9Z6EU`Z8pVLXhA!>+a=yd-O`jrN>Df
z>mRuIFME?F7~AjN%ew}pC=t0@If+V7L^?`+wZF>$^o>^NSpw&5b}s%Wc-WI?c!yts
zusb9b3$51_W>zZJi3mWcWK)pm&S-qv<|}2omCoEY8HF*V25nn!jRf0~up1+@0>!Vp
z9)5j?!)FOl2zr_GC)0-ciV%bgyXI=)UE(ozMC?H$IxS(;>19Y>M`!;Wcu9%(T%I_u
zV7l2NLxSPiej}u>i|Ok**JA!K410x1D5z%GsVXFB<RaG6yHk;lo8#{m)(n{F`Z>(6
zpnF5t+j!dJqaNt&6`*wd^&sjDlNs#K4YT}=I&C9|eyD!Ui_d8`-|hRJ9p8Ug!QcU-
z90_0=t+nWaXUw!G)+=S?I3_!2RIJG^sAEPRB}BWQ5%+D4m8s;ltZ2kOKozrMQiNsC
z7l`^vc3PjtXy7066HtOIuaIv{m;fteeFi&~wRc<%Ma{X7Wup3TvHPqA2zIuenUq0|
zAIjj+Bdw{$JsqdC4EFQ7-5-~VcrK?6=IZau!xM6;D~TcO<pWmoq{Y<zX%w5kGja+i
z6@_={1~1X5uRtVmvv2sd*c?g8W$cTZOekS&NKwRTTJcwQ<z>qf*;oDO!!cJ_fUst%
z!zzT)qt_(3S)V7275w4%@;uU!uE3k;D=N#|c-Tq?SZOWD&%w7;ibV5xa(VChJMYEc
zVZ4>6a~)p&x<SWZ_Ni8Q3Wn_+F@&Sqm>9rxDB!Phc8!|GZE;7edDX`Cj_URXN-9^$
zT-0K-KQ(y$Zcz&}<p}C~^wZ47-#Pnc?9LxRbwm-sVG9!n)%`N%9Sl#TyJzf7e`aMs
zM)F+9YnOpp|3^Di@M&e#T?sZBICK%0{!VGV_FTq@@Xf9o=Br6Vr`vQc;GQ7Af}-LZ
zFxZ{*!a`4Ybd)31__d?GCQZ<V-u6p$5~pQspxCQ{q*QVo=b;**0e+v!$ys08lH?27
z*YOoX*k&8^Nz#0{KU)7JfkYf5D+5HbcqtpzxRpj^2i}H;BiTO$08$ye%p^Z_SeLQ0
z&_?Ypo!aG|Y?etTP}mrunlE1u)o!d!?waBFcB(T^H*Wdo{5dl03s6}J+D~6<^_zBL
zmP-rtP1ckbT8Tn0zRK|=1_h;VmMwk4%bql*mm6Ktp9)nT`w9mZKS45o>dQ|{+g71s
zov!j>$|L58)CLXWLqVrT>U=><lob1A;E})$_tu7(>Wta7wS$LuC`PW)lLA%9;V*B&
z#kK8?sGKGF5uBwBlY|8emfoZ$1Ng=gyq9Uh<BC#!S|s(E=qgCTk(=misSMP~%JM%o
zZF&dK9z?DCHVNdr3=V7*T%SBY=eM>t=1FZt3UP*l);Uvx+H00etcAuBb6D2O(0cAm
zNv~PGR~v%AET6gI?%@#>G*@%FkoaU2a>Axo#`!NDIo?=Ew64MSEK9mCkidLpBP_c{
z*a~K;!!W&XEfjC)K4osm`Y0l{a2BdBol2cvfHdg2F5Ll1qm(c;wm;a&l<{U~s_8bT
zO)c8}EeyR3ORJ%U%7gQCpcG7ll|Mtu$aX$Q;?ez?+X%}$4{VFcjq~O!o{Mgf2I8cj
z@Ya)nICGF|7Plv^7YVkj&{8h&T3SYAk!L3ua%->=dLDfD$T1N+8$|Z)mPZ@_l9-27
zlBuAC-;=2(%Hsir97jRogazjNRl|#^)L@Lv{rn(Zm%R1zEF;!WQs0#skkl(T9GZH3
zO<zeE&0yb7Rb9sN*5z|tG;2>1YciQRN|o`Qz=m>wND?%YB0J2HxED6=GbA3>wh3ZQ
zVA`Lekg)y2oupdR;x&UxsfENwJL>7*vOrN&%@qu?-}8=JqTnu1d9-jwsbaw}0vkYY
zw7jbSj9>0Ci6=47W}uI|oy?f5m%E*v%(-PW+uaA#?47`-=KKAEM(s^kUh(<f^Fqp0
zMaJ)(T@g5e^H3b?sY|CrUb8nF-?x*G&bscq_H()=3VX&&S5Xnw=-?%^LNB5DwRedJ
zJ4%A{>g4Ut6*mdSWI3Ad;5Od`jMrL2jF}4Td&u5Uj-PLZlH=FA!${3PQ<@9JF;$SV
z2QMWH4b-pM8vrz6czt-@`0e{OjTv9tbSM)ys<9W#gG1VOR*QC*hx4!xr1`iD#`b?J
z8>Ke-zZZ{LFV;{Qyw67_-x9^aAY8Y-Wv$FGdHL*KRozTf76L|BwCCGfA6F|+xxROC
z%YT1!U?m<T1;!o;+y1Is!dyYemlM50t{MH@viI&)8QGu8e9y_!3y~W<KMs5c53bNi
z-!7&Q6g`i#)URwk=+-m~rWw!)dh@9#oX<vd;pg;}laXRto_C`*&BHf9Z@il1H&Y|3
zithftmxIff7wpR45_BH-f0wtC8qQe4Uaymvl}uUc;?38^>hk7i2Kvv>EcZn#)k%-0
zEn%0JyQDsa(}KhkXJT-BY4<tbYs*Uy`!=fsJ2l{R&5TTzelnGEHK1Ed8_Pk>HvVBj
zD`PI@k8g<v<c7x*cqPR5@GgM-jWvuqz8A+*HJG&__rY0`-#KL99k*}0tL_CGYB^Yt
zFK^$sMX7px>SIJ$igxmCnMWChJ?vKya+L3zS7D-6cTfu`a>0B?HfV$aN)qNf@_j|V
z<kOZlQc>bi+^*eokGqr1>LJ0tfL$|~=l@kg+p9@AYDYc-fRa&wAD(V&MCq8>`WoV#
zhF`WeY1F>Adlc&jMG!olM;AA?<u7whPdK4G1!h+-pUqm}O$wpDQ66l_<lz=~ry#Z-
zL&GDfKl!`9yBC!guYV+Q`GnAym>&c>yyqdCINz{+hnomEoeiGh=_)q0Y3e$leJPZ<
zoZP0S?xyUxGc~xrBN+uA7$qMjwOv{x{&iJ4DUO*oP3W)72CnhQ*(XmdonsYC%GLe~
zbm;(5?GXl!V)8p*rqBKr3^SpSV}HexOSv1ndimsr!7t~t75t>e;;GuCl+bKYpp5bq
zz+7%uuJ;8f5b~u)jx9^)vmS`jf_HqWi{`5NXr3le4jQr;iDD}YX7ZY>2SabP>?NIE
z1l=&8m?=SG+VNMDgw8U~71qME1EmDM4G~qh>@6~$%)UTQW2|jG*aD?Kelvk~Hu5F6
zET@DI^`FgSty2gT4yS$V{u*U5sb1B|?MZK+ywa7|VHfR2d_<?`l!fyRv}<2A%|hl#
zd>bSEetmuTQJx}2zro;GMc#(uHoOJU`ogist)uq2Nc=<Zo_8F~4V0lrDzX=7XA19M
zgM6|$Wnr1!4}^`aez^4)WS6iD$-M%L%UZhYt;S4+soU4>RRSU>-;10-T2=<8irOY;
z4G}+qeF?)@wU7pBff^$usAb0uMNDg|gCrdqxFA3cC_jxzg<aj^h3Fh&`zgOo85z;^
zhtrBL*m1QBt*)JK!Tc7FKy<-gpQs-chPm2N0$%)8ao{t%oPH@wHfN+!z`N6>=u+F_
zfomsvr=Mb3SxS6iK%f{#&@sxJF)bftFhAl{*Cgc5jB!a|X`V<2Uk}rase;)TsY3?0
zCGlo9QiQt{%!i5$x;;T=pqzeT&-Pz=D{j!E)X&79y3KDd^~Z|>R<a$#vL*moi*tYm
zh3XoB>sV_8B$62Qspv^mCf;ejYA6F1IRjO~fg!;=4<*=q79r06nfogL<aR#30%OQz
zRQmpIbnc?*ddi9!`PWk?+J4|c|IFZb-$$?9udOQR@XA~~VzfNu&g+N1x=9*W=6yRi
z{d=Y<X^uHe0Bt0EL6lP*Zp82_Z}t)G=4LAc^)wiw05@hlBWNkR-&&n|J!UA*cF><g
zUZOH!_O5>Tt>2E|CsN-DzjB5ndRO1l574r^mw0NZr!=wSY5VoH9Ipw#&-_P~@r(&?
zpG$jpQV%Q?-<{9482@FauzY{QuTkNz>iqZ|M$wu3@u9n_pSt5=rD{1pq7C`;$_MS9
zsGyiZLrw>321+ba!No3%2`eRi;W~OF<Ja*HqlO7w_Ebj}06Pip(Af_j%@baNp{v7}
z<d?bz+NqJYB;cMuXZu349OSg(vy3D-i`bcJELVB3*tp35F@Yx9C&(=&8R-iRtIzEi
zK;Nol1)tj$FuKUu0lINu(oj?YIZX91ytmQ2ovSzJE%Fkv^Um4uGZJHIRQJ8zX#8ez
zBBg<MuCB%o^b>B^kn6}@W_cKzQ}<ojqf&An?iaD=TAAaF+9>Yh{uI~KeNl8R7$wfx
z8fq9eXBkvP<VIuI_u=00b*(5KFzmS1)u7}u+%IT<yX0D~P>;WaoPY-t)4YC(idanZ
zoL?nl5zz;l{<VJvle?<d-+*8hN|UankQ25p7a2-4h}eD>6wVhK_vXSYE#27=3zOH}
zl@kfZPkh1)1D$>zJBy~tK|hN_i))rpj|`hsq=y7IZ~5?qwYRIQt9O~ueOK4{{=U!o
zx*2DcmX^UE>~iKv#!{DUJgQD@L*ekg+A}VD*~0$!ZEBBfqIeaF!Fy;NI{roAIYk{b
zF}To*ppPMD_)7qbgo<b&CkbvG3_naz!Dzf-(@3qf>p&Rep|6YW;}+2TF^<vb@N9h8
zz>n~4yJ;kJD@=#Z=s4u1an>U+TpL~!plh7!eKqav`QxxcB63}xll=Uo{;OR21Q!4a
z`s=`3Yci?GB8|VD<EZ2Km@4YO_{H@VQmoOF%Ch}OV}Pzr5*PZO8ts<sD|i?(oL*sU
z-pK1baN)+r!z{yL8*;yM|8Aq%1Bw?v3;);m|8}_0Yuw6Rsw_!E0$Kvg8PzOnp4ZzX
zatp9)bF_~{A<jM!H1<)NqPx)dT(`dJ@qGBi-o52eBy}_q9A<O9?qiUH(@M^wX5Pa0
zUJ=)Wt6NZ1UTB)=fa!TXk%NWe5BtvYLs`1KiC(h7jbmg`whO0V3i>?5ALTAI;G+kt
zvHo!mf*)!-DA?x|$w&VDiFrJa*kN0pKd@Wyk}0X*9;!Uui$9ZKWaXR0Akzt&5(}$Z
zvu&U8-3-)=qh3ntg1OseUM6L$jbnz;2FBtacI!d=cWYO93xxed?TN!bApnzXj#>QJ
zoZi&vx6Ah5NOTZVnNqHQu5M|eatr4>p0+q$c*5%O!Snv-u}9GOlE@3}P-&m!#~1C*
zx1<+DKfBiXoEL%K4ypPMQfUQ&ZcM84P?`6MbGUW8XhS+EdH14y<K=UY+CItw4mSci
zd2vFT>$A6lro%tc0#etBH#TKu58UR9b9Qf5x{l&``Vy=h*gg7=Y899^3R7(2mveLQ
zQ=^;z1I_&f(OJ<gqO~ax;Sz|QD!AS?9f3qIUl5KHxKt(eAG_6geDBk~^CLd1eitLk
zB1)?mFxz>*nDb-0!p4W~d8<vFQ0?Qv(I-f;>A3|ksu_q|yOC%^S7EM<O6DT%$}F|C
ze2UB<0h-Tnp;JO1c=ucgu$6?;cY^?`<U0sGQ|G<NrOA3~sQhV2<arg;&_v0|cElPf
z1j|e(VM`80G+0!vdiN-91POw^e(qhpo<O7e^*+uQNj>nlSs@1|^}_P&*+Q%_3PFD&
z?8=tBgDUFm3P8}CP}jsm+#f;=P#r1H=liujz?)Q8?f@6|-uaJayBE=IC^cwXy4oBK
zRDpkVJL1iOI6$dnGm9VSdHMRyW5O5{mYZp#Y~*?au55Xa3R<2`z_#xVj(XVN?H~qc
zB!C{PSbalFsHZn_k`msxk<=EnRC2X6fQH8GI8TwS!+y;bej6XT$4|~Go`B4YY~aed
z28h(C_%$}IRqDr(`(?Awu&l(TMdm+R3&v6%wJLKJHx;g3U461KD=JbkAj(FD5lsY4
zm_#A!YUGy-2C=`KZ*w>@*%;P63s<y!HuUiFLeXU4_OiH{0D66Jv`XxveJ2Vi%-flB
zuz9PBD(f+1*cj@$GC>M81}FNO)YuB1=xz+a8gV78Mzo3<zOz9Gjq2pEL+Zoye~;cT
z3`L}e!19wz9_fp>OYqGjL3P`Fh8rEZ^qSx~(*N9`DPn;AI@WPEZJ{K|t~la>K3&Bb
zaOf|Q-`<J0cQ(ls++GP|9e&rWUhIYnMJBn?z(_&dH}oaxjSiGccocRreemn=YOFVw
zG_*|Pv>6EIzP^SgpXfYjpwl-5?9IeQ5E0UzIiJu6Xu|svo)oH;;c}&(!tO-83`m1#
z2B<P>rHkb$GvvMAlR}gD(Y#@8M@;VzJ3{rsyedi-qRw-Hjxp9lSzoR96qH_*3@qUI
ePZqQg$WYz}hO(X)?}4|pi8R%9)k;+E0{;SQugs1B

diff --git a/two_way.qmd b/two_way.qmd
index 35c66c81..e36bdabd 100644
--- a/two_way.qmd
+++ b/two_way.qmd
@@ -53,15 +53,15 @@ dotchart( as.matrix(df)- median(df$Income), pch=16,cex=0.6)
 abline(v = 0, col="red")
 ```
 
-We have separated the income values into two parts: an **overall** value and the difference between each value and the overall--the **residuals**. This can be written in the following algebraic form:
+We have separated the income values into two parts: an **overall** value and the difference between each value and the overall--i.e. the **residuals**. This can be written in the following algebraic form:
 
 $$
 Income_{Occupation} = Income_{median} + Income_{residual}
 $$
 
-For example, 'Healthcare Support' average income of  $`r sprintf("%i",df$Income[12])` can be separated into the the median, $`r sprintf("%i",median(df$Income))`, and the residual, $`r sprintf("%i",df$Income[12]-median(df$Income))`. 
+For example, 'Healthcare Support' average income of  $`r sprintf("%i",df$Income[12])` can be separated into the median, $`r sprintf("%i",median(df$Income))`, and its residual, $`r sprintf("%i",df$Income[12]-median(df$Income))`. 
 
-So in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values *relative* to the overall median.
+So, in addition to gleaning a median income value from this batch of values, we have also devised a way to facilitate the comparison of the income values to one another. Alternatively, we could have assigned colors to each cell of the table reflecting their values *relative* to the overall median.
 
 ```{r small.mar=TRUE, fig.width=4,fig.height=5, echo=FALSE}
 library(RColorBrewer)
@@ -233,7 +233,7 @@ The final version of the table (along with the column and row values) is shown b
 
 ![](img/twoway_09.jpg)
 
-A progression of each iteration is shown side-by-side in the next figure. Note how, at the end of the iterations, the *common factor* ends up contributing the largest effect. Also note the one abnormally high residual in the southern region associated with 8^th^ grade education.
+A progression of each iteration is shown side-by-side in the next figure. The left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.
 
 ```{r echo = FALSE, fig.width = 11, fig.height=2.5}
 library(tukeyedar)
@@ -259,7 +259,11 @@ OP <- par(mfrow = c(1,4))
 par(OP)
 ```
 
-The left-most table is the original data showing death rates. The second table shows the outcome of the first round of polishing (including the initial overall median value of 20.2). The third and forth table show the second and third iterations of the smoothing operations. Additional iterations are not deemed necessary given that little more can be extracted from the residuals.
+A few takeway observations from the analysis follow:
+
+ * The *common factor* ends up contributing the largest effect. 
+ * Between `Region` and `Education` effects, the latter explains more of the variability in deaths with a range of 7.43 - (-3.7) = 11.13 deaths per 1000 births. The `Region` effect explains about 2.3 - (-1.46) = 3.76 deaths per 1000 births of the variability in the data.
+ * One abnormally high residual--10.97 deaths above the overall median deaths--is associated with the southern region and an 8^th^ grade education.
 
 ### Interpreting the median polish
 
@@ -356,7 +360,7 @@ df.pol <- eda_pol(dfl, row = Region, col = Education , val = Deaths,
                    res.size = 0.8, row.size = 0.8, col.size = 0.8)
 ```
 
-Here, the `eda_pol` function required five iterations which explains the slight difference in values from those generated with the medpolish function. You can control the maximum number of iterations in `eda_pol` with the `maxiter` argument.
+Here, the `eda_pol` function required five iterations which explains the slight difference in values from those generated with the `medpolish` function. You can control the maximum number of iterations in `eda_pol` with the `maxiter` argument.
 
 By default, the column and row values are listed in the same order as they are presented in the input data frame (either defined alphabetically or defined by their levels). You can have the function sort the values by their effect size using the `sort` argument.
 
@@ -383,7 +387,7 @@ The `eda_pol` will also output a diagnostic plot.
 plot(df.pol, type = "diagnostic")
 ```
 
-In addition to generating the plot, the function will also return the slope of the fitted line.
+In addition to generating the plot, the function will also return the slope of the fitted line in the console.
 
 For a comprehensive review of the median polish and the `eda_pol` function, see the `eda_pol` [vignette](https://mgimond.github.io/tukeyedar/articles/polish.html).
 
diff --git a/two_way_cache/html/__packages b/two_way_cache/html/__packages
index 5b3351c0..e90ec1ea 100644
--- a/two_way_cache/html/__packages
+++ b/two_way_cache/html/__packages
@@ -3,5 +3,4 @@ RColorBrewer
 ggplot2
 tidyr
 dplyr
-kableExtra
 tukeyedar
diff --git a/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.RData b/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.RData
deleted file mode 100644
index de005e13bfe88cae4325dd6b5cc51c229f22cb07..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 153
zcmV;K0A~LmiwFP!000001`BeDFy@NjVqjokW?*4vVqj(kG8tGyL)>&N7#LWXfE-2!
z76wirZKYRIo*!SHSQ($3n4FQSpHY&Vqo16UpPU_^Xkn0)mSSmPm}YKiW?*iVnqq2@
zVw7T*W|3l=Vq~5Q)GdHyQlOQUl|r>%a%xVFLPlb7hOIi;Cac$SaRE&O8u||a@E7S0
H%K!iX0x~>h

diff --git a/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdb b/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdb
deleted file mode 100644
index e69de29b..00000000
diff --git a/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdx b/two_way_cache/html/clock_a80bfd981f796072ed50d2d6f8d5d27e.rdx
deleted file mode 100644
index 77f93c8d026153b87ec2888f7be6dbe60a7058b9..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 125
zcmb2|=3oE=w(bW>2?+^l35jV*32CfGk`d0%cS>|6BxbZ66cUi)h?vp9qRh<AtnLvQ
zmz0-fI6;wNV#<&9RTDniuaaRFk1&>4e8Sk7_lb_T&M6<CQ;bqvf)BL3e7$wO&U(9b
bs62lzCbCpaeEG5l9#)3c;vHXh0&N8VTmLA1

diff --git a/two_way_cache/html/unnamed-chunk-13_32619a5000872bc3f93103779d81e8c4.RData b/two_way_cache/html/unnamed-chunk-13_32619a5000872bc3f93103779d81e8c4.RData
index 165cdbb3d481e9e437d2bcf5b56aa96eaaabc5cb..b8f819c8ca2cee4233fa05e5199e77b6fd31ffdd 100644
GIT binary patch
literal 441
zcmV;q0Y?5GiwFP!000002CY)dZrd;rWNqhAp7IHcT+$xM@L^dGpr^#WH7T4F$<1aZ
z3Nk87MMT920{?o^C1t~I&k-OFxg5^yF1fgQ()5WELdIk=9+B}GPRZGihp#LlWHQ3V
z2Qnca5$D`(+vV20E_0Jt_NsE5`l@dlv#|xstG@Zgq+V(@lc|Y>5J{|l=DJL^6grO6
zB9S)9rzmuO6dk>0Sq5)Bw{;Db>8dZ6?_qMeqja@ez42!V(kyQayQ4+PQO563dh}&&
z?|%0VP8Y0m1<rN@_nR%&rh)Hmz3wVl*siZ#2cK??Go5uATomQSXG-s0?6axs43yw;
z98tPxw=geDo4YQffZy#L0$c}x`vD$-GRdcL1faM^V1nyN01QCsbzAqF=3gnWMdF9l
zwNmZ_Qu#q+BsxT9fb7_dqaH*&RepkYQYudpT!byA`Ah{fEN@-(rat%tqZ6P1ZM+G^
z!VV=2k^u$_+}H=uf%@9_Og1plTIp~S1}4TMWMX%u;HmJ5Px%a!V@J&?PekYtz5)6e
j@>f2<u*9KtDj77@Dbrsk-n{?u5&roLj>yxX{sI61uuRc3

literal 429
zcmV;e0aE@SiwFP!000002CY&(Z`&{wWNl~YoB9(TvZNizkfNzCpi|;*X$!YSve~Re
zK}Kb%h^QJx;J;pkq+~el+(D;zkEgpwk?Y$B2@gOBnUlqQM&=i;Bp2VlexNBKi<u*@
z$b!6f?-jF$ZgbGTH-#>0b6wkgb3L@J-kXvZ_0ayHLT+Rfi%cudd74Du3t44SaG4}o
znF^B@OK0@vY&tV}p5qfMOw(Yk`}+OW{|LD{0&KV2C-#WJnigGYj!;(2+4vQJb1v-$
z`*X1PlF;6kt~!p|J5%m-i=Vq@*Vni<{m|GR-`;Agdt-CFEUU|R0H1!DN8L0zMx4a}
z>+XQ7sxpP`b3nw8EA)8d5x)eyN1%c!ju<heka8v!VnBeKt{L|2Ulxd_Og&__6JlzJ
z$b)npb?U_E)d^EcXvK_2zHt6oC|raHOH{I@i+97Cepe2<Ipu_)bIw00J_6i+-0(8^
zOn&@D(8yy2e#euJjyj)un#1c{JK^AdiI~2_B}<~vpZrGd{W;u+v4!VUv2@Id#+^nd
X?sWd>+$sCVUARBbnfX&*>H+`&AtBj;

diff --git a/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.RData b/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.RData
deleted file mode 100644
index 78aa8874f45e4b5a96500872b46adf1f006cf0c4..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 163
zcmV;U09^kciwFP!000001`BeDFy@NjVqjokW?*4vVqj(kG8tGyL)>&N7#LWXfE-2!
z76wir?V?vwo*!SHSQ($3n4FQSpHY&VqhFermzbNHqMMvinwPC>7;k27Y;J07YGz=R
zY;2H}Y?y48YHE;}Y-pKgnqrh>kPI|O0Ljc~D=RC7YQ5ytoE(LW#NrHFbt>4QUdzP=
RG#6<6KLA~GlbGKC008#ALmdDB

diff --git a/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdb b/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdb
deleted file mode 100644
index 9fd2f85dea6f0bf038332de1bf1ddac0a8fbf453..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1370
zcmV-g1*Q4`00@0}oZVGhZ__XoPMTh}icJiVc;Vu0n)<R-ATg=RxM)J#BOr|--YPeC
zT5E2c9XqszKg~O$!Aa9Lb<@H#mJ%oDeBXDD&vD|fP0O+ztLjuNr=}mR+Rf)Hw_|CG
ze)+BEik@w&YVD@;Sl@o>YpSn$(eXpyDu%JaSr0Hwa@XA4yv03EFUJb7A>a5$p(i9w
zL790rrb}%nF~n*l;uDzZ)RI-=s`g#XsN$0X#5N%NBMf2N7h%AeujJ+|7L3Yk*T^Sb
zLYqrf0<Lo$MLe&DofyHLtD6r7VJC<~UojERDAk;{Xn+~u9+qu?fC2l8LWzGr!u~Dp
z(=Qa{LN!yI78Iw(m8<L~C5p8W52>6vn#q!2CmYC%TBKznL5bv^UIf7kw*%1HhV(W`
zN5o}ScTV1(EX|LS?av3LtIRg6(XV<SV2IO*_Y2nQKn=Nxq|(Qcv8h)OO_c^{W2L~*
zJ4s97-o+S{a0!zs&W%9$R7w{1-yA83>Ct+1mgUTH?@Be{8gIr8V$QoGM$}+Sb~}-f
zEZ>GJYvnXhTSD)E7<FYt{oJ>|)L*YaPjAgWh&Uuhl*Td1hC!%d&iZCXwr`?*!G&4V
z#_?G;4D2pV|43b5%2mAmxF>*6@X*U>jHKX<pwWOSiVoQ@5}<IX&YP$>0ud@Vz(d9-
z9%@~S7<`J}3qsK+5Uo?x`WVp=UE@%;3}%E0(S7pLP#fiQkek-ud-X3!VEw^gpjpn6
zeWxCJ(eBWp;hxpN1x#2hJ#-e0&(~Z3Wd8MJt$z2j*y^XrS{tq|E<2Z<nfsaPp7-+k
z8joPO1)6UNWVmf>L$|iJXxWcbbO8+W|D!EsUuB(8h5bS9DHe7wKOVgNNG;M2lM=#%
zIiYx<mj?x^V#rUNhl{`Y9}eVRO#lE0ka(QkRZVZxFc?mowOuPVp$U$Fw=wmyL?AJ#
z%J|TPwkv1@iCg8yPHXDKp6$>U{xo;Qf|I6e;-rN$mJ%m^pZ9q`ZGY)mmStNzcGI$3
z`qOHC{&eLGEWM(Ce(SlZ=Z3Xob<=sSU%&Kor=NCF@I$|v#$tz(k$_^6i&o3MDI8IJ
zIadN2^qp^5jF`kJC|h2RyEV6+7-TKP=|U`dT1i>4%zYaZtmvWuX&8|G85EK0vnZg%
zS8}r#_ZrRDj^R%lf+Q@e0k=4m3fBl4&kd69wOgjSrwHL!Cd$q{$WyXcNli$i6}S|q
zEiu>A!=ejrPFf)DCUrqXFvM~x=p_Y(65I6#rWK&A!*fwk!@mcmi=cvTAhaRF&NfP$
z#j1wSK6!hxUVfZx|30V<IqO#=hwXrg5Go_^orwymiNw-}-00~NqNh>=E>ubwd?#rt
zoZA=*#T-OrigUPNK9-V1<2Of2#Q3P1opm}h--l8ysK%RigP79cj371H;@vK1lBi`b
zmSUwiP+Lsz3N{-`j{RJ=zvi!IU<Cc?Sg<%khLz4S%7&rPf|QI+j~c#-@)>1jPCLhE
z*)XtOoE}I+U&=DRaX4ZEVc~(7d=4a|1cBLvC=3os$eB<uQs+HT907}z6Tpzrg$MdK
zEEYZn?-|12qhS40(Eq@31a4p?`-Ucm2<bX`si}?hImk)#@4fmLq#)zTU!a-Kl6=P=
zc;OCkXo#0Na0EmomL53c^Yg54y!5Nu1W#7`C@cEApT(j-O)3Ssy0{!%4wm9)rg&9V
zP|-tBOa;zc<IoT{dK>DtwOH%QoPrBMApPG8RJT*x2rKAMtm;9&$MwF1W9;R(Y*GCv
csZlssDHQMcdZPlXSmYPnqx%#74^Hb^=3?fkP5=M^

diff --git a/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdx b/two_way_cache/html/unnamed-chunk-1_6737535602c30bc1c6e50ac19f5d2b0c.rdx
deleted file mode 100644
index 184258b476e73f1486a28f428b51a6cc47dfd986..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 158
zcmV;P0Ac?hiwFP!00000231W<3c@fDeN9rN0YUH_?mdAA5QXj})=@<JA%ULBbq}Z}
zGm+wAc)yu9wFRJIw1O@pMR`2zHd{cgIS^EFmKhUFvrb&S0F$x;230EQTuUL66)%ao
z7#_FNNdC98X92wP6G%z%$#;+pmWz4*a-EB+(fPYOKjT9&tfwn^>YCYU`gZUX0$oz+
M7ctB&F7*Ha0HOXtv;Y7A

diff --git a/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.RData b/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.RData
index d0b5b0f54f27c582a7bfe0d777ea51214f6cfd3f..65ecec06f5982974244703e34a4e4c7529a6bfca 100644
GIT binary patch
literal 346
zcmV-g0j2&QiwFP!000002CY#|PXaL%ECL66@+Z6-5N&C@AM6r62__!!fEu~M(k-rW
z*(J~oF$Djyf5F&=n5~>`()7)AI&bni9!wlO!3d!`YShnAy=h9+e15tk0YZ&418S&&
z&doWbdYezT(Z^IqGEv<`FVk+3WzkZ_L?%V{PK20-f!CWe7P^7z`M&Ef#M~7@k4r}~
z-s7Gzx~NQRU;Ta`c2ue~g(TV}H?99@(%NG@o6UA~4F_u?^H}Zi2(AgF%l1G;I@!P{
z4C6vZ`Yq4k62|J)6ju;0(hionTC_)<(gfowBFPKADm2)DY;<g@{Xq-mYTsvCt)*J&
z4pc2v91_mUdyC@Y4{`|iP8B}<u4BT7TR34J0aug=sPMcB1951;n1wkv3T7)p8VJu;
sIF#8>02~_nCxq`ZtM4(%i=6}*4FjVo=VC@!Zu9ZqKXtoMZ*l?v01^Y6X8-^I

literal 347
zcmV-h0i^yPiwFP!000002CY%cPQpMG9bOA(<tN-75S?Kjw6sKbVB!K7sF59%>0phe
zB`^&!1pnAyFit_!!rGfm=AJVr=bqdd4<-^%FhZz?>a{AWHEfF-&rf&6L#ST0pn~e?
z!rnt_w&`>md`wlKBHfA1GVWwa5-fE{RFoy}M2M;HIlVb!e%I4I*X_CsG4Bem$CXr!
z_qbz?E(_DjSHItf9aTDxAqqCpZSy~dH1`<KX0sh#!@-)UG}L=Mf*S(yvNh0wi8k;F
z!!T2Uc}o+xg0X(J%{7FJxQ$h+7p+k{H^I1wNYc!#G6Q8mHYT*){-A}tTK9?3Yo%AF
z4aEo@`h@fRy+m<wf+XS2xx$6NIwpJ=!Wr`jxS*t<;%M?)L{g8j66Tx=hm{pR^@LMa
tNXpoWLQ>y7AsCf{mF6Ckyp)p=L4D6^^1av<=Er{g_Yap**Fkau004GyrF;MY

diff --git a/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.rdb b/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.rdb
index 8257839bab39ecfe0b706ce1408c01c975407ca1..1c85c378dc2ec4799cd701348d2135058e292dcf 100644
GIT binary patch
literal 2175
zcmV-_2!Qth02x4doYhzjR20`0p8etf*RVv0R86gD(zuo7*93ge7=-pHhR_H!COGWQ
z>eBsVc0e%IBB(tlHcAYq@h`?6@F(?X;Aj<p$SfA6Nk}WL4N(CT6%(UUVl+TSw)1A*
zz|IH>)YzCgXZFs$@4ol$yZ5{Iy|-Du1VN|>wMt2-Jh)H7<N06CnU=uGLO3RXAe4a|
z^@fSFQub+<U2+B*(L*{TOOUeCIcX>2^PG<(mQcYUPV3W@T`*vLZTi*KA>iK&r`|fg
zUPlmWCD*PX)PxV3#7bHy2lo+-2FF6bsXw<e6s@Q1%wt#-lx!%_lZ?q`r3^EsMMYt8
zfSWi<hlRoJ!suyHu|p}xVWIbP)M8GOHXHL^0-qseGr7-x>;jF`tFpy6$-Wj`<$fz$
ze85-y5+7!rNS>bux)3{lD_dtr0t2|f^KUy9h}1p@`qv|0l(QeKMji9uxNUrY=!J&!
z1?(+ezQP&KIdGq5sgpR4IvjNd@-98-9FvJA{ufm8daL0>ylZp7O}_urf{PU{&el#8
z8aH<b87Lz~)082{!O$k_Vp+2~mvm5A7QoAe!1QC8e7Hcp&0;6@OpeLQIH-J~RppY6
z5P(Mr<Z%(h<AVTQQi^rNJ}S%)Iz4+;howB{AI^!No=>TYoeRUC>^!~kS_}-WRkhcp
zZ-lzslKm-*HaZ`A_pi$Nw-cOW6%kj~OgqK)yx*KfWxoWK^^v*1iW|@FkA5q<%$N!%
z<X2B>F7JolIiJ5>Y^-2!hV5CM(CgtGJLSr&la?2=eVr%QXmsK1oudtZS@+{TP9HMc
z)zx$o`ca!3pD4?KVGXmsxEZ?>sw*Nt$tuZpb2{>v<^hJXz!LY3N+anlMi5tyc9_5*
zT!+Fa1>!G2ofW~l8fr@s%uhl%4&nM5Ow2=g_Jc9qe4fELJxaSO7#%P0paa2w4NMH<
z^9si75Yi!T3}Vxvj&ENDlM+#Sya;F5_&kA8eTXcC(Mu4S3a9h!3-3-FrE3^O50Mk<
z;dJj2{k+T@>nLQea`5G=v<LR}cITLjOSimnb2n&uYw`*9`k4ofve$U}G24gvLxw5G
z-w910j)J!99dlMq>ifUxVf#QUPfxSA4=(#WYwjMlt})QRBVvl2f(?t)HdYqJgSM4x
zy*`_uz3+N5`@n_bUCHIq5$t~^*4h1^NMajycD3tNEg}V*ey6S}JwkvjCn`T_b({gM
zZI!jXkiKtv!`KJD;O$Ffzuvyh_}izN*ya~1!{6+A6YO9rV_&|w7wpR1oEOpZ5%|;O
z$iE#aZ3O2!Htk=uqVGG``%=h{W933(B~}UaSPAB_obA8eUNb+9Ti?|anf9nM(7Ns;
zXT_WipjF*)yt$$joC{o;R8%sZZ7Ap>rgXo@R+p`>z1;OaThsju&4R7#*aH(b_>qQY
z_E69Ei6;(fMyxlCeWG27yK()vwCl<Tuf$ZacjA)5Qd{2zwf(ckt~nVG{(OGrj^D=v
zP@Q(>=wqK<2B)8nObRGdg0|2FX{EVJZXKQb^8T;^oNJufeD%gZ!CAegCF7-j_QN-d
zvm5;y*+Um}mLpqUVGrLv)fxWYe75e9@<p1gRJQ*4t&^Y1`1^o;Rm0d<EwS%)a9yyE
z?VX$T<k=T8K>ed}t$TZpfx~N+uf}Z;X6sj^D{MVg;K00<%7)n#s8QKdRX_0oyJ20=
zMPEHwo3gEx+-3pI^NLO_cvcI}PgK0dzL*8t=PlO<g_eRg&Eeq3_cnpEm)nyc&34F6
znJR<Hf=ek9YlM<2QSs(f#ItCKw6uTk+rR^VHkNqOlXN&ti>)Kyx+J}Q^foI)lMaRp
zgi;Jdu$w{<ub^dUiexO5mHF0Y$+=7^PBXAx(Q08a#NfuuUw6P)uV1P?bmu7Oez`dP
zkKQiOy(qW7x3LLy$1mxe`D_IEy4Ps_cmfM<9WbX;zhS_aHOqTf<UnwP&g@D%<KgB7
zan&fQYJ%Ua2~Xrk+>Yi`%v{!TWAm|hQVGccO0onGY_T$*7B5lxG+9t2GImp;jS+#*
z*v#VDo+hoomfybgW-eGV52A6UIQ0J>Lm`=1T)K)fB#6oq%&Xm??j=RIng_Npj#^x5
zTJpe`2y%r8Z$;++h8<6LUz#m4mwOp)w57mI$`lnV2<g?z^BK--OB`4#QT?e*)y*E+
z7;;QYEKwUshIHdq2BTR}Q+djhvXG=rWUiU7j_$Uo%_avU%o>0zUJ$0it|8|1GIF;?
z8;x>101riAkhwn!p__+`7%bW<VxU-fBDp&*R5GW1Yn(<NPKo(`T;;WB&15cRc8quw
zX~x-T14X+nOEI|IL3f+P67QCTawTt?a@cKF{=P2L@sT6e1KI7k3xSgH{I$u}LKAJX
z;!M6HpU+NH1`Y=p0vgvS!tRHlHXGF%gdnAR$h@ot7K%3MMXw0}k#W*I9CfrY`u$}l
zqh$mRV?Lh-AsBYT^>xPFChqxgfa;?82kJ0C9aHEp&?EuNP}d~z3AjBP%V+a{pcx^+
zd^B$V8J17S{bpc3HhdHJY=$vdF9G+9D#2N!LNL$}L+>>AAd~LyW~y)y{og@BmH<{E
z4?G_S_jP^4Ibz^d4e_e)e$mW75@#OOmhjE?-V<1*)k4VIfr1?38hP@Cx_($i_TiCl
zvq*icyV-8FFHDrX$-;+_jiyFEf^=~`95;#(M7Vx9#ZI~b(YB>p@ixRexkSK>W*GeY
zq5`iq(p;Azav(t5V)Qo3Xf)|f+zvCa5^fta845`Afa^IGN<Yvp99!`v#b{y}%AhSI
z%>|UGAYM1*hhjg2Q7evp_uT@|RfMY<o=Z=f%|pS#!(uZ~=3&;(pYe$P{{j<86M{ez
BLWlqW

literal 2135
zcmV-d2&ne}02x4doYhzjR20`0p8W#^mIXnDfQB9`60O8tegq4?m!m|JQWH!XOf}JE
zcNR9;ADkUfvBy%58cjV7COIvd#H8XMq1EK1M`;3`(T3O~Xtm`C@|Og{p-Gg`_=7}X
zJ8$L<%#3UURU0$s%-*^8-S^&o_kQ=j_jY9<K@b{3t5Fjg9rsD-e)i<U^HMokILGJ-
zLLI`<00^VE&Zy4*k`1w;XDu67f|OP4%!7!}XXhZ6(6ELh5yhV_tz;Ux-y;zRS^uWM
zjDm_*g3zjwKA|Nhp-Eh3C+XonLebz@7!?1AizX=xSwKI4MTSgkp~Xzw-7eCaHqU6p
zV!cFcG+|+=RG2u=m^_wp3Kj;eAoDoM@=VP83;YvuHi!Eh#x96p{VUK~c7iX_ikd>f
z737eukqnFE>q0>vVrRU`)D|GYInc@T`&bns)lY)qmsZDLJGqmo=RH{hqxbUtp+6cf
za1nEjmv3gHc-L)UiIb?q2W$xM(rPv=2Tgnds(HN^;AAx1OV5I<eE(&Fi&b9E)?V(F
zy4zqSZ6rmJ)-@iQvb*vW&DvbEhr}{HFBbwcjAhE<LM(1)f!RW@vAbvwxlU-+coie)
z@d(Iy8kof6g8+SUigj=wO%LWro&NNeZfDt=f3UHie!O&lau$qQ*xOisDG5%g)^yZn
zmqSx-$$LxJma|i5Ke9gZPo+>bwN3}_JI+pS{=~CwOEA=$3>mZACxf%GJ39V)xDm$w
z=Je_o+d`;|W@iPz*vbqvRUHV?eaJ>;bv^!7O%>yHCPn}K{4zG^!V-hA-oQ>RzHsD}
zV;AUq{^Ob-l<$Kfy=38xnkAq)?t#uMRl3CK$YT-rFq8$BxNB4vNiL~z1Y!C^9GZ(e
zU@Fby8X8rI?}R27g7s0DP>Nvw5w0+oVES_i&p|M$AHlsDrdUwg?T3jA_`HLl8^M1Y
zOpoOA3ML)k^AM(lAvPPD`1UO@BORs3Gce7K@}vwJ2NAy-Cgvj&59jmkt8Yykwbuut
z$H)n-FWuWjKQ9ZwIx5Ah9)0;Lt;4>4iw)~q|Jv`a9tI6>&Z=WBU%b~SbBU+T%pm5E
zTW6m<Iwji|1?`u+AKo%^@c*WV?E`H*ZDej9EB@EYtSYAVR7h}l%xonEFXt^Uuh_5v
zwEybY{yq06+;u&LeV}vWq0F+x80MSU+JfL8WiTHe?CUUTnnVhAzo31$^nC)nR#)*!
zo97~EYp<vtfYe>n^I;$Og10Z7x&GE(+b@6Iz?@%I5%tE6H^2e9B6(BSAHkuVJ<r87
zT>x*-iaYy$=_%0Kz5Bhjn+NZ>-oJ(XNUtVjPYsLdJ2*dwZ+5)<*zy+8SUFTY_~+^1
zpRX8?<=^-TIDhqKZER;WIQzrgpU-_X3+(F%oa;XK=$+CN?W-vh>`32_smLD|DD&B&
z&+A`IDg#3)8IjA{{sP#I_4JLnZ@`J5w|mbO^?;Lxi}TMPEM}Vi*7MNSX=zNWI^vi*
zelpW?Zs<Y!T0YaVT~BR4<6&BK*R!`LSAvgr^glMx^)z6oy`I;8qSEJhqJ8^)*!Pai
zzFo{^-aZBlWUXA-vT6l5y--CDr*?w+(<|CGb`*i5`ZYt*UrlFrft&-MKXsAWp?`hb
zA6n)xMf$MpobGV2X()Pc%o#V+G&8d<zC49#i|he&s<tw%XP&K8{o)Iz^_jT9u)->)
z<<+65p4iu=IAv<Ab|)^SNE{)QRGCTury`z3!{w#@JKqNG`LnUilYVB8$DZdJ|JEhz
zJ;~yB(UjRkbAeEcfe4i-7<h#Qnj+1#lXTJF+AKSlsl{nV)+<^qEQT1}c=_uNxbn(p
z)yIcE0R5XbX8%6G3;NgQo)|dQ0Qwi?_bz%o23#MoIhyZhK;LisvR7>`1z)SL?7Uf>
z46e*I`E}L(RN@73)fxgFmH5q?@I!9I?PxyLqT;5n_tYF+M#v6OvL)!S#p-pGc!^p^
znF}|FOo6?~O^d*%-45|=PnliMD{o&G2Nx`b2hq6lBV6!z7z)|M;?gywHC0rWVO}eN
zy1yLZS{~TKI9hS3%NLJ)i6B>r@K)vgZ`kpZ`qJT4xZL07rksTivqDj|nUG(t{FZQD
z%lBZZOm(h8Rbr1~3?-&zmT0YJ+AQHUR+~dm)A%WqvdB!?&AAS~I!bNPI_w@=m{pG}
zo&nQP?-+CX+qm1Jn?kv*$3qbqWYR|^bkli>(W0#(Mv8?Wl1p)+Q8?{e<23$o%FGYq
zDz7uaVa_ETo^g*N&p0<_B`L|WRHMrsb+=tC@scD|Dg{uar@-yv@9PSkNlL`(klmhJ
z5GWfjI3d$jWT)INoXJDV`3fk~%HaS*Ai_I=um>TiEk?BlAxJF^nZK*hNm6!;=rsW#
z3QnGf6OJ}Uf3U)2w2TlR=JRO~j$tQUU(>Q0xaZ6WH6`*7G+}-|rZ8Bb83LA}sX^dV
zaeE?`FXsP1vq6CQMBM%$me0ri(lDPKwVQkPz$C1fiu)N$aMoxL3?hiJcbeOf$#-`L
zSu~3NJ5Z2ifK@32&&NSrmwJp>d9F}l+m)~O))&n@U7UGBTf%?0_qM<)uNFeyjuhl@
z@A#8%iue0fWT%dQn?>r=q-INMU!*9P$fCxOO{7NNhjej0jGjOUV!Yp<Vkh5#DEImV
z@ixRexkSKBgb(}&q5_{_qqr_(<bYn>Vk~abX0u!D+zvCc5^fu_TMNyO5!Z7nq-CUC
zIJV+Tip@^bq&1<)>?kBf1@XF}JQN36Z3*Jox85!ATpMsT!*f~84#!w<&^g^!(&1z6
N{27lJ{tpGA80Xs^I7R>f

diff --git a/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.rdx b/two_way_cache/html/unnamed-chunk-22_9857b00948e76646f2b42871c3c01715.rdx
index 04e95d5d29c69669bf85b4febd49ebcaa7f10ca3..7e0257705a1e05f42ea95e5c12cf16a7aa9bbf2f 100644
GIT binary patch
delta 20
bcmeBU>|>l@$oOiaQ3%J>m>-;%7#J7;N)86D

delta 20
ccmeBU>|>l@$arX?Q3%KOSHAx)F)%Oy08PIKfB*mh

diff --git a/two_way_cache/html/unnamed-chunk-23_ce64700903bec89d35ce4c76b73761d0.RData b/two_way_cache/html/unnamed-chunk-23_ce64700903bec89d35ce4c76b73761d0.RData
index 7949a8fbb14d65f98949a04b9225f4e6842b8aa3..0132b4362685787d5af3b7639be9c310b422fd4a 100644
GIT binary patch
literal 405
zcmV;G0c!pqiwFP!000002Cb3LPUA2T#tkip^=ThrZh=TKcI^CVq+MyH(i;+@?223K
zIxdMeb=W!qA=EeJSrC&P0Ez34WzA>%r*B5%>-nvux0DbvA=Ak*nVg^`C%<nNQBKJ8
z7!OBeO1@#fVBKT8del!VqfKSct8Ukv_s;2^EhAI)?r#*!m9eSHIG=I3u_m9DGBH+}
zEZt->OGU}i==+E1(MwSj@XU;D8mP3degyxcNN}KZy<R`FJ&e|oX-j*c+O-e*^zv+Y
zqx7S4)b`zd-@)fY<hv5pVPt<f-8}i)L%W4PdS7d2EZpc#V=2A1{=RkI7BIKEt2~AG
zm~Ua(?_l{4F0FP$UciHHdJAy1KmEBlLxx_Iz0qCWIsgSK%UKeG5Hpra4v?`dku%_o
z^EeR@hFI=yWHBT_k};(K5Em-N%wi=t;!@^Z4DQ%nUG}>1Aka2XkV7nCD$e0+&?t)N
zvc7ZmmccMHUjT3j!Y~ZRCd8meIjB)25U@eu1uikp3r9O_{O8v<*6vEdVFCaE66?h~

literal 403
zcmV;E0c`#siwFP!000002Cb3LYU3~v#?>Z0tWNs~b8~BuDp~#)Ll+j(+zLz6U3yCt
zS*cAOxf|InrQ}WbS(Y6e+Aj3k5n{fPetaWF*YjINZz&;ULZ*{rGC4s>PJZ4jSWd|F
z7>gq^C0{UK^6sf!J?ZC_(WbKJRkv%-d*}4dmdsSWyJwMF8JotL5Hq1R*5tENCC0`k
zOE;OyQdtT#`uc8q^rt8ac;Uu24OH4!7r|#V2@aI5*XtL)htZmuwzLPTUHhm{ug-=$
zO5Z!Pw(lPL4*oBg?@CmMk^Sy;^XzL6?G}FNeXX6baHBVkrS#hRht_#pz})Jt@)X`;
zzJ+DKgXM3yvf2%K0gt-rEx?cc>9@rhGW4?SU-=l~EayoCQqFj)1VF~KM9n~OA)-V=
z7-GA-x^*M20FsQyF#zH+PBHT+mI865av=wId|h4ky73^<Hcya4Ea7pK!^fbEF}kep
xT)pKm%*+=60)j9MgYgk^(4!pGC=v+xAn*W}9Os3j9X9^+-+ya~+pS>&002ou$2b50

diff --git a/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.RData b/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.RData
index a601f4fd7ec9445595fae61851ebb465117d4038..7559b8bbb9160640ecaa7348899b1a2ee8debd55 100644
GIT binary patch
delta 803
zcmV+;1Kj+(2E7K5Cx0fPO&WqB@zy!9+jw>2%y!mhh`-Kew+$^347TwA5|JF=&c)|^
zvFjf0ovfKBrePQrqgq)sDod(qEFFLOV6_dSx~Mt}M%7qW^`0$<tUH8xH-uq?ok+&i
z$&v)d7+GPIB?HUrqK%;KwgTj#u+?id-C$$A8Mv+HyOxIn9DjJq&a0Wt=g)lK2d8$3
zDFqP}QKx<fKI&)Y%&f&SnP$>LM5GkvXXaP^oOZP3GjmJAfMS54gx2>Aa>=xy9<x%;
zLM#MH`kk8O8LoklLLpQ~PuGBuImMmYkRTcP0A`Yb*Cb9EmoSl=ptfy-Eg4~mR7176
zuJlNuDDg;IkbjbX;#1s{n<1l&`+)ZY_@>=l1x4|i&A0QG0~ikaoMnkh$efDjxk`5S
zDrwDm10hZ%=9>ZI2rG3r9Ra~8L0}jWiRZQSl4nnkCDQ7_n9$q@^&^(?5QANYFgW0>
zz6$D}Q=EV!n235wGldALMEcs*wdSWnmd=L1ej7<n`hU?4qT@9S@)P@@VYhKynx5pq
z;t-Kc_@J4NHf!4er8MVY%aPF|v<CxC67&e|!9mLgIL8Riz^PgvmAX4VJGW%OP=5Ig
zMK_RD_68iI+pugl6u~vGc>OcWKLVW5S_M0tK>DzuxwdPsYeMLe$Nk{3X1k9(?hTKI
z?alF+9Diu)JvqlzL*E~_&B;Yn-&A!e-L?1c;;!9|v4qOliYm%@Mc3x#3%K!gfDbrH
zWNCP*VK;17sjZ9$FHi38`p&VyTsU!`#4JJ1PMYqiE41^8g^)Uj&X6P)B>{&#ch>DS
zXP`rVKaw0eQ-9Xf!KJ8|bbO-Zt=c0LtNMIe=6~nRsWtnXn3E`qIbHk0#7*VbRNE{p
zYj;H+eyDf|OQzk5;9(&(&f=u~M1-8AvhY6MWg^137^&*ttYQ{Qso2G8TNFN0waH+=
zaJdXA?dsq}ISu1K8l_NQ>QA7Hu-YmJCt*H`@k*x4RDaky<$pu<<Nr{-@Ho%)BH`De
hEF9x}abd;|MVaUWqggEne>Fhk{5QTTtj&TC008;Qna%(J

delta 801
zcmV++1K#|-2D=83Cx12}O&WqB@zy!9+jw>2%y!mhh`-Kew+$^342F0BiAaub=i+m|
z*mV#0PS(s5(=d#RQLQW*l_k|QmX5!Dvf74GT~wU~qiQUxde4?a)*ZsU8^SQcP9$UM
zWJv;JjI1!ql7Z!Q(MHgATLJP=*y^>KZm_Z54BS@pL(4+}4u3pl=grLK%NM@ygHt=i
zl!6F~s8hcOAN4bHX4YbvOfzXAB2o(TGxNKCPCMH2nYkrlKruj2LhEM+xnx>Uk69^a
zAr^up{Z38t4A($Np%AL0r)xmSoZ?PxNRW(t05i$JTN0;?OPI(_P}?@amW(h&s-aq3
zS9+vSlz1d9NPkH`@hR@f&5%*XeZczxeAjNSf}(iM=KFce0SpIy&ay-$WKPBNTqQeu
zm9*x(fe<GW^UZ*9gq6CRj(}j4ATW%G#PeEu$+M@&5^42dOla<d`Vq@`h`}yH7#wg`
zUj_BADNeu<Ohmn;nL>nAB7N=ZTJuvOOJ~Dhzl|g({eS2N(eauE`Hg+hu-iB;O;2)Q
zafnDJe9%lso3(9#QkrwH<;ds>+M|Ic33`I|=%8f-oMQxM;8d-TO5Giwom(<sD8GD$
zq8rF6djpQqZCExNir|`8yzb2Mp8#jHR>2M@kUnl`uI<|Enh<*8@i2I-+3pjM2g9Rb
zdviP{2Y;G+PtGyb(D%n}b8->YH&tCqckTWAxNCP~ETJ;CqKYzJ(Y1N`0&YAX-~&z)
zSsGqy*bUoNYAfTx%afmXedkzUE}XbeV&?3m>7KekJ6~7`sdMNINn%kFaL99K-ClDB
zI^d5Z$)Pj#W=+jsig`&#CrZAmJwman&!=U6&VQU*vww&=iK3X(l`l-(RQ^o0&BC&F
zS7hOriiWUc+N}s47E<FJPTJ2z$Vn;-@8dltB8-cXs{X|)W}%ddT&y-l;UiUB4E76`
z%aGEp4o;NQF#elS3iY-A0J;dPje>9z=93t&B)UxXXRTBIKTP-U&h*0HJk^VIUk9=b
f^BUEK89NkZo{x-WwH*A__>A+v<7BF2eh&ZuxqOTY

diff --git a/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.rdb b/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.rdb
index 2bdfa73a971ea1ac53f790d0d68e967e0a8237a8..ad115d6c4fbe17a2edea40b4e9bd557bdc4f1221 100644
GIT binary patch
literal 320
zcmV-G0l)qL00XpmoYhfHO9L?w&3@F<1yShl=%%6v@g{zN=%I)OZ)KVtcjIQ$B?)T(
zyqdL1SwlUDClABS&YR5JdG9eJgd`+QVv-DONe1(W>&dAt#x`P$b-5clv=Nb%jBFm(
zI8$7jpgox8)BMOj8-F#wgEtpvbgofp+LXLm$%3A@?IjqXcPj>h-qTkuCxR~(s5L#w
zk7*4{fmd%v0d;&6N07#SRtXL2fGvIE0&RYG(Z@2kEq~U%2_KpJ_h>^CeYn?|-`vr8
z9bW7`d?npyq80N~4H|Iuo@R=-#<Od)7N{#k-$^Tk!lPgeu&P1n(P0a$hSF1xK!`<m
zoDOAR0(2<DL1h}TD6mCYpk(XKjXOOZ30_vFll(WX-u}haEo0x;t>8ad8QQtOU6V5%
SI{MGtjKkx18TbjR<E8Eb+?p2v

literal 318
zcmV-E0m1$N00XdioYhfHPs1<_O+Uu8N(iL=jx|GYK->^tLgFwXCUKj*%&ehlRwWV8
zKM$lVsY)~saN}Uv^>h5{_Z~AsNJ7#iCdt5-WH5iYo}AiZY$LW<o7<s78xcv#$mU^*
zGsUF|+Jk96&5!J}@mKRZcyn<^=Ngr!)tXludS2I;V1V9j7zlb#U%8wJzEq$ZdXgX0
z5|#q5-i!k3*d}g$8uvLRRHy^4^oa|!`Q1ey%iOm7S@$M<WbV(SElu>{UT1!DOXpR1
zvDfg8bf1Y<%uiKlz}0)2DP9}Tu1zCQ7l^)-76>bkf-%5~3Z+MfHLw!ao^k|2EZXCA
zC<7CqLm3VVQ;Ee2Ym_ULtl8eU)6tRO>%z2>|HjkXzkAy8^<C}c{>jMD%>8an&UEPK
QKl3sUkKbkACj{N3Mve@h;s5{u

diff --git a/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.rdx b/two_way_cache/html/unnamed-chunk-2_d6b817bd2dc7f751b645b175972dbeb2.rdx
index 40ea98e1e77bb3a3533a49fc98b3eeb439d65552..81091615dc625713008aec483286fcc4005a42bf 100644
GIT binary patch
delta 22
dcmX@Zc!qI;40FCM>qPmb95Rece54o|7ywOs1%Lnm

delta 22
dcmX@Zc!qI;470v1+eG=L91A%#Ii(mG7ywD|1rGoK

diff --git a/two_way_cache/html/unnamed-chunk-3_bb5971ce07d8d8c0b8943589b38c4d73.RData b/two_way_cache/html/unnamed-chunk-3_bb5971ce07d8d8c0b8943589b38c4d73.RData
index 4706996500ae6c15d270e8b6c0da33a6489755e2..4dfb420dc6052bdbc8d320f2a43331ec3bbeaad1 100644
GIT binary patch
delta 696
zcmV;p0!RIm29pMm9tvq%K_yn`hD1fxktia6)AL)ub=$HmYuDP_-LZD}v1{#ry&2h&
zW$o?Y$2)7!dXMdSM?K|tPjq$1C`;ieRg3JX6oM`wu~}M*2iw1k<FMCt893b}N+RaO
zQ7`brs2BSY3zDvnI3Hdy-#_&Gee$itAj?Qfi}dvHKX4p=Z=HO!ZK4+wMdJ*}90W*z
zsvsd;kSPf|e#ay6iagiTZYQz>vZU;R&VktWpavM{f{Y+0BqUC+?}Yu(A)ey}^&j=p
zIF|{?Q&$hj0Xb3WfRK|T-BkTc!SV&HM|2|xEo|$56GAgS7pDi3&r@|UAZL=LTme(1
z1VTkZF2tM*0LjH%FHZit%5}Y<=e*2+Z>3O0o18;|qiw`jAQk0e0YbIOY?)WnntBWg
zr<+N;Uf`N?ekysE=nypSXPK8GDabGbDqaT1xCI4*3I>}gBfr-*rz}voqNvbETqARu
zk?W=Q0nbIzK;wp<Da|lnEK0%Es^XdD70C?bBX0_%>o~@NAj7i6B&}sqDJ(F50ERRh
z;e*gOPR$UdP_krNliG35O49msv*8@qHD<U-N>)kUCN~n(j47`TcEw{!<!Uoc=y}F0
zBPtga@`xAdFN#qv0mEzJ2)o8dXO!m&nMhdD+Cz2Db+XaLQ^=|UvpMO<j&U?!fMzOX
z6sy3b%7&%`S-bfLSSp$w;6;&tv4!7o&B~=N01eLadyy&bB^rxn**f)a4tSlKDay!Y
zLkO-p)fLPe)j0NzkJ}Z$#|=)>RiPDb|8}eyhsOGZRoHmTV=C~j(N%Xdo*x|_o8n#H
z-|Ld2w|kc0N#JOEl>X5mseTyxrZf{YVJ=XNAzj~4TZ^3+y2epVWS*3h#R4xM&L0~e
e0e%qtA+zr2SIVG;?<{<F{rCyFi^q5G2><};(oiJ;

delta 696
zcmV;p0!RIm29pMm9tzvEf=aB=4T*}1ktia6*JrnW>$YWC)~>a;yJPL{W7pdMdNZ~o
z%i7z)k9XFd^&Z=^j(W=Pp6Ke1QI^6{sutN%DFj_WVzaaq54L|7$6>$cGH`lHltj#l
zqkiCrQ9t%079>3%aX!3azJC}D2IO0ZL6(t}7U{|1f8aR$-a7th+e9xWipCj`IS7z{
zR6#<xAlD@5_#KbLEAm`VyPe1m$da-LItOCg!x~^#3NnV6kbt<|ffo)Ok9dw3)PK}V
z<6I^nPh349hvZnLLqd*^bW`;&1j`q&9?^{)wy>@LO$g2ST$~(8K2O!bkeo`Eas^D4
z5(pIuITv#-03;W4y*T;nD%bUbzVkAFzm-B2ZE^+$j<ykBfmD=>1qjt9vt?dQYw8Ik
zoNgxVd4X%n`KjbtqC?QQpJiT(q#&aVsCXHi;1(1JDj000jQoDjoU%aSilRavbB)Yt
zMy{6H2Rs)=1C1McrZl5`u_y&stBPlqS0po#kGv_6p5qt?f(*+NleCserLe$%02tD2
zgbzaBI5i`bLdlY8O=`zID@p6m&4zPa*O=ivDOn|Xo7_lDGp4*Y*d>o8m8;D(q30R1
zjHz5y$YWllzbMAJ1Prf<BkUO;opGKgWGZ1vYY){q*U3f~Uqe<En9WJ=I>ym_0h+0l
zQLF;fDjS*(WbNh~V5w+!fEPu7#uk3VH7l3805mwu??<M%7icV+W$V<xIpB3_u2DuV
z8$xi+sV-sOs7BW}K5m!%9yd5mSA|x%{oAo-92)BrR$=2UPpH7VMpxa<cz)FFn&MsE
z-|Ld2w|ko4N#JOEl>X5mseTyxrZiJDVJ=XN5nbO<TZ^3+y2epVWuBCi#R4xM$sZdZ
e0e%qtA+zr2SIV%3?<{<F{rCx6IXZ#w2><{MW=O{X

diff --git a/two_way_files/figure-html/clock-1.png b/two_way_files/figure-html/clock-1.png
deleted file mode 100644
index e4bbe66ee572c4e5b40a0ac71b3da805249fff3e..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 77229
zcmd42by%BE*Dgw1Xp0puZo#2I@!|!7l>mhhT#7pscW6rs!HW~LI0P&1P~6?UxI?kv
zutVSP{hjyQ=i2|Av#)(lu8GX^Oy(I`vu3S(-4pa)NfsM}3<CuP1zTPYsEUH}^cM=s
zqnziDkyjK)CVwNp&_Bv)Iia9X20pwWMXVp0qM*>A$O9$R+>`efyxhSqsp5Z>UCsUK
zhj@f{!&l!-f2m-QuzQ)l&W(;G!~FdR(PtLo*q807(uyoEpW+q9>^y!PMmLT6HO`Ao
zpnzWT^YCXGJGA_Hn^8uhU@ZT-VxFP$c=Pj{yEjahqsh_9^h}D652wb&f3K}2DUW%J
z3vN0!EgeR3VM!qy_g^pXJC4Oi|IVPiU6Fi*_fHNr{nPV*GGE@mMg1ou!A$ee&%duv
zG=#YS)bJJ;1N!e9C^XN}fd6E0zdi>1lX?FC;4weaI)qVv(?<8KP(DVP&m;-Jt7YOQ
zLTSfDe$b;u_F%v;P*&t_42fj^mu<^=&BS{oCI1K|18-oS)Pxmfi>zA><vSrjNgeq;
zYzpXBBl-OQqb~p7Ms^v__D)`&=zGS9MevSxy-3a^M%a6~CSD@Luj(2xQHhD#YQ*00
zF)=Ye>QUZKSriRBA4C+n5J@M#aULEl>0`|Mc^rW%p=P0~>aAaXaxVpElk|M@oq`*Z
zO9SXtdnieE@Qaf{I+FzsZA)kRrH2KBgK;Cx;e_@%k{NZvKR!LDVbB7D!7eS&lbs*G
zouBY||6beYXwgH@k9~kR=nB!hb>SBc+Bmt#-3dM}FfAkLc#1;#J-@YI%|$vf5-oc|
zQE|`Dv@9oQXY>Y7PgfbGri%vr4VJIXHVx{aeAi>5IFXG;x1#a|%@Qenxaa{e?U}(<
z;QA;iAhHL3QqM1H)?az`OjR(}@UefzAd%NG777g!zl4kJU4HoiBiVF){N{ZTy9Oy^
z`RaX3#UxQSp<1Tr^N;rO;UI{H+WUp}*Dx@f@&%P=uZd!x?C*Yx-v{v&FnFcW;&Dg{
z_ry3zW^#ODvztZ`Db-mqkvvnLj#`Xu!**<CbSQ7VE2?xE$SzJb(?Ztoh=;zVYG|lr
zk$&ExMRET2lLunmF}ncdE$Xe~?<xn&4C-1>s6DjWVGA8)6!Sg-e&D~Z$UXDRbk~Px
zV)pEfY!mszfL4a;`&{y0b7-~|$8DA4qt++<SUM$e{f2qpA;8L;avrQZ>@IYeKavI2
zYy4t6RSq)oj{AyQGgYaMoJUM}kes?6?ss`fm(e<at4GQt^0S&yF;d_VRgv<hq_0_D
z*;-FpMOOH8Pe(nLwY6SkXL*3qFvYm`@(jC+iDfisQcY-d&R3!m#8|+wb*hdkl9pl@
zEm(OBTp!0h<U#>r!dT})6QkadBxZ2N+%W{j052e;fc?$d;|Ix^?ot!9wm-&-CVV3s
zu=eFK;M4d{;b%5;7ww+`P!q+6=}g^b6il?FkLKg6b{5Ibz63-rwS3rJR!%hG#xu46
zwvzy;s3$X!!l9_heO#=MXR_vD{ml&MYv}@x-lVj!f)92%5~Bo3c{ADGebB$N8?tMh
z*&Q^@3je(mJpH<Xe44M}aZ+uaI#1b;x*lZbz%G`)uX4A!VBmQ5)IX$iPf(6NfjT(N
z_Xm;$?2Gqx#Zf=iyv@N-u<nB#Ct+aA2Yqh$Z&orA7P(Ikr1G@5GfWNC)_yTWeLpP4
z!ouPkL7kcw6?Hr;wJI($KU!MgW{lbP8q^oK3RYFExp&uRU|{Gt|Mp_YkC}nt+xfRP
zbX7Hx#drmI`J;oa+kKIJS5G32jiZys{VIyPkKVaUkMY5%md{|Ur4`<9n!qLI!j%S_
z1XJ=jL+6Owmz{?*Myj&EcU=eV*{Q=fTQ7cQcg*#>w-Bxc@zbE83yGv{7Cq<0K5Fp7
z_3KuX$AQ7e4oOXOj&1W#$R8aM+HFYWynEHHmf|~<#}j)I?_W$PvC;Az_(|?(Th)_L
z3a$4G^wC@}1?4MUs$%4N$@ttiIdn!k9u;|lQNP6}yz|<4Zw!XzG$M>zTDi`uVrG^z
zgxfB(Yq#jZW=KE~LEHu^DsvPzTPxISwxPk>*YD#AtE)7!tps&~iuNjA4+UkzxV89}
zcu;;Qe4CIbWptYHZ0=z)%ntuxNO6}HglTLi6Oaq5ob1gH1x;4mJZZLGwh<cmv!_OH
zm8hTMA}~@BZbCXpsfI!`h}0S#O~$-M&#QZ%Y;kw10ZPkrWnZcpWPMg(Q~rSJQYQ5X
z@9jH~*~WM;0n=@~_aB|78I_fl#l;yJd2&1%6+PxTPMy=a&!XJ4v=Dti4#$*n=#^De
z>Qt68R*pz&_K225(zvQESlfm>ejQd$wx#KsB!KQ0YL{L`8*=zMk`Mtu)nJrIUvb1M
z0u6J*e;a;ZD$UFFS(I+LA-3I`@S?#pczW#hEw13s4O8SMC{H*K<?UmnTrq(Fa5gfn
z+4k%3M{oOSz(HX@*LQyP_xC@ju*A5{A-2|pDEjkq_h%^IV@S-bAYEj<NY#6SF`Zd`
zmJ%OwcA(13**ts5mOeHmB~#J_Brd6{P*r+b$!lPeV3}CkXdzgdG#zF1t6Dirva1dK
z!WY??53<QAKQZ^>o>l>(OP7@1_&tM`SP18Djnft)7aUi++rE%2PwY(NoOq}lM`8u9
zK#vJn*il2_M7qh}8bwa6Tg_;K$nw~Yhxem)?5`sxly)rc*yp59MU%C__SDy#oFyET
z@{O}xFStA&^m1cpa_uBR7OB>(nh<woEjJBQmAZw@EAy!V(}e!dPp%O@b=78j({UcY
z8ZbxRF_Vdj0d^p%%jAMh_#txS_U-IwGad$<BxomaWd$9qaMJOo`3&X9?$;UlCnX#T
zFd-u@s-Kmuo1;E15>}PxcnG`C6F^}9_`CVfC^VmG!FWM^YDGkek=cq^*t)Lx6H=cz
z0zlG)8(feFy$f-&k~ll4Bq~{>v1DL-(BzR^Q`$4hs_)t7QVg<=6tatmPU6Z#z{#ie
z<>uC#M=On<=G^@gaq2r0j<MuBsUroP0v8RJ0Qu818llubTp-49qeu8!gehvX<1OOB
zq$r=h=L7TDMhVpfmTNF+!jZB%S>VRlrW@);h>KnL`8f?Nxe@{<m0>Ix<UH2<S%sX0
zQfre7CPdtZ(l!rrkv-X7VG7jINlY@~uF_1%gvk&m>Fg9vaKnJ$Kfo?2;AhNTM+IBd
zIBu^qDmg>;D@+tUwq7MN{T(Ph7XOHJ)2MZ)?(P5r(VLHjT$48EdC9%6K^vn4^L|`6
zxHP4-;BWoN4PBZAZ9);WF%D14qk7zq#tr!nn$S*{mseCg6Q&KQM?+d`_`M#cGj9P=
z5aO?c2{zj21;eF%H2i)a78V?w3iKPFjY0~}SUWt?IaA%CP@$qn{Tv<L#28-0Bu(VJ
zQ$*Q0IXM<TO*r0qcjQE4WQ7kKY6_dnBf`Iqgjc-K+@BN9AV-OM#0`1wB29+@H$}EE
zT3r|C5tP^j{z2tzN8v`r=VyaFW1H=M6dAHHs=W#IzLtzqz6MP5+3D-l;~rHNlMoB!
zHuoegH50}d4bjl(6H;|TE(_<<y1M+#ERv$vE3^PD@HP}+H#Aw7fs_dP_q`_e!>_Da
zDbw@+Sk}o!Hzz@Jh?dC&--=x5XF}o80r5g#C~nFGm}4Ns7Qw9AwQHl=Dp@Rfaq=JO
zRMPO~=kFb!nSE*x1Tk=ck-MzOgcODPBWFPqRtFgCW~^yy-pwMpWyY5pq!s&Co78EF
zv(JPC*#eQ`uL($nLWb7^$CSw_lX)4#k5sj6@n-m?0^7%16T;DkP;anP$>NhBxmG;h
z<#s7vmmRgkR667)&g^8B{fprcDKul#OAEQ%JB%>U1q%u;Porn~t%FHd>>mpu<Z5m?
zsY}r*Q&;RWNkCdqk-CngTG|gL&B&5m#h@Fi0GhtYvrnl0An6qz$ilNePJBFa*B^xa
zB&bk46IP7P1XknXN-HuvKFD>WKok(|=-b17U1N`0S99~^;0=fQeo${Vn1>YM_b;_7
zP~_w^y}Zyg6;tD|)szn-N99<@5;;1;jWk1+%(u~sHssD#PkqjB%xGS8W->9F57Q-$
zVdin#8U3yN=o3i~ayDmp?akMKWAf5DFBYe;ErPMz>S>YpS<yFE(Llx9-bWND_*mRT
zL4#_k+hHif6W{Zh`;FnrmHSMrxn_<kT%a7FibQfx!f$F>=rh>nZxlaDq}`5}MfqUA
z8~wH4TL(lQ?DsQ3x5)qJ_Pcn98wzeHh%v+s=}6GhfFHeGk;-}eAWUc|L0EME-Bm(=
zHkI;kr-;U(n<OB}4eNIxJI%`BKkii!%K!AAf0zHC+^f@v{Ul@Brpg`ZZo1J{YO@<!
zBL@W+^I?Q8zUQORumGbA-@gTs?TCr4QcBX>OwHnYXuKQ!i5}VIzptINW(()si*Fd<
z_&|OddX;wf@{k!|cs-O>aCqJ9E{lgg7vYzC5Knc;+-g?8@^102nCe)wArty_e=k0&
z8rBZmxxXd+`<Fw5JijCHqi_IzRob1z0w>*~3b55R8?sO@`%u2<(vzF9Ai)IQ*%(zl
zgNBr$iTjJGzfbVHEx$6j6L=_(p!O@FqKR-LjQpwR2&eXV^Y`MJz>cBT-<rq5MnovV
z3I8V?&;RCy4G*nQqO>a{xvX{)r5%)|(E&2{TIzB)h?*~IL<UuYBC{fyET_MAuhM$Z
zZ7w%lt?$r<D;(&!BJM30oFlMV4w4xC-foeKYbz%k9IZ3d&zavxS}xyREjQaepM)q|
z;y|bEjnK<qvwcCNOmtwZ@?{*oycSVJ9m2^sOxdgSm&9QuR^#iJBbpmO<LN9CwnFG_
zEY9`cy}K-jC<M4J%T^3n@fYQtZPV43yxeWwqw8AyJ}}L2`or<^=&9b&))zt+^sD;v
zv+f;YjijMu)B6I7#I*CkDJ;Ql6~0;Rbh3*8A9d`LI}&us&{@5h{M5<G;AzftcC+OV
zD(s7I?B})gz+Pb?AKy}&c8<fp`5Ry1xy+uIES@r*XlP8|vr<oN48V-u2M?-<h3Q`H
zU=Uws-Z~48g~+~$b&G$aZD^A-yPcLlzHAOpL3Sm6N+BkHwlImm=)$?WF%k+bd%B&P
zs3Bsm7UO5SnIj_IgO*_#N1n}fsgLR1Q7@_`SfZ!vGrk?q#a$k9jlfFG=P0zOn~%&#
zW@Qnfzd8GwDrS5_ZcDg}{1&$)0>sY0E#c!ux|kN%fFP}}@Z<BL$+=b<_JWp8&d5&u
zs%g-Q#%iMuekGazh8$6Jm$x{-)?)@EIM(mx$x~e+j}@<;Fws8hd7+%sJ1TmsT`JZO
zk_K`lIow|J>5$Lh<Z@rnG@yC5ZSl%Wnc~12V8Nm$7{Xw|2uLwUwXT)O&>3A-O0tTh
zr9U?QTZILy1=f>%o;|<VHq7Ifq*%s0t=8*5B@m$OVgFtTG1<nqnICVs0}PEuIDjC=
zXgrnN=8yq1@Ok6`sMAHa#IvRU<d?HT8-}8@L0QUlaV71s33d{0EprcLtv0)<KY!9y
zt8W^%xb`{4q_0DW{gPdsV6(s(_Oy3bk>5GE$-wWEX{k0HB2;K^suJ5%=2qDcbJ4;E
z6DnW@@gUy^F2BUJy}xui^SNg-Q{GhaHySWamu+LF;V%R?x(*MXyuCkuA|r*PVv8HO
z-_;C057~OMFIG$~7SbG%>?s?~SVfxaQD!vbkuLiU16svaOn-1FMHTWpXmYC4vO0O)
z<HMG4c%~Cw5ob+kW;w<XZqOU1>Xci2Sa68<Fwf5YIrxtZ0|!m&><`adTm!#DaFbWI
zgfqh+VyXH4{fb}v{+wO1X#F3y)Mqi#@5o=`5Y0f(7S1cKi~op@E1T<@s|H&KbR)*Z
z^RA_xUu;yNo4`p8&EWD9Jh2}hjXbCy9bFmMsa@IrWlWdEb(8#y_fHaw)WVp{%lE&6
z-&XJ$D0i9=MS~`4rp((SCL3ida#6WEF{2fI9`i3*j+NYm9&*ktm2EkUz=EN^yv0lU
zTN@s41#fx+dQ!wcR~7c`_}y6ld6~^Y<7+*>i^+K;ouD&HQ-^AKUE-&H-*+E8uk|&l
zbLR4!qPL17tF^n72|q!{UoD3_Vm@y=hSRrs{awUb@V5A36?b!_<8sXHkGGbIxOHg*
zdDitDhu}nn$g3T``LoA?ps`ojY(R53|89oSzUyL^kY;sJ=jqpO*KWjvf{Y9$`Pr11
zx!@hJ`FZ(JD7@*_UCEYiTBc_A)C)W`cA8lw0h#DRd>0I-Ybq(b=etU7o}EI6U@Wg$
zf14QA_A#$XQX#ZRirLVoi%qh?`ig*e=2J2R;q+l5@@<SjDx4m2L7d&xqQ{$^K<B=O
zZR6DxC2~LBgB4LGrVNEyJ%iwzvo^nln(N6LZ@MLxx)=(MmK{Tq;zNQwD*Tc4)}Y-&
z{05niww)U8Lp?zj@rYRVm1}4lt-I19B<e@Au)y==?*t<-0m2f>pghPBx`)x*9DL_h
zFcM|K(_>4nqJ4U+_tR4ji11N>)B`E|b(T`t-;2^`u$i@auZBHeC197!na%exbpn{e
z`7=LPBa7B&$^mU<q_hf~r@R-=dV1^J>ffGyhuXo!XZxb_;T{EnKxZu-AC*%B^}jWP
z)AE&Wn5(ii@d~N%BO9xLkQ3Xf&NlpqoX-;eL~)WHISyyF1C>3p7FUZ+r0pV0%;x@3
zja{HRxlAX)q?xzk)_2Ql1Yaqvx6Y#C;c<gWX+u19bm&SVo1PDyNzpEJuT=5|hg%=@
zC<bZ2#hTi7;k2!+ZMTWpBeL!_nsR?7DA1(e9j2VBzxXk<cBXaS#=*v*S1&|VBeA)Z
zJ$xDMzwI^-n|(wEKks*Pl6b~SHy~yM1^tN{luj}`qtpA<7!mb8Y0DxG3Br<!<nNo@
zbKLw6rrgrHiJiWa-R%ZvX<e`w6JN26lnP_JkKo<?k=kWV8U9@2JexFQTp)k=I!yMl
zAMk~Eh26q$Sk+D0`lrq9XNx1IWjZ)keMVlqtGvW6r;*?;m=4EATwkdZEH~oSkU+>D
zo$Y`|5OnL3-G(m3x9-E8Blqb!T>)_^)0&j?H5sM2&(O`O=*if5xX-2TcO7+doi>}Y
zGpLxMQg_fnFX#;2Np)+JT{$Ol6_@K~xXvlseD;{4&rX@HerXi@Lp9ZCaa2v!`utgH
zuIIF}`Fww}X!}E2uwfZ3voG=4PaTHzkzZ@<?OL?A@HuuHCKq_cEcj-B)G6ed@K!!d
zRq=(V)~=h`)n*Q=9sEk$;)!(vJJ1S{e$>9~q3g$f=G3-4UG){Svh<Z7m_Dex&H`)7
zhPZYvdLku+O{o+))LzSiT{|BAe^WTIjI&9oXLEDRNjsi$&W=ITmf+!CD#%4u4T;YL
z)@|$mo;6e#H}BaWI_sUq#M4z6eg!ur`|A5nh&vYA;y;+^lIou)R>#MvOve~vNI{(L
zV6azW_Y_!Zo&C3eg+_xDT$?)yPLMb>f||U^ac3X3lsAftpfj7xZE>#ZW<xu_)oI8|
zj~c@zV>Q&w=4xBG#?MR~sZ_$MDfL`6_ffH3GL>_z-t<-o!(4NX=aN!Em6GGM(e;iU
zt_TBvm$`7E*_1_B=lPcF%T}D-Of0^<x{3LOmh`$?VhX?O$jiBi{v}`MJ<i|0kpl&x
z?0_UITQkn+fyFlW*`wQ_ksH%@r;m-U`f;q$2B;@Xjjvq<@FG3Y>zf_k!G}A&^ygZX
zXEGbN<7SBhoDY6V-2o-q1|p_SZ12b8o@Y`$rng*^C*!9*c9&c1_IOhwv<Cz(^b+4M
zj-QJie)9HM>H?LBbx@M|E*}fJUmg99-^)IG6sIu}@a*8^VCiST+|pe(+gb_r-R`?z
zb?|l&a6H#r%Wj%Lu1T{*^eyl2j^m)H&T*~lSVjO~VRZxq6Lk6{%0A>hQ)(L3DJ)Rj
z^?oeQt>%2vgD#GGq{_cCRqS|1IDprl8aDCK8uOesUzCvpWh&MQ2oxGv9Svl8hZN>I
ze=|S^?K&|I%yCrM6FgWK;ByHCI#+Et9Zjj~O=6!wo}BcfJ4z}6&vkP=lls)`#TWqK
z6!Bk5uPI)4sT{?03hUHfe*k~W#hsbu*p{uh{Xpp@mQ}fDV7{Yy^cupm@E$TA0fo*F
zq(8+GQoiX?0*;q>-wQ=^SFScf#EfTkd!?HWLo`$Cym%(C?m>KWOkhf)^T|q2?${V7
zW1kAjo72a5c#7rTs<U|Tx*yA(Io$-2w)w8lR3@X2&9g&zYyO&5Lbai#7G?Pn%AH$0
z!@P&`2VkFGaWGPQ!JADNS1Doep<e+L^LGfOTs0Re3x_Z!38{-TDDxa2!RPIOz*D{Q
zthVeTHqkCMg$@d^kJlgO`mN<R3TLd~uHZl%%i|3Q>9og!E$vCbxSeO&3~HZmX1;Mp
z8{xodD;&*+--*xQa3xR3f%@iaQI9Bc&$E_OHm>fK9kQ#@>+q2i!*c++oW2%#{kp#0
za694b6}9M`$x%i5IH6we85Or;`FQakc{m#Oz99v-;O;9|Kt{_tHeU{tkox0Tag`77
z_1W}&7p@!EH~lX#sI(W=%*m2Q@P26;x7|Gk0EECNwcXZ~>>5gVc-yJHkwU$=`1PMi
za!#oho>+fvAV1XO&>0W}0M_R?pT3g$<9;;f9|Rqw6iN6b#TLzbOpmm|JVfa2*SsnG
znxug-ISIeYyOp$$fQTO_N?j70lp0}4P&q+|kH1O|XO{NgknGU#?M;PI={%xWB@1pZ
zdA>1{XYfZ*$77FO4=6%L)(-^UUI*!zGopH&e=@#GCt#8var}5-tV^v`ytz%+H-nT)
ziE3z0cxhL?Kb_7z=&}6BlG7yDgD!RM#=YQJ2mO9AQxepme!v|*ILZMpBf!IEX`a^P
zSl>~OtPkX#$j9CbHtwCmXzNoW&3|<3^QT=mzxCK*6*QoM6zxn20^D@(E1``&+Ks)s
z?=8af8c-<J?E-45XyD5b4xr4SkJ=k>ej75PQ#zn#r=v)R7g=Va^foUuSm7xi9-lVw
z+ibf2{f%9Q#CqqKY2T8|y1D4sRsJNdHE+^PbB7PKhvCR|Q0xErt}OL-VemVwcP{(@
zEtQX8osNm8V3VtWi5$?lO%MUztp%ATaI%6I-sm_5LFKB=sFWAGbvk&*xv>jc#YI8}
z&%k_p5FO)m#t#gtm(Fxf#o>a)on<3j%f}Sp*ke=p=qo^mQ(Az?3kRW@$9C$MS2K?c
zURsTDAh=t@pU7rDucQN`QE`W{a*%@PS;2zIn?caB3WCwc)Tb3v0|V)^LGzk)C)L!j
z<_S_yG_g|?cUUhtWRG}SEtJ9U(a~w${QP`;RUNdu@{GaG0k{~Zzn^<v$m3iXW})ep
zXfF|q7;D00zB(9h>iV9fV@3xki@oGq^qtLJ*7bis=CEc|Vt_qJ-o~>oAr?Rh_G#LX
zo6l85lN;@h=CzSrJNn)bc`^d>h}Ak_J=rmC(1=*aL8Y*{TYrYw@zgg+6~5}ZW{m*?
ztF4Ly5*!E+yD}j~DEQd!rB+roZdccnd2Cz++mnUiXX!=d1ByVPB_MvB`1@=`3cR1E
zf0##FC`X%8mzuP1O14w1=Pa@<{Te!U$%lt0Ix4K#deQ1oed=bK_UDCOY`GOh1Jk90
z<B$pb<Z22B4-Y#59LvNF79IarU4P~_KAQUn|0Wg8OJTlx!PLMTg2QEw!<Ce_>}T(l
zBRx?^QlzxaP2^>^$fOSIoiJhokkNmKPQzA-Tjhbaow=I{LC$klSeB#h%&}QY>WMuk
z2@@v?9#1aCCz|gdn~H8<%vo!@LF=TK(|$(3DYcDO8hj;?b73iNiL6S%!Tr@LM)ZkE
zV+z!w6$ojNLjNM1)7wj)^z!0|_a68iAfq#}?cn#o8;UR>a7J12cjM~2r`MHo@yWEa
z=$%PwP8Zye@Hhpy3oUo7S$4Fg8+Rqz&265>l-}`kNs}B$p=sLUThGi-Bu@KYSe&s)
z3$3BUIlfOFp}JY0?v6NKV!5!@oINMeXFah@(B+6P+RGkv^9o`!57~?fst(M}#oikI
z*!ulHfPo0xqLcA|a{)e`ao6h(JZTio?HLqy6S6%z`PKaHc=uV8T?Mubm&c4&W7Qx0
zk#_ts`)qW^=LauXVWLFicI-TPWu4uBQ(iAZt1Uqy+A4wPGc?cA-zaW~pd@W%Xhj`k
zY5+#Kox&l7sdA>EKzvWTe4y~X=>7YoO7}9jPF>;O1a}Xap!CT~XYlbm2a)uXb0Vn1
z8kw4nYcG7-u8ob((Ie-PI6!M+L%(PD``6*ntx?8~dF7(TBTs?B-OWK$4T>=$s69LH
zP<Klp5zskv;p)J9;=4l`?W&1XXTBMEkw8{0y?s$NE}n|^VS-*2y2@DyJ-CNx+>AXn
zYbTCz_aWu5F20h_*^vWUdgBBVuujp`XRMSbfw&SKDL;GBXlZel3&>wXWOJ_i+)}D8
z@KW+c=&1ejX)=V7-tGZ}s3iVx(kK$QYot5c2e&3SfPiZs_2>X(!%`AJfu_o0-8|Lx
zUbR|oNb$SoMNc}8YGvBMT?{;xjW!HGo$uIHxI}CUUEg4&>1Li;yiN&I>ps|<o9Ny_
zZhArdO+DQ)3(;Vl833@u4#`<D6|E4SE@)3Q2O2KAt7x#-2<Kt>0VRqiHJsGMo0SnK
z*CxoXvz?~}(-1<s)ADKlCA5HnlA@HQrmjDu>KaG`NfeXv#p;~go)1J9xV^)Gxrw8|
z0I(8oG>6Qn#~0b8jMf(#U8h2H^nfv9PCczGZK^@D$|YX;{Ts8|PM*CthA~1Nn!@Wy
z9mGwZAMc*pF4}cXn3m&q&_mu?k7DfV>iWC0u&}VRQ<Giz)v>yrYhVcT#%@<2gFKz`
zU&v4DScZ!KaN&t>(m_hlFU2j)j=N22s5?il>`k3YtxEk03esvweu=<sC9k~fv<9xS
zFE2SWcrPx0KD*RPt^a|GhjfLW?l)ogqCo)m8IthJa5TG)#J=$g31J7R+-I?va8PN(
zG>0Db(R}<TvA)Bq`9tiPD&2b9S|k*uxddbgy7nsQ(-w<woXdAK{kF9%xSbfk*~wi<
zQsc!vk;^tcf#sAN5T75=yysq|cyz~CS0OKK3r5yl0!hfCI38QvqX7V<k>-aQ=__B#
z6SfcpX-JucQ`_m*B*XEdf$6Aywuk*C^kAV##T<Uc%oE$@AkmK;2pu(mqsB(OE={7D
zmLO|l9=%fpJ=@_eB;eWvKDWX>vG0eInD1+2mb8s1IkxVCQ0pPCaqBp(HT2at#HL<z
zkLphKglQ}1;QJv}5_Zanp08D-)#oL>)&2Mvmbp}_WFTy#Ks|+ZMz>*xLk@dp4bm4^
z(i6__ulps|zrX{wS#E|7Sm(Q2-tWC2R?*(N9TcPhikKSMB^#^N<aeb{ryO)6p`>#S
z4-O{Rr588a+C}T0h{^t52xIEZfQX3O`}EsOaf7|{M{^CD^&X{;6W_ef7+L2}jm2nX
zo*Y{*m5<2)cNk=fk&bVETMmhMGEB*2Zrif#HiUq~RX~~LwafGkgB74`22GY=vE~4f
zaT?i7Ia#`K@{^^ry}?JJO1I_yt*3Zulo>$&KlY-K^~q+hRwW?sFK&jS6aPJk9aZxl
z@z0W&5^}uV!7!xFCAQAf%Kn&t=Y)TDhQW&-odFf8t;U^U=dTBw7!4}Hd+~7ZfRW|e
zz#kEJLPwBpW>dC|1G;%iwXJ!NI{}lKRo2pTxiBTwGq=qEhcbhCPV$881;;oGxyz=`
zfcTE^EqO^daL(*nk6QYn`D~DgefDal!=u~Ah=a;t&6H?iR~I;y=gicg`hKt(#R};y
z57FK$%f6LqPHU#=dLH2U!Q^|GRSYkTwIKd&p5<-pg=4`~1ampTc2%tF*|ys!FBYxJ
zZH+P~_iG)-XE92sJQK}G`Lj#eRTDieo3hggs!wu~o1{!d`dibmU~M<IhsT9^LKM9_
zX``HEb9d6?eH5FlG$cc%LhlmZWiG1=jyKt1x)0mxmeYMO&MNyFWu*xV)@anPY*iZX
zm=aIkb$U<~ae{L7mslgi$G0m5z7NAOPI`wk-6{b;<I=SH3dL{y#LQLoIzf!bUNiTZ
zs-G}-O1H~O2qJtzuIO~mcKT+p+7~g^C@X|lTUD&>R;RbuG9V~cO78m{1=rs0mRj7@
zeljO1^Ptr!RI|Zu^|M?cbs0fg>{BOVkUk?)_xY#b$ioPFmr5LYsSKyno*c#~?+l3<
z8Gz{yik-|)%R8ATQK@hZ_)B`?2WI0b+|b?XYXs=MJTC`V!*w_UZUrl|Z#)hfI+|Yf
z3O`-^Mgi<imx_@JWJVgvFO_;#8(rxI?^X=!lel9y&3cz#h|>dvO46<?R&IZd9b0dl
zZ}x8Zl0`S)X=v;LPxB_r{CJ!YxX4uAT;YxHwMkG`vOr+jC6bxe7~^Fh7Eq&61KjRb
z<LPyq6t=4+MKICw#JY@7@I;oa$pJw6P3BRMB;Q-}`P{2-UB(yru1jSED%yU18JiC_
z1u{u1$KjYC&PyU@F;%^vH^NwNSSW$c+leXAr=jI)NeKbkIq7lv94tfYFYPMG&pUFH
zc=bvNR5noi?pQZ;DUmkjjKO5&Ks%KiL&J!1?KQFefJS4}%nmGn&w1u_c8Mr8L`OGc
zV%N#w_ti)hk>2J0ZyMDX)Nl$hHF=<O&L5ZrTw@n#3V-?ReE)UB5AS=lt|ecS>9ict
z_43+2W5l;k5}#lAUKr)~r^Z1wRZTJVvG<X?0#H>^V|1^t@eL32?^Dnx&7m`+zz@i9
zKI@O{T~Z>Av&h7GgtCI1k$Vm|yTar*W8(s~22)y%Ny4)vq#G{Eh~k0Bd1nSyQAR%A
z;|03fuJ>(G>5Z15uGDyxBEzo@2#g*();mm+Zy=rH^(;5I*^AinYLi;u&Keil<)#O<
zt}>aT6@}tfh{a*6-d3dLJx482=-VKWZC#BwQv9TAaYSTfBAtPIpf8Y@)9K!Ia$qP;
z&2%X$_XpX=Etf->f|Z+A4m^K@d*ZN_a{Q#o;b3k<0SN4!uZEjp#g#wn6c{9TQzxF(
z&s0bvEKr4gTaF;Y*dD2Uv840Enc7NI#94CIyJMCO827~0pK-pvaQ;oEUqAsBYY2Z*
zM!meklzh^{M{E8i*Gj|6I)Q9UWUB_hcB@ro&r$-l6yO{5?NONLz_Plr9D^PRPHgQE
z%*ZD?x&jYbe~rlS*z4NOug}g|t?cpi#6IpjC^|oSV=dC9mI+W~d9v{aB*w<%N^PUb
z>n?dE`R#~oB>hS5hUJQ5d~AO_MUu~Czya6zpUz?Q?WY}yY`|wYyo3Ql2k$U;Rz_c)
zjLHDY?Ab@`*pK{p6<`Y%%G2B#_4*|%@W9@v%$(wZ>_iWjM34FAltApuA+=cnWtCy7
zjR-;7)S2D&fab>jYSFGgUCE2iX|6nY5UMve<Ds$qCK+Bfr~n;OLY5-ggxKbBmQI}b
zys^e7YkE~hI(_=R1Bwm8Tm&gjLKoD3`gh)G%9D9S1t>yAsG<ape<W+zvZgs1w-7na
zi$A})64!O;I(BJ8?6+j@)h%$o4CD*`BU5D6vKhJH%pk+7uxQ9hnG}(RUTQ6c?UhUT
zu!k|E?$DNglgs?Zu5#cdwS=1~Cpsu-G%L$nQ2o&!dRBuvfEHhItCw0{Y-k{cHxeh}
zqt}obIjEPAA6^QxQgWza8p=hKyS-CsQXly_3`U~22maWY8rqIQ&^(0gElUvKEIp~s
z>51v(>9%fHAx>=mjo`jatn%6GSqNbV!QMiVsyY0ZrN5z-4c_w!AL;%IX1DB}%LSl+
zZ`jQ_e^^O9H!@U2sd1@>(>A1bPi2=g8n#jUsKVQX|D3jgVqMMikPC7F>y;7++5Gt~
zRbU`m0LY%fB)EVn;uaUJ?8jeb^O8W70^D<UO_|-GF;?EIT+$cv>gU@qNqLBF4#sa0
zL{2Xfllx;NQsUR$MMjPw#>KNu%@C)6fD^?Jmc>4#b<(ddfYE^Jf5ET|rT4A|IL&+U
zLN-k!nmRhy%TX|%#%v(c(u2@r@^^lfq}_pst44mr{Pv$1n3QAcg=Xn?R0=dN$?nB{
zZRv`@LOXBv%>ZY%&%$%0Tilka9YKXZc^OsyS#M!a+i(%goxKzhmx8O9W<A4RP-i0;
zGVTk@K$KI7%K?D|i)%W&!#dE0@s~#$iw=#OcHMX4(P4HO#k+KRrFS2Ukl5@Ma@$?K
zBsC{2cT^fg9m3m*)O<SQa?lBK3GY)=HVM?3DZSgq#ls8pincG38fdMqxw{Kn3kk7g
zI*z~v?Vnpr+X}i3XnbU2MU0VV!>MLZQ|oE3??D(mVCmY{#*0cqG!{bt_PrdnEHsaC
zkFP#~oP^=;yX&rREovu*T#>B~*`W&~?1B5AwCkf)0}KTgFmEQLI{cA_ng2cO0pGRq
z8ubT~4eek_fN0J!mmR=w{V3gcbW!1r2m#|U&g(sn;~F+0{#$>XK6l?#t~w}`5JQE)
z0!S6ujhxKf0_T}U{_+@}0*dN$^3hsJ6W%T!jM|zkR%L>v94F({mCJ<(^r+5O6@s(-
zuePs|bj*`_>_y`f-Fcpcth>*7!9R7ggWYcf=<CrUg=~6bE@g~u_X8Eoa==|X!ADGo
zXV3BQd=~nJNygUAa>sDCVsQy@y&3)k-1NU1soRVQeo_sEjy~0Vi9|T#@8>n|emy}#
zhq;$8mfGCzQm)UaaXqZq5iWGA`A-l%V3(t!Tl}|X%AchR1zj}?n~v5Tm8l(0MEA5f
zZ9a*hUv=w^EP0(NT+HlbEM&uaeWUu+dgXW~K2gzL)$70?8(G;O#Lf>yQh&a-s%{ci
zDn(%6A)PFt=(3Pbs@`>*qIK;Rb9gv#ZNqDt+)9!Oz;%#la+c|G=qb&f#C4_fQjz}*
zuUoD8jtJQ|VgUG7$i20;L_i~u&_WiVVge8JbaJ`i4>}H@S4IAMuW@pAA%hQ+%~=tD
zabyPPEyd0$P>j3n-?vYgTY6o6F3^x0Cp-Q^xv$Za08gbH2!jvQ$rUpTDg$Hq21ef-
zdjcd>b!{;HRBLlFpnHv~-geb{E}khvDJi1$mrD+{J`uD60s?L+zibmOsg)=@t76}b
zt|MLj6Fyn@fJEVlpSvqK2l1K`1S+F4sab{ufQZ1gFx>=~A@zM?ATWl1^a!qf^65`;
z^IdinbW42zk~()OSRynXvVZH#ezq&qKGHc@Nh(PDCA+CUxzZ-|l{GR^-dpufDNp?*
zh#u=m(G#dd2hj#Ct}-6pf^K{fWTQ|hvs4QbN%8hs`(v(4jm}rtrQQF+#@qiM+kv_u
z=*r5&0)1quE5Y|Fb@@`zq?-m%*3=n(1mpbq!mTeBHNl4=sGc8OI|Jea9D`i8J^Qb`
z%oA0#0f0Kkb@HY_`{ew~V5l67krk}9lv1=H3)~A1ei{~2t8II{IMjY<p2h_3Vdz!c
z`z4bOav6`#&p`5T78Q_IhXf5?sTAfjhF_nbMG+yx;fJp5^%ieupLaEM`J0A5L&7Ue
z@%fVL6pDTbCF|<qKg56qKD&(9GTg^bHGm<tM3q%2bZeGq@o|Qmjj?CE{=r0O;#=UC
znY}BPAqNc*4q$?@IBsg&y!rF~$UGOsc)-x@cXUdicqIXzDUycP;xX&ty0XQreZ)8+
z)C7W<<H6LlCZ#hg=YpWjyNa^=7>e42pIzdN|8^sHa5x0oeZ?wFGeVP)-(G})pOF$b
zWQ_!8S*}lm*W#bAr?S$h?!=H<0UT|8dVY4*zc#$yb_w7n$ICbWC}4A>hTGTRRhhO}
zZpAiK1QTWydM4I&ZfVGwN5Zqc(_jMtT<efO5&PJs(d?26W%g?QdO^*M`k$y9=Eu~F
z1W^I?I|R$dM3*E;!GlJWGYs18``a6d;pz{B4Xc1~9llU5?#i?}-J5z?)r9rs7Mty*
z9p7m(meq$=|I~RI;9>vLFxVM^`ulfq%4g#zb76h_(?QUy%`mJZMWPBy$AkHnqEC13
z{W6|eqAh25spJt<292TnbjnI{m?NR)UzUrBHh$5K@UOD<&CrcBl$JICQm}6IM$D1A
z1yVHqi$|>GN}H<M@x4v>`}+Qcq<j%KzJce$V7y2`7-h1fg*5gMNgMOQ0AO!9aHh7;
z?8#6gUC|utbdm(l7U@;OY^}AJj;NXvt116UVIGN&W#%`YSoRxGB~Jj1RWT)A8fd~f
zLx^j2yAy>81ZvIxPVe0ue=R`KARcEvqnD#K&CVt(O=b1|T(ZnDb-GU-C$=rkWaFq%
zZfo;1F9-N&9#Ct`ClH`QB?NZ(CdcjPoSdsMnYQL>3XKeH@!)}+%hg$(Q|W%ioIC;6
z7!wdLx9JHRWYHzXo|u;7h^k~eTdJjGd4=c4Az|F?zqs8uu@?@u>Y^7v_gVrWjBdZB
zE^UN)x@273R>MI=?nup)NUlHv0GB3{pG@zhAJ;}C%ogicK}G^aC5v@SQ_YXib_>8j
zGx(4F3Nn|FeIQWkq*J!`{nO@l4w^cooz2#d+tT}`ZG%%Kmmt#G8kV~q-)qBxG_a$>
ziEzQWuadW`rxZ+WE{Dyj?J`a#<7?y|r>^=W8jLwiIkkf4gQEG@&pVCh@q$h?vspXJ
z1Gd0BsJf2@E&ngPWpHya{&KJO)IQBBA&PMY{an#KG=<ekzW%py=4N8;$xb{RE!7KC
zB#sIRvtGNjxn-uLu%+*jPSJ^vtnt*W*X>&$Lrl$+Q_=Ybcae_S@yvC``;9zwQPk9-
zr9rU*H={u$Cy4ujxB<Y|Ka#~4Wm@yRlB@0!^Dzm5&%GLQJXZdC^S#@p#Id=%tP9f7
zm11XCKjx!*zqa~q555dgI?Rklz16#O<T{sOfAHMew?#p=q8Zda&90c&X*U7}N~wKh
zpAWu)Vqf;a%0=v1&!_zSimfJc)epB)$v49aUa~AU%K%$<!=<yXdF&mlL#izT`vqo2
z11|*zNtRL$DU~!Sj;VSD5S!&Z@l3J&ufqHKA@<04{XTzBuA4ogM=i4r`Bv-TPXn2b
zi3`5V08JoAcaIxdU%7A+%CDSP^$v0_h#m!Puep8*!(Q4<*k43rM|Z@89wvS7F@yKb
zt~7R9BcrbS8SrVR^Vt51VZWJYPn&wq9GYFXl#(0{^$$OGuUOc%c&|Q<&j*mxPm7)_
zB2tx{<qEVdMAmD6JFGT1tV^=%B!;dmzQWt#>WLnBVO5UZ8IUxO*fkG5B&o59yHs^Z
zwr@%1U$#VOpS{@kA0mmUn<*O1OoHHSI8jICN>PJVJca59vwXI_Z&j+J=XPAF^a{z;
zTjSojkhwUgd*Z-ct-&WZFJP)|f+k2fs(hkzQ_KoFa~4XocJk5@X0=Q+QQ)F<*a~HL
zxf<CkiVn*AJ>Wr$;U~HOMrY?V^BGYYrPBoufss=Ou=6ztL>8`kP1UBLBQ?(>=(7<h
zW7khpUqAG;1-W#PL5cA_5ksfa{oLFF*}?84?!uF^e#DrUm8)H)hg)Ll$EJI+eXq$P
zBkJ>}0KdL3iq9CLd!Tt^OC4tA`PXuMgex_RPL8c~Uing^Mh*MgbE4FLy$Ri{wQya^
zb%8p+e{qixOOv90YdITe*-0nx{E~A&yT(ndWZ7A{z<V0X&7g>x$~JHEpe>gk{w>lo
z@mu!OF-?QQc=n5AsI#>gA6g??d3l|tVFRO?GN7#3=rEIe(I}1SPN-;K+^@Ll@Luv@
zV}6_c&(V&7?=Oq3mh$F<TRKLfAy?WI1Wqerbt#_?M(n10DEMSEva$bY=2bIJ&|f|h
zV07OZmil{!<HN^GmZ1hqzkhR+FweCHu~!L02A?7WYKLCn7ejX`RnI<>%9<0U(k4RM
z8pIjhv8u`q0APnm93)@r-WTJRcQPNl3>gH8JZMw~NhqhL@aanY97|o?|FZneYNqeM
z$V$LHcNuY${NG**Sv*wSmxQ<}^&8~{6jydg%PU-190v{tOWKIv`U^#|cvm4osVcvm
zL?o<bhm7B{sO8LdCFMiAA1F)0<1Vy-49~_~^=>-rpjCoq;M#mlE_3Z$V4dv?aGtNF
zUi+e~Y2vz!CCQTYz*IDsRtG(p@4)olcA;LM&B!kE;G0KIxVC=MBA9J0lD~CXJaojv
zh_k*f!;da~c6lc4zu1?<%VkPM@$7Gaz&gIlbnXesAudR+=+G{Np#^|7Q5L`7e5ZBG
zdCz7wH9WXg9*;U;<^qU_Z~uAQwN&s7__6x~QkcGplqpcWya$<j%9K__LY?cIxWYDO
z2JOv=PEtQi{fot^3CugYQd^eFDHIT<<Q5dzC@rAasS<3IpQw`?RMdabd(I*;-E=1-
z`f6`Ra_~$r_*+Yy+VKAU2ydLZU;6&zfH(n%lbk0re;G`^FOPVP*<6B4UEjsjV^%#_
z;x~rijX*1&as7Po2Dz{(NAbG5*Zla;(<u1(;K{IaNNGXfaRA+aK;Vl(*PozHt0<N^
z9dw+HUSAHUs6W6s%z_O}O30};1?-T3|Cn-rzLwGVq1Qrkd5Ec6PZCSvEZz4E%OgKO
zbt&e?>5(-hH%EBCRxqKC+(jVE1Tbrg#%SZ8x?T1KQqVhVivg=k09!$BEA{m}M8Yze
z%FS{bGf|sG&fh;^t6XY->vlT+h{d<hnQf{tV1Oou<g$6|0ecSnAK^{3O@lGb;iPdm
zW+8)W*A(<>QdsJuSY6CxJq+<OF-PBo*d_2IN!(n@tb}RoOnLo86+>inwLPL9m}=a7
z<MbBIuE-F}Q2)WN2lfexaj@A%Iw36B;%9!{*LMp2@sFu@GIe;wpTgdSrsv$6o=)OB
zfqzTgI(JH!itFP`*$U}7_V6eTFO|ogW$?uMHg_C_y0R%_s|c3E-_>}MgsbEP2yo`B
z|1pQ3cbLGho&ey1rHpABn>6XOOYawaqwQl~ueg3u!^w=F1}D(UjAD}6QI$7{>cRGB
zqC_>%5whV)Y`o}V72^LfBL{s>{>?u{|7f-)!s3FS#8{@XBbl=VX^w?>ZeE|E1_Jn&
zjnT_5SoM!dWj1~ZuSZ|GC4VwUOtHInjWAbvGEcua(@^r9ar`aU7RsS@DDZ$)t;Vh2
z`Iub3>?(3=)kfDTp6g4VRlU3U9d7W|I@cN=2#ldX?s~_x8%Bzkg|w9R<HNLdv3%hn
zfgnM20#lQNAkYL)B8Xu~r)ST%K%_cC+3zs3KgD?FR$fZqW|DAMY`nswJX@~7d%QkB
z&2dz>v|0rLnh$TTn8B{zVec~srsN~gO<3jOfi`()*aG32?{Zig{VkDX*LVDab}{cf
zy*?+@TSr6IU{)X6b~azt-rjOU4x+;+B<z2+jwvaRiQK#9B{^O|X{tZJFi?X9*WvKP
zKrh?gtfL&}i1p43#_d3Imi6kd(o3kM6q5>GVKOrFG$viKFg2RY*z@M&n_(xPBHMCr
z!s0W@1UB7%hjf3Juy@}8PZoW<it+VayPzVbi1N5Gzm<cIS3wnD0uY&ZFsq-%Yjm>p
zHRS2;c9Rrt#~v=AvDD)kDPiu3Kk0Q4FA7DMoKiz9cVe4Od#*w%)fFYfroawg45#=g
zXIJz1cmEC^;Eu8M_b@cD^alag2scm(w+T1iL^~sk1>0aa0iek28vY{T1`yzh;nW(0
zym1qh+M4_kkkm@y#+A~VtlOH@nk+}3(mJ0FNNJ_;%gBArl-!Lx%=?8o_q8$V|GQ(w
z|Bc=KzdpT8Z%o3t$n}XD29g1$+;Q+Hu`4a3{8|7NsVhvAJsd-R{BR6e40$F&4r7GA
zAWfd+S$j;K@{oHVF8W+0f91OW1H(ND5o;1UpW`F#v;Xlg7k)_dtWxSPp<Qfs+?HvT
zQkvdIR90>==c?5AFFW2qU*%lkUo?1!d@q*}HzXmxa$fcP0Plf_Z{3vIZqU_875w+I
zH=9S&&SxKb`*O@_4t=mV9QttCXI-xIPN`>c{rdcGF+DpKHdW+<rftGqd*;;4#Q+{j
zdcP)5UGQb^y4(J?rKDMY1;qCj$@K>q)~_Lt_DQQSv4ISq{&V!;fA9J4+gEX6!YS&3
z{!qE}k#6Hl$$y@MOE4Pt)>%8uGZT55SH1CF`fwQ`ckGh!KLx%MX0gx+g|WgUbu5}z
z{@9f6RGQTfQMo#$OWMb-b-X3BoeZ;wJ9_n~dOjpazmg^QhCZtXrFd|2f&ST|80mF+
zfxh2e+{v@gje5i;i=t0_)i&?RI(P3rDl``~t=86akmxOohzhnH>>&gv`tBL$X2_h=
z)K>>>;qmv1op%k@ik0PjUm^lejs<VMeD}9(iw5ULfK95vwK)i9NldBup>4$L<GG@%
z^Qu0P{k%nClZIEP@h_JV#Bi-Xli2WyVj$taxd6Yt1e>oU4XRZ5tx2ylSqu1l&wOe)
z*BkbsO_3K)Fvz)E^nm!w5vK^!P4WD?=A^wlyRz&0{7xeBh#H0$CFT4Dm)H~0+hult
z6BE<!0Dcx2$;y6+^v{u(UhO#BgU|Mubi4sya)oT?PNP#H$gHs+qiDgBck6bXkfgZn
zq@n^unayN@sO$h^X3XPC@hsBW)~)dldAup|0ApfIA*_mj+aFt5q&ZyL!5;a4@)=nM
z#(nx1Q!*1JswUESrmTR?$gr!U+A@RepW^T%%rIHq(WlILXLJ)KUfnOJ0q*dVEm_Zf
z;6rwrdLP)>vw?LrKp|#%<;66pXtQKMc6bu`_3#)7v@7r^wUShxvG?rt9Ru?lMlITe
z(96XSTwKvl*bB|7G*YPuw^V3}Yv&|hKnuI*%BUi`8I{KTPMMB44R8H7gIfIV{xAh)
z9=t0ehu~z%MCFISiW2?KdYTFUs6cJSgeOb&ODmGiiw1)D1(2^7pNn5FQ>%Ri;piI}
zvk%?sUenAL6Ht!bSqj(beM=Wb2xA2m55S*M$2C&*xEYKeq=FcvAC15@2xo7r-h{Cs
zsasjE++Jg?{@j8>``KP&a7omJ?}Af@n=1Q!2g}#zJx+8unN=4nI&Y@WN+#RRf*Tb#
z5Qjoyy!%VAh#4a4iQP;6h08WSx#QM{yAgZHyA3*f`^Bw|fu{Az0I_&^GS?r}p*j)M
z{)dj2P7ry;<sM`pP<w8l$(oSUo+m)%`nsjgDaq&-&#Aybcq77^kYVmLz70DG>igPG
zl#KOQ3LX{l1aPl;bd2~2VA>tr4~~i$DB53SM@({JP9>Qhri5&X-Y?dSkO3U87B#Ct
zrIS{!`iJf+o3*W#>+tucvIdjAVZqXKkI5rreInI*rfiezUyTcQ4tZp0#`0zU+(|y)
zMwHKCoCNfB5_J_~x#=$LJM44cJJ;F7Wz3PQyYUX#^%%H{U2T2!F@EJKkRfnMzPn;h
zgm#!n&gm@Dc=YAcw$W(3{ECD!s&@Bmq02(Sb&lLeztki=<9hVxqRDQCNC#AKqZ1R^
z=FWw0LlKdpdZg7a@P|r_BLR1L?RhEf%iK+;>RHW^eQ(61xz5;6v<|6L_spw_l_2?9
zZy+x^Y`wGTGrAWh(Flmf-u0W43#a;4jofU2I(`OSWvWUuDf;19RB<=2Np39|v7^_C
zME2#}4>0eKrie-KC&s^I_AP(YKoh~Pj?KwDzj0zIIAyV<{^MeRK2xo^@LKtb%D9qY
z;w~+Ym`F5E`pmMnpeF1DuzR@XtRMR(?hla4!@P+6WXT4rQAczB>}q`E4z|-!yM`vc
zleFxOm@N!BCLAhxEs%OHm?LD*;USUUJLc9>{rP)Vx0+$}0Ra($Z3zN<_vLZM*(Vqj
zc?gzwkFkqLxIVv^h6zyHX)=Nr*|_ncHLX2WKRyZhvYsBJat?IKZ6rsMlpLl0%n0LE
zkYaNpanspszIKF2ujj?js%_!V&zgA-iv*rxojA_p&5C0Uo}7ItnOn?y<IQ$47R|ed
zB2KczL-drI@#A%})ouLa+RDbCYfh06l3k@}MAmyID}fT6f|v5ZhhnnCm$Z?Q!nSj0
zboQd~=VEt}UFV%;$E~<2tkYtMD_gjbiq!KI7xK!pDKx5b)>al^XYAY?JNM-oXsTzH
zW@L5PJ<mtiB-doYr#(dj7rn1qoUeN0<P1uYzmGMkR=kaqd7EBm7+dbH9L=UkGA$GL
zqYaTQL<Tba7_dm7`@?wn@;+r9=_)PI;(8dvj8uF~TBMm$4Z8mRlcOx+oz1K~1;?s8
z<SUGI%V{4nl+SA9>AS&iB`fo?)}=*mUp>9qDAQvWn2EZIo4tMLJrKw6_EzYqUIec;
ztc376YAyJ>*Q`{cj=v!1kkEaI95awJZUwHNRQgBy^ZSCzZ;+rP-_H2Cyr4JW$V|a-
zEn#@KumFS4Oy0o7|KRE^fa(a=t<gb(2X}`c!685h9^BpC-2w#HAi*uT?%?k35Zv9}
z-QC|#?mhSYb*QcacFlD6%wFA}uCG(%^;S#0WUTe-81YM27{AwoiN+5txP(d}G2jhG
z+cx{wC2&vh3<t_ZD=)Ooci*~An5b5e{O}{quFSdZr1Uge%!_1I+MlMnGIV+}D$c#$
zxyI30-qw~4T*vCb#)ZxKHst|6&oVY2qv2i0mv!xl?$;x=rU4_Oaydg?P<IR801Ky5
z;-KwY*|~Lo*1TTo0;Fc%uZ!cerzz%pkVwmU=}ceSmdDEX(|X%St_sMcYXcXDW)+eu
zcX4ChO*~K%ORwT3tZ5fX(t96$$;<C}$FoeehP3AOW2IjPUg=ag<j&?hYPXU&dZ%PP
zHqa*a@ana0$iVD~*$){PA$ZvglwnEl|FvIhK{%YXWv>k@7>%QqKdky#&R9-)`7Kbg
zuich1QFM4I%vN;A_;|mI1P&+c{A+?k;nuezC){$OUq+ovR^3*Xg8i+G8?%G00uG~s
zG-@JX=UBYDXN0)&#+G_t9Q&^ldbNh{>XXjwI4u*7exjmHESNkf%GKMagmFzC6mAVO
z;5ZKL%r_3l$|mlmevrtY-Rv`R4c_9*jH+=LKeeHAu6o1IDSlp_a1OL+{!^o4ugo}W
zQn|#0nL?5A`*2x#SR|Fb^m!X?_osj3#y4xNKdl21CJ(9IEdw{jjh$lt-<Kl4*nZ(T
zk=|NdsBAkznc8}AqW}36p!=%`r2JQGvUqLJ2sx<Y@{Enls&Fu`tr)j84|vY$(|AM<
zJxK9|&jcT+rt(c5lGS?G7}7nJ)32OjM7C?2y*i{n3_10kqBHg>8f`q9!;(o&uW?s1
z;>W^)I)uUEbNjCKbM~_`@73Pt-7%X;9XmHaPwus2?5Rknm!)L|ja#h*B^zt*;X+BB
z&&^KxpAR(xMx(IZ_!yLi<Oog6d`7h27AtSwkLB;AKSv3+gHn8+QoP95#zcvlm1YSd
zeV%mUCVB;qSiF?kzqqh+1NOV0cV#`+<+_&HLLlFx+H8B5i2P#T*;(F?EyR!fbRwI#
zaxj0Jw^v;+sI2F#RyIHSYE@yoq#)KjwG_FRbm+MeWZ%$~3|<60jH!IKGhNNhN+Nn+
zjl~F%_gCywP0GCY>lq#z>ShC2ZJEJNu3EoclrW7X11s)(8jnn)rd;PhvR3M5mH(v`
zpnzVK2GpoGzUUk;PwK_DGY`hSj;%%o@#xs5lx_1p%B($-aJ=0}a-+q_PB2{JID1*`
z`m6}NkDUTDR+{lQRNjH}a7p;pZ9v76mcyBd=B2RnfAo5B`;Hb;V0lwXhM8M4`d;!l
z+EE@ZzUj7EQj<$EFuAQxza<jI+>M=@?-^GIW8{#O)cqB?T_K*|zizkVkZ|faCpGqi
zuA)4(yIT5!g9}<krwxPGw2mxQ!s<eBuWnyDS*<simZ~mArn2um>ek8!21-*V{DXsE
zmkFzG?`Bk3(G;RC<C#*3TiZWeia8R5&S&2ovEyL4u?W}KW`SjJ7vY7#DjJ=Oy<NXU
zU*=58ciU>u@X_z))QQWh>P#n#9I#fr2iMguNEWN#xr#Stu}`tAq5{)pqgpdpMB`dZ
zp4|?}cRY<&w6pMYImFz_Pk3${!MU~aZZF8Oj~kIu$&YSRd>C^R&cyNeGOuwA&;Qs3
z7gWVy``#L1i+jkqdsx)FsyFBK0K?6qtIh%()y&)#$00%OyE^(3XIGNCrWi3P@~jZk
z1Qyj*s`Sbx{5WoT<a3=+#}dPi368aSEE&oo2PuukMT7I-y-GD6S%Phg4^WB>SU*HA
zYupv42Y)PnzJ{3EuZfgpdwdsbLO1tPA4+u0^fl{sHRS);4cQ2cmLbbKt;?|d2F*uE
zL!B<~4=j#VA26y3UbP3_J%l8ku`fZ~hU(sGMfz8>6OlO99+1u<>o|$r4Y~6(C^5h$
zJb7wf67Ybl-pFNZR*gIc;WRQuUOpRh=Q?T8VHf`7BN53X&zhw(3km+dNSy;Oi77#T
zXKx(iOg9nz>oOUgU3_~gF<-+{?Vj)zi>)STA~D?wn;UIn{qiUN6b7Fdl^kZ0WuvpX
zhfZSoLJDTGBv1WJjXFF18e#t7hE8%}PBUUP4mU-NIETUquPq%4Uf%S6)dYQ|sND6c
znY0h&ifu239UyT1ih5WKv~+G)=Fin;4H~V5g&5v=_xkml)ZQY(!fzADTA&NeiN_bP
zj+n+5?B<1j_4rX}{V0#W+i8W{FTR1|{n8ffmIu{IpPoCd`{N}N8dJK1&sWI7q%VTq
z7$L#^7dG5z3ZiT9C@_3U3eO(S%e#7lSUuj%ZDzM2+H>z>l-}%ze~JwM+(Y^ibEo$0
z?4h0vF?fw&Xt0)h!Q|dOuAH78<=3d4kIoha`6SkkC8Vx$#ua(B31{_=NQNty8=Km<
zF|j9yn0hJZQohg2z4l$Tb`{l8)k6ew@hI@k@MDs^3p-d%zIRXXO7FEImYmncm47_i
zlWa{MIPl7G>5S%0jUhL6Szb4I_cDUXA0)$v3?kutZ7j0*<zCIbN)XR2JaorYgpq%P
zSzFXO@A$q{-Iod+>yDiEXCDvS6kAY`D<%xXyT*!PB_ffNTh;`4$Ij&brGRDkMq}TP
z<Cgh<5v(IGZ15(6y@{}&`~r#^%!K2k{Z$wHMZ5Qc_T<-zb{^LpssI?qG5EJ>E$%8}
zDm_Ac^$8EBR98BsWb2vx4H1hmiySVlw7%5j!D*?(U$zV3dDeOkH?fZO?lc|Qs*`dL
z&%6(B#?Gklm2K&xxe9;M*f+PJB<^{XvYmU#=xC>i2!B7VX7)QyB|eWR$@n<1!*XX2
z-k$?~<$d-ZYSg=)Ywjx;rcU*j^aieaV#b$6BP5@8oy*!mAs>~{CSruZWTg^sL*({c
zGKFoT$b)<v>Ooq)x2(98b}$v<c1NLy(mzDlgf{4k2TdU%;Vfxz3YlHXO`1|v(U`V!
zS@h(rMyhqq%ZGOC^bz&+k2IDSgu;ZJgm7XCZ=lkiz^%T*g4_leu(T6CT98tymEU$(
zGz7nME?5z{8M(voeI#KO0EeUbM4?#NjHp?_>PX&@+YrsA-mBEQ=vb-vYc7Y}g{<Tt
zEc6~Gm_?s{M;Nm=f9_epHO<tR4V}^H&d;`nNf2+^`%m-G9ozNkBYv)({}~MC*KFP)
zuZCujSdimjjR_gP6$~njaSP78rr|JE?qy++L~vC_U*v#O_{!0UOkQRC?m!~WyT|vB
zglH4d%kV97XSw=j2-?5S>zqrG8Pg+or1FhG+mi<d7Y8*X_uKTWF}8cF^F+`e&5{Uh
zxXG>bu1>M?P7tck++NGliT&+d)eyD3(eFnmX+v`Gc?y(sMApP{Hy^=*-r?uML>=p6
zRMuZvZ}RFamc!1sN9Ihp=7`ZJP7wETFj<Sphf_befbh45<6nW^dkN`tmv|S#$VMJ2
z;$z3k$J-~Jv()Qy@jHytGm)Cyp>oYi!;RD82g;!1{8?>p3YSa4&&j7s>O-C`Bwh@o
z?CqDD@LdmnF{=i-p^5(0G5!NHRd67_RpACw?ny#`(=l~R*2efHovUo<_GHEBov>_N
zj7LL6%HD`@)5-+LPWjAKqT@ZE2d8Ek(_G;Fv4tvEvNN@kRtHGgqvzn4n4)nJGmV)l
zr|ntd<6zns7o)#g>c=x)-{9lG;!;_12TiqV7vozUV8UX?Y9zgmvT2&e#RPt0;qo85
zB()wf_a7zVS)J&(7O6ce)$DqW3G-U*Xv2NR<H`8!B(}9)&S~BPtNmFIH6zo{?ZA-E
zKApmQzO}knUGjCD`Gb(~*;B5-6)u{>5n7MOUdbw&AKwx6A=|Twz(om8I|X@`-W@V~
zQJKrExzs=w^9O!>)JBbze%|WTtH&Tl(p%!9$`b8W`QLC4p^>*o!ort&biw<#cVN5r
zuS=#nVZf9@DSk%NPKxDVp0%0NZv7?GIU;p+jJ}?2)l&UVxTO8Vv7S^#KmX9db<Px9
zThP>GmrVW}sMY0tRMsH&s~Z0pC+nGq=S?_ds3^sIoz9RX77FbWLBXJ~?_#Kp0jP}d
z^|WX;1T5rt-*5!>O_fVv1Q}5Up@)SJdMR??$Jw<VlHrqLlqu6u{oy`FB8{#&@?F0P
zsZghXcY0Ly>U!}w6e=jvt(~vE(^M&*U6oRIvm6!RVy+G})YY&kv8=H6p!phMO-l#%
z*h#ktcxFwRg$!P|#fVgl*<yRCA`@;LM;iUT@-gU5M}(GhLuh#WeeWSbf=-(jZC%XU
z^bZ3-zcytxL-^WVa`uQuqdY$t{w$^BhvZ?f8~c)L<;Z2`C;6^5S6l$dxS^gUeQ?E5
zRZgn~sXms)D+gRfpZ%UH51~7FU<jV2mxBcgR(*4~zbDw#rWD3ecvF6Ic<}Ub|1h@<
zu8_j=;~Y7L#|_Vy<ScRVrBZo3`Flyn@1E;hiY%A7lD`e};+8MgSWa;zM%a<~bgI54
z5n>m6T+yd=BL#B)j*Hn#WqL{lQdC%-b}Z!Y<Sv>_%zk@<w1~x}Zb)9k<YlNj^#Ol;
z#{x#7vJI=EZ|<~0R_kgL5jpo{=VaZEVOJws&Rah;yO~)OD55@-k!9vl$q&7&EGd?h
z)6rL_`}&Q)!3mQ##AA}IeNHzNdXd$6mV0*0@bGBn=En8Xb*v~RSocCNZ;0J9!ia}c
zz&NEsOz@B1iI|F{-DE8&wL`W&!fO_J1ncnlw3_$g0P`h{W07l0LC?fEyqO)jW#-wW
zc{hJ%A-|cZJ3qF~%KNCSaFaqW1rL<5>HV37ClCKF%Ph;s8dI|FT2-5d(pkmjfI+*~
zU4%WOtTz0L{oLh9EcW6H_y#%9;g8)+a?KkqnuwesdPLGqixl;NBRffJSuJGKlHzws
z7RxM)ay{DT;g)UJ#k9_o3VM`Y;Q>R5aItwSofQmi_azCcQ>*lCY^)irANt`XH;y7V
z@Mb(Eu)}^y%HETL^PKzn;b(ins0t=3C~!?ovM&f5Y4;RQcZFLstZZR)OA)RK)g-Nz
zhUGde9`;%QZ7^N9+6|2KmqCfM+R9xD(G0+Ck*$RUskkJI(tWK-jr~<$nObIGW%b+L
z-@W^%E$oGiinllIRYQG^`$`6bTk3=BeF=vksNoQC!dr{>n>gkRdA3U;daty19Tz{r
znl=1aG%N`=SipDJ3(v|DFePx2c#}{~az94?X?5X6?=r2H%*)s>^+zNi_cF;Gi=Dp)
zpC>v&(hndnFjsZKn&O(ro)kw+Pq(QMLy^c9!H~ERI%f<pAJOBX(R+^eJk@=v`FJpM
z<u4o<mTY=CFYJp-|H(a;s{?j%yZ0heMJzy(V*J&Ae~4d6L)3S!^GjJBLh-RWQdy#{
zrC)E~br+n<(tCs*LTp(RxG)rFR1sO9K-EW1%I4(3-C~}0ed$DR(Evft)WGs?Hn|HK
z$5BtXr;=<!k2qV2&|d#*Aw6?`A?4bTy97ZZ2;Dx^#!Igx`8Yh_@nAKh$c@i)3WZW2
z{uAsa0)Q|*q+GYMl7XXj&5h9Qv&$cngt>c-#BTTj>MOQw#Bh)Qn1aL-F5s)YRhO89
z17aQ*`5@Lu1-QQTL@a?qO<Z^;dyWvC&Ev@2k&(Gw!r>6!bCH*8F7K98!NCb5v3yG^
z-0<`?NVpK9`Sg;5ccwDk&wvDIRM519TM8q&Sv=!^?8l%l8CKVtuPvsIPIaCzuHi@E
zf^(eFdVJa?0y?e_R1J1!=RQ<iRvE)#DX%+3G~{Y_X%+43A8xb6PghvO_|h*DcWi*x
zE$N@`jW@qyiCCKgf)6hr$mvy}FZ4BNEkX-EvSAZgO~+739DWy_73GdpC8Tx|ofQm9
zgt`kausD!}TNd86WPwcd#w}aUiDdS?rR8LAlj3N6VrnBr5gu?->Z?AJuDn=+)W)GM
z+3i)XT2;+Agg7tIbya2}1lD0sE<R-)=iT*0kt^HOvng?}^)>aa1HV_!@femgPWrG?
z3)6c9!x)lL0grL%ljT!EM}NDNYT(}YqvuylWMI7PW&SJXXV{!m+__%Bmwci@$BMgQ
z!ueaa%@d&xx}G0i(x0ogYitpI?FkfEz<la-60OmCTUq)lq>`2_goP<x-E=>RxkrPp
zFj34rmv#>aS6br=3ApcNg-B^3)E`w)`e<OjXDSv@YzA>2;L1amq315jZAM?2bqGO1
z8eFmIzzzinnGqB-)REZEdp8&q^W_Yo{yI&b@$lDmo-!Mbb1!3l4qHV5ZP;m6jsw1C
zY5`r_J8QJ2w7LAVyzX!S`_Ed5s<^ao?2Tqp<lHav<SD5EF3FkIP9oU1vds}|j9B}-
z2saf;>;{&F(spAkz<MgfFF9Rg1eNKWcYX>C^Mrh&SZJmJlZp~CKl-!fErbmNXcw^;
zczy1xW+bn$s~gYN56?3u;kuYdn8_PFV!22IHqN&%zSlFIM$yur1?QIXEvm7$*&(IL
z&q4XtcH^IE4_3e`3;j|S3TWrF(&@FQQySCvU1~B$;|sQI-YfGqtIWg$0FvYs4rgCK
z(6xK9hMvJhhF#DuLdiKxD$0O=eM+G<nfu319&@zQLl<w;IZt=B5xkQJXLG(2|6ST0
z>-d)y|EI^|@Tj-mv^OOGgSHx9ElgVHo3QkkU3=-+kX+%5kboIVHLAjv!m2F%dU1By
z`_yK|l*;0iLfQ`fNCs9x1dRtlhuK--t|Ci7|8lnQYSxK2B^agD^bc#edZVNc5Z%BS
zh4eN+DqEA5{VQOftnF1fr=_?U8@m`A!N+m87SAy>sSA;1-VQOUFfw=zT8N_}AKPis
z)2+%>%|UXQ!rF<wBlA}%it@(W;gWUUPs9l!&nr%M>EM}z?iN)qTv7w4)jx1-MJR9#
zk8#padP7dKwyWs5em<MEDK{i<8d~yDGXxbb+jZ#%d#nvmAh^oZM4zF9AOH$m<1~1L
zia5GtA)XLQ;m{NKqO4fSdrYs=gW$y1F@D^_JQ8^vlRz7anib@Fd(i(}5Do{ES*tv0
zOv*Qoq*td2uRrp(uHO6<`ys$G5{qBo2F_6SlUeBp!av_uWe-#$`W^y4KzU4=5n*1s
z4k>d2UwMVx>YUvIicZk<^tO*8)~9Hsns{Mgfhd&moH3S2Xu$WXXL@c`VyBHy<cly0
z!|SL&_STV<^N0lXh}jbR+pyLMkpj<MmB|3&>yZ6B&I6IXf@;HM^UV6`2HYy*->%-j
zc20x=-y+Dv&@n@Dpyx=hN=syJM0$G0GY<cEv1+w<@>GJq@FSWpSyR-m$UHd-kj9z%
zEtptymmi~mZicPVd^-WAUFjBUP$t2T4e;$kq^WM7Y@y;=W+A_iKBGskd?>eimugpn
zR41tWC*3>h@4W@)1Hw<7t6B~roFc#lSF5Yd6e<Rq(5hTJ3=q$zNAqq?*<`^YiWt&Y
zyKuqnPk(uzR<y*!+KA3=f-0y*=xBiH5CG6sO#*eSS;OT|XyKHkW?G`exuK(fKdE<j
zNJ>W(R~~Q0!mBm@{5u?W;PsQ3uzC^PW@nZ1BrIxUM)b3#zy<^Ync+O@9W}(ddI!$h
zhGlWZmMRSJ8;5hIK8yT~N%dEn+(T@J*fn^IL#dn-^EQZ350{J27}UEsWMHC|aNLDF
zHuBcA$84lvo)EfAk-HOcM9b(3`25zqeY1y79Y&3N8yde2zyHAhND_P<FL_wm_9^BB
z%L^Ecpw)f*RZ2q<<Q#y8aS<+f+sDN2V8Bk|8NIiVZC23cklg=SWet)vhI41I%@_bI
zYd<vUi8IhIxeAY*4RCE$?sobPB?p>dUk#N<H~t7EHdJq+&fie4(Mwc_#DeKBq;21J
z6}oRQ0@oo|R=l<B*QuBIQK1Y}Q-|fB^cw}a(}63-98hB{P#r<3(!^&|8(9Q_3w1(Q
ziC67sQf#FcGk*dAr^T40;{(Rj6wvuQ5lio}(DeuxxI{9$yo`M&jD@`O7s4=!b8(4_
z$CC7<a6yGqc0((oBIjKMITP)$y&{*ct<_B#%)A|G`}Y9AXaD_+C<p?erSV|jE?dg!
zh;U(nakVS-%j8tMeFp`|XA{l72wG+;capKU@7b&gfs+1ISC$0dYE#uSVWlc{0{{{k
zq97hG5{lFgyy@YEnKAj2)sKrszRRzgv>}keX%cd1pOV3)zzlc=0{1lGZQb+*gF}D#
z1Higw_WpQP-8rHz5;3lP^$nBK0(>U1c-(RWX$Z133u@E_a~4jfrN@}>DzBWQN!t}O
zlFOX(eVcrMaR*}WG3R$*+UW1hzY~R1nl~rZL-rW?u|F(#pApze&@~dEza#$u5y+GL
zdMLFN#bLw0TJv(BYvNJ`36!MiFSod5I69IAuB6ok6WLZSmfx?BWH#Gs;)U6)^Lyvv
z7b8y%e%&E<ek{SR>>`RdE*}exyxA|+ko?m{^uaHjhbrN1i{Rpk7@{UA;jU{IOoK;C
zH)&B9j0#DR{9e)PVICYzwstVr9be<VC!vFFgr@(D3lj>#0s!OtdG$!=S-g!?RIkPA
zhe^T5M#1a9arZUWuD;XPr>K6cIMxJw1K6^2lVp(#(So6+umt`pd%u9JkU!I!{^k*R
zus<VF4Gp9UR4x!3A;ESDLz%e~U%yJ)HosRl%w@J;VTrU33IHhB9}m06A0_=NJPxql
zgI^fsx@fpsN$oiS09QMXA3PimT%lC_!In>gS40w3)6#)8k38V#z#VF16}V|gy`ud6
z0L#zLfn}T6TB&o}tH!waZ0kQw;;I7gS*ESkb!Ql4r$e_30AS67cZg-DEOtbTI#umZ
z@M<|@@A5yn03`T=2|$K4Vr7f%Qeq0JcguDgE%*R|-G=^0G!r(jDNBrnNW>v5ln!V|
zO)68_!0A6^im>TIQ5HMU>>%x56~B06N<)#id$yq-xTqODu|bxYXR~I>s^>J~Rys(i
z@OgqBGPn&!0Z;>Mdc!$Ss<frKiiKuSz*i@s*m(mh5f%{L31im~1f^H=2vt?QIi$X)
z^pGApy4z3F>fSq*NnOFL3*x+ho@lknwfaTjIt)Sn#4GR8yoMGL;Q@!$a!S{toT0*T
z#qkL(*|6IDmv>9Wx5gT;T}iZ*i#{)q!k<<Y#&U*KX-`}^T1Ti)OHo}?Ms}Q~b{<sx
zbKID5^+|?y486*i_h+_17CpE(WB?$p-j!gBe9Rh89T1p%2~FvB)Ffm4#FKP}bLxi5
z5DyI@EZd$8Dnt1K)(?9#`a{>>JqMy@u`9OYUG>Koh5*3uqn9k>#&G0KEdYej&_EEl
zYTICu{OsELwj?bwCZV8i$7gQ1qW#2_@BcOlD%#6O&u<!nK2|_Z8azhCZ;IR(DOg<f
z;~mKFda<e2piqip)e6|reA`~7bl8RDa}SP^u5FFQ-9P4VNns_nT&*Tl+AtGL<)_i1
z-NEqs1^~>*=pir3;VpVUI=x7aG?1`+60OTtwO_NZ6qIa#{BCUiY7A|}jv93n&pVrV
zU(@p--wW0!e39bgR9drQ-#Io#VzcBQxjH^dj;-nl5aWa?Xxea;{-IT1p6WkaV9^v@
z@%lNG+#`l^@qN+RP__d@D?7dr9_$0S_0AV9TZ|du7c5-i6I{rT#<W>wx&-=gtlz!m
z3wnqYtgw)?A$3Ei@^9&&rM~Um_>HIqY(?zt4|raqf>P~R8Kb@LrC3(65W{TNs<Kk;
zv3(>{V%9LWvn0@1ws)M{>t+|qlU+(mApmjDp3+~ph2w##?-@qLIJ-cB`JZY@hFnCV
z>h2PtWQ#It@36~tD^65oK=E&;yVece-moY(&fa-`*e}1V`Qp;J__&fZ8$~YM3)RD`
zR-E%!z9jOS)Wxh-4@E&zrY8)#(W{-HI>4{+Cj&q|Q+yQhW;M#ZWS7yxY;c7#TDQM>
z;WG-U1NDPQw0QQ2;1qsD5%sdL?w_=cLPs5BY^&EziL!}+vFW{68jOeB_mKsll(KS6
z-Q0#j?M<4erc#XfA5AhYjY!@I-w16lemhqf_LF+YVCGeYe{3FD5aL>1Nu7@Q#ITm9
zpg?o#$62=B@%IA^L0z)`xdzQ~X2F?T;=o_1W%qb8n5wB<R5PoVvpCpru`wHg1GZKl
z*NR5h<%p9l;e|U5sWBy&%Njc+u7onIR#jwK_eg^l8+F7BzE@6WMe)3D;%{K(Y4X~E
zUPF1GUBYJePL-|@*=UqCP9>RL;<OA9oP-&VesfCMXi)e6=w{zqh9>`j+i1uP##wQK
zA{N7Kzz}vBd6>9*UwdpU%_Mfs5$Mx^t?ZMm6LUUnNZS>(BNq*4R;#XyCc>xt<e`Ha
zlO-vEM&q}*5W!=)m+wWZ)^^5@j2G8}V_pe{8|VhU#!-~2%1&j?Gm0Xui<O@=7gK)E
zTE8#k77ajn$YRHP)(e_$r8=NH*2^u8f2^l2yaE9I{huY@=&TWd5!k<DI9@T3z?d&M
zTl9J~prZ-#aqXy(-R656hPG7&t_`W|qRJT~NVXlWmecfeyo+uA9O6pdHyz_?z<#ur
z?04})TpV<qD0jNgAU5+dN$4&`JYg5p%G;_zI?R_i-rUnqEYF3&#bO1wc_KN=_x97O
zEJr!u7A*9U(v#5b2mB|;SrWpg6$*8F9pX5Q8Ywyaqdt%F>BC>%g=YlA{goEJ35Wd8
z2_2uA0pFvl9O+{?rL4SG?z`p9=l)RvWqM7)vb{c^QfKF?x}}ZoS~m!-`kC*Ix=H)G
zWBrFZ8KSc3f`~DTZ5jiuNb&pt05(*}`44ha$0=z?W>hbRFuC9^gps3_wsdaR!HxlH
z7-N~JPoA^L!0-dY%>zOV9b@vktH>xlH1+`H*~IO6T49!;dF544)fFSt?mb4k{q%Fq
z<FiHOQ0ubFm5}p@+LwZjk9(}r(hs%{&tmbMK_#24&`UMV-&cZilzy0&d6KBk!vNb$
z1P7xX<O%VsWAfmCrBxuP>ezT5ZgXI}q#Z$Rex*e)K-E3f%0o(eS}prTMG^k*#b~ZS
z>(ABUf|`de4(}eQ8f`Q5Wv9frlc${AjBy+X@$w9hEFpa9YbGaQSabhwIpq%GyPwBz
z)qjMnQX!oPN~-Q()<^PRko5eaH2zG&T`)C@x6~Sgp}OZ3@o4{~RC&w=kRqzXvj3{8
z+Iqj>1auJU1`}Z`HR~%y!-~VLR0e$GJh&~pM1enhf&%Ui{+d5Pw3yu&e3F?mA>&nR
zu$ZcKh9NV&>Oo+G#fZ!p22TLHcETtiJuj*{a0A4zmT>lO1`r{=9!X%R=?b(-l<gP=
zvM(k}$V!%t9ckhOvcf?KT#6U_>nWMqNHYK3yz=z@oAmv!0{cHKJ+n22zO##72n$&K
z<kF&Krx9QO+sckJn(8{?*^0ciXOUw2&Al3T;otP0T<y*-rE57mEAn7~q-V~g{%91*
z+%01JOgCnEFl<bh`YzL0WWDTU>MMs&q;}LeDG(bX4Gb5XHJFQnu=|l4TN1Y9{Dl5T
zov&6_R52hXyz+(43Sy#TU|`Vsyxg-<VDUI<OFi#$6X31sJE(KtZN6BAjl<72Re+-X
zcs+tXH^HIy@h3&)KpB<J?IeTvq-z4gY&D_7q3fcFg9X^y`T%xBIX4ZhhRWshz&)@h
zHX!4}AO|`)N2SCP!_axeVTdqZC`WSWU*B@(+;<#_wUy?s<dR%|>}4>VdTRW#ADGrJ
za`Bkh8!kK{<SI(m%#AvxmwkYEq@6MqwaZHysj#jca`fAPR3dAv+<BtkBIAj^=a1p%
zB^8Di*Q(#-m=i(rjYh)e5_!caF`Mkt7z5b}r0wt?KO4K9#^n{kPNfY=uq%nu%b*pJ
zaw>vk<ZgQV7xlahW3kdkYEe#bNO;y*sYB)=QZ{2(@$GgB0R*WZ&O#i1&r$BNshSJ3
zfC~-e9An%sip8ql+}y>j0rfIkdm=U@b~J-R@?h8z#RrnF-G=r+!y;}K)+5^Lhq0RF
z0yf*E5SJD!YGg7FLVY`H)pun~t1ojZAn$zKU&dO#N1N_W$SnoB#-B#pwk&W*BhoUC
zXv7K@y?@J(R+{7=ii&coH+}TnRyVr!z?RE9U45LW$G##7bf{zSXo}r63SXe(nQVdO
zgv#nam|8eq_(4nY@<p_K799J%kR_Q!kyFI0XUYQI8BSIjE|V|aayI37r>D?8#vC}R
zGwld77Om)2^$-kXrW*)*?h_h~yvxLPBn{3mYjo>vs4V7OagA<mWWS~}kOKb{{QN9z
zrrB1?Y?{A8boL4U!uZzvc1cE;y~@y_^5ofjrR07T;?EGLo;01%H5muRDK47B_P{kw
znEjA-3u|~%u$eWpYT~3(*JUpU2dv$_6x(W7TrlqC<wL?*ad_$^QJgd>$4=Fn-Ib)o
zJGVd1WNIALog0Pp5TNQ+*UXto_J|3WELM6Olip)I9giWtI-BhBR!S;S@)=?PvpjL}
zuj`0wxib@fdl&LEIvq${_IqCL%Xc*?_JCo&jyexjxE?+<cIl9R8?kzVq-piSGiK)j
zy!6mI*KC%+g*klmfH5$B(v~!0x>Jpo%wYYRr(*H^aa!}<PotF$ot>jNk+z)%u@<{c
z-`lz6GPPW=G>|C?<fXBIA6g>S&T>ams4SW6Z1OoZo~c{%BeQwZ+wAY~;SwlEe-+O0
zm&Fo;;KqZzPrWLm*7t_C)?xZCJm&-QRvU=Bd1pEG%0BL@f<FYhp6~49#>9+y1+TC^
zqxW$OKSul5>KD|Wzq^`~k)%)CwRQWMY?HXE*z^9Ey#6@zoL-pz2rMs#C4*<D=ZQPC
zR#7J!p71BV9r6jqA8Wmmel)`fG8xFQqNxJO^4R2%KfaQp!a@J%*TvTjA2cjkxf65T
zaHuZa=_H76X@orUI|G#(Y?4aC|L>*X8_8j4ikJzIkZ&0AdOMgI<*2Bqd?ADX|K9%f
zEu2HDf@S)DBmD1p7r>?uOjc;!f;l{!z<+g%Y5+U<^}okLWfXuA{_kEk&?TUP3C$*z
zpauG&;rvKHwuWrww7~u6Y5wzUaQL56N2o$bW##lW6L%8riL54mUk(w2kM;t7FL|+~
zj(`oBA76R;KgLVK=aNYUekFy3s8WW5CVv)4K=|=h82S~L?k%hU_#Q^Q`GwE*Tp#c)
zRxAI61O;@Mvp~utO)$lc-J;YYwCRHp(x^r7_uaQh=MS%;S~9fs^0>5KS}Fbe#vEx)
z8p;0R$BnSC#S-Z+a)?V3wDT@6)}$C&;galLioy?Y{@%VkpXW*Z4_a-1X!Y>%{&wVf
z>IvPvMdmN`7iL!Fl8j1tH^JMV{Cyi=%yv53GH3tb49jrDS6=?Z5KOT{_xQiR5EJ9o
zmH&><x<nk}J>nS{ubo%5MnaK@2R&@VPXo(?_HV@J*2}1gf1SLUD<I3k{heK#dbTnT
zcyQ0oVXu78|HIwuvvw#zo<Fvp9n>(Il&|1~i0(k;^;2^Q$Q~Kb|Bd?JutJj%uYk$2
z2ugr3NN~8@Cj&kz<0BS#LHJIb2KRS={I9QdlOya6Lb&XL7Fcg;A^wGkmBK@W45$$(
z@M8VfmE?Zs{J#BQ?TPtI-d^KCXi_K8!6x4R<-ab2`~ioHE^Q$C-#9~|eT7A>R3`+G
zD0!Le%xS?kKQVzDW$pj7ApSxqc#Ro+-NV3u{(Ol`Ya3bqnl<o^e**76@cPdR3cvyn
zqG|%qp1|Vw$$ljpjLa-J>4K@W+{-tI|5_E$<mS&o(4R0<cyw6uOng}iSfGIQFQX&|
zxOrP88Aog%{(BD0!YSmm2oZtozZzaZ;Y3f!X>3*4n0!b~nlewbsIf4E8TcPPEPq>1
zez#o1n~NQ%{Q0y)?9?W4E5h53wzqUs?{jkSyu>fRmkRgvP<15}cSC#^<|Fxh33VaT
zTJoCVquA6{TdzcY6ueA}*PdRIjqknf-q7DlawEO>&^;jP_0*oLQpoLM8O-6*A6mkj
zVKjq-g>H8meX&#~nALwMb$70XJU1=AqlUT^YW$p_C!o{TxpH&Amq=#}{$Q!dLpNJx
zJIKXO{sHULlT*mErB`gXPA<5^kb39A$fjl{u_#o#lepGerQ2CqLzm>X&aFB)j|ND|
z&q>kmS5Hqy4*%R38ZwhDeG{N9)gHH8Y)^2-isg+M$mlgL&r^IVey#^CzbY?Gf!%Gj
z-nG7CY$T+Q*Rc#7Pv=Uf*ASAt$@^1sy>^EKm^Qm9lxh<MvaMuKV{46z!Mp;FE*Yqj
zF2`iroH7w=7(TAry>?qO)2mZ_%Z7#9&={x3XtXwbEFTqm?JTYec@XCgTYsyDdF$j8
zlG_x&TBlwgHf81d?vv1Ixs3*az^1w7AbplkN%&gcaF)ZUJ%ggvJVq&17wsliV@bL8
ztQw<-39U)Ae)zYag;i}18fz*)SR1vKIOBOlZ}m{F2x6WS+J^H_SCz~3xPDd)#ZX3(
zB_v4MP-@D+&Z5P_4m`g9bwfarnkGv0<!FdfbM$ac>cgYcAld4bL?p%i#vCL$b@Vrt
zKxIp+AMax>v@EIOJyxxxRBA<L$vQ1QI6&D|X(9&i?->_+Rw}QoJD3h+fnr6>U@wx3
zW{lNkqzOqq9DI)lAgV&9Jgb$pcLXdq*)|8t9Nazm&oRmh)9_hkZ^wPE2v|h7vU3lq
zZjE&FsMw-vc^DqLS$(cY?%pL~#~M(^OzPbV`z&C*n9wMF^k2AIHFWQL?aHWkfi$e8
zDE?C-KY>j!gzrQV;v)Eq>%-6@eGP&LN*DYQ-eIBf&Ep5@S}!@LQiB)B<3jeluPM~T
zN?sVwi<S)@?M5h$cd#dcR#jL0!S7S`WNu{U1D(58p3)CWT+Rr}G%KfMrfopA_bPfz
zqYeBcbgwpshZPQ^-=6kl2kL!3Yd853m1i%Ccz4utp!b!V6L622+4|%&v{P^|;4&+D
zsDbnjcKKJ&u_`x`W;e(AW}SN-kUXm8efm<R9_aQm4wT=iYFnANPtjz)L}qT%-&(wz
z+5X|%9D#?WYeBEirSikeeRh2HK`SqP3L6x+!vS+lc3;-kG2*p>KNuX*N3;}MIcvqw
zOS+_kE!jtpH5bNOr+1?@SpTTvUf5TQ!2r%KFq&Bqk&f_^lSwD@AiKTRR0`uabY!hM
zdY&8I8#+ofeVYExkhc?CS!3O`lQIg@D`P214to!hPEU~Lx7)yPM_#CHCC@pXXDy*B
z#ZPUU{Z`m?g{@cgxg;&*y@JwCXCj95qV&<OQ5YZF^o+})wwm31QD^U1{-`@yFn4o2
zZutc9NnF=-`Z%MzOhO&|N0{fP*ApAQ_vc4>@zoW>Ha}CEMnQAac%S9fC+TUwY{Vt7
zDz8l(I_dQFH@T^=sk|mH`{Ny1zRZ=uN=x<WkIAuUH%wOsHGY%levqr$mTU1y_~;Sl
z>K*!dPjQc-;akW+vfs-bZY%YeV8*yZ!Xbxlx>rrHo>st()}GFX)HyUJhDqYnNv))=
zunKPr_wsFV|1ocduMUu6sTMX=b>GZfq-u8<tgWe3b^=L92PMnXakS@{JoHlXY#I9J
z?>QtW+(K`VZgM6EQpfr-v`->9?AT3Yx=d|8DbG3AK{3ICL{%h<Du||1w<;PebQo01
zZfji^aG4lXI8yiqT<?B8O+gMhy?k2p)bp)ODWv{2ZG}kWE)`*5Lv`CdSmAbi1U~=?
zK8EzSd;uGq%|SpOJFQ4SH!{;{2AjoXjzo%)VNAv-hO-_f_w1_o#k_5VsUj@?$f*&I
zjsyZrsrv|||9$2MOBvg*?HCTTR8B`;7e+2iEcu>am0s8r_qx2g0;yV=+=AN=$MmKo
z(;H0;84C$~obAuegxu2GmVC-u(dgb}mkU;2Wxc9+0glZw?>TRqv7ZOB?<?z90}E~D
zZ0`rB)QH-5l4R4B=Nb{-R#-6A_E(lWJsz1Xz0UELcMuZiY|49NSI%{Fw7@Y-l5dWB
z_=6R4IyL#Vx~<KhmoMX6gnxCc)juw<)<F1ZThCZwH&uW{yywSMTTP|*iS0G74-;z=
zy&iHc9;6PR@o`|SkSt<v$Rrt!-Y(|Gwdc774<dQHbBM}DOP%d27MXQUHW(5lWtmw@
zJ!HIUR(m?#yRshKQK~&gZF{iOQAyUFsHZK&AU(6okMgC*oAC2^4K+ChboLLsMAOL}
zRoAlxOCNKuv?F73VZAsSr8r=ww;f0#6!sci-P$T3wGQq3TMjS`F9mRlbSL@V5-=h5
zRa>27!bJIsW_R5d`x)H2m$Mm_OQ+gu7#m2qz3!}j#9(}tw$f9<X{=L5WaX_@2CQT0
zI0e?5yhA1FWR&%qzUJiD9ImCDO)9qT6y|<1p_vKNW)~<mm}P67o}fJ4vM*zpkvx_G
z@t?9E4a8?gF6+#--&WbRF?H1JCz>|xGXx&ya&DX-&#_LzpprnBJdiXXk%dlqOS4*B
zY%)BU7I*!w(;Ruw!oEX|M8aEcbE$b|_1u(B&z*G69&pYM;jK|k`k~uOV+2BBb>!Jz
zjV$(LJ12AKCUrJUv-#Tyxw8_#-OOs~K>D>mS7?mqE<Gr0XFtC_EoS7whFuKt(gG7g
z4RdXcF>gm`4$I7+SqBo5jfbQS`)K<4o?k(=YTn=PJEN2zT>gN(GT3CDxZXY|PLLjG
z?{cdS+FYY{C>xCV$5Io_nJv7gnLIfr*u1bQj-HjO-SOOM&~myEa3G%1w+>8WI-8`}
z{B8KDTmj+eul$Q)ygirF`LdQ?c%B^2a1voFWyPpX<~sh(9l43im5R36LHfCTwfvI<
zTj58ml_zd}b$dj&H^!N~rSW(wXgrAvHJxW2Yd46>%vnJlCu8UtBIuLf_vozGs_N`C
z>hx>Jc`fUVkMDZCQ&hv>FMN=#PQH9NDR}7E^?WUduG%N`XdZF?+aeeSse&$_tZGPt
zj7JlBA?ytbPki3`+^So!u=PF*9Y*qIC$FXry~T@rJIA~nB%I`H)q!j)K{n(;7f;2t
z9z5b~@nFna@K!y1d{ZNAJafF&tUdYL*qiM*@y5=|=ZGs@N&5vExX7OI_<PiMDe_Od
z!drZ0kgPey9`Jbs68uI2pY<+`Pig9EJ7*X5t!(ri)qcT0zj84U&AS<-ZJdm<IBbNU
z<jpuw4Puv7N5w?o!GNS~XU$8C&Fk3W&QKNYe#TJxnE5oCJ?&(iBzjm6@CaO`-SJ8j
zvz_RY@yJBX+qRJRSL$#IM6TZvD|--!eTQ(-4_ql98BeFHuGIlIqbs$Am&Ms|C}Q@i
zgQ-%#BKYF)y|N1j>%H3rk0FH{k5%K7M}K~A22=+~Nvn-r^4Ib&4sUwub+f&*i}RY!
zZ`|n#mTzuj#<lFaP=Id@@8@R1zL8%GOu!rXcr0^XF$rv5=qcI(VK+E4^;L^P-0G8N
z(<PUYV*^;b(~#UM;$_d^H!C=|`C;$5WwIdY?YlWke$Eeto5%@=S6sKR{5E%Q7R_(q
zvc}TQxsM(7Y-Urb7mHt+sHRyN_6nFIh`AnXzpn(+F5Q*ZooOw6I67%H5&D_gQ;Iq>
zs`?sasKqz{ifhPNDMae_>0AQaDfzC~+IPGezfs<zX?@w-)!ByR<HDM$8Aj_N`*#Ls
zJnj+}7n)sa6_J72=N<!WA#2`;cXmo<_);8J+b<8Tq1)0!5m26XMs4SYFl{c&uM6Nv
zTD0x(*QT*EZrycEuPpix?hru7%jOw3j?i}7TL>C|I}WcRV|c_Yi1#(;p?F|XHmwdH
z64hd3(H3lEMD6GGPAR<AE6o&q<l1o)nCazCFREKZYvZ|AsGwmf3KAJLW2}|9uDvZg
z7*^~4X#{hZ$!`V!_L)M?bWK+Nrta*NA%87{>Y2&*d0*h}Tn)KT#|!}6k90|-P&^x|
zd0~6U9mU|$4{aN)L3x%=L|>;-by_@hnqSX<3OqN3Bq+b?xrDYxXf$t^6&8ihyDq<Y
zS?C9@lFOMUMx2?;i5#Q4FDPf$6Sfl;VkD2*sQJL0`-yU_)UWwi(ay^jBog?ssN~*k
z<9O<GkK8B9q?k9qD4S}wt(-N#u$8Njz=*4trc$Qo5l<Lqt$p}8#(w|k+#T=J2>=xP
zj0xjLS=@a?N$+Y{^l<YZi1Qhw;OEZO0N`>4o~)rEKVX{31Lkf<51czDtWz38OnuhU
zv-Pp*IQUzbql~RxrLuz`yh~mh1Q0wGzcZfw=yb?qNu`s6^PNv~M|ZDU#SbD%Zxp*!
z@dhWR%bEeM<L#x1hB{R|3#qM5z&<`7+^wt5jDhBZv>D>Zy>V*u%y$TKu$N`E8T7SL
zF--N&Da+e#38}Dwd32@M?%~R1iZ}p8+0;mk?38VsmjM9a<~2K{5cB`8KIlEGj2i|o
z0I41-IS1PzDF<-)q1(Cc^8L)$r_&!>`-2#N7|iuws?mwOZGKi7XZ!07Rn(kR6OhZz
z+H-3;fOA>VRVyj+ip-x*_Z7Z}kixcISg_liozIm^Fi@|5+x^t3sIomNft)}~lg_yM
zp~f=?HUR<nU7Lvv_!4p}I`Ha%^V#O!D+WFfFB}T`lARq)Qljq@!`i*}V8hz+ja}+Q
zdZ9MfD{DVUzySKek({E`cV{i}16TV@(45~2v?XJ;Zgceu4~LpHX<K)$qyeBo*>mt|
z0m1~|3ArQKrs)Cw;DBgOhVv*yA!qEbAWM5jEZ1nd*!~>Bld@JUo?%xB`<m45dNxPM
z+}f4TLAB49Lh`$OXB7r@0R~DAYRM~#nk~TD<Q+=%&<?Q6u!#|$-q7F?h6ijr-W}cy
z{S*^%A`A}2Z<B6!VI&c{CMU-GR<gTk2>_m5<SKVY+0~zsAb<isw@+WE&Ypx9sCpNu
zkf)y$uQJ5~SRBuMxNa-&PN4vv#~{qTtBsA4PH;uqj<>n}3Hn{Vo4xYF@>l&RapXzf
z!_r&c&ev;J;47$4iP)L%UVXMg44l*8oy~jQ{SrIY?J3MbJ7{6eFB;{64ghU*F{JmN
zYVB6-k6-wo*d^<|Gi6UZqcYrwCFmZE|2%~~(FVP2AOl~gS!u}Y4+={vJ>gFBMK9FP
z-xno8?U$zFVr)fJ0RR++4c(MAU7uxIIrlkDX4osK1aML2efMMZsmfLW<u0)K1?oJ1
z1aEUW<NC-R0Oa*1Ndt8|cOh#VF!d{Jt%~M25Pd;)C9ArF;E>WRUeuv(v}$WvO;VT@
zcmp~Pl)Yu8q2ne7e)qao_0VOiOsA3ix~B6@<zt^GW4At1-lTNh!mV?z$d`*$M6d&Z
z5Op5XH@<@5#o_#P&nevJ!oqw>a8?OZ?@y7eOhmy?wWPiO$ptuy<n?b=eGd*Gt5j<7
zP+1XxFelb;v85=fli-vdHv4j~UHHU}OE=#$&FwRm24EOc**BfArayiVI7<beBuOnv
zF*?#z2Kpq>nmJDl!ILX>t_eLf3jt6_i-&;Uzv8U>D-_Yv{AP24t$874Z@;Ldak%w%
zUw@)*$}+3+|K>@(8{dvxGx{gyrc!>422ml5p|82d&SQjeI%U|$Qo3>4aT?uOA*SKG
z#jTVlx0r96?Z_5IrV!?g8KK{^OYA^HHRs|pnHGwgmhLiO9nC620LmA7+?$5kluBbn
zb2m!LhY=v~e$2FAB;7>jjld%|@`SYhZsnA-(<85HkzodAlEiMb>VJaw<aW@`oZm_n
z{^a{zxG%l<ES@HYX%wk}ZD;`4nYL;Ky1xJ9@Ox4pa@2WS96GdaKI49hM`>fK_<o%r
zGwLmqTuTE1{C<>L1HI6y6(PDlG_z&2Ts}dk{8^6JzjoPk#|KwvQZ<JGb}Yd;z?EAH
zQ>*E8uz;h%Jq4L2=j)c}p*k9WHg2jP6fljg7GS-I`FeiF^{U#_^LJf{-lBWKDnGZs
zZG}C*I;gVw9gxuS{MGNI>?2_yfse0GnYJG8NM9g%E>S_fo;RRhBZj>p7RR6|_ErzR
zBb3UPQZxyamZklkL!Z|{1sU<`Qt9fE2sFE~zSs4~{JZN1v-f~;kvgh8!ntnN-LRTP
zx3crtaK;&;M>P@fmG7g-bxofKV(X4`_lV)ED!)e~gzvJHRmO!BD&LFHZBe`6vXRXu
zNL+hfjvX10--~#$o@s9y2fkusT4m)<OlX}qJ{+H*M}ULJyhSKW*7Zx)z3(=+lrKtr
zz=i(3Ag>%Zu_>hCJY0|f+7*T+xq54pxG*h30%Oij;o8bY=h8*hZNeLH3e*=^3GHzs
zQuN>L+RW>-zQcySQx<hM6?VHKwWWVGE^d}S5k!4&i(UAU5@ylfu!xw8ayX-$VS?DF
zK^`bT!<9#wsvhcDV^7W545s%|DPCj}DV2co!E%0Mt~Z$d5;uN*PPW-*`?c~9$A>+(
zuGwC@=jloA=L@SJ(HQc|;Pa`hOH043yxCip|Mu$%#xMTrm+v!JM>u=$v2yfCQ%(T%
z`@e=={zSIpleI>TsP?#W;P4l(&0e_GsXhsFV<g-m^|`r*AEQ@+9eHG#LISq;3<U;A
z{l-33%pnTd?uk@fdNYtYY1do{^n6(@pTSJ5zo%G{9-)T@#I-?Uq5X*nc2L2zi@id{
zO=lO-i!{^t-f#x|cVyjRJrAnD!}9b7@4#Ynea*CpFAMZHndePxe?wuT$;<st0hK<8
zr{mpeYVWfRCh4^c3ynAG-fDAwY2`S3=`_mIjrDeg6wQYnWRlQ}PuJbg6aoN?sd$yW
zR|4fo>|DASJH{pel*G@M;VX&JpatDv48X$+#C?dAaE*Qy3Ren_ZuV4ILPq5eO<1;D
zFyqLl&4DNFMUwbj=F#`5Yimy4g_*<Wm$+i|I>Kj*HyGv@p-0NK!0wh37JP<;n-6}>
zW!xubHS-(hjrF%m>I(L=-dv<oaSdd<GuB%@pNE150rvEP{xLI;&s6(%dV=rbao&O<
z%rw)4pZCs;-yXOZd|o5fpUsr!>2uKAPUnrJsUIkrjb2)M6bIm`@({c=gaVcA7Nw`0
zET9)c+)Q#Si#n@La=*SmuQCLHj_#98%x`JaREc{3s4ok0GtV7-&73Mb5-uda-Ry{g
zjzBE+OX|Ex>EC${v=4I6=tkQfcK429ji%lZXSnSIjqReWP{40fy3d^D)y|GX8kU!?
zU}}nDESk9-L%behjSmujUg#FEZXiAWS}PPO@YlBicHkKZ8PB5{+GNt`>s1-*y8SKS
zV^R#A5IUq$So%)<jjex7IXyvgIn~3aP?#k-^7=d0K;@XNZ2Eej(Jo(J4GyqNlHCU@
z$yDDht!=^c6xH#-#}99A2mfc=B;yS(=Ukl9a<SQQjA4|+ZXqI((Gicx+Rh5BU7gMu
zePgCA3hD|82^r<aKu5Q<gk-nU>yLDX?b3wsyE)lS)RS4R_bfE=JfF(gg>jx%J9rB=
zQ#e>F-p=?*MVXh~CMkV(TD00W1{oZF4my)kYdBPxF}JI#H_|iBfAuA@gSE<a7c!~$
zzn>1Q2}&kc9I*d;)3egb(v_`|Xb%w(X#Yp4O%kVdlXt2o%+tcu^Y~i`Isu6ar5jDZ
zyI4#8audekCo?|#)-Og+D!vlEHy@s(FKaAii;QU-g_6eikbl}-^n2HBn;OqS<lxm)
zKNKd(2^SZ<gTPz^^I=Yh1m3=x%Y6+n!h366w*SujlvsSn)W>fP7er3Gu^-u*mCY!b
zH(0JkAD^ZV=B}8C{>tZ?)988cTFlN2^Na^ZK<W9OJeboWy?&a~ZIrX4-`k|=o7_v3
z{h~Z9mXadVjC1i$?gHi3EhU518|A5UZoWBj{SU&;6<rfiH~)Pzi0P2{saEwaqGY+>
zl*4erNxoX;WpWlwOF6FU2y)7~w1T*e637O>loaZOL0y4&gP$tWb+pYUWSu5tJ#X|N
z<%LDKq-HduD=+MTsR*r?`;R9Wo#(qmH!7x4hz;4+mY)wkHs@xwic?rWQf#eA0m;4m
zQHW{Ir>>&xKDPU1r^E&qBrePms=nrD!di}>allAV<ACCDONNy(!0w5q@3vbi0Z7m8
zzMoJ33I~%?!kyhp#Kl?Vzs*uD;M`PA%}tlyK@d+y;2K}B^}0lHt&9S|^`~A5P7oXL
zEKan?x&&g|jB+|wxxrE8RA%Mpdf8rkZ1>u$VRii|nqRH7b$;5M-Cu~vklh;WCPA4`
z$59|>g$GoA%={KCEfY7`=<q-B15k$Y+zQ10|Hs!^M%B?hYrcUX!3n`FcyM<O8VC|x
z1Hps4YeH~$cXxMpcXxLU?o8+X&z-sVowa7I{&HCRG<%<xUG-G`s!F~{S0EyN@>Jks
zD7MMxKWrxJ{r0SKEyL55h7hej286q+h)DIPd;k7Pe{5t|j8*YKZL*CCq8{__o$1yI
zS=e}!Ab@y-C&s&l7$InkyCZE;VV2<wRbAP6G7?`uo}1LE>F^pvpj|V|LJGV8Ed{2@
zlOOo;{g&9R=|f>Jd=Y-(99Nu~#gwN_r?JtUZK&iTXf$Qx)<M5~<3o$m4NlGwGt&q9
zJ4-q^8kWWN^k1*bkM9KvZ0R8or(&K~DyM_83411|j$tp8Q*(VIh@2?%C^a8yURLke
zzS4fwtuo>)zy;kfHO${Te&MhQm(!~J$ec6v15ueD!3pOVVL7H~Xp!4MDKo5UkIG4$
zu>jj0$KiYm(BnyI8Ryc7g6VCZRzzV@d{=9g^-dk~?pj7_n+-lxd7H}2;9l|o`=>(L
zB>Ru)H%9m7PpY-{6759IIdC6rQb{^$eu+(2+mSoT$@EYb_P}XA=+t*Wu7~me78oqM
zb<}p<z?JhH^VYHn<F?!}#f>D*>|FZ%{5hqWB%hl;H>gmq<s>Je3{|SBAgg|`g{UAZ
zuDZ^<K%b*{x|CqvdN0q<q3h3c<u^7$6up9NP8;t*0h;POh3Ij+!(s@4D2Zfa+W->?
zI}8#36NI=rftf}ovjX>%IH>3MsxFrde#uGvyU~>j`6iSf!s>b*98!3(c)&S^_;W%t
z{zSYoEi16TfI$p?`2G)cA_GDvKLd8>i=K!W=%?K$+F#CI=kHF4avFUYF2v(^nmP;D
zEwil?aRn6Wd(uv>w*IkgRr6Ux(l1+;2oHFv2ec~Hgo}A5nb5;cYrYzn8S_cL!qfak
zVltp@gl|hv$#aXHVF0(Sgm5V>Lx^*<F7U7dy}`u+Pm<VJ*C$#z8FGQ(7T56u<HN{}
z6@h_Bfwy^aMOD+=pHy$;D3y*77q$$dE;}V=U{fy@4>dYDSK1b{tQTFrS*83@uz!5*
ztgK=8D4NguvL&DgRYfkq`z_CS<_P?kDF>h2a=C@2lNpu=yEGt8Y`}W!bDIGiplX@R
zk%t4EqZ|rxI^WlYG?1wt_<iVkZ;0+wfTZ;d**7rFriQDuZ-jc?e{N6|vrA`ayHPQ{
zp=*lGzaoo_`m^kG!&{R7tHIgk^2tpwf&gQQGU9eEVI;g~gLn#Nrr+KAC%d!{`3E$&
z9@(LPk&t=DMprBsTGM$_-!B4Cz*K($Uem&!_&L7-3o#t&>dYCpVL2qQ-d){XVFRsQ
zvlXhO{YRxFhoCq{bwaO}wJuhInk$sV@@pFWgmA=19fg`k<PRpFQ?qe?6=vuu-AuY_
zD%guL^-ZVre2<o1q?$a9Fp>^o#<zq8dgTjh?ULRR`V1{4z*UOw)fNdrIem)apnP{(
zm(%`#5EWQ@(yRq3BrI_5yS8?p<p<wes=wSyS3IM$x>9zxpG`kPeD@qEkX1zgRkG+U
zcxi0nk9yrz_buB!HJ|M7d*39Z_wPby_O3pnc#7$l1hSZwzyiDbeur5^4t%(NeRC`k
z@5DfTkNhn-?76_-S*1)fhaR-X;>3M>w+mxamFX~Eb_Z7n<K4o+Ku5>hC2@;K_bPtp
zzzxt<;(rxct+a-J*~lx<Y<qM!A0@8`_3J?A50r4#hm;J==g=ueCqu68(ImJ40LJ<R
zo<&^ikxgoK&j!rTT)E9qTc=!7acM+Q{>*r0@M)6gcsBY-V=W2DR~hRgBFbSwwEu}L
zoGA>aZJLDIHM1vf55K+Gg>8)18m~yrup)Nxw`7EUc=R)oXfO#l=TONVaH5MFNbv1o
zN?M{C_}@Z+vz9(BN%n7+CpCZOBJYiOVJ4ph9Yl3D3eu~M7b=s#q!nQL0?YSauC~@4
zPb4HeGf}SxMHR2myC{G_H0|S%zZL+LC=ZIR2RE(AfP@WS>KQ&{{f$^BvCEHu=eE(k
zkGfk6I${3L4`?gXM&5O$Nu)?|cXsS<heBTx`3_-$mYu|EJ5m9qA)8<ujXPOtE{FPD
z6Y$&f?u36<#4`Wmb+;!L1^xuZEoeY+MXhjPWg$|V&zOQosd>K1V&(Vv73NyKmJ}^L
zG<NY)BJS>5xTgHncBe-zt5YQZYUGz;DoFpi0~XR6XwCNj0&Moj4@m<}EUD6v4ey2u
zP>VXzJx=Rk>n|MP{PNQbD#Fqlaw5^C>Z>%~`t4_scLmk7zsKP^F668rwQj6LiqLK6
zvSr^u<*R;k@~tKD+BCQtpKLM=K%8(V(^_Kf|M<TJr2Yh<m<FCEsXi6S4$vsrA$7e%
z1z<v_-0T)PiFjkSFylN*W=KJ(XBWyX=RI%J@I~uibZ#Px^$ZKg2$VcFM57l3_|Q(*
z3u{r4Cxi=>=@iWuN$W=gFC*cigJ&UiSB*d)*CA*w2!&AI)wa}z?Vm~AKKki4uU<G)
z0D_~e9GJNW=$kc~UOL>~+R!N;8g~bCjZ-!k44`lja8&gx(%{S!KpSGl4QUL$rnicm
z#yQ#l{O)YNj0HDDEG3l8+Jh*oC;wdP_i1(>s_t|U!vIA4@D*p@{pP7e6os*awjIGQ
zL~3mI?x-m%+V`@T?u2N`Q;xUEC}70vxDy53V}-M^ipYI|(hOvp*H8$+={G(lA>X!K
zcW;$K8s($iZ#1F~y;LKXEjE<brVVxgc!7;;Lwb|z;=$HZ4^lJl3nz2`aO@wJG<8ID
zb$u&s54^W0bB)q1LbX}8hXK|@Z>C5VYUz{IKOe16Kcy;g@HS+Af#D~&lbaRb;?MY;
zI8d4-ImpxLFUQFgv%;b<^_U04ueo%K(lIxvQC|ppV(m&LiQ!16l?4J@vQ$c!uI!p{
zIhnfO{{s!#p@=uYlY$Ot9znoBDmduAu;**`?rm}Yg^~ixOkSFlep0dJjZ!ubrwene
zL%g<!4=wzUtMm5;WrfT3UoMV|vPo`wyb5-aHa0?K6~G(>ipqkNCips)5a}^c+<iAN
z_T*0}Nk$oO<$PHoN(t(ioHl8W6T*a|V#pe~lw07;t?v-|T<OH8Ub)*&vH2N`ZH?-a
z)l?0^)Dl$LT}cc+Ug7JQA(7gG2TUNK7f$7d9Gq?u!32m5d30jo%U!xwjye@Pb6snr
zfTNgPWLp_R(?0TkiH^N>%PhG10P+kPq_wjdhgs;IQ;Jz<u`7CQyA)1350d#b)naBP
z!ZVMLZ<LbUOLy@g+c2%I8WQF^w|?a;GMJA<y;KlhM}O~1;qL)}C+VcCWZK4|++75|
z4kM6>Dzt6Y+D5$I20&m-+7cQrm}3uds$5MRTqE(ePFj}V&b06=9r{AAvtfZ28tn`g
zpBnY)^d5Lc$jvox5ejVY6l`XmQaM&sn_(eYu0=e-^N8-#F%i<y1i31iEvc(%A^~1)
ziTKIbrLPL{81NWP!Xp4ssz;YdZ&IX4jU;VL0k43ExEMLWuAU|T6Xy3fFx6*F-nf%n
zolZ)B^mTncXyvjoOUq3n)v_irA!x|Asc^<Ef(gnCBfU?4q(hj=3RRG<y+({CKiM_6
z#z*^A_q;uP_~P!{aTY+rlmlid%uPR$_GPsM3uh`4Dw`lfys|UJO}mZk@XO+g_v9~2
z=PU6(VW(VRub7{;cp`9Ywt3?Uz7M~3s3<Q2Y%eJRl*07SAHej3X$fLD>>NfJDMbkd
zhy^3U&=5$tl{rAvlB-2(wWV&kf#xcfpV%S=mawP&6JQU_;c5tCoY>X(;L1PZ2&sca
zjr=8BoZl$3$5ku5w9X%|bBDf_^2F+{nFcVA->me{R7&gW->jD?_Nm6XX*V-6k3j23
z>X<SPk%_eQApcXCWzc#4-mtwRowL~pvOgP2yu>s0G#cFx&@euo{9-Qb4S`nJq*_dj
z4sX2n*80VGk9Lg@lPCb9zDQj`L_q?<tRykQbv4o^+Fp`%IX0u;4Alv<t%bX$^nJ2y
zr>ZAaIYLff@^aqY?yjmADl5dwkIZSxBpWYRiHaD8pHIpY^9p8QzxlfL$ua;0+f+t9
zDZhY@Mo-z(Cos2>Led;Hh|nSZ>qId!EMq<oGcpGC;%7(z?5(-H$K+^8j9F{PGb#5&
zl$5`(;d%3v&JYM6leWkBj>v5T4GL2ln#31K;YFMSo=5&j!3E4Sb3?89aqbhRB$rp7
zxZTW?_?dok$Ng5JgujHZzINo+hY>dZGHvR?vPi{`Y_GZw4XQr;K4k4rh^(^*L+bK_
zyC;ucxoJQ17PpfuZXV+F$n<G$cc3CedFQ7%KPpIs+3E<~Pj}t{3$m79CqdPVL?eI#
z_=D@WufuMND0F27xgv*^Go;)j;2n>7`8L4PKTLO2@d*r<JcVVvIN``Uni(NJPthgy
z8`>RHBg?f(n<bpd3H;4k^4s6AsqMer&!DMi*>U@{H?Yyjnk;-}MeZuJxWDn^A$NwN
zk^qdn;CQ{&%a$?=hAZ$9))gL)=$&X=t_m>AV}pVKq`ut$?yl41{ld!TbS>ktfoGgL
zC~|Oan%9GSUp>InwrfLO{rYC6OcWn^qRVk!S3A=$x8|>4fm18mJXM=YgK3lF>HTwH
z;>vM^J>n$(Ye{BTQd|&Hrp;M%12`ADN1wEbF6%2$P8F%O>5y+3$b&b@u22LEb&x;1
z7fI{$=$z3tYZp<`TUx(Zi+>z1G7_kbNNanNlq}a0{L9^hs6YU+(gz1>nh}wKQ0+>7
z@@T5G$bghEkdmngM=Vlg8w2?Qr+SHH%G$(G>)4CA$UwMMqDK20WeuaK;~mNN;Is$;
z7(Vk;>RB81J%B)8cQkM<05&lJ0|b5}v)U<PiH9dgc>GUIp&+ji0OCK-JGBulLeHIZ
z=$gU=M10+PsdYIb4RY67JP{h?LnS1*FDGsvw<gEHVk0fynro;>L$}ipBSs=Z4a*5_
z@JCg>4F^P#{TuWu=M%!b9?|9&vO##%zM(ZGQs^teoxc%$BG$G_@7~S^X_rMTxvA+B
z@@embM!lANtcmqliuz_rN@bnHJ0+PD=REc;CmsO!DJsGy)q}t2FhkOalXsaX#eCs9
z8wOWWNFqX`fDQoh$Imi1RVLyNpi=vbo4k<{C(x${44qF%tCGV{20x{qY}9^jfWzlY
z09R*wY2FLH@jbIb;6fq#)^c_0>1X8Bm^SFwH^&zu*HjYQ_oa57C|$}4@Lu|t1Yb1F
zWdF5+n(zOTTN!m2BUf^Jv!vbWA`9svBxNHYQa0-Xc;QHF7`HbhtAT@L!6Hz<TDw*4
zDjCIQCrI@42?WHnto3XLwse^!i@?w~r=Ng9F34Z$RVxPSjUj^(Ht!^XcL`di>fEAE
zu}%)@mvUn}RzxifywcJaS^kn&Kbo|8)~EZ8PCTS%Y)OUp6!)`|Q2cwoBD;~~KiJfZ
z4U*!}b3}n_Gj=uWIcN=0F#FKf-uY*wK_(V{@k)*7-g2g3@O&^vd04>A^j_VL1zrI*
z5AU8&LmNK&olR4Yy5;#)lC7`t-xa3lJ(8>s)h^OWo$iM9(9R@H@m44XlJDp;4T2$o
zR|VBP4Cat0!nz(+4+K#8uNn0iY1S)2$q;mX-Vqq|-pzVO`A~_32p~ErGz+4!U^n_A
z-1DJzo=-Q>pKhHSxT?_X0Ln$qLz_KO$F!@FmbH*xU{w%zY#$Vebk9K%j~rjp!@S%h
z8fcC&rQLV3bg0AKA_iU$X+kfYZSjz{*PxFc_SoaG9_KoJ??OC+>QZu`x^^B%#9X=x
z3+yx0U42dD!ru>m;Ir%?vh{rFdW}1K9nP`LzwunswtXG>n-q6{{o-|e_7h)1F4#k^
z{!`yAx+q&N&kdAg@k6FiFp8pc_yNVw<i8njjsUPJuJ%jyLY0YCdAxa(%=!>!4y~-o
z)qC(vRZgx#Y*Kyf^x!#vTq86s6Zdq{b?94ZM)15U)m7}CFoEHn^tgZl$!n-$wg<P8
zW$lveU;3+4aB0jc`(Cg&5f|`kxQ|8Y%K1>VSrXIvQH$^kEq~7fEMi|urdW^3D?Avv
zkvaO4Wn=}H!*dgD$gO9<1_<t=1&xMfF8&pDQzrOY3`jScl3&K)VBC&e4$YEU1Zu5~
z>fUV$yhprK71)Lijr|pjWDfu!jHc1P+Txn&IY{=1eZVuL6O2#xFpA#WpZ$UEej6h&
z=j^TW{)zzFm!XExo!-R3f^EN(qhA4KX8Y=+loYUB4>@|}jtqZnD8g>V7m(W=6jvBV
zI?8s?o-r4YCVtd~6sw;5rkmV2ZMN_#1U(B5sXe<IV-xxR#)<0ck>eGt#xyi5fCWA;
z=`FBM8ZiY9`*ad4Ur<-v@EV0d*_P}TOsmv9Aq5kqUEoOx+J$*@c-p9AeYwtVfgcn>
zp^drz4nt&~oT3+T>MDlvF}B&Xj`2@-(l@%9_)rW)mbvuBLHTzn7u0Qtx)~1vR1brg
z9t<i8!n_ewSD0n7%++HqHx>&bujigfBB@0o`1vk(Z5Pgg5nraO9rsc-lFyR8;ZWJ!
z5?WcWH!C(fZRt|f0&N;Da;~P0ySk{Iz?XHP=$HQMry+^|i>d`d?%@-T;y#6M9J&MF
z)l1^%B?q_t^Fz<hDN0j3YkifAhOaA!w*5I9!_GO3%sWe0&uYO8_)<7IfgjBzrgqM_
zT=W5$joo@`U4%@U4>;>a!uRCfmjz5?Q^fnc7sUl~zFQ|iyDIfetmGa`e-8r>g`}0y
zZ?6vxoI$6Ea4vLtc)39}LawtZF*6OkAyU#=D{gIIE7=CfqWUeeZ7^utf&|{bUIjcs
z0pAj(q!C>TKa0E8;_>r+nAGquxPs#IOrS|GKT!eWSf&}m7r3V46;^K(M*857s%?86
z>eAj8U1B;^{7pH2=?S3ye(>4DdUJnZ9=vNm1TFq>ed@ciu4R<D+#9_3_A>j2@{^9x
ztRDkz>?;Nk{~T5RJWAP|Kjh4U{|gy>p%UsWRw>u_G_V*n(94nvG>I;uBh<H;m>JmD
zrSSK^<;sN;vO@_q(H94qztf`J6D}pqRW~zJ_qr57WVVpAYu3dJ%%7VRK?EHDg2Q53
zdLztQFiW6+*%$eXL1x`sy04!H;QyIMWY&i@vbhoT-p>y|@|Y^=%S_E7Mj0_QR1g6D
zj2L7|CP}Q|p@;AB8=zL)zAe>ZBQpBo%Z;6L;=^Y+xJdHb{ZX&<tYnPCWDJX)J1^Z1
zJpCJzj<OMgv+X(M9s81?P6AZOU-~a>ei{PQG(4-}-(Z2^jgrGI4N=9BHEiXC+Ds3+
zO~#Wos^F>2I(<=awYPJVH)=?l78JEPtxGaq5o$$Sh#H3wUQ{j!=x7*uOB;GFS&CL%
zRplX`P{76doX)jW&WE_jqdkOJlUVugB*!|%sd5mo79_MdEmzEyWq(_DG48fN95-k4
z6tKpr9&fxEduZzpJ}iGYK{@nAcCkzrtL@wS?WApWer46Hl!WbRjoH13iBKNSuJ>l<
zNFev8E^5&dv(pr!GDPtZ@QUMKI6ww4E)wu5DYBo8GXsJ$r^ml?-+>wX6?|p2cp|?4
zf#!BiYC1t^PJWJ31Szdns%&rUBgoRx%^bz~=z$(RAT||SQ-7C{Am(l;=<Y4VA5QQT
z9^{P@K?=hq@_ZU|r&&Zd|D?Lf{bL_q)U26l7Y)SThA)dLje{WsnYdF@4lB1d6|h{e
z^DksaL*C7O>JrSt=8h#;TI%Uo)i((oBmUy~m28Cd-R4OEy21j^$7jYLWD|QTP339E
zKWo!;{^8yjt3R$5>I&E?ncj=82o!eaI%#}dsenzUA3&nv>gbmL``_sTgY8KvmHsOi
z0Dmi(b3z!rvyNn4^Z+gua0s@D*c8@m13oDcv|C`>*vHsZLjmmF&2`4g?K8qw*V~V<
z=P0}}Q>0n@wndt(7k>%5E-~f5^7c37!=9?4PU_9ebgNd7!yDIlpU`k@V*LdgHLs|D
zCjCk{E;tuwZq+S}GWJmFFW$HQm6qyk0MxPlGJit|N@%N|W!7cm2_&AyXm8b<0_!K0
z0Ujiu&@lLa!NIV7O6aD}w4w<7iU;6t`VllO)28^tp<aObTasJ82~L^rvYV(jT@W|D
zyB`!?<ojV4d;9I5i4O6(!uUmyW2^LFCfz;OoL3oM(V5hWZZZc}Gds5ytl=wVjj++q
zF0-u<84+Go;re`Z?Ha-CM*_5+?~9pMBn$QYL(Gdo+!U=t4Uc8xt1dm`6}5BX2b->r
zCWJFd_&kB`?zDW2`U(e1EQXb3lu;L>j3o47ETtOX6VRI37{GgDA|ck2CV0Wv>6g2#
z5N|?D+Ovbgcwm$-^vKADStf?1(!z^ep~ju=-bar=q8DBAH=bRTpaw+j&}Z>uH@o4V
z80O7pzkJ4GeAlUlOs`{W^41@PV1qOb_IElnL_EgEZ{wOU`NnK6gRS-Em@5B#aJ4m!
zPtpWK5w$dwc9(wk>KSNV{U|c!Dl$`BE%EO@lEC_IT-M>0Emzeiy*Z(pz=^G8*1HKV
z^)M$|s+}nMdpRppmhzG?&eBbI`AuW~EVB(kzITHM<Ta>84NFUO!|3TsFOhruB8qOy
zX#)uxg~5!Zl!bw$z4A5Z|FCy=A7i7J4#T+A3iZs~8&qQ9H=zFy{O9rovVkh@*(0fJ
z%)|Q^r#Fs1d(wy}6@_GO?bu+uwN1IZeb-+ID>ys^A$vlss4?ZJ(eBa`D?thdSUC+^
zFjMBoi-=u%k}k4wyxm^*Z~vb_)=}!@&o0c%zd%<1ap`#<Z>XXco3A>8HY18MO^kf*
zo4?TCR-2=z)}2o4brCZ~b1cj)s;yqq#eKQN&MnL(hVp&n83MZx{AI%>+Ht6#$oSz@
z%3mtWvLLhD2>8vldy^Ie_4v;zIaU;XKLxlDF><KJkox}fC++&;?oK;q#j*H>o6lFK
zyEMgDv4tR$^&Xq`|HEWi{WG2a!DP|DN1uA?eX@@d=#@-lLseom{f$`j69VvMvg=0V
zX}9m?m9Fz)u$uJG^!pcrB%(^%@!k+jJIenN6k-s<{jQJTV%9o&8b@u`aKcVewL@1z
zK98l69f3gk%K^#1cqBN=?7~h&0D$+A6fR=5keM8>j>Z!GZ-CY2E7<gWD=T-h_qBWN
z(b@5KtLdn;krqyfCMpo_hw)D2M@G#+mK}Aq(k8`pnfKi|(}9pXB+*z6{rYHjzL1zy
z^MTN!6qArpF#($DheD!1<PG6_AQAG5JRIBw+SYj51R|yKQluyo2A0>|1n#q>Wm0W-
zx3>qPD95-^{sMrRzRGC+=IhQ4cGUk`_#2Xj@yVb4EUcoD*uFa0p<C}kknbzD#6;yn
z0@}aEiezTRKt&jRe8-`#e~|~6)?r&mN)9%c|7%!xN(ei$h;OIQ`(eR&Ddi|_OpNBd
za0Q<lJPF($;(z~m13sAGVCF^8zeXNCs$3Y}a;d?eO87=UszU;J)f9h{`+p!x`Jc`$
zt8k)>?+vS=bapfiQ`V59x=dL<8#pC))0rK)!#Oh|LV2;z^&Hss7I4A6*>n&qn=}20
zWK8`A5)COlSLg$30LtWFrjg2DMD1C;yXNxR9uSloo~=>%9LE<?US90ZpvUq7Mb~NH
z)h@^py|cr)RZhU}N3#YR@@SXeb&^()BaPx#a*Mj>O_fs}34U^m_yL0_&YALW@5_##
z4?*HvD}h#4{H&_B2@hH)d<gF_jR?wKBfxKUcHC=ddXByJHeqb6KW)&vtH(Lj39*en
zP`JMi|8pwJ!l;Tah<3HL>;|c4(t^aHV2Dx6<p)pK&A;b-;TH8=dky$|BInCj@(O4f
z<lw&_4j!0s9+$ys+9nJX7gV2xV6Q*fb38vsG>LC|UG{>_a++Y?NMDnoHEM2d@b*$z
zrit6QY%9b!*wO-5lBTaIa&faoD_j4%ly68NCa4iu{>_lqBLyt~^uHwo+FR?M-%t%}
z@c^iNfBcVx|JyzP&v%$eZD2F$U3EXBkjR#mL;X(O5B@Je@V|z>gGb6`{6Z)~D#7Ho
zu9KSadASo3&>0bbtN5>{%wJz9hz-?#SC<9?C|>c`!<Hz`hXV37KFN^<=+sY)LIS9>
zx-5YL|Au8F;mt3ikA~@y^EHD~puekO0)VQr6+Rel0`HxEcmID)hzu{$Kxa0=oIcc6
zRr<}R>SJ=aPJMeTt!=*l=fr5{B&ecx+};a@jHXoY{!Ku3qm7WD#<a6EOU3>h)r5@5
z?;Zvpy7vKib5<3FC}@FVhL<EZQjW(zPv@alDwsTT*@*%YT;pKV0Y+m|i2bj5<ADB=
zLZ@kovdyoK*DI)<Czz#gbY|IA5v>nFlTn_HVyC6OCLZI}q7cjZ<Rg}PIjIgqPWzMJ
zvhU4@pV$pOlB$&_*W8H2l%9}K3|4$ZX~nm3zwFX?ua=>xuMca{I_i{%6xZWa!t6e$
z=hZDP8hg79g+)0Jm7fq_5qaKl)|eo~)=ACxE2T{sSr!z*0j1VgH+0!#Z!~IrmPg44
z;_y)PT)kNxdbsWW9>H5wNi4~+O(|DJTLZ|M_>*@q?)_PxjuKHK^r*}fzVV3OP5I^D
zTY{gY=6BmfPl~pZvb4(NHIFKSH#*pD_AoFq>C>_iMzYVYa11NY^`rgNNEH+XL#4YK
zvvs~rmRCgOXHw6waU*n3?XXwoGvS`x_*v$s`y%z7zNC~#bPd~y3dd(svm29B!>QZV
zk1HB6u{p?p5eTD8Pmw!2{4v=-j}@M!P$5&Gnx|-X#S+bje;MFNlp!WS3V#qS8LA~n
zG@GfBNF%W&W!AOuBPOgCpX)A?YhKU0qHmVjWUSflmlnUDn;GNH{P*LE4*gU0hj?63
zEV@nOpMJ1ypTeFGIp)i>6y4tfcVlZAFbH|CFpo2q{T&RGX{JTR(cy0HgiHY?1<~W0
z61YbB(}pI4rbumi?6XFwvqmAEOTV3MQD?<FZgvCqYk58nIL@8p`F?-BH$4{E``GfP
z$}{9S@0a<_&;8mapY8q2a{_-}VTEjzK*L|J+^M;rsc=|G(5#3u2(e8xD}zd6ZxqvN
z84`R1%KfdyTWnwe*z(5{9SB-L)k>T2?RSXp8fm|1ta!vEWEkTUEzife9!JtNw%4Bg
zcIMTFouxZQUJ=|6ZLTaM&khJiZ%jAZ3drK(H0BMpnP%N*FIJU@)e8o#^d%iPhK5c~
zF>eFN^4MvWoT65n1w@9*v{1yYrW-^pc~B1rS2I=Ux(=WmS_kTac1&rnV3?zqDlm)$
zNU=_<71?SO`#36;c>XlgU9s7RgtA#s&gg_!q<70w&CDa%{6V(NmzR9X;OKv8h&^GW
z%c^VaW;Q@IbR!L(BNQl|nyqwT*t9pC(zvT+e!LH&>lxLq#xieD^9<r9XmL?$=WwY;
z+g6ti)%Z^J+L)tb)M_|{wT@%>P|40#-J>9CkE5fhJ~;c?)x_lF%jG#ebg;M&cI&5{
zBW>^<+4YAX{kTu|;ikN=POUdjuZz7vF#zeRd~IV(8|A&|XvuhP39db-ASoX^(yM7k
zOKxpW0b5RNTj+;972~OC>@9vFd)#;5`A6D$=)UF@#6KBX>H4-bin5i@G|^7^e$T2C
zy(zRx(W?3q()(3|f6->UzM99;o>Tklou28yM46hyTn#UB>!MKt3&xPrng4Wnz52S&
z<hjggQC}BN6yXz|n_26#)6l{3AG+9zmVPcKS7O;w{;+V7IYr5OnX-if`J@8sGPXE=
zcv%JVj{{C~=V#lk?^1Im5hL@)x@<mNAd2eNPv{!C&(n$FlO6!(B=2jMAx67sC>_c;
zlKSo#ljhF&BjDD!pp3Ies*W%G9B@X?#IGaTp|HJ)dUhNlOTKx$r~=U%Kh+1`!i;(9
z*}c+w9`73PifC>yR9_a8+x^!3?Ix>Hr@lD%X-#qSEG6db<E>hj?i!J&U0ejxJLesT
z&67TXL8~aOKego1lp&Ao5LxOL6GiN*LRadp2J?j}+n)@q{pUiX?4-j#t?H}Ysqtzj
z2(4%AZNtb(lJ|0H#8Br5TdpfeZo8&8cK=YM&7+$;xQC9tJc;?vj)9G$iD+}4>As+0
z$7$`Kaij#j_o5C(6*n{x_p9Netu|PL$VX@PbJFE6#4!1+2Gx6mo%+RbpG>GW>w4=W
ziF>_1?LH;W7u<cFgV+z4%uV)?4NMo~geBa~5rjOQ@}!=@bOS-3`txR4CmBZIO!!-}
zuR;>*1i+5e+eJdxNlq^j<%=-D+(DeSN*2>}EciB2D;<Z%>vZ<xti?>Ll6~neyTP$_
z?4!yhO~rJoXB}s`>~aY)O^3aOFDwr1jlk1I_lpm9CnSDbS`clO;^EvXX`WlyysMdk
z<&#tJE?U3Y6n9^(jN+2~b1pwh*U$d19hq;{5Khm8-y70B2EL=9F=F{W)&F~M(Bd*4
z3%-tL#iJCbZmFT=+=prR`VTx0GECdOQqcPRXtJ(7!Hvh#`g85iCAkk2W2IWDO<aNO
z&$tID=m6|G^f{yz&^o<h{tE&}pe#+8`V5*;f@jHETufNT%0u-sW}UBj=}O<yLMYeq
z??G|9P1KXN`x5&?)n6d+EZEcT>eMCdb4B>e&qX%yN%rLAqtn8dw&NV_-PE}xFe$zL
zWSFl|AGy*<x?!E+K;OlKLi}<23e(m5IkGjQerN8G3VK!8E9qM3DwTguLle8cq4E@g
zs`I>fIAAiCCKQu5$(3DNZHSAy`WE%h+clf{o78T@Y9{$VM?>fUj*w#oQKe)u^DqR}
zs2s<nT)jxN0_RLN`pqo15;RLM>MFaeyyR3dWnuFigL9eorUP9}^yH*wlK4+-O12!4
zCl=ept#0x(e1%+Ut`g(YEFqUai6|wgdQ^nWbZVpSx|be*kF8iK)@#%o?doH>`)}$J
zEr<2;42V_9F{_E*Ka)&NjL7BVPm;QIW{qm~%IqFiV{-XBSD$-3KUh>+Z3Jndr+meU
zD(<6hk-lEdbvgC+**wpu8df^=GbzS;uvL%vkUg?Hc$8~C^qjAHnK(}OEahs_koJ1;
ze4n<O_BwEqK>QL|Qe<pUHu)qb=|X&Fw5V`|Av(jY9F#df_kx*$qEdux83A>Wi$a~_
zQEEq<LdI@yEC=a16aKTVZCRJULcDpz!m=ufMvd0Eki+&w(q*?lk-U?~SzBQMt#pBI
zAc16Xq2ebp>1_HvZO&j&Uaed8&YPcV{4*Cy*n27IyT|CSZf@0jYjS66VJ@#8(Mz0j
zSDYZqQbSxvhP-ySWeV<+ER^}^<?eS#&XWO9Qfbr9p7(LLah}ee1-8X0<R)G!S${gH
z(s3l__s}B86D8k{7*Q#$3fAmo0hhbcjI1#_)-ktI<>n!GlYj0sEv!95lJEk-#~^+o
zOubdnJyvI`t>qQn>`|oo4b+@Xl9<WzG7wobro@Bl?BX-VWnyEcRW^5YZKFK!+NIv@
z{K~ts=)AwK$zDajc|$>>;!w7F3gb0>fUx#F-PeSWcccKZJlff9L(G1<M#+nk%gO&u
zM+Rdp&Q3VZ-n~h*UUuGHr-UaLQRiG0!VGBLNQbhL@QkaWZ&P{jhC09HUwU%$lvFQ@
zNlw>%UPT71>aGvO%?LbaE~dC0Z29g%0_Uzl%8;pB8@n~)DY;5~&h?JZwmMQ%%L3&-
z`_&iy>{OA@2uG)0d%47wY{hT@%}@NkU>qjxV_sCv_rQ~gwYsZbQc}&aTNtn$du3S+
zCy6C9hU>sw;7K69Hpdu9)a14fHoH>mtTNO>0d`gVVEj<OF5WvW0>N=nIIK|Pu?V`)
z$T!O>w&b>D^2HUYOB_S?6f~0O4uxd}cW>ZXAni#T=3ud3$WC6+EnM9TIs4mM627jL
zk?}qXpe-X#;fKDm=jFn=+IJZ?mSP2Eokn$KXn5oc;kP7w;p+3mlkcGH+YR4-KR?}E
zs%dm{@*!>QJBmTf#mo#XnC~)sySwz@@B`=E-EUzvk;dWWXW4s|l4`9OO)f_mu#ic%
z_8TFYQ#!ENJbzV#IhQYN&I-y+mAMAhi+roZl+J9uXBsLy=fIx<8{5FE;mN(m#K3H$
z*iL9&+_4!j=$A^EZ2%SXwPFn{6h7v%n@(5cIs`Y6`OOvd`P&DWMT35^9W!9zN3h@<
zAum=oetB%d+a2#I@}YUOcNfv&Q@5{AOV-O_ZyDoS8VRp!b~5G$fay6`5@VC#KP+iC
zC08tIhV_Yc5`0;L3Iv#}O4>A!73M$cVmlb^a*Fi9;7l@ok>Yi#Rmy^f)Tnxys$M=F
zkvUffSM6*)-uj=0*|#RLPeN|^y!>%A9y8-g;6=9iRpM0RRH1wp*zn3dis{7Z_L5lv
z_q`q0G<A^$@8%41*{=$JFS$1FIeKQ<F>ns#;QV7^-bI#=k&^4M#k?zJab2S{YAF!|
zcYY#*(2}<b3ebMeEPsE1p~lTICdV|gjc=Ft_<CsV?KOvNN?+p_^uQ9UP{kTr!7t>W
zEBRH91h;R$3^Ac8j~b#rDi}F%k#PjOGeGf5Z(<fC4-7hgYt5`9q8zMkf{@Q^`y#u4
zhSfgN@cP^NN{A2ObUc+wE*Q2jQey*visJ^aALGRLLl2OE;@KKeO~Q@Pa+=y{xRdJ}
zE+(s|V1yzF^#S8AeHN>46IS1b#lO;=kDv9V-E_5S5Z(DWq=KDTQ80mZi=(NQk_^)A
z&UM$t#u-)mVaZc{x_D!0B=zVv`rptFl`rIc=~?n-nP+FmtCm7D_x*4T&y{hhx~&4|
zsPs3zGvUbHNmqe&A>?_gfS1MW41<P2Ui~Adt&G+A^^-zVPv_RKRu($o6@L@VRsE!K
zRfyD!;<M2Gt=Px5<Rrh%^xA+I@EYJ9ME#(~;TBu>BcSd_>@P`j!g_{ub~nvo0t#v?
zBFvac8)`wSgUdKDQAzO(p&;5xtDK0X7|#gi%4@aO6wF+VKIY3VSNm(7^ky=Ujjh|5
zhNX)(3}Hb4F8YR!@VxUh0%u^w)q44|ADC5vE;Ac83lIR|$pV|A1o?jB8#|jeYcBQA
z7T$ZG)j(vef|cRB6XGD&(^t08XF}-A<QNCQ>ngRw{(E(QW{be<)Z^tR+uL^Gg-l7_
zvUTak4Z#KQZ7@Z+i26a2WAFR8dUTeO-xnJxB3h2@H>_-B(@TnH=G1Jk_>!7#i6(04
zxfcntX+G>}zNJ^}O)VotNl<+o<FwX{R)ZnsM^{5-cqig&0FYuoRQMHF*!=#-kTEQA
zV0oPV{hJzX=zFmYC|9*OS-5e<XLCGpP+Mwk=_9eoqTV$BS+obRIUuwHN3&Q;p7G}2
zMGUS7c$f!GN~a!&+M3%qN#&I#KezIS#lM;PYsI$luE`cP=Lr72pUGvuR^7f$<saF^
zdJ{$l{8<#LqF_&=jyx;n5)4@&ae82Fdh<*CotJ7IIVObF!0et5r5rJZVcnsOaO-;?
z)w;Mrj26E-`}K_em?1*ID;jpk(DRz|3Rr*H9Qys|L!&b$kbVX>GPSL->#BMScug6=
zZefytseY-;yAn^I`Zl9`r#=wyW;0cL=uEbUOKmKxwg#OmxmbJ*<<ta3D^0@87IZzE
zwd=X<=Scgrk4<I!)@bMo#&!awiTQrW!^9vPFY=%s71-zfg%@?9FVo#oy>o3c+&rJu
zh|xuR>sKSHQGwGVsvqhJj9nVnYhoXH6E(Mg6UN8KymR^*$Cd~H`BX*c)eOE{AR)>u
zZZy>BN7&gjG2|CM1*5yIc^Y+Zh%@#b!FPfEjFSCKqf0-{zHu}#7sgMnj5-^Un#vfZ
zR=eDt`}Tb<_0Vq|NrmhhQ8&XJSZ6~VaJlN_W3*J>lIrS#z9&<Nnd18##xIvPn85em
z`r`Z=;Vk4m6mIYdlGwUZuVd7z=bCWCC7xp;6${vn!X)N;Q@S`HjlF9f3O&f?yLd4X
zi{6gGeapt<WxUnPxSG}w1csQyj;ajCP7+D@k#Y4*lPQ~_R}*1e&N+F!4x+4<-I}-b
zz<)MdpT}kyj~iJ$R`a2PErz7RH;$`Mh;32oo3nI-knC6;R6M)+<meQo6Bz_yn#NO{
z6=MHqiOQzjpM<=#$lo8X{2d4>J4oL$TABY@{^7X;cx4~i&LE4NCSw!N(v*ydPUc*{
zd-;CifJwHuaf0XcapJxMYz9q9!z0)5+AJ&Ze5K$b#Cz(=b?1u!UM8!=;!!ZU24iZs
zS}5L<x#C(zyO?B^d+aUrcaZdt()_CP0d#&~jU6t#L)%Pj$xb?831p2LnNI@_%_Cz=
z9p5(}Cq`!~(ZT<M^(Gy$NWJ^<16EhP&8+WGXs*gUCWKZO2BR4YnIqx$ME_KX){!{2
zDcmj1faHr{vCRb-XH(z(EWYt>&W=~#`E-c_09Kwk0nMf!vo)bzx~_{@9p@oXoMD=a
z&XI)x>gSSEKvSBiU4_8%e!%01F|iVsEL|v;1lIM9oMgcwH96R%Z7MZ+-)U?&afPN+
zMlaM8Ttv!Lv|63|%n}Tfw`7_Hr=|}4h<>jXtsZAAQ!*{Bkz%&YsoCfd48U3SHf_Uk
zb0=y#STl%Gl$$}kE7tG)AtxW3P!}c!kpMYl_(?)Pj<xs;?kssovUV|ZReA2`sw7H&
zg2m4}qiJsd>~ltB010V$d1HH}t?TrKz~T0+U&k=_llOubxY=r3LOH2B-pxbyMtu}3
zw{dE9zm!0bCLh6xcE3asTTG`4rPKIk>q_I!TR;o$qm}36G<4b!QmW>z%<z-s^Fh*b
z(S(8|8tXs(X|Q)sYJ7GewnvFz0qk*MMP=Ko?J^JVfAkp-VPp?Ebc3AV+lRK&pH-!E
zepi1|Ake5Sm@qsXG(~R98o$73|ILPLQdlpe1@pPK$#;!$=z?5um2$(FT1}V78Rx^o
z13vIV%B}mBX0NdY3PodIcE97`jnM{nn8(9(0MsK53dg|kFyeATM1-6II+?jnx0PnN
zoqCB57l+_gY?LJe=?)|DwjqbDyu)rgFXbCAX=^(50l5y@HbyLZ_=1FhJ|cL3rl*)s
zSRo6w=65YRR*j7;%N(3)j)wvkBGJo-y|=@}VxLE(wy_t(e8BDvkBDj_{X*~LVKDNC
zM$BVKV(m{kxNp&?w3H)7M14(<;VA)N-|u6pxLcXd9biD7Gv5w-I+gNVERAdsTgF6R
zOiVFmkJP5}a?E~3*dyKQ>pB1C31X`g${hJ!)ZQWql1(tY?)LYOs-sBZ?;17PC<R=4
zIK_AD7=sCOPZ8DJ?v=#&OKJV$#jb06un3)4IrJ2Ybd*~MR9gd_a#VHRVSL!LE^|7!
z*X~M??zK)@#3$3Ds*OlwRTa@$)sHnrydI8Z&i5j%`=V1s_>qb=_WiprG+7BEqM^Pp
zy^?RiA7q9dnu#CjdJilylqaL2L(ykxdQB5*$#SzGR$OX760mRDAVxrc?GUDzQswnz
zYFv~%8;zSr8zSr{E@n4E=}202U_iV<RdH;dz~%kv;5#;lkhHYPkhn%Dew@QzX(<%;
z$wz-$`*sz=`@RlxSxshpid<-V*)E=jGD6t+oq24nLoZ(!Vsljn&D;B+?RmPAm>EpH
zF}m(WZj~!x*T{k~HWE3|0NczN>D-wV&&-`<92m$6Q$7YQ^S2Gw@y&?9fc-xLj1B(x
zSm7=*$|oM0Krq0377~A734R?ctx7d~@<}!5>^*1(2);U>(NE_=di~?9WAz5(u=JW~
zwYlB~(7a`_ZlFtO{7^KIa}#ZCEQUY`K(&*FrOq(K1PV0H8YjBP|B6QORkn$4zg+v?
zR8%nrwrLiCS~hpDtot&@{=^8ubcLqE#Tx4ZiR>Xu#EDm~fc7-;E&krz>|U9432}Vj
z;Yn)ld(LGX2C3m!h*CLzQMZ95eNoN=6Kun_dbliN>IOBD))JE~zN-$8`k%b{tjKa4
zZkUui7B^Wz5)D|)TKb!4)a2fuG<U}D3R%|E{j^lxm9xN1%Z(un!3gZc6ReH-fv-Kz
z%bF)fjkqtTiVxkB(m4$(l~BG5Srj{3pKJ8rxEk6YC1ia49sdd1#AL_y`vIK1G5g-<
z4Gv^b>Lr+^T&ce%6BIZijL~YdEn0FyaW5~+iNdRaJDEuDf&kW^df8Wni7Jk*=mJy~
zYJS!Uc-u?%_!IXM<Uu^Be+jLZdi%!(RY2xz7DqXd8&XF7xKHB!iJ{cyhbAE>&pv#M
zvv&I^b|f~YQxkr=%dXbKJy=Tq10W&tNwKQ)!Us*VP-CXob>G{)2CIQs%-Vlod{5n*
zRcV^*Q^;aFWIX$hxJ%MqM|0axXkg#KoqaYTZYlDO;|N6IUJ<R=!BmL4)~`Bk0|)>{
zRXfyWcc+%@Q(BNn*Uum7c9acZ1qbfiH1Rf?+;1>ox%H(6ch?OBhG3>LONO74HTV+<
z0#dAR90`fJu4#enWn7>40DYWh53*N*L`rcCKDiap?e2(vyCMzd$C`0D#1`KZTiZ}V
ziw;^rnsKSA4=tlQUUKk8+ZT~9=V)*NBsJ&}i(sApAGOVOF|^k|mht8+;Ix|{JUbr-
zhcvA-ROXfU)N_v0%m%Oy73gQrln6YqG2PG+fJQ{|4Nc35cYlu!#iI|z&@AOdm4oV|
zaz(KlL@?YWNykJM?aBnQztFJXc6BSY=(y6~A1aICmNqX*;J|_b@3nMplNT5r1DL7E
zwjV#1e|POr{DC=$GJn=!Qn4MUF>_T>w<W{~Ek7EJMydigosGN3XNaz2)5k_lGco61
z$Sh$R$3KH5W>Kgca$U;G31}*1(DkYpazrZz1_vQfp&rn{1Kio^wx$LeFsL6+?j$e)
zm|?5rg6o$j*|V|NtJDSa6e@~2L+wY6VcQ`XajQ8)DI5HvU_C!dW_%!GA+G<Jrr1h9
zf&KTeO1#q3&2P1rL;^1-b0ZN2$TT-eH~eFd5Y5)42C~y#hLm)hJoVPV>WDgy;bdzE
zK-WA4MgcO6$Oz(lJ8fSB_Zh?M#mfc5SwqV#uXP~I<DpA7L?m=}!QuxgRtl}9oC9VA
z%9~!EC&mC&3S9Ifuw>l@bNkO0CKLfFu}oH<d*p1}y%+S|>oi7`^}!f)Y3)j$Hmk;!
zbq5R24rk|$yvxmJ0%9~K;7+U1*-I0^1Ypk}Vlr}S(B69KwiSG=u6EE#y66~}3>89b
z6n7i)yimcj4SV*sx8+=44R)<ABE!wz-m|NW<A4H&xI@g6K9|afn6MPBhWx<h?O{}X
zN_x#@zHO<Z)d&?1b(ELPKDquw*{MX!v34(OylXTy`8{LeEs%GUiet2&B}A=lEn){;
zhZx>vcv+C$Hm>3Ncy^9V{W*rMT_<9Pm_Fv?8AR2Eyr6TLk>NoB1Q8R}dEa5}^=WVI
zLn*};Qmmt_FP&Y=SPI10%V&*gr|K}|LjVqs@>@4KC1HlB32bJ=%l;$w)0dgI;r$vG
zM|edp-haM_7Kzb|UwA(cBRuAGSm|*A$7@H4MsQ3J_wamrKcB%^eMD8IlZ!w~c;wE7
zgo|rH&XXx<)G!=xew&xwx)BG9lowH{SiF9?)bO7CFro?x<hZ5`Ax+3W=)~KOGm1YY
zl`-yxuJu}^cy(Ev!Spo9!4z*Ik66fItyB%;RaUwp_G$CHEjPD>Huu+x#i-Gz-R2)K
zH#Qmkd&0^;5_gk}@%Bz6dW`O7sP5m|iL}Cb%(0sEV33!ZO?|to)c$PFt8ZC&_3dHG
z1~JAqc)pmn92Xq{UMnpf^{&E4ARpX!q`EB@y>p2bA__pw{)puUm4VazHE!J%@kEZ$
z;nR#hZ9e33gR{Le?9C(t=nTZ{0(D}2iCOM}w{2OfZU@+b%P<+Jm1L$V+rQV&*EY$q
z(J#-tvPq~F;?JzO9Z%OhJ9!gduBIHZ4k3VKo+Sj~VAvU6O3!w8dSq)*{NQeL?v7sb
z=x7oL>eU(a^<b>}WBzV6oq}@}Nk;<$kU%}xp^4q$IP%Imm1d|}sh`X&WS2+-)Zw-O
zbLX|2B>>bWKTzme4>Iy5(ZuuJOcmN#tSx)We;$rZDeFDKCalDfvFm~jpesYN8G7Ix
zf=`h5AF%y4^(S_Q?e%w3-k1#{B-mvtMKOMAJWG}ht3iHJ&b5B05}lT%m~vK}-vy&H
zZS~WGGs?Ftp6<e3MkZQKD&#6sO5ykRF>k?hsRVvQAU`993;n!ET>o(h>uX{eyd3&*
z0=cwQC?c4mr;FmImGhI6ZNKuzTq+I#Xi$E|kQ`$kNu$f6-)*LN33LyHh8Au@=1{XS
zNKE9Q)FL3HQvXp1_FO2ni;;o==9#>?@e8WAw<axYM)|$8W_Qp@!k)&Zm-<^Mnyf?^
zj#{CaT=DzEoiLpckj}#O>Hx%Yiy2ybuLC3;xyFXFFN1|AE+cZp5s$o*AEYt(=-ov|
zSFwD^C{=D$;10I-cEwqoqvhY-mu{>P_n8F<MMn8PH-$j~h?+@6aVU5J%X=lCkh|fy
zDm;ecne>J)2s=lg_vogfydHxX(7V0;w*pCY;54`FtuaUz(I?wl3y^}g;qkIB>@&Je
z$SK{pU$mZ#RXqH)$kj9OcztO4nQ|VM{Zrsb{Ic@m&t6}W@c^%V>;-t=NfF~m99a<?
zMJw$wM#!_$Zy&e74wW7#;sU{ZddY5H8}58DGb7XRW!E@C+q2xPQfbu4HW<b!HJuXn
z`+);yTgDs!5K5!2Af55g6-4jJl}Z~%)OBHUbPwZFa(fWdX!!HE+8O8G0SWNxt4F?B
z6$UNXWrc*GWUfjg0I0+oD6!wS6`5r-x#{k*7UfEZ<L&H;SEN6gi-ngQ^j&trlc7=D
zqM^~q*|O~Aya&2Y`7jJE;X`K$_>I8{>ii}kL<;?yBF~g?f+L~O)9r>!P2cm~C{%=u
z^6f^O6<EB;K6U~O`>LCZ>8KMOv%tIRE3-#`;xH$zv#dF=PQ$CfV$xx|y$#tdmELQG
z1U?WRW<HO>$>^%C!+xZ~vpJHM<p9p^;-LXfi-Uz)FS+<xSdHM$R4#Y|&#K;mHoqeh
z6;SC2=AXmNF4#oWCO0mW^DgHvsl}8gKXz7#$bHw)9sAaWD#-tAd7-=B6!|L{2$nL$
z6S{0?X(E@NsTB;$eRnggd>Qb|Xt4DS@PPtb*X`}QtT81oe1Ejboeo97O4}mPQ8+r|
z=ml(0qM09;;(vJKZ#>o5XJoLP`st?b>`5+FT9$_E@ZNr`oEhjtSb3&mAA0{+J@Z)j
zB5N%zIRVig0xBXC#GUUyww)z>gfHj2Ynyv}pg_To*%IVvxd_!sG<R5LOf2i@>Hq1)
zoHIc`Gf-v@3IIl7<s>&J?OW`qB%yN;%|rQCkK+Cbt(;kx%p7$_W~CktQ@}Gc!U5x3
zRDG_O=I&9QuKB6_D?*4Yb%w|y-yC(Wy&hb`mUWB`x}5l`ScNjS%3Krgf}a}sO&VZX
z56>-(JIx8CWZq>?)mZZ1vr7FIX4;sQlr^#Y_P7+t0frx@A8)f(+br!cuI3=xb3mNn
z5HlrPwgWe69<x5zP8NNoR!&h_vOelT^Nn#Kndrrrn?%l!xh_=UJm;lo;ZKoJ6u6nG
zA6k(l=Js@WP*22)k;Gibh57TBEE<+aq0%Iw0iz9<g)&6S-%8u^guzwJ=MjbIv2Aob
zAETbb1wIxBt#L@c5Qs@O;hSM6BUB1ZA4})_Ag4sl&Ba~%7II>Ncro?jPQUTQUbxZ5
zKL!b05#E0GkCZxC0!{H@O`L3w?$2UKI;-0LJM`T)w}W&0U^8k#ADZw-<@mN`8lJ=h
z1;hg(e3_|+BOAZ6nYg#;Q5dz!ZD=i@2<cst_J>TXPM8o}c8Qb!BO1L)9acHkg8-Oa
z_}|Nsl5tJ-A_aYx;bBaI5AKW`B}8wid(jR5_V$AeqfZx@jiD+Qj&a10_7R<eB9Gct
zKE*hAg%LeXt>#mz8ZsvEfp427C?U<)UZSh<egCc3Urkc*E+SZsoj5^a=_I`YL~>YE
z;6Ag$$^{_ph0+xEGP;1qY%(w9qs*#R`Y{+3njnQ-QprN*;N=6mC7JBhxMzb8r0;y<
zidMpjo}5C?X6C&j)f`Jq8Wn3=yc@CRk5Azp;Z`g$76RE{`zE$@d1V<(G3&cOCxs7Z
zpX{=lJ`9>+^MQ&@Xj+uJIxAyjWuQ&Etk6|M?FVUl*UoS6cNvbVwo>`YiBA(FYG3c`
zR1A6EwJcLCb96rKyj`e3fspp+SAhr=42~W}&xJ=Izzk(76R^%9KiwP*SUDQ;kpVuZ
z@H2s>5v6Bjhu;9-<IIqq$ne#wwpjr|Lk9;tn0$sG20qJjy$oXkkr&O1t7MLf&MkvG
z)ha!Fj-Uc6pnTr;hS0!-^H1K&<q;fp06&L`#O2>>eX)Q0)6ZrIEXx7MtIx02oVCuw
z)kN|Y8BkECzY+VbknwElCg_B~SCdIHuHXtLSZKS`W<+~73_VY{huYO^W1l-bR0-0A
za9Ih$1)p3~CIk$;tfRmwRG28^NB=M8-ZChTs9PI_B!na+5FkMCK#<_>nm~fPdxE>W
z4el_(9TGISI}8MOcbUQ6ZP4L1dG9%=>YhK}k6X8HSJza}p6)f<dhfl~ex9|Ga|TI^
zu~6OIS1A=Fh-qnapJ)kVaL>F0g1{L@p_jxhYW1P(RG{lfq*5QtmwqsDSB<MAJG+Hq
zH3xV0HbCowC^dIE`BlVgnn7K|ZL@83=c_Wn&P_IU=BpK9OEvUkKB>+hoT5z>v@{}A
z#z?&;`z4xH)j$vFNJ_{062Z<^=lE6OmmRRlj)u}Y+qt4}VzMF-fIe5NpB=FUPUicp
z97;wES|Y`r>T<=`qcHH&QO0w9mVp$>t6drN7omoq&v0h_dv-G5I*o)NGfxxiPl4y=
z#Gjujk|_n%7J)jO0=|8jWavQw$p!D&949<~`&n`IJp0{i8eE?LAx^=|jO+S8P#p=M
zyv9d(1rQiFAV2Gz`-P-7gDoWxA7jHa{NKu4EJNNfL1eayML7t$IrtB9H{??`GIV%G
zSc8Ua<yPC{XI>a<W2@z9MnTMyCVPCjNyX_5h~}ZP)Z*?<Z$PVsqXW428u#JgJ`+@D
zO8aAkYNJ6u=WYPJYFGd4C2Y$|eowg5BZZtSEwC3W191k``6GvdR9AHzh}SLNEMLF0
z^IUw2DTkUu@{SD2ae#zD5Gw-XE?JOX5a+7nC>CQ7i}ZQ+g+il)V@zxm$_HfER*`o;
z3O61KKTi=Z?+&(biSjF<<v@1}JVdStD;tjC5IPo;K=r=ywO1wVdK)3cIDSv-Cz&;J
z4|+?LUcT}AVhBEta+C3p7o*MSS%IpQ8TV7)(H}LeMF9dRg2!ArPXRUY!YZ3vtr?#6
zH-+b|lZHqqffSSqR<@P9({@+mZr-(kyYjTYP`%xPE5O!H<#YJTaXxZ*z-wxGgTaL_
znemID8E*Gm-0Yv<g}GRTL|<(tIMVG06ZRhT;KKs8Er?ol#5Z35Rnv@MqM0)YWFEva
z2tGL{1D7WXRmboDq@&HP5D}rvom93v#~sW@cgq>uTfu1ge5pqp1^q<nX(bp(H>gd*
zGsB_fJcr=UPUV#$BH6R=YmdD%vJ(PbQ*eA#>kWV6_1r}0{ko?c&qf3V>OXYZRbv@4
z(gzRi5ar>*?F0eM^LzXz>8$i|wgC-k=f2ns4UsSC7<$v_&O0ycy>X5(;b$4N=KC+g
z>;3*bX;oLh8c%&RHaO6^X5v-+_9M9DTT@-h#1G#LaQrZ=%dT`~k$Q5t;uuKr=eJ)5
zpLQJEcNK3@nxvW?Tk$>}_BT&9eDcFGg!%yW0tp}OES3hPD)V}B2VdySjBrlEJ&}Z1
zQ)x%qq3dtC;frKY0Q{?IBUnCLDUvS$lt<4>3AW%s-nsd8#jV~F!|VLjok)8HTtX>k
z^Oh9#W)?IL&PO4!Xl$()_l$+<-^FJj7W0eIM;*>rd5xY<iwY_IO`qH%7gwSrOJodX
zBCgO$;&|b*tn;+ZVU^OAg0YnzF#ZTBC(I;U)&60pDA-v9k=!44V(TRw+_mo{C|jBr
zA_@wyQ7@0ugdZ1VOAZdwQUMjN^QVcw6F7s}(84mqS35rFy@DI~7mJ%dVSYwqqb#41
z*qMTKCswG*v)e%ZaME<32k2tOserz3m7KAUyEn2_DA6~vW5{Il+_bi}Zi>V;t+%2k
zqjivUDG<;{eRi%B@6oT<kp>dh?2DvQGDv@$+2m}<?HMzfJwuw-h~RsQ25fE5m}}@m
z+M^QLpZM&=f6@B>Jk(;QYh;Z$8{(e(<3?Et&@_>RV*{b1mkF=MM+ZsY5&Kb{VQGbn
zydBA0>_Ys&Mk-f9jZk47c%C|#jpguc_fMiUieFiIH>;7nkD{igbneyBvenv&9|02c
zL8GBXGO$JQAI<bng&aNwn|nUqLKYh+c}|Hc>f|Y5`SKn|YQn7LIBnk@q%L3z>)z#C
ztoL;pzquZq1F3ui?fA6q30M<0XvQ(<9ESdR0){@XN#uvH=fof2LV3k{Z<SHoA)Uz8
zQ>|>PGo^{(%{n;lRaZ}&*-h@klW9+!28!wLt`!b4mq&~{-i~V`eU~~tj%jlrFR7M>
ze2?ty*IODv%u67Buaj-7>yKkT_^l-{z={5-q9Wx9JXBxvJbOdvoLc(|GyKs+Vl)}3
z?PsiFI=S-QwWwDaOI!Bmv!T$4VfLA7!yr>Z8A7aI1-N*1-iezBBg;~<PkjnHtq6A)
z1SmindbcqXNNtBnzDGX`dX+0#KRa@?x=>ngA-7dq79E7T)_p^V7@|WO0ZuX@cwRG)
z0zLvNN%R7o@}_$YD<}8-4VbERUFV4`Lm{EOdgFdKwTATlW?hd{DEQZpHC?4KZa$<o
zyMb9<Rsvzh&sCd?30_b^mtT33o>#<GUu9|vB)?s2pN23I)4W{asAo7L@a}kf7yl^Z
z99G*Vhj+)t@+utti~R*pN_#O*Iv+ff8Js6{@p<BmiXsgTFi(PJwNV1@e$$}e%>5A@
zb~<1bo$cPktK`R&7i@NqA22I>we)du%>|XmwQi>mS{sEqgX!hypU?f`x@!SYjZ)*X
zw9yl>Eivn5^R`UpzcA$d!PQ9!O~sY2bFM1oOrD}Q>ea(ZpxB>gOF{b}xm?>`Ky^)6
z7T(7{lSgkU513B5c((JU^eYv4PK0gvD%e95Q#NP0mHuf)L=zhhO;{7*4K)g{oC_C<
zsQR>;M<0!)Bya4G74~%JiD>WSeThB*=5#ZB?@!FV&XzxZuCVm|p54nIpxa1zF2#~&
zEud;H`!e6|)z}bEZwWeQRa2&!T#1a??DvF&LF-u0aU2!<`Om57sP7H=R1ITVKTgPy
zD$mEz+{u3riPRyQ^t@SkohveS&QeD|>*5c|i}~n%bR5DwCbO`e^nnyZR$6^1Fzp%f
zBMP=BExOjh!~atea-Q6-A#^3Xop@^N2{7K^H;cXC-<e`NMEel7Xy@`~<fVh@^Ye%W
z8>u`&G4xKpm`M{I7>P4|>X$1;Q=>}`hJ|*oruMh@a~HfwOg>XKB_c@7$hMz>ux1-C
zkx+f;R^2;(PUzw^iZ#ovO-};epX!gSC)T*(=O1gMLIvFBFgkK*7SG(3%)@WN;sD$%
ziDpw@HNyJ%oz3T{`0dGY!h&>Z9v<z#?-o9$$mm+D7$o#H@y-+;O)Gwc4zV*N(y49<
zoM($@(i4Rsf!eLgMx3OFkI`cGzq}^c`IKg~N34G#0&?syaYM`3M0GkLT=z?(EM1{p
z@AREaF5Od!+L*YDQw%b5V{y4}RiUBmm={<q&CMIc%}0sm8M4cg9PA=`lTtSIRibiw
zJ8vA?LRZ2Au6+#_1gGd~^i6%bAbB4D6pY1FMeKpmnD=cfTLZ976^vInVy!fl<L~6<
ze$}3^7YTdC(%7tcR6)L1eV&jIZlAR$@XjLBVbsI8&dInnVIK9Itpqxh&SN^Dc-GbA
zk#HbiVsP;~Yh$RHl*J)lq$JIG^iKzw(a(d}Y5Nc9NwuSP#gln*zif7B#nV^J1p(};
z)mn;L;kYvIM31g>>IIXR)^q<4!S}PA>^vS+C(Q3G*Exqd1fZ+mC`d>TX6uxIQZcQX
z`}U+9ezX$XBeF2LrYS-eg%b4e<R9$354v7d@M82~S5b^fN%#ab`e`ZP<c6Ig3LLz?
z<1n~)(cSbWMD_do=SWti;S)QPaB)eQ1Af>a(v-N&KWV`jdt5EJN2-6ic|2+m`z9yW
zU%9zGz~g!dR%po!)Ghy~7kJ=*1Pf2oa@{hccRwFRNd5sEO4?1I+>l~31=c)CYwfy#
z-`V`5bdVm7=To-Z3+>uYbM4%k1TiMMa?2@G8wC50ZlzchieU|ss0E!7)*)aS|0o)*
zvSTnf=pP>gdIyrQ^o@P`kMPk5k?t0B$*>Vkk!-t;)OxT<-lq!%pUo_t!;5rQ7|3j)
zSFHf}*2i{@AD`lqvBHkTAhv$wqrB>;Cz$_F`oJ?3p11#tfFu9&>HjA;p1HT2SU=6e
zc^`x<oVvH_$h$U4^z4ZpU-rx%M_dp)&J*8|=i*9aZ$mm!A4xUQ??khT5h5MVAF{$A
zVs)-uWJGCOgcrB4e>|1s`z*w|*ok$ZdD=aqSg3{iv5`z*CpZ47|7r~#Bs)SJ^+;j~
z#hB90(}nwNvKsirKBzv3y8mk)rJ8w2Md$1Mi2@J>2ed>!5@-s@+0noH*S*e%Y>E8q
z0V6t-+IfNppNEXPkxcH5?y<o=k0cxZi+FFq%=XCA5sTU;l^q_lU#Wzg+5G!&-D?(n
zm^+YJj>P1_lvi`gEC6YUsv>VUCe2u7LMT>2>2qg4;2P$Ch0FT<8U24nV8eX3{=Y-D
z{r~XBW&<-rPA2jm#~zaHD1lL8!ZQ=|GfY8Mr!(t}dAB%iwWya1!`YKNMR)Mel1&yY
zdVM~T{P#*%L)>2PwA7+Xij3YRwAu!_yI@@3G$oa{GzIfIhqe~%ucw;y&cM3*nF5#Q
z#n+FwTC<?nA)Zc8sVt8?MOECc2oKUuo+@onz|3@Xy$r4iNp{o0%muoq#ME90)C>JD
zQ{%S2^STnHi-9i}E+uy->+Tr3@-quNRS(-$GZeXBx3Ant#Ax~+{M`9s-190zvAi#x
zP9!~>m~5S_D;?`2L2`*y?}<Qp>A&+t=}(EuiYb{K&VBd0%A!xfM6ChNoaWGJ=Vc~U
z#g58y7~=D6?~k)>Ntc{2Ob{u=CC02&JYX+)@j4JCIA==xRmN|c7)zdH3L2_@jJR*z
z5FeuSFktVHH&;J9^Y{J=f4eIj)BKz*>!)nN`Zmh>4+c~Wy_)b8{#Z|LZ0y=TwgP=T
z(r<4f8Qtx|iR@1$8+R*%4wT2AJPL~UbCUkcoA*82{!<fMv(z9dR5G$3bHh=ZOw4R?
zOW{{E4ef`XRdqa~JwF2jYQ?W&9r%_R*^{%OSw9)Md1^m&19;fGF8|5$=vkX198Rlh
zjR58m1D7Qn%a1$HQJ(l^K+QdLvFUzA&uI%s{jC`0p2qL#md@b}=F{w!ei!K2-N%9w
zYMXi-NzdU%b$N{4{!JEP(^yCYjZ_rphq>!_S!EUcl$q+zBbNx9hUQ4B%5<q6WKj)K
zOt7;2NPXw4p)yJyoc7M6N-|-6RJqsJRcux8ivaUvy&;|!!$E<dl^!b^=sPC1lgJ5m
z-svY@?{27P?8Siv#LT7gDj_>g`{2&yAwp6FvgMHeDjkG${8R~o3frvY(zP;kUQ@X>
zxjo_V_=EOaE`LDVvRCm{%5U9ajKM?jaTe1)No#^f>AcWVaM?`=FOy668;pxx=e2yN
z;(VuTwRC9@!Jb;?CZTq<gDQ_wfU%LmD>df4pI%n26ez?hO{wcX4|UAmnBiC|S0m|y
z73F+sRYh8C{Hay2sTSD5;I0*jt0u&LSF^`bAcn@TqC67~#51*wtj^DyhD-*y=(M{k
zhpePa^?s(3k|-$)o=Z`bIuy6Oi}~apaQ|JmznwJIRLHHrE?D3iLYdFRxxe(HyCK!v
z`g3*9YdyXE$PYo}cG+FSwd_eo8cmpLX3RxxUIDx86w8>LPmijFr#?pXfu2(v&lbtu
zUj8>Z#BA(%U~o10%3*K6#zfOS?=r$G7k?y0LZ#qsr&<X`)nLLnE{~;E!$!l&?0S3!
z{`#_=A~7l<-jU_hO1Q}~G2Wj>Eo6cn1)8f#E-m=A?7-w-Lx@t<w0Zc}rzxX)yPe<?
z4iyq;uJDwN$);Rq=3v##Bv5l4q=2qLM0o4H+DypI6#078xGN#;wdJgboh5}Hh|@d1
zsM8^Cm!3<Lw}_M>XVDZNdt|JgJ|om5`Jjd&QAAO+3Cra50QN{-hPqvoDXpQ>2{I?n
z!2Bb_gk~t?s;{tskqw3Iq#3EIa5MreZ=)Ldg1P9l+aOloNVPA9KjjtA+ju+udtmpX
zyI5#!`0uZt1pzJ+_VG;(=WCIsh|O(5vZVf3YsufOn^G@NvmJ$r$X%2gQssDr#-iBz
zGbyF7W!L(OKBMc_*er<D&2*D)ySQkwUy)!(5gEgs*G`rhm~KL>_XKWz5w?0iR}@U{
z<O`0#WjCKpTQZoAmq?8CzqB!D;#>GPJXp_4(e1n?a}gTPOpmIRunYILh}~H3AF=u`
zEP%e_-tk`!YQP{SF!IhYDV|`<O06(3P3m}2@tRIu$(*Q6UAF!>wK8HswvUvr0SV(w
zt1gvfdd8mB&zQ!aFTZPc%WT{fgFK{W83@0^@Q+1u^TI;{$j~E;#7+~T{(rMbrk_-~
zHdmZW|MWN69~sKQp*<^%zjD|(70}kQj_4}#_;{~hjt(>Pv@2SD&OV;~T&r*cTtPbc
z;ot<L{MD~$&MlPd15(<$#H*~(?ikH$1CGF}yX+MXS*<IXj|)@As0IsZxb-%W2(>9%
zvmCuwf||OD{F<C{?1$p@W9@h&><Q0L)~6wnOi@E(<HsReT5`qpGVC~&1wOxz0iKNo
zm-(3nrv?X((rBqhe13OvKbp0wOxO%wwBa}~PW*{L1dt%56{q1HKcn;FP847ylJzQ=
zI@ip9<$YF^g_6nBwadGIU;Fpg>S<lJ&s%ggrjaEgj*kcr??Bfzm`Q)%s&3y2BxcQv
zGI(IeV3%UQ)r@DVd+%K79tipU3u7g||JJ4y@__SA1n3%4RjcD%BgJn?`H5xN^6ZOr
zk4xSEHtnKVKR4T@+HW=IAuyCZ8Ip>lf_5CQFJ75<*{zgC<u&gt&No1799k^4?A_#&
z6$9?o7{vGyCdVo`xIe@snfCT3yf(U4R<6nGB>RXAM^fa<`llA8;vDXjeby8O>KKdP
zW@^JzsUlZ#rB4`>R&|&IQzvIApjKS;)DSB%qz+Hx(87)bUb(<i5&}eJuLWAI4Cl*0
zlKxdhmXbWI<c1Ca8%`Q(_?G^Ff4d21_k-Oue!bdHX6e&(YV+7>hL5|Iy83eSo2zbG
ztFTTN{aI8z8HtdHDm)Y9$$PD0-=1eb<oS2pt6kYU<@SW{2n=%r-9^!XRPV?Zrbo@a
zdhqB9lGGa+NC#xl%ZM1OV#rVj3BpYSFjY~h(+7E^_3>sSHJjeL-3~B-nJ+`?<_@f!
z9Vo+d#b#3*!tUh7rs*-8gS})Z#p;dgC``gWne;s8jX7$GY*Gy|r~;dvksN-hfj^!c
zb=NpbjpYv!M&VMvAMh@;8?H>;qq50`We*w`SGQ#wR}Ri{&@;^iyeB=T)>?K~oC^<Z
zg?L71s+Ho_THGg3HkCiWYnsI!VS2DX{(2pgmtra4Ji5^7mdXt<Vq)@W2N@Jk7r><&
zwERWmGNeT7Dclmnh6=KM-{!Nu)>Q0A<x;0?g`lSh*MZwLhEjemPpiB)Z}gF}%v#}~
z2QFKO<fh<vKV0QDMa>qN1Wiy&x1emI<MQ5BFjG6?bKR9@HBB(?*J-D{G5f&Sb@6N?
zG3{??O~$#l`0lBkM=OkJr@Gu5Ew*6`X&-9~tHpPUJO)Gmy$?E%@5B54Pi{Y7#E#^x
z5~+^m=`%E7Hoc8iQMyi5`RY-BV{YSBQwK?*J7p^hi%V8<^EOs7@=4oHRjH&%%=>~a
z8tCZ8jDy6VSoVwvlQ^K@bCh1gKC;hb{&VLjXYBYffbDQR&E9pg^U9%c8)@Q=*Yw2!
z?%yzdcwj@hg7{Uq8i3BdEv|aLp!hJ5FX>dkyP*7~dS#fs&O7jGN1F|R?#?JwIoDf6
znjrCBR9q@3r#<97B9u&rNNqf>G7^l17JDwg)Xwh59{O-)k|r65^>N&OL@#`yhYpIu
z)<WE5S_#}~Lf7mT!n3;)NZ~fu7`G!YqFQyM@GdrQk51xUN^l0MOcs9!_qf&RKy+K^
z$^dWb+6;VnJNhA>9h3l=-+S-uqvaB4K~V}GY&C%z-dcJoIm$I2q|~kH!{}AAgUKnH
zpfyN_s&V{Vz>ka3xF;BZwKGoR-@m)IU!HCV2M8@a@i<_@$XobJ;~t8h45Q6=5@<X5
zO^kDt3_0IvaJR_DhWpjq4m6C#ku!-FNF;{GOB5U>lzI1&kmS@Kbbk;=&$B)eD|U$&
z0yc~C`vuhw1MS&TH>1Ha)jjRwD6k&;iF$Epa&k*M$A{vy0ZY@JC;melZ;$>qy33G$
z@&=cC(cP2$VACF2$ocEQ?HCzM2T1lR+3%_Sy`)JX_&>yt*Lp5zVze3nb!9rNr1mpL
zZ7(T%*CiRlrS#6&sDIV&AMV}>y%j<2@7q)#gLSSyv)@}s-U{LHdKRu##WT3<jV6~C
zDF%bw#s5-X#yT`Faw^|Yjt+g-)VMR&Lqg)#I~ptBh+dmejwQ~dhfgSv0NfYlS*c-v
zpu!yYDp*sYHsw2sO@c`P?4<?(vft~=H|UKUqduwDU_=6_#{`O?Ln(j}FdNeB@%MYi
z2*3||U2Uy)IYjZvJ9|T^b&T~~V+MyKd!w9PQ`@LSB^G8HD$EfW`X|I)i>`M5xzmY~
zsZBj60LW~ctNa+sgG`=bBT%vGJf_^67b8vkSa+LM1&+_FMu6AAg4|=3x+u?_rHJ<F
zVBxs!P~rHraXdvZLqwqlrBsX=?YgkC_?E9+?vr{ZRDRO04=YMazy_-==){N+V>O<s
z)s{NuVf28$=sD7d1OdEXD?#f_duT}VEg+C%v8WxZeg5!VD+d28iyjET2HaIaLAX^-
za{%E=Z$!v+Dy&GkfpA%{NFgzA|JmV<3cvzcsyagBpXC6>EzdQpz|3*aFwUF!A~Vxt
z`N2vhOHW2rzKGg)Cgd;A!BI)1`$#`l-+gOgdVd_$1Vp<Mj@Th&=Fd4Lu?F=n|0Quh
zdYm{woT$?aA5|v(XIhm`vFCl8?0`rYQZtsx^^K^fVlSLPdQ3v$*II>fsP!=3-5-G+
z!f)!f>i}DCK;M{7@qmdIsUlPM@Q*tH-IB!Jz4&>B=EAR|BES9gq}`#q7yyx~^Rj(U
zdeg6$0=Vex*oOza?P%Hqb}^P3z1`cwVIQ<kD3FjoEfKclPJJteBd*fnJ+B;=FNlA<
z>$!Fd1bc7^6qnf{Zh@^k?CI9b+RKU3^vV!t+A-{zFPdf5K2qP`n~Z<4CtM896?>0!
zhk2>7EjBwE4>hi<yEbqzU;a&hGH<sc^r9h%4e%8AvC@d0Gr3jx%C&1IxU$sk#6yO3
zPfO{Eds201+2MxA6#acR`UqJ?2kiB}trsFyG1w!npXES%=j`HkG`YV;O#oW7vFRgn
z(zzDLuA<v!LrQN(E4B?Q)jPCWZI&@&ZIu<$Ca@&S6-~z6Yxy^r3(KY&NzF_5HMVPZ
zc#?Bpxqn+xcr$qRr5>ZgyU9<u+j-2q`nAqsOS@ZHZ)C#nanltM$+48rHm*#-fIVxD
zu59Yxc~oO5(kbyI`?EHn>~vaX7aY2#O1{#kDDLuwvAyOT3p9lhhC0xhap3gSSpXiS
zZB$DVfRQ@O23VL{{#%%myS{x&MI(ji@V!UvcYBLH1bShe0gRx0cJ+hz`Ggq&=rS#8
zoSLd5gy@Kl2U@^8H`3fFbjN6$ANP5~#f(+3hxsZL+Bc6Z&Er25hC*QfZ*g+_h4k9^
zp`yj?w`i-S^^|K>#Fhf_N*{}K(w+|A%x#vZa7w9&kH=BBi(kII{)mTRKfLoLl8hfJ
zvd{M00;$>WkIRiNzWX27dM-A6cvoWXw+aC7V*G^zJM{&YoXn=>2(8mYjbA=z+H)k=
zPetk{%?1F`Be?pR%ZJ9mpV0GAk&Wt6`KQQ$^H*G2Fk#Qs6C}g;l}hXA`ObLlh`q&=
z*9T<of6&ayjN|Mor>myLoeLwj<leZ-RU|&`c+D{|HvWo>TCn|F@0$$F>`t*HTv*FX
z{?Ud%?>bVaplDN2jHg3NNJu(`<FYn0m@h{eR0!4;Qmq{nD)B4VdHJPwkHg*)536~0
zKS7cv=2G6n{f3d57gLuQ0idYcb;*z8dILoXv%~@fYi)nB{yCSOfY=9NWn;|XiR}tL
ztN#><>o!FZi7TTV%SdTYmLlSKL~umai#b!5@!pQwtZ-o=56l03Xy{z!mwA@@xY+8H
z{_^H|ExiMV$k}4^5lnn+K%X_7cwDC@4P)d9w^10izU;4L36n`&Li&07J?jeN`Z?K;
z;|{Y*n{Nd)E&B6ms?5#HYBn2maela<@D4fY4F!80p4w6(Ej3xyQ)%JG_@Br57W6|%
zUN5w+n1ZZ+Km<{dkl=YWmxs9*RK(Xz_4bY5xKowsczl_i+9wVX?0wO_daYx|a&(6e
zEzdhdQkLlVvM1ku^MoJ-8QLDYGkLAeo`{oLhR-j^YZ@mQT$9h}t$S^dDG0gYw<Uhw
z_<d_v-?i_WnWOrB@>PW9=R@v33PpQk8hd62hOdXVVcnV`8>=Vv@y4sto|*-v5+266
zYe%pK1SdJ?*$5?H4K+HyNHhi27e)5$cJ`@cykx*x3YzRq`lGKBwD6B9xL>(h%5nH%
zh>!Ft{(k`)O9Dq3hcC~k;?``bi9bQxU5Mj5Hvpc6xo)j8ze3~!H~>@%e(IAS-8VwU
zm-n4msXU5i{SQh6wSuKSNOM2;T|-A0$iqY2;kgkE9}C6Ixys%uj|?D@_=1;5+xX>T
zT$Tctoba4ybk@(<u{DHqoMRJ__1QFYc>KqdWL7=^JQ{8ag#>pvbu`SqdNpcP*(FRS
z_r)a<-ep5wQJy|+4QJ6+Qjjur`s1o<<DB~3O5}AQlE~QSPp<E^x<0)+33bnEZSIuj
zVP$2_y2PgVDEKZ~dg&Fmo_D-p`klT@?rU0GN*A5Llfj_`%RQ6f_jPfx`5;A=ucc>H
z!i5F_&I2?zr$y&dR>bz6;FUhXppd5+HL=(}Os)MsfFWKfLj-eke~nP+(IgSJi{$e@
zmXfVWLj<5njPupKL1}d&t2=$}GyKE#gZUK9;{Ei<Tj%%77qN5@BqX2w3}x(=Pe$^-
z4h@r3Yj`pYTmyJG-F`Uhzu)2)7zDlNdH*Umsx{@go0Q}o6{!PbV{&3;c^Vwq$8{j@
zs>!AB$0b_OHi#neI1n{q1Mu%KTpNMg)D>bti*=80nHCR3Xk_@N&6=D`;TI5JW!7k`
z;Yj-9@Eg?wzU4e4FuS%e06E3>MDvv+D6Y0KUpn<~9wR>ZTw33;pm$JHfgnUea-~pl
zaYg3&UVh>~!5~uVo^RK-{7m|9vAU95d-S21Az)2F+>jx?m71ZLUbG^`TN;%5SdpfW
z^a1M5^jv`-SsY*a7d@PD(ez<lPHBj3)g{`oUbgeOdtf<wf|<hlSTIuCN&hz~SBD!c
zhiZ0CmT(jOk@%-b70WWob3-qMS0NXsJyxX!hwQ1Z{P<qfh@W|Sm>1@-78y$L$^;UH
z(7xpl@g@t(dXTq&`>G)2UjJR-Rp&26#}%0<a_`T1Hnv&@%mzs-o{lHaT;ZLsX-7Sk
zF1?M@al*Vp^l|di91ox-ObQm-^hm;TVzOU`mtKSgYhIwB0SsCevfP8eaYE1VNkH59
z@~SUAr^IH92+LI#B74f7I96}UxV#B7zgnrA^k`o&`;{oqZ<ul}syuBl^CU0pi#9)t
z)Rc=7i~lQa%a~S;eoo3L3{0dC*&aWCOqb+W+I$M4w~H59BlMMuXCDXAy_v<=xsuVC
zwR!Lnn4YOWcn3_}rxT@fb}wcXf((Nzi|<S;mirHM(&xG)@Sog&kXDubL2EK)xH>P`
z?t04x__v98ufJ$V@T;t5J!IfrZru;O_?jpbq+Yvbi6DBb_l%4^2HHePTF0y{1^nMl
z9AB8T@#mCww9X03F3||B<5Fi~VE!VOiO-S;_!CSiAx?iQsDlZm%#p`SNQoRbDAV==
zVeDA92Q9M(_%WPCp|PCUY=7Dk_4+YV-CSJ-MU98}0XE++4m~9;;j^(yH*&xj*}KwB
zJZ|d7h{z6P$_N#>dzQcfRd>hzRp)d@qGnAVL|XgP)<!^KxpqR?<(CX41F;pCqVE9F
z>9`mMLwyN*d^iDFvdREXlFCPlszTx6;`#S<kG4o)$?5wih!LY!^La(&gFHVJEBh0X
zO%F(&K}<$QMj0f!Y8OA>7pCX8;0lL4NZe&j&`hPocD2N;;nZpb)PUc|_we#ihWD|?
z7Zdx8nwW99U1MDwdRNS`y#t+yzu=$byX{Qa+A$clNB0rm5zldammpvL&WhT_BP&5-
zSIfL9={w!1R4=pG0a9m(!dPlE5z8IawjBex6ozG!5PYM#HN0sV-rQd6S$RP-R%tR2
z)x%$+&OU~LUF8^;)XP=NMq<ZxRFKsTuI|(Z+arm#QipiU0UOi#^gLdDiL}_%2AXu9
zqysNwr~caMz8qdTdqz8a-Xl*Dq_vOyjm@I&&;33L7dH}l6;t$_nz~Ups}+D8p?JmM
zq7XZj<viak9DNv%^-j1TS-Uwrn%~kh8?aYHvp&Uqi2fru^h9`5x#uJsT10ZB0)}64
z?&$$8+}apxmsDTTz5rMd(Xxg)Xi_p72;Q``vJX3+mM=$*@z<qL*G7AvODMfz*MK`L
zJ|N1}X6x@&CxlmC@G(WC<tUaaMYdyPi|I$<0(EvIlLH61i^G~3gmR3=Yf##N+D@<i
zrBKdzrt7q&Z6SCvTnm?qB@|G>6=H#=6>kAd&GW@6aRJ6EX~O8D94`ilB*}u15h7;z
zqGSG_sN~(4D})BRl8?$1_tZVue2QI;;Jk^;ENLm$viD^P@(C~(cJTZCw^)q69yYzM
zx-KOruZ8mkySyHxQjKBFqAd`;kc1E4WNHM8BPZ2uJ49L<M-GA2bhmWfMab9mpwA%Z
zmMfE)aFBCJ`oP8oInwOfEnpiwuxPwss5$-9@=|zOYSy-29c?t%<^;QS3Su6)j6sY|
z8gQCy<2Ug;Q|kErFjtDl(t^D`YWg+P2yX@!f~SRxz>Q%wD6SIUhe5-PX!7aa{NqV#
zSUH0v%!}DI^}&#Nu+)~g@bSFAB347tBez+nhO{c<Pkj3%YU2EIx@5qZ^QvUBfGx?2
zG1#z;w)ebeB8OdTZrz0AHo|z?Z@^Prj{9{USm##I`QUbTYJXEQ?=8}P6uv70lVQ))
zQ2`_Mpau!4(@&uG^DDWtT+8RRj_E9P*dE-E=LnYQ1=)Cwr2&1f_Mlho_)qdKs+{d1
zi+&!mRJQ#^4{q-_;W$CftTWU`rE>k+GDPsdhEIGL`Z~5qBVC#_e<XReIc@vwjUvy0
z>*`OnB~pnaocJ13b^LlpFEZvvTfQneaV5c&atkz9!q-_MWzNB^L0kRWnF$So3=TTc
z-v*+tz_=oZsx!e_I;7T4I^11W!(>Raifj;W-zCBq7o9pvOVOP1WH4GDq63D3_T|+|
z=4Y79Gao;Pfb+~970hBZYUCp|YDPzj38F)Djr7fuuR?M-idK>BKNM!2wdE^%p?@L!
zELnsk@&jMgF2P}9qf@eNUyOs)@LmPpusd7h=Q0zc)j2EjC38b@XNfK1L#MnAWGVg@
zvejqL)#jyYkc7`L-=@bcS&C_Z5vri1BlnF9KP2dQD}9}o<?`oyY)_Jkt)>qhYfTOr
z;tRj_e!Fa3JVD}yfO$y^*g;o8O6wl_`(!NoaYd1d$I~d4aSsm%OCV1Jr}U!}xv}db
z>y}>_q?HoC@s-*H4X0OvYYx)&h3gmalZz}Fq@DPD45XZ9q{~>>a((>e>$NVesdj4?
zkWoW<{VDwh=T+ZNcgQc8O%8CEx(H**{1TYodpf5OC&UE@$L2_Q$foA>!P8<P8Q|-u
zG3VzK6An<=#L;!ek=i;js*okbyo#+^@I=XgEN;)bY}>OTJ+q$1q4I8!rOu{glQB+h
z_?>|3C}?l&3V9;Wd++bogNch<po-ta{OBMyS9l2j_|j4Dz><n%lo6xL3}imt-PXpr
zv?IBqxoGn)+<3yoZh9yGWS8RyqUb2|`jQbd+Gc57?>C~j^9)|6m)IZyb?%8}Ya*2V
zV*+1st;MJqP4FLC%-;S`*KB;{RKVAK)Cy~4^}Y83W%8)!RVzvr@ebrj;$$kT-uZf%
zK-^+Odh6ild`DtjS7mR8_$#zJ?aZdHN3fGSHVb0NH`TD$y4&f0_X|Sk6*sascK63l
zO9bM>@-EI??!d{x)^9PdWy?VumgMLw5v}fpMR~F2+1g4*n*l5bRF-`2LDl*UklR?=
zle_za8DplRAj#HZg39`0-qPL5{y2}AF!auGR|0}6;($D~oc9wS%&RH}Z)Nv{EX^B>
zlfX3`Dqbm}ooLi48O+ACULLSFlyH);kY13vU~7oYxrLXi=sMh^HACYs58S4y!ZMr!
z@H$JR=kYSS6P#h`-kG$ss^e8xUkE?G?nxy<e9f~D*LaZ%)tEeGwL0Q=(aF_b9bnIG
z6)&;ibHftifu5&#7Kilm-B@dnd3=hwnkuRyCoem=-^zA^<J~P};Fo30S~s&^q)Mu&
zRKh5`K@8;M&R>mqo6gc^EIaPtn<*(_jZHJt%9D3A2rY1TrqHB|n{}$zf}r;&#O~O4
zgS?NGy$4A=&<DJ&>Eyd6#^#$a%pi+8lc+P00;q;>O3$RQmpUvpCA?`M9ZvMC4>`5T
z6wx)%<)S4t1A>$duft#gvE=<J<wa!!mnH&rr3WD);;Um?se%`e8Bc%&OEwL1T)B`&
z31J^Dq%=X7#+?ng5d$56(ewli7Ck^NbFs(f_j6M}(H@rG%7(_3cZ3fnW`MP=Zrnp1
zXlNB26*)@x7M=;l@yvS5PyHnrxqRqybE0}cSlF4>eoQrvCl27A%G6P5IM$2CCe)o=
z)VzV;O~E4(9kquTYUSxxr+6;aSA;VcR;9xv403#Cz2=wEZ6YJQ)^D>M5W58=a0;9m
z<*z5GCaWiXkle8#D}cXnaxOiZSvTp>VE(ZH3k;pFruNXdux&_G=~2^GZAo*{*idV%
z_1$~yD_AwvC=uvivL9@_p7u8cDih6tJ|SEP<rWa9MiV{Wu{3MQJ#a`<p;9KoZ1)OV
zX8!1_=rCNy`?QcnFEE3?v{Xo1fMx#t{wroQS}L{8!}e^K^^U+@hw?d{Ob_l?Q34p>
zbs#uWM_;$$A-#LNx2)wZWp1G?eTazUNP7!IcT=Ap7n+p9JMVbMfr(iLI<2+nfgUVU
z$EhV=ajng_EqLv?InOA5^@e>VCqF$MpsA`;ntOMOllleG9aTXM&eQXvx!;xAQ3DV2
zkFGFT@WpT1c(=;HG%9KsjZ0MD(fh+%-LVq}@5b-<?sC=4A-mTFO=YHy4_oBqS~f|Z
zo5$*6eTfav9|8{yz{Ii-r};a22=@Dd4mLe=cz7>enK8yGD_7Gc{DSaIyV=mL7Pp~;
zsd-zVa^9K9Y{#9(=+gPnMDOTAF*$a+=;AO%qN)?#6S<+(D5TxDgTZw<X8*ZLiS)*y
zTTfuB=0{Y^8wVN6Rk%yk(4Zl8U~)1(;K5{EI{c{R&z%S9p^)Zg{$XR58MlXqlc!gr
z3XCVs`#OIo5tQP6eLUC_##l5MZl|R<=Br+qQ0pUZE@*yETDt#%9ak|~h$j;(y8F4w
z1!>sTT{p$a+DHn$OOmUzKJY?UZkjvW$`OO8*v^mc7)~-u(jVO7<p@Mj<dVVHf=%4k
z(ivCIIQL*BIifj)0VZZcxqzUp%GLso=SY82*tgn|&=B#p+AA0eFYL$tm`j>Pu>-63
zCI%f$IxUp&>HAc*xi6c1-noZodIh)5#w_ZsPrzT8yvhoWOoHCJGlj!-=XN$T>aJ`e
zw-Qrb;;KEvLPDgy_8^Uj+ua-LA-J2h<=Qp+>}QAzVHG|2VU#}5o124<ywWM1CT?js
zlJsR<OC-=KuHe;uttNh{Uq$l-Ef)DntGS1<O}w=)>vZ#nE2;|y3w!5McW_5=sj0f9
z8V7X#qJOzwp0$ZJiv_{n5cK$$(M$vobMd)Gfm(a1EO(s^zONDEwl?+iGq5_r#p(#d
zeQoZw?<)9s>AY4FT@ULkPM5{P(r-+1+mb4h`c6S|&j`PY8aiC2tl(D>Bcz>!%Q%oK
zs;b09MRmCic*iL&%GQK%Xns&+V>RTkw(6$PvlirCa!t9V?l!w<5Lx258Wz7GCGc3g
z07{WxWoG<ZyjrqKPlbAjx5s`j>)l-{%QR<l<Iww`uBmP+4HW@L4S%j|@Ihm)-VGjN
zMu~EBX#$#q*)$&2#ZEqQ2R4Og>{D+00-6b_jko=c;bp~5SIFUotOm|$y~v;o<#daf
zFpI)dG4xHVyrYkM$sT_<BsiSZphi<JX>J-SxOJ2`#37VtoL3Y)0_j+1$U)s-Xf-J+
zZ=MV~pP)3By~RwvUlpMnzTP6aTSX%$SKFUesCmkM(*80VUT!6&)o2pA#hwbaJ|Cw%
z@>r3hgWf5*o^Ewxk1nMGZkx{aoK<-1JRMeA_gU#75^M1m45Z64ciR%c!w2_#<4?7S
z_(P%gp<AR}?idS#wq7?!)0#<Z#E`>pn9*|vOvT*%iWtV-%$x`6MNe67Kb<ojdO&kN
z+S8__2iv8Czl2kG+b?blST4A$G`iIEy}4J@O@$aF?zHv|raL_3oJelzl~xtn8_nol
zrm1x!Pdh?b-roe?A}%g)Y#=1w>-eaVR+i0$xAwrlJq=bPG9D3fU5*Rs-ALynn3<QQ
z9rylA>4c{}?(O>3AvJ8Dv-a%7qL53%dxBC8m@2srZ&Uh+I|@defmue12=Dz|j~V)s
z$?260c{3kd#SeHC2d$nHpBo)c@t%3z&!b&S>{|OSs5bWH3P)=B{sg($5uc%b38&L7
zLo#fMHv?CK-@V8#c>$PL?q^F`G5pk`YV|z7E_JC@3-Pv|mMnG8b`zEru1da*oH2B+
z@5Abw_jfUIab43~=yMe9|4kAryHL=A%)R(uSb&Fn%C)f`Ck*0}Ki$Hd1thu(XQ7sg
zR(fY9BZA+rX1y>{i7jv8h8VRqoXRqD>>iFK>`INMb`u^EVsRKiLB!9>+FSf{!IXo;
zO}0C{-N#9VlVhtRBn%iO?$yO-$Q@W5Ew_r8m~N{OF+5cWpOcF-RpsfH;va&hhh2r=
zszA@9l?YfUA&DHeGEP@hww5jQ8z?*~UaQ>AqT6Kz)+z+02%~tK|MWpNTtx{@#-IB1
zIpnLo2ob;?oOb4QhuN*3H+>p0a@^Gl*Zjk2Y;x88jc`rnwWWUD$@*zRE&d*~k?6q)
zkI>=Mp!rBOsh)J&P;&-%(=2E`xuq2cGx|(`uegU<wfhJJS#Y(#zUMQxwuNqt(dypL
zS!d52J)IeG<iI^av012~oPgKepMit*`W+uAb#F9ox2jsawLC3INDxtUY_0VM(U+#Q
z(H<XeYLp+;T4V6hX^vVZ%yAOQTMz?F-LV5&WhoUUGiCPP@J1HlmgdiX2n&RiaV8j4
za<3KIdBj>q?VY&&5L|Y^@$Ej2qqgD|<Dy-Q-Ns4!0p9*Ai@A5><Og`?MoQa-HA;Uf
z#?;M>FWc~LYSb##w8|)|fhbvvHs@mJI%-`WAqY8G#@yB|lf}dSiKw;dR2dkq=Wuu_
z7V*$<JuJtU_jlwJ^=METQdiIdqK#g13GGw{dBoa9Y7W*|uQ<0WHPAsjm0it5;`fE<
zP1}bbQk$vvqc6{Z;?C%`IDa!zJ4m`;MP0A~F-G57P+n_4TtE(BtO%2tbgzv|6NZb!
zKoiKM?&deq^>#E?)a!e_eUP_clm8a>2n^=E^w7T#!zeMh{i<AUU}7A)esI)CW)n<m
z4N`LsK5EVjsk)fvdr(!i7E{!`x+JUxDT#`f*55jx;bR@dNEP<fdNiHI>=GV81-kT@
zuHl|k4&}sG^0x@=Q02?W$xy_@boKp0_rs#&76~7p+}Zg4>E(!EYNGMTrJjQ>=a4g<
zY*lUmzNLAq6>apvSLr+R!qyhEBMD3zJNlI}))AxxcGC)OH?i>irsdsvrT(!~n!Riz
z6D7_R>&7!BNigoip+Ius;e+YzQdOun_%B`6J(o^0{#y#J#fAlon~mDai!ze0<`f0>
zc~}o$lW{>u)<r|bw_*J?5;c=eco_|KScxhfbc{u%L%OOuT2lkGXO)Zb%1%3u^M?f5
zV&Lbf<Ps+rQNXqxi9%GMGr9%2?{5Qtqw^2bQ&XY6m9X$UGhZoMCoI94OaWXOZ9BEQ
z*&!T$;hIF<m(re7S4RbF4Ng+36D}QZ4CbcEPTE5UEkie<-p8?OC}+HH9WqB?A@P<1
zkiHQso#dYRs8+PQD?7|&cYQ|>%#O`lYy9_3v%5n=0b<~NudnOC7;LQbGn7=oY_PO`
z_uDiyD#Y~YL47%pI`SbSY}0*DwZwA-2G)tWZB+)<mW_(8)w-@QcXytF39IOEtqpfB
zRv`r;A<lDRPe%l+of|Zilo~GNfZVN>R;WBQ_FDG{x%I?va16``3*v;7RgTZ@{m4eM
zS&-S0Q_s|DO)9?aM<XAH1IwV2#%B(zz=i`mr2I6tVTQpK1M1;WUj9_UqLKIQrw2?}
zJi83qRrt=J7er`5&2;sYZ&mIRm&iESg@c%zlH3anVaH{5TUzYF$R+($`&2>dj>^`k
zZ-Sc=;;b`)$Sgkfg-|2B_BCTim^{1!4X;uLE)nYM2`A@?YPV@2rb0X_-ApW)!#YtZ
z=6vrn`}FWB;n$G9bM^ebJ=Fv+!Azi4;BhC3Z4UQykT2M3i^LC!TCdPEL_ibgU3j87
zM+<!wMKZc|mHTHr^Wl9y`Q8^;`G*klTd@oC8<LwH^~)DB!067RrH=@|E=z4<Nn>pE
zSDbiw|H*`dvgARh=<xUmrdi)%W7>F&g1N&NL%Zl(WZkoV=BDSiITJ5e7#^0qvMma_
zWU|Fh#OTVTt=E<0Urd)MwCP5Rp}lR4H_Frtygc<>?uX-CjA2niF7;+4t7g<>N;ph~
zt~HkZN$DF3Z9OKICHCN27~O0md`!2Vuuf1C#mJ<U6Cb(;#NxBZVMAM27coPI3OJ#?
zXs=VmO>AI_s!U7c@><2TH4Vd+mW|HwQ6)NjsGBNu-=;Q*Z~BqHV^e=pMskp=CQj>r
zdCEVd>_+P-Q`3(VZ&zK<RnTmqqq?NBXf)Lk2)q?SdYAf$y-n-a`QeAZCUFtl-8nH%
z!8jk^4lM7yBIR@5PjWl@9a8<81h`b!XbG0|w6)x148Qp0EE7cM=7_6#r;FJVJaEO-
zL`zbhVr}bo^uww7Mqq(zNj-lO9=0u@{o8IIZGj#g43~vgPm7FdAfmusE}Cyxz0_bC
zP@|UM+}j~I5#N@q2G+yKd-iQBMwg$z9#R1Kw<`QW#vQ|IiskZ-7&mw>GWIuAAEQbO
zEbF~^_p0V#EqL`SoFrlBVaH_k!8W%mRqayXq}?3>Eu{t7QhAS>>$Cx?)P}X#JbHKd
z16_+LDN$<6LgmZbQ-&@QelJ)g%%Em}$;b=lUD}JL$HoSuTV<^iM=S+X+brtes4hgV
zT)78v;nFd4n$&c7P_?>SjLp3Et!NOt8C1(}C_d^9b=p7PZ7|;#6Tua_mH9U^M)Y8)
z-!rt-9HoxnUURvrTmz2c3e7G-mJ)10o=7S+E!^CWR#LE-2z9=f4B?Rad?L4>nvJ*^
zJKe|vC&-mJRnOYxJ!-TtyMnIN#7lv5Llh4Tx}nlmcjdz9oYj<m(zN7#Hkhmy%rLO@
z&tj7DE2g4pwq`q>#W-ch57y$4R1@#Bjy@0PnhnN{vijnqjIth(gPzI7^PtT838wxV
z-UlPKT%kE<+ku5d*}^jz6wfpqB>Va3ckj_if?DmpE?wQJOS8=;sRy+Sq^^YJR&uTB
z##xv2p+^PpyT)JGNyRx{snC_L3&Z_t#DO}~Qysq<nC;$?(VL@YQ{p90goU*%%wyuO
z6*SiiGPf|}rQ|uN&=O2eK0eELwmT7vYHc}CGU<Fh4S5>8S_Yk%Q*SrsCFLdnoku|i
z5*hX98C&g6uk+a~Sky8fCPs4Pz@*I^{kdKU1l=v-2fz1Ca)kvk{FjU%P@lw^{IfH)
z%5GX(u)lq-jk9z*0|#++zgMrVldlgP=u*nXR$E(IbEpPk@TK$pkElX+bBY_?&c>~L
z&KJDaG$v{%MRCJS#8E=$4UiJ4nI@}$N@w4o=HM%KC~uXk{;8Az3g4X+xD)S)X~#0Y
zyKNSZR`)Tn=Kf$Q)<Le=B3MmjZHNtRM3$t!fVqGqifK`6eB=<umVp@SKox>G?R;me
zJ<C3+@KN%1e#p<P6|c&-l78$7#F^Z)GmXkB78ZJ@<OtH-3zE%-^DNq-jak>T2y5r+
zZAub`Oai$Pe$QiUx~PO?JHnB74~HE)Che#;&5i|yC5e|ym{CFwuEia`7))Cg8)YP2
z=9Iwvw@Z|&(U9Ed%3p=+@U@<?fYw{X>1gHZaq^22O4bOUV?30gCHdi;wky<Ltc>_L
zco^dmFsE}$`olR<5%`Fz0e)n>eZ1oo`0zU=sk8I5C;d^Y!2)LHQ)&P+FN{FMl8E!&
z!OUt}Za~`SG2lZMh4hDNaTb`l$N=_nFiHvfaZq;o(1I3DHKqCZ+*jb|FtH@Sjo{;<
zj7A*tpDQH#F<&4m-s91R^?#hGsKc9H+w}b1pQ0k{Xrop<nF&i;RAC0RXHRez2_#T{
z5s1?w4T~uv+Xh|)0IF1!!Tf*y$*kXhXF}b*XbGh)jRhSONtxDcpN$2j4VMB3N$rzh
zG4QxE%}!+)W=K@_)yl>IQ|sO70F&A^F<n<~d{edMZ+pJ_y3;U+qtajY7uuQ)QUkbL
zYPxoZOE}7<B=JRC(0;msmRsNcscicTB3+)3Z_~w%NLO*xw0~dmsfJ0>xtPs;*>JXX
z-Jnom`J*k6sCqbF*>w^htK0?10}`m!WEFAz|L5`lyV}&Vo&t`l9uFT%-najUiMhNz
zr5JDi^H`g6gz&TfTz(Hl2co(DI}*14-%IR_q{n^rT!dxmkQM1W&SQ0cC`RHY1=_^(
zKdY_p;p(5biz&Z~J`u_GXCMK<Nj~vFb(adOBijnbylQJ?eqv|P&p{%X8N$imX7vea
zSOjQCl=fFXXVJ<?)8UvQgz}{)FJ4EY*U}pzMy~6ApR1p*@830tuva^|@H9<-d2E6v
zQi)uG_#&|l4&QRc{#+xp_=UeM@oLDAsdSq_Wn0Bh_|}iT<0Q%On@L*;*d7}d?|g5Q
zxq)_mNVsorSaS`u0&N)zMZD&txS1F2l4OYq49eE1a8+HLf2m18qpPXPqOJz%PrJT@
ztaVZun$>&#s>^ShqN}vEzY`ag3M+GA-(Ri@@3#`(sPV~B3<p~Dl;E>E&H8v{VE@4~
zw7<yjF%`$bY;JYBA7;PYhTLS~Lm(BqDY?8RFypp&20O2Hw$@Ecl}%5{P+wde)4a+{
zKR2~~P)aTos(OfJ$hf(=akp`>FzLx_2*sv`E;biUSvZ8^{vTx@Pi>f-mQeI>PQzx^
zX6@^s;3w#*ifZ5}(HL^9?Kf8mIGa1WFGEbLSO^ESQ2x~>P>6`fLd*-R7yM5ld>>Q)
z6=Ji0M|kn=DQanOM^Dg`%5T^)DLUo92jkCUC%(=3>-evXK{reiL&VLYWHLHrv})jf
z9dM3f)T2mEK;*`M)eGIf)c+BQq$=w%##--=&B{waVyU3_Cp7RnC*;|@rl=^tPM}Gm
zU}j}ay^2DEyYitmMLh9i>0JccC3*h4&3^n#WdXihm!_e2YMOAE9Tv)j^k`r^-w@b?
zAGXqU#<pE4XjT`dcZ<!>{z;Ohh)@3~iJ`rplaWE|&m#I^N%I$RTEGRYKJZ;zi-$O*
zMjA}QLN)Z}wNsh8hQ$<BCt33w!RYn#zUI?P6E%vgQ1M?qzX!1Y3Dl&BxB4fLt-YV*
zzXjTh(=N#W6S%0&Q^Y(|d$TzlCF6jdKa!U>V!69*sSBx0sB@ax?8=^?Ijg%+-!7FC
zVs<~@9&6|t(z4V@EP`A&1Ha|V;w2>BR}8;-y)?0bBY=B<<8J`IUq%(W`YQzzJn}OZ
zqyO-2V^^WUB3iljH!#jD4!xlBsQ<6gte>pFQe-2nq1w{UVT1fXFRQ$cJ3IGViLfho
zu?}N_xe9qxhzIj+6yOm_+Ge4y?1$%f^?}>CDK#~nJkLy~aw{$WK{>gBS}%Vck};<f
zae8+Bh|#)YW$<&cO^?errS-^aUdpl?T@E%II3kL6`|%<D1&bsB@x-m7j}0Ze;Y?P*
zeJ8m--mjxsTVH4Y?ZY(0QqB4Fyff|E>d$oZ43zuK-zJ@#g@q*@3sdjNbRFuwR`hVS
zxjC#__DK!4I9K6zGFYLMFPkao#p`rw*}q)~Z^lG>^V-7XYv&B#d0R^z{Ahma@vid%
zZ0zt<ml}6U56ui2nbu@C-~NKM{`9b%)!A%&S{Ib|{wTdHsewFu+PXIqT`P4gw7{rs
zUCJLB`D5i|L>F{_F{Ae|*Mm2GwY(^#V{?_?kc;<!6?dIcO?6!wM2b{VKm|k$5nh9c
zQi7BqQWKD33;{%>gFxuLDJUg$2u7tz3nfS|A|MDz(V!HO9*R^cqS7n~&I!C<S!>qJ
znwdXy|K#42dr#lbe)ity-UBXRjC}KZhZNCxSIP6wgR_Y3sNb2dg!W*G7iD{DZ`Q|_
zS4Qb{>0PfoNj3FvPsD6xd$ixY;WO$@ls@2|YrG6TA(apw8@jBVnU0Xn*q#-TyfePK
zc!4yrycy6q@hgD4FV}bc?sV~DdB7L>7_EZ#+Qo`(k&Y$nP9{@aA^a3gT3s~IBat*E
za!jNcH~ml1iXc^T?Sr5<v5Iw_iC{9SMMw&@_+T?qlGl;zD<dfMdDB+e;l&ewrpsiG
zw7WIhzuqj8@MXT410=y4Z5N{q@U&cOPm@=)X!D7U8w&>rM$>4nbIY3Ok%WCPh^K*p
z@mgx4LGe_^y^h?j<n7y1Qi*{(!xh#YM*0bzSLMo(^KVB79eu3Y?WC{&DZNzYh2Y}|
zSIst%$shYb_wZI-X=hHh#f9VS5vqNUgFpMEY*XnAsc}dcp-5>J;Z#V?V-Xj46-`0|
zAORy+S)_Cx;eHcL9@1Lv==Ty!E`1|EjH;OFI#&a4oYs792_h6<!DD3c+Hbs{SIBt)
zA!IsqW?e=m8mc=P9bUP4Ua`z7d+NQmW-4EWy<x?B*ideE60-D@jTG5|yMa$l+&)v0
zf!M%<(m)ei8tplV4aY2Pjf|5ppc?{{FgLNpmOQa|pcx)vfM(E~UF2W6@#}I-N3MlJ
zED0`%d;P-6bLKQ;+WBh~bm5pft9D;*i>2<{?x)7Ljdh}b9B4$0mrR5w&uBqz*a-hc
zse1l{BF)yY5Y6}I;Yr7G5xDlm0^|rAW5Vla&dwYq6DvywY;5my{3`rmM&|zEi5RFM
zuekYiY*hrsEDfV-Ji?2G@-75^19NOH5!BAGV(kp)rM(WyU90y}Fw4_@#WCoj1jO6y
z2oP$yt+0&#Yp2*g3l6SD4_fzq6XBL{xO3}7=6SzPyuCpE*O;eDV*v*vG?~|X?u=2+
z*RSQFt+SKz0`KSqg`OT@K0<t2_ToKlbSjCG#HDmlkMT@UkF(0lC|LLR>AKoAm@xTy
zaS?7#Cr@D(gkDFcBWSavxAJU_<Ba9@XHm~O0hyoY?#c3v$`?xn_B27y=d8Wex?0qq
z+Y*W&-UvKvo4L@WnIMs#o{=#aYg4tDnBx)oq(cKjMi!x;e=p9aUA2o8KZxW-wg0@O
z1oX8fl=qQgp4(#73{d<(iR&!u5f9Tib6<C;C1~h(clX2~)l7XKHH!Q|n0>S^3BXxe
z-WmM#z+9-MqW3koL<$dgX3xS=)Vt-%9Gm`QPjMv_4I4}4vyjkd#ETytZu9hEW1X<M
zc#6@TxB?A+yU$HaIUc?u|E$i?eqHhaDG@@o+Zvv|888h%*Zs~MFxR}=bt6xA&3p3p
zRpTXl8(ez_eLl=MB!!z)by$;UCKlFFQYk!1ul<T;<ph=BLa1n@^?k&qDYoh1aIxsL
z)7R3SH?Xrc9t+fWBo8AI@&h9YRrE+GWjwwdeM=T)%K-CLBxw5&K*ER~K;NXB$tPS8
z>HO8)Rbo+tQywDi0A2j4?~|(0P;|>8<GPkj0rOYJ191?7RK)jDvz<zcbzfoa(=L%g
zk>NNLw_y3N_tC*F-!68N+&K3s778?L=wPe%S%Nm8ONXFD$1oyIHKyMHs_}LCW6s<u
zJH3ywr9RzY&yBh333lf)^_m@$g#|WkySl4+{4Z;`L}M1hMwbL1w`$~gh>4JKnrL|@
zqN1Rstr&rFv5@)^2}=W;OiY2Hi>LU9oj76FZ;8hXos5ENKzjv{8r2`^O&nE~%n+fk
z%i#h7IClf~80E|(+>_4+ZN(C=xfJ=zP+|3cN}M`OJF{L=Wh)O``c9uXF$iH$6w$f=
zRRenA!7+{$xLEI)_4in4R|(O!UPw{?j*Y?@NZgp9;m#6qx#H806))JCxVSM~CX-!?
z)hL%)g2XwzU!#PcB7HQ#yBLxO3xV<zKv5Eg^9ox26v|ezm2wDKMCc90p9u#QM#2Z6
z7i5M9ASE0vp~x#oAyz#y)lOBZV-WdZ^cRm+=kOPm2#Nb2t;ai}wb#$){`|Tb&-o1B
zrrI(R5j-wsMU}$gJh2Z-#{GDxY*$4iYw&8TTg82MW(P8^ipq9AkkD9JH}?9C+=arY
z+1Nh|cnyYLKS!YWK#7e=SgmmJ3Qz^0mTVv?j2H(bC8MglOe;>@n1cdv@bhLAT<LK1
zBB60$M&`+&vog0c{Mm1??AcBWp|K_-L!ne6p76QeC$WmH^e$XSNl0192yqHTnt#YR
ztZ$^>yuh{*9}oOPI4`firjl)JgpUvKKB|A4N(`*u+GIM=sFs`SZySjfyuDO%txkxI
zkvT%-2D<GS%LXS0$0k!y6A6y{qg-~Jpv_C5Y*j^&Jmgxn5B=j5q_$Efjz*GTuS_`w
zFO_%eW<6Z=)GD~%6#t}qK7gB>?7F%#EF<^rLq$}(ZrZNvth#oPqU&<^i^ap6?-nG4
zG6wS(;ND*Iuzu_8oumhs%BknRFs99m>Sd-r8LRf!sj9uDuAZRra(8Mc>AF2zRrap)
z-6v_6z+#J_&>m{P?c}|i;=GD%_iJmas%q+*ZmBOVH<o0aq~(x)Dfy4U_2TE0<up^%
zw8qU%f7{F6IQR8ZtiatvPBo|crkai7)NX$Y4g7v{Xmn*WAk9?qWO<Kx6bT(cf{-by
zXxqbBM;dIKAdA=u+9z5mO|+JB#S~f?h97O<Yl1=ajJYTn7tN`+Ii_bNOx(CSvmf@X
zi$fqyDqosjM4>z`r}jL$s$hMhx_HIPdF}%b4ZLyNmXs3eu0P4BEU3iyGj)Nefj+B&
zPQsjlkUdz$y=e%o4mIRN<?&eBc5<nqiNLNhCb~;6d{}IKvh>!uuz!ImqVoG?U|TIG
zBp|kibtHFwrn61Vm(>0g(hv5u@0@R!28=TgO~x#(m~fkCeGd&xCsgw-rGam!;U+fb
zTTd-_Bfe8Td&cY6rMF$jJja<m0zJuQf~=EO1=ju3X~%Xqz2ob$=bgtZ9lpJLIcnbR
zQrf>DswdVHn2D(Mq?G(_F94%Fy<Gl9^aG5z+&8sb5c@Q#sz5AW2od1r;=cY6>$>Vz
z;hSm12iif?$aoUvbn%DN0D6xkVdSAiG@zDZoG8Qdn!;APDR0+)9vFKj`}+4rHEv99
zc#hlbSb~=N#_iiAi#y%C->>3qiWO(q7~e~+32=!`Y?>y#?U^s!P8necS`5GKW)m>h
zM3qQeN%@!+7@}j9o$)Fa4<LK2e^7Y6N-Mv{M(WFxif@PPvF3aP%4sC51_}Fqx;UL?
z^^rVIfg~33aAXmroK<>oc9As!9;O)~E73p*@*ri)Qi%>qQr4xxp%YJ5v1Ryku?g%>
zN%RhGsyu#5HN76lI60w;MEAqCqE0>s5eia=lUjqEZ(kJ^0T9-tl64K8>fXom$^F*$
z>3|KqD5I7RIE;J&aqo*za|V1+{e?4q=EKp!r58(G>S%dj1RqDuX@(I$BVp}Gm>h(h
z9#W2uBEeWi4qsD3@R=Td(~y?zqy!9fMxA?Om*rKQO&Y)T0yZ$Rh|wmwo9g>Mz0ZHu
zEFnYivQ&n)U71qb!g>_a+S+>lPgQa<zJFfq4Yk$e4!dL;sqNVDQ6slm#jv^0d2^nl
z#m{@NN0G3GL<}Vfv#M!40?gldAnpXp`7q)QsG<AuQ2ez24OTrqgaW}q2`h6HpivVN
zofgOOtT&|Cbbc$=WG1^)Rpgb9J{L3@Y|V8sfy-tnl44&C)%lEyn8`8D)Q`fK)dv1d
z8Xq`{XLp)^q?r=Lxv}NtJM!z5O_5w(<1A3wZ^nLh*9{gz2^1kHF#t;J0t{A|{6U0#
zGoDn*Yzg|u5UOza+WDQ?>b?NuNgM5V%kK$y%P92rkG7Bd3x_@dWO8+p-aO0Ryw<4A
zB!R1%J$@@cHoxqv9lmtg|J3@W@AsZowB%I35HW@Fv3A2(mLGD@*gNAqUvs-)gXb+q
z4UjMmVD}|rWbc)uLrIk!C_@pD1Pro7jFUn^W!fvI$_tq?%cNsTH^<%&mmg-0$O&+v
zduH8zUhZ49%X$>v2g=iRS6<OM3^*ACg>c`F-(Y%`+o;?Z!FCyU6wu!4Au&QM`@vit
z=ZJ!kxJ?sjpL%$Mm1KwAqsi<2dmuhVI;5?{5ocBH87}ob_MMB~zy*RfH-W+gHPk&_
zj1eZ|RL}!FAgNVbmQaNB63*dQGTV*_U}zk_1?=VXvx}p0JYVOy5VulA2W&=JfGSW?
zS3F`SB>b%WwyL0H)v-vn=s_C6eQ4{JAAF2^l9Cn%cUWBAL`g}Z4T4<qt;D*wosJTU
z2uPSfB1VAG((odb$bl@1yGJU5?v;A!T+TfYURiyY34XI`q2=orJ}xdfl?!}PaA2LG
zN+1{BCYy%+);h?4MsCctg)3?MO;D4K)MC~tH;0Ki73+zc?cHY$P7t&u2-@<5BJ5!-
zYZ7hh)zI87<v=oTjL~$8L0yTZ2-#KH_1mXvIHH!ETU7^C!iMn*M_H}%cGQciW!xHO
zm-$-#uNP(oJqWn_uVU8)=W#nlnROSf1WzAd8XyAyOaGhxqvsXa0R}3<C7-0|o$1L(
z+xJA{e;iQbqI!-;Z;4#sX>ODR+w-um)Ak5xve)m-Z<mw&y}T^A_R2QqvNwz<RrH-P
z0JwHMhvaiYuLDI9LlcoA-Y}vnl;{C9ECKTrQv3lz9_(OIFV?yx)+kw3iQamq^|5t5
zKt|^Lc)T%xk!YK$Vx(-$*dachUd0eLS2f$?Rl9uML)ZMm#tcokz07=9ueL`gV&JDi
zW@KtYc_jlXj}J9>2TIhX;S@|fR;4Y#=2zV@^qbj{D#$e3hKsB7)?nGCh9#isPQI5j
zKf1I*Yw-F+?b89%9}z+vt9O@*fsOd*$?uau#h*&wUeE0DpK<o~c0GP8=;9xjY}O9v
zLg|IgpjCx0qnSPg;JEtrTQOwS;WG64i*b$NSW@Mo{Yn7T-p5bC27&FMjyAD82!VC$
z+CK_Rxq2_VGe_iAU3lHv>eo+zpqD?qS;28fZO&weW$51_%Bd^jrS4~AD3KLP3`Q2E
zUNJU235;(-kzFDNb{Gp<{t%Ee3M}WF#l~IRbMG!3xsAJ-DmD-h^t`l_Pp`XM&uNtD
z$uIvMDSej5CqLS8)Bt{-pe2_cNz>hx%qT-~7I9f549F{OHbs<I(xZr9N_>umq!LVE
z)XH!8@OyRAZvp<v4Wp|Hu$%t%t+^c8NtO~R&hmqJ@dTQ!;Gi_9MFXsZ0odwO{!e{2
zSC+S;|AqflFQ|YZD(^7LmW@!Pc^F%ih<PSVc034@Ec1j=h9TVe!mPI_n~Q<V?;FVz
z&QgdHdB+h?BWY28v-SKZLNv#R>P&@l%8cKL2712x10~ogh#D%*?`i`jB9Jg5=ob~^
z5ul@@NJW6WBUr?3kwrlZ!)A1jQ3c*<`s&pp*^l2eu&sAM%s#f1mbSRjVCBv0kVUO)
zM-nUtdV2jZ(FIPE2F+rOY6F{}xSs|u@3{=Ma_U?8D-`zdRU5#Ga52CVvO0R;AV>-$
zN<j^k0luQ_?1!Yt{)p|7uLcsCrh2L~*RDNz*z)z$?Ol$-Z%B08P(x3^r0Bx22OlDG
z5;5KCXhR;9AsdT0GlUF_CKUnqtTZ>4sD_rvX5c2)tgWyzs$DcwC*?KJurGF&pWXF-
znNN>IXV$mEh~L}69c{;(oJ;Z*<<?#98)=yQ1!nvusG)2kW>w2ro(*Nl0VQrHVdB+{
z4FyrQSs=?tzCMe6fU63?Q`xOAl|e;jItsmaW;Yybiwx*xgjm5+-jYd~Reh8-gW{w+
z61E^r<`E`SW6FU&piNJp0P?*cTwLTVA~rz784F*ILQ6?yghB?P*?zULTO2aoXwgq?
zTdX37>z>Sbx4HSw6fW7cxV-9ETHDY)in%$%{hvhX8%NnAbM3x=iJ$jKoG5~y`sV|n
zVPAH^ZjtiaR0rUsOu_&OuL&s!x+RYVbQ?(G#=>w@Br9G!%m76Lk2No3<Gp@!U!jgt
zwnMtGDXsjmw$E98YJ_6q*|i9j({jzqzQP0w97@y%ox_dY5+-A4hygT~W!~EeT^JZf
zGfmHHZk#9V1vrp~?W!%75+)nX-oQlq+eEj19=IrVOmljjkze2p@jXFP#IjCuWFa0{
zs`p9gIFbjV6{sAdBb2zDgxL}<elVJaY8QE1So&*TVvl4$e*8C0-x!`T&(Mqdp@5D3
zp)u!YT8q08v|hF~dHp7AU?^~T;_>!U#e?VYt`+RxuD}hl4UDLrfe@#$Wd`$ID)Twb
z{HmUl;WPox<44T}gaLH}8$iN_M93?^F<)~f83cU{gvSss+Zqe5I$ITuv%dE>Q*WCw
z3BFv}lMzYsQ0Pu&1w9a3?jiH{8A#Jh*B&uIX)r@R^llFS*z+3D{GpRsPWmbQ7y*;{
z^DCYOfM~^3X(G1j?sH=~+f8zXwy7;(f=stvE4K5wbQ0ejft5Cyhpc#JVbW!nDtbcE
z?t_J$%FLAJs9a--&tE-P&eMfBJD%;L-V5e@5KYTU-T>Ckzd5|1a^jLZ&(n&Ndd!gW
zD+9(4>r~yhZze?CQ}kuZt*5-Fi-geFO$e|6mXa_kCs@SW9VN+rVJC+1x0ODK+hs2A
zA!&wdsyQcI0od{c*1vdxZI5Dn0OBXbqO?wFj!>J)zQql)4Zp|mie|qZ=V$$)PDrBn
zrA8en0x^ID(gAG^G#SL*Y=w(?o(_<#4noRX+ElNI6x>#NVB!Qy`SjWidKL_ZtG=&M
zOaWf<fFr+HNC1@A0H#N`iG*dbr!zzkxS$*7nnM|U!0RrjU6&u~#<=bd>;?)7=+xK`
z1ea>vXD~;&V`Dp}lTUpew0~LXxjs$xg82tnxm?$>_iTJmpikRxCK(Ca%M-XHYSJ*Y
z$XDQE-;@eedNZ8nYq?OC_l6qfu@Uzdod7+GvH2%0Xt*#<q6OJjvX-aM;&?o)M;O!q
zgZ7Z@%(=F><Y=<HNoNoYqFM_gWbkPPT_|tD1%{A-fQ{17ibrr)ht2aGdS&0?zCO5A
zU_d$s&@4gMd0SV{s-YkeIs?OhJ{bq)eF~oRr~oKO7+q;ylLH<MdhR|uYdD6HZm%Y^
z@MY5t6c8|a71?0rGmxeUm*nil38qXuY2LeCmR{vFVLvFAUS<ati>uSQ9R?l_v^u|l
z;3bFibjSY@16B5=EhnYRN~Iw>RQ{zEd&9+gv$mnB;V4Nu9M3=N^bWdrTl&S3aJXRX
ze4OEsb@o)bC@44Btn@h}V^%&0z@>vho(ifV{JnOH&Vu26ZVUZPM6zV>UuS8)GH!E=
z+mjYCiZ>3^$?n}t%l~Qkey`>L>aJDk9QnNXCtdlK#D8R0s!wZWvrBzxOy^8aK0`B;
zI%qtI28OKH!O8y?oz%em9kTpCMMD4QG1LF%PKz}1Zhg+CK5y+i_2-SG9<Yajg}0Y5
z_((JDC|75O?4Qx;xYjh#PH}$D%rnwgUXB}ri)J2?|1xeng^eP+f!CdVQs%d|cFAEs
znWdj1Y9n<g><8>X#CPE0Ue?sVxLsUF71O|izLo6Hx{<#)w?+()(9x+l18D;#tiT&;
z$u8bqot%1`_Fw_;FVPtXwV=u}-Pzs=wW|C{TKIPks7vtUlFTyci)=G)^e>if2&#JN
zi4(n3{;s1Q{N=bGi+4*QGspEs2KzGYbWMQei?fGlHKFW>p?#bb9|yCKP_EuGvYehX
z2d`#KYANVG8~Di`Kx-q6HYLG6r8>Xg79|V9W!HJYCm~eM?1%e}9GzS$8$ew`I70Vt
zd%u$MeEbY}0LQY|o6Tl}ewzMqV(CLW;Fa-^xQPARV(x1Brr}>_f6+~Ok!EJq9y^lN
zKA_A6p4)FzY4Y+F>cq<zY!|sF8i#CDEPZ;XC2#4S3$$OlQnfc&hxS$(l#i`U<k#2K
zL{>H4-JQy1mNvtG-uXy=+Z9FL-4b12ZN@#C0e5V@=!x7Ot36e;)&uq>m<rghTJZ0d
zls8Rq?i56|Z(#oS3Wx1%6NhC*zh0Z@wwsS~-_8f$`I0^I?0&LcCU~J=g>$b&x4iC(
z6hAN$5<@#fgM)G>GEa<I?z)4uAj<x3KRf%STk@A4v4TPz_hWCMNwnkAe=}of|Ns9<
d!vC`LUw`Ume)nP7P55XJqBQi>OI0oI{Rcv}qDlY&

diff --git a/two_way_files/figure-html/unnamed-chunk-13-1.png b/two_way_files/figure-html/unnamed-chunk-13-1.png
deleted file mode 100644
index 2691a1cecd7cfa83203ac8c79dd1a9c417fff53e..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 8904
zcmd6NXINB8uqX}#4j@6&h@_F6M?p}6aL6EGkeqW4vVdd(M+M0YAPAC1B<DDQq?HU3
zB`6GG1<6TrhCAr)-Q9QZeLvp&-uJ!!`t&)ctE;-Ys=7{9&xC2HE0Pl5B*w$TBUM(C
z)5OCA0hbp99}f>tQ;r*qyM5D8)t1NI@$kg(@NDtK#PGy$Eeg*TS24J*%Z|%pD`tzU
zC^1|o3MGcZwOHGq2)1H)wm7gY-X;99plngNim}BFz+h}Kxb^}ihKI7nRWTF}d<n-D
z3<`s*SQHM5#iFnm7+XAytr!M{tG1W0pBDy$y&QtYwHKI+3oJ?ui?YRHa218c!Eksu
z$Yr^}!Ep`t;sQqqH|_$9`T2H<gzF=0q?N%fk?1!i0}nhr##fium6-W08$3K1p0b>@
zwomGM8mT|_zL!FNxfXZ-{rY|}lL0@GeV>VF?ESqCEzX<b)x*`Nx6Uq@wV#8Dp5bxF
zK`8{<4<rUu*}_=_kgT)uPbxsq07`MZ+s-fw*cBum5d^FRzyJ{F3S}>WAsd<LgOPPf
z*YjE-s9<}12V)LtirI8_DF^c>#N)vJi{i(nng@--)@Hop{vPM(ph1*rjrCoa2EL8k
z2vfy-pypLK(ral9l)qUWRcpTe&ctsjZs-}{qFLH^qz-zJmR;%($qI5MO$6FUD}w>X
zOW+<K;uG8Ic6B@eorwJac``(eoO4QW8tfEV_Eb@LQ3nw4_x<1<oKv+vZWdwmC<eyH
z`q@WJV9VWS^L%dMst5&qP_g)gnigY+0qlrGDe%xS08qnqj>dg4zv^485ntXw5ZBm6
zb%JjxcoUySDJTQFt8B9qJY@VqoJy*rac*;5d^qehZAxpvsVwFwR+ZOvCO5@PQbJqR
z%~^m%-L)^x9^1$IIwfu9<Yc0jH=WOs;Dfk7zvYzFy?wq`rvVJ{-7japV*Emj#TAA3
zjX55ArFrKj&ljK11&F=AiapDOHhb(CB6~+ZQT-O=>N3es;3vTsQ|Di@PJ|5a^9@{E
zs7tv=z&8G7o1b%{e9cj5%)A|LvW{kayloipeY!yx#_x9)b>i<d_n31~Vn|fOUj|lZ
z;Pk-I1nY2=;IOw!C{M~!syB}?S)FuJEW+Xt=CnuT+s_)S-RdWRaig;rD_^@l5`&UK
z^F7o@NsE>ff(C&+J9Z_h`g$*xo9Ep9z2@PL9S*Gvdvm}s(~jqi5wwO|gUP2F%Hgqi
z|3P(%!7N$n11#5|6v8tol^{zPfUYPOYmJ#Fi1Ez`kZfe$&9?POLCRH&iibY<ksIJ@
zGCA=j@gT!?o}l9)f=Ns&eQf<1u&e`fx}_e@8<IX`5NMNK^tKLqJTL$5UfP~muYJgO
z*POi+EToESfc?ZYP#4DoRgD#!SWLZpJFonZIu(enxOKZGe=*`X3?AOlw>^C4NtU<I
zu2|7&=0iWj=DH|==iGN*bMA2ZZLJG(S0&1K!7%UYsP#l;HHbzyX{xr*i@*8x*~+@J
zP++bfqpgCbDTSj*&07*)o-sa-#`(=lM1G`Kv-WVIwat7SA@X6QNW@3!y4AZEU+%~_
zk)7LnCebO6=M{`kK164VI_qFc##}rmLjZAqsen6@8lZekydMdY2cLm+A{PTxj8w#|
zI+hu3of2!`wcFKID+c=9zVzz@Xg_3CdKk5Rfv|bi!)d_rO+Z}<VIlf>*ULnwvMvoc
z%I>ru9U&fJ*`NizBX*+9y8-D5>h(N|do$6J_O0Jj$%}qOh4sS{L*ST^@ZKu&=G^03
zsKV<3pI<-fyQU3$0IibLtV<F3L-(F+#+wQF2Dyo_etLZeb<RrZ7w5-yXub$H#Ed3f
z!)lTrEOXBkt;|X<ngbXL%x5Rt^;&MvZB;)Ss1+&}JIf}mU1kjtTwVb(F?HF%yo8}|
zI4LhB{p@2_loiZv<zWsxJ`LBvR`-#kCnsm3N#&NW?*iTVzD4z^RSt6wSM|hARpxB1
zI)O!pfzjQQCpyjJl;1|*j7}ZA4Hh?y^PF*tu1^32Hz&2|c#;!wtk=8hTvu`mxe>o*
zc#Ed9%n4*=%3}BEe8FEmr=&`97OC^OqAxqH=)}}&avfZt+L2Ou@(ZysLHwvt7S`x)
zc7u>H>8j`ao3Rk?L5?WX5zDvVI}PgI`&SB2&(SLFALrQmMQ;jsOliWtxRWUguHPsC
zwpUUrPTV#qxh~QcN;9;_X%Cc%nD$6&6AW$Am5a$t_y>9#g0w+(_vi@@lmjKJRs2ke
zvN!yr+-hi)Ch>I33cX6$hNC|cSNWaqiuF;tZDwo1DjDNT|47Xf7ZzfO&>@JvS#&?O
z7hCVVzOr?YAb|4l$o`{(F;JpL#V|$DL^z<7`|+w1DYL}cTew5xn0Eo&a5xe|9nw@d
zY1PWTafd|v#KVTHu(p#AwW)Z=nON6thlcCQBL^c@X?7Te_yzFEow!gs$nXN}_lS)3
zjzc)c#=}h(tw7tlYxm;vp~6VWd%wA8CLWp+L67tF6cE%iVEP;MkrGT}ad*tq^cKpa
zxy)kMuC;yC@(>>+dO$+25F}z`oPEFe>L7*@GQwXj*EnhZArc7$P`!|*qsVi$q~O8_
z?WtV@*#PLKuu%>Pfl8RhOdCvt5WJFd1Kjfrn4*-u*90O#CLYX`l#~QEZ&p5q;)l6~
z!3U?3-!dunp2ST2?#g3j+(xTZPj}a@X3mA{ltZgi-Ws`$9Xg11ui(5usE-AykzbRi
zOQ;2f8O?AUGgj0HEe`)d{|6^UbEpiZ9=dL4pzDeM3V!|UEN(fO#BAy68pUO_jIKG~
z^^8whh?TXGpFc(EnAKr~@085WUIl~LEcGnLT3JKPf}<j8qn1cM(GKyg?0@HlP+v~6
z=+gMvHG?|nWigh@1*T!lLe91jb1Htk{_uw=v+|mk)IBNWp*(fmS1r1G33jVD5jD>E
z%|GY1B&jkqT_LuKsontp>d7Q|UC~hgK>`<;G=118Pq#8|Zzm@MdH(JvLA%h-ijTw#
zLlRlzBWFRE-{J3!f!Bk<Am3MJa<`Dbv||Zh{0%wJfPeXQb}PKSn!^OSdzYmK*|yC*
zF+6fh!`Sj(rpfAx_!Z<Vr4hQ{30?SuDintvCV<ihtL3*H(m*ezWQMMyd~f{xKi@{@
zhK7RnFZOH0Bbcv&GjZ5I8Td00_$LD}ls9g%lz+zvKP~4O7`#n}BMd?|w8Aq{0BrL|
z1Q*+1AQ0PMk;Q+rqQ5}@8FWx|iQ}|H^uG}N8ISyf;Gb;#n;?#jzvsFn_=}By6Z~g@
z^AEHCH^D!5#NPz}wXQ!2{(CMQhySCXp7RX$@hR^&`;g>{Q*a415`1`Y`fb%w7y*ut
zX=-&O2ZyVeAvHZTkxX{Uz^n})&dmIX*?N_WyYCvNb95swx(r(oFq}1H<pTMlrA)dq
zY0Hk)UFXb1f$i-$f$vgr2`g6lw|OpESNr)w%gN?`nYt7*OK_**>>5(xnld_~;pp-~
z9ySi96gHTEg@bX^Zi;A39LB1_+-_|ThMES}AD{UjluDy(cQ=FAO)ug`%|BhJyT|zb
zcxuMw;h#jV+_dh;{Q_`X=GHKLWyA2j)X(%;Psi}Kmgeo{C6-?sp^0_q=*E+Y-RmIF
zCTFFGNP(B4QcR4E2r;w1Uk3NtU%=Vde|OmPc=MCle(4E^DWpn?m?%TNzCYpzuK;eD
zY%A{3GO%KrX<t+8Ut458K&+c(S%d=*Iol!)vw~IlY74qiuvApbsijhx5b%63qdAU}
zBiBQB9Sc5x0XWbr@hhv;d#91nW<ylm%r)$g)0=fZ!$vTRei^6x<nKtc9Oje)jn&&9
z<7cm(t{=bIreqT--wa-Mm{^vDEe77A{Ic3wG;Mf(hrZ=L1z1zAso2if`zSC6OsU{$
z{B8h&cKfD`_V00z?#+}zPemU<E`^rSbNE!d>|o-{^NM*Xu^CH3<m_iXbbGJtz3Hns
zy}!izJ=s^RW+|_uml8OJbE)i0HLGw0HA}2Dg>-VB5>j@~YhSPzUmfQ=R(6Zg=Q~uh
z0dTx@)K}H8`C)fdS*-*E=6<B81_S+Pk>2i<D${Y{;#!K=lwrP7h-0#vy~u=V7g!yc
zEb-lv#}XR5Yr*p*w_ht#*ca_?c0|}Brb$;nfLeJkIXP+3bkOt+tUaIcwwGJI+^vnd
zf^oAOKGJP=lUqNP@bWOS?af;B_wK7R7S*rJ+_rFozRxq%C@OY7NDuoX%8dpp^&{2(
zubsIhN_n;#+l{z!^(J@YV$0J>{U!WB&?VBZ9j!bdGPo1)ak0{R`<tYxV)`$FOgD#O
zD#7?+@7opO&e8diTeGt0UCNi;BjvNQu%fFs@1&OiIQ|bE@GYd132`n)hSuH}o~|7u
zf_jegYg<C7P}8K#{#kh#9~V9R0m0{t*N228J$G+DHkf)?mf8weyVvK+PSM316|?^J
zAq<63IQ#<!`5w=AgYJ6a?=3?*==mC6XtNdU5gu~oApXMdOzWzoxsEzTUZB(w9PDWM
z5;3!85}d}~ZGBNwSQwPT9&e>>A&LVx_ni2~ogTe=I=)<LbQr87Dvdrq>#ga~S{G0_
zjFh{#)bVB0uE8jMWhZxA+1u?89gQ1GMN<Plb|unn;c^5yf-Cz%)6!@|g$43&(sKpl
zFBB)~E;VtM5vy<dB>lsAtaNE)VeO%`kHYLmolkYc@~I+WBM3Pw<D-yi4&M*gg-|C?
zS8m0;vI%;>%1pOQ3=Su;5bc~AUmZzLJ9BEj?g<996RiH*DgSg{$}xL@Lk1&)3;)uU
zKcQVZn@%ZRhzcI>3#PEoLX-Z}^S>iz%h5czlko1+weQk$UHDsgsOA`6a{97f@X}|M
z`){%0OlFsQ>5durwF6rsr=|3`Qkm}BzFF+y$}OXDvEs?ON(a~=NBJflY-)_PM3z%u
zTZ)Onn?H7=Cuwor4sw^$7|Ij}Kz(=UKsX_EK}*DIxIx_<6dS6--=MMZQ=->1P>vK}
zR_3Kb6;AU_KR8kLXKO!Ql*(3?pM<f+H6Q9ceTpZj=5X&TmfVAw>FKpcFj2xZk${(g
z>-*|w`ovY$<oZ9j2OV+FC%*RG;ym1KbM>3vL+nW?G-%34p^P`nC9vyt4N~s%QIbmj
z#m6t&3jH4YPnYJs5g+$nn9#XY1JfK@T8~W^SMQrnf1CD6Tc_>HtN}8@g8_$o*KlTM
zY?6SPVKASGDns*)pB*Hp4u;-~FP8_ARvsYqHTG{c9)>Dw@A!JBgqV08(Ac9JFVaEt
z!)A4WzJ~2!CB4+hw3LH%GBu=fi||Z<{VYY@?N;&CIFQ8yl=SDqJNQVJkMPP9;gC*t
zih?r2WBI!RNIBMHG_`%S!V|)LsH7m0*8SQeNY(GpE3Qr4@9zRrT1mxw+|t0nV$XnC
z!jPrVx%+b~9eU@x>?iq=q}R6N2yT1<ECWg7$}&`^<i-aJ(T~(@An6rXqYx5&O2*R>
z&27gg0U6<C?L^L5UW3E87v`|ycjSU@@Nw0P5A(Ech+ru5hBwmi^Iq3u-pwS<qJOXr
z)-)9_<+iq2*I4=UU;qqD82!Mq`^N|XVHcp72_5fa^j8!ut)%s>xrOWkjrSFPrp+b=
z3ljJ>O=7X)=cY}~$$M!%6ajVJb(n9M9cJbTUKFKlyiGP(GrvMO)F*gNU{KI3B1ttc
zaZ{c?Cl~NoO@W(SoLV>|M+#+961=AJ1AE9F8L=kl2*LIubi0;_O0w9jVffe{d71ll
z`-EB^fpyt*(74WTi}+QOr9QVf1UNeN-c*!y3n&I$eQrE_*r#=(wmy6u^vOx~$ZY3)
z{X#fKFG>+nqn4U-p{G+@n7-vnt0YOKbe=zjID<>^4uFJDQ}P-fzTICvFZFG3lo&5$
zaVuR832Po`HX+cgj`mTVCH=Nt$)gv11Dw~gL=#XrqC=BIIg0-ywF<ga?XQO%QIm+N
zw2s@azfet9Y%Fu;W-=Uo>%~dYl~E01pSR;X3u8qUSyU{KM86QxY3pMw-R1o{?C>Rj
zyq4X{*qX<PXLP*7%1PE4*){xQJbr^yvDt)3a*;J`DqWPZ&U$w>>MV0Yz*5l}xikQ6
zPEI~bRh4`q4y<LC(<mFaT`R|F;z<8$Rl^9)TLy0zO?f!I(e>)!I>{2A+LP;s8=M!y
z;O!^yj_r+=?WLuq!<7$;FB<lIE8)FdUxi&S#fUhkmw{0hBh0O;yUQ4|7e48OSuQ?L
z2=O8F^cG?va;2+Sq1(vNT{@-LX&VMxD?I+125b|=BYX5{#s^^ck7r}H5Ncw`cj3e>
z&s{M@PGG$|lE=BaJDQ30192OfB*>-geJ2F+9Zu0H7`<+H7euhx;Z*s<$}u-a4ox}&
zr^xfYOj%y_X?G|o5-YH3{E!p@J5Ix$Z=6|Z>HY~-6i3#+zy0S+XEo(*O;}1wsZHBH
zggStsR0%qV`?R)%3^BhF+2XmQYBRD46^T6OLaw=_#MnGJ$DNDe|CKHMj14hL=%pzi
zrf%1y;_F=JfaMji`^F_kS#l3oSlYSmI15riG#Z-bLJ5(>`v>O#+h`dbRS{5AB8^sS
znO`u70nnr^3;O}Md*8>!D=bV%AjOK8*#eAg(4xN%o>hvBvwuu<8S_}QE+JmV=?}ko
z{!0iMeQ)G8o2bFFT^%Z!L1x4tH@4@vY)|oCIxFt8fgi>|7Y8Kum_wwHZ&@b9f?yQf
zANxTr%oL$<Fz|EW0p(;%lXehHBZj)B6h6uf8R6_+cOp3;1noVfI;Z}5#P~l3%$NDi
zU(x=5FRMRT2e+}Kn=|!6QEz~`l-w9zTy*iScikd!E53%Dk^EypnL@25R{;RujAL#J
zhkioX^dr<iFuu?-h;l1tA^$5Zg%W!Tg+6)|<z9W41WD^Kw&?j~*nuU@k>q`5+&k-w
z+r+$leBg(0K&#Fn`R0?s`5TcBi9y2aP!>0C6e_2v=5ygtp#Z6a0y_cn?LJ9tEp?tV
zu>;nyH7^UZy~V%!3^;!VsGS5W8CN4Ym?K<bgdlg>GD+Ba4eUu5rE8FbQKd6*x!HVx
zTRf=#Ji7rLrY5@{Yym5GXr>5T1kGFTjcvym?A+Iwg~?ezu%Oe{XF=o$YzoW_yarmh
zMj70LKN`VQbH+BIw?lqLqVTDv-qNzm9E}Xbop`a7H}Dmg)HQ%tuHb?LTzYf}+1(D@
zRLk`}WPngZ6+oV;ttbFp`@hST(0ygq@zxaftUpqZ_pUG_{RBf<#%F_NaB-cN9JWFG
zI>@(^U1K=6l@R26_0OY%5Dgdw1Qh!Wpa=!yi~*Mcf?1G{CBQ4sSXr*I$)NXZSz5FS
zu~dtCZ2h4aoOOWh|2%a5m)a``K*-uEzTC2#yPRJ8$i#VS-4`&q0+o&gXCoiQMO$Nb
zB4mS5N!&|dnodty2DTYl$aV|m-JuhQV{VQ|8S*{NErAWZ-Cz5V669<5e>~hg1qu9}
z4E~oC^8W%v$T~PY&Zo?AVpc?+n7aa}PIG4Y*b&phPQM}%c1<3gVvz0`pHZ06&_EJb
zzDFbyKz(~0SX8!wf%sR15GP$$9T=5Cf9c1k65ZEiVOy(MwbB*uSIXP1dOMZAp{LGD
zW!#C+x<f<}VyzTheGPi#v%&TdhNKJ=A9%+CIK`4E$vJ5!O9+Deyq5a3*G#hCn${^J
znI6RXm0IO@>(<oVtAw{S{A}QYh);9dmCGDd&f)Cl6&C%&_%A59T%;0{y&pLcXJw>G
zG$QB|UHk9FnQQS~i6`|)XSxv%*t|ebB&Kr4H}^DkH`S;-m3^*O4ptTE_4PBS04*oi
z<y8s5tEP)<6lDGZSptP^^n5>*j{Jk;JUl)FxSUHC%H?828`W3W>_!&|3Km6>Uo(M`
zZn5r-uzll1g>>%h;u#@(@-uc{eW@5+nC^+M2ABpeS<JH;=rr>cTnipuqfL7U8L?e!
zF9aq#kiAnd4Nk-8^W%EhZHBNhbKzn!2=eAaXx09+u}4Hn=2>-Rw-=X@(vXqcDrvS=
zYr_I?%AiX5HQPD-G|n^&$m`<xI<MmRZo;pU65pARPAtYazwSQz-TD{Qx^#rMbS_3{
zFSc`4I^cPVN$ibdoPOlcqs$4_Ed>(H<WxKF2Z;=sT{wO!lMAG?sXN%?;mfNly2cPR
zqy0RkftU5vmy#|Lc*gnHj`%O<4S)N{|KC7lpuYIHw6h({)$O}S-<)dYGWxNc6%7IK
z^VAd5!{%BwspSZ^<eT(NcHM=q@Q9R?h+bD1ohI+1K>SkdS6!$KO#6HOn4XaTc28hi
zIkzcEQ7K9c5{r770d#+7!`{?J%YQaRKY@~V#*B0B#?yXVX=!Ls;b4|!W3ymENzBhr
zCExCHYe_e_ACxE{800k|Kks=UnLkE;Ejc9-K6%SEA1GX-WH`2KT4B*J#LqKv{d|w}
zo#nRNe4NL(Xdiz9N*nqnlpzV*)3N<j*OtdD3hy~bySaO4NwjxaN4O=;Hp0T!)yAd$
zDLuPW;0_C+pL@NGO`Fuc$1gP3;=EGZBp2l!;I3_VytV^JWJK)MtK<^zEnLxd{%|K#
zqUk<mmrOTVId5j~#FRL5MT{mvu0dOTjSXjsy8?9ijjLIN7SG(B+3I1B^h)b@uZjY>
zZQlyM+s&AD&-Qcjoe=ib3w{SIi+=L>wBv5-@{yMQJPUlBVX!RMF>EoE`>FDvd`*e5
zC>8X8=_danXb2>TnUuOuMFBe7sZx4(_#01rde8TWih}e<JcDZIzSm>uO4HI;Q>&9c
ziK#Z0WR1f#k}*P?1-Ge{bZ6yFR|2Y>Yl1P-#93XHtPkX*y{@e{c0D$NRlgX2UL)4d
z)8Pmz4djmgVU}xXI7@Ni?#M7H_CCUzlQ+xZI)dF){6VLv_)cY2=3CoFpa*I<tz*H3
zIvsWLO*T2%B=az9BizE)CNG23Bqc&Wrd7zrb#KX<#;fj7dzB6cWvI`SmrX=L%??o)
z{ZW#iGIRR0)L@@%V%xM5r&yYdjvnd4<bQ8(>Y%eB-P4;-m@j0VcJzz((6t{M5WW(1
z*NLE~;=p*s$kW%Z#S}J5nsB6vc^H2F_N$rg*9JbJWd3cPaT@NI`4H`W<AV1b!XN{p
zQ0D<}W3~z2Eg4VV`KB?tupg!lF7)E2ybn%NJ&T5`hl^;G(#m^DPRt3{2sFFMf>+-3
zCji?gf>c!!ef4ZRvrtow>q_&RlMU)$A~W@gAV~FaE}PgcADwSTFIwcG$}W0(FxH>s
zc<t`-OBRN}aU_>y&Ysh5Gzig!0|PUGX*N<~#b!K+@dTo50$*C&sPyib3ky$mZDgGy
znPUl{3*zBfP0;;4Bzm51`IVLo{g&afs6T?;=Gy3vro$K!n?FVkw_+_=<8>2Nn;zXX
zuaE+ISKH^)q>moX<IEOX40&Q9EZ0}6S4L$|YhSRRHer{=Sz6s)<+Hx~mVl>C`G7~N
z0A~oOXx>fL8^qen!48d}a_LW{gvcHzz4Dm16#Rbf#o!9txWpMfUPVwb0gs`)f?_9a
zSL7FU*C;@+FL;Pi=yMU3(oE@6miBi4%Xa|D`wY|to7eQ|F7~2vHHhG0-GgEGcevkf
z?`s^l*R=6!>_r-blDE8?KnA%s*|@pq;+(#x5y>KZW0!nI(R-SZk!(_H5pl_kZZjRM
z2uj#Hw#K3u{Gke2V5iNBVk%9TzKPu4Q6V==txvF(rCCUy)xZe>fevP%`-FHT-um>V
zVLeBlsXn_<VH$0*zBS?KeoMhwVvlhW1H1QL%S|v3Wi!g^%>vyx$YAS(pG6eN2D%tL
zEmE45f758<hfkn`P>_n(baENh(xYfI15ns4F)N0=8~)`&!@^{2TECHGHJS4_zg>lH
z(C5cHG2}_ZM)SSWV*>~ZI#zF9b)@DJ|1NJZ?e*5sDZnrg7WC8|gGh`>@aAX$fBu4>
z-#`tWX<*lj9H(Jz6b8}Z*Hm<9;+I$W<|Bw`Scfc)YvL5glUzk&lMr^am3p=yC-B4l
z=Dc^Pk=vYjcvp~@{{=8vjdVs9`4lb}({N24=X&=%<?WkoYu}t(mt`^*rQ{E()f>o&
zvz#1`Y=0RBhzZ*5-nu@=+G(sWEL5naXrov473D2r>|voRzBPY)=qvyH?dUIjgV93{
zH3NA~^reh5KFzx5UjI>{vd>kB)6LBu112GOL3z>-DkYKq9<5XD)cvjeqV)A~A6}ut
z$}NMy1$xPX1H;w4)8|tI`n1>CCf?fni!|j!IY{Iu?9yW2)0>5TxkEq0r;(^UvG4eH
zJ`A2UdDZ3s^HuYEFipf2A>@AG2LViCZqg`&_%cC*^GeSiQ1NlKx7YGWHMwhQoNtJ>
zj!)j?NY{zQHp2Jwiw~fuO;wvcx2g2ML_rJXzaPUo>FWF}5`1`<i=j%!R(oT=v8yEv
z?&KPH84F8RG!zwG<acDYN~4?Z+xp!QjO6kcl0c3mg`R}aJO*I4p=4pTC@Jg%jzrwc
zQl&6{EuJ*YYw~X2`W8N@e9mApO2hjNo;ZvGZ|_tJK`-|kvXrR;4_B1s)#XZL%%A@U
D*!3Pa

diff --git a/two_way_files/figure-html/unnamed-chunk-14-1.png b/two_way_files/figure-html/unnamed-chunk-14-1.png
index 2691a1cecd7cfa83203ac8c79dd1a9c417fff53e..2e33439ee8e57f4fe2669209ede57863ff9cbd7a 100644
GIT binary patch
literal 9111
zcmdUVXIK==wl+3{4mpDe!jOaHC`cG`&KU(HgQP7WIXEhk1coS?QF4}?K}nL4AP7Tn
z6C{J=47b_aea_kEd_TT>pZn+bQ(e<tt7_G%TB}yQtER)WG!*f1?%-fxVBjk&$?0HV
z0PyP@iiv@Np(Do*0e=>?)b!-RUknT}3=CTgF)<7=Fh^q8f~f{9x-PiBY{hKBgcJh{
zkw`Hln4@j~XkaUbVGELNF|O&?7t$69rW#wYLQRcr4VYgc#W0YzU=l-uWU%#h74WJ-
z)_@6(1S_D?Nc2^WEk=#4SPc?Pw%4>j?wT6(brm$2U)5Y)p^;)}q%FDzOh`0H1KWX=
z>+1@ngBkkj3S<P<yF%Ce@pjz^EK|M<Jpo6F{hN}pI|jzxkn8(K^wN$E1_lg6Sx#Ed
zJ8d)FQFi)%;%igv$wDNHfOR*wL_Z{DQnfPGGWm<D4!&_WL1)g|)m3J-(_|v&i7%6f
zQ|nL&<PmqK)hhc#5z1i-3_yDY^6>)#{u}}Um|#S(8wd<+C`5^u(*CZox4U`uS>ff<
zAg4{o!qnX#LaCWj9a005%Vm$Qm@itJn$^CZ-BFrNtUTM=FbjCcVphwGLzMrzNsNPV
zQX7@}(%xLu!x0gFR6TIt>af7H$;E;Urj@#qz&xjn`aF8PObZljJANc$YxJ!l%9p*3
z1=Sn)!9-}RUz!dv;ZR&-_)@`**@sq{Kn*$1Kf}%X_z3kT(YB6!#eyE^B6B@zk_}m2
z?T-J9QpwlNt30%rVYHnMj>^q4otSCAkIN)=W4Oq*3wP{Vrr3Rgn#@^p4xGeVcm<`8
zQwtm~i&qOVHa8kB$?a_RWFQBvyJImeaT;@;`yl4h_Hb<U!MEjorG^9%x&`$zshPKG
z<xYe5G@J+S-a{WSE~b`jpE+91GHZ?}05cga<n>$W4t_sYtL=(`61^Z=&D}O1^KS`v
zxrv$U2hmn6HbsHnbcBnaJX;FCy3S0qA!#L~Zk(On*>hq4(k>m?pDtjd35|Ew=(A$w
znyF%kDbL2ch#ExM%)VZ{%XyYf`G74XwVBJT!qtULsmJW1^RlI@35{J9u6GzAL64j+
zuA+@B-4qY%YdZIg+#p~nGdxi=U7fzCSUd&x<;l@0|3?dFXVjwMLGbRk?n??_70Bte
zUP?-|oaUcQTVAT<NV9KvS&+Hl@8`BOwDo2$Wnf?dzD8S=dnB|}f*a3bwiVnnA{wr_
z=}SC0>Ns>8>-2NjT6Fb`_?s&Y$67^;ULQszIA^%;xg@9Rl-CcyEz3nkLq&h)HI=cu
zE;*+*?#Txt_~v_L^FHe~+$Cab!C~U+F!t=!!WCmL%TA22-O_1pBFk5|JD|-Kk{vPs
z@ii3<tr{F+_A&Q0(BF3KM)Q-T|1fQsUwY4$hmEKjx44|t>&rO~Evu|h?;Yj$$oBLe
z^E0~aV%Tr;b*DyzpBv_=MlJ>5`=kN|Z|_|6C+HpZSxgC-ASxatP1dP<4$Q^-uMJp^
zO6ILes0}f-!t|V6geVhdjN;P95?ikuQUja*T%Yfe+pNakM7UK6M|1_YtczdF@yiqu
zUa}qWO2jp3>zCIjz>VF%)lE*B)E@Xa0?o4*Cq;)c^jgE79D%{`oEuSAOZvJnW5=F8
zeXkEHJJUGvLUv;Y>N)TOAHzW-IO+)^J|m3GzEtpWd}`C{F>W9CuXl^(hVw+W^~qDw
z*zsn*RoAt-c3tR+Tr8deHki_@A@zliMob=}ai<#ydYoR0Imp?ixAQzH%Jr4da-QXa
zR0zF~UdJiSK;UF2z8F#L_0qjLU1+;9YI4?j`F@iiF|kxQ*m!^9o^b6Wt;EH;B9{V+
zeBo^h;2kxOR(4DzjVUZAeq>4w*H+?ebw#Cd=o@Z{_(cw0T>;~3eh(j*_T;n<%Ab}?
zsxyT=OvtB}xSJn&zc$#R2actp>hD=IGus<xgLd*a$#g)pw$8Z(n&*e~JSo{F$c-8y
z&*5Hn7z$rKI;rukq;E?tL!;@)alPV^`rAcAjS29IjSXEY`J_ZVJy@lyK8cdUYx}qz
z6=s{yyxWkeCb?d*tNx=jwHc0pj)1IOo75tx@j=TJxEAzM-b~mXMeuS_<-?!c^E%|A
zK#ZlHnF!dMOXZg|#S5#w=6BeC#F-lwXtMZVN`!hr!V_U#=34r>vZ+jXI}w;nbT?|N
zvdRZ~id_2#mlM=c`|c^1=SE}BhiUQOrJJ8q53B5{b*_Ec{2|D579s;Xvn`n)Tv~Up
z%r(r>E1We<^?Hctz<f;gpmQ*Xck^~J9G$mU`!puhj;91z-AwYpS}yk15%^SLr2n}7
zrA<hjjbCc9sl;iyK30VbxBjDwc1=55^?Q5y=!T=OOU_LtKY~BE=BS#KjiswtnD7xH
z&cApi_}SlIlCVK=NR{?mBpk(Kxn1bv@n97-o#2omP*o)?Wh6vU(?FDs#K~8bREZSO
z+#M2=Bq)#Gb@P!$nT)sZFJtY!hF3F1+qTS}O*OIdm~p#;z8(&P1HcKw!DI^o50DW)
zGN;$_k!p3=UtV%7{0fCaIJTEXA}^b~)tBb0Xl1E|i1OW=@{f0HWGf*6@%$$kR4)7$
z0!GA63wZ(0_7*B<U7&z4bi9PCL8hhyTAP~AH%o`+MWJMgKS5tf!RQ{-a@vZ&(iOs7
z1@Fx=Vt;U#5@7}7<3wPo(A}JoP*ZO4^7EWN7Z&2n(4~r_FNV*5ic3EApBiX8HSHJT
zO;=0Dv%oSjz6zDCwJX(*md55ldJEV2x0`tR$A=Zb)kfVkwGi`tkxyGIoQqyMsPn1!
zNf31tUYD;tOxjsFRC2M1qjzHTb@;}RB0tmObrZm1275uf%;ppFgh?UBHqV$~T1EgN
zQ?7a4v*Y!g@2X<4-!>goz#)9mrJBfbtr=^1Sc*@?#`z9w%7t4mIF=`26QYYq%3aF%
z4s<%X@bC~25=L{E`4%rfHqixpCcK3Zd+aZYKf%tP>rj6SxIuzR+6@7MvA`!HDDwIB
z_PdKYS~X4TD;k2&xqO@Gm&D&diM598At`tWG~DupaI^6Zy_S)T$b0AYwFfs4Z6qeB
zK}S>{9Q6T0sl@prce(?VybYIZu7m9@EEl*Q`|ns&k~FlJc2`~kCD*-&AmD;Y<78lG
zn1Al|f9U_09D$Eh68&IEI&dho(8XK7g#AmzUkKs+qafE2945v4kC`R>8+iCvgZdl8
zU$*vdW5z`Mjp489_$M0qCB`oc{gdH8fXZLO|Dj;QKPT}Y3_-j8XI~)0zmMw|!+%3Q
z|2D2awDRAXC=`xIbLji#vcZv60tk+(E5e1qECB6d81wjW@|npd0&cN-Ps>Sz^GiDe
zvC{c%9MGsT0Bm<lN0LZkR_&^7$;w1t@=$OwuCi-64W^!zXxX*Ql*R>NeyYm7Hn2dT
z^GB#>bREH6*V-XEV7C2FU5;wP3i>&mrDRdqvLyD&!kP46UcG}drNZYmC`3Z@om$K<
z53|nDpmq4xBIdiIoq#Z0?IDHzQPbT10co-K`z=Lbpg~{wSv)XoW%Bwk5Tsb3IMcHo
zkh;faHNK+-(j>6LizF?iE((^h*eLDU`%hMX{<Io1R`}D*0u<km@~zaZGD6n;=VGjZ
zlB|u}(X6H+)yaR@+NdA5le_!zp8omOUglxx>CGXC&K>RazsRH>q9J5#&atZF+O^y>
z)=$FOX&@tAF>ALH7;q)|F`W_cX6(C}w@k5m8_bzcBjqTaQI_)B(_-5mA0Ct6o_$OK
zntxKI!JR=_2h62;wQ1BK5HMZ6Q(6Y+E4%VPPz}T;NqzkVSGTI%mY1qXrWUd9`0dA0
zC%g+W_Mrwur9M(pzl+pT(oqJ(+w!Aui@`;9Uwk~yC?30NbcdKQ7f`>c2+Rz>b%zQE
zZJ)m)0yTS8@P;RZs?jyC7KH~WpW;-R-CyZy!~lYWe;P&iW~4qeB24mJV3obXvKgLz
zOE|nyMtN(75>fwZ6+UlWyw;liOv?E6(=-W23Y=VBDx&<R%)^J%GZgJYMRJVJLR}H<
z9{l7$!qI48TqSBZMo&Ch%t8t1S@xNqYny5RQ;&->wCrCN8+PC$m6VC4-`T}qz;$zi
zM9c*JMqG?0n8h_fYoiyZq);U-+FM%-l0p$XUoYMLjNZ_SyalWqtqW0q`p1rKC4UWC
zhs*%CbOXOX4NBH*@Tt4E_t=7}P#RxyiX~16md&+W{4+)f%U~Q1dN6iEwE!p0IeL^7
zaSPY<qaN%JfAPn<TAjS<+t7FHc4t6xCV0L3PuKHVn(@?v*aG&nqHZO)gg1fD^bwTI
z`~`2anEoT^s{=S`*DyI0P$w60hH<jpYX?O|VognlxfUu?=R-h;wO|V)ZvMazI@D-V
z#0Qj9!#<hPMQ(?ek(R;x!{o0qh$Wh>f}kgX)^OOepug+q?&t8*<ZmLkq+t`;*acTn
zDW!mOi}}<sK4usdQFlw``P^!z*l#x)#a_S<FBY$e^25RcE^N0SesdrjI1FrVI<J)%
ze9*>Ki~&p@-MeTBe=jw=EaiE+$L3;TsCdobvgokHv(F(=(GqK=3k~WDotD3sx0|}v
z_OUFM7imAEd8TguGL$?_EUEXyX5Ph3#FJ#C)GMAlJSh^#;SWf``O3TUV){Xu{<$<L
zXM{bjfIXL}h4JaK+Idy|*0~`^I)G@CIgXP1<g!9uLd3?~Y_~v1u-l?A(W<jb1|_3t
zbBjWc)|N|@9hFYojuC?;#kYRBtbcW?662Vi0iOP{R7lWYzORJSdCdik(s8QMa=(I;
zVmV&}0MJoh`%ng}V!d}bOu0Hoya^Vdv2gq_sh<UMf_R*Qd-NWFbW7tBRc{VPiWLju
z21==sl=-mDwozSFhzGIO`xv8)P%InWkB1#PSL9)?TX6{`dm{ppJope_(P?ZZx^?1-
zcUGK*nRr`}*xuriLjgz%bP&rVcfby6%{zF@?-4HOu)O)dKF*G&5Oc=tjHH`{kWexR
zzSnnqreKR~ck!P-ovc4)u7By=A@X&hkDRRQ>;Px$CP^ih^x3NB@7!>jBKr>WpYtvp
zjCWr~rAo@6jy{>dIUVgg08tP&PSad+(ysVi>V8}Hy*>UV35)-u8v(eJp#uX)R|wnh
zkgz}7Tq2+dhimp6$-2s17LX?jK@d)7R1Zt%a@X%?NPVC5zB}9%?{F~Sa(@BYj3qWi
z0d&sra<Yw<<GuBe{HTS;z{wWjc^N>@D%dt){edi$1H<?u<*N^<4PE~o;<)_PCIvQc
zigN0px{P!cO~lA*nI35B?)|9OH<WODv*AgRUVRWq?7ipNa3ex%8D(6cnW<mpoBWjn
z0Q^p2APqqj9*zc?vS{uqAq?#0RHye_^I%_0qUdoD<3?I6Psgq@WJJu~T=WmVg7>_T
z!((EpYw%Ee4AZ`f;$PG2`k`@tw_|SW)c)Hk#O$%l$H`_pK$ogVNJ%DDtyw}}Z=>aY
z$r84A2?_dB0#}SmEu*i}INz%!n&=+N$RT@N5;{VL^z<mhN>A4B2f2?&WheE-q?dnh
zC-Ih^6f-ty_Dk9ouBY>KMAnKSy6q~*SnOQFJru$_%JpT*&@u42v+DQqs!u#~o$6N4
z^MXup#&+=2NqCp^p2!X79)}Q*sb-NPXf^$!<jU|&Ga4^<_-+F1QWWEIYr@ZbsCZs>
zA00{p5~dqlTeRf&jLRq`^7x%_r5i3!WHo@LYTnz3m7~Kgz<H!Pba;bj*K0UpjTPxk
zQW9v%RT0~4aMEhx?tHkt8<gFt?WR)O=eaLj+xyIa<SKkd;%b}w3qMcRq5)%zjlkOi
zMh&dOGjr#b({uA9MM}25edb;Jiy$)X=uu-B-&4K^4Nb_BnMJoTFPOc%Wt23*Ifbp0
zF1G@wtHojF+1+=ZtsA#a(&4+Bn;A!~=iM(8oWj!Agayz#u(gsFQy>_AVgO}2io1%y
z(LguPJCc-PzokPMnOrCYTrDV1gvEHWq6EdKajknDaN>*FdowWra>AXC1Svmi`5>l&
zES5O|i3jHgIzO53DsLP{mT_sK#vZ$cscSrYXp5ZUpO+y*SW}B6Yi!<ka&l{C6AHD<
zY`BX$!1fmEzF$>Q;_+gzT^BWnb^t`Z-~Z<RjzjRlny<8D5EjS9ccN74Ug4I@`)rgc
zaF-Tye|JBhr{3P)9zI_eJinFWca#v5&=gKFA!H;+(uNICrQ1n(9jc7VsOLcpjJK}g
z?1=?`q6|z5j@k{}4T6plK=o!dFL_c1-M+cTTzDk=>l(w7a0ID*q1G?YvIbVV&MX;#
zle<c3{OPQ^t>#nT19A7n610hXyl7}W%mzP2j*}mZT&i`TR-yYca+5O6VYeZO=~xF+
z`Dy+=2*fR-AwR+RN#Jw1OY-z{QivNaq;P7;_0ENbfhtk{lj|TxQS=7Ej2%?3I&)6&
zG>glc(3R*{o#D*P;Xvq(h8_L06ZI^qal0on%({!jrz*#mZ<Ju}4~dMXmCXsDi)qRy
zApXPuD^R*Y!blRTD3YN~z|&?AvE)Z4eWDMcv=9e&?mV}M=}_fmK(Gj7w7=rRh5#7<
z0<ixEUw;A7|2;gcm5J<F9_rf1poXjw$FN}(DcTpnQCl~{hQ9ClhGybG)@Y)SxnTV*
z3a@a$;B1}T&)VD?f`INku{3OjAiTj)0s!A&L=c8fS!yT{GcOH;jxo|U>~Ij}`@!*;
zIN&H+V!i}z48-Xxr_#$QL&Zf9ZC`K7|LbVGT@f{K)HfIC5rn=5f)-dHkch7rRWiUH
znw|3!hsYwjsut^GP=G{Gs96B1l+)neEppq>Gf|()G87KJ$TNyVOmN%-#l+9q!kbg2
zHwqmdMF$AA$)KJ+8eeT*-(iZ?s1AO}6}j<gRKW<uAJ2cdjj{;axAyVXeU0sBJ&Atk
zBKaMLM6$HHb{b}hnBEzg=D-H@H<lUe$k<$Q*wH5KC9yEA&Opf*(MGU^<?=RZR2{zH
zS(>vSc%Va1{0L?-XyR}`Ivd~mT--ngmu&BJ$gp+sEv($(do!=cLdn?)Gy^9-cDh!$
zm1pfU;u_&HK1ax%1qQacy6{MH;~-vX%e!|c-V8#3oABI_6+xJMGW>ygV{@{Fka`at
z1wig}Ijc>V2w-2wX=cE|V}7AdGSEVQ60e*rY&B}^{bUCL`y0sG{SbN(1O9Qm`~QFi
zf5mma$_n>YyA)9wcm={;_caL-W>MOuWG~=>AF_o8tHVKHV1RgHPRj;9T;o)5B?+Vz
zK8JHsY3RdYiFkP&Fe260y5vNm%<Tm@9t*~8RoqSv7O)sbwe_|Xid_ENZB_gm4v|B2
zP>B6s0o%Vuy#fFNZe%hZXO4eL+Hef-^W81_)Hl2^JF@J#&u?*TYfJkw5K8-|Fy;UL
zBd^Ur583~1D*hSq{)b=q{~(1~;O=`jgub7gohY23qZlqP!%#1ukyD0cDp)0<XITa8
z5v7!?<~1qc@$u<iNT|WC(2W$!#;{npWMnRH>fVOyt4%M-H6)e^Wf0APSxaB9VfT$Y
zRu95rWh5fIc>Csa25;gU!FE1Phw(Jj-qPM*OSK6RD))5+1iL&*n1g-qL|V*0ux8pa
zi)P(fT6O=tKwyN@Cu^>!lycH2&ZN<{&W<g^{z8UUkB96!2)+(8Psx+wYRv5a4J#a%
z;jFHM?p@VyDrK#whAKT15c}{=7L`M>O~I6Q&b_ze^(rM)rSKhAfqS=dJaFcRzV3wU
z{EPfQcuC2XBqno=+jf?nf>b$9QZVq#@5&Q@(aaKk<B7X|$NmejbmUn1Y9ZSAJS+=G
zj~pdgQ^fX=HE)<kp{gQQVc%iw!c+VaV$9NrI<j@YLhYKxLAj~?q?l+Vg#|5Ph1t2r
zGVPKQRxI^vZe+x$Ju%DbN8G~(uUlR0TI1F<b#M(0urF_I{<E=zj|*h>?4NsYawFqL
z?FksqeXgt;1H`uZz6)|9Mx?9RsCb=qTiYqR2f%62&Ydc4j4mQHM6CtNPamYCYrL2|
zc>0GO1cT|Ll<`bZ;d|UJs{wgQq%zT%qGF(`QZ$POEnYJtRSv!tX2lXpkZkIqQr<Wm
zE&Pt7C(*c&zbHEtEJ~iwvcNvmCTP+hI(mmt+;*W>V+t;0(eZ@9=lI#t0SzVvoAK{%
z`i(3h*LGmi;Yq~Y9t>7Ud?FGk7FUoc<oT3-l@8`hSitdoh&-%RGmBkqRw&H3-v-YZ
zwYi<6-!iD$!U8{GmeSTqgX)ngOn=pB5Lv#-rF9~TdBki^`f*N|Dg#o8>wd=Pvs!p2
z9l}KfCHT)%qQ4!_{Kuire;ft<PZq}Y-&z0TmG<H#yl8%VwsrPFUyX~#d&9YNtN?LG
zI%{{vOAgN}zx{S|Nq&-(?6=y26T;%0PC@vy#;g3KY_^J*T<&Fn^I+CRjkGXjgn0dt
zt$y7=g#So6&ndBG)?ol7_9rP@%3aon%{Wz2Cb(qV?;oG=HogiRVKCKCS_V%GDx={f
zEI^O$>~sdsOHS5}r0N4J2gV({Wwq%h7b%6MGfY{7h9yV8UPf~J)JHD@g8FMsA>rE?
zouv~yJfB<K+~ihcE353p%@A@kr)AmW0Cr}AgdvZG2yw|U>AE$!O$T6e5jszn$?e%0
zxoJ8p?MHSL>t(*sMqHh|QCIIxy<Kr6gl68l9~LlJF*W-r!m3H*Oxtl1C2H`(sq_Go
ztiGTt^z`@%HZnVw#!}HbxvJ4TNX0CiJdKrVXm&ZhZiI?!L1eCpJTHDZYss;zGNaPE
zB=?cO&VCZV*15T7J%_KO!$x?;y>>0saoSRSj!ivB?c+-PAU4Qpru>#%+k*6Xo@&Gq
z{kGDkYY8AhW6yPrHw=u_OwT;Tgd#4V#>#h_rS*Mrr;;ox+NJ6QO!La@PF7A*cAS=r
z7t`k2!!uR+93j0{5Bo~-WD$$%;`damqZ2o341|>sI3x3+gfTHRvL~iwwd`8uFK1tf
zh;_<GEn&C@_C)<OXI0^R8X6=vOyH6>%<r47HzMAb7hgs-<Tg0I+h4-=xtJpVXQzp$
z&21besRI>bmWfOB%Q4DwX@B8T%0hUh=8@%ZtYtCwo*tRA%0C=lr57DveI`A*!RfWo
zNiCU^>0UBaQEI;zkI9t7DI?C($+g=U!^2D-%bd1Zl&(FZ6%=P~++w`T^|><59btK)
zLaY^G%&w)=WH;ZUukR_gfyL4AuHw<If%3RH=~*A}aOoLKg#2Z^mps3P3a}*cb~j%+
z7_NY!y|Eg#u5_Y&uH|uWsili5Y=4%`nOeY{F~et&qiZ#V?;aM%piyG54=?^9K;BIt
zKg?rF4)h%L$!PToZpIc@XnHFsqu%=)o<3`^B<qC2AYy|R@%jvVTpV+^$p#ygIuGY@
zvX>k?1cvH8Joh%L-A?&!bKrgRq*XO<(+9O6zNeS9^1JVJPjhzTor94NkrWmqE6Er8
zbPCJa`MhV{(w*epP%Uel^K88jxmJM+Yro^XtM-rd9-r0K$dEm03Qy7pdNQ0%Cs%)x
zDLKp8=_Xg`=cQQ;M^4~MZ@wl|$=Ot&q~yY`61?;N6s?+cV+|{X@@#NGK&SnlGe5Jr
zfLSv<`TmaCiE2)g5K!=~S0m&dJjX0)<Q@@q{B9vJTdSwd*`t+!;TnKSKsl8TUBV1^
zL{u2Wj1Ti+jqC|62tk>wN~^b$C@NK8&svM)+_Wd6?byDUtg~j*g-vV+ULIUY?zaM+
z(`g(zUkqSYG;Dzje)Ht{{tCi~eg6mMh&QABmg7+C`o$+UdF@)T04CoALVF22;F$yF
z>Od4v-mdP~8hq=1(`;uWM)+G{t&=w#5S=}tc_C<ghPnUo#&l$oP%ZBnnWDC**g3?c
zFQ$B-EI~j`F+agkX84nPiVOI4g!=Wj0J!(aZR<zh>qT&)dd-aL=X6qV<FXcO%#0%8
z#y@jt8pnpZ$-28I#&L_t+3N3?eXa3fw;leb^ZN6sYU-sif1gH3I-Jn$yq8D`Z`ff0
zKKU)eIH~3-jOr7&*3M0<ldmexznQD1J1xM40P^%F>r}~xD7TiHrzjIdtStB5sjwAC
z$$`)1i}Rm7laj_f3ZTMBluQZr;&bYbbGhoB`njoBONf-H>k_<*Enx=2JYU)0IWd{M
zSx@X`quNtvAsJomcRExd`~uUeI;y@sB{X;~ZY@ojHp+XQPLk{gHQ(2;_eVz#ZYN4r
zx94Xi(-kM{@-iX_ND+G0J^8W>Q>uyeAKWYw^P+Z3?Q7^aoxc5Od*eC3C!PHvuJ7I5
zGBebKN#2Zj)|yL`oB!sK0%D{-s>$wghoI(p8QrciZ8K+Y{mM^LCE>$eUGX7}vlY47
zjDbn-EZ)A#ozBID!R2|coM-W^pEm5AD)1O=)T>0P%_nf<5*RiG2D?Whd6pcLBg-h+
z*qLnnL~Z$c=$B@P8f({e%4WLdUnavFrOa&}?&+#+(UdLVde4p}tRt*nPM9Q3?k0<O
zZ>}=vP}DnhH19T#$f;56b=<0EKK8JXOn7(8eyuCwD}!4Aa_Nmz^9P-l9Pa@j%&~at
z4tFOfAd$`!yFjtPm>My1n(4;PK?7Nfu*nUfZ||-UX(!FUO<FGXp$#9}fj3M~Ou5Ti
z`MHAxe0c_bvqA}jc0{dD2{mjyhi`b3Xfo<aFn=U~Lf}GIgh^3xxDilm@QV`+3}tx@
Kxl)<OFa8To(x8I?

literal 8904
zcmd6NXINB8uqX}#4j@6&h@_F6M?p}6aL6EGkeqW4vVdd(M+M0YAPAC1B<DDQq?HU3
zB`6GG1<6TrhCAr)-Q9QZeLvp&-uJ!!`t&)ctE;-Ys=7{9&xC2HE0Pl5B*w$TBUM(C
z)5OCA0hbp99}f>tQ;r*qyM5D8)t1NI@$kg(@NDtK#PGy$Eeg*TS24J*%Z|%pD`tzU
zC^1|o3MGcZwOHGq2)1H)wm7gY-X;99plngNim}BFz+h}Kxb^}ihKI7nRWTF}d<n-D
z3<`s*SQHM5#iFnm7+XAytr!M{tG1W0pBDy$y&QtYwHKI+3oJ?ui?YRHa218c!Eksu
z$Yr^}!Ep`t;sQqqH|_$9`T2H<gzF=0q?N%fk?1!i0}nhr##fium6-W08$3K1p0b>@
zwomGM8mT|_zL!FNxfXZ-{rY|}lL0@GeV>VF?ESqCEzX<b)x*`Nx6Uq@wV#8Dp5bxF
zK`8{<4<rUu*}_=_kgT)uPbxsq07`MZ+s-fw*cBum5d^FRzyJ{F3S}>WAsd<LgOPPf
z*YjE-s9<}12V)LtirI8_DF^c>#N)vJi{i(nng@--)@Hop{vPM(ph1*rjrCoa2EL8k
z2vfy-pypLK(ral9l)qUWRcpTe&ctsjZs-}{qFLH^qz-zJmR;%($qI5MO$6FUD}w>X
zOW+<K;uG8Ic6B@eorwJac``(eoO4QW8tfEV_Eb@LQ3nw4_x<1<oKv+vZWdwmC<eyH
z`q@WJV9VWS^L%dMst5&qP_g)gnigY+0qlrGDe%xS08qnqj>dg4zv^485ntXw5ZBm6
zb%JjxcoUySDJTQFt8B9qJY@VqoJy*rac*;5d^qehZAxpvsVwFwR+ZOvCO5@PQbJqR
z%~^m%-L)^x9^1$IIwfu9<Yc0jH=WOs;Dfk7zvYzFy?wq`rvVJ{-7japV*Emj#TAA3
zjX55ArFrKj&ljK11&F=AiapDOHhb(CB6~+ZQT-O=>N3es;3vTsQ|Di@PJ|5a^9@{E
zs7tv=z&8G7o1b%{e9cj5%)A|LvW{kayloipeY!yx#_x9)b>i<d_n31~Vn|fOUj|lZ
z;Pk-I1nY2=;IOw!C{M~!syB}?S)FuJEW+Xt=CnuT+s_)S-RdWRaig;rD_^@l5`&UK
z^F7o@NsE>ff(C&+J9Z_h`g$*xo9Ep9z2@PL9S*Gvdvm}s(~jqi5wwO|gUP2F%Hgqi
z|3P(%!7N$n11#5|6v8tol^{zPfUYPOYmJ#Fi1Ez`kZfe$&9?POLCRH&iibY<ksIJ@
zGCA=j@gT!?o}l9)f=Ns&eQf<1u&e`fx}_e@8<IX`5NMNK^tKLqJTL$5UfP~muYJgO
z*POi+EToESfc?ZYP#4DoRgD#!SWLZpJFonZIu(enxOKZGe=*`X3?AOlw>^C4NtU<I
zu2|7&=0iWj=DH|==iGN*bMA2ZZLJG(S0&1K!7%UYsP#l;HHbzyX{xr*i@*8x*~+@J
zP++bfqpgCbDTSj*&07*)o-sa-#`(=lM1G`Kv-WVIwat7SA@X6QNW@3!y4AZEU+%~_
zk)7LnCebO6=M{`kK164VI_qFc##}rmLjZAqsen6@8lZekydMdY2cLm+A{PTxj8w#|
zI+hu3of2!`wcFKID+c=9zVzz@Xg_3CdKk5Rfv|bi!)d_rO+Z}<VIlf>*ULnwvMvoc
z%I>ru9U&fJ*`NizBX*+9y8-D5>h(N|do$6J_O0Jj$%}qOh4sS{L*ST^@ZKu&=G^03
zsKV<3pI<-fyQU3$0IibLtV<F3L-(F+#+wQF2Dyo_etLZeb<RrZ7w5-yXub$H#Ed3f
z!)lTrEOXBkt;|X<ngbXL%x5Rt^;&MvZB;)Ss1+&}JIf}mU1kjtTwVb(F?HF%yo8}|
zI4LhB{p@2_loiZv<zWsxJ`LBvR`-#kCnsm3N#&NW?*iTVzD4z^RSt6wSM|hARpxB1
zI)O!pfzjQQCpyjJl;1|*j7}ZA4Hh?y^PF*tu1^32Hz&2|c#;!wtk=8hTvu`mxe>o*
zc#Ed9%n4*=%3}BEe8FEmr=&`97OC^OqAxqH=)}}&avfZt+L2Ou@(ZysLHwvt7S`x)
zc7u>H>8j`ao3Rk?L5?WX5zDvVI}PgI`&SB2&(SLFALrQmMQ;jsOliWtxRWUguHPsC
zwpUUrPTV#qxh~QcN;9;_X%Cc%nD$6&6AW$Am5a$t_y>9#g0w+(_vi@@lmjKJRs2ke
zvN!yr+-hi)Ch>I33cX6$hNC|cSNWaqiuF;tZDwo1DjDNT|47Xf7ZzfO&>@JvS#&?O
z7hCVVzOr?YAb|4l$o`{(F;JpL#V|$DL^z<7`|+w1DYL}cTew5xn0Eo&a5xe|9nw@d
zY1PWTafd|v#KVTHu(p#AwW)Z=nON6thlcCQBL^c@X?7Te_yzFEow!gs$nXN}_lS)3
zjzc)c#=}h(tw7tlYxm;vp~6VWd%wA8CLWp+L67tF6cE%iVEP;MkrGT}ad*tq^cKpa
zxy)kMuC;yC@(>>+dO$+25F}z`oPEFe>L7*@GQwXj*EnhZArc7$P`!|*qsVi$q~O8_
z?WtV@*#PLKuu%>Pfl8RhOdCvt5WJFd1Kjfrn4*-u*90O#CLYX`l#~QEZ&p5q;)l6~
z!3U?3-!dunp2ST2?#g3j+(xTZPj}a@X3mA{ltZgi-Ws`$9Xg11ui(5usE-AykzbRi
zOQ;2f8O?AUGgj0HEe`)d{|6^UbEpiZ9=dL4pzDeM3V!|UEN(fO#BAy68pUO_jIKG~
z^^8whh?TXGpFc(EnAKr~@085WUIl~LEcGnLT3JKPf}<j8qn1cM(GKyg?0@HlP+v~6
z=+gMvHG?|nWigh@1*T!lLe91jb1Htk{_uw=v+|mk)IBNWp*(fmS1r1G33jVD5jD>E
z%|GY1B&jkqT_LuKsontp>d7Q|UC~hgK>`<;G=118Pq#8|Zzm@MdH(JvLA%h-ijTw#
zLlRlzBWFRE-{J3!f!Bk<Am3MJa<`Dbv||Zh{0%wJfPeXQb}PKSn!^OSdzYmK*|yC*
zF+6fh!`Sj(rpfAx_!Z<Vr4hQ{30?SuDintvCV<ihtL3*H(m*ezWQMMyd~f{xKi@{@
zhK7RnFZOH0Bbcv&GjZ5I8Td00_$LD}ls9g%lz+zvKP~4O7`#n}BMd?|w8Aq{0BrL|
z1Q*+1AQ0PMk;Q+rqQ5}@8FWx|iQ}|H^uG}N8ISyf;Gb;#n;?#jzvsFn_=}By6Z~g@
z^AEHCH^D!5#NPz}wXQ!2{(CMQhySCXp7RX$@hR^&`;g>{Q*a415`1`Y`fb%w7y*ut
zX=-&O2ZyVeAvHZTkxX{Uz^n})&dmIX*?N_WyYCvNb95swx(r(oFq}1H<pTMlrA)dq
zY0Hk)UFXb1f$i-$f$vgr2`g6lw|OpESNr)w%gN?`nYt7*OK_**>>5(xnld_~;pp-~
z9ySi96gHTEg@bX^Zi;A39LB1_+-_|ThMES}AD{UjluDy(cQ=FAO)ug`%|BhJyT|zb
zcxuMw;h#jV+_dh;{Q_`X=GHKLWyA2j)X(%;Psi}Kmgeo{C6-?sp^0_q=*E+Y-RmIF
zCTFFGNP(B4QcR4E2r;w1Uk3NtU%=Vde|OmPc=MCle(4E^DWpn?m?%TNzCYpzuK;eD
zY%A{3GO%KrX<t+8Ut458K&+c(S%d=*Iol!)vw~IlY74qiuvApbsijhx5b%63qdAU}
zBiBQB9Sc5x0XWbr@hhv;d#91nW<ylm%r)$g)0=fZ!$vTRei^6x<nKtc9Oje)jn&&9
z<7cm(t{=bIreqT--wa-Mm{^vDEe77A{Ic3wG;Mf(hrZ=L1z1zAso2if`zSC6OsU{$
z{B8h&cKfD`_V00z?#+}zPemU<E`^rSbNE!d>|o-{^NM*Xu^CH3<m_iXbbGJtz3Hns
zy}!izJ=s^RW+|_uml8OJbE)i0HLGw0HA}2Dg>-VB5>j@~YhSPzUmfQ=R(6Zg=Q~uh
z0dTx@)K}H8`C)fdS*-*E=6<B81_S+Pk>2i<D${Y{;#!K=lwrP7h-0#vy~u=V7g!yc
zEb-lv#}XR5Yr*p*w_ht#*ca_?c0|}Brb$;nfLeJkIXP+3bkOt+tUaIcwwGJI+^vnd
zf^oAOKGJP=lUqNP@bWOS?af;B_wK7R7S*rJ+_rFozRxq%C@OY7NDuoX%8dpp^&{2(
zubsIhN_n;#+l{z!^(J@YV$0J>{U!WB&?VBZ9j!bdGPo1)ak0{R`<tYxV)`$FOgD#O
zD#7?+@7opO&e8diTeGt0UCNi;BjvNQu%fFs@1&OiIQ|bE@GYd132`n)hSuH}o~|7u
zf_jegYg<C7P}8K#{#kh#9~V9R0m0{t*N228J$G+DHkf)?mf8weyVvK+PSM316|?^J
zAq<63IQ#<!`5w=AgYJ6a?=3?*==mC6XtNdU5gu~oApXMdOzWzoxsEzTUZB(w9PDWM
z5;3!85}d}~ZGBNwSQwPT9&e>>A&LVx_ni2~ogTe=I=)<LbQr87Dvdrq>#ga~S{G0_
zjFh{#)bVB0uE8jMWhZxA+1u?89gQ1GMN<Plb|unn;c^5yf-Cz%)6!@|g$43&(sKpl
zFBB)~E;VtM5vy<dB>lsAtaNE)VeO%`kHYLmolkYc@~I+WBM3Pw<D-yi4&M*gg-|C?
zS8m0;vI%;>%1pOQ3=Su;5bc~AUmZzLJ9BEj?g<996RiH*DgSg{$}xL@Lk1&)3;)uU
zKcQVZn@%ZRhzcI>3#PEoLX-Z}^S>iz%h5czlko1+weQk$UHDsgsOA`6a{97f@X}|M
z`){%0OlFsQ>5durwF6rsr=|3`Qkm}BzFF+y$}OXDvEs?ON(a~=NBJflY-)_PM3z%u
zTZ)Onn?H7=Cuwor4sw^$7|Ij}Kz(=UKsX_EK}*DIxIx_<6dS6--=MMZQ=->1P>vK}
zR_3Kb6;AU_KR8kLXKO!Ql*(3?pM<f+H6Q9ceTpZj=5X&TmfVAw>FKpcFj2xZk${(g
z>-*|w`ovY$<oZ9j2OV+FC%*RG;ym1KbM>3vL+nW?G-%34p^P`nC9vyt4N~s%QIbmj
z#m6t&3jH4YPnYJs5g+$nn9#XY1JfK@T8~W^SMQrnf1CD6Tc_>HtN}8@g8_$o*KlTM
zY?6SPVKASGDns*)pB*Hp4u;-~FP8_ARvsYqHTG{c9)>Dw@A!JBgqV08(Ac9JFVaEt
z!)A4WzJ~2!CB4+hw3LH%GBu=fi||Z<{VYY@?N;&CIFQ8yl=SDqJNQVJkMPP9;gC*t
zih?r2WBI!RNIBMHG_`%S!V|)LsH7m0*8SQeNY(GpE3Qr4@9zRrT1mxw+|t0nV$XnC
z!jPrVx%+b~9eU@x>?iq=q}R6N2yT1<ECWg7$}&`^<i-aJ(T~(@An6rXqYx5&O2*R>
z&27gg0U6<C?L^L5UW3E87v`|ycjSU@@Nw0P5A(Ech+ru5hBwmi^Iq3u-pwS<qJOXr
z)-)9_<+iq2*I4=UU;qqD82!Mq`^N|XVHcp72_5fa^j8!ut)%s>xrOWkjrSFPrp+b=
z3ljJ>O=7X)=cY}~$$M!%6ajVJb(n9M9cJbTUKFKlyiGP(GrvMO)F*gNU{KI3B1ttc
zaZ{c?Cl~NoO@W(SoLV>|M+#+961=AJ1AE9F8L=kl2*LIubi0;_O0w9jVffe{d71ll
z`-EB^fpyt*(74WTi}+QOr9QVf1UNeN-c*!y3n&I$eQrE_*r#=(wmy6u^vOx~$ZY3)
z{X#fKFG>+nqn4U-p{G+@n7-vnt0YOKbe=zjID<>^4uFJDQ}P-fzTICvFZFG3lo&5$
zaVuR832Po`HX+cgj`mTVCH=Nt$)gv11Dw~gL=#XrqC=BIIg0-ywF<ga?XQO%QIm+N
zw2s@azfet9Y%Fu;W-=Uo>%~dYl~E01pSR;X3u8qUSyU{KM86QxY3pMw-R1o{?C>Rj
zyq4X{*qX<PXLP*7%1PE4*){xQJbr^yvDt)3a*;J`DqWPZ&U$w>>MV0Yz*5l}xikQ6
zPEI~bRh4`q4y<LC(<mFaT`R|F;z<8$Rl^9)TLy0zO?f!I(e>)!I>{2A+LP;s8=M!y
z;O!^yj_r+=?WLuq!<7$;FB<lIE8)FdUxi&S#fUhkmw{0hBh0O;yUQ4|7e48OSuQ?L
z2=O8F^cG?va;2+Sq1(vNT{@-LX&VMxD?I+125b|=BYX5{#s^^ck7r}H5Ncw`cj3e>
z&s{M@PGG$|lE=BaJDQ30192OfB*>-geJ2F+9Zu0H7`<+H7euhx;Z*s<$}u-a4ox}&
zr^xfYOj%y_X?G|o5-YH3{E!p@J5Ix$Z=6|Z>HY~-6i3#+zy0S+XEo(*O;}1wsZHBH
zggStsR0%qV`?R)%3^BhF+2XmQYBRD46^T6OLaw=_#MnGJ$DNDe|CKHMj14hL=%pzi
zrf%1y;_F=JfaMji`^F_kS#l3oSlYSmI15riG#Z-bLJ5(>`v>O#+h`dbRS{5AB8^sS
znO`u70nnr^3;O}Md*8>!D=bV%AjOK8*#eAg(4xN%o>hvBvwuu<8S_}QE+JmV=?}ko
z{!0iMeQ)G8o2bFFT^%Z!L1x4tH@4@vY)|oCIxFt8fgi>|7Y8Kum_wwHZ&@b9f?yQf
zANxTr%oL$<Fz|EW0p(;%lXehHBZj)B6h6uf8R6_+cOp3;1noVfI;Z}5#P~l3%$NDi
zU(x=5FRMRT2e+}Kn=|!6QEz~`l-w9zTy*iScikd!E53%Dk^EypnL@25R{;RujAL#J
zhkioX^dr<iFuu?-h;l1tA^$5Zg%W!Tg+6)|<z9W41WD^Kw&?j~*nuU@k>q`5+&k-w
z+r+$leBg(0K&#Fn`R0?s`5TcBi9y2aP!>0C6e_2v=5ygtp#Z6a0y_cn?LJ9tEp?tV
zu>;nyH7^UZy~V%!3^;!VsGS5W8CN4Ym?K<bgdlg>GD+Ba4eUu5rE8FbQKd6*x!HVx
zTRf=#Ji7rLrY5@{Yym5GXr>5T1kGFTjcvym?A+Iwg~?ezu%Oe{XF=o$YzoW_yarmh
zMj70LKN`VQbH+BIw?lqLqVTDv-qNzm9E}Xbop`a7H}Dmg)HQ%tuHb?LTzYf}+1(D@
zRLk`}WPngZ6+oV;ttbFp`@hST(0ygq@zxaftUpqZ_pUG_{RBf<#%F_NaB-cN9JWFG
zI>@(^U1K=6l@R26_0OY%5Dgdw1Qh!Wpa=!yi~*Mcf?1G{CBQ4sSXr*I$)NXZSz5FS
zu~dtCZ2h4aoOOWh|2%a5m)a``K*-uEzTC2#yPRJ8$i#VS-4`&q0+o&gXCoiQMO$Nb
zB4mS5N!&|dnodty2DTYl$aV|m-JuhQV{VQ|8S*{NErAWZ-Cz5V669<5e>~hg1qu9}
z4E~oC^8W%v$T~PY&Zo?AVpc?+n7aa}PIG4Y*b&phPQM}%c1<3gVvz0`pHZ06&_EJb
zzDFbyKz(~0SX8!wf%sR15GP$$9T=5Cf9c1k65ZEiVOy(MwbB*uSIXP1dOMZAp{LGD
zW!#C+x<f<}VyzTheGPi#v%&TdhNKJ=A9%+CIK`4E$vJ5!O9+Deyq5a3*G#hCn${^J
znI6RXm0IO@>(<oVtAw{S{A}QYh);9dmCGDd&f)Cl6&C%&_%A59T%;0{y&pLcXJw>G
zG$QB|UHk9FnQQS~i6`|)XSxv%*t|ebB&Kr4H}^DkH`S;-m3^*O4ptTE_4PBS04*oi
z<y8s5tEP)<6lDGZSptP^^n5>*j{Jk;JUl)FxSUHC%H?828`W3W>_!&|3Km6>Uo(M`
zZn5r-uzll1g>>%h;u#@(@-uc{eW@5+nC^+M2ABpeS<JH;=rr>cTnipuqfL7U8L?e!
zF9aq#kiAnd4Nk-8^W%EhZHBNhbKzn!2=eAaXx09+u}4Hn=2>-Rw-=X@(vXqcDrvS=
zYr_I?%AiX5HQPD-G|n^&$m`<xI<MmRZo;pU65pARPAtYazwSQz-TD{Qx^#rMbS_3{
zFSc`4I^cPVN$ibdoPOlcqs$4_Ed>(H<WxKF2Z;=sT{wO!lMAG?sXN%?;mfNly2cPR
zqy0RkftU5vmy#|Lc*gnHj`%O<4S)N{|KC7lpuYIHw6h({)$O}S-<)dYGWxNc6%7IK
z^VAd5!{%BwspSZ^<eT(NcHM=q@Q9R?h+bD1ohI+1K>SkdS6!$KO#6HOn4XaTc28hi
zIkzcEQ7K9c5{r770d#+7!`{?J%YQaRKY@~V#*B0B#?yXVX=!Ls;b4|!W3ymENzBhr
zCExCHYe_e_ACxE{800k|Kks=UnLkE;Ejc9-K6%SEA1GX-WH`2KT4B*J#LqKv{d|w}
zo#nRNe4NL(Xdiz9N*nqnlpzV*)3N<j*OtdD3hy~bySaO4NwjxaN4O=;Hp0T!)yAd$
zDLuPW;0_C+pL@NGO`Fuc$1gP3;=EGZBp2l!;I3_VytV^JWJK)MtK<^zEnLxd{%|K#
zqUk<mmrOTVId5j~#FRL5MT{mvu0dOTjSXjsy8?9ijjLIN7SG(B+3I1B^h)b@uZjY>
zZQlyM+s&AD&-Qcjoe=ib3w{SIi+=L>wBv5-@{yMQJPUlBVX!RMF>EoE`>FDvd`*e5
zC>8X8=_danXb2>TnUuOuMFBe7sZx4(_#01rde8TWih}e<JcDZIzSm>uO4HI;Q>&9c
ziK#Z0WR1f#k}*P?1-Ge{bZ6yFR|2Y>Yl1P-#93XHtPkX*y{@e{c0D$NRlgX2UL)4d
z)8Pmz4djmgVU}xXI7@Ni?#M7H_CCUzlQ+xZI)dF){6VLv_)cY2=3CoFpa*I<tz*H3
zIvsWLO*T2%B=az9BizE)CNG23Bqc&Wrd7zrb#KX<#;fj7dzB6cWvI`SmrX=L%??o)
z{ZW#iGIRR0)L@@%V%xM5r&yYdjvnd4<bQ8(>Y%eB-P4;-m@j0VcJzz((6t{M5WW(1
z*NLE~;=p*s$kW%Z#S}J5nsB6vc^H2F_N$rg*9JbJWd3cPaT@NI`4H`W<AV1b!XN{p
zQ0D<}W3~z2Eg4VV`KB?tupg!lF7)E2ybn%NJ&T5`hl^;G(#m^DPRt3{2sFFMf>+-3
zCji?gf>c!!ef4ZRvrtow>q_&RlMU)$A~W@gAV~FaE}PgcADwSTFIwcG$}W0(FxH>s
zc<t`-OBRN}aU_>y&Ysh5Gzig!0|PUGX*N<~#b!K+@dTo50$*C&sPyib3ky$mZDgGy
znPUl{3*zBfP0;;4Bzm51`IVLo{g&afs6T?;=Gy3vro$K!n?FVkw_+_=<8>2Nn;zXX
zuaE+ISKH^)q>moX<IEOX40&Q9EZ0}6S4L$|YhSRRHer{=Sz6s)<+Hx~mVl>C`G7~N
z0A~oOXx>fL8^qen!48d}a_LW{gvcHzz4Dm16#Rbf#o!9txWpMfUPVwb0gs`)f?_9a
zSL7FU*C;@+FL;Pi=yMU3(oE@6miBi4%Xa|D`wY|to7eQ|F7~2vHHhG0-GgEGcevkf
z?`s^l*R=6!>_r-blDE8?KnA%s*|@pq;+(#x5y>KZW0!nI(R-SZk!(_H5pl_kZZjRM
z2uj#Hw#K3u{Gke2V5iNBVk%9TzKPu4Q6V==txvF(rCCUy)xZe>fevP%`-FHT-um>V
zVLeBlsXn_<VH$0*zBS?KeoMhwVvlhW1H1QL%S|v3Wi!g^%>vyx$YAS(pG6eN2D%tL
zEmE45f758<hfkn`P>_n(baENh(xYfI15ns4F)N0=8~)`&!@^{2TECHGHJS4_zg>lH
z(C5cHG2}_ZM)SSWV*>~ZI#zF9b)@DJ|1NJZ?e*5sDZnrg7WC8|gGh`>@aAX$fBu4>
z-#`tWX<*lj9H(Jz6b8}Z*Hm<9;+I$W<|Bw`Scfc)YvL5glUzk&lMr^am3p=yC-B4l
z=Dc^Pk=vYjcvp~@{{=8vjdVs9`4lb}({N24=X&=%<?WkoYu}t(mt`^*rQ{E()f>o&
zvz#1`Y=0RBhzZ*5-nu@=+G(sWEL5naXrov473D2r>|voRzBPY)=qvyH?dUIjgV93{
zH3NA~^reh5KFzx5UjI>{vd>kB)6LBu112GOL3z>-DkYKq9<5XD)cvjeqV)A~A6}ut
z$}NMy1$xPX1H;w4)8|tI`n1>CCf?fni!|j!IY{Iu?9yW2)0>5TxkEq0r;(^UvG4eH
zJ`A2UdDZ3s^HuYEFipf2A>@AG2LViCZqg`&_%cC*^GeSiQ1NlKx7YGWHMwhQoNtJ>
zj!)j?NY{zQHp2Jwiw~fuO;wvcx2g2ML_rJXzaPUo>FWF}5`1`<i=j%!R(oT=v8yEv
z?&KPH84F8RG!zwG<acDYN~4?Z+xp!QjO6kcl0c3mg`R}aJO*I4p=4pTC@Jg%jzrwc
zQl&6{EuJ*YYw~X2`W8N@e9mApO2hjNo;ZvGZ|_tJK`-|kvXrR;4_B1s)#XZL%%A@U
D*!3Pa

diff --git a/two_way_files/figure-html/unnamed-chunk-15-1.png b/two_way_files/figure-html/unnamed-chunk-15-1.png
deleted file mode 100644
index 8e220fa6df86ebf22375f181372010f0ac203f4a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 31651
zcmdqJWl)?^*DV+$xC96U*WgZYXcC;@?k<fxG}aJYf;Tko7Tnzug1fuBHtsf^_q*Tx
zn7TjaR?Uxlhbrnk9N=Le-FvUKHerhLlISReD6d|<LYI~jQ-1a8t@Eo_ZwQdyz<UBX
z&+_37vV)Wsypts4-{<S-?K87iugG6Xi+xjdPdi%n(o~&o<2e=oeo^4NwSSTJWq&d6
zLp%XyjvUjsjiJzAQw(%Tn%haioB6*TlwOO=-n(g=$V}4t{}?cf@#HJ;93w<9t9*yP
z!KRNi-i7LT?Z7TKK~pvAEdMN(5kK(I+dhPLBvb=5AAWl9xHU1n)~}iK8qQcPt(&zM
zkBE%?05|Z}t7xIElYe7)^)>XXDe}Ju7xL<N|5|=5t$#y#MH0&N8s7ZC5QF~v@+%^x
z%)d74ZS3cN?U-L5_P=)Tf0tiJdl!*SqmUc6X8FbA{rspuaj+n4ZJN!A$IUZ-{=!&@
z{R3enO+^p+Cc>L&o~Y5=U?Pg$Q?~c^q~G|sfL1oeObowPeD(Qi0@)(|l%H9DNfCUD
z6K}gJoR)^)lg^{i=iuhxf8Hr#T|v(N-p9OLU4fTz!OdgTU-nr0daS5qSiT+?qcJzv
z#%@+#kok@4X*&5puVm{oKcC>zH&=ZGp8irkU%EVm>HT~k^JV@9wv2#_jlF}7I*{a7
zM;8a;FMu!;9CCa-1}_BkORf9V?3_H%<LZ>-cdgMkW)Tz$d}lwRfqg0k`y@8gB?_qH
ztU2dVm_}A#Ft{PSg25;uh|{7R*7Bk2@hjE|NQTwX(UZ=MCC<3ieC^GbP`bajuLLZ;
zKM%ZWuT-34Od_wo<lKSD!D5Fs7)+`}Mryu(RLNB;;KO7@^XQbYvTd2a7n-wKoXujz
zY&z^1+7wMn;d&HTDJ!$%(TP^5bMW@|a^IRsn`_-9zNG$A;8|7vO#X5^=R;mx$Guyx
z$J@~M*;=H0{{cfq#jdScb&<sIxecctac-xR(!=4>vi(v1q%){{v&|oka`0>RG#|<*
z5@A$QV>GT5B>ack+GCTR9@U_$S~}dKNC~5e+=e_#mu6-?UO*t<Vy9hUIX4l}PnDpz
zd5X9^gm;eRE6^Iior_EUP9T<X`><Uxm}06^(vgLPEVVMk`stA~Tva%25sSLjBeZ_`
zc^IN?LyUUz)`p}b)xoSvh!=1_ac~gS4QccLKq-S{51(qBY}w6~BP-jwTmd@Uw=!pA
zqDtPO(aiQM=s|-WKYM%c=joo!=;|T_1lt;hT^RYRXjo>_u&fi!c$XYE&d;izM#yLE
zt%Vwl2=2yy`&KDwB!-c!;opu;9NK66rqcD8o(>VKV2aeW*}pougz0K7Ei+nBROi`k
zl=in0#%e*9E_v1;egc>~%>ikfz`r3w0hTQx@V#wP(*!~G8=7}&V{=)w<K|`wb8ZA%
z<<?Lrbx#ps$Ye3BMPVx85|NOSKi5pYU!1!;%U;3G@4`JgyD%epsbQI2s(0foxc3Sr
zKOHHBoS=2>EQOq+3+M~8{u%m-DA_0{p57#u<B06X^O6qu!NOz*``ERVboDllcr>Lp
zHHC%`K~2xr?b^oOVcn2_NmS1knqgy6u8xyaPd|D=?{yB`^rWGSjvlMDbxX83a${XH
zY%k6Ao#{@w;2N*5sjvV`*DXit>Ek5<XEcua9XwuIH5>2+kd5s#eync?Q0+Ez`lSAD
zs&wBDpvi*INADjUnLKH#YL~vcfPEXxGWBznaU1TR_?s}I6`sVGH30xOM6l=h=<)4u
zOB(X3fku62AJjVajY)~JtLH^l#nGeN!r|lTO%eM{@fDx-+zVsdgH75ZBwLPG!f#uB
z9kz5qfhN7j_-y!iH#aESp-h%lmbsheT?;<+DP!Tp4Ha1S;J78;B)1mLj!#h!65rWN
zG9f8mSLbB1y}-_H9m;pHFl@-J{jrD|!L*~k^KKDS8`${m?a)F7S$`$D>4nz)Y3n<K
zYTZm?;@#CbTYsm;0K!-Jc%JYRE(VR~4WpyZlrW|5yb7><`i0Y^yy%VQ$y5DBhgD5q
z$mpA^cTb45)q}1aPCdjsBvgImtfqW=3HEgk-DlBv#+|($ZH<#LjjRYmFY^mn`0UK1
zN;=o%X6Ec$ViS?Ki-QeoxpD8%yw7t>rQ#B!1$lMe-#Z~GY#s9Iw7#nVdSco$J>ACd
z?i>r&=-I7a&He|sNhQ-(b=qZWCC329d;zSy74i|g7iVoyAs0wFZdfw0VZ{Db=KR@m
zJO+QE$cfeV;KhcGA>SH||8)LO)l-z!&DGTN&(+(fM_;4tMvbxGOAZXT5l9mkGoc(&
zwo>a!Y@J+o#Ii=6RkvyS-Ep$OhSwf_+;?SS@_1JMhqrX$krKJ%a~59+du@VSJZ0j~
zl?hSR5(n6%S)*gwP7J)QYUD)dpXe*LxR6sg1=!Urt#Y|?4f~jJ)><x%Tlylvr>5ZD
zy-Cw{SMR?dM9DrzvANu=tz9R^$?unKT|3XReBSOx$daK<McCLxvede4B2>fKn2nBX
z`4d>4TsT-JeKmKyzqlV5w!c>rleOS~ucMiQe)QFZMDmWZ?O%bQS5%`dtRF*xGX>;f
zf&Sc?j}-S>M^_ida_<2?B=6k_-mjN!P9~Udor&kl*~YgbtCiXE@U)Y6G{1H=LjDHd
zU6m}INTkl2hW978oWX*Tl|vQUi?9G$ANW#tH6|+R@c+%j#0mAh$@kwH;@?Y4iBV#s
zzCCK4D?Rzle~?|-1Jgg?0;NY2l~LA>TV%vwl`h+Ga~CiK`s+zc5@F#(#{&A|82E0k
zLmcponzzVgh4tRdQ8-W(e<1?5WV!q%Bcr!dljK)NE^SN>{vlZN7-RnF;@qRET#L1>
z_Ll?R8y2@4y<9aqWuiz4>uizT@=E_$Mn;RE$)N5KEUgLhRy7e9+`d9Vz9i)q_jN*c
zAEYJo4`wGQahsxH5ic|SdOBa4rs*kl3^TR(>QI;5w!*&hv%bFm%$|i2HMY&TyG)?@
zUpAtwr<(poQ+~(JgHZs{3v}JLfV(jfpjq8~@ABAduy+!nUF;Xc!I<Vt<h9F=x^mj1
zdF@pWE0(4AyZL6_Z|{c&iu6K#@E-PBk^V#lBs%W5ZQ`_B)yl7C&Uhi`wRmr9_^$+g
zmgPJC{hsfLBaU|{??<Vqe3K&^iMd9VT&N6HNfe~ZN*{l$w^u8JsDDYwM?qkh8a<3P
zF5&%Uvg^z#IAM4i)7wQqZKp1-4*_NXe>ui#CI(^VDl5~M8x%tLTE@!On`IuMCr@lU
zY#K)CO!;*LM#}KXu3t>^lpOKm_4W1wRvYz}iFb$+0p-=ufm8G0<4LZ2E7$xV0yPto
zeIbZ_3h=*>r^5Z-sYj8FggA8um^wAt&j5Pu@So%J)l@n<qHdkIl=ny9L=+LCiYLCS
zYu%(xyI@lZ?cmz5!rWIOfQiX9-)6q-l2>Q!m5YY~$O`s&<SAr>vc<``ixgz6%g4P_
zb3wUl_U2@gToEH`k7M=U+w0+n6AZn~<BsCfKbr;>VFYBt-_J0g+<dQiruuz4$EUZT
z<;~?SmI#s(uatl!Qlh6_XPF|-In|=<f{SLByQ3Z4%M4FXaA{bBPw_CeI1i7I?zUdt
zg+-6ZSmkc+rKdCRwKlhJ*92_#xRPVBFd6l&X4~$uH)t%fniZ;Bmxyb8CnXZi%*QDw
zkv$}xDVt}<*kz1Ceh?7c;%HA@oSJ@U<MDIz&NB$d%28je=wViGJZ77^)nJQe9J6$U
z&3Hee@(CATB3vea<ok$S@+X9tEFGU4nCqLGb?EKv(6yQ##fbL_A8!=CSRYJGO#Tzs
z{x<o9j`%NP{eK(ae%L=jao-9c;d(9?N%Gv8#=ic;lbd<lKx4Ew(fwMaueAyCs2A&S
zInwPF7y|@8^{swHmgFf1e??M~yKm`W#Ez1^X;(l}V(d5viFZ!D+!>{Gl&rnE)bbw;
zto#={|Hk{@Jf!~rG#`k4F8|FNkzJ6}D!#fn_*|@R?Fx_bihw|x5#Cn8C@X~aMwk88
z=KzKBXf$Wv(D01ACo*dYWLI#<q2r+;+T~@NRU@RrxkGYPHohvc*6YUJz@_XrYt&TY
z39+N<PPprI#~q005a)CRU&8#DR;w&m0RN%>YtNYKmFJ?53fWBy0|n5me<ue4g?}0e
zO%^1#-3~4A!MX8jW#Ez1Xy%?i_MIqu!yFv&v7+Hn?rG_y*!_6m%1peU9X3OGiRQ`;
z^Vq!1E}3my#Q~PxY3=uP#`m*)R8EAR4sh)*eh@)QuG{=BxsE$)MKH&N*f31j!RWj>
z-@J@J^K5WqVAI7WynSjWQk@zNlY^EkHyGWt4-P+hmu(c97q&H89uHyJ-etnT6u`lj
zsQNyDx7(`sEJ_{P4FO?PhP(3`$4$uGJnQI_*>kn{_~niNk8q}B!pQ2p*=yFeHjK<R
zd2>bYJ1?^OJ&a3zvYXl1^+T$^K^m(m$-ff9jl125+kIRcPY=8pq2^EKBR9IGefWv;
zr1Y))HZPL(zZ=Y1rb+NvPiww~7@0{CEkNSyRxuGUj-@B!Q;uHD4;JkQ7CQK{ow8g_
zq{I^O0_<Gx*&kl2SEr^r@{06y)W#KYw;^vNt>ToqBZa4)JXPv_oLlS5@+s783Qsxa
zV$L5c$`@Xa59&lUG)O$nW>O%>YN$^t%rS0Y(Sh|r`TD!Xl_5E^r)%HCj>V;p+$L`;
zw+lDKGmEkN+o->l6Rw#VUaqs%JcvgxybgE6erEOuz>fNt^dqvdMN}l@(s2jTAn=+L
z62$>;egF^%ID1#8@lt8F-&Hx$b5(K=lwWak>|MtJ4){J~TYqeFsrDApv{Z@Y+%91S
zQ>aI#(&~Dp$FNT+u~D>Mi2E5E<*ON39zlZMhu59s1jzFNP;f5~c?!2$?uDCGvNSa<
zTQr(Gx2*yRt12fB7P7aa?O~T@;NMNo%_PI}+#gUG%V6BVj@s;0r?STr|NeO+$KfUo
zXPS4R>WKz}$+M62Wo<t`eg#8^mQ$CgT<hjFOJmNC5CyF0+HQ|mN!K=K=v?)7{Q06C
zpZsrNtAM#2;XiJO`cH$gTaBf?#79Z}QR<5@*Nv}({yZGJeWiU*c0w;_Y@BD}ho?7B
zi;~)xM}{|7oRU$pj8zryn{MuCj{;&y&olZQ-FLg+Brg~najL<t4WK(L=0u;JeMXy^
zu8W@bbvS=Tjy#BieD2v{*;do@Z?}&u>Vo#mH51EtK8S<@^crkxb={(~1rW5Y25&1l
z^mWWgp6l5V8D|olz1n;#nOto{F);XfR2%#-8G&W<MkLRqgf>f%5&@S4ED?;h@kU3Z
zj5MRO{-EO<RFV#2Vcm9^W+-|Pj)?J$-HTOOE_&(T?Gk-QU%FPW7u4P~8)H7r(U1g{
z8rPY1`@v8n(ER$2j|h_G3UDqyjqp43DhKZnz`>+Xr|WcIxV2v>?WuZ(KSpS&p}~|$
zV8`dKPR~n)fk(`%760^2(P&)ZbR;I@w(ucM_Fq<|2cK^RSnAj!G(vbcsc)9m?S9y~
z0~_=jw%cTU*WDsK&t$(9IN;<x>9=`~>r1fTz*<4+75(em+#odoUZR?!USglxCM&21
z-~FV<NCdv^5R7otIf4teq*9FX84)rn7KWBJi;6kiW-p9BQ;1a=nvBwxH65`^J}U}{
zmH7aGMazXivLctA45xLPzE9##q6)KiA0HO0&b6Cvj2hL}`jR(~3auYue$e-+Ees~O
z)<m8ubw{iP*PIbDFS>LDf;YhH`aZ3Wj&Xf6XN~PGdJi?d-kHh{T_LbtOizg`)XB)q
z*u%gUB@#Q}`;8AvX@mi|#=D>;Uw1WTdD|wngJ5Bvh_O)J#dg)&S;I_L^<V|6Q9W;P
z&q^e62%zg3y2fQ0ITb9W?wW9oZCPF0K0awRa`rWK=?qo@Ds&7zb2#K2s*K*e`9>}Q
zZ3pe+&7L$GH}9p#uMQ4)$F>AMK3#atboe@+1^k<yaUD(wt@MfOQ-ID*k1%5tCRT0(
z&Ce;*5f`q9wR>RZyzoW$=_)cspcvR!giGXub35C9f8(XC4c4!L<&4~OTfblo7>n%m
z^$umMT~_y%q!SWFU=sH%$X%W5r3!f;L-q(Gf&q|af*H4ei}3RX#gwJC68IU^HU}Em
zsxEeioA3l0s%H4$|6V|$iUfN2{X(1{ONASjB#uO}wV>y*+n-%NJcx+{zr(K{Xtac~
zvc*G@3e{B`msM^X+LDiW-M<If6>q6iojfIjTS`401Nz!}Ie8o(R!Ba%)sVj4S7E92
zw!=<fp$5oDE+=HNoz08?Y^2B^+=&)iMSZ6q$wbf-Q#fux=}su8AL*AoR%6)rGZg-T
zRRGUfZjY@$0Y@j;fgV>6_NpB(!I!+}Cec6ZoO~u^r=oYm<>!5D?iJ=4JNvxwPbPo;
zqHd>I^%W$hlqqQQ6rQa~ikUP&Du3z!vWnMd01CC*R-k6_MdfI;8+`3td7Y2Gy8h<4
zHb3Vj&)A0sA9>)2)urTXxArF8g<-shA}c^`9Y)f>IM&%6-x|d#-0`x#d-K^7i}|e+
zt*5}1+jy~PAeM;v@f;&wcQEhzNZ)+(n<@(hJfjGK7QWtbTWX~u{G?n1cFB&oJp!{&
zO*nG_D8gXc>mo(M4NM;WpKvE77pR<Ea8j4Nvb<QrDy_o6<q>T7R9Z(HkuB5Xy!!JQ
z@L=e!xZ-}BN1HQ$+>72)L;awBmr|NUDhXSCwgq2tRzNF-OAd9Syy-wpfM3+VoT8UV
zZOdfxr|mc7{U#IQh!_j14BQ_4>sW`!`XhBmlb9UCqEiO8&0}T_q}slUAngN|y8xPX
zXp?`tUF*mU$x7uf96a5D`@WUppP{oMOUDT#$RLTHij|Y=;{>YUwDXq07`WrkkUMN&
z=~*sFjwAg(`S)&LVE!j|pTp`s{&zADPvi&AlOQ24)<(hmQpFx@5hQ}Si7}qDdFNgD
zx*v(Vfg!MCgf}N*P#m0h^9R#~^cVg%426HmC;s5N0+i#eC(<&@4axMTD**Fg>An3{
z--o{b0};0&#)Iy<YjDZqWx9n^$$c`)6EXz>Eyb*)Cy12J09>uJ<KV5Rm^Tfdf#dQ*
zC}*6fUm(^F21vTu3}Zuw8JVKka$H$KE*<Zr<BcR*9lx9@H&L0@;?^i73R!^tYyyi<
z{GpkybM-lGM#9Xg1aEY}i|q-3aC6NpgcWDhSmnII8S!RR!=bHkewgp)5;NVavq_L~
zf766yTs>EZb$UAZZaIp%#CfO9b0Oc0-?-Xf!%hn9yx6LtkV&+Y`3bi8V71TTmNMeJ
zFnmFOgz(0G2%TpO*(hIIr;L$t$8HMvNwhoV3z(H6aBuQl|I?;&Rv~v(B-cV<?!q;@
zwUbMZ!ztVqwkm=@biQ+FStJYEp9}B(%&9K#`6w+Cj7%}KYY^j`2$|!6@tA2(<Os8i
zlpBCcP7ic8GozJfKSp#ELOKMTZv({^Vh=S|weLYr=ABW0zOyHvGqK>Ks?wPt?^6XH
z*$WvYHh;B&T$IVFTJ7-Qaq`SuQ{`_}8bmlTP&@_3U=C4HPxtSUm%Twp2><NX%dNkt
z?&l4yUt#e~JJj78(sp*L2)Sb_n;h*v*+Fxhv0T^y2@N>O_ZDC|adHb4diDG8-%TCu
z_+t$M`&TW#j6D|IzE518QXnI5kY|Q~U*TL|+0cGoOj-R5?`8E;5q`eg#mmH_A8u>=
zu^9xA`AZL@{#7#E(_?&COo$?GmFrlVo;p~>S_sO_(*Qf}=VfH_Jx?-$W~Utgm^gOy
zPuYEJaUYiTK9l{^^-kjPl0*b4OutIiYX==xKYlY<tAmr<1e92r=+DT(kk4Z=r`?Mw
zC>05iN~BiNk>hd}kWzsMut7!i6il&LB7%o}Ckq!S!cVQ#k2?X7!<NB2%Y`P`2;wf{
zq)?OOq`V+S_RKl_Km=l8r#>xQ>yV{Cr9AD=w;yh6!jeH(^DNtO5%O~yZQxmF%F!Vo
zEw95Vi8FbFo9j0sp*)l_fJ#*jGHf}__=Uc1Xd5%|t#Iw*#zeo99a_q-L%IrTde}<-
z0g&M`=kSYu$NkKNMv1S$bGx+BRr+3;+2@XA9N=-1HxrAsM}Knu_!0~_VsQRF;cpDv
zw~!-+S!(>W26<VNkrVp9&_yOE5XKmr(~WuS_m357-OiIYa!>b{xMmZ7#_mI}y2zca
zXG*)Ytg(Sr&Yk_!)*(>g%$SKiABXw*5sab`V94iv*rpSxW!0!(fdS-8{Aj<^q5|wy
z7>>&1Pkj=7S>8F4<K#f6m^u%d1{s5{RAGbim2M~!v^MU!=QGy24jy-PIJ>6!R+cPa
zYRl9;r`Ugcz_;0@ZSFV~em^iB#O7mZnzO_b8mRVEH933QBi>F0!*d!`BeTmH4!9LU
z4kyZ26P$mKHj~2^IL$;(a?7I*!NdSZ!=+|`W5+r_eQ%)xP%Z`X*>pzmWW)a}xi}p9
zLSpAK>+S~JIcz~NCE<;Yx}^#k1vM?tVDvPqo>I3Eb58~|I0NsW6UfpUl%r+UzzbZl
zqJ|~Mtxm6uPwP)lubjahfjzO#-<>~g#WHkGDWXd8!z9r4IU`Hwko*=B=wse_yb813
zYVMscPpwVIST)#w@EUb!yrNmZe`ms$BqQ6o(p}d<dal=1IUGnH-M`WaqI9d(k5S9X
zZ*sY})|K2lN^Dp?_`v_|CUb}X8)AyaZfVC?BUUVTTRV6AFb)xa2mGDk7QaPHkC$uv
z!$Hu(CBnTiaoQ4~FC>9+MvY9Ll&3$1{>jT3nwX~5yImvbnAM%I(t9%er1a$>^iD7a
zv1=4x;{0s>HZwx#^{hJH6gqLNlvgs`UzQG@I)XdnDCbj{+AIxXmJB!J%7>!?&q=om
z+5u@pyDG}1{S%m~0}E!v6b9xS)#65TM)X?=5t+wF`o@mXfW<jShm;!I9CK|*KAD%b
zy~Ssl#Or`5m-5B)nXELHzwHcwuR{Ru>vSG$<D5HSj&J2&<bX~{(@^|y$xYgY3u|Q#
ziIz6L5t{K0z(z~&PsQG+{Bp<vs`sPxwO@dP+z1mHV`}~nF-~jw`x{vw0@7JevY_HO
za^VQBLOqMNS`60S$yozJPF`7cEUwit7ZcyibH3u`ZaMM#8bTkZ;yCGhy%5gfW6)Xn
zyZv@Xe8zOYkY5*rIfP%{xk2;U#z>LdY*dp)*F4cAIsMuM)J$~uMbvbfu@<<f3CVxC
z>s;N#BdIhl5NoNdt9*AixG0Vv9+BJ;YoOR$fHT$B_B(iX1|47LL4YoTD4NB9bk_xN
zbu|j05)*XT0@@CGSsESNpXL8RTA%oYj)PB=8lWMko(DUUU*<bQ1{^AOe#wt65lh}5
zVWZe^%<$40D8i>3qC=#IBupYXvKlnI?)Ty2g&0NWyM}dV4uf`|r6|}w_qusYdS;*Q
z93|coAGK^(h?8>OS&E2o81R$KeD2G~QDBI#3Pi)I$8mYaTv|c38Hd%Vo)$&DeWv-Y
zlqkOtm>}aCLK2ej0tgrsvTWGOWj2~|yTtweEz7Gdy4*GWe%QZxT%rBLi{<hsQv;R2
zQqigb@)AB)R|=j1Z)Yjv@ZU(nA|F^8Jqz>=HKmG-XJ<d$S>AM;5~2lpapPjRARDb-
z(z|T%&GLT}T4eNA>==#9%n-dS^k*XAZvquHpB}JL1jfKGu<4LpUi8k4qz(78o`;6#
z4fi`qFOezt4QSsRK_(*tQVNMyP?(M*u+CJOV*Ogq>a|^?NlM&2(N{=Hm;Esg9^R;4
z>s-iH4ufaPW;apL$F_WR>pZ2beC~^Escz9&6uGi3sfO%?LsTa-G$9wX>HI2?K1(@-
zc;BZbGTmQvBfdN+<P*w`1>F)P5zu%n5T4kc>u&k{tv?p#oW2xax(`_%X(9c}G`tip
za6t`0K?Z&8k%x>E2i;cOrI}V^7=0t5P<6FutrQokR%Pnn5*_?<rbe7hh<+8+L4R8r
zbW)}|+n-)RH55UxGSA@{o5~th+uA)cpL&<OU#%SPd-AX}^ta@GHGD<l&gdtbhF<6g
zTDb@ImP9dSip<?jG{o@C(l!4)TQ!`HZ|u9MlhKu!&KzPFzYv3d<uf)t;PaHFCQSnK
z%=P&25zEt9Pef<a-<V8HG*Y!S$zJ*!6%FfRub>Lb>$gU<gq<g#=is;mA57eK?X$3+
z_EqqaW{9qLE-cw${Ex&lT<=-uXqN_*OWkj`^Gt~r)H{?pY>wZotIx{+O)}{dE(fY$
zPu|e>v)Ngm$Uhi@$QN--CI`~nn<^MKICi<iede)*f9-&JFc(}5ztXw)M$t8J4;$H8
za}-pp&e3LMeFKf)tZH*K#yR#~$nC?-e`^6Uh8YCRlATRM3}(7NNv>#XuR84mX06>v
z?W~%#4_hA~SR#EU{n~c^7<`UdrdR!oH>D*4K92jQSDc8qpE+$!x_S#<;uRQFZ>_HE
zg&##i9p|kyacDn3P?7=NlhT^wS`dJ~p22d}mlQpfTzuR=PbvkK@rSD9Wyd{XZ8i)V
zH2Y|1vsuitARpxc8g4Y|5*KkNFO+3^MRs9GD*1E=JvZknn=!g{GAzYkcH10=A)}^d
z$3|v@DXVq+2DIFGT>_ls24QGlsAITs;pTsKkRItTB{|g7U2}|S>INhgAocz}w||VN
zE_@mzBE8zobhJ)iVV0S%&wj9<feJf;E9@50SUd!h%XA1SwOVp<G)|?1ph9}h&z*&x
z9X13oofnZPtkL6v#0EpqWwn8mimlYe!RHJ8;~KOJ1$19e*z|;?y0c!iTXwORmtSOP
zRTcYvKH)j#1WjqMsr?2TS=clQiO|EJC_;v-y7aoup+Gb-vU<(80Cu?hP)OPXKQvTS
zKZW945Fjf^|5Toh)Ct@5xj6`LAm06w+N4Tr;%xv0>N9^J_2s-rPT&yYtfiG!v7!t#
zt&4)ie*yyxKJ~x%MoxGuf3o0G^pzgt`l>Jg=i9&-4`*<-YT>sV#pcV_w<5K+LxBk&
zTP~WmTQ@<NwGo-UyApozNw=wopnkWz2=FwxTx@kdBc<4y*AhPeW8Gv}X?;<%biWoi
zL(*a(z(Qm;Yi_4@22b`WJZEV-zQObQ#Ftr=4#(rSBB53jtLb*q{a5Hm=SycL_5%Z=
z{q_n4@Vq_|qO$B1gNjv?8XZ1FOxDy+5u`(=J5j9B&Hw^wk!vKuz?pD#-Di6_kpLjX
zD(ySJPE%vB_#%JZ$iCNprBJh+T-D;)v)zfC5qG_`F}VqkH0@bg?}deBFQ#Rb*3!M9
zMUf`Q+I5!~uelu`fBqyxYw5V@0A^?vL*0Rr6`I93!(`OVFdq9ou|&5mu`uS-Tg~(J
zYJ3eT*vB@1eNALR#5*QrC9^sV_s^x5byH5x(+puRa9C-2``mxo4)>Ro9TrE<Po-_{
zR4}&s`*M1EH4zCH_L>=zLn1Qu0k%G=l`|3y2|(NSDvH?f5~HaYKBw0-BM<zC@8vJ6
zL7uhq#?}n*#4KzW51ElfX6|O(XIz|+Z#0Z$dT&Ml_nCIV<&?x`Qd66DiTa{gl2u)O
z^Rf*oYF=gBTxrx^fwVIRW};;Sjl^PWcP@~oT~kB-oCvhhbYk{VHIsg_JTyf!3-;u1
zdRAWC8|SN%B~SzF{-`uQBP<~fAH2|}IoEH3ZvSRd6YB(9fJ~0EnOZ$T$Nqd1Z`ML1
zqH*{@<lEsE=S|z^L3g!s*wI&+fFnl-1yogPo=dhJ?sRpt3-%J@8{>$pen5uahtPsN
zRafu|sM=d@gXxeA2RN*)@x00dIQb=a_N&*ix$}es`uybz(Z||QiSwqOxNW|bU%;pM
zD*8+XSfLFrKHLjBPo|hV&rLiQsC$_)vb}b$nh^%z|0jAEN_fykWz-U$b2vCE%Q&7N
z?H;LrW_P<DT$mJk=m6BoZhUHPz{lDs8+S0s<|4#kL2eyCJ>8fbcc{eA%3WXovzxna
zxSc!h5c6Z);UB|-1gBa5kJ1kPPl=8wDPN7>Dx<C18z&5bbs<!lm!OaE!HF!*%_Vh|
zkZXuxO}plVh9dcD{2S}<7JoYJzZSgz#{Yk7qmW?Zr{gc+*;O?p$<=2&|I^#S3gHVA
zxz5SDmDIo()9IThID<50doMs?y0RqwTrS1yxw|3c4?Ur^xO@J1R`$tP;}61K&HvQC
z|5Jon|4YWN`<V7mSy1wNyf4%tI-ir{;)>W*CJ>d&kf6dP`S2lo+~V8{En@TO@hCT{
zd3KlOvAdxo_4gCgWB1ZVE=d3^vCoB+xstUqYvj{d@9*9Bqg;5yGG3Rlw2he_mf~J5
zg1lRsE+2)?yK<v#_FdYy$JUyd>AAV2lM~fl>_YYB-pDCDg9>~P1u9%`n}2(ecp0Q}
zzHHlrf&4e{mXGMU<gZ8>>9>IWa{9h0F$U5N9}X@AM0DH=jG=G!r{4XH4^nb*rw1Ft
z6A$lMF?F8X7Vaj?$~2B>U(#-)Ebao`v*%mXvbr7Egy|<2rXU;_)-8XJRe8npN0l>a
zsOnvU*{8NFDdPufvBCEC6~j1fZEg2)U-CIbAd(jw(x{Vn_e&@3Nza3jf|3)R7tbs3
z<ez~{GTI?#?q>Zh$vRY=g0f#r_6BRu26ze&Fjf>(F@7V%Uv?`vqbv_seuLnd4n3Ga
z<#s-hOqvn9gTF=lSq5>-#==t8W9tr>NYZYl0x3y+z+m!vp7(IdnaFakaP#qjjH1@2
zdD)JDloR7gc=X!so({JU3wC&*LrDOjDCRIB0{72vg<-=hQ&aZU&t<Dqs_oR=oE>g~
zJ&Z29z0lM&8&2=uc|3~V3%J*Rs2+UC+OGM<<JEvdTqLbbH#vA!;B&Yt`*c4%KhQU%
z_{gvg_@29-(F2u@lt@<3IdN@NssPCCmyS-(@*8B<Z{!77m+l*$HRz$T2p8+!8t<zW
z0asT$C@GEt2D6(zMms1yBH@EPLLT)W%pSSI7-%rEludrN?ss;*J3aS^%$|1ks4x*d
zpqUjW5n?`FvQ{zRh3)Chq`j1}-Gy@P#qal0V~BV7IEU|&*$4aEv|U8<r`zKwThu-}
z>#-mfSllrk46mgB7vCkF5#a;&l)9d530nX|NxS|Ttws4R!OGUPW!{DqCutb&BU8NU
z8^oluedF;={)9u8{&sEKp0r(!zU-U$!df*TkUo3Y$|iL;?>|$vn|}v@PS1+Yz1oIF
zifhm5l5ZJXugm_l9o|*48ZDRS^0Yr6!7q`A^TScQrTgXP`6X_|=QTGe9#x)`yX|48
z`Xh$w-~{ADd4s#SlKuopi@Njf!Fh%A4Mvkz?2muTd4R1Y8Eoe#bjM1(OFE+Oab2)(
zV6bfL3tO@2+aBe$wEKnr^q~m$cxkdEI$d1zb|^q;=MS9;sl`ljqwwLRE2$nCdh=(F
zPO_hOEDv87d!~&x6hw<@uaM|mwA;IF%*nPgnm^aBI|`%!w7K~@2voAahT&QiF~djZ
zZmU+~p*kl6Tt2)CpzvWZ&E*Z~9iE$r0irWbPw%jsm^c=TWLMf{Dduq#M(((k0V_5U
z(w86R5v{GC=kH$d6g;%uCD_GPR`1k5;~TUZXj9cJp66aS%zZcoGORwBfU_ld(ZcCj
zr$IAYa5m%^E*mRn(?D}gGwe;raa*#gSdQTc@-_Z0tA8vYIa}4C3pnnPlM2`+R3VL>
z)sgO7TlwzO=zY~+v1pAix09LN>hQO`e6nQTpgiMN1}Tkku<0e`f+VFafd!ZD^3s&&
z@vzhSrwI-6Xjd0CmoD4U4#2p=et~2ood>!A)>X*<4usJwY*%2ghi?UElrJy!E>=0+
z^mf?-97&qJLP*ec>zG{NT18x)c8?z<Bl>rpl(afdW9P^e`WDxAA9<a2co%p61&v>D
zKlfr8Rn(yi4ePoXTM6Tgv;ny3#GqDX&_g8`svQ%nfjgs*|3xJ(D8?>Wl<yc63X=D9
z35+<9K>1|2j7Np_rZflYCKhi@)!a`fkn3@5Y~9A=!xXH)znr4MGt--sz+)b&L4)TZ
z{p}hVR1+FNx^gw6AC`#J>JJ&Yt_ig-Ct<)uM{rEo{0vM1x&Ae*JP0S#pw<Ub$6trt
z?p4+0)@UZ+Du`#U;;{Hg!#SOpU;x3b)^VA;X<yoSRDogPh2e&!g^PGfa)BUqwEnF%
zZSB*qjko;Qyh%|84u`xEQ`A+PYb9<P-2yA;FgZAB!_ch?(x;PBw7a{3txyJHaR^Az
z+auO`i-h8*wCNyl;A_vh#kA-%NlCM8u5kPp#dB_PsnwG}QtZZAZ#q)%@RV?HAUa|6
zSw^XJvz_2_g&Xm!MN?xiQE@qb7!#aDl1=`yoR3}D>Jm%xT>b%F4f$gIA;%Y!irqu+
zDC?pfcYK!_bT9S-o6E{R|H0PjbN_v|J+p^@<&X3a8Kh+0TMPl-6_%=R4wat>QyQr_
zId9_ECsww2SMeI%EB3x-M<(qNWT??gokGl2EoH<j;=}Kfmn3rpNN76^GwaK|i-uB$
zl8A@o7Lga2Gc(&cg|v6Ri4M~K4>w_4_RlH>Jm&b5ZbXdqaR>1#uc~~m%Bh32?u0<B
zIPIQgzxgBvlfxJjL2wMX(mPp|i3rxb(72ebUN}hXRQ+9Q2;lkGPFIJ}WXF@IFzk{!
zBrUo4D7eL-ZNAbX?!xv-#qbjr&9GFDvyw{F*S}X$I6G?x!%u-&YHEoW4^($47MyX&
zleVdT;*h)&cE#jOQt~}6RUZoh9-%Nz&vRR4q~YWj?c*jdQVlLK_(9kAAal*!vC~C*
zdJr|uam~!vsmhl#yz_6p$gXU8%ejWkW85QmUb;Z$I@JcaY3a7H<fDCFHCC|3^9<&{
zv6J=)l=)Z-tDQrttEDe`u=8GCsbdv4Pvf;{9|k0qr^zBwK+Bu2Ea~f$xkiKfy3&)T
zgqNNU;2s`gaV4+BI_4>ma<r0_Rgi+md^I&?86{bjA2C(R2q&;roBxU{$v5m2o^(NG
zhC+;MY&k2FWP7>u3oTGYj7Z-u2M;K$CQC2qKhH!w(xl>w6b$zAw8iiP|N1t0k98Jp
ztJq)1qY$%C9ejz^<wvm9;d>*4*G3>{*9F~Kd{lH#8`4qm4`*|JOdc>k8@Daw51*Ia
zXDxV%8@9ca9SLioMqK@?yz9xG;pKA&{i}g&6jEcYcU&2fe5AZeCA^b?RYD%%HA$NO
zJi#~&p1BnLFDE=c)(0fu3_B0O+kO*tSHlUi$8IBG7DJk>^397!dp3?=0!Nc2>Fx1;
z!L4jk6|)z>`Gfg*b(q>E`ASZ1dmwKOlck7T)#rZXs$l0ZhbSp!HHm*Ue~p7l8*pW=
zQ1Vsu^`b&%wJB$68=d|lO>T#<&6w`;ICni-1RuB0rIMs0yRfsa3xAXjHZleEP;@Cy
z4KhU+aIy-qcp_t&(h<13{ddredHt<j%WRdOf_{3s0q*$|_sZ`=0%bL|z9x!(esD;P
z<Guzd+Lx1&Z2>RY?UMaGTTJx-5ERMDI^zx+eP3K^j6m12u;fAe(s@Q_O=4!@-@lM3
zsP{VL#zjHP4%RmFI@LWvb51=|hJ>4Lu-vE({7KB}=)?wT+1^-{k>$nFU)Y)b(%!+T
zZ{4q+o*4Dh>e)&!v=)dsR=-Q7rB~Xyy~z}b(|hSDp&tktTG|y`_1gi6NEu(B$ggZn
zSowGy4)h<r^BMd*I1BQqqBJ_z?|n}(xHeGZC0f7OlY09_^t|T}G6i?ZNrXa&2yTD(
z6|=dIev_rM$`8{J)K{Gc0-T^#?;4|kVI(hE<?$7s6Lp6_`9(+39MCAS!JC%Y7M@MD
zV)rtJj0X$utHVhZk?fKT?B>|~ma6UH77APjuxg7U5@TkO_b9}RGLz-takG0wcn0)*
zw()ZLq|(>!Q|FW-@KYi<uRrLd7SuMW{~+%*JDUmiIHXHt-aD_zyi$`&Y&?WtO|3yQ
zkLD13nDtBCC{Q|u@z9|vdz9PbYG|3q;BR`b-CE+JmTSG_3@<PI#@~8h4yhKejpi))
zCDMoFPMH0fw#e@=&s(L|m)-m?+3i+*uL7TzFdDNkme|Le+D~5Egr3?FxkGO$x|@r1
zwZ@KjixJ*0#OBLX<#Wg%@9mR+v0$n!AHJ2{_VUf+#*jx!&Z(l20h#G#u8pfv%lZ?%
zKxh~NKc(TFH^x#tTJ)xnl&6*gbYtg!{A2#)VSp2R4Gpi^et#w_bwx(gL&0sKtK$C1
zZlQ+4ZU5y&q&Rdz){Qvrx;Ee+5NIcpXm^8V4}m^L9M-p5LP@bO>!2qg<|iM+O|7dh
z3&4L=oh!1*w3@MW7;fjE;55^A23j!k)MSrKJK(0b`=QC^%i!X3h?QnP+#uocvkzAj
zqW)Z3_nGMWnOW(L8->cW9!BqHZ9N8wDKEO-`fV>+JDYDghrI_@2r`Z%<9colF~o2R
z`28&;pllkRDkMQtL%1`Jmp88p1`ZZ39knTvkHYDNd=i6St=L)v(ab^egDZ<1IFbYm
z@dI$~A4x8&^t8|Dz=z$oTbkwV;X;Z)`pS2-JjLJ{<|2JI@qHr>`(5LL&%CQh7Bxp;
zj|0@+J1!+cm_AZ(_SeaDqoTsCLhJh424|2Ax0%8byRzNRz<A+B7y~;=Z^hVo(HE}@
zyiiuv`c@pRfk@_$G8}rTvUa@P6$k`U9^w4qzU;?|O9#Bg!mX}V5&?Uo%=C2z7Z-*-
zFYji)bBmmMUPW!mA&ZR2WaXIr9aI@?j9@NCc{?1D^h~?d%6k^lk<JcB#+Tfjr8ZbF
z;Yj-9mkxcB<%4r%kawpHhbSL_(QB{X+xN@Eng<yIm%TW2(`2v(n+Q2OKMh$pxb+K5
zWqgBav;v!Jhm>$%aKfl+`z)yH)KVe*{u+eS{<Iv}<Qhk{+-bZ$nE>lhJSAL8?OE|i
zuGVl0ZK}Cqd-x$^0z*gn%=58ro;*QAN)tHoa~g>V+Q!Pdj{SOM34Ae=k8afHu5kIK
zw`2}khDe54M=~Ivds2(l9E32t9foNhWyadDF+$v*CnEGw_lTEs<asFwJXpAL1P4GR
zYG{LJOpe}qXH%|3Fddr=Vz<@UO4)}gQ<3O$1Ph{*X%v?XzWGdLxqIkszkSXfy?aQ9
z$GWxf$l4GlKL%e?3TjT2Q3TS$JeJL!UVAM#lnivRUvRp?caLYLIZ?CoA6ef%Y@x|0
z`QxnPtrW@T2;*uWHQ%1k%B)-CHZqreDR9Msq@Et`VdZG^t?qvar?-mTV>Bj>;1Jm%
zw<Ws4r^<xT(J)80NQBXTBwXK3#ffVH7`8t@XvrQJ!?NI=aq{wEP=&hr7QHOF8de;1
z<-j`!&9&I=;l4O5@hbU4Zz76%>bB1VNdJnW3_0aOjL^6|2qQV<Mp@@nz;ue`n%pHv
ztv4@tUH}8&K-x!Ljk$+>;b-x0yOJ}1*(^%yh@4+W9a=_%aV{n^9ryX}^^-H;DRdv<
zv{v)MjLrp=7N&hNJ?FK)vwF4+Wfc;zmnjT75v@aWEm!bzn>Sijr9zu4<#M{H>t4TI
z9|)t@9@UeFyDaK-zx8GXCOAHd-4caCVVWRsXa2o`ZU=Y{$A-nscZehcN6qUAA9vyE
zs0mY6b*jcL>i>Mtdw2WM`KA<ccmiUdD&A+uMFI~LTgTwbIks^0z|+0J<<;pji))I~
zKvPoe^g$C_gtDinXK4{qG)^buiA-@|RWttW7qIWARE?YFcN?3&Nu=0ZQFtv>l@hOW
z?#n~DjBCNqqMBgOk%+;src7&iuQOwkEygrYO?=Ks>EZdwzR$HQO8b-E;bQ`8$MeuE
ztNlJh%19X|3;n}h;)C+h%amFd+y_){LML0eLk@O?UIxrW`VJrlGA!Q!jT)Y>NoS5$
zm)&WjJ%fK(xA7oT^cSB@vS>zm)#<K45`Z0XDH3Cl7m|8R33+2&S_JKDZF>&q9()hY
zW;tKlz@gN`!f(<6u<T0{jEvcOcAOng(5~|#VebhkmVyXhR6g_}50^0#YbT2adN>=K
zQ+&YTN%0#DN1L$om{-pYoXuO;x3bhe*&w!zpO?Y2a~>4a<_nXW&prAcO~aT6ZC61I
z8#;e3mpfa)P<ZUQFbAt$jf1CY@cfo`o_Tt~twv6B-=3_l<1=TeOE<1uTg(T&2rJuR
zl8)enXMBkAKY$jJ1itLKt(;&iu(9Z<vaXwI`aX31U6a5Zmi|;TggJW}qit8NosaFy
zqOY?JN%;BEI`S=lnb_w!D|f0=G&}YekNusJrZ|nV<fdz*&)V%I@H{;7&BuQ9f5>q0
zl6lQ+=RnrxQ=hWAjWoP=tcShkAG)hnVrwD`FKvNWuch`zL>9f~K#_;*zE;vpR_NWs
z3)*W=M#3i2x`3s=vfdJP^|i-s09irWz~Rv6`N+u*9iBy+htZ>VZVBDxV0ysM-2$7r
zX;*m2pjU!ZmPvpdR-=*G>Y8s&*7<!Dd2r)3ZNaZ4-mz8zo|PR=7X5@00fDiJwHkN%
zs`~80!KH%9;*Bz2)o$yOl;QSL35T$|(O}fzmO}mEbfL-n-g!=EMnc#MJeYW#BChoo
zm`ZIEKwyX?@=OXF{?EI9e>#K&6se34E|H;QzI!G?$JFs5MaT5=fj@!%J=y=~3635H
z{r?Gz{co&Ovg;rCdbrjOM^zhkmtU?x%$+0t2&jR*yQ7&mCUS7_we!#8-Nln0LX&^X
zD7MkRTGg*>NHD;l@AILGuLcFN5b<5!>Fpo7&EAy2LJ-ReRp3xE(cwvWV6F^4A`->L
zj{HBl{s--Lvh3{#jjjgcM?D1mcc9GwRK33YZ$tifuZI0!0$u-~rM&KhS{(3FO!<sI
z`!m6UZYpx<R7#<O9Qp%faBclRRmluSxHyMgf2;z4_|7yN^5P!KZX+i@;Ldw4eND?p
zpF76Z#k)e^$hORdkemW1rI!>63f8jzKwe@*{Fd)x!$T-t{pN|mp`L?@T5F1uWqLKf
zy!2E}Sw&QN3vKw?0D`JdE-87k?O%gv=>Kt$j@j>Oy`dq@z7`4-keM0AYbwWW%m66a
zCw%Xp>xS*a0^8YnLyrq~8Y}ch;l`Qy0Oqf60jr<>>DV)!l6O%}8j{oOy1#suwAz@6
zPLc(8uF4j)KkcV9QWqPQzi6WI%h_BP6!@g(j@w%?7+|L+8whL^{=@gGuk2dger2zm
zn|<v2R8J#m#lgME<z;-p$z?kj3g&296C5VI!@PnjBn71O;hNpELy8P;Q~ReX6cm(b
z`Xg}1&$Tid9<v2TDo!?oL<cb=P@m!Wut>6gd4oqGmI@qWtmok16iy2uA@~&)9Aa<7
zH>H$C@A^czt|{pkF^D%Ae?)%&g`{7~3g!N!>U}!LQ&QK<T*YeI#(8R*h#yt3f4p4n
zs5@59%K7$3i#ftXpRPaZ1qG!cqH9!8&p{xDmGNLcD}FDOn#5&>EC4#1Gk%Uv0>?1d
z$Ijnw_zNpTwzAT14kte%v5;hWXXb}g<=2B{p*^ZrTm^;}3UM^KVQxjiWgG*w$5XO>
zmYhDE_x<o97;jE1o3a7rDqn8f!E%xuJwAhj5e4BMA=NT|f!~6k%;0g#j-NU64H-7L
zSti#h1D{tJ5?>v7Pk;%S(rF)hGm2k8woY1Ht&JFH{?dQ!N5%IjO)WR=<^Ld)fUn)o
zRT?o{?^=Zb_;k##Qy1Q$8(-lzMH>jWe)62);?)Cr;W17&dh|n4%|j__2$T#9-&@9(
zfK0vT->sV4sn36?Um@^Bh}ZsWbPc(}N2X^io>;o0VFHG-u{Ld8a#zs`uMR15ErQ$u
zX;@hn=9i(}&&K@EZm0S{rn-klN1lX{C6$cgwP(^?DZ9P>h2ggT=!8L1%CpL^Ki9Kp
zu)*AyI_;<kC_->CTsxf7)1>&~m7~b?>yTaDiMFbumLpWazIE=rzqlrs8NEp9kyEKi
ze7mP!4KCo`#1|80h3^Vn9YFl{EbV`50h~ifMn(o==GCy@GYhk^+)@FfYN*!ES`f7f
z!{basD`yviGt8MEeil8+p88aK64do6mrWPXOB!M8aO|Q&G9qMlo6*#o7Rw9>gg!5|
zL)5eq)(koSI$n3iEAmx3pLOl3pf;jL77f=tJU#X8koXwd4&4HC!!h?7eU&ygW6b{%
z(*O45NT%aq;_RtN+jfhlp(Nu?J|nG(-`oX+hjeb_qr)V2Df(&&vu~Czb)59@Ho%P5
zM?Yt~hOXg};zF*TJioIan#N{v=jZqb2v=b5@`AuseNECVCE>JzSQEazOeNSxq57F-
zy7SowY~jqw*9T8avonEd+$NwWg@SR0ruw8Ok+jMB$#D&>onsu`L)LjZAG4I!st^)J
z%Y-@dQ*>ugW61<G{23LFqbZYx)S}kbo=l={QrYVD+~3uXxI4g)svfh0V;dZMLl+-%
z87;<rWzpbGO9l;$`L#jn)>mP+^d64i{}<XuC9$*3ho<dgsCx>JG>%R|;A)F((8=Y`
zXOeecB>#TwHu|W8ErPAuBx$#ZF6tFwIk2)MiKL`P@R^m2sV3QLP&W7Gz^`YlAKi2)
zNpSs;hSBN(?b@%kB02-_Q^kNS_hKY<Fzo^JDyn^cmPFfjD#5eUhhz1iv2(3ULI&a5
zbV$_?wq4X?rykp76QqOG&E<~{_})s(g-tp(8qBD_2*~^bVPL2ct`5V5m0fhb+bnC=
z0ugU5aG4v2LaeT>sjojlrt!h6*@=T9kZtz{*OYoOkB1R0+ZqxO{kLdx1FT{ws~zM~
z+pU?&<QRm4KcxeBYKU|A4@mYyykuKv2sDo<tSs??gQCGe*}VPRc@I~uHy#`dGx&`o
zW!>|)O6vh`9SOZ0TvpkbF+-)Q?L)46+8y!9$~8rbWgA*AcT|o|9ypfyXH(0jNC6T{
z1J+G(^;MEBc%Ipw)TCA=?Q_-U^}PXge)()<#Yq}9%wT&^v!ZTyu$Woy!P|GC74^c4
zi<6r+0J!~q^q656jiM?RbVth=;yGBTo5l9PoL#MY=~herwQc)i6LdBi-=&;-H`ci1
zQvhdO21J$bnBa#=m59Oj^~vJu6m7F#k)=+WHQ%Ox`!?bX!fJ5#k0%W1e*;`I(?1%O
z37@7(Y)uBwe<QsKc$;Z1rKYwyVH*o#;N0N;X^<MaFZF(z%kR~jg%~c>(yganqhooq
z0;ifTJ>vosnaa|r=+j9M9Gs#kJm|Bfm>l~ZJD}^cQGm*~Id%?~f|nCW@ooL!nL%&p
zfx`a>0+!CeU*F|;b~qMN)x_p#-~m6PI*5VRkSeuC?pP{<KN-CEU!mDiZzu*0)vdvb
zZj0`{eR?pb@e2C`+Q45<t|G=Ah;Q|P&OxvLn8=_sKdJUtQkJ$u6#2%qHB31>%QY*j
z+ON1XKX%nN=}XMM(r(v?TxuhzQ0}%?JM&)9a2saWs)^r<?3;L+Q&ul<$?clzG3@bO
z9<n-i1YiJSiwEZPGFvp~RM<Tn!G}EFfI)JFG*t2s+jFZhLEW!N6k=-AW~BzHR&Bas
z`7;fIYZqE^1>il5({=>c+$d}iUAPq-C6d%mccIGN_R>*xRQOp{n4ewP%{w57rCgdi
zkZ?;#^G6`o4C_WGgB6$NPsB_Asj_#^lzHWBP#X6geo+4a!J}xA-N;lrygnuukhlB>
z_z1@?j7IQjko!w;7!dt=hM|c_IEKhd`xy9P%g#`3A83nipboVCx6K_yMZ;+s+AuWn
zcEjSXy-=#2My7X`4S6M;DS)^Bk{vLN)i1O`Jsk6HdLUCuPZkg8undhVmwPQc(l+e`
z8^6}~TLVQHSv%R_C0ZyZOcQp^>y)+5DylK=%E<Lf4{L5;ivI!P4rulg1?mrCW}von
zX?e;BtT0iw;%iaX#|K&3Z?-#do5?*+Fv$+jXO0x|Z`$vv%Q{yID*R$!CV+YlwB^-J
zp}y-dwBm$E9;enh#7)aMR-%5jgvDM>+T?~oZiASQsO?xa{&e;d&~F4fC=DI5kI1F=
zft@_slO+9c;p47Z<#)Y4bp9pcxJC`_q!cV+x&7!jqLO2^-rpqsxETG52c!g=N)5*C
zesv;d2SjUTU(gJ_vlt}HteTVPtM}GD6%7JW4W3n*x$8H!iWP0aPVEk2QUv=7WpSFg
z5yJK?qh`;sXG$U3t%HXM{=RH=1O&R2zXJ#S6q?P<RFNoaiHeo~{9o<8XH-+&+wQB6
z4+2V4dKXdYARxUdRX}<P9R=xx4xt4esY;O|y((3D?@hY&-U1{Ln)Dh%Ldjk{@Bh4~
zjQ#bDvG*D0Q^v~3$Xc0MYu@+$o7Z(ub6)ZM7a;_hB8{Xyiz%=uS4&Ouj0%|Jh=HUN
zVjPUQ>)P2cZC%YpU~8W*Xj0E)$-FZ1bZ{{)AL?kBgT@Zw(JN?`^vrE&w9{V8|CWlI
z>bvgsWz<@~iEmlEd8^oo`Ep1XrV*?BR$sAl(<9mlP_JcLO*MbvU{bUP3}(rA+b#XA
zCQmMcKX4&zzRl33)lk`r==K^hLYhSD^S=98;G%oK8wUyP`YXgGjp9inl|%Es>4bR?
zk$!#{@Xm-X&}&dW+=!<x)w@P?^ZGvwBsiH+CQ`NG^qS1jRoPgA=4O{qa9S(&QGZ$g
zYh69OPQQn@TDkJ$l)*%0@q69SFSRe1G0Gh2jefeIZTZ3$Y~Jf5vGh8{`(C^xb)+B?
zR9Ko(@fsiXLOtGN>mJS6qIX-^_quvb7o}(7y&C#}x=rAz-~(bg**o39v=6Q!SSTwX
z$MVQL;k~$B7h2dxP^70i(^Q4!0q)dKo@IAi4f8IZRzG`IS7oa2$l>7Gf9o0gyke4I
z^49qcM{4NPh9(t*vembWrD5q<@{$2EeWGvazEba>ix8xqzw1xxDX3hd7@T*M>JZJG
z$CfQ)mePKwlDB&_gPwQ?Sr6IRmoyzPOoHgR68ZWL4J{>=S~j?5naYt{$MX~ynvR3<
zF9IG1>#9F>`KCLR-Fkcn!S@<_Ug&@fF--6BI3(Py3RM~+4S5)#dwf^Af^2)Pu#ml}
zi*m2}=aOL4h+?bZvx^ti3CzYp4ipMy4JFmOkH?DL8W3JwDBt(WJR+d7_zUK>I=%7=
zgi71%qfC}=*DrPN<Vg3!=yax^nm*Cm*cp~`a3%j7!|v9CU%&M>lPEq`$Evm?T)^?)
zIP`xO{(#^v5=Fq;9>M*{*f%=I)&~7gRUN0Q6_ozjPhG>ZdwmDk6;dw1Vb(*DNROWe
z+3H(tom$gtYOcA*L+k`~$TNF#5mCu)W^klFbO_{}gPU%TDzt%YcHF8|$za<!VyT&F
zZNGkBj5D3WtvDp3n6&}lXtys$C{*kA4r_nf^dp?VVY`+yJ<62Ri?7chJ4z(--mUli
zrabua22-JNZ5rxw2I%p-*6?#X#s55Rg*SP}kO|n7f0G|vAx`EcA(P!4$y^8OP}W+1
z8QCFp#b;+c9roQ8>3`cU5rF@{AgTI4s^|YM<AI`l3Mjj;Od~66-go}BdW<>Ux;7vO
z+D^H=47~9V1idL=IjE60xb09yCJI#aZhPib|5ou7MPy7eG*(vz-;Vw#4*XORNc^n>
ze?Ccut9tR)m_MiZjgZCN+J6W*&_M+Fmjhn>AmF=i3*~=){XZ+<|IK@0{ZFg^udgEk
z8=~g7TOXpM?JFN2q5FLZJ@VdLC~E(dlGIfuH7zJOOLxXXG$lI$6RY`N+d2T;&^y7z
zDx~~i_uN7Tb057+K5onGPlxBVrNqe;F&(<YlKg7E@nWK%+3)OlB-4rN<*WG_&4fOx
zllj~jnR8nhGN-QrKXZR(p;7GlKL3Y`gxV2LQ#mJnmOQP%nh<XHiKYFRQK_|7mO#hy
z5?l4umTRqpLa}_L+gATU$I<t_zwl#3WbBuR2Q&tc0~^f?fAM=f#e7*0&wk6h=hpH$
zCbisjz;2g0;A!f$vbwSPJgTZ&q_dwf+N(t}qh8u)=nIL7MaCBzdiqlcqi7V1vszmF
zTqo7e&beG~(Su#)zMGAge@+A<-!zC{rzo$d0tyuc!08gX5k37Z-|;cm*H~|`v8r70
zA02>OEck|R*e}w2fi9nE=AjrQX;5Q@<om%I`L9=r%Ecv&)KRgEJ^)db{asTNuwDmp
z(VN>;0x<&0h3d`qExm`P%h03!9Acd7O4=Xy8ZVP=_Kc^^Ai2TQj%LpGDZmt84w6fv
zpObz9&|HZDu6#dylt^SpB~PIK$A&qxRc6mnKeHxf0-uBR-h2|H@s&iuCac4Ux_0LB
z#S4r5!9aJErvw+=2!0Nl*m^ADv{%jNa^!tl<JTjSRMX;D9{qw`c60b5X-lE$KxLKO
z7!CMc2gG2e$w=S3a%}P02-chJv{*Q--Rd|*M$ojS+T5NT5lS|*leyfI1!-eCxIABT
zhhp5A9;8UC%4JQu8YmNN^C;_V;;A^tzA2>WFd&!3qSAFt_BcFl-PKss_G8nSF!lZq
zR<=3*M@1B(7VIuA_vIEA6-*4a4-UpuLlZ+{9V#R{8l5cW@`Eem$=vqG-Ozp-a>OVR
z)!$ep8$5b_arcek8YEz&Ua!DE-{WXT!X85O_u?J^vpER8M;I5N1o3oS?NSjDBLLol
zf@$s8`XI3$`w`zrfa8L0V`exKX-C3#_pu?}$>hZy<^STqrNh?les%gIQe_%b(|`Y>
zQU7n_`&~fo1bAclNnbhWEoGy&d5ON<I^MrO1Ek50Oq36%4Ilbnuk<h({YU?_FK`_0
z6mE6ryZ@0L#lN5fSf@=UV$96Px&8`X#;1oIw~YOlT=!phZO7HsO|)f)#`;abej+jP
zdDVvI@_p&jj5_Q7s&>AnHmp-Z#VT6-Op&#(wDriEP!IQ$YpJGHZ8T{!ry9}}E|?|Z
z<FS}b-2nA*U5w6^F&7EGJpCj<8@wG9!`IQ-;beh*`r{X0%#A<3`O1ux^UMNKq=sSY
z2$=QQ-ExhzNo^`nJ->T0yV=W%;rt_xD|EKfO>uNW26}3U7RmMuJYC2(3QQhtBgCG6
z6bW!_7*f6BP=4#&_H=I&dO0|n@pnK;cQ|_GF)Paxz=B+m5eZ1QtZ$WDUDiG6>=Y5x
zNX6Wyw1>QYs+?C)mfGoqHO|t>RKLN{yV(CY-OKBkxGEUqKybk34ronek^fOR9clEi
z&kCQta#%2bw{P>JXBu)?DN$}jWxtyH42F-Gx^2#p_WR|2*|R){Q@5CMtQ=!u)4`x;
zzqtKrz|$x{4dsDD>{Z9Du1jL(1HBPR)}>&}R4D>sTfzA*by$YqN5xEUu1aW+4{)ox
zd!<|d&b_fFR1OC577i!=EB`u<Tmt=|jdYskF}<Kbqd7D<9Cn3Is#aQ@e;-&e?6vhm
zRaJ04pasVtuTK)HE1ebxJkFClZkj+|4I7DqO9q%I1(Cr7H}nHd;Wt^vDSh4kfi}Lo
zHkUivrTq|Bc+x@c(y>scu%V1;i*KW;{^3;tbO<@n#VgN`!8D)C=(%-nj7&oR)KgHC
z#pPp!C5Xz)rFBbVVQ>HKK!+;4qBny59fUvI7ZoU6eDTlMHjDJH=CPj4?Cw88qgCDJ
zBCl}+R(i+4m|_o8`sdbp{e*Nm3I<Djk8+_$QXH|{qZ+q@%Y~Z4!8)&(;o+TO6kZJe
zs6)uGTLr<;9cI>~&r6c1Z)Y=m!4CI?Gw%gw7S6{YJ@YY7A@2(u*E!wy%VnIqN&cQj
zaI<V#x@)bT+YF6X5p(iG<Hir!SD6{9=RfQ+A6(4r5tbby9t75X-hb8MyIMYcD3tV}
z{a1FR{HKRo(*4qn;{N7lKC;Qhw#30h{eF}4u19Bs2r)5!?dLS=HQ8~3oE4v!-YILF
zA-j6oAKt&AoBFU~v5=uVA;FOiYjkFX<ab<a-HG~sKj)v%+*aD$1G*B3LHw{omml&l
z?TOb0fP<ywedL)y1h`}N_g9lSwn*tQ$UBv}kA3Te%=AAZ&O6cHU#nh9x4DqY87Ef-
z+`JOwqu~r;*%o5sqQ;zr7Os0%b|dPLkdxC1PE8<CrFFt1@f*trnafM&=k<hzW(Szi
z_>Hfvu*kxmtU&vnv3asTn`I=Vn_pVWYLFU^$@a)T>W2yrG?FQObE=mBG1&S;CDOkh
z_Kpn;$j(a5+FYyuP-%c2ZIqhPg!J6--e{<*I%V3`nFo4@T==i2)qo-Nk)`vHVR*8L
zLRDNFs(PYAuA?iDcEFq0o)dj-Z^4&K->l&-a->FcvgwdB^7h5M25|FJwfOQrvItg_
zY0~yWyuK2*^pRTz`9`oa>1$_S5UBhSVCHW`4sh?K7?cMdgJzyC$ito1!eDcGL)j#-
znbBzda`n^Ev!m~;yIgv)*bf%iF=vzEa;RC~^=FXuI^EoQ|Fh<MIJE&h_CUs15kH9+
zX>DvL6%|*?>kJ-d>j&E=BA~v;bKqep%Mqj!!n@p0lw+$7gnlE-!7gVnr4o(OF>JOQ
za|HhR2y`q2W{@9()eZ7R1A;H#oa`G4@fhtC0pQB6wd*sWVO#z7z;3aRt$OvpRa>YR
z4s!(q9*#P`5e2V5PHNbG4>($8fBB-UOA=;LszH)YV%hm#uKa+G<ylp$ndI|WlWz}I
zn--svmR7627yCCg86j5TMzC`!GWfTYdsGSGv^F#(iwp^lZxT5T)U-Oh*DSn1sgpB`
z88p`^(>nfn>@6f*TW$^H4c7y_pEmk8n<K1Qw7Ffgkeke&;j*?2{?|<8EYChzx@TRQ
zRuFYZyJ&zU0T3hyI(Ib8cKnu6T{%?t)oN97xUum0A%FsbMo4#9LfXQs6$~d;3ATaO
z0H_eMIwJ|z(@^Rp_Wi=szwdkyKaWX>U)JRxEDAXzmz91QLpJAELxlI>@=M<_tUlt4
zPAf+1B%rOQ^rMbW)5!~d^t;wxP6I8O3nt2+pC6>&+l_CCoR5;J2|y&UN%yP=B^1;5
zzdb0H0}a&OYsQIwr^optcW?)8C!EgIQcf~5P@pA`Ut7YMz~_q<70R<LtVr_H%1*yP
z8|HV}&lXrkttQcg7%rCe*|tD3vFq>hhJI&T>*zpnmv1IuiH6qwrHd^aNl5jmPoAjv
z6_3+nZS2x}X8gnXlha9Q+22uvP%cT#mCf){+ry~>vI1A=QpLWF9cp<AH#vq@1rXJX
zcbsWjP4Gevp5V8y&kP^SQuHdix6Ez|55mpb+Mn^L6|L*977?bEzvI(<B>OuAt`vYJ
zVOevdl%lbPXAVIWQU*cc=pK#lQ5u4;9Qw_w2w#<_$7|1g9O3`yFx!06&O6t_L{7-^
zH|F&dTgm*=>qMdc*s`881(6+w4acq260~R<A;r6!KtBlc(lm6-?@B2Nz9{3=Jhfgg
z@$DnI<<Q>*JZ(wDkIY<xx`WjAUO6IJXirzj=<h`{W(_)(A5Kd&dYJs`ak>+{_SYxE
zX|S>-K79o%^%@t$UoX0o3N0{SOm384q%NFjSSKSd!$*TZX0kF4$S5bB1w`LyKFiEC
z|7wNlK3u)j86pz%YPAv&6Zj}{j_Fky$*=D^Je0OXy@Q+~(+b>0`0e8J$-0st<3gJ{
zE!yrkS3g8fr=|)&YQRjH^6A<<g}PUNv%7y}e>jfiW#;^?X8zL2);Kfk5LEJZ-i?#A
zmWZ8ePyw-7V32Gl+od@~q~^_FBG@W}TNUFX8p<-4G)cs~zu7GRRpJ=FG*?}{X<e3;
zp3kj`J3~%voC>%X*?hTpdA7KTZ|;Mr+?yx_XS!1fgG>nY-QK3(p+hq!*~hH(^mT@k
z$u7}09yGb5meJ)8SQtv+wr$@_M=@g$4;#uStNo3C<X3M&MjfGgJmrStbjwoS$f0K{
zNr32AvW`m%Z*p-F!ON9?$S63*>?<e()z(#s`N_uVXKd2O6WzvB?ssr$q_)<cc7}p4
zrft09%uL`3t4o{Y^s+<kNIx@@z3<tQxxzY4MSM6mwp7l&G0G|Cqg;^?uqyI=5Sf)b
zw1u~%$yT?t5YV?^w&f_}jvlHg&(Mv?4>U?Ne00Oq{o2FZc}BEhWroW)|4c-kl0DLo
z#Q7lr_UDL(L=P)<{r-Mvw8-{~<Y267?K*3jk7p(lA>HhOZpZ2F8XB?t1#E#ZMy0Qc
zKKwoNQ8h_CorkaDWaUjVo3$_MV^*NM=ifC}8cofuutR-{^tTQ}6Os8M`w#PpH6(G>
zlVD8Yr$!pGY=3H*FQOtc7j5Cu&X_D7moPM!s{K08SJxYr=)@8Ys80b4B+ZON3e^;L
zu3DJjo1~QNjG0Gr=(wXSw!_h{UO=ln-Z{b8>)97jf?M@xx^3}jxyXjHwrbTP8(LfQ
zY>9>d=0+;*3>W65KVO_GvSZ^HnbflL;X=E2N0wp5{{1Fxk5*bNF1o_}$EGz{diJEK
z&-qE1=GWDdq$Q<NcZ4OYmP6TiOp8>Qo|GG=N-#fYGw@aQBcRoCu<wcuIJP{Viqf!8
zWzlleh9OhRy{x)jzqzX$w<;}%ZMB_~oexb#=3hF&znNS(swQJE5IzScEnsm;uvKD=
zI&*J8U8k*!kSF{UIL|fs#c~piSK2*0lc`^|YeqoMVur7qPw->caZq<DzK2~FU?y#f
zp8L|0+2X!=eP*grI?Qc*9b`ajviHrZznOz+H>g0t*eY=nLcMG14WvhB%QXCcgRS*G
zDUbPB)nm^hnMbm%B_|s`NVax$nCs9_NH?4KeB8cSiF5K^3ENWt$1TymQ`HsvBqU0d
zN2(}d7QfTRxcQC*@~7X9K~C@Zoej=90mT=t`Ut8&*_-{Y#Hwf@LopORf@|Q?^=aO=
z+3h;Rp$b0Fw%#8Fy{SJt@;W%SpXrRQF|*T&uqelFpvLv%*ed4PRO{X~=hyyh6Sb%v
zh`bT;6t{$1JV%%@3KvlomBB_+Xs49<j%QgO0ftK%nGu4avX+ujSB5}`<eK}E+#h?6
zju(=EAyr|<9)Vuq#xcIHQ_IowM9RHQbzikDzX(t;5elbIw#<vXr$g7JCEtuX&VUjm
zyjl@8e(+~ppG19nr44udgzv{B9Zc~IlC0HOV5Cw61dozzVbUws>BSg2N6qum0bxGU
z=?ULSccr1vR9|-%>I@fzL_gg)zHPsFB+61csl7HKJe4mD6PB!*wx8|3JPr1W#4;x)
z0Dm<4DC$?bNLb2g?X>qr#`cT1z=y)RcL{+jV=3Yo<eWwOj_f=r65^Y&-+`^+i%_)}
z?u)^v1Sdjw2A-b}OiCDS+EhH$)cbAPfmPF}q^K$EKk?Hvrgitx`GR{Pl8bsSG&qME
z8Z#=&%S_6y@W(mBtsB*?Du39fBJRhSDbZ3<((M~mIKo*~MCf>#Vl?9U0{&J{Nhtu^
zifm6@os_hgn`v(fMa&c?D2*BvDJKY<itQaeSerrE@4sWIE+_#7!X~K`loJ*MEgD}d
z8QUeC(Mz5zBpv+7A1hAhzqums&_K*x2Eu8LM*a2zIYUhr;UZ?&W#D<+Ny1{1_I|Wx
zBUx9yQ?@qg?>}D9aDnn`EaAo@RV`<jDlUh6+>UF>w-Z-UVqBKVA^+wFI)P!!sji{=
zdm>8wNBZ9b+Vh+-oT~0U7&(l}jLKp2A18>?b@Lv_wtaa9?z}$5iGg>LQ<$^+9aL!h
zVX^p<O2z8;mO}qG2QRGZe@7HQaIhS&w~0&$G%$s~%Kh1Dsf(juIVdtWPbl}0dZ1)#
zm({7omaK*n8=N8%in88YjweUr5P2^!NTrpKN>0yZeJd9&2Gg6ie9F-eP)Pre7_Jj$
zvvU94$ao&?Xa5}}Ggn|V-_4;ICcP!>Y@(FK#xfK{n+uCpZtrBx25+B@&{TMhE*xpi
zF<Kq0jc0y}Anwq1(1zg_koC(k(${15%jw;VH$srPU$N~iYjdV8Y0OIn9tLR?#nbl@
zINnTYAy!q9_8(rxHy-*o2ZG%@D8_bo>)k%XK_~I9sx`_A!UVIHJ(Kz71OwV;4uHQ_
zIR%r+HcHIqZ!uS&O;(>*1*^2vT{`U5_a6N8{l4<?pRFO-Qotquc>-7ZKQ?=9+r}Z2
z%R17Q;8+}Pa`O`3UohwL?Kx5YTxV47=yv?I&Dy6T->E}Hq=L|sCTf{sax8rr=*Fl*
z6zY8S;_z{%6vUW-pKTZakzaVMofQWt8#`&6*x+7Moe7y8tB6XkE0VHuIw(d&Eq<~2
z-Q=TQnX956Fhfonz;NddJ^$?<0Z;tC6p?{=Z<Gm+hr9aov&FR6{p;EA#@J*W>@~(g
zVY|E6D&n=-;x_H4BcU;8zije8&W&AB`I72#`{OEs?mhZ`7G=(g(^&!{ivfe)Y)q*6
z1=Vtc`MYjUdErBkWUspSI=-x@r%aw(`(Mk)Obi}Bq;Egu2(i<A{QJFmzpDVE@jy>n
z@M70<qU7~i*&$C<-{M;VS}b?yZQ9}D`0G8I(fo7>&NOae6}2%#G+pLGBa^J9zeTh^
z1WTIwsV6UjWCt^euFRoqjn|qDtpaov4ga>-$a{iDDj|WpsNvuMue*$q(mh((``t*{
z6lV_o01%%!{;Cq-{df901;H!R{jp43K5N9?*f*P#^rLMb8tZZ`>M{3YAnnamlg7`V
zFE&HxAQUOrnI5GlUlL`PwlBslN<)eU;%~20zX*INim=(u1bA|C+qKu_uaw=Dk7+Mc
z^tINS7g`%$b?>sKud<hkLu>N+qa<yH?DjlKYxNSv1kUgov&frG@!g`>WEW;%or_<`
zaF#eQ5meB+%AWMb{385dXy0@?qzY2sSrmN0BCoHnJmOq#axv&wlRdp8zLlJ;K2w^t
z>p5;Rre&UG_uGm<wHt^O)5+P8EbqGd75)l;%=}W&^FsAfaHS~8!P*bv%RsM<o|5M^
z*BTdnrd*kEQ%u$v^*i;R#(uo5i00g1aYa(Xi*bhIzN<j0u_k;8G~D4;Xz}@CQymo+
z&X$zBs?2?!yE*`V{56a%=7OGB<4GJdad^@E*RbG!HGt1p<8Q@l>rZYsc6d$lzy3jr
zfUq#tu5gI+UPZ9Y*z#9TuK3X$g~-~=<>h65M_?^rU}eE3JKB@HG~!TN)dKi&zt$h2
zp-ELvvI4&Ei`7~Jaaj^!Jj&`>ftoy(fo!wH%8G5*fsbS*YmSZ$M4r+5NMj67ZTg#8
z2L2#1C9<E{0?$5{(#Pj9VGdY<FCjnz(m`OvzTpqtzPQESy4j!n?{*+BYS_G6Q}`}b
zz-lmI&lmEG+N(4@hw#d1KS5{K^EcSh<sb`-QdrOdld?DD?4gvz|H8%Ky_$E;^M5mO
z4@O8$ktlLTbYI+}HsF(5VB18Q<PPY$$}{t;iLYVBj)+L-jgTL>-;aN7*_<DmG+xv>
zUxN$WjIUr_gXA`0vJ#Pg9doon%TxzA|EEeHBo`2-$__tI-}ee)NCPe}2lrF2A|M$o
zH=N$|2fj8A<%fjsB20S^&NH93(0*HbI~A|Q3}qh&U-tjVK3gl;SABr`#?7$=pO<=k
z_H*^1KrJ*BYfMe$WWU2ivW4UPq(%$u39*imm{l8)c@{!;iePflg9Wt%hB0}=%lXdM
z?|eKC%nn!mf3DS-_kJ4bxm1s>q()UYn?_S=gm|}4VDXyLqtw~t6%CD5bC2=<aAY^1
z$F2$%R|_``R8300)Wf}jcTh)nsJrpCV-`Zly0l<>;<1)z@4hoHz|(m)nVknlvs!pU
z4Bq3^Dd0oPb*FX7>ZxWWLa42snzAf=oC9DVNAR@IA4igof-f#BV<Ix(Hys2lS%w$h
z@(2Z9V0`%3FzYrW*^IepW;kxRbw8U%I??dtgI{<2xVp%6Q{7o8T3X1*>i|YR3T@J|
z4O5^VGpCf5#N@KEx}861Zjh-x@%{y(Xjm$Oj$#Rw(vm)c%wPErnk^%Y#78cE9;i`r
z#hlYK*H6tDWm&Z0{qS9HiIG28pH%RDC3)Cyl_jxNL7LK0yhbW*w>{20e7RhkoOCVP
zg&9DDOD5H7es9R7yUXoy5XEYRkR_8+rg%tsdEk9b{Gxo&OX?vEH1u;Yy8MM@>Ie_M
z`Yk;2wg-+Z&lDW7%qPn^e7n)WX*%IR+Vup}!exi|+g<jvYPk7DfPxMC*6xyczoh;H
z7HM$6MrZWsXAxFj|0P;c{V?{|r4+Jfpv7pv*DWGe>Afl}@;Kv#&}deHv}A&((qr0@
zNg(G`FQ+0q*8s!Rt=`RvN$76zmbz}Rm4;8J@<zF3?{@mZC3*>c*o5ySoGg|QPD-h3
zhznqHoG-9W0RH{WPku1Mk~8uHNhE?<Leyo*y|7eGtOrN6O)~WJo8NJN=7<k2tCLV+
zs@+vkpf%uQmzGh!(Av$&X4?noedH&HYoPFIaZhf5o_7Xb_dg%o@3TQwjOm$s<~4P~
zo@9W#E9wMk;7(V_@IlqNX$RAoRYttT^~3T!p|ep%p)sqZJ!#jCbiRXt)81w0_C`0b
z(!kW90|^fKedE~HruX3?2PE6fa|agMf+f_jWuqAJJHNc4ja`nqc!_LZZPHnC+Zvtg
z6WL`<VvVLWDy^+3m!7T2%EK9WCY@Xy=j<=9k<dH&UfRayViCo*76v8+kD@6hw`(>Z
zvV@2t++fd)?3ZI}0$bI5stk!dvz^5FfIU=hN<ErJh~8Iz$ew(yH1pb7Eld1Qs`YJ%
zEbc^pRO|j(cN!gVwm2k9Fh*u?si2;Ql}`h!SvuFm_guncPFn6aIC+zp9LwhPD(S@Y
zwa;!F!~8oMUW^sQ+{0!aofJsHmy@Jggw6Ghw6;7L4RVF#05IXVT&ODNsA%$M$7jyn
zM(sM#v#sux9x1qfdhebo^PX1MMu&4z@&tIHPKOqi)v^(`@#y?zj0#<KM@#(dQ7Xa|
z==2h2=vUUZ%GOl0LtbRJOE;Ruetgx>#++3pDpOLkR=G6_BZrI~m}L}@wigs^2xqiu
zmh|+fF7CFr@K}kksuNu=Oz9Z3J_|W^5?scIYhxMrB}~iwRH^Oe0$@3lqZ0l4em83u
zi|vfDteN1!4<#|F%rl7DZFk+t2><F@9xm;i`~mMq^hG_^;u}pd{!ot9MB4Nw<KLte
z%JjHB^2G2GNyHem<2pCr+y>2TEZJtBPakc)x#3tc1T@=s#q?e53Ke_Ii#tx02}#{3
zw_h-pso>NMf2_V!xeh_@R0hcM#E2Ke1=A9eAg?j#*8s%{*}f4wjhp;{!JdYF*+1kW
zandTEK`oMJIhLSeZd}GXLEJc}aER_n?DcYD?S0%nIxDNI&RF=uREfn6v6RUXLWZ1F
zbLb#6EmH}%QU*>nXh)w0VaK_&Y|ctNxgC}$A~R}WY^_v@PgEY(enOS*+|RX(i#%uI
zqLL+;z|G!0bW#;shLvzp(K6HxyT|^)xd)-B!#N)4g*#3qVrKg+m)gnM?kNp@+MOUx
zvRDseBM?8y7V+0vtWg-8t9iqhJFz?0D0#1_Z%DrOtMX~maF+E^S$ql*X<F}fZW7HG
zT>m=c2R{y4+ptk9_aA+z(y+mEs?6+aZPzBS<o~{EfJ>V>P-W6Dv#9j!EJi%wxPmeX
z=Nkgi6^Oh2(UY@cQfs4qs`foA(W)$&&d1VL6pJ2pYH1@Y$*Nw0$e!3mL2oH89;>dc
z$@{bWe7wS9i#g9#@Ykc?gw=ObM*Ak+Ej0R?En2jxnaiXOmbQKsoIh)Bm9~|onOhUc
zXG!BL?FckqqCe3$*49s9U6O*=IagEb&On|az4dGP0?1_EikK=$Knn~t1cSC=hA#31
zEIms+9re;$0<F36gU>Ee$|j@r)?=A^cyWfwjG&QNwS6mYv--D05WhJ>PLt}k?X|e0
zQSqrHi*wzbZ(b}RWY-68g7Hh}`^J7z$a-Y!`^rWp)1KMB`0-O$1(cirMk!CYy{zoF
zmiZo{yJ)OGgDLnEU;i*rD^Kh4zsY4J)?2XG`cYk<=Gv*fFE&J0ra(Gu;P+GG5Vp4~
z(Ny$A#ILP0C%cCX6It=#rhh(VcIv9|lYG=gSnZdT8m8=DeCu1p9YmJ$62Rr_o&`YT
zM_uM5jNLn~BWxx=4urRiV9{~~YCZmggJdo}Y5asg+oHT&n~$_E2iK@kGYi+$F(7Iy
zYA1WTIPBM*Uk#0`vl<!NHw6MKP>+0#yF>qmcP^<&zv|*S)fB=sf}9%snED7Cf2F*@
z%2zQ-RfbgM(INN$RH&$eHl@OnImKuFnwi{_!RHkC1MCj&Skk%Tg^iORFV<F1+6&Uo
z@CYe+b6t+1b`R|Y&z&Z=IBlI>f6jE!#kqZlO=U>7ZUV8U!=tYaXJagx2%0Uelg?p;
zYYn{E>5x{=bI2`}$Fy!3OC<&is7kj!sff+1cayB~syY4z(M{v$_$gL_YgF#dzR8_g
zP%RA`qF8)4mbq3)+{^?ZP!9-`kiWkc7*~bl-e3g5W>mJ%6KAr*tSFgxxz(y>qe7@N
zKNgiCX_Kj<lYL9XrqR8MEU);*fc%2*N%0UQga%ad=Qi5p+xN?vk8mdWgxS?vwi$&6
zEFp_qdk6i$7SwGh){vZ0HVz=&!C%*Usxuv8wDF|!yy@UtuX`kU0H@Zh6A=XLuV5<X
z)TqrSK9cfmdP72%-~%7rXBbrnYRaDR+DMI@p`>z9mTr*W^<8p$6)!z`Q4j1$U>9jm
zkD`-<@0FC8X4VmfIONniH&XFH3yjjZQNsSN$ooSR#vnn4uTcU@VbzoMhbKRROgi97
zo&xRWWluj06-kZ@d@p6!__;Bl^$J!c4M`R6Mx9;s>cReEbo~k3X3(+k=bawt=?Xp-
zgk$|5P8MiD!HI&^*IWa*aGa5h?}uDXq@B0Y-AN)+lc9`D59@)c)WHV_8oZ1FAK)1_
zFU;P$H9D-dZtQpr=)B<ae2Rz~kTY#(-J7{CtJ{dwuC*!P;apzaffa=exvDme*gf><
zInLSZQd?$iUxO_;r_RbU+j09(w@+5~_~IsZ_QD?!=i0kPXji{7NwGANd+S#<*ZK}@
z=uPp^P_dsp5dhEdq&_&+oD>>b7UXKK);y;EQY>19E&rG|$d0n5cE^MHF^`;}QOE1Z
zL|Q-Rui2}dtve40S+Hrd1!J0M^Q<Z_ohd6ICEbp&trM=7b~Y&O9b`Vh?3Lw{ivdKF
zMuYT_{dJBV{b;?!SiMLF7y={)re*aQHk{4Z&T_F?;=@42$i&pTxghoAC{4i^i3)YM
zXa5?>u|aIlhCEhxFb;R{3<V|#C6M)Hv;%bo@41Y9o)&55`AolwZ@$MIfBtSQ&Rffi
zW-*y94`^E&yzuRAgbtPu^JSp=$e?oLPw(WlR}kT!FI(pN%{-|Blz%}qn%cpZ|Lk|T
z)3u3gAIE9UZaQ*D>E2_DW0}MD@^O+g^pc|e&vywuX-TdT2p@GJh-*9QGz3ENe$en3
zJm#o?GrkGnI-Q+zLvd~dv}_s({V5%901ub8%`(A68%wR__0V3Pi4BOd@e^xdj!1Le
zW}Y_crN8sWQqC;-oLpyk1#OG<&D$C`)OX<u8~~9|Q1CN0<x!y#nr~&}P~b7Nx6@)o
zk{F;&B9m08ZT5ol6KN0htp~$p`I6w1OtOm8X=yK?LXYt!imPo(rShh)j9p=QG6o-R
za~hJ`GM7IXfo?6BqzeE84ha{sKPmSw*SW9aiv2;#o`6T((xOV60G-Oa(baK5IvZHj
zEx{?)iv$wcZN0%j#3MJ#o*$!SO&V=(^W<E&>00`@Wqy=(4+mIFouGiHc;BPRC}Q8Y
zy>=1A?2c-fl}^r?X`SXGw?oZ<m<5*<1vZ+Dz^6=+riEX?_GfTT=&V1>XyhqR;c{YP
z{gcIQc0MYQbCW`rnkg025YtdQJ*zBDASP{2m{i9I>%kIlzhg!g*LV?3jJ<lRWOwR^
z@5b$)DifCkS{p3kcUJ5hmQODOV#dLB1xGsjgH;0^+%9&H5XTe%zxh=CU@Jd=wnQro
zqFWug2?0&2sAWHw7Y!W@hYw`e=!v-i)rQ)o8{3ISePw!_zqWQ(2^d;Fiz5WLFs5VK
z-XI#6T1~8OgAz8haQCc<q6r)=F|k`S-7wcA{Upe#aIJ<qCP~&(>$kQs^<LX@HYs?<
zD@sS<FE1JSJtV}Nr^R(z%rwcu>W<OOkL{|Tb##U{oNX2xeA1$9EcyTxraV4frqpR7
zMzBjDFP6IwBx;KtazUj_&`z-`16t==v4k6uHN(U(qGlR4`4aJ0f+KG9^4`EuazzYi
zt44<3j6Z7KX@ZdG>DW3Zg%%DIwcbsuCv9AyvTwgnpU~!BJu-C9Zqe9*cA`rQNJ`nv
z8dBFI5BcXcYfF`vH82H>R<)Fkhb;^P=cRM}T-3!gAU@NK_lXaeF3q__bCNDFdy`_y
zEz2)~D}97PDa*<ouKQV=ZMIvA_mqP1ZgiVxBn8gYZ%(X%C5h6u^UzbaHzc=DZcUt`
zRez@JRE{i+=xtjhf9z_3?3k{4&Epj8FZAQGz)4xkcTjpJ<+~#73WA3A4(%22V)O#{
z5;D?K*ZJ*#@$SG%nlip3t@aExk;L=3TiU&NOS@m&{9kFeKt(SN;+eTWP@nzO_TvI&
z2%A={sUpmptdnsw5C_zZg5i&2v!ml;heDWfQ!6-V*VDfV$1wWc%UkJr6~PtuS^jh@
zwWJkPdbxSR#cFt50y8AHY*^)90(^WYp$;Yf$gXcasXFhqAp~rqYn$gcr6NSoZda7<
z4nzJmwlo+ygMY;)PXck~6Mz-+j}(+X7H^*PMxpx`6T#lx_m||UXFeA34vQfsEj~zO
z9`k)QWErZBh#vf|ZLWq5Dkf=|bP)YhQ|hgtH(t(1%2V)pDBYSO5fZgy{;0k85u<0m
z&wZs#6XBUHb`8O^95Lg^oJ+tu1iWQ$sdS)*t`p^n4u25Q8j&Bv>F|#vP7k)%;jS%t
z3bWd(X-FDm$iKWw(!QP-mI|2yo&oJ|*Sp_JCvT3kCGns=`TH6hAP<sVJXZY7OQ>S4
zh|!|qghO(sLkqR>@Y9oY{%yNAnhfR`&DHZ5CB<nQ#jutJzJb{j6VK3I@eQoe$(jP3
zl3htr8g6E5Zr7@9W3-*_OF66rEqVXd!<o}xcO+N;o>NZxE$$jY?;40aH%FA`l|uL4
z|I^Vc%_r=;KX0C^XZRy`=Wd<(pr&E^BA?#bEvLSmsdhytIJow_vpc<ZMKv!gRok#b
ziL4nsM^`Lc$j^W2UI%X8w2?hv4ONEsqRr~aha0ogykrHr)DeR0A+&@5Ril#S2GCf}
zA+pV$Eyb1cv&k-Qwni?-(CR4)&%I&kPj&k)#9K*ub`eL-(j)kgIcDNAoHxTfTY2zw
zU@T2W;{Ku3pHgp?WxD=hpsebj6Nc!sFZx_kJU#(V7v+qX^D>>Kv-cDfN~Ur1M|s<Z
z#G<ii+zf2gZUX3EpoJxMlD+7vgMCsTi=4LRz@<{PeGb9i{`PZ(CfgsaEMg|sI`T1A
z1oW8z+t<&3&JA}YL>{mNp=EtLMEfWwPwnsT=+l4%DQK-c?=Sk}TRhZc&>~=A$RD}4
z*6`_3SACyn&EVC~sOq0RgEX;T$4W9-@I2RtdpExsxYX%qKruEj&OHK}W+;!n(wl?Z
zX>SNTt`bL|+H&4QS>oe#F?`r%+Rjr$>uO<S=MY$@j8O(88}m=}?^Aux$|p1I?Z*;N
zt>(ZgOv8*Nit(#Eb9rF{+KWwE1~l+<U)MdZyh6R{MknDzo{=N$*HM=Q{mk}-NgBnh
znvGZI&G@k5K?YiEFv%F<a)D|h*n!S3^F}FgMu;?IE=rVT8|fhNF|0RfYJOMJbjx&1
zTa<z8yk6`OZNzL4L*3x)PlpjnMR|)R^8opG$}LSuOj>j~kK|%LVD}N%2|U^!ZgPNR
zG@mQ54>gB71qjflJ(4L%ob_rp;hE_*^t$fk_B$T6EWeqBja%ezg+$s*nD%@5&ec$y
zmm+tl<}ycN3I*K@9Qm0Llk5J7nmx1q%0&=}c^9(0%}w0KNXP}tU3F7%e#KyxBSlAI
zK0!+y{^MWnT*W}F;mc1?98MPWU*wtXe|^~ef1~0lbi4Q8{Z8mmj`SptXOsytXyge=
z!7}=lrpIO6uwTsg4})2Ha2LSxkEdY#-0kf-tM;1VKfD@1#ZMl+q$2@d#opd-nj9Pa
n@m9G0{~!FnGzM$9dsVfS>;Cr^ft|MR+)-9gmoJxnAM`%}@jDee

diff --git a/two_way_files/figure-html/unnamed-chunk-16-1.png b/two_way_files/figure-html/unnamed-chunk-16-1.png
deleted file mode 100644
index 8e220fa6df86ebf22375f181372010f0ac203f4a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 31651
zcmdqJWl)?^*DV+$xC96U*WgZYXcC;@?k<fxG}aJYf;Tko7Tnzug1fuBHtsf^_q*Tx
zn7TjaR?Uxlhbrnk9N=Le-FvUKHerhLlISReD6d|<LYI~jQ-1a8t@Eo_ZwQdyz<UBX
z&+_37vV)Wsypts4-{<S-?K87iugG6Xi+xjdPdi%n(o~&o<2e=oeo^4NwSSTJWq&d6
zLp%XyjvUjsjiJzAQw(%Tn%haioB6*TlwOO=-n(g=$V}4t{}?cf@#HJ;93w<9t9*yP
z!KRNi-i7LT?Z7TKK~pvAEdMN(5kK(I+dhPLBvb=5AAWl9xHU1n)~}iK8qQcPt(&zM
zkBE%?05|Z}t7xIElYe7)^)>XXDe}Ju7xL<N|5|=5t$#y#MH0&N8s7ZC5QF~v@+%^x
z%)d74ZS3cN?U-L5_P=)Tf0tiJdl!*SqmUc6X8FbA{rspuaj+n4ZJN!A$IUZ-{=!&@
z{R3enO+^p+Cc>L&o~Y5=U?Pg$Q?~c^q~G|sfL1oeObowPeD(Qi0@)(|l%H9DNfCUD
z6K}gJoR)^)lg^{i=iuhxf8Hr#T|v(N-p9OLU4fTz!OdgTU-nr0daS5qSiT+?qcJzv
z#%@+#kok@4X*&5puVm{oKcC>zH&=ZGp8irkU%EVm>HT~k^JV@9wv2#_jlF}7I*{a7
zM;8a;FMu!;9CCa-1}_BkORf9V?3_H%<LZ>-cdgMkW)Tz$d}lwRfqg0k`y@8gB?_qH
ztU2dVm_}A#Ft{PSg25;uh|{7R*7Bk2@hjE|NQTwX(UZ=MCC<3ieC^GbP`bajuLLZ;
zKM%ZWuT-34Od_wo<lKSD!D5Fs7)+`}Mryu(RLNB;;KO7@^XQbYvTd2a7n-wKoXujz
zY&z^1+7wMn;d&HTDJ!$%(TP^5bMW@|a^IRsn`_-9zNG$A;8|7vO#X5^=R;mx$Guyx
z$J@~M*;=H0{{cfq#jdScb&<sIxecctac-xR(!=4>vi(v1q%){{v&|oka`0>RG#|<*
z5@A$QV>GT5B>ack+GCTR9@U_$S~}dKNC~5e+=e_#mu6-?UO*t<Vy9hUIX4l}PnDpz
zd5X9^gm;eRE6^Iior_EUP9T<X`><Uxm}06^(vgLPEVVMk`stA~Tva%25sSLjBeZ_`
zc^IN?LyUUz)`p}b)xoSvh!=1_ac~gS4QccLKq-S{51(qBY}w6~BP-jwTmd@Uw=!pA
zqDtPO(aiQM=s|-WKYM%c=joo!=;|T_1lt;hT^RYRXjo>_u&fi!c$XYE&d;izM#yLE
zt%Vwl2=2yy`&KDwB!-c!;opu;9NK66rqcD8o(>VKV2aeW*}pougz0K7Ei+nBROi`k
zl=in0#%e*9E_v1;egc>~%>ikfz`r3w0hTQx@V#wP(*!~G8=7}&V{=)w<K|`wb8ZA%
z<<?Lrbx#ps$Ye3BMPVx85|NOSKi5pYU!1!;%U;3G@4`JgyD%epsbQI2s(0foxc3Sr
zKOHHBoS=2>EQOq+3+M~8{u%m-DA_0{p57#u<B06X^O6qu!NOz*``ERVboDllcr>Lp
zHHC%`K~2xr?b^oOVcn2_NmS1knqgy6u8xyaPd|D=?{yB`^rWGSjvlMDbxX83a${XH
zY%k6Ao#{@w;2N*5sjvV`*DXit>Ek5<XEcua9XwuIH5>2+kd5s#eync?Q0+Ez`lSAD
zs&wBDpvi*INADjUnLKH#YL~vcfPEXxGWBznaU1TR_?s}I6`sVGH30xOM6l=h=<)4u
zOB(X3fku62AJjVajY)~JtLH^l#nGeN!r|lTO%eM{@fDx-+zVsdgH75ZBwLPG!f#uB
z9kz5qfhN7j_-y!iH#aESp-h%lmbsheT?;<+DP!Tp4Ha1S;J78;B)1mLj!#h!65rWN
zG9f8mSLbB1y}-_H9m;pHFl@-J{jrD|!L*~k^KKDS8`${m?a)F7S$`$D>4nz)Y3n<K
zYTZm?;@#CbTYsm;0K!-Jc%JYRE(VR~4WpyZlrW|5yb7><`i0Y^yy%VQ$y5DBhgD5q
z$mpA^cTb45)q}1aPCdjsBvgImtfqW=3HEgk-DlBv#+|($ZH<#LjjRYmFY^mn`0UK1
zN;=o%X6Ec$ViS?Ki-QeoxpD8%yw7t>rQ#B!1$lMe-#Z~GY#s9Iw7#nVdSco$J>ACd
z?i>r&=-I7a&He|sNhQ-(b=qZWCC329d;zSy74i|g7iVoyAs0wFZdfw0VZ{Db=KR@m
zJO+QE$cfeV;KhcGA>SH||8)LO)l-z!&DGTN&(+(fM_;4tMvbxGOAZXT5l9mkGoc(&
zwo>a!Y@J+o#Ii=6RkvyS-Ep$OhSwf_+;?SS@_1JMhqrX$krKJ%a~59+du@VSJZ0j~
zl?hSR5(n6%S)*gwP7J)QYUD)dpXe*LxR6sg1=!Urt#Y|?4f~jJ)><x%Tlylvr>5ZD
zy-Cw{SMR?dM9DrzvANu=tz9R^$?unKT|3XReBSOx$daK<McCLxvede4B2>fKn2nBX
z`4d>4TsT-JeKmKyzqlV5w!c>rleOS~ucMiQe)QFZMDmWZ?O%bQS5%`dtRF*xGX>;f
zf&Sc?j}-S>M^_ida_<2?B=6k_-mjN!P9~Udor&kl*~YgbtCiXE@U)Y6G{1H=LjDHd
zU6m}INTkl2hW978oWX*Tl|vQUi?9G$ANW#tH6|+R@c+%j#0mAh$@kwH;@?Y4iBV#s
zzCCK4D?Rzle~?|-1Jgg?0;NY2l~LA>TV%vwl`h+Ga~CiK`s+zc5@F#(#{&A|82E0k
zLmcponzzVgh4tRdQ8-W(e<1?5WV!q%Bcr!dljK)NE^SN>{vlZN7-RnF;@qRET#L1>
z_Ll?R8y2@4y<9aqWuiz4>uizT@=E_$Mn;RE$)N5KEUgLhRy7e9+`d9Vz9i)q_jN*c
zAEYJo4`wGQahsxH5ic|SdOBa4rs*kl3^TR(>QI;5w!*&hv%bFm%$|i2HMY&TyG)?@
zUpAtwr<(poQ+~(JgHZs{3v}JLfV(jfpjq8~@ABAduy+!nUF;Xc!I<Vt<h9F=x^mj1
zdF@pWE0(4AyZL6_Z|{c&iu6K#@E-PBk^V#lBs%W5ZQ`_B)yl7C&Uhi`wRmr9_^$+g
zmgPJC{hsfLBaU|{??<Vqe3K&^iMd9VT&N6HNfe~ZN*{l$w^u8JsDDYwM?qkh8a<3P
zF5&%Uvg^z#IAM4i)7wQqZKp1-4*_NXe>ui#CI(^VDl5~M8x%tLTE@!On`IuMCr@lU
zY#K)CO!;*LM#}KXu3t>^lpOKm_4W1wRvYz}iFb$+0p-=ufm8G0<4LZ2E7$xV0yPto
zeIbZ_3h=*>r^5Z-sYj8FggA8um^wAt&j5Pu@So%J)l@n<qHdkIl=ny9L=+LCiYLCS
zYu%(xyI@lZ?cmz5!rWIOfQiX9-)6q-l2>Q!m5YY~$O`s&<SAr>vc<``ixgz6%g4P_
zb3wUl_U2@gToEH`k7M=U+w0+n6AZn~<BsCfKbr;>VFYBt-_J0g+<dQiruuz4$EUZT
z<;~?SmI#s(uatl!Qlh6_XPF|-In|=<f{SLByQ3Z4%M4FXaA{bBPw_CeI1i7I?zUdt
zg+-6ZSmkc+rKdCRwKlhJ*92_#xRPVBFd6l&X4~$uH)t%fniZ;Bmxyb8CnXZi%*QDw
zkv$}xDVt}<*kz1Ceh?7c;%HA@oSJ@U<MDIz&NB$d%28je=wViGJZ77^)nJQe9J6$U
z&3Hee@(CATB3vea<ok$S@+X9tEFGU4nCqLGb?EKv(6yQ##fbL_A8!=CSRYJGO#Tzs
z{x<o9j`%NP{eK(ae%L=jao-9c;d(9?N%Gv8#=ic;lbd<lKx4Ew(fwMaueAyCs2A&S
zInwPF7y|@8^{swHmgFf1e??M~yKm`W#Ez1^X;(l}V(d5viFZ!D+!>{Gl&rnE)bbw;
zto#={|Hk{@Jf!~rG#`k4F8|FNkzJ6}D!#fn_*|@R?Fx_bihw|x5#Cn8C@X~aMwk88
z=KzKBXf$Wv(D01ACo*dYWLI#<q2r+;+T~@NRU@RrxkGYPHohvc*6YUJz@_XrYt&TY
z39+N<PPprI#~q005a)CRU&8#DR;w&m0RN%>YtNYKmFJ?53fWBy0|n5me<ue4g?}0e
zO%^1#-3~4A!MX8jW#Ez1Xy%?i_MIqu!yFv&v7+Hn?rG_y*!_6m%1peU9X3OGiRQ`;
z^Vq!1E}3my#Q~PxY3=uP#`m*)R8EAR4sh)*eh@)QuG{=BxsE$)MKH&N*f31j!RWj>
z-@J@J^K5WqVAI7WynSjWQk@zNlY^EkHyGWt4-P+hmu(c97q&H89uHyJ-etnT6u`lj
zsQNyDx7(`sEJ_{P4FO?PhP(3`$4$uGJnQI_*>kn{_~niNk8q}B!pQ2p*=yFeHjK<R
zd2>bYJ1?^OJ&a3zvYXl1^+T$^K^m(m$-ff9jl125+kIRcPY=8pq2^EKBR9IGefWv;
zr1Y))HZPL(zZ=Y1rb+NvPiww~7@0{CEkNSyRxuGUj-@B!Q;uHD4;JkQ7CQK{ow8g_
zq{I^O0_<Gx*&kl2SEr^r@{06y)W#KYw;^vNt>ToqBZa4)JXPv_oLlS5@+s783Qsxa
zV$L5c$`@Xa59&lUG)O$nW>O%>YN$^t%rS0Y(Sh|r`TD!Xl_5E^r)%HCj>V;p+$L`;
zw+lDKGmEkN+o->l6Rw#VUaqs%JcvgxybgE6erEOuz>fNt^dqvdMN}l@(s2jTAn=+L
z62$>;egF^%ID1#8@lt8F-&Hx$b5(K=lwWak>|MtJ4){J~TYqeFsrDApv{Z@Y+%91S
zQ>aI#(&~Dp$FNT+u~D>Mi2E5E<*ON39zlZMhu59s1jzFNP;f5~c?!2$?uDCGvNSa<
zTQr(Gx2*yRt12fB7P7aa?O~T@;NMNo%_PI}+#gUG%V6BVj@s;0r?STr|NeO+$KfUo
zXPS4R>WKz}$+M62Wo<t`eg#8^mQ$CgT<hjFOJmNC5CyF0+HQ|mN!K=K=v?)7{Q06C
zpZsrNtAM#2;XiJO`cH$gTaBf?#79Z}QR<5@*Nv}({yZGJeWiU*c0w;_Y@BD}ho?7B
zi;~)xM}{|7oRU$pj8zryn{MuCj{;&y&olZQ-FLg+Brg~najL<t4WK(L=0u;JeMXy^
zu8W@bbvS=Tjy#BieD2v{*;do@Z?}&u>Vo#mH51EtK8S<@^crkxb={(~1rW5Y25&1l
z^mWWgp6l5V8D|olz1n;#nOto{F);XfR2%#-8G&W<MkLRqgf>f%5&@S4ED?;h@kU3Z
zj5MRO{-EO<RFV#2Vcm9^W+-|Pj)?J$-HTOOE_&(T?Gk-QU%FPW7u4P~8)H7r(U1g{
z8rPY1`@v8n(ER$2j|h_G3UDqyjqp43DhKZnz`>+Xr|WcIxV2v>?WuZ(KSpS&p}~|$
zV8`dKPR~n)fk(`%760^2(P&)ZbR;I@w(ucM_Fq<|2cK^RSnAj!G(vbcsc)9m?S9y~
z0~_=jw%cTU*WDsK&t$(9IN;<x>9=`~>r1fTz*<4+75(em+#odoUZR?!USglxCM&21
z-~FV<NCdv^5R7otIf4teq*9FX84)rn7KWBJi;6kiW-p9BQ;1a=nvBwxH65`^J}U}{
zmH7aGMazXivLctA45xLPzE9##q6)KiA0HO0&b6Cvj2hL}`jR(~3auYue$e-+Ees~O
z)<m8ubw{iP*PIbDFS>LDf;YhH`aZ3Wj&Xf6XN~PGdJi?d-kHh{T_LbtOizg`)XB)q
z*u%gUB@#Q}`;8AvX@mi|#=D>;Uw1WTdD|wngJ5Bvh_O)J#dg)&S;I_L^<V|6Q9W;P
z&q^e62%zg3y2fQ0ITb9W?wW9oZCPF0K0awRa`rWK=?qo@Ds&7zb2#K2s*K*e`9>}Q
zZ3pe+&7L$GH}9p#uMQ4)$F>AMK3#atboe@+1^k<yaUD(wt@MfOQ-ID*k1%5tCRT0(
z&Ce;*5f`q9wR>RZyzoW$=_)cspcvR!giGXub35C9f8(XC4c4!L<&4~OTfblo7>n%m
z^$umMT~_y%q!SWFU=sH%$X%W5r3!f;L-q(Gf&q|af*H4ei}3RX#gwJC68IU^HU}Em
zsxEeioA3l0s%H4$|6V|$iUfN2{X(1{ONASjB#uO}wV>y*+n-%NJcx+{zr(K{Xtac~
zvc*G@3e{B`msM^X+LDiW-M<If6>q6iojfIjTS`401Nz!}Ie8o(R!Ba%)sVj4S7E92
zw!=<fp$5oDE+=HNoz08?Y^2B^+=&)iMSZ6q$wbf-Q#fux=}su8AL*AoR%6)rGZg-T
zRRGUfZjY@$0Y@j;fgV>6_NpB(!I!+}Cec6ZoO~u^r=oYm<>!5D?iJ=4JNvxwPbPo;
zqHd>I^%W$hlqqQQ6rQa~ikUP&Du3z!vWnMd01CC*R-k6_MdfI;8+`3td7Y2Gy8h<4
zHb3Vj&)A0sA9>)2)urTXxArF8g<-shA}c^`9Y)f>IM&%6-x|d#-0`x#d-K^7i}|e+
zt*5}1+jy~PAeM;v@f;&wcQEhzNZ)+(n<@(hJfjGK7QWtbTWX~u{G?n1cFB&oJp!{&
zO*nG_D8gXc>mo(M4NM;WpKvE77pR<Ea8j4Nvb<QrDy_o6<q>T7R9Z(HkuB5Xy!!JQ
z@L=e!xZ-}BN1HQ$+>72)L;awBmr|NUDhXSCwgq2tRzNF-OAd9Syy-wpfM3+VoT8UV
zZOdfxr|mc7{U#IQh!_j14BQ_4>sW`!`XhBmlb9UCqEiO8&0}T_q}slUAngN|y8xPX
zXp?`tUF*mU$x7uf96a5D`@WUppP{oMOUDT#$RLTHij|Y=;{>YUwDXq07`WrkkUMN&
z=~*sFjwAg(`S)&LVE!j|pTp`s{&zADPvi&AlOQ24)<(hmQpFx@5hQ}Si7}qDdFNgD
zx*v(Vfg!MCgf}N*P#m0h^9R#~^cVg%426HmC;s5N0+i#eC(<&@4axMTD**Fg>An3{
z--o{b0};0&#)Iy<YjDZqWx9n^$$c`)6EXz>Eyb*)Cy12J09>uJ<KV5Rm^Tfdf#dQ*
zC}*6fUm(^F21vTu3}Zuw8JVKka$H$KE*<Zr<BcR*9lx9@H&L0@;?^i73R!^tYyyi<
z{GpkybM-lGM#9Xg1aEY}i|q-3aC6NpgcWDhSmnII8S!RR!=bHkewgp)5;NVavq_L~
zf766yTs>EZb$UAZZaIp%#CfO9b0Oc0-?-Xf!%hn9yx6LtkV&+Y`3bi8V71TTmNMeJ
zFnmFOgz(0G2%TpO*(hIIr;L$t$8HMvNwhoV3z(H6aBuQl|I?;&Rv~v(B-cV<?!q;@
zwUbMZ!ztVqwkm=@biQ+FStJYEp9}B(%&9K#`6w+Cj7%}KYY^j`2$|!6@tA2(<Os8i
zlpBCcP7ic8GozJfKSp#ELOKMTZv({^Vh=S|weLYr=ABW0zOyHvGqK>Ks?wPt?^6XH
z*$WvYHh;B&T$IVFTJ7-Qaq`SuQ{`_}8bmlTP&@_3U=C4HPxtSUm%Twp2><NX%dNkt
z?&l4yUt#e~JJj78(sp*L2)Sb_n;h*v*+Fxhv0T^y2@N>O_ZDC|adHb4diDG8-%TCu
z_+t$M`&TW#j6D|IzE518QXnI5kY|Q~U*TL|+0cGoOj-R5?`8E;5q`eg#mmH_A8u>=
zu^9xA`AZL@{#7#E(_?&COo$?GmFrlVo;p~>S_sO_(*Qf}=VfH_Jx?-$W~Utgm^gOy
zPuYEJaUYiTK9l{^^-kjPl0*b4OutIiYX==xKYlY<tAmr<1e92r=+DT(kk4Z=r`?Mw
zC>05iN~BiNk>hd}kWzsMut7!i6il&LB7%o}Ckq!S!cVQ#k2?X7!<NB2%Y`P`2;wf{
zq)?OOq`V+S_RKl_Km=l8r#>xQ>yV{Cr9AD=w;yh6!jeH(^DNtO5%O~yZQxmF%F!Vo
zEw95Vi8FbFo9j0sp*)l_fJ#*jGHf}__=Uc1Xd5%|t#Iw*#zeo99a_q-L%IrTde}<-
z0g&M`=kSYu$NkKNMv1S$bGx+BRr+3;+2@XA9N=-1HxrAsM}Knu_!0~_VsQRF;cpDv
zw~!-+S!(>W26<VNkrVp9&_yOE5XKmr(~WuS_m357-OiIYa!>b{xMmZ7#_mI}y2zca
zXG*)Ytg(Sr&Yk_!)*(>g%$SKiABXw*5sab`V94iv*rpSxW!0!(fdS-8{Aj<^q5|wy
z7>>&1Pkj=7S>8F4<K#f6m^u%d1{s5{RAGbim2M~!v^MU!=QGy24jy-PIJ>6!R+cPa
zYRl9;r`Ugcz_;0@ZSFV~em^iB#O7mZnzO_b8mRVEH933QBi>F0!*d!`BeTmH4!9LU
z4kyZ26P$mKHj~2^IL$;(a?7I*!NdSZ!=+|`W5+r_eQ%)xP%Z`X*>pzmWW)a}xi}p9
zLSpAK>+S~JIcz~NCE<;Yx}^#k1vM?tVDvPqo>I3Eb58~|I0NsW6UfpUl%r+UzzbZl
zqJ|~Mtxm6uPwP)lubjahfjzO#-<>~g#WHkGDWXd8!z9r4IU`Hwko*=B=wse_yb813
zYVMscPpwVIST)#w@EUb!yrNmZe`ms$BqQ6o(p}d<dal=1IUGnH-M`WaqI9d(k5S9X
zZ*sY})|K2lN^Dp?_`v_|CUb}X8)AyaZfVC?BUUVTTRV6AFb)xa2mGDk7QaPHkC$uv
z!$Hu(CBnTiaoQ4~FC>9+MvY9Ll&3$1{>jT3nwX~5yImvbnAM%I(t9%er1a$>^iD7a
zv1=4x;{0s>HZwx#^{hJH6gqLNlvgs`UzQG@I)XdnDCbj{+AIxXmJB!J%7>!?&q=om
z+5u@pyDG}1{S%m~0}E!v6b9xS)#65TM)X?=5t+wF`o@mXfW<jShm;!I9CK|*KAD%b
zy~Ssl#Or`5m-5B)nXELHzwHcwuR{Ru>vSG$<D5HSj&J2&<bX~{(@^|y$xYgY3u|Q#
ziIz6L5t{K0z(z~&PsQG+{Bp<vs`sPxwO@dP+z1mHV`}~nF-~jw`x{vw0@7JevY_HO
za^VQBLOqMNS`60S$yozJPF`7cEUwit7ZcyibH3u`ZaMM#8bTkZ;yCGhy%5gfW6)Xn
zyZv@Xe8zOYkY5*rIfP%{xk2;U#z>LdY*dp)*F4cAIsMuM)J$~uMbvbfu@<<f3CVxC
z>s;N#BdIhl5NoNdt9*AixG0Vv9+BJ;YoOR$fHT$B_B(iX1|47LL4YoTD4NB9bk_xN
zbu|j05)*XT0@@CGSsESNpXL8RTA%oYj)PB=8lWMko(DUUU*<bQ1{^AOe#wt65lh}5
zVWZe^%<$40D8i>3qC=#IBupYXvKlnI?)Ty2g&0NWyM}dV4uf`|r6|}w_qusYdS;*Q
z93|coAGK^(h?8>OS&E2o81R$KeD2G~QDBI#3Pi)I$8mYaTv|c38Hd%Vo)$&DeWv-Y
zlqkOtm>}aCLK2ej0tgrsvTWGOWj2~|yTtweEz7Gdy4*GWe%QZxT%rBLi{<hsQv;R2
zQqigb@)AB)R|=j1Z)Yjv@ZU(nA|F^8Jqz>=HKmG-XJ<d$S>AM;5~2lpapPjRARDb-
z(z|T%&GLT}T4eNA>==#9%n-dS^k*XAZvquHpB}JL1jfKGu<4LpUi8k4qz(78o`;6#
z4fi`qFOezt4QSsRK_(*tQVNMyP?(M*u+CJOV*Ogq>a|^?NlM&2(N{=Hm;Esg9^R;4
z>s-iH4ufaPW;apL$F_WR>pZ2beC~^Escz9&6uGi3sfO%?LsTa-G$9wX>HI2?K1(@-
zc;BZbGTmQvBfdN+<P*w`1>F)P5zu%n5T4kc>u&k{tv?p#oW2xax(`_%X(9c}G`tip
za6t`0K?Z&8k%x>E2i;cOrI}V^7=0t5P<6FutrQokR%Pnn5*_?<rbe7hh<+8+L4R8r
zbW)}|+n-)RH55UxGSA@{o5~th+uA)cpL&<OU#%SPd-AX}^ta@GHGD<l&gdtbhF<6g
zTDb@ImP9dSip<?jG{o@C(l!4)TQ!`HZ|u9MlhKu!&KzPFzYv3d<uf)t;PaHFCQSnK
z%=P&25zEt9Pef<a-<V8HG*Y!S$zJ*!6%FfRub>Lb>$gU<gq<g#=is;mA57eK?X$3+
z_EqqaW{9qLE-cw${Ex&lT<=-uXqN_*OWkj`^Gt~r)H{?pY>wZotIx{+O)}{dE(fY$
zPu|e>v)Ngm$Uhi@$QN--CI`~nn<^MKICi<iede)*f9-&JFc(}5ztXw)M$t8J4;$H8
za}-pp&e3LMeFKf)tZH*K#yR#~$nC?-e`^6Uh8YCRlATRM3}(7NNv>#XuR84mX06>v
z?W~%#4_hA~SR#EU{n~c^7<`UdrdR!oH>D*4K92jQSDc8qpE+$!x_S#<;uRQFZ>_HE
zg&##i9p|kyacDn3P?7=NlhT^wS`dJ~p22d}mlQpfTzuR=PbvkK@rSD9Wyd{XZ8i)V
zH2Y|1vsuitARpxc8g4Y|5*KkNFO+3^MRs9GD*1E=JvZknn=!g{GAzYkcH10=A)}^d
z$3|v@DXVq+2DIFGT>_ls24QGlsAITs;pTsKkRItTB{|g7U2}|S>INhgAocz}w||VN
zE_@mzBE8zobhJ)iVV0S%&wj9<feJf;E9@50SUd!h%XA1SwOVp<G)|?1ph9}h&z*&x
z9X13oofnZPtkL6v#0EpqWwn8mimlYe!RHJ8;~KOJ1$19e*z|;?y0c!iTXwORmtSOP
zRTcYvKH)j#1WjqMsr?2TS=clQiO|EJC_;v-y7aoup+Gb-vU<(80Cu?hP)OPXKQvTS
zKZW945Fjf^|5Toh)Ct@5xj6`LAm06w+N4Tr;%xv0>N9^J_2s-rPT&yYtfiG!v7!t#
zt&4)ie*yyxKJ~x%MoxGuf3o0G^pzgt`l>Jg=i9&-4`*<-YT>sV#pcV_w<5K+LxBk&
zTP~WmTQ@<NwGo-UyApozNw=wopnkWz2=FwxTx@kdBc<4y*AhPeW8Gv}X?;<%biWoi
zL(*a(z(Qm;Yi_4@22b`WJZEV-zQObQ#Ftr=4#(rSBB53jtLb*q{a5Hm=SycL_5%Z=
z{q_n4@Vq_|qO$B1gNjv?8XZ1FOxDy+5u`(=J5j9B&Hw^wk!vKuz?pD#-Di6_kpLjX
zD(ySJPE%vB_#%JZ$iCNprBJh+T-D;)v)zfC5qG_`F}VqkH0@bg?}deBFQ#Rb*3!M9
zMUf`Q+I5!~uelu`fBqyxYw5V@0A^?vL*0Rr6`I93!(`OVFdq9ou|&5mu`uS-Tg~(J
zYJ3eT*vB@1eNALR#5*QrC9^sV_s^x5byH5x(+puRa9C-2``mxo4)>Ro9TrE<Po-_{
zR4}&s`*M1EH4zCH_L>=zLn1Qu0k%G=l`|3y2|(NSDvH?f5~HaYKBw0-BM<zC@8vJ6
zL7uhq#?}n*#4KzW51ElfX6|O(XIz|+Z#0Z$dT&Ml_nCIV<&?x`Qd66DiTa{gl2u)O
z^Rf*oYF=gBTxrx^fwVIRW};;Sjl^PWcP@~oT~kB-oCvhhbYk{VHIsg_JTyf!3-;u1
zdRAWC8|SN%B~SzF{-`uQBP<~fAH2|}IoEH3ZvSRd6YB(9fJ~0EnOZ$T$Nqd1Z`ML1
zqH*{@<lEsE=S|z^L3g!s*wI&+fFnl-1yogPo=dhJ?sRpt3-%J@8{>$pen5uahtPsN
zRafu|sM=d@gXxeA2RN*)@x00dIQb=a_N&*ix$}es`uybz(Z||QiSwqOxNW|bU%;pM
zD*8+XSfLFrKHLjBPo|hV&rLiQsC$_)vb}b$nh^%z|0jAEN_fykWz-U$b2vCE%Q&7N
z?H;LrW_P<DT$mJk=m6BoZhUHPz{lDs8+S0s<|4#kL2eyCJ>8fbcc{eA%3WXovzxna
zxSc!h5c6Z);UB|-1gBa5kJ1kPPl=8wDPN7>Dx<C18z&5bbs<!lm!OaE!HF!*%_Vh|
zkZXuxO}plVh9dcD{2S}<7JoYJzZSgz#{Yk7qmW?Zr{gc+*;O?p$<=2&|I^#S3gHVA
zxz5SDmDIo()9IThID<50doMs?y0RqwTrS1yxw|3c4?Ur^xO@J1R`$tP;}61K&HvQC
z|5Jon|4YWN`<V7mSy1wNyf4%tI-ir{;)>W*CJ>d&kf6dP`S2lo+~V8{En@TO@hCT{
zd3KlOvAdxo_4gCgWB1ZVE=d3^vCoB+xstUqYvj{d@9*9Bqg;5yGG3Rlw2he_mf~J5
zg1lRsE+2)?yK<v#_FdYy$JUyd>AAV2lM~fl>_YYB-pDCDg9>~P1u9%`n}2(ecp0Q}
zzHHlrf&4e{mXGMU<gZ8>>9>IWa{9h0F$U5N9}X@AM0DH=jG=G!r{4XH4^nb*rw1Ft
z6A$lMF?F8X7Vaj?$~2B>U(#-)Ebao`v*%mXvbr7Egy|<2rXU;_)-8XJRe8npN0l>a
zsOnvU*{8NFDdPufvBCEC6~j1fZEg2)U-CIbAd(jw(x{Vn_e&@3Nza3jf|3)R7tbs3
z<ez~{GTI?#?q>Zh$vRY=g0f#r_6BRu26ze&Fjf>(F@7V%Uv?`vqbv_seuLnd4n3Ga
z<#s-hOqvn9gTF=lSq5>-#==t8W9tr>NYZYl0x3y+z+m!vp7(IdnaFakaP#qjjH1@2
zdD)JDloR7gc=X!so({JU3wC&*LrDOjDCRIB0{72vg<-=hQ&aZU&t<Dqs_oR=oE>g~
zJ&Z29z0lM&8&2=uc|3~V3%J*Rs2+UC+OGM<<JEvdTqLbbH#vA!;B&Yt`*c4%KhQU%
z_{gvg_@29-(F2u@lt@<3IdN@NssPCCmyS-(@*8B<Z{!77m+l*$HRz$T2p8+!8t<zW
z0asT$C@GEt2D6(zMms1yBH@EPLLT)W%pSSI7-%rEludrN?ss;*J3aS^%$|1ks4x*d
zpqUjW5n?`FvQ{zRh3)Chq`j1}-Gy@P#qal0V~BV7IEU|&*$4aEv|U8<r`zKwThu-}
z>#-mfSllrk46mgB7vCkF5#a;&l)9d530nX|NxS|Ttws4R!OGUPW!{DqCutb&BU8NU
z8^oluedF;={)9u8{&sEKp0r(!zU-U$!df*TkUo3Y$|iL;?>|$vn|}v@PS1+Yz1oIF
zifhm5l5ZJXugm_l9o|*48ZDRS^0Yr6!7q`A^TScQrTgXP`6X_|=QTGe9#x)`yX|48
z`Xh$w-~{ADd4s#SlKuopi@Njf!Fh%A4Mvkz?2muTd4R1Y8Eoe#bjM1(OFE+Oab2)(
zV6bfL3tO@2+aBe$wEKnr^q~m$cxkdEI$d1zb|^q;=MS9;sl`ljqwwLRE2$nCdh=(F
zPO_hOEDv87d!~&x6hw<@uaM|mwA;IF%*nPgnm^aBI|`%!w7K~@2voAahT&QiF~djZ
zZmU+~p*kl6Tt2)CpzvWZ&E*Z~9iE$r0irWbPw%jsm^c=TWLMf{Dduq#M(((k0V_5U
z(w86R5v{GC=kH$d6g;%uCD_GPR`1k5;~TUZXj9cJp66aS%zZcoGORwBfU_ld(ZcCj
zr$IAYa5m%^E*mRn(?D}gGwe;raa*#gSdQTc@-_Z0tA8vYIa}4C3pnnPlM2`+R3VL>
z)sgO7TlwzO=zY~+v1pAix09LN>hQO`e6nQTpgiMN1}Tkku<0e`f+VFafd!ZD^3s&&
z@vzhSrwI-6Xjd0CmoD4U4#2p=et~2ood>!A)>X*<4usJwY*%2ghi?UElrJy!E>=0+
z^mf?-97&qJLP*ec>zG{NT18x)c8?z<Bl>rpl(afdW9P^e`WDxAA9<a2co%p61&v>D
zKlfr8Rn(yi4ePoXTM6Tgv;ny3#GqDX&_g8`svQ%nfjgs*|3xJ(D8?>Wl<yc63X=D9
z35+<9K>1|2j7Np_rZflYCKhi@)!a`fkn3@5Y~9A=!xXH)znr4MGt--sz+)b&L4)TZ
z{p}hVR1+FNx^gw6AC`#J>JJ&Yt_ig-Ct<)uM{rEo{0vM1x&Ae*JP0S#pw<Ub$6trt
z?p4+0)@UZ+Du`#U;;{Hg!#SOpU;x3b)^VA;X<yoSRDogPh2e&!g^PGfa)BUqwEnF%
zZSB*qjko;Qyh%|84u`xEQ`A+PYb9<P-2yA;FgZAB!_ch?(x;PBw7a{3txyJHaR^Az
z+auO`i-h8*wCNyl;A_vh#kA-%NlCM8u5kPp#dB_PsnwG}QtZZAZ#q)%@RV?HAUa|6
zSw^XJvz_2_g&Xm!MN?xiQE@qb7!#aDl1=`yoR3}D>Jm%xT>b%F4f$gIA;%Y!irqu+
zDC?pfcYK!_bT9S-o6E{R|H0PjbN_v|J+p^@<&X3a8Kh+0TMPl-6_%=R4wat>QyQr_
zId9_ECsww2SMeI%EB3x-M<(qNWT??gokGl2EoH<j;=}Kfmn3rpNN76^GwaK|i-uB$
zl8A@o7Lga2Gc(&cg|v6Ri4M~K4>w_4_RlH>Jm&b5ZbXdqaR>1#uc~~m%Bh32?u0<B
zIPIQgzxgBvlfxJjL2wMX(mPp|i3rxb(72ebUN}hXRQ+9Q2;lkGPFIJ}WXF@IFzk{!
zBrUo4D7eL-ZNAbX?!xv-#qbjr&9GFDvyw{F*S}X$I6G?x!%u-&YHEoW4^($47MyX&
zleVdT;*h)&cE#jOQt~}6RUZoh9-%Nz&vRR4q~YWj?c*jdQVlLK_(9kAAal*!vC~C*
zdJr|uam~!vsmhl#yz_6p$gXU8%ejWkW85QmUb;Z$I@JcaY3a7H<fDCFHCC|3^9<&{
zv6J=)l=)Z-tDQrttEDe`u=8GCsbdv4Pvf;{9|k0qr^zBwK+Bu2Ea~f$xkiKfy3&)T
zgqNNU;2s`gaV4+BI_4>ma<r0_Rgi+md^I&?86{bjA2C(R2q&;roBxU{$v5m2o^(NG
zhC+;MY&k2FWP7>u3oTGYj7Z-u2M;K$CQC2qKhH!w(xl>w6b$zAw8iiP|N1t0k98Jp
ztJq)1qY$%C9ejz^<wvm9;d>*4*G3>{*9F~Kd{lH#8`4qm4`*|JOdc>k8@Daw51*Ia
zXDxV%8@9ca9SLioMqK@?yz9xG;pKA&{i}g&6jEcYcU&2fe5AZeCA^b?RYD%%HA$NO
zJi#~&p1BnLFDE=c)(0fu3_B0O+kO*tSHlUi$8IBG7DJk>^397!dp3?=0!Nc2>Fx1;
z!L4jk6|)z>`Gfg*b(q>E`ASZ1dmwKOlck7T)#rZXs$l0ZhbSp!HHm*Ue~p7l8*pW=
zQ1Vsu^`b&%wJB$68=d|lO>T#<&6w`;ICni-1RuB0rIMs0yRfsa3xAXjHZleEP;@Cy
z4KhU+aIy-qcp_t&(h<13{ddredHt<j%WRdOf_{3s0q*$|_sZ`=0%bL|z9x!(esD;P
z<Guzd+Lx1&Z2>RY?UMaGTTJx-5ERMDI^zx+eP3K^j6m12u;fAe(s@Q_O=4!@-@lM3
zsP{VL#zjHP4%RmFI@LWvb51=|hJ>4Lu-vE({7KB}=)?wT+1^-{k>$nFU)Y)b(%!+T
zZ{4q+o*4Dh>e)&!v=)dsR=-Q7rB~Xyy~z}b(|hSDp&tktTG|y`_1gi6NEu(B$ggZn
zSowGy4)h<r^BMd*I1BQqqBJ_z?|n}(xHeGZC0f7OlY09_^t|T}G6i?ZNrXa&2yTD(
z6|=dIev_rM$`8{J)K{Gc0-T^#?;4|kVI(hE<?$7s6Lp6_`9(+39MCAS!JC%Y7M@MD
zV)rtJj0X$utHVhZk?fKT?B>|~ma6UH77APjuxg7U5@TkO_b9}RGLz-takG0wcn0)*
zw()ZLq|(>!Q|FW-@KYi<uRrLd7SuMW{~+%*JDUmiIHXHt-aD_zyi$`&Y&?WtO|3yQ
zkLD13nDtBCC{Q|u@z9|vdz9PbYG|3q;BR`b-CE+JmTSG_3@<PI#@~8h4yhKejpi))
zCDMoFPMH0fw#e@=&s(L|m)-m?+3i+*uL7TzFdDNkme|Le+D~5Egr3?FxkGO$x|@r1
zwZ@KjixJ*0#OBLX<#Wg%@9mR+v0$n!AHJ2{_VUf+#*jx!&Z(l20h#G#u8pfv%lZ?%
zKxh~NKc(TFH^x#tTJ)xnl&6*gbYtg!{A2#)VSp2R4Gpi^et#w_bwx(gL&0sKtK$C1
zZlQ+4ZU5y&q&Rdz){Qvrx;Ee+5NIcpXm^8V4}m^L9M-p5LP@bO>!2qg<|iM+O|7dh
z3&4L=oh!1*w3@MW7;fjE;55^A23j!k)MSrKJK(0b`=QC^%i!X3h?QnP+#uocvkzAj
zqW)Z3_nGMWnOW(L8->cW9!BqHZ9N8wDKEO-`fV>+JDYDghrI_@2r`Z%<9colF~o2R
z`28&;pllkRDkMQtL%1`Jmp88p1`ZZ39knTvkHYDNd=i6St=L)v(ab^egDZ<1IFbYm
z@dI$~A4x8&^t8|Dz=z$oTbkwV;X;Z)`pS2-JjLJ{<|2JI@qHr>`(5LL&%CQh7Bxp;
zj|0@+J1!+cm_AZ(_SeaDqoTsCLhJh424|2Ax0%8byRzNRz<A+B7y~;=Z^hVo(HE}@
zyiiuv`c@pRfk@_$G8}rTvUa@P6$k`U9^w4qzU;?|O9#Bg!mX}V5&?Uo%=C2z7Z-*-
zFYji)bBmmMUPW!mA&ZR2WaXIr9aI@?j9@NCc{?1D^h~?d%6k^lk<JcB#+Tfjr8ZbF
z;Yj-9mkxcB<%4r%kawpHhbSL_(QB{X+xN@Eng<yIm%TW2(`2v(n+Q2OKMh$pxb+K5
zWqgBav;v!Jhm>$%aKfl+`z)yH)KVe*{u+eS{<Iv}<Qhk{+-bZ$nE>lhJSAL8?OE|i
zuGVl0ZK}Cqd-x$^0z*gn%=58ro;*QAN)tHoa~g>V+Q!Pdj{SOM34Ae=k8afHu5kIK
zw`2}khDe54M=~Ivds2(l9E32t9foNhWyadDF+$v*CnEGw_lTEs<asFwJXpAL1P4GR
zYG{LJOpe}qXH%|3Fddr=Vz<@UO4)}gQ<3O$1Ph{*X%v?XzWGdLxqIkszkSXfy?aQ9
z$GWxf$l4GlKL%e?3TjT2Q3TS$JeJL!UVAM#lnivRUvRp?caLYLIZ?CoA6ef%Y@x|0
z`QxnPtrW@T2;*uWHQ%1k%B)-CHZqreDR9Msq@Et`VdZG^t?qvar?-mTV>Bj>;1Jm%
zw<Ws4r^<xT(J)80NQBXTBwXK3#ffVH7`8t@XvrQJ!?NI=aq{wEP=&hr7QHOF8de;1
z<-j`!&9&I=;l4O5@hbU4Zz76%>bB1VNdJnW3_0aOjL^6|2qQV<Mp@@nz;ue`n%pHv
ztv4@tUH}8&K-x!Ljk$+>;b-x0yOJ}1*(^%yh@4+W9a=_%aV{n^9ryX}^^-H;DRdv<
zv{v)MjLrp=7N&hNJ?FK)vwF4+Wfc;zmnjT75v@aWEm!bzn>Sijr9zu4<#M{H>t4TI
z9|)t@9@UeFyDaK-zx8GXCOAHd-4caCVVWRsXa2o`ZU=Y{$A-nscZehcN6qUAA9vyE
zs0mY6b*jcL>i>Mtdw2WM`KA<ccmiUdD&A+uMFI~LTgTwbIks^0z|+0J<<;pji))I~
zKvPoe^g$C_gtDinXK4{qG)^buiA-@|RWttW7qIWARE?YFcN?3&Nu=0ZQFtv>l@hOW
z?#n~DjBCNqqMBgOk%+;src7&iuQOwkEygrYO?=Ks>EZdwzR$HQO8b-E;bQ`8$MeuE
ztNlJh%19X|3;n}h;)C+h%amFd+y_){LML0eLk@O?UIxrW`VJrlGA!Q!jT)Y>NoS5$
zm)&WjJ%fK(xA7oT^cSB@vS>zm)#<K45`Z0XDH3Cl7m|8R33+2&S_JKDZF>&q9()hY
zW;tKlz@gN`!f(<6u<T0{jEvcOcAOng(5~|#VebhkmVyXhR6g_}50^0#YbT2adN>=K
zQ+&YTN%0#DN1L$om{-pYoXuO;x3bhe*&w!zpO?Y2a~>4a<_nXW&prAcO~aT6ZC61I
z8#;e3mpfa)P<ZUQFbAt$jf1CY@cfo`o_Tt~twv6B-=3_l<1=TeOE<1uTg(T&2rJuR
zl8)enXMBkAKY$jJ1itLKt(;&iu(9Z<vaXwI`aX31U6a5Zmi|;TggJW}qit8NosaFy
zqOY?JN%;BEI`S=lnb_w!D|f0=G&}YekNusJrZ|nV<fdz*&)V%I@H{;7&BuQ9f5>q0
zl6lQ+=RnrxQ=hWAjWoP=tcShkAG)hnVrwD`FKvNWuch`zL>9f~K#_;*zE;vpR_NWs
z3)*W=M#3i2x`3s=vfdJP^|i-s09irWz~Rv6`N+u*9iBy+htZ>VZVBDxV0ysM-2$7r
zX;*m2pjU!ZmPvpdR-=*G>Y8s&*7<!Dd2r)3ZNaZ4-mz8zo|PR=7X5@00fDiJwHkN%
zs`~80!KH%9;*Bz2)o$yOl;QSL35T$|(O}fzmO}mEbfL-n-g!=EMnc#MJeYW#BChoo
zm`ZIEKwyX?@=OXF{?EI9e>#K&6se34E|H;QzI!G?$JFs5MaT5=fj@!%J=y=~3635H
z{r?Gz{co&Ovg;rCdbrjOM^zhkmtU?x%$+0t2&jR*yQ7&mCUS7_we!#8-Nln0LX&^X
zD7MkRTGg*>NHD;l@AILGuLcFN5b<5!>Fpo7&EAy2LJ-ReRp3xE(cwvWV6F^4A`->L
zj{HBl{s--Lvh3{#jjjgcM?D1mcc9GwRK33YZ$tifuZI0!0$u-~rM&KhS{(3FO!<sI
z`!m6UZYpx<R7#<O9Qp%faBclRRmluSxHyMgf2;z4_|7yN^5P!KZX+i@;Ldw4eND?p
zpF76Z#k)e^$hORdkemW1rI!>63f8jzKwe@*{Fd)x!$T-t{pN|mp`L?@T5F1uWqLKf
zy!2E}Sw&QN3vKw?0D`JdE-87k?O%gv=>Kt$j@j>Oy`dq@z7`4-keM0AYbwWW%m66a
zCw%Xp>xS*a0^8YnLyrq~8Y}ch;l`Qy0Oqf60jr<>>DV)!l6O%}8j{oOy1#suwAz@6
zPLc(8uF4j)KkcV9QWqPQzi6WI%h_BP6!@g(j@w%?7+|L+8whL^{=@gGuk2dger2zm
zn|<v2R8J#m#lgME<z;-p$z?kj3g&296C5VI!@PnjBn71O;hNpELy8P;Q~ReX6cm(b
z`Xg}1&$Tid9<v2TDo!?oL<cb=P@m!Wut>6gd4oqGmI@qWtmok16iy2uA@~&)9Aa<7
zH>H$C@A^czt|{pkF^D%Ae?)%&g`{7~3g!N!>U}!LQ&QK<T*YeI#(8R*h#yt3f4p4n
zs5@59%K7$3i#ftXpRPaZ1qG!cqH9!8&p{xDmGNLcD}FDOn#5&>EC4#1Gk%Uv0>?1d
z$Ijnw_zNpTwzAT14kte%v5;hWXXb}g<=2B{p*^ZrTm^;}3UM^KVQxjiWgG*w$5XO>
zmYhDE_x<o97;jE1o3a7rDqn8f!E%xuJwAhj5e4BMA=NT|f!~6k%;0g#j-NU64H-7L
zSti#h1D{tJ5?>v7Pk;%S(rF)hGm2k8woY1Ht&JFH{?dQ!N5%IjO)WR=<^Ld)fUn)o
zRT?o{?^=Zb_;k##Qy1Q$8(-lzMH>jWe)62);?)Cr;W17&dh|n4%|j__2$T#9-&@9(
zfK0vT->sV4sn36?Um@^Bh}ZsWbPc(}N2X^io>;o0VFHG-u{Ld8a#zs`uMR15ErQ$u
zX;@hn=9i(}&&K@EZm0S{rn-klN1lX{C6$cgwP(^?DZ9P>h2ggT=!8L1%CpL^Ki9Kp
zu)*AyI_;<kC_->CTsxf7)1>&~m7~b?>yTaDiMFbumLpWazIE=rzqlrs8NEp9kyEKi
ze7mP!4KCo`#1|80h3^Vn9YFl{EbV`50h~ifMn(o==GCy@GYhk^+)@FfYN*!ES`f7f
z!{basD`yviGt8MEeil8+p88aK64do6mrWPXOB!M8aO|Q&G9qMlo6*#o7Rw9>gg!5|
zL)5eq)(koSI$n3iEAmx3pLOl3pf;jL77f=tJU#X8koXwd4&4HC!!h?7eU&ygW6b{%
z(*O45NT%aq;_RtN+jfhlp(Nu?J|nG(-`oX+hjeb_qr)V2Df(&&vu~Czb)59@Ho%P5
zM?Yt~hOXg};zF*TJioIan#N{v=jZqb2v=b5@`AuseNECVCE>JzSQEazOeNSxq57F-
zy7SowY~jqw*9T8avonEd+$NwWg@SR0ruw8Ok+jMB$#D&>onsu`L)LjZAG4I!st^)J
z%Y-@dQ*>ugW61<G{23LFqbZYx)S}kbo=l={QrYVD+~3uXxI4g)svfh0V;dZMLl+-%
z87;<rWzpbGO9l;$`L#jn)>mP+^d64i{}<XuC9$*3ho<dgsCx>JG>%R|;A)F((8=Y`
zXOeecB>#TwHu|W8ErPAuBx$#ZF6tFwIk2)MiKL`P@R^m2sV3QLP&W7Gz^`YlAKi2)
zNpSs;hSBN(?b@%kB02-_Q^kNS_hKY<Fzo^JDyn^cmPFfjD#5eUhhz1iv2(3ULI&a5
zbV$_?wq4X?rykp76QqOG&E<~{_})s(g-tp(8qBD_2*~^bVPL2ct`5V5m0fhb+bnC=
z0ugU5aG4v2LaeT>sjojlrt!h6*@=T9kZtz{*OYoOkB1R0+ZqxO{kLdx1FT{ws~zM~
z+pU?&<QRm4KcxeBYKU|A4@mYyykuKv2sDo<tSs??gQCGe*}VPRc@I~uHy#`dGx&`o
zW!>|)O6vh`9SOZ0TvpkbF+-)Q?L)46+8y!9$~8rbWgA*AcT|o|9ypfyXH(0jNC6T{
z1J+G(^;MEBc%Ipw)TCA=?Q_-U^}PXge)()<#Yq}9%wT&^v!ZTyu$Woy!P|GC74^c4
zi<6r+0J!~q^q656jiM?RbVth=;yGBTo5l9PoL#MY=~herwQc)i6LdBi-=&;-H`ci1
zQvhdO21J$bnBa#=m59Oj^~vJu6m7F#k)=+WHQ%Ox`!?bX!fJ5#k0%W1e*;`I(?1%O
z37@7(Y)uBwe<QsKc$;Z1rKYwyVH*o#;N0N;X^<MaFZF(z%kR~jg%~c>(yganqhooq
z0;ifTJ>vosnaa|r=+j9M9Gs#kJm|Bfm>l~ZJD}^cQGm*~Id%?~f|nCW@ooL!nL%&p
zfx`a>0+!CeU*F|;b~qMN)x_p#-~m6PI*5VRkSeuC?pP{<KN-CEU!mDiZzu*0)vdvb
zZj0`{eR?pb@e2C`+Q45<t|G=Ah;Q|P&OxvLn8=_sKdJUtQkJ$u6#2%qHB31>%QY*j
z+ON1XKX%nN=}XMM(r(v?TxuhzQ0}%?JM&)9a2saWs)^r<?3;L+Q&ul<$?clzG3@bO
z9<n-i1YiJSiwEZPGFvp~RM<Tn!G}EFfI)JFG*t2s+jFZhLEW!N6k=-AW~BzHR&Bas
z`7;fIYZqE^1>il5({=>c+$d}iUAPq-C6d%mccIGN_R>*xRQOp{n4ewP%{w57rCgdi
zkZ?;#^G6`o4C_WGgB6$NPsB_Asj_#^lzHWBP#X6geo+4a!J}xA-N;lrygnuukhlB>
z_z1@?j7IQjko!w;7!dt=hM|c_IEKhd`xy9P%g#`3A83nipboVCx6K_yMZ;+s+AuWn
zcEjSXy-=#2My7X`4S6M;DS)^Bk{vLN)i1O`Jsk6HdLUCuPZkg8undhVmwPQc(l+e`
z8^6}~TLVQHSv%R_C0ZyZOcQp^>y)+5DylK=%E<Lf4{L5;ivI!P4rulg1?mrCW}von
zX?e;BtT0iw;%iaX#|K&3Z?-#do5?*+Fv$+jXO0x|Z`$vv%Q{yID*R$!CV+YlwB^-J
zp}y-dwBm$E9;enh#7)aMR-%5jgvDM>+T?~oZiASQsO?xa{&e;d&~F4fC=DI5kI1F=
zft@_slO+9c;p47Z<#)Y4bp9pcxJC`_q!cV+x&7!jqLO2^-rpqsxETG52c!g=N)5*C
zesv;d2SjUTU(gJ_vlt}HteTVPtM}GD6%7JW4W3n*x$8H!iWP0aPVEk2QUv=7WpSFg
z5yJK?qh`;sXG$U3t%HXM{=RH=1O&R2zXJ#S6q?P<RFNoaiHeo~{9o<8XH-+&+wQB6
z4+2V4dKXdYARxUdRX}<P9R=xx4xt4esY;O|y((3D?@hY&-U1{Ln)Dh%Ldjk{@Bh4~
zjQ#bDvG*D0Q^v~3$Xc0MYu@+$o7Z(ub6)ZM7a;_hB8{Xyiz%=uS4&Ouj0%|Jh=HUN
zVjPUQ>)P2cZC%YpU~8W*Xj0E)$-FZ1bZ{{)AL?kBgT@Zw(JN?`^vrE&w9{V8|CWlI
z>bvgsWz<@~iEmlEd8^oo`Ep1XrV*?BR$sAl(<9mlP_JcLO*MbvU{bUP3}(rA+b#XA
zCQmMcKX4&zzRl33)lk`r==K^hLYhSD^S=98;G%oK8wUyP`YXgGjp9inl|%Es>4bR?
zk$!#{@Xm-X&}&dW+=!<x)w@P?^ZGvwBsiH+CQ`NG^qS1jRoPgA=4O{qa9S(&QGZ$g
zYh69OPQQn@TDkJ$l)*%0@q69SFSRe1G0Gh2jefeIZTZ3$Y~Jf5vGh8{`(C^xb)+B?
zR9Ko(@fsiXLOtGN>mJS6qIX-^_quvb7o}(7y&C#}x=rAz-~(bg**o39v=6Q!SSTwX
z$MVQL;k~$B7h2dxP^70i(^Q4!0q)dKo@IAi4f8IZRzG`IS7oa2$l>7Gf9o0gyke4I
z^49qcM{4NPh9(t*vembWrD5q<@{$2EeWGvazEba>ix8xqzw1xxDX3hd7@T*M>JZJG
z$CfQ)mePKwlDB&_gPwQ?Sr6IRmoyzPOoHgR68ZWL4J{>=S~j?5naYt{$MX~ynvR3<
zF9IG1>#9F>`KCLR-Fkcn!S@<_Ug&@fF--6BI3(Py3RM~+4S5)#dwf^Af^2)Pu#ml}
zi*m2}=aOL4h+?bZvx^ti3CzYp4ipMy4JFmOkH?DL8W3JwDBt(WJR+d7_zUK>I=%7=
zgi71%qfC}=*DrPN<Vg3!=yax^nm*Cm*cp~`a3%j7!|v9CU%&M>lPEq`$Evm?T)^?)
zIP`xO{(#^v5=Fq;9>M*{*f%=I)&~7gRUN0Q6_ozjPhG>ZdwmDk6;dw1Vb(*DNROWe
z+3H(tom$gtYOcA*L+k`~$TNF#5mCu)W^klFbO_{}gPU%TDzt%YcHF8|$za<!VyT&F
zZNGkBj5D3WtvDp3n6&}lXtys$C{*kA4r_nf^dp?VVY`+yJ<62Ri?7chJ4z(--mUli
zrabua22-JNZ5rxw2I%p-*6?#X#s55Rg*SP}kO|n7f0G|vAx`EcA(P!4$y^8OP}W+1
z8QCFp#b;+c9roQ8>3`cU5rF@{AgTI4s^|YM<AI`l3Mjj;Od~66-go}BdW<>Ux;7vO
z+D^H=47~9V1idL=IjE60xb09yCJI#aZhPib|5ou7MPy7eG*(vz-;Vw#4*XORNc^n>
ze?Ccut9tR)m_MiZjgZCN+J6W*&_M+Fmjhn>AmF=i3*~=){XZ+<|IK@0{ZFg^udgEk
z8=~g7TOXpM?JFN2q5FLZJ@VdLC~E(dlGIfuH7zJOOLxXXG$lI$6RY`N+d2T;&^y7z
zDx~~i_uN7Tb057+K5onGPlxBVrNqe;F&(<YlKg7E@nWK%+3)OlB-4rN<*WG_&4fOx
zllj~jnR8nhGN-QrKXZR(p;7GlKL3Y`gxV2LQ#mJnmOQP%nh<XHiKYFRQK_|7mO#hy
z5?l4umTRqpLa}_L+gATU$I<t_zwl#3WbBuR2Q&tc0~^f?fAM=f#e7*0&wk6h=hpH$
zCbisjz;2g0;A!f$vbwSPJgTZ&q_dwf+N(t}qh8u)=nIL7MaCBzdiqlcqi7V1vszmF
zTqo7e&beG~(Su#)zMGAge@+A<-!zC{rzo$d0tyuc!08gX5k37Z-|;cm*H~|`v8r70
zA02>OEck|R*e}w2fi9nE=AjrQX;5Q@<om%I`L9=r%Ecv&)KRgEJ^)db{asTNuwDmp
z(VN>;0x<&0h3d`qExm`P%h03!9Acd7O4=Xy8ZVP=_Kc^^Ai2TQj%LpGDZmt84w6fv
zpObz9&|HZDu6#dylt^SpB~PIK$A&qxRc6mnKeHxf0-uBR-h2|H@s&iuCac4Ux_0LB
z#S4r5!9aJErvw+=2!0Nl*m^ADv{%jNa^!tl<JTjSRMX;D9{qw`c60b5X-lE$KxLKO
z7!CMc2gG2e$w=S3a%}P02-chJv{*Q--Rd|*M$ojS+T5NT5lS|*leyfI1!-eCxIABT
zhhp5A9;8UC%4JQu8YmNN^C;_V;;A^tzA2>WFd&!3qSAFt_BcFl-PKss_G8nSF!lZq
zR<=3*M@1B(7VIuA_vIEA6-*4a4-UpuLlZ+{9V#R{8l5cW@`Eem$=vqG-Ozp-a>OVR
z)!$ep8$5b_arcek8YEz&Ua!DE-{WXT!X85O_u?J^vpER8M;I5N1o3oS?NSjDBLLol
zf@$s8`XI3$`w`zrfa8L0V`exKX-C3#_pu?}$>hZy<^STqrNh?les%gIQe_%b(|`Y>
zQU7n_`&~fo1bAclNnbhWEoGy&d5ON<I^MrO1Ek50Oq36%4Ilbnuk<h({YU?_FK`_0
z6mE6ryZ@0L#lN5fSf@=UV$96Px&8`X#;1oIw~YOlT=!phZO7HsO|)f)#`;abej+jP
zdDVvI@_p&jj5_Q7s&>AnHmp-Z#VT6-Op&#(wDriEP!IQ$YpJGHZ8T{!ry9}}E|?|Z
z<FS}b-2nA*U5w6^F&7EGJpCj<8@wG9!`IQ-;beh*`r{X0%#A<3`O1ux^UMNKq=sSY
z2$=QQ-ExhzNo^`nJ->T0yV=W%;rt_xD|EKfO>uNW26}3U7RmMuJYC2(3QQhtBgCG6
z6bW!_7*f6BP=4#&_H=I&dO0|n@pnK;cQ|_GF)Paxz=B+m5eZ1QtZ$WDUDiG6>=Y5x
zNX6Wyw1>QYs+?C)mfGoqHO|t>RKLN{yV(CY-OKBkxGEUqKybk34ronek^fOR9clEi
z&kCQta#%2bw{P>JXBu)?DN$}jWxtyH42F-Gx^2#p_WR|2*|R){Q@5CMtQ=!u)4`x;
zzqtKrz|$x{4dsDD>{Z9Du1jL(1HBPR)}>&}R4D>sTfzA*by$YqN5xEUu1aW+4{)ox
zd!<|d&b_fFR1OC577i!=EB`u<Tmt=|jdYskF}<Kbqd7D<9Cn3Is#aQ@e;-&e?6vhm
zRaJ04pasVtuTK)HE1ebxJkFClZkj+|4I7DqO9q%I1(Cr7H}nHd;Wt^vDSh4kfi}Lo
zHkUivrTq|Bc+x@c(y>scu%V1;i*KW;{^3;tbO<@n#VgN`!8D)C=(%-nj7&oR)KgHC
z#pPp!C5Xz)rFBbVVQ>HKK!+;4qBny59fUvI7ZoU6eDTlMHjDJH=CPj4?Cw88qgCDJ
zBCl}+R(i+4m|_o8`sdbp{e*Nm3I<Djk8+_$QXH|{qZ+q@%Y~Z4!8)&(;o+TO6kZJe
zs6)uGTLr<;9cI>~&r6c1Z)Y=m!4CI?Gw%gw7S6{YJ@YY7A@2(u*E!wy%VnIqN&cQj
zaI<V#x@)bT+YF6X5p(iG<Hir!SD6{9=RfQ+A6(4r5tbby9t75X-hb8MyIMYcD3tV}
z{a1FR{HKRo(*4qn;{N7lKC;Qhw#30h{eF}4u19Bs2r)5!?dLS=HQ8~3oE4v!-YILF
zA-j6oAKt&AoBFU~v5=uVA;FOiYjkFX<ab<a-HG~sKj)v%+*aD$1G*B3LHw{omml&l
z?TOb0fP<ywedL)y1h`}N_g9lSwn*tQ$UBv}kA3Te%=AAZ&O6cHU#nh9x4DqY87Ef-
z+`JOwqu~r;*%o5sqQ;zr7Os0%b|dPLkdxC1PE8<CrFFt1@f*trnafM&=k<hzW(Szi
z_>Hfvu*kxmtU&vnv3asTn`I=Vn_pVWYLFU^$@a)T>W2yrG?FQObE=mBG1&S;CDOkh
z_Kpn;$j(a5+FYyuP-%c2ZIqhPg!J6--e{<*I%V3`nFo4@T==i2)qo-Nk)`vHVR*8L
zLRDNFs(PYAuA?iDcEFq0o)dj-Z^4&K->l&-a->FcvgwdB^7h5M25|FJwfOQrvItg_
zY0~yWyuK2*^pRTz`9`oa>1$_S5UBhSVCHW`4sh?K7?cMdgJzyC$ito1!eDcGL)j#-
znbBzda`n^Ev!m~;yIgv)*bf%iF=vzEa;RC~^=FXuI^EoQ|Fh<MIJE&h_CUs15kH9+
zX>DvL6%|*?>kJ-d>j&E=BA~v;bKqep%Mqj!!n@p0lw+$7gnlE-!7gVnr4o(OF>JOQ
za|HhR2y`q2W{@9()eZ7R1A;H#oa`G4@fhtC0pQB6wd*sWVO#z7z;3aRt$OvpRa>YR
z4s!(q9*#P`5e2V5PHNbG4>($8fBB-UOA=;LszH)YV%hm#uKa+G<ylp$ndI|WlWz}I
zn--svmR7627yCCg86j5TMzC`!GWfTYdsGSGv^F#(iwp^lZxT5T)U-Oh*DSn1sgpB`
z88p`^(>nfn>@6f*TW$^H4c7y_pEmk8n<K1Qw7Ffgkeke&;j*?2{?|<8EYChzx@TRQ
zRuFYZyJ&zU0T3hyI(Ib8cKnu6T{%?t)oN97xUum0A%FsbMo4#9LfXQs6$~d;3ATaO
z0H_eMIwJ|z(@^Rp_Wi=szwdkyKaWX>U)JRxEDAXzmz91QLpJAELxlI>@=M<_tUlt4
zPAf+1B%rOQ^rMbW)5!~d^t;wxP6I8O3nt2+pC6>&+l_CCoR5;J2|y&UN%yP=B^1;5
zzdb0H0}a&OYsQIwr^optcW?)8C!EgIQcf~5P@pA`Ut7YMz~_q<70R<LtVr_H%1*yP
z8|HV}&lXrkttQcg7%rCe*|tD3vFq>hhJI&T>*zpnmv1IuiH6qwrHd^aNl5jmPoAjv
z6_3+nZS2x}X8gnXlha9Q+22uvP%cT#mCf){+ry~>vI1A=QpLWF9cp<AH#vq@1rXJX
zcbsWjP4Gevp5V8y&kP^SQuHdix6Ez|55mpb+Mn^L6|L*977?bEzvI(<B>OuAt`vYJ
zVOevdl%lbPXAVIWQU*cc=pK#lQ5u4;9Qw_w2w#<_$7|1g9O3`yFx!06&O6t_L{7-^
zH|F&dTgm*=>qMdc*s`881(6+w4acq260~R<A;r6!KtBlc(lm6-?@B2Nz9{3=Jhfgg
z@$DnI<<Q>*JZ(wDkIY<xx`WjAUO6IJXirzj=<h`{W(_)(A5Kd&dYJs`ak>+{_SYxE
zX|S>-K79o%^%@t$UoX0o3N0{SOm384q%NFjSSKSd!$*TZX0kF4$S5bB1w`LyKFiEC
z|7wNlK3u)j86pz%YPAv&6Zj}{j_Fky$*=D^Je0OXy@Q+~(+b>0`0e8J$-0st<3gJ{
zE!yrkS3g8fr=|)&YQRjH^6A<<g}PUNv%7y}e>jfiW#;^?X8zL2);Kfk5LEJZ-i?#A
zmWZ8ePyw-7V32Gl+od@~q~^_FBG@W}TNUFX8p<-4G)cs~zu7GRRpJ=FG*?}{X<e3;
zp3kj`J3~%voC>%X*?hTpdA7KTZ|;Mr+?yx_XS!1fgG>nY-QK3(p+hq!*~hH(^mT@k
z$u7}09yGb5meJ)8SQtv+wr$@_M=@g$4;#uStNo3C<X3M&MjfGgJmrStbjwoS$f0K{
zNr32AvW`m%Z*p-F!ON9?$S63*>?<e()z(#s`N_uVXKd2O6WzvB?ssr$q_)<cc7}p4
zrft09%uL`3t4o{Y^s+<kNIx@@z3<tQxxzY4MSM6mwp7l&G0G|Cqg;^?uqyI=5Sf)b
zw1u~%$yT?t5YV?^w&f_}jvlHg&(Mv?4>U?Ne00Oq{o2FZc}BEhWroW)|4c-kl0DLo
z#Q7lr_UDL(L=P)<{r-Mvw8-{~<Y267?K*3jk7p(lA>HhOZpZ2F8XB?t1#E#ZMy0Qc
zKKwoNQ8h_CorkaDWaUjVo3$_MV^*NM=ifC}8cofuutR-{^tTQ}6Os8M`w#PpH6(G>
zlVD8Yr$!pGY=3H*FQOtc7j5Cu&X_D7moPM!s{K08SJxYr=)@8Ys80b4B+ZON3e^;L
zu3DJjo1~QNjG0Gr=(wXSw!_h{UO=ln-Z{b8>)97jf?M@xx^3}jxyXjHwrbTP8(LfQ
zY>9>d=0+;*3>W65KVO_GvSZ^HnbflL;X=E2N0wp5{{1Fxk5*bNF1o_}$EGz{diJEK
z&-qE1=GWDdq$Q<NcZ4OYmP6TiOp8>Qo|GG=N-#fYGw@aQBcRoCu<wcuIJP{Viqf!8
zWzlleh9OhRy{x)jzqzX$w<;}%ZMB_~oexb#=3hF&znNS(swQJE5IzScEnsm;uvKD=
zI&*J8U8k*!kSF{UIL|fs#c~piSK2*0lc`^|YeqoMVur7qPw->caZq<DzK2~FU?y#f
zp8L|0+2X!=eP*grI?Qc*9b`ajviHrZznOz+H>g0t*eY=nLcMG14WvhB%QXCcgRS*G
zDUbPB)nm^hnMbm%B_|s`NVax$nCs9_NH?4KeB8cSiF5K^3ENWt$1TymQ`HsvBqU0d
zN2(}d7QfTRxcQC*@~7X9K~C@Zoej=90mT=t`Ut8&*_-{Y#Hwf@LopORf@|Q?^=aO=
z+3h;Rp$b0Fw%#8Fy{SJt@;W%SpXrRQF|*T&uqelFpvLv%*ed4PRO{X~=hyyh6Sb%v
zh`bT;6t{$1JV%%@3KvlomBB_+Xs49<j%QgO0ftK%nGu4avX+ujSB5}`<eK}E+#h?6
zju(=EAyr|<9)Vuq#xcIHQ_IowM9RHQbzikDzX(t;5elbIw#<vXr$g7JCEtuX&VUjm
zyjl@8e(+~ppG19nr44udgzv{B9Zc~IlC0HOV5Cw61dozzVbUws>BSg2N6qum0bxGU
z=?ULSccr1vR9|-%>I@fzL_gg)zHPsFB+61csl7HKJe4mD6PB!*wx8|3JPr1W#4;x)
z0Dm<4DC$?bNLb2g?X>qr#`cT1z=y)RcL{+jV=3Yo<eWwOj_f=r65^Y&-+`^+i%_)}
z?u)^v1Sdjw2A-b}OiCDS+EhH$)cbAPfmPF}q^K$EKk?Hvrgitx`GR{Pl8bsSG&qME
z8Z#=&%S_6y@W(mBtsB*?Du39fBJRhSDbZ3<((M~mIKo*~MCf>#Vl?9U0{&J{Nhtu^
zifm6@os_hgn`v(fMa&c?D2*BvDJKY<itQaeSerrE@4sWIE+_#7!X~K`loJ*MEgD}d
z8QUeC(Mz5zBpv+7A1hAhzqums&_K*x2Eu8LM*a2zIYUhr;UZ?&W#D<+Ny1{1_I|Wx
zBUx9yQ?@qg?>}D9aDnn`EaAo@RV`<jDlUh6+>UF>w-Z-UVqBKVA^+wFI)P!!sji{=
zdm>8wNBZ9b+Vh+-oT~0U7&(l}jLKp2A18>?b@Lv_wtaa9?z}$5iGg>LQ<$^+9aL!h
zVX^p<O2z8;mO}qG2QRGZe@7HQaIhS&w~0&$G%$s~%Kh1Dsf(juIVdtWPbl}0dZ1)#
zm({7omaK*n8=N8%in88YjweUr5P2^!NTrpKN>0yZeJd9&2Gg6ie9F-eP)Pre7_Jj$
zvvU94$ao&?Xa5}}Ggn|V-_4;ICcP!>Y@(FK#xfK{n+uCpZtrBx25+B@&{TMhE*xpi
zF<Kq0jc0y}Anwq1(1zg_koC(k(${15%jw;VH$srPU$N~iYjdV8Y0OIn9tLR?#nbl@
zINnTYAy!q9_8(rxHy-*o2ZG%@D8_bo>)k%XK_~I9sx`_A!UVIHJ(Kz71OwV;4uHQ_
zIR%r+HcHIqZ!uS&O;(>*1*^2vT{`U5_a6N8{l4<?pRFO-Qotquc>-7ZKQ?=9+r}Z2
z%R17Q;8+}Pa`O`3UohwL?Kx5YTxV47=yv?I&Dy6T->E}Hq=L|sCTf{sax8rr=*Fl*
z6zY8S;_z{%6vUW-pKTZakzaVMofQWt8#`&6*x+7Moe7y8tB6XkE0VHuIw(d&Eq<~2
z-Q=TQnX956Fhfonz;NddJ^$?<0Z;tC6p?{=Z<Gm+hr9aov&FR6{p;EA#@J*W>@~(g
zVY|E6D&n=-;x_H4BcU;8zije8&W&AB`I72#`{OEs?mhZ`7G=(g(^&!{ivfe)Y)q*6
z1=Vtc`MYjUdErBkWUspSI=-x@r%aw(`(Mk)Obi}Bq;Egu2(i<A{QJFmzpDVE@jy>n
z@M70<qU7~i*&$C<-{M;VS}b?yZQ9}D`0G8I(fo7>&NOae6}2%#G+pLGBa^J9zeTh^
z1WTIwsV6UjWCt^euFRoqjn|qDtpaov4ga>-$a{iDDj|WpsNvuMue*$q(mh((``t*{
z6lV_o01%%!{;Cq-{df901;H!R{jp43K5N9?*f*P#^rLMb8tZZ`>M{3YAnnamlg7`V
zFE&HxAQUOrnI5GlUlL`PwlBslN<)eU;%~20zX*INim=(u1bA|C+qKu_uaw=Dk7+Mc
z^tINS7g`%$b?>sKud<hkLu>N+qa<yH?DjlKYxNSv1kUgov&frG@!g`>WEW;%or_<`
zaF#eQ5meB+%AWMb{385dXy0@?qzY2sSrmN0BCoHnJmOq#axv&wlRdp8zLlJ;K2w^t
z>p5;Rre&UG_uGm<wHt^O)5+P8EbqGd75)l;%=}W&^FsAfaHS~8!P*bv%RsM<o|5M^
z*BTdnrd*kEQ%u$v^*i;R#(uo5i00g1aYa(Xi*bhIzN<j0u_k;8G~D4;Xz}@CQymo+
z&X$zBs?2?!yE*`V{56a%=7OGB<4GJdad^@E*RbG!HGt1p<8Q@l>rZYsc6d$lzy3jr
zfUq#tu5gI+UPZ9Y*z#9TuK3X$g~-~=<>h65M_?^rU}eE3JKB@HG~!TN)dKi&zt$h2
zp-ELvvI4&Ei`7~Jaaj^!Jj&`>ftoy(fo!wH%8G5*fsbS*YmSZ$M4r+5NMj67ZTg#8
z2L2#1C9<E{0?$5{(#Pj9VGdY<FCjnz(m`OvzTpqtzPQESy4j!n?{*+BYS_G6Q}`}b
zz-lmI&lmEG+N(4@hw#d1KS5{K^EcSh<sb`-QdrOdld?DD?4gvz|H8%Ky_$E;^M5mO
z4@O8$ktlLTbYI+}HsF(5VB18Q<PPY$$}{t;iLYVBj)+L-jgTL>-;aN7*_<DmG+xv>
zUxN$WjIUr_gXA`0vJ#Pg9doon%TxzA|EEeHBo`2-$__tI-}ee)NCPe}2lrF2A|M$o
zH=N$|2fj8A<%fjsB20S^&NH93(0*HbI~A|Q3}qh&U-tjVK3gl;SABr`#?7$=pO<=k
z_H*^1KrJ*BYfMe$WWU2ivW4UPq(%$u39*imm{l8)c@{!;iePflg9Wt%hB0}=%lXdM
z?|eKC%nn!mf3DS-_kJ4bxm1s>q()UYn?_S=gm|}4VDXyLqtw~t6%CD5bC2=<aAY^1
z$F2$%R|_``R8300)Wf}jcTh)nsJrpCV-`Zly0l<>;<1)z@4hoHz|(m)nVknlvs!pU
z4Bq3^Dd0oPb*FX7>ZxWWLa42snzAf=oC9DVNAR@IA4igof-f#BV<Ix(Hys2lS%w$h
z@(2Z9V0`%3FzYrW*^IepW;kxRbw8U%I??dtgI{<2xVp%6Q{7o8T3X1*>i|YR3T@J|
z4O5^VGpCf5#N@KEx}861Zjh-x@%{y(Xjm$Oj$#Rw(vm)c%wPErnk^%Y#78cE9;i`r
z#hlYK*H6tDWm&Z0{qS9HiIG28pH%RDC3)Cyl_jxNL7LK0yhbW*w>{20e7RhkoOCVP
zg&9DDOD5H7es9R7yUXoy5XEYRkR_8+rg%tsdEk9b{Gxo&OX?vEH1u;Yy8MM@>Ie_M
z`Yk;2wg-+Z&lDW7%qPn^e7n)WX*%IR+Vup}!exi|+g<jvYPk7DfPxMC*6xyczoh;H
z7HM$6MrZWsXAxFj|0P;c{V?{|r4+Jfpv7pv*DWGe>Afl}@;Kv#&}deHv}A&((qr0@
zNg(G`FQ+0q*8s!Rt=`RvN$76zmbz}Rm4;8J@<zF3?{@mZC3*>c*o5ySoGg|QPD-h3
zhznqHoG-9W0RH{WPku1Mk~8uHNhE?<Leyo*y|7eGtOrN6O)~WJo8NJN=7<k2tCLV+
zs@+vkpf%uQmzGh!(Av$&X4?noedH&HYoPFIaZhf5o_7Xb_dg%o@3TQwjOm$s<~4P~
zo@9W#E9wMk;7(V_@IlqNX$RAoRYttT^~3T!p|ep%p)sqZJ!#jCbiRXt)81w0_C`0b
z(!kW90|^fKedE~HruX3?2PE6fa|agMf+f_jWuqAJJHNc4ja`nqc!_LZZPHnC+Zvtg
z6WL`<VvVLWDy^+3m!7T2%EK9WCY@Xy=j<=9k<dH&UfRayViCo*76v8+kD@6hw`(>Z
zvV@2t++fd)?3ZI}0$bI5stk!dvz^5FfIU=hN<ErJh~8Iz$ew(yH1pb7Eld1Qs`YJ%
zEbc^pRO|j(cN!gVwm2k9Fh*u?si2;Ql}`h!SvuFm_guncPFn6aIC+zp9LwhPD(S@Y
zwa;!F!~8oMUW^sQ+{0!aofJsHmy@Jggw6Ghw6;7L4RVF#05IXVT&ODNsA%$M$7jyn
zM(sM#v#sux9x1qfdhebo^PX1MMu&4z@&tIHPKOqi)v^(`@#y?zj0#<KM@#(dQ7Xa|
z==2h2=vUUZ%GOl0LtbRJOE;Ruetgx>#++3pDpOLkR=G6_BZrI~m}L}@wigs^2xqiu
zmh|+fF7CFr@K}kksuNu=Oz9Z3J_|W^5?scIYhxMrB}~iwRH^Oe0$@3lqZ0l4em83u
zi|vfDteN1!4<#|F%rl7DZFk+t2><F@9xm;i`~mMq^hG_^;u}pd{!ot9MB4Nw<KLte
z%JjHB^2G2GNyHem<2pCr+y>2TEZJtBPakc)x#3tc1T@=s#q?e53Ke_Ii#tx02}#{3
zw_h-pso>NMf2_V!xeh_@R0hcM#E2Ke1=A9eAg?j#*8s%{*}f4wjhp;{!JdYF*+1kW
zandTEK`oMJIhLSeZd}GXLEJc}aER_n?DcYD?S0%nIxDNI&RF=uREfn6v6RUXLWZ1F
zbLb#6EmH}%QU*>nXh)w0VaK_&Y|ctNxgC}$A~R}WY^_v@PgEY(enOS*+|RX(i#%uI
zqLL+;z|G!0bW#;shLvzp(K6HxyT|^)xd)-B!#N)4g*#3qVrKg+m)gnM?kNp@+MOUx
zvRDseBM?8y7V+0vtWg-8t9iqhJFz?0D0#1_Z%DrOtMX~maF+E^S$ql*X<F}fZW7HG
zT>m=c2R{y4+ptk9_aA+z(y+mEs?6+aZPzBS<o~{EfJ>V>P-W6Dv#9j!EJi%wxPmeX
z=Nkgi6^Oh2(UY@cQfs4qs`foA(W)$&&d1VL6pJ2pYH1@Y$*Nw0$e!3mL2oH89;>dc
z$@{bWe7wS9i#g9#@Ykc?gw=ObM*Ak+Ej0R?En2jxnaiXOmbQKsoIh)Bm9~|onOhUc
zXG!BL?FckqqCe3$*49s9U6O*=IagEb&On|az4dGP0?1_EikK=$Knn~t1cSC=hA#31
zEIms+9re;$0<F36gU>Ee$|j@r)?=A^cyWfwjG&QNwS6mYv--D05WhJ>PLt}k?X|e0
zQSqrHi*wzbZ(b}RWY-68g7Hh}`^J7z$a-Y!`^rWp)1KMB`0-O$1(cirMk!CYy{zoF
zmiZo{yJ)OGgDLnEU;i*rD^Kh4zsY4J)?2XG`cYk<=Gv*fFE&J0ra(Gu;P+GG5Vp4~
z(Ny$A#ILP0C%cCX6It=#rhh(VcIv9|lYG=gSnZdT8m8=DeCu1p9YmJ$62Rr_o&`YT
zM_uM5jNLn~BWxx=4urRiV9{~~YCZmggJdo}Y5asg+oHT&n~$_E2iK@kGYi+$F(7Iy
zYA1WTIPBM*Uk#0`vl<!NHw6MKP>+0#yF>qmcP^<&zv|*S)fB=sf}9%snED7Cf2F*@
z%2zQ-RfbgM(INN$RH&$eHl@OnImKuFnwi{_!RHkC1MCj&Skk%Tg^iORFV<F1+6&Uo
z@CYe+b6t+1b`R|Y&z&Z=IBlI>f6jE!#kqZlO=U>7ZUV8U!=tYaXJagx2%0Uelg?p;
zYYn{E>5x{=bI2`}$Fy!3OC<&is7kj!sff+1cayB~syY4z(M{v$_$gL_YgF#dzR8_g
zP%RA`qF8)4mbq3)+{^?ZP!9-`kiWkc7*~bl-e3g5W>mJ%6KAr*tSFgxxz(y>qe7@N
zKNgiCX_Kj<lYL9XrqR8MEU);*fc%2*N%0UQga%ad=Qi5p+xN?vk8mdWgxS?vwi$&6
zEFp_qdk6i$7SwGh){vZ0HVz=&!C%*Usxuv8wDF|!yy@UtuX`kU0H@Zh6A=XLuV5<X
z)TqrSK9cfmdP72%-~%7rXBbrnYRaDR+DMI@p`>z9mTr*W^<8p$6)!z`Q4j1$U>9jm
zkD`-<@0FC8X4VmfIONniH&XFH3yjjZQNsSN$ooSR#vnn4uTcU@VbzoMhbKRROgi97
zo&xRWWluj06-kZ@d@p6!__;Bl^$J!c4M`R6Mx9;s>cReEbo~k3X3(+k=bawt=?Xp-
zgk$|5P8MiD!HI&^*IWa*aGa5h?}uDXq@B0Y-AN)+lc9`D59@)c)WHV_8oZ1FAK)1_
zFU;P$H9D-dZtQpr=)B<ae2Rz~kTY#(-J7{CtJ{dwuC*!P;apzaffa=exvDme*gf><
zInLSZQd?$iUxO_;r_RbU+j09(w@+5~_~IsZ_QD?!=i0kPXji{7NwGANd+S#<*ZK}@
z=uPp^P_dsp5dhEdq&_&+oD>>b7UXKK);y;EQY>19E&rG|$d0n5cE^MHF^`;}QOE1Z
zL|Q-Rui2}dtve40S+Hrd1!J0M^Q<Z_ohd6ICEbp&trM=7b~Y&O9b`Vh?3Lw{ivdKF
zMuYT_{dJBV{b;?!SiMLF7y={)re*aQHk{4Z&T_F?;=@42$i&pTxghoAC{4i^i3)YM
zXa5?>u|aIlhCEhxFb;R{3<V|#C6M)Hv;%bo@41Y9o)&55`AolwZ@$MIfBtSQ&Rffi
zW-*y94`^E&yzuRAgbtPu^JSp=$e?oLPw(WlR}kT!FI(pN%{-|Blz%}qn%cpZ|Lk|T
z)3u3gAIE9UZaQ*D>E2_DW0}MD@^O+g^pc|e&vywuX-TdT2p@GJh-*9QGz3ENe$en3
zJm#o?GrkGnI-Q+zLvd~dv}_s({V5%901ub8%`(A68%wR__0V3Pi4BOd@e^xdj!1Le
zW}Y_crN8sWQqC;-oLpyk1#OG<&D$C`)OX<u8~~9|Q1CN0<x!y#nr~&}P~b7Nx6@)o
zk{F;&B9m08ZT5ol6KN0htp~$p`I6w1OtOm8X=yK?LXYt!imPo(rShh)j9p=QG6o-R
za~hJ`GM7IXfo?6BqzeE84ha{sKPmSw*SW9aiv2;#o`6T((xOV60G-Oa(baK5IvZHj
zEx{?)iv$wcZN0%j#3MJ#o*$!SO&V=(^W<E&>00`@Wqy=(4+mIFouGiHc;BPRC}Q8Y
zy>=1A?2c-fl}^r?X`SXGw?oZ<m<5*<1vZ+Dz^6=+riEX?_GfTT=&V1>XyhqR;c{YP
z{gcIQc0MYQbCW`rnkg025YtdQJ*zBDASP{2m{i9I>%kIlzhg!g*LV?3jJ<lRWOwR^
z@5b$)DifCkS{p3kcUJ5hmQODOV#dLB1xGsjgH;0^+%9&H5XTe%zxh=CU@Jd=wnQro
zqFWug2?0&2sAWHw7Y!W@hYw`e=!v-i)rQ)o8{3ISePw!_zqWQ(2^d;Fiz5WLFs5VK
z-XI#6T1~8OgAz8haQCc<q6r)=F|k`S-7wcA{Upe#aIJ<qCP~&(>$kQs^<LX@HYs?<
zD@sS<FE1JSJtV}Nr^R(z%rwcu>W<OOkL{|Tb##U{oNX2xeA1$9EcyTxraV4frqpR7
zMzBjDFP6IwBx;KtazUj_&`z-`16t==v4k6uHN(U(qGlR4`4aJ0f+KG9^4`EuazzYi
zt44<3j6Z7KX@ZdG>DW3Zg%%DIwcbsuCv9AyvTwgnpU~!BJu-C9Zqe9*cA`rQNJ`nv
z8dBFI5BcXcYfF`vH82H>R<)Fkhb;^P=cRM}T-3!gAU@NK_lXaeF3q__bCNDFdy`_y
zEz2)~D}97PDa*<ouKQV=ZMIvA_mqP1ZgiVxBn8gYZ%(X%C5h6u^UzbaHzc=DZcUt`
zRez@JRE{i+=xtjhf9z_3?3k{4&Epj8FZAQGz)4xkcTjpJ<+~#73WA3A4(%22V)O#{
z5;D?K*ZJ*#@$SG%nlip3t@aExk;L=3TiU&NOS@m&{9kFeKt(SN;+eTWP@nzO_TvI&
z2%A={sUpmptdnsw5C_zZg5i&2v!ml;heDWfQ!6-V*VDfV$1wWc%UkJr6~PtuS^jh@
zwWJkPdbxSR#cFt50y8AHY*^)90(^WYp$;Yf$gXcasXFhqAp~rqYn$gcr6NSoZda7<
z4nzJmwlo+ygMY;)PXck~6Mz-+j}(+X7H^*PMxpx`6T#lx_m||UXFeA34vQfsEj~zO
z9`k)QWErZBh#vf|ZLWq5Dkf=|bP)YhQ|hgtH(t(1%2V)pDBYSO5fZgy{;0k85u<0m
z&wZs#6XBUHb`8O^95Lg^oJ+tu1iWQ$sdS)*t`p^n4u25Q8j&Bv>F|#vP7k)%;jS%t
z3bWd(X-FDm$iKWw(!QP-mI|2yo&oJ|*Sp_JCvT3kCGns=`TH6hAP<sVJXZY7OQ>S4
zh|!|qghO(sLkqR>@Y9oY{%yNAnhfR`&DHZ5CB<nQ#jutJzJb{j6VK3I@eQoe$(jP3
zl3htr8g6E5Zr7@9W3-*_OF66rEqVXd!<o}xcO+N;o>NZxE$$jY?;40aH%FA`l|uL4
z|I^Vc%_r=;KX0C^XZRy`=Wd<(pr&E^BA?#bEvLSmsdhytIJow_vpc<ZMKv!gRok#b
ziL4nsM^`Lc$j^W2UI%X8w2?hv4ONEsqRr~aha0ogykrHr)DeR0A+&@5Ril#S2GCf}
zA+pV$Eyb1cv&k-Qwni?-(CR4)&%I&kPj&k)#9K*ub`eL-(j)kgIcDNAoHxTfTY2zw
zU@T2W;{Ku3pHgp?WxD=hpsebj6Nc!sFZx_kJU#(V7v+qX^D>>Kv-cDfN~Ur1M|s<Z
z#G<ii+zf2gZUX3EpoJxMlD+7vgMCsTi=4LRz@<{PeGb9i{`PZ(CfgsaEMg|sI`T1A
z1oW8z+t<&3&JA}YL>{mNp=EtLMEfWwPwnsT=+l4%DQK-c?=Sk}TRhZc&>~=A$RD}4
z*6`_3SACyn&EVC~sOq0RgEX;T$4W9-@I2RtdpExsxYX%qKruEj&OHK}W+;!n(wl?Z
zX>SNTt`bL|+H&4QS>oe#F?`r%+Rjr$>uO<S=MY$@j8O(88}m=}?^Aux$|p1I?Z*;N
zt>(ZgOv8*Nit(#Eb9rF{+KWwE1~l+<U)MdZyh6R{MknDzo{=N$*HM=Q{mk}-NgBnh
znvGZI&G@k5K?YiEFv%F<a)D|h*n!S3^F}FgMu;?IE=rVT8|fhNF|0RfYJOMJbjx&1
zTa<z8yk6`OZNzL4L*3x)PlpjnMR|)R^8opG$}LSuOj>j~kK|%LVD}N%2|U^!ZgPNR
zG@mQ54>gB71qjflJ(4L%ob_rp;hE_*^t$fk_B$T6EWeqBja%ezg+$s*nD%@5&ec$y
zmm+tl<}ycN3I*K@9Qm0Llk5J7nmx1q%0&=}c^9(0%}w0KNXP}tU3F7%e#KyxBSlAI
zK0!+y{^MWnT*W}F;mc1?98MPWU*wtXe|^~ef1~0lbi4Q8{Z8mmj`SptXOsytXyge=
z!7}=lrpIO6uwTsg4})2Ha2LSxkEdY#-0kf-tM;1VKfD@1#ZMl+q$2@d#opd-nj9Pa
n@m9G0{~!FnGzM$9dsVfS>;Cr^ft|MR+)-9gmoJxnAM`%}@jDee

diff --git a/two_way_files/figure-html/unnamed-chunk-18-1.png b/two_way_files/figure-html/unnamed-chunk-18-1.png
deleted file mode 100644
index e03bef5a7055376e8f8f0652f718b113982bff83..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 26465
zcmd?RcTf{=`~SOuii&`Wh;&qX@4YEadanXOY0{D25<nEBOYcoe=)HFYq=WR{1Ofp<
z3pJFS@Oi$^%=4Rb=FFTw&dhI~-#yE~ZeTard+)2fuJ=W-nu;9$L$Zee0N~5NlhyzL
z9A^N)CcTf1ITFBgn2Y)L!10|v<{)Lz?H5+$#-TX?&;at%Z?rs8cNcB6v~<4+TuBhD
zrRdxEWYk2fSP0AGDSY@dlScKdn&zwY-%lTC=vCkLhH(kszb`92ny6Bk@hN#P;w4%8
zotz))R`g_ZJt~rnwq19K`|-FN7@ro^C-E=ZeVj_3CQLIQKY|ECLmENu>g^Zk=hW5K
z`-Ppet}55Fo4YNYva+(0(wOnAoGEJwc!e3sw27?2-@ku<_lREccK>NWUo>X-dzVQi
z?d?9-f5FQGnLO|TC!)^5rvpmt)H#w#{ZGaARKcZ}PwBz>_CIs&o)S5q*ium6S-Mk;
zPgCRfDp|4}I-OI8-fdjy`z1cL$1i^qmzpTKDVl)z*j6`Sh#2RZo4<+IA`no9J5Fsz
z;N6Ka{{eT-*2Hs7i${;7<vJbGgx>|*7Y?6P(Sz;vT&%N7$H(~7(i$hW$_=meY*XIW
z+hA+z|1`pR$M$&0;az(tR2OwH=j%p!mMWi-^5S_KDvRqp<&LQ;bcca~7an8XREMXT
zO@vS-Hf^Z8W|2oNNHbW1)19$9%t#GUgt?s}&{;w5+o6&B`H<#rhPc4!B3vhfoJ}lE
zjkzwYqJb9+a48TS_`X{E;J9J*TN?1xDLMQo>jQ5*j275p4b$;zc1Oec;#v|51FH9B
zizS)~yob-TRJ0b5j*=ZN8?XGnYIuegyV@r9`YNYL6c98ujo)Z-1$xhCMBlmns6JC%
z0_FsO%k$RWs@Aqd)*k6$r|>n;33$LW+PuoHaxHfTPfh&_3YKt6^7VLiD}I+=%On(i
zx*7I*!Gra-dZ%QOLSE*JKWYX1T9iN5z!gp-NGgdI)KjLI1gd=Q3~gD7=0?JR$NggV
zPX~?SWA>uMP6~cmxRWaq`3?Vide}6d(t@y&$KD+l9+P5Lj#IxWV!f|i@JK117cNhd
zv%XZGdWYm&^7clVMbq%Jq33Yg&QGL(Lvp)M2*`dpplmKPZVVims2D;Ns+(bqY#pBi
zdt`6Y0`1)_ZzY<H?Vhq4#XJ9$X}u7n0j;^u%)?X*XK42kOQ*TCNezNK`SIp=)_T<m
z=oQ<97LYdH=vr|BR#sM}R{AW(npV%ny*Ig_jjGiTWsU6cJQK}|QlfXgOneb8wn=M+
zKc2Dj#0wpl<@38JT@AR4-`6JkR7ihS@-l1Ab!kroT-pimf$gp>o_g2G{~$`NlCmxi
zwj*KU6j2@2h)wvp@nYYOT0zC+jbIn!3knCnmmItz=upm=P|xbGb;_Iua&Xao?K8R|
z-~9Qd8FSX5KBk(5x0>5IUEgyXo-IFrX^TC*PPW$U`g^ssYWcH@ib8w|k5|j}l6~~C
zz0lBaSnAiWqX|`7l&^oycN?+jNeI+>i>zeZV&DJ$5_UBx!KEU!_97;idN4zH#~ZTY
zfA2J?ay*hvGmK|xU%QS@ELFuQ)v<({pFbf2LPW0@PM>uAcJ5BPfQ=|M=bFQGl3a$+
zt^gF8F<Qc0L)P<S<#XtQZS)2mrBE>To2OxJpU*sF-S@UwA}5zl+t#I@6iW>n&RN`v
ztm1G!!ive=r%<7CQ`O6mPGoJ_xHdk~8q3(X7)TLB3v2x*rLR_A$vQu`5BOZOQ+(O~
zR3Xh}Q!pK3XcxDsw(k`qE6_Q8MXTaC*L`BlMdFsh8c<Pp%^~#W4)U?{RDdWMZy%vj
ze5;fD@xX|_ShpFRlKQkTrDap*{^tzV4NZlD#V)pxPbF#s{?0@{&rDJgjW7yYTG}wT
zrp=k>XQzZFk*W>Lv<V{SyN#Iv)9gB=-P?v-WU34F117r&KtbhxhiI3r!7$3(Z*<I;
zqGOE(SuYv%q!`euf?-pr!f^M`3Y+FPhj38XQR55hH60)5pWGev<bfo&|I&(QROQ>`
z{OD^)YT2Zs$u~BN881}_rwdq)IpI~CFPR{z<Lmwo5!oSwQr7|8B+=n3HKBP5H!;vE
zPCf&&S5MOn@}=Ng89&+Ynmeevb=W8%E9rFJjB)cZF({sq$K+<%%6ZR6pmbonjITV}
zbkjzn7&1(+64V;IH&O-q6Wtisl}++Slw%pxnD|t}K3}X^OozArbSFagf#y}}6qXpX
zHmkXYRo_^VC~F7VahR)ERaKY<kPxwkpDd*-eHF;{wAR>xvz7=y6Vz|Sn2TW6W!K>m
zIT(XgapG~q2iQ{ogQqM#EGmN}yv##^g#^e+i3^3GrkQtZ5$4ZLrzsykx`2GBJdT-9
z`AUBj>+=#b_pUcGOrQscY3F-CgPF~gIZ+SIgO8X~gocQibpj#N7kx(5Kbt~BiMn3Y
zh6;GwMDHUq$p)mt-0AOp=^N9%YQ7tA<~`}t(hIM#YUpW4<2!ooCvc-)zFoQl<mg!$
zi}>VNe_{0{J2J9lR(ynqhv)32n@Eyj>^^OBeSOe0ODj<H^gD5}+vkfW&y$q9rVgrJ
zF9o}1o@0GRG5|sw7O}}|9-<NWXVHY-lWUopXxV9$1aU9z6BNB8x79$`<0GTZLv69t
zm@k}!5d($n4Bwt`=pp`I={gD@B~}pxKgr2E7WALUne{gf>l-6f$xAIye;SI^M|GdI
zgnUiaK(fO4d7>{!Y*L5H=6AcNuh*aarBCc76<^O-8r7{K`@8LO^bQJ2>PTf;g!@dI
zPV~O9CV^Jjh%D-x*4#e!>URp5O8SM9B&}bihyK2cF=X`yDFc(9-}=VLjrX;6cf8kQ
zy+qR*C04!Kyk=;L`{@swskZBHk{?|_rzevIPBV<>otBCPw(QHA7HM^x%vdcSKGJBa
z*VE`&6(H|yL0I+$n<}L^RU(?Xew)DsQe*)CJ5ap8-1?~Aq84lR?Q)8W&GCYsr?T@2
zl$YiaQtZ;oD;8Ys51jJ|PoUGMojYDuW3aJN&k4Kdja9RdGVv=afxZt3UspUHsx-|E
zmm^SoJ&q2Snob`dXlM#k2!@Ct@SgK?bN_{DsoX|A>vR$L4F4a3ny>>k2R}v7E+gIv
zJ>#6JF;nc#=QWr>*5cD{)b14tKn0<tpCJEf2vt4B_Bf7$XDvP6K&`K90}n=hADjd-
z>Ov2xfqW=h2=hyy+@;L}y@-6;#TA`?J!QEKxte>-<Zs{BM^62xPo6x9dZ845yGwg7
zh7Pm)B)H?h_2nm2g#!HW0fi7uxHN`-s(=XywA=_~TbpwoyNx=QW68x_5pC$}h7Q$S
zw5+sv)u--4TnOi){%jFw%0|@%BFt-Wgcd!(DO-lmk3&_rTFVRecEejsidZ2wy|Z}I
zqOQCgv+zJBZS>)ngrz0-8&QCU9kK!2c8wfKg;z|a$KEYVbAC_TT3^KG9+()O8g|T~
zs$8VGzx|2hz=pvyU;IyW-RktD(LKP=pyh9pE^^A|*&G?z3(*gv<nFzE#lJZjEtdS9
zMvHoE(~hZhkAEMjglM%5?++44&bc|?JK{^>5cIY%9?m7q2s`>q95G38<7zrU3YUR(
zo7v4Y!z-wTi?+b>-_FOINXhG5n%JH;9er&14K<pmL!UHs>;7ms;pmod_31I4>lYw2
z62bxWUZfl;^bsk(x|vN#V4yJr$D<auv=qPG;dGDhKkV>+9YD=emd<`HAH2t=SbT?*
z*TVyJNEC<ArF@tnu5sQa?##}caMc$@wZBxj8Q%Z*D*JRYt!4BC0<DPNJ+8A$u3Zsw
zF23V<V~B7jWYaSkrS31$_)2tP<=RnbU#LQ$swB{(0Nj%@QaAYMv=j_1ef~MNS@3gw
zu;H;^*87BbZn`ofM_0|uxr119nBIeS6Txa$db)~K%bzw0X}=X5Tua`!!usrB<@Z<K
zIt=ym5wfH6N6^vF{9axs|7BrMM;+5m{@%d+<%*K~{84OpBmzCIXScBaB-yM0t%eKq
zTJcAO-3~1)3aYECp|GHU7D~{R#Albs?W$|e5%x^iS3_eX%M(=KSF2DU5OVg_&aBz1
zkrz$j*K4U`lN(K}DvjMPwAeqs?B!E5F6R;yR9uumWt0X0Qf=dN+HHs74<x%Z<(6al
z`?iB9<Fip`W|maI<F=!Kk=BOK$P{vc5lH!Kg7%9NJpP)-G7)FH6s_(XsEr&2K(m)H
zxm)hCAq^P|Y3V40ypn*q;sAr7@tMyy=R5B^L1(=7x;TN`#C;n$H*JVJ6T0aY#blDU
zDyH*@595f{+B~BQKrL-U8HQ{`sm*S)QUb0Pnq_^BIUh9p4O-5ZZC;T!yFF-cPE`c)
zfgR4)WP&y-bdAdz02=xtw=%6A4TJ_zpE*!?k?l(tx1IqilsG4eiOC3^(+B+Y>FC5=
z^={ycY&DjK;x*a#ByIbH?8cg!ky&of{dl^`K}V;mLebxj#RpP1$l}}y@AbeH(}2er
znwQ6^a3}N@VV*>)I;-68<>|%pSi~%c`5y+>gf`!UgU)Yq8Q<?5z(<LoV$Iqk!Op<J
z;P%^rNhF-mOt9<*ks)#SK-HZ`x^Wz}WU~o$T~~T-t{qM8Cq-@w_?D9a1iZBu$mDBn
z&-WuZ-{%ka3?g+W;`+4GC|W<3bvVC47pC+po?*9NrM2J_!v>a_mEFAe-S|vqv}XVA
zi>OK>=u#T7^4;}IL2{oSZihR;icX(hG?$i^EqwwWUk<l^L^cS#)l^%K#RnSinfn$H
z7>eQ0z{K0w<=y!(*4u1y&u71aT7ghTtoCNC_61;BODPUhl_x{E8|Dvr_a$8Np-y!h
zn`@UKE{X!Tx6vlPx9nm>QO6F=Nd#CMNVuwpr)nPEr*fY2c8pjg8mGRQwggPdm&cOM
zH@Z84A3u->gsE}6qKCQjb=<n3V?PA>&`m-HcKdWd_LJwjZ5L$is{0K+m&?-r5du@#
z?c1-K?!O==!UYnPAjkHU9Fys|k3oh>BZlx#nRFcB!ilVW;|f{I*zLRlBjATo{nFlu
zqW0-XCDsHVBNR`0xe&)s$<BW$!BVTEkpd7rj=D5jb#(=Iz65%W>pI*rMv^J<0216-
zAHLc$-^cC0wl1#<t}3$b0r7bf7Dz{}{?~X|CVvFCyydYYw5QXt9ydAdGiU7iT^*<W
zWsy|S$*Y>SwZringzo+<RN%t{O0U%W<ov0>GAPEhvI=l<Da9uyzRwfT7b_XT$Am|U
zai!in8lA;6V&{RE#q{l|Xru*v(;@yQ16PzJZj9>hrm$gVMinC!ptS7KO0$<+G>z-u
z>zjtSZl|I1YQDm(xV8rM^jEvY??cn)aRH9jUpp(qi4o|=M!du}3*DX)P0y+T4RE{1
z6JVk$t=iA})Cce;k9Ddu&p3Ptm~l+aNW@&3@dG{|T-@I*Ty7^TjNdM|{&hbA&!^m^
z-u{V}8ju&;_%EwYTLuWRB&URz@9j~H@8x4vT2JK&dArFUcC;lD2$PRX-8@cVJ!uFY
zE%?@`GQgNRtYY-R+U4Wkot;lV_FSr+PEeVbWEsY7dwXzPm@s0l+3TWB;;wBEv%FZr
zne0!D!5zzJ);N#Redv3n04IlfQ^-Aw3b-*vpNRsZ`A1xor~95&&w;<8(;Uy+^kX^$
zX6MPh$eFLmA5l5F&UTB(Y`%@@h#T1J>H6j9$>}lapOxK)xaZfv^GuXqzwsR<X?UsY
zK<M82Xr&0GdN+caxTFYvREWF7<@y|`=Jl~fI)di=c!0;GlyGnP+{^K%{TeLE-TrX#
zYbM%_(ZP~^)G6*n#_^CYU=klKw{<CHQpp=fm$xm9MXPrY_98r2=z%1Zov%U(CH_Y%
z9AkxfHvzyYSq?L|Tgtj0e<b2$Z2Uc`3-G;XXqc4_QKbd0F39Wp9EJ-SUSUxz>7sro
zIPJqGId*D}T2ew~o8E4y%_o6=iiq-lg18(Us4o)5ouu!<v}$kok%n(sBo1mgG+S+A
zDC0{DDp{DT5>Q~mYK}?#gtUbL8W5vyNEVCJnO)ABv#}wRpt!N1g_X%X8%xq6Ci;>)
zcU9z*CpY{g8LtH<=WSEla<g)@XuNPK=sS*C<9sZkQ()G}U+_y0_o-TA0IyE0sw*S9
zpMDu1ZWFWt<uI?os#2%~!=ous6QY~y{Xx3}$5HhctS5Be(#i*wnA9<J!gcViUSVlf
zxpZ4r|LU(n50~sk`4zmG;~>1qC8M&%X-|ynT^$X2ouO|h@;Z;#2N!q+GH&_UjU(X~
z`{v9QB0P}<x=>9W84I5J*_2)yho%Hwy?MX4Cf@4jGfgkTDrFl8o4t?;WY?;z)?zoX
zMot6=Za=n*{kc`6IY!Wj*0D)ZDM^03xoZ*?xDQAU&ex=Xymo_rU@!N_^N<*%8;UQk
z`NXU1i*O7rq}5dBT5KdIj|Q1mS_{0F-99(a=v!}k3EnM_Ee*KjT!4c2CCrj~{C<~S
zl^b`O?X#$Z<MS#%QUdFr1ZLb7Kh?(41AoARFWH07n$^)ws#wyZ+E?X&L?|7OQ=5-#
zI)SP;<GDLiX=z9JY47qqsvN&fG9JybsmeRQL=d77P$EqqLqi`5Aaz_kL8H0{O3HRw
zv;?D!UkfPAbi@ZHa)Y4zQv+fN^k7#LBt;a*M1{30EAS#DfzE2+nG@2VXY7E|1TF_c
z`1D!#o-#n4o@3W%&Yx5aG*))7Ust>dva<K$plq^O{;&&{?<N~-gZEIzkGVR6f-bv;
z4PJ=g0gW~Zmb>5tjB9<TRmpqmf-O1h#Nhk4&|>JWU#RZyYoYD=Mg`BQz672wH~iCP
z^`G853pB5uGOq{oC`Oh-wxR9NO_!;dTvgxt1Ehdr+Tez#u9J!=K+(Fs(Y32k>9HAJ
z3yZIX{SzRN3F=<XNfj&w4fw}L4&$`<Yq{wKF8vJoO>7NpF)Jvhl0o(-4!k#WT3Siw
z$=!wsPimR`^3G2SP!XCZbwTsVl~|ow;asF4_z9Q^Y(p2qFUzLp-SuU}FRFZT{gO@h
z_Wx`dBpjn)=<V+2T<SDy?h%cos>gyzP}#hS{~lO=WBc-akQ8_)kId@SXyh30vEqoC
zzRHDM_MFV4KYDF;DrGj=DfaI?N)Ue{%D>=NU5CiuAEwHl5g;nw#P?K|IV@5z7Q6Pg
zn#u}k4htG86TS8~Q&i2lHiHj)xJzx)j)7`i<`&(BuIkh7f?;bLmcFEfD_1tT#wu1;
zRL51qlhZa^F(C!QLRU)#1QHjfzPWFZI^GV8!?ubMsTjL$G*Ylzk-QO4`y{!))_nqK
z6xh=`jg249|7i+jP8$V%1P#5hV$X^cH*BNTfN*YCFt8b=$20wD;V3YHb?_!3TiW>9
zR88QV2|uQ9Jmn8X=qi9x+X7f@ytvwtPrQ!(ar0qFL*1Bs@ztAkiH2fkLUMP3ii<ji
zwijQ=$pwbQqNoDnV+bwSFP6oXt%Mw9$eLp4?Xh1!{9!$c>c3}&mHxgHpZIR5R{RrD
z=j_-gT(5Ij#8mp$S{K9T2+A9;Ua5)>FtJ^q%7L>(4+UWCBRs!t#N)LpB~BDf-Jg4l
zCCa9&iM1aJpo`@<Fz<;-;0rGBV_cM*D-f>NG}>CZ?mlL65W<!X4w=eZCVKD);&m;&
zas^XtW8hCP*53|Z|3g8}<NV$pcJJEAAcYWUenz0}cIoJrFYpWBUDHTKp~|8Mdogez
zzz=!z9J<yjqYcf}km&(hwpylwF7}WuXLJk=r=?`=P{mbP(Wc#i_HZePa_*2Y$ZsZ&
zWCxr=64U&$aD>}S1)KBbUT(E%aNLsz#16udaX{WOm;*>{+Tz@gZ2l3sZ7&gYIpgLD
zd9SN~>$}p}r0w_4uMPtqWlEycW1IGq-Ok1yGPrA=o}f5$H~bE{fv%CiedeN^aZpwK
zHg{`{nrqK4m#cED_A5(`xM<ewpO#pXu0@^K_Yu_EIPH<yi$<%r5wCu<wL*PA{O!8&
znZ1gFuaEo1KYmP|LHFlSOPJN+4T3bLg5<z@^xeLqiai(ygmGTrjs~+ss5?(O8g~+j
z$rfVPoau?6)yGNsW(5ZEQ9x!@dDmeptET=(J<Rwk*!-k<6JJP2+?99a!=Erdq}HbJ
z{Gernzf)Axtbp%9Z{+J$AJ5N1iOEf(MhRC(UtI_pr(swo4eMaYj&~0tor~}|BJ_~?
z%lR`YrkVBm=||!GEbbpn&aAEUdwIjTOTXdxSyWU%GOe(K?XdW&8q^-jpXmlQm#~A5
z+$tY8SowbD%UoC*qP8A0WSzf0Tpc1=v9hC@o*XLrnnDtO+?wNb@nrueCbkTPXRbw7
zKNIAxyXkg0;BX4c_367*I#j=;=Olaw%0IHAlg}k`%gD73;K#)v{SU!9c*4oYnAqf7
znxinadcHn>@uA>T!}RT|@$7C`!El=xxbgVGzC~*_D@Qs=A0!~G>2*mSC)~8rJH!&~
z4%3~=h$kUJpKilZahJkaG&i7b0=DFOi*=Hg`#{Y|?lVdOcSC~e=WO6!XieLtasp6h
z%6K=8-T_J`sXMxz@P56jS5ndVV-#kV(=MO!MKE{{urncZizgM~j_*L}Pg)Ad{k(K*
zq4N>VCHDIAKKjv9PO!ak8zR#XjQyXR!<Gn=P;!BpH@#0cY`vVxJf5Mxw04tdth@`{
zTwf%-TGScw5+5+UUL3s`kua#ca<yt69;t+E*~sUjVygA54*nWV6hbS3OgqotOQx{4
zZq(eFc>LdGvJC|i4E=ev+pUCJAjviN*qt5BAlP#5)Nnm@H=h$b?~dU9Kn^n;Aurn^
zXkt4YXQ-~pt}=jlquzbK5ej;HD3l=~*0YUXo{~2me4SpIH0g6}uOdQV8rWJ4YA73*
z?>kS;RvjTtQCyYq%>8q;kBL`FW6q9^eB)AIBf842GVP#~lKT)(yY%zFrTk5#Ec5)z
z1EN5)$9js<+P?U}$gnTg%BtMQw=FLt?zu70JtxgvnjE!nGswPrHZgBRxaFov$*IlI
z(`;Yv>vEI)yYk_X9vaILWyawrNBv-ul2HoP9BUq-*=0FB!;TcA<w(k&B2z61Icg9#
znd8`eC$c@5r`es=;(QYmql-l=ji%#uKp*bO>DCG=@jSS?JXLfsSUx}RaZf0l^}$L^
zFy#TGR^%e-;i+13gY!_gxjUNsiV+PeYZ8E(D%yFAe|0=TYpie?*N9`}oWZk?LbXnX
zYFwP7<oHvY!ub#5;V8F{n&QPEqNBdC{qOycPUz1iw`LsU@(Md=43lGin0PY2d<m_d
z6&&N*L$Rc>672O6Qb8Jzx3<4#7~J?pe)qAcnc~-JbklW0JhzkaS>Li0dUce<;1tmc
z=X`eUA2!D(#4#UdSaR)C{Bh$e7f;<rRTXt{L}-=hQ|hz7QB_9#718u$+O>#cDK$mB
zh)B<33fxz`arCC9c?Nb6Ny?P*8H)@&oU&4b$<g_#SV|iv#yH+UVV%Gw(;W$+nrnn_
zr2Z#QGh-zk#M1uqvAwABdQ3*@++~!}iQPO0c;oT&77qD0PqQxS5ov@xmf`$wc8iOX
z-Pt1o^n_OLBdVS;pM&Gq$GWzvQg?rU&dAmH+Bg#ZcF|IP?dM2z?1JS#xbNZb|2D2C
z>ya<eo`y+qUTiDVEbt-r)EuxeJTqEMf}8v4w%viwO#R|id3pIiho7i#h0j;RzUy}W
zFJ))bD`R~0&hicB6l$dft7ir`VDFh{zu43(RaK1d9&EiHmuh+0Psi8M8QJyKODcBf
zxX<{2@jesP-L;No^dg~D%L8$fjQ`!i>C<dBhJR}T{{P{-fz*9tTJbNQ-;VgAGd;$N
zL0(j%xWFJezw7VU*8`fJ`^xOp2bXu1HsF|_(~{kPT~wjAuX2ttH(lk{X?u8K_}=GM
zi7!yqGG!$V<p;XAn|!}s5%p08>ZV4X)am3PtgHD{Jks@ej%l^9%V~M((^I_q2R>!P
z^amP#46n{6l^NVNa~TFKv%I17xtlw<9<LrAsdMIx47`gS(JkzvEm`WyZYRo!{NleT
z4^ypKRK<h}45@PdZP@UtiQLA4_?XGytLjES<94mInu39DXB;-qvtfB}a9M{&=73tu
zN0svdHmsJ7uQ?-{GEhqH7lUX4mz^<<y!9GyUGH}p&=3`tDbmKFNEh<Ls-K-T_7ar{
zn{k4Rrj{5r6Xg|<E5CmNw&;_FB70`l46>@9`Hcf(E}Sk1WyRFB^T{H>)a6;?+;kw6
zwP=ru?b9vG{O0?yVWUT#({XmC;jzcFJM`s6s}S>nRM?X`Vg7vVxqK7hsEq254w7Y@
z<=!VdrQ$Pep26@*AahB3n&;}IWVOtjtgZ+vlilb;2CVfc%zP5~=u9?mPncp)SjUG5
zx$C#h>Y!3{YtfI=i@69ehf~7B4fp^GgZS!YnGy5Lxg6HCe2~dsyz&QEh5vJ>>n2Y)
zMrJ4ON~Rf2k6+$i#R1>_c-J87o{0xIB9w(KW>Syxu9SIEl?yPDq})Qk6CJ3`WJ5gT
zzed~^fvver2W%t81d4|+G5P3LM>Y+o|B_`vCPY!w)#*H>W$C(M?TD{m;8}y$UCooS
z4bF*C<MMZ???t?`h;SC5{ZGEGTD2|5>;%4KOOaV5JvQ(-iz#2AA3A4ENG&ve^U+ha
z*7X^!92W4Cw@8?b2dn*$&%|fd<Wq(~OE|X8LLXf@{Xw>HO1mOf`gc)n2djJ>zum^u
zei`PA6t}>_m6Bv5Bvxjli-4;1uSjh0i7bxajQc6E%{rJ0a~+5Ndw@|u-F5cEzh~+u
zykx*&xYM$4cQ%dW4a30K)YLnYq_a-9<ji_-=N_<4Y%>9A8xA%~Y4jtusZ0~Kw6^C3
z)Evr~5<ein{u9njuUeq@cT-J{ON4>miRaRK5)|6y?6?2{c>R=UdV0YY$efy*(+Q%#
zq~!D4Ls_IOVS|l-$0mNn!SLD$bht>vovAzGI+jEpOzlKb0+Xt|S~%^=$1-lJ`41mX
z1CrC`*=748AHpZqGaUr)0JA&0rPD+If^wqEG^I3Hly~V(Ie?R0QhUWi#`{_TINrII
zf>B$xmX{Lk>Po`tJ5(C+9(rVPdCAS@$#RNqL$<8oezfj)Q)dKBjEL_Y)J=q)KwDe+
zu3WwSF9SXtZSfdm`R#U-U0OzG4BqqO2(vGh!l%5p697)CB4uVJh$~iO;iu&VohWGs
zRDFFT`S+pONw-U_+U0POzW@9%x|1Z@k9@%xoc%B;UNe(R<RNcd-h5}?d|V%vLnZbd
zw`Ym$?pVkSc~`V~e>RO8mJz<Loti?e52v@cl!KHE&8!OA$&2rY(dOSy=4G8LlWL8>
z+2p$H?oAvf^`cv-zBg8?H-f^yTuI3#hNt*XruLZ*YMY<lz6ITX-A{GN$z1Y@ShKK5
zY}_O2zC@AE)krfLycJVcSJ~gvYhO?9uwHB!tG54a&Tf~$!aT)cwgvsA`Gdw}f9hXZ
z-JicolR0hK;l4l$`?^&xD&fNWJQ<Yw8*@#!`egvMkq8%`VdTck@pcm6v4{v6XH7!*
z@ZYGY#ObBYdIs&HQ?1gmu;n+VFQ4cUog1VnujB%%(*D{B4$~bWF1ar2VF-1To(bdl
z*ve6WrYabmG=+WfVqm$-70$&{%wRIxWYwKYTSjl9zNEea^|Mqs6MMg{!EkIFfAga>
zpvXP0#NAc&T^;djda}trejZ8}(n8(AVEN7KUrXG{j{r`a=cf$6&Fm=By0hoi(ugTz
zxJV^H(r+x%S(IB?Fw3USJbK&)`n4#p%gl}!u(lg_<l+hAJUV0byAUB4vF{@)fA_kz
zCDHGjod5Kl;*RVv$N=zex`Q$ZCa9i3g=~D&@@rd)V@P;H`&o7u6B~}>Cw--gH)$6U
zqO(EfQ(1fATzk-J+E*eBN4X7S&BDRz?f=1PE_%utZz+vTr(>sA_?5hl)spr8BD*p}
z^}wP#P9!$<ef`DJI$JnIeBe+tB^Pwh4P8i(*yaqXb#I#q3Dk7Z2X9qv5Q=R>DBBAq
zLSkoK3OxcuXK`<BhSvrYTd2?lXH*>~LY5zI^6-6{4SWi5$SB+w)b{nRFJU6*q?qev
zVf&K*kjx(c_6cRXq>}pwi<>wE6a_PTK0BBF)3{31xICtnwrg7g^?B0vUDV&)Eo)$B
zr8d>2Dn;TraG7co-tE0@G<&KWrBzgYlzx?1<?*MUXpktXO=TSun#+UoTkwt3yWah{
zuWX*et3LNTEhK4-TUyTlmO9sOt?T$u-Gw}kWyPAjXGh={oWvF&)5>NlBb6KKFY<hJ
zbgbG?r6+KJ+AH^aBH#3e^O2*XKmc8~_E@@$Fu!5z=XBBg#SgGcRMrCE(vbRw4B22%
z{@N<zcaOjNDpsT#3K9>mXj%2KlM5|`-al6@ZuQo7Yg&7&`U+Ob9r?OQvF;kFXz=UF
zBuif4vWRx0jUMrdN#;Jk=evuMp;!u)p!fY+JP=k$=re{)`up{bZ|@?c*9kE;KCIeh
zDdb)*B<qOrJ{Hy8m@n;SLdk3*cpz5zlZ#&uIZbQH96x6S!JSA}Jl_<`zh?G&4rtX0
zyFluEweUR>i?}uBVpI~OO@opWux-9b7HNJ@DvTMjN#%XiMm+P?hG^y=?;~Hxw8{*{
zi$ccI4Y%**ctZo1Q+Ca|zEs62U_7bhr^@R7cwr;xjBfh(!85#hH1E425sT?XvK!PC
z6WncubO&UFCHVfwM00xmnu2CbJSNdbB`vC@v>u)1Ok(cf*_lmOpe_$qCQ9tG)EVjZ
zR|uX;JsjhgOtZ56Oo8EOgJS|A2Br8d%-H{e^6n9x0|Q=EimLwZ;<FF8q!oCS!i-=r
z7}Zs%Q#U9X>ddC0`4W>m$@lpv$`gF>Gx6A`<w`D2-r=Ik>XQC0n3Ta`mM+a&b80&`
z=IBSO=xZ-cfmDK_3R7chA5*2k24U3kCDBG)LCyPT)eP6q^@#2mq`m#EWy}n^5$WbC
z$AlJoI!{6IIg=@9Doh&81}!#VSEc*H%%`0EiB1f@@!V5_FtHz`qEduodv6XiF+UE>
z;6m>kGnm9Mf->8m1X$4`^H8r;$H@lL9o5Mab)2oalz7I)C?STS1@f};5qGUO@|yg>
z7A73RScI=o*7*s1V3v=+2$I4<t1Lg~;2PxJ6{yK4WDP9BwhOm-;S_1JF4n|lES|41
z{<u~60ZDK0R#&O=*c|Ptd(eAGs*zG^_3v%QcT2B_f-Nx7kgU15Iptp_7GO968}lHV
z8y~-bBU1$}HPf&p-Hb-IB;Qlr^?&%b(yT2P{aibBd&|l&ODBa|Z3I+Rq!QI~_#{~&
zrh;qSTDJ?vTf2DbmQ}Sb2A$h2+Ariv|NG_n5+=mKE>_8EH;+QxI?Mk^*VdU7IfvdO
zT3kh{Hs2#QFKoy}?6uh|8#|-r-ems5=v&{m;16G)IQU|+PsV8sX=OvViiu{)qEugH
zq&7cX8I{Wm!lVz1)?b3CgKtF|)9{#<74^p&q7Q!uw4s}*Z$%o9W5xdw!)nm{w~AuJ
z%A=y9)EokweXr-KRWo++Pjnb3e#(ThqQyV|mA+s16{Am~^4_gbbNEvC+aZI_^ft2^
z?c#=9vdY~|k=!O}m?b^X=0J#%veGG>_VpD3RA4i&d;#f(9C{DNy`F!>F#o7z(l6a_
zcZ9)*4#3}E^O!s?<TO%#{w*eBd(j5|NAtp4@qe5KCdABYEMbG5o<2~YmL3)lSI&EE
z8$yUWp6jBWjCK5H%L%JNy#!ek!jarhJ2$q2<qcZ;tWL7H2j0(I(<1hXklsoV|C(nF
zL@TW)&_-hsI>R`<VOf`tnXgVtt=yNj|G-?sZ`O!q6gBr+Z7{@Mx#_Yrc0#%28mCm@
zc@BFTeS%@KhD&oB=#P%7ZC;_P=DvJ-<3%x{_8h?`v^2#_^=QI78oE@)?updj1i9f@
zx;q#ru#zaICpWUUA?5_p29HXs<e*}eVjFeK4PLG2-O<=9#5mQgI3fx$eq{4-xRDh;
z=w8xRQ)Ykp1YP>;sJJNOibs?=m23_3={M;EWuVWug+)Z<s1dsp#CfuEL3Huq)1CjM
zZz5)#iD-wdsoY$pKAW?`$^x*RM}Ot^-soJQ)WAoLRIomQF~6XwZ0r5}+};x4tOPVU
zKb=Q;<Y2?lc2n3~vI#EuQ_E!D;r!laB!fr7aqr3>N;0TgP)V3@ZI_bA=3&3=IZ%`#
zp?kR?g%_{Gcw^(T;y5+Jfzntt7=Wz{jqESYn-{o_s$CwXdN0{muvr!w2)K3($kdR?
zwP7`~?}2ZYVL4P(Wy>KQ7OXQ)9Yf<Kbo116POA%Bkn7G?wkBxYix%+V)uQTtZQ0G^
zn4dJJ$(S1QXhEY2%`FA{L{Y)XpYSj7HC5zlWtpg{KA+!A>hIdyu)5Pux#=TTrtm;$
zX>3;Iq`okKfqBL;uCASVu{B=vm3jUgKz_~d4+S}sBL&*(e|@X^=*#0@xnnQXL9`t}
zDY3akCwNNy*WQ&i;v4;Icaw03vA%mB_RiiG)iG+8($_3lE2;b=^xUWWeZv@m6l4Q8
z1MG~Ew+Yy%Uz^BL_#xku*jf{xkt>N#yOqr&#+Pr{QqXKI&w+_HkD^Vl%aR?0816JC
zqvcu@=B{lK+uS6<%GYh3bgsRgIyrqmy}W-RlT0Q#y(iRq9I5jB_m``)vj#{bx{gm(
z0K4ATwGWlT0BZAex{f+I!;xIOv_}cD87M9-yN@=ab~54yar{DiD&>lnlR$@!$Hj{y
zmSf(lH<V>;sieIQLZ0CtFcoUz9e@VfkZm0xn@a|k&7D=7{J<Lb%RG2V=333_|DKh?
z%jY^_+eHFoKv!#3nci!3|C8h|s61QX58sU2%nRjvfU_m1G>Yzj?qjR207CWA$XEs5
z@;CpG1Y?oShQzp97#KMC8wE28-Ein64Rv?xi#lvsi~mxx-{M9fxxi86F3wJpdf@><
z;uc}8NM@huE-{d6PL_o<`V??Fo=-a!`?QI<`@5iYb4AA?oET|}_*BYe$ou1Pp!}%h
zw2ma-;$7q-w13eM8QK7-y>FWDX2Xjaui;^eeAhQZYzp6#0KS9JS{GkLumE><2*2V(
zpG`M+FBGz8X68Onq*ysP$>rQZw4~GKMn8YGcX8%<xWhR1f?m;7l>u01ofZTe)VxW-
z0U8N=bg}=`Z38r#?;n4-cKo+yWPWH;fCAfZ*Ogq0Kk|PRBgOmayO=~WGo6xji=Rc)
zgiU7ePQ3%TNE`!n5}#^f(&FJkb=*cojQadu$)<lCN9k#!tPK(i&`WBZfvu7%W`yDR
z4bVH6Z5;kK0Q8Kir)mZ0ndu1t_M~UTPQ|H<C&*CAx#YMd9nR|;QyjmG9UCV*oOk_5
zkxiU>kMpzX99{eTyMBDhciqY|`;8jz0qn*){d{x#28z~sV!pc+eho;S5m)u?-GocP
zWQk>D$?E!G(2`moA0Q!HbU#Wig3j*kCp{qijnkeHKD{t$4+hOO(@oayt4#eKpE=kP
zdH^^c_Iotau;+@Iak%w%_NiLnw3EoXCt&maJI!5co{k$>l(dz#{<`^dou)nhl>lb3
zwQ3814GkCZyI{N4O<-nkH%W4FAxe(kTg-1}Y5myv>hQ?He&Grx>#6YA*c;ns_Ug#k
zWT;~ZzBE;zhu(SxoWxkiU2C3|IM}zjwzL?jq~bA`)-5+K8Fv^#5dA6PzQ7)+1#&$U
z^7REtE~@N?6d0q@vqdYp7?1&mjoagDRG?HbRQ1I2#jCP_CZ51P4T6Zq3BwlTR{q={
zE=)(rSVhOG<fAN>gr-FjPD85WYwe(jn_BYnrh~;Bbv{4+sz0s#Or4_4qNaA9B68on
zUkkFyNVZ>2O>h4@6JN>D8?JsXR!67@{*=&pRwxpx3A*DqXECn`#$lsQ!}XhGCR~oW
z?z!3b1U&xu)aa<sEvb~<)oI;OJiqMRU<W+Zh}((B{ma-dK%Q^CIPLnP0`xcRn{Y1g
zp;vBXhVhpi&yK&~rn=dkx*H4Q0_bOm%I?-8K}ReA#?Dl|527bGO=KNPXv$IykGCWv
zJJZDffXUk1yNRu#y47MlH3@XNw!A>EZROrTY~cRNpUOnmw2mX?g_8ML;<TKNZ-%O0
z{%FwRIWD90jB2b^H<*V!P)H|HtNCLWw#R1!Z$TpU8dLk<aU56R82@-wGwDC|%F4xa
zA;LAXsbFromchIOBVa4OlEftTmdFf;JFq>&O~vFNQmYHIJcv9ZgM{Xb;)J?qz0>1S
z@ufdnAj`jw*zicazyDn(#RX`@kJx)Qf4<ts_46mUccA{xZs;rF2YxThz`QNtJ>hd^
z_GLg~cG%6n<$ihR7@nyYpP{C??Xdiho5k4z7A58Ih;&Y*{=>{^6%2?C?wk9BshZ`j
zeoP4sz+~OPcd#6lgbg>pMIqJ;0yd2BLpp@P2siRpPq*AQYq2iiPN`2Cgv3oZrWw)@
zLc`~f|M-D;9}<pf1DEOQrhP9)WR0_=&mpdWdm~<EOsor~;dQ9)^yS3+d5KSeAL*!I
zsx4329~mjcfb;WWq$p#LXlE3PWQ5}cT-6tzG-3hP;pU+7ovAag<K@|qde5HPd0nJ9
zRoAe`ZYS19py&{O2##mQv;pw;sePHuj=x}a9xyay%;5bGhEM|4i{6)!vKV)~zUO(x
z`jfYtvIPS_r4H-Kc~zxN<r@j8K!$MU`;F7fZpDX{ozgO!-ekB7-%`)(>(2!NK`59#
z_fw=sV05B925ZQzdK7ViJM25Js?%_n+st`({&fGmd#Y(LC!E4D<hYK0A7e8e#>Rl&
z<!tyx&7S76IO~ZROlj^Mv&nkVkv(RczrFQ>l$4Z<EJd+I!vb2$$tUc7bdOQ_5TSWO
z3Eg(UAX{^sKq+!lZq`-q!pxh~a(Jzg96d0}Tr$oS^8MW#)LFAW9!BvfJY6P2InOT^
zdokCF)Tz>fjJxIt5(u_&jQ5$rqq{{Ms`=`w`IhTFPXi{~8|J2|6tp$!n`^x-Uvs)|
zdXL<3beA=dLc&g%oP@P*J%&#D*wM6h>Ajbr`83qg68oL2srA^3m5Z}F{u?akO-i9p
z=|3yY<V77z55c-Ixhea<s;SjgRKB^{)+^-B(m<64T%C-z^(+;~Z=@~pnCDbY*)_iA
zRU&SIX1IvhrpyxkyEi0Xvi)pNboF&Kt8b#{84?)ET@oMlD&i1}<mv~Bf2tbP2qq16
zelN}v5wK<kkFXFohMXoG0>f=Og|SR*8xL4@OOFx4^=u5&m6oE&syM*pymw`nY;pE#
z!j~ob<Hqb6wx^9#A-awMbG`^I(GLw!XV{l-cDM;$o%WS3q5B5nH#jRUlEOk<7JV8S
z<hR8P7&l)bFRX8@XEH4QNtK~;fjQ~n_GTCC2}X_4%&2x?5Q4GBw#j~dctR*KKUu0-
zgjvq;;KC5b3;UGyT;ANuJrt71G+KwaN>=UKgbOTW6?iIyDalJi+&;g1lseSbv+%x8
z55AB#TIwDuYU}gcs1$t@&GR!RO8AV;hYsISy!uMEjMr^5>QhFYZq%=y?eL$N_OP^i
zkM27Oo#NV<rkynQ^hZ>ag%PXTrRk}BBG0$@4XN&=j`;ry9_o2et0nox^I5r7GdHGg
zX;C_Ed5<}#!QVO~MQ3Ln4o-4M;QS43n!9RHqryl)Q+w#f0gXg6*1@$(^6`Bumm?R%
zfToTA#g2Efkzq;tVKy$-^3)G9!PI6+12OKB)m>Pw?IV&~8*}4me{gTbr#gK6!`f0C
z_dWaL*K_nKjfsY7hNM;Eig6PTt8OQ<<HYWG!rx@Ij#+_xd)FCTE0p||;M`ELx0Lz6
zXbsEj`O~R-CMH!#0pyhHbf^A_o??^;*4}&mA&;qP8!>hBe@j3#EJ=Fo6r;V*M$!oZ
z?-P~hU%5y*u-j9q!}By0i&HbE9MdYs(vrr}4*;?@7rj7r<J!XxIHWXUt#CjyJq5f+
zcuu^VThTP4QI$J!tpukB%V*7>P)kWw=^6Ny&hR5o;@TM4^v-gc!s9qRMf6E$tJ~_y
zULZ<78;vy|2~NWfX)@zq)%`R5?Ss7z@xK>luHV^snx16c2D_`Jof@q_?5f1;m5fzI
z*)0NtqOY|b=3`UWwHo&2vl|c)vYbgu-B#BfuS+&v%6I_dC4Ta@&lWDjPP$6sokdeP
zdiqbqhEjxje&AyC6wB2uFUOp4a_7^#MH0ke)?i1WL}52iug_6wwqbB3IPTyq_nbYp
zV$5wLXBtM6n+hvDJmHIJHcyDX(7-^W{qC1wPub%<djP{5_XMUYxsNJoOX$?j;5ETV
zmA!KY$hWW63ks|+qou$bb6vcfERit*eg+{64;_~)t=`(oLZYhgjW{#Oc*|NUl+DFP
zGllQY+NSsQHm-km?%9yE8669%-h9%YD)-RLn7a8>N8=U0=ZpG+p)r95NX$i^zNR+9
z7<gynNTS{M79$f`*jv1niP&7*4M|Z!g>g-4n$O2C<XA9gm(cuyZXMs~T^t$0*pOS{
z=f-7HzY~acqM<Q?`z7>3GR}t_*1P<Bq&NO0*toyaIw+{h#+Kv`bu`Jex=lD#C)_P1
z<#a%3EJC;n9*dxm^0NCl_mY9G$|fwX&vcehg3jmo%FWvYdx&e>Tv7Sae=r(af6BWM
z{_rd7Z6iC%EWKTI46^wP5j}N4gs<IoS7Z^JV@ED>a3q<!Z<=Ei7X*mz>!T`*l$V>O
z3cqi)7sU*U=zsGE)5}`+8e5fkOp~iQPvz#Ey_IC$by|WYa^oVvc1YFc1tLW>#dl=D
zd$F|uMY3NPWUn(YPJ+Hi!|oFXZMiIc<$E?2`W>|Ia(aY`Io%`>9=Nu1ZHo&Z#d>8S
zPX>*S^uJAt#!e6Ci24qG5LX1w_5~B;9NM7acO#qI2=$DPygaw|s;+u+>|T01EQg;I
zOBLd4Q_5Nuy6iNJ5j}NMNC|&UslDc`UUy$Pw{Iq~;1-tkVAz-^xsDbFf@5TXrffC2
z+rKplG<B^*M7(U4J~MiH+nR1jKmYf#RL&n7w7b~d#VuO<%Np6$(^9{tHa%o<nG}{9
zFX~ilGibWeRhRkm;yOLRYWo6)3mY*)hSu4#d$Kruc6_pD*t~Hvq5$iDe{XiA1(Th5
z&FjJEz<Bcnr4rF@zRep^4QFM>Xork6m$10?$cnwH<0X&nDy`H9^OiydVHm?gN45!$
zSKwSiu@W;%gX7Ht{)KjOr2lK%nm)XK{W@#u-lpu$)ENeVWi37YW>EbpYGau}CH4Ml
z{9_C;GmR8`zO8&Pb&jYqE52>0PuBbGnqi(V@TQ?$pRVBFS^x~EWyNqx+lQ<1j7i5m
zli86<gcvrNFmXp7d9$qM@ZBk`@c@nGu>vLhNBl6L+IHu00;j-jV;TA!y+Db%MhE5^
zw^#TX{O!N5h5!Hke-mW=J4lGvvv2~@U?{one(U#v%^sBu<CMgl<fo;#TXbxNj>Nhm
z0%NFTKh_(Hamg162$hIyS$N_#W#n9gKSBt*9~7_l%1VliPZ(RcK6^K5<Wq=<OyI6f
z&S}f`>GTynYJ;I$j;qckjtttITp=|_+7}<4iFGAH36p(T<biud2@CGaX~U3sEkdue
zhYb9A&=i|oj#&fnf_6&>k#}w0`z3pM)YMwQQcHJ^z@J8TzKsa)yv5HW)gpWHo-WQd
z%YKA4mvhX;g{t1XH7hfczMM<%I=<2?4joYdTg47ekXK{A`8;UkU*bBMr!eWz1<qwS
zQft&I=+QkS8h^2|I+n>3VXVzxQ--gqud^s-Fn?RgQ~21hmaws69?)s}%+HT3!uD<@
z&t*T)ZLzRg_+ifWXoN3!(kX*51qb=K##7>D>%0*3`K9lyS~VIu3iiNAN=HQbQq(!j
zP|BM)`C@8m5X--Kxa@|U5{|1ri?v~0$KebVA?Y)Xw1?kxci8oo_O8A)hIL6hAa~X$
zr*#~AzCdjnhm)uU-SbZ2xFk8vJKC@vUjf&-fDwn9!U!It%XGtoKiS%+tK8)R8iEzN
zowtqml9rL9vsJK(#2+i%;N(y<R?P>CoXf{?maIkh9%H0jZr(F4m;#`cE-RpADWn+W
z7TB+22?z3dQoNL>Ch=1=rsiC`lkc@+iuPndxzRcjP#u|I^bmbRJLV4DspdJE+frTx
zCT96$k?JN3aRv8G7$a(f!w@zYU1B-pbxehN(Y;3x9crdPLpQUVz(i3$JKB93gof^v
zp^;4kZ4d+em4)G1a^VG?8}&Cum}aoeqcUG?;Jk0Ra8tWAjuuma<Myk!qg*y>vN&^Q
z6&aJ-AbP)P*8~7aoeB4MHNx9<Lpbad9xuTonaZQ#9204EEDhMeumejuTLC8yvHr+D
zPPyYol;X4l#P=F@W*ONmM%~^pg!eGQvk+{HluBs=x-2QL1`V&P>U4kO2qKX|Q#B8~
zUw0Fwuxbx*KLtp{qMfV<N3A!1$yD<iHQfIys#lxv4iwU)aQf*L0ATQ!S9U5vk(eQL
zTGxRWlS*2GDr9fiUh&>NQJw`dZORdWT$u7RY}n-cvzO(8ugS3xO8@i|mBRCtBDksV
zs^9IdapDJ$ICUz4F1&>?XMol%UCDkQE8gCkER0*UW|NBq+6yaV%!3P)#!MwNHrh}b
z8Y}Z4&Aq?a=_1#-XeouFwk2auO*MHLIFAv)$-q2zRv6%|u!8|PwRrd<R0$xOqr=@m
zym=TFiE&BwcAe<wT>vP~uVZh>UeiUIfHXctwA7tE!c@AgmyB6`ZHD!(G>}oOz|8a?
zSRS+ARG<OSD?D>*+^^((lEl$sbd4$4=FjSXXh?rLLmsvAM6^)f8Edm*l!7(ECMOi8
zBFwL>e3EwGvwY(JfsXA9Bi*+f@oU>Ui)SkU$ItC34U^k$qm$iU$-1P+pE{$${oE`r
z<tBk2G3mBvUmLv6%#j_w8%_c%>mL5ras2aZ<jNl@sS&t-e5$l_Vp;to1~@<l==554
zH@-6M9&jjwPC~y{rz1B1<3ifrjC<8LcMUQI{7CSsEN8^IUN;@c0Iod|DbzxcVgf*i
z)pH@wWIejt6L8e85V%ar{-EA!XQ?!?djUB1t)G^a)cz&|^wQElo^=f-gy`T%>Xr%B
z-8q$|^|7tL&`}JU`2@zvbs050%er<Ctbh_>=K3K#*Kv&)(=%3F;Y)wfXA7MF+S+@V
zmN({tS#V8bHzJb-7?$Ke6E<;wM5ZqWAde`%Tgwx3_UKl!bSkLj#z||G>xk-!JMKvY
z3$$s_>fET_E}J5!iuwfGYwbA*pogr47R@guXeHioZ~(}$cxjZeYk3*2W0ZoWI47Z`
zQH;~&tCs5XmK}k%HV9Je^3zsY?9qPN^3{#kMYKuVli&>3cM<WY6{9fWI-k*n*1=C@
zd0XK}-xh-ZCa)f4?w1L>9M>)SEq-$-u(6zCtu9mU=Zt(fqW6AjSbY_8U!{{ttK2Qm
z#k4}zw&~)*wJyhnCZg!5E&`DBQI86$-UiF(MzL#*MEnXaQ5+k}{xx2=C&b0LzTu5p
zpZ4_Wd)S^wLIiMn6dz&(gAtWGCt8jE@tsD%L1zC5xd2LOiBc1*E$ZX<j1dj0Zd31~
z+(lP==%@xk#!G_ubP;u*o5KH<S+$uHvW51Ik+Oo;7aNuJN97H^8RHy-9+Rmwe5v8N
zOisZEeq7`r-t6&0y_D+u&8)5Xfc9}!)U!(iUriT+gTl_SooI#E_{(n=@sP&(A`-&Q
zO?#6hPZMlUD%%c!C8(5U_mlL?vGre0iUO{r@b^Q`Pw}ai4Gy;N0!T<)U2kM~MlouR
znaZdfvykHCt`Hx0r+r;8&sSapeE8X+Z2wDf{r-Ycm{)x#e(ce8;?$ugJJDYgruf^c
z6CWMDO*WRAO-f*>9YnzDoB+eud4!pD$RxZ!k#1Jy$p5bP%@t*4ocE!T7CkKH&4W&^
zsxn<zC|7a`m&3m0wob(K;CPPW!!Zp!w;fIG&2~CcwVPOiptCPQ7k;luB=`sc0t)Be
z%p(uVlrbA};ceZ)PK<|<E^y}M%HG3<mE`Y#(jzB5FXJYqm={H0e5%;_)f7+rFA&AW
zjh%!<Iaqsk%<r&nTFCdVx<d}_8@&KIm2e%(XcbvlZ?=c594c|(tJf>V(f=e;n?Dj9
z%>N-$furgb-DCNBFG3V&9OPr<F6Sn@?_pFnC6oCy13xm&S4rb%M=y^rr|He%sVyOu
zuIn2pzVbZuO4%vSl8clVNW(K{Rir&+*=PEP-TzhHmq)YJwe7c$r?ge{(W0tFNvNr)
zsTxBk)zDJZJXMV~rA17Mc+k?;P-3njS|K$P1TnU19#TUoB5F!ZkrIT&@TKqi{l0&{
zzu&#iT4&wstaaAj`<(mS`@Z&lT}REu_98K!J|+9Uv6Nff&*x)6JnJ=Rq(mPkQBrp;
z<l|t~R@>XL!akujvE~;IMd9CRj!!qOZ|EXs;m6otc#PPz-K??uL)+V91j2Ev-Po0M
zyBQbpU-2ox3nif5IvbmtfW_|~pzB>aHU{}YceLc~RR1s7N<ROY04Oj*3iT1ot})aS
zNuRz~)&oN$LIWTV4U^W@6WGO+x8;mcU~EON5acI}7x7SO`QSu=u41j+-G#|$FLs36
zndW814sHJOeSi0bAT{ykjh9YS9>xo}o8GK}3i3pnRuz=Q&L-?`5#P<&)w^lXfzpQQ
z3Lz}A^nedamF?JTN%FrQQpdQ=!usJH0`GNNjdSg<jxUxa|3!N6G7{@sZ||8B1D~>|
zq^)<UI;y7Mr#-|zeGa^1HnEd%@fM>qCzmck<3@wgVP$aC%QaB*_D(hT@$ct@w#J&0
z*@$zMW}{~u#$w=NpU)-Q%}qgFb3jM$(V?-JbjE)1UJ#0-t=Pp_h|Mz61oJ$>fNUFH
zmP`#k$lwZk&->-&;>KkjAw)G*k4<5!o3m_PzLDlLo=eVDwA?5EOwc1ERQvkVli}E{
zmf|6(P#J<~WTfM~0do(M|NDC_G@YUH2q)0Zcr-ZkvPg5LM6=)kCJ8)kfUS8He=Qn5
z6*rf3pB5MMRQQU0Uyy;Q=`S{}MYiqD5Q>rr=E2;W3oK;se%7-oP0veHJ|i`rjAaSs
z70;L@Uh1%@UZQog9LXdDlr!+(lJtUqG<nUOIUghU)tpUsKs@AB*u}t7`}5C*zepOl
z>HK7Zge0N;Ir&C0$7QDC3JAN`M_e3jzg%YD0ODNW2thxYy&Yoy0~`11>!8te3{#fJ
zZU6`n!UuP}@>mWH@sP%*{3%!r5V^+p*B~Zy;Tw7WoQRRQGH9em*TkVgxw>c^3rI~T
z#v5BE9!9<2?=xCH4V@2f#gD%4F|wIr{N-T(Yo}$wMNP7CwsB24+>%Xbn#|m5)B5#S
zD3i15>h+&f0{kWoJ~I?fh61zLRCK>V^}>EPu#X=EFnz(4FY81!W};1HM<<*wS+;-u
zLnvD3EIDK&SKrA0AGun+Jhk)Xe~~K$xmn1nJ&ETyXoO$xN9LpUYtF8YA)V|k_VZnt
zXCI1<i{x!V|CX=1ez@Fuv>|8lmsI|#V{`7oXLi`(3H@aS$e0eIge@DD-^+ptqiilM
z7arzrvDTYtI$ezbE*lX-d*7*_J}`|`x4gNbKWlm8-bSM_@s-B4>4(W_Rt@a+8_mAM
z;2#Lu`?f(E*;WDef%wQ&MqoJ1YFGsk3Cy#W=dn=04Zz7K5~!HDYTzHf5UJ`9Ur1?^
zYaWjdS$wG%j$vNOi<Y#FSnuDd^(!5{Xsj7$QZ1oxb(e0Ewf!`vcOhb-$oQ%TIbflu
z3cKXDT7sC_^<ZxLAIngg_Q!7F(Goo)oSN1+R`8;_;wLAxr~0vMh<EK<xu_pr?Ap<@
z>A2u%jK+0>@xsg|@*D~dWD>~?8*1)yNoX}Edpa6tRD4eOmF{=Aqv|uYuKw0A#Xkia
z`g_XD2WX@x+C9Lu@19D#wV7sbN;b5XGmg5BRwTT^q23W1hOD0;YeMPit|$ku^;Y2=
zKcK9dxsRjY=L);53^IK2<tE_I$k+=@!(%=-YkTjuHcHuwPT)efu70Ov>hJ&L16ZCl
z>o}Sr9dzC|2f{BM)!q?Ib`7arm(yE1AF(O^tSo12)4ee)k1EkC8&NNA#fs6D5kEUR
zihldI+P~j9KZeVTmqz?++u<wxQ^&m0hztK_DY7!4@Z>^BRZ}p3no#0ND*c%oGsx{`
zxKZZt9^$%UHxWj5nAD^khOTQ<M(b&h#?|g!KmL8YPZx~be%sYg70z$!3p{ciD&=tu
z8J;ERT6zZ~4jloG+>wmU7}o;A17>;6=aOAZui@#Uni`3tjX@6Rps}h~RK?!g!={@S
zY@XV+-^~zG9F&JNb;+k|Jf!go$KWMEE%hf}A1OGV`&*Zv_$}h>_|TBD5^7D}(AaKT
z9&9j0@?>02#s{uc8+SEd<qc@?v`x#L3i?Fe|B%Za>9{Rl?yT^fia0?HZ7P*sjbu6;
zXyA}rnp|OPnT{iPuh8=qMH}sSga9=t=lISgm&pAN?F&Y5|3|}d&xi2CG4|X>f;_A4
z>ISPZ@jHXo3Sr~vMJJ$Ha@c&L5A9IEMe87og>YeEO-gil>tnW?39TFbo*~UdZ9gqn
zY6nSql&)D3K1SnT_(BU|>r^nrz{U?lBqpULz)TbmfpBDqdM;I9$(X8xhX3B6tXMA>
z93|$;)QZvG#o<j4_D2fB-sv7t?k<Y$&u)m)_DE*KBLy>I6UML9sE(9F;BuzwQ9E-T
zQ;q?^4D9Wu@<le^x%Xs`28I7#=<b~Rhnw;D{#uFxMg%13T*-wuMjVvPkQmO<kT#}#
zvvaG!i|!zbQIwNautt7$kf!abpj8=3qtuLh<zmz$=``SuVf^-<8OX3PmQ}B?lmjUk
z&!w8gr}AOD5iggn5XIa+$41$vZDm6rjO`<thB2Q+<??0vJH9BlHH~mW2Xy!PN5XYn
zj%Iwm#AAe$XZ**mXdiekAJSUZF3V}dCK-&I-wO|Rjv8mG{Jw*)dN;kmt1D_2&~ru?
z3iOS*ni>^kc00aE>YU}o60Vz?P^;sheBP+VM1HD{;k_yXzi3nm;kp!0xlW&z9ty}-
znSAz74?p|lmMDMx*s-Ua|7FHEXh6U{)+P9AJ>}-cK&=N#FOGRY3!mAeRkSc=-?_8p
zG~EWXg{fvI$9}PKEep1-WyJ|WElwZ7g{Wq4?A!H$L5Gb8<tp#o`TL0BcG}76GLzE$
zjfX>Uhv9%#+NUsys#Wy-4ASi(O#aUWBF{gy;`llJhjBYHub%$iv1Z@$*OxokzmKuE
zI01(2sm!?j-)vj~8oFDD+Wn_}ESt$0?#n(5d@<R3dPEy_UWnb&a~-VQ=yj~8!)}U>
z+mkgWJ?+yKrQ>O8c6^IX6=JIvaGSA0XP<GdHM<z`^fG{UJHKxKp97`b+8wC2|6Ud)
z#<p75Tu=&@eK+}rR#U6S1$rj<PFP;FSa3-Qc3F6%e?K7@;NOYo98Xo!UEakfNs9Im
zXX}EeHhSlTH6^vXdVB1KehQM4q7&x}__VXPhzVXCro<mlS~gQDqDG<J2OstfhBmyE
zk6tqrzD8eNnzQujBV*VilUs58St|R2kfoCif_8GK<pT>w=m2qsC1RwY1ZdLfE6%<(
zF|3OzQ_{Ystn3ao_xG=>%gQRTpa41xgm}rp%f!9O-x!OsX;ywdy(~>k7qQ%N%9<<k
z=BhgTi>5fZY(X3{1yPEGFjRmYX9unyd4rOdzuFaq^E4`~@VM|dh13Db-ma!nVtI9K
zpJkU+1%Ioidk)qF&v<CoLL7#xj}LzgkMHnj?9GH0ICV%G4~DrDid0BJgEgb_aKCT(
z=<n}UU#SW-zX<;KU1MO==6CcbH8l#pg@qY3Z%x!Lrxj?B^?sf`VM`3bdRV#nZcmh7
zzRcy{<zATH6<mKNU(oJg`N?CJ3HO=P4By}j6T{YNxfy0Z<O>P}F8TQQP=9-B<D11F
znfjX>eL5;1T=M*>I$I_Nv`$a4-#_eE)FABp(dn_YfocQKiJMNT&8?f`ecYB|Z0!t(
zoVws?STazP6#CNI+fgZMRu+Y_Re0`s+uoUF@6MX;Wb$DQOrZ`-kElPe1tJH9`jpgg
z18iCi35sKcswsfq{A&IEZzEO(GAjx$iuF<?)<Y?sWgv`K9l+4jn&G{%k*HH#72Nq%
z`%pupG&s;99#G(|`MW(wq;8$KJKNnTgREhP!(J<DgSYGl>nGZ`I^L%z*oGS+)hgyT
z_qZ9pj`cxPfg$uh3owQxR)>|@Z|BwgNB!Pyp;jB5YJ~w3diwzA&d|OLaS?p|qeKPp
z%ADIy7nPpEBri^_(*o<p$7Asy0z4y3W_8_#pW$i*q{@BMQgF>bd@K5KR`NMn@)ISp
z)G~c;KvBqcNtCj!D9g4CpdiC4l%Kvnc0kHcTZGUM5G;UNCc_8s@cP+`(;HqWON9`2
z1X0cKplN<Ea~E>JIdUP$k1pa4wALlsC289rRc|)#J}$u&mGKr8KvOFm&*fQSe=H}e
zK7V*7=7D2Ec+G4IdV$Xq=MsWYb;eqVmJKAMwH?(tS(@d&{eNQG(w!IPEws0(7!gZ1
z{A%w{>(}x6f`-FIl3mX#8Ev&k4KcCBQL90x@^`D)RnRGx8`OljzX^(rs#mFO5yxB!
zu$sW4@~+DNb0^%28ZX$ajyjP+ZFrn8cunUCN)c@C7!A!Q-xdl~c!9r!M2hke(PrHJ
zr=_h61<s?vS6mHkos3e6Req@*6w$Ob0|<_&wR9*|EjA$st~gR|9_Q@aY#IkHcf}rW
z4J1ANV5x<3-;kCv95x>3bjlFD=gnh|tjR+M2Qcc+y|X<3VEBvV6}S^Io)sAhpUJW>
zO9xs@Yl)IFdChqo*OSprwS6#k!l`pe;ButOoAPgRJaT^brJ6@1WS|?vPi8>16A3jB
z48rO{7c)df+{$*v&4)8vC%=Ya=@9|cpS_l%AGTWVny&QiArKx(0ubh>`^Zg-%hqIK
zCHAT#a`50DeL>La?)iY1Q|VklnQ*;|*v0x&X29kB)C=62|NQvN(yIipx;u27@k#K4
zpap92+cwIZPsVn#<uei;$*)^AtN=UMsi}#Kq$&cU{Y^P!!o~+wT8UcKa&rBf)qR6(
zH|tk)ZH|(OoHc^=5_;F0U718UnCb3SsqxLHZ?hO3iI4X`SbMQIXZ?I-Kf7(<aeohU
ziR~^LzF{fChx+x0hll}TnULkQkvgN&3p5x;u1g0bDYIB`Bsv8f$yk*3CF1?_t1Ra(
zP1;FojAbVmE<kY8EN1On4pXiCxt-UrI>jgb@3vfGnof#*`W5R=^TW+RakLMj8!~*S
zl72*v8B)+P^lCBgdZF63N+nvft;K7kLi3l+*E;6K49p}oHMIoG(LuOfNS%EBo7+*B
zx%VEax>3co6b?VKZ&`xW#K+9f5pIVimI3N)dMk>4v$VBB&^E*MFK=3>D9?ao;Rutx
zo(rphlSt{4vOUAnCz**U3}5Q&{Kbe*PE!SD$dr@|h8xOx;1I|d>Zs<K>#x<hw(~){
zd7KsOF29+oDhUU{E#7swLnU@EHi9J2brltPkmX1wvlZv59;b0&jNmKa8b$tYciLbd
z1t{Y)m$w=lmqE9Rx{D+a@YI5;2OM&@=OzWg^p&N)GYiG6)p<HE^lDv<k>G&l)ko8~
zv2f#mVY>;u<OD*AUw{MWpha_1dWOmMrQD%6*DU7;g$celfX`q0D1~L7dc7zn;C7+~
zfX@~J$b>ZM`Khh1eVDx}?XTx-d!~@}N>2bJIKT_izh^;o1(6fc>5h4l`tRzmyeqAz
zyI9{RUyMPY*sdB&7w#GVnas^cF_JCTfey0P8&<aU=H1dnxyc-#PdL4OTDX;0?Ye3_
zfK+`>e7u_J1^WE~*0u|ab>ng@b{hH3j@T%hTAZGNwQUfcdbU@>Zk_dOj8B6rRJ>gq
zu8%DArJo@M;Kmdx4g4<kyXqL$&9AZpvWv^`R~`&{G{}qQeTs1<NhiBZ0ja8Nl9~zT
z)(9AQ5l~p*Hk%CA1nr$5YLp*T;A47y5%HX|AH0DZ?eZJ*^syTNFYv*1`~h+AZqWKH
z2&w8iC8W+s{N3kRuMZa+qz2u*;(5DX!X`?(1~zv$KFoU7A_kpO+nBC<(Pk*6XDp=$
zIf{iEjTIs~QziZWbQ&4f5h0qlrFF94#C8y0+2$G2lRG>2Sq1zhfUeFj8aR0a(_}N#
zWZ?2Bi0)RZa(Q=Wz%Ud8gl=%@8_ldJuYS+u0W0eiEQXCd*}}uxzGb0a!6ZdHtuQua
zX26~*WsQ6nC8ONyRt+(<2a4k}hc&@zl&ox}lC3E^1dlm4dC8+w)${hQgx$2VTlM1h
zW~sRtOp4#;f{mm1*i@_P+F_v+Ls3Jw!d9Yov^;D@?d#$#ybW$SPZc_qi;zM;ys9&b
z7@r{3S+-%(fHVqg$#pEvRysjF_eSXI;PRx_@@NYW8Fo%+JohISo<@1zS5<vlL@~Iq
z2Ckd^cH$qT*P_bwNaMqaosCacFf`<Q59uc<pqmu%`M}pXtYzUwz1u$gt7{^^1tOI8
z$Da*hj2lw&vOUS@m7C$`%uTr^_&4ygw_W<ay?u@hINW?(#Jl5~s}GQd93X;TDn$vw
zVF7^?6k9XEK|M|$hp7ozf5fQG`;?>^p?%J3C-bW$;BI&epQS4W8$a!M-2Jv#^7hbk
zh6}rV^-QQipE%mvdWgjfyEB^=f*jqPnAwx_7FQD(=y#ZJ$;&;exiMD$nPcLto_D}b
zd8dyB*nQl4(U|xEn1GT13n6xXpt}MUl&;LV$XHvXo`0~3Qc#$e0-Mr}%MK7}Wu=w<
z>KWs~PqM-$u0kNL_o{}eL)k)XHeKb=dc}L=+}X6_oQ9!-esRrRBwDg^wc}}oLEoVj
zzZqapSY$mDbdICz$CItfI#e{bCnQPjUXmaK-Yw=Rx)MHj|8i~H-yA)rn?`=+#qm0g
z%hiro6Vb(rOjaLZr(>n~ho)wfpRg#{6Qo2fG8Z#sa~V0R_#N2UUrUJ$35v&X`7wkz
zGmw&P-^k_p`j?RbN_Fni_sU`Ml`BoVPHDl><Oc@q<Za#oSJhRrk4Sj)uo5ucmH&}z
z{E#BmkUj`&&~a1z%rSOW&*2h-qqgm=WDi!(R=olNr5o$0SIp!}wSF1tv&K~!Acx5m
z-cFMRAFe{}kK$8p$BuE*{`@0gQ536EvF=8Zi2qXWkejLnf3jJVGtTn$Ka7=8U?nBq
zFhUlKF!!D2auKFSsU9xR=q0YgX}eB>j;lwZZpi8uEfuM(4{{)Pt?Pc@Br{ubUk2Ep
zabizk++~#Pp7piirHJpzUPt~UHKP?sdbBQKDDgkxaN`({$?xW@#DFrm+wfgJY3;gs
zo0&)3;o8zYOw6*qF4!|dGaBhy=WT8NgBVmoNeH2@d<)Q>9iFJI+?7t!I;-(`txv1U
zkJ=Iam~v{9xEa_~+sgRc#)nItnhIDwcSf782<mHQPITrzDl6HSWGm<R9}wDSFQ<&K
z79Aoi_te<11ohE+l6EfWk<QrB_O*GD5-)nNZ%AD!>oeo~+MsKT^o1Unb6RVy719&8
zBg(&^{e74sX~lK2MNJ^&+GmKvA)a8x74R<a%ISjoqv-C2Am`e9G`C98zJrnT;Dqf)
zm}AI$TA=Rz2_GL(&j@fQdpNK;L|q}+(;??VIy*h`59EA^8L_a)$jz8vueg-mFx*hx
z>3^>2%D1FnNPL=5MNV?<at0$r)xBK`BJHt67wkw|UeyiIsLj+<56XxCu+Y)nh_6PL
zijlKE{8G3g&6WV<@>elv;$t~LQ`6CejpjJW+J#0xswsF<1Hw*}AY?C4%e9ee-e8n#
zOFP+K41U+tXk$Z;#9<yN>Y+v#$Rbag%r+b_)SRDk#8zH8jSHq2%uQdEXz&Iu&uiQq
zJz9Idl#-}DB@2%6cTW?gtJ;m*fecWv*-F5o0F*>46wGi{vfe={P|K#Km$9Buqi4^u
z^`AW(Tq$+~KR+>LOO4u`^O<3ey+@)aHS>`%tWap<2(^Kst+jfqjx@1lKT}a_;8~PI
zPr-D*O83-ejI|q-C<8wRS2w0tc^bLxD;e%r_7gP*4NMX7&H9q74N2$8`N?db8Vnig
zYD9JSKZMWc-8Dr#@_P9Gc&~gAf#vTx(*z(?Zb(zsy^>P!^*i^R>O>6*W%MK!+4hSg
zDsFpkISkE!ITI=jYgz<p11cV{N!*5gp2<Xoc}zBun$>$|?Ff@W&5kX;Qk|dKD~7yS
z<BH$?AEzeHTJuvb1w6pAUxyX<of@mf5<!4G6X)-+1zxB5@6>O{Tt;rnUZZvYUe{Mp
z>i58|Dcbg8i-$>*p#iYlHa0eObtA*4abiByN=x2eE8*F>Uk=Vf2>Jm9YA9t3ngM6-
zGu=@!2#B_N{2*!3yUg|}b$`PeBRHyt6ETKOh)~l#af`-mE$R@y^Q&bccbw*5kJN_r
z$mGz_Qi|Gs%$RfJv0oeA^13gXF_N)nrj3_9`XY|sIBO-S`Q$$dO`Uv|qh~2?<ZP{a
z6{qnVw^RhI<(Vxhr5xq5lCrPp%?NY}fPF>UJhigZ*VnHhe5q?Z+PgN1IolZhe&xe#
z!NI!t<s#jMoL%w<wEOTr!6Neb&U-Q)S!f$BL_PP`Ui$J;nyT|f<4^kWjaNPi-m~0)
z^L9w*_1O#S)od)}R=>m_WTfp3@(;+=FaF<U#5oP=9B++2ATN8M{sPFXe|+VEy3>!B
zS{`p@`qUUpj&;1xxWI;wT#p3H9;eu!t3CGd&Fa$9n;lK|V4q(7<$L45aM1sykLrjE
YXCO~I85Ok1p7Ud1J)?W&cb-Q64^UoM@c;k-

diff --git a/two_way_files/figure-html/unnamed-chunk-20-1.png b/two_way_files/figure-html/unnamed-chunk-20-1.png
deleted file mode 100644
index 2575dc3552174d595b2eb5879eead8a6ef3c01df..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 6632
zcmd5>2UJsAm*!m(2mvG%L3*eL9tcvU$qj-O4FmxZR8XXeB1(}CUW(F-(jgF05CH`g
zqLje10iqZ>A}ESz=t{34bMgKE%)FU5Yu2naYu4O#ZrkVVbI;yqpR>QcZ#>b`lp8IA
zW?^CBHa9aq#=-)CJ12^jg@xsqu>u0V(TGQFP2}ZE)zu##J^GeFAh_=wkh?p{9fI5;
z_)2jnk=#kNNSofsNG4nX?HnYC1Q!ZKqCpf2M4>0DspaP8<{KH2U`_}wzv@X85`{*h
z&`C5Ji3VSp6v&-If+!@?4ikk&p}~btp);wjt~8Q6jRessa9fy0r_q@-CX-Hq=oAv2
z1{VsQ_KQr14<=kmXEK?krA!(LZp5V1m@xGh2Tazx-W~#r#&Oxq!H<PS{Kn4tTk5xY
zHx`yXE#}5}+n|D3(uH%wT3O)7oQ`wqR~la*cu30iUwofSD872D;kCQk!!hFxX3P0?
zLGyUocFt=;<2uet@v{DMVyr?e=A;=GM8Q#UmKbgTLLmTN6haz<GR9)!Kr99Vu>b@j
z{-0IsuK@?GV<nl}&wf_VR!q$O=oe~sKFo8eRU9p?!6C5taz+(#ELsgJ_Pg@}W5(Uf
zX{)$6`_(~%;>+u)D8NxW{Lv{-3s1m!D%x^n=!YLD7enNsPXpc-5JfUFNxit}lfZFT
z+7AQfO@rT+pN5N@RP5ER2j{0No(%owOhcD6GqS`QHYN#-u8??DzSF=1PH1e3_LO;h
zTYs2Zi?w<#xz%`@99~#>P-T~Q21>?Sj(F@o{Z({9E#)g)>G-!xK6r(;$Xc|mIGyx^
z$2$vdA=}jwp;xiy%Ov!?DR3hkYZ_*(&W{e;TT5A-#rGJ?HP)drW)@^8OAb2s@7m$W
zbt3DYzfi64yXHgY%ea8<qvQQ8Pq4!(=W9|pYiZ?ULW(!Ej>M!-@OdsvhX<VYN<&>P
z%sqDcd%G94_)S1Q80sP<I+wez0A$ZYY|IA_&13{fhW=FT$5EyYnGPwhk8%3SEqv5P
zZmdKyNvo;#U?<;M*<Q{J?uxN3`lrOLS6)&1d$p&F<2w$2ECFL>#9yq<-t#cAaN;d<
zkWMm=2OUHfU76KVMCtd>h~+))wVbxfm5RhW#(UyLpdL%P(6F@TyI~>JDxXC`+=b3L
z#?mTtJy4n53zn^0hM31wB6G*$k_~;B+5FB?c2R7ip&)T90!yreJCKIP$~!}|?UP?q
zElNB@GVWBnw77sRmy+Hn9`-Ij{T>g`iV09M+3{klzfrPWuky{ua$uGY-Aqvw!WFI5
zQ!k=2nuta0<(creWQjxZatAA&UK)jMYFZ%87Vh{STt6EwzY$*WRzSV`Jcre#M+!48
zYgzth9XbjG?1WqGVZD~|mCd}=%EX^&2&YCm5nMYM+j;cfP2p?I1||36Ra?Z49M*DO
z&HTd}t?%O<g;z)C6wSNaF1EO6MnrxN-fz5FmqriH+MoGi?N1|`HFX&t74eu3iy)Py
z7h!D;Bqu6;4|eUFTz+@+<I1@$D_T#~r3JSd#_c+ICQb>l{U5H<E*T=?(&dxhUWmMn
z3x)eFrwQqxjcM8)dCU=PnnxePg#)pWlm{w7V4*dCoE)ZI-3zEe01n?Z&TWAD5O`I`
zV0J$WVyn@BT>SR&ec(1C<CUz)iHRfR^Q`l1z|h^LdoRej5U7R64l5lYCm5n!Z@6(7
zbGnKn^7K%yncLRyM?h@F5{<Q!8}W!!z5A*|0azJ3^r{pbRata)wK9+BHgGi9J`+@(
z7h(es;W@A8reZm2X<kWBDsVY*sM~9bK)`094wGkf%TcvMMZJukiOZVHrLYJw(!`N%
zTf|0$u*vGzPt%Kb{pI`m`to6Uc;mpL9*GM7Z@LK*BeFbvRqqIBqKywMoG}LY*vd^<
zS}Pa84Y)6Bg|00t+23dXvqOXwapZHQlkLrkr|iF1-hbK`|BpdoJeS8yb<v476E|K_
z>KsH2o`l#O!T{k%^70!%w=utD@D^VTsIVI<@42|~$WtZzvWgJABQFZ!SRt`L_hRET
zAXXo}Bcjo6-1}gxCUipD49bZgIFts|2$tT!B3(3{c+R3T3VD_a7a;*mDOiwRb{#~1
zU_8_5)<xN2A9fIp4gjxnPEzmx_IG<bt&HO(A8K3}?iqme|GPO3J`AfB#Qw?j_nzY)
zrjZrAR2HfSz+NT~+l3X}+jYm(fK3X1!V#@RW5DPWd0@Og%9R(9hr{?_(+I}`G40YQ
z4FYx>#3s5<Epd<2k$?j`q!b1EvHxY@|1`Jf{xh*)G)R_5X~dbJ`zHASZkPQ)|J_M7
z*!Cc>nRT8U82SwwsTP2yI<RS)n07zxCp=bEBgvsBL?6&$fhwW@*tc27A4$QN<Ym$X
z5WXCMCZ3Fc>rB40?QaHu=|mYQz9Rvq{Unwj0@WOk;<508r~*p?$hbB>3e3uB1ih6!
z3?!g}YhV^gu8;nUKh?;)62CBVbk{NRY(?34$&eIkJPwQ8h`0}u(`5n>A~B+nR(c5J
z_(Zx3JA(4}o*~39(}o6F>by<K_@}&{;vX5|pLdur$OOL$c5T+w8ir1&Iu`LLiXR#i
z+xXIT4%5yng%+T9srVGV;#jisNlLBR(&4^-M!6B5g94Pl_=D}N)Mpa;SKYR!y`?x8
zq|mhwlg2i0-FC4OO818s<Yg(M8V@x@BGGSCcV(=}ClKLlaSeE-voz(s@>5q$yem|2
zLgU4BsO6z+fSs9$%wq+U7JyW^ua#Vlw8$fWI;ixj0<6&y;y9v;y9{YrARC^xb1$qt
z?7arQm^_ktBr-+#rG6Jy-~a5k9~M!LA%mGs_tdb{&&KFtpLqcDD^gv9k6mV(Pn(uj
zxJV!sxf<Zfe|aF^EbPkT;qc~!qoUZvqQ{X@)t*r<(HOJ1TVl9NQ5J8HdA0zv`DB?p
zs<0aKWjChn9@3_SdJk2GTi)885GFD4jsxyn13esJ@$UQ6)vd&NUMFOSN3oS<%28H$
zO23DlJ|R?(H+4M(?^Jf=BsryanY2R~GcKT0{NFHA7fV)JFBcMGJ9CI!uNjMSP03{Y
zWoj_C!1(cb#u%FJf-Oer6j`PX*0;NCSJ^HuC<dFx0Abx;PkKY<HERz;h`fgIC=C=M
zZ*yD|s7FGsSPT$<q6vKbPcv8h!%14bMKoI~?Y99$!pHdHVBr{$?L8l^eq1Nvd%(0F
zVyexB)ju7raqr})6wy!(S~0!%<dhjQFCCBS;{gJ$fmBpz^}^4YLY18ld5OU5Ee8U}
z1VkXjTM)Z{SvJo4Jr?6>e<AAoDnAM}Ug*WI(OAcY@U@al%p)115NbP^kSO%nP|9u>
z5CDNx_+=NOXCymiy%yC6C9;`408@{#NnQuVl}yQ|$mmpK@~%n_TLrT!@N0@O`Kpo@
zxLNFv){sDWc{~GhpO~Tg5<0oeN<i_foV~`Vabzs8tkcs#Z7#e4M&K%3ra-kM$DFT?
z8t-r*))1H9D`7b0RoEK?MiAw@f)a}EHiOtI#6IGXOXju!yb68yjQY&_$s^QcezJYt
zBa^K-)mAjaz?1iVmrv^}e1vhtsuyr*benezF1-e^GGZIIK1$+7dZ&bAb3a><m)LC1
zI`3)KPve+FECio_To+NnrrymsFu!+SZBy;g4gB$i@8_xo2NLtyaH7xGc-wOg*s)zw
zDb4E_`Cb))mZN7@J>Jm_^}_S9NZ%NmV7qW6?8_qW5{Nl~c+eufXkD;D6@E=~6&O(G
zJl`_vwOWdRw$f3u^?2fH=UJuioot^nuxW-p(AHXA(!R~g_v$b6`49_<XOt`J<A^3?
z8m~83lLDTs8<PEnCu_eOin{aSC)9pZD-=_fq6fw7^(~Mn=+Km%t(hZm0R5NeQg=sN
zT5<ba|NJihCWveZ4;M74Xp>Ch$#Eq6qBJ)+4F$>q?0G(A#3*#NohXXwS1C2k3AfDV
zCOWNuZTb1o`b2`2k42P#Cx2#>hQ6x{l+e-Qw>P2ns*Cp`cq_<;uNZc|cP1i6Lg95-
z+}M&Yer`#}%JLNHk|RYTFk+7~Q6@QWApa%?*^pAquKhZCwgRWCt=Bs4*YGqo%zE6!
zgv@9xIIgOoq_s8KdrzcEfrCgsk>5W&^JVbysS+oygZD1pF0XsrfZq*SUf5o0I$zr1
zygl|VKb@)n8(LuXOswYa>=0GH_Az50Yu8Cvg)W}W!Sa)-gQuzY%^5YjhtHPX;X)J1
z2Vx^m=sV??b~B247mnenZ>jhikiDveN6{xlmTKN~B{=KL#CPqZP{&KUV;xv0ofu4(
zoU^UFFXEpz(l;!6&*Of|r3hAmGR4kP!^9L34QE<Wp&%_$rN$%jE8T=DK(m??;5S-d
z3H<TNAbex)BTXk(i~SqpXLM#z%0Vld|C{&DRp+jTtw-@Mq5C%Uh1!E6qZfLz?rm>L
zE5-z8!!gK=lFF*77_FNg+QJDXrK&hxjs_sL5JQjUR({Kd>aDuFHLr1!;_`S?)}?NU
zoB0!!VN*XJ!w}mTD=wf8ar&pR5`qdDYX}Ua_NbT8#%=sTC)|;u<>naX>Z(<5_=d0j
zHBM;~d!4`;IPWnuqTk5~cD$q~uEsN-ESLQJ)LYhXPki3&O>P_b_64^!$tz>pY24^;
zz6kDfFMiDC>8k!oGu#hrD%L(xr<$$gDgWV_<NNtd)0HlR*+JpBR`sgv$AaI_Xf}7V
z1fVtE<%eKj$Y*L!9fvJsavl7kT*#BrPYmRgT`J{80m6Je!treg-Qr}@n=@=?w?7oA
z!r<h~c)<jNNbzv6F;YmoFIad<Kr>4f>Fa0LIvFw0O3}Ij<#^p5DIy|8jt<gCXdeU)
z=pU)&dP(H^wyoqqmid@*Lm?Le&aZkvK>ZP)4dHz_KtXCF*vJQ6`&M_@6$1LTgSLbM
zt49nC5_xf6L!a%i!+XUP&P)P?FSJT7Bdm`UwhL9usgZ0L3ia_k3c+K2T-j!;M5lt8
z;D{samTuP$TIk9XO%bRJGLbyxnlx&ms~mB$<R(zJF9114TR@aswgx@C+q>0v+-nh3
z-tXyrNZEl5_9n;NysE<J?3+q7C2+LDepqAngsxE8$_H!vsCjm%6zxjmb$CASaUS5<
z2Rsoq(?;2n3D{(1BD^EV!Ki5Q6kkyq5}hIJ?;8bbohSfb9bJmg>w4}U49wPU@V^^B
zn+ewzS3l~J{A|6)UYm2bnTNs9=0~?k7@UX9EnxBtId^+L4{?#cf<g5mAhz2!WCcAm
z>=-SfQsaLI-~JBs{e3=QsAN^E(obC&s_coB8GQ&EHF2l{LoYucZWf0S!J_98kK&)%
zCC)-Izn<e>2lSo>VuL!B00(1PBH4acCe0vePCOchP#Ivcpy!63P%<l|WF+KHa^sNg
zh~}NxlgMwT%I6_)H71rrHjmR)Vghx9->g>T+0i8_xXSq2HjKJ{B`E$9ar_01{+&2~
z2~+-4mLm?f#O4GGClPT7OhMU@e`G^w{}2(A+oakLgdD)TSQV+;x#LvNqW!(62=Qp>
zCTCzVu9h>ffy0Iz;J><h))dD(A-x+{d4#=@;~4qCjfl(YGZ=25L}*tj(AiGL?jW@r
ztUP$EDMEo*aHypz97e*1)cpp=5IB_i2KLU{z-iNpmT%{(+peF^1t3r8@aMzi05^fr
ze6HPky78_Ul!n+|KyI<Cf?jjrN!7Xi??P7wWQb(#%aiiPFzgF~qmdwS;awA%D1kBV
zQw<!}WVHD?SB;V~BeJT`=N<wM$gFTS8NTKBar8#X1P0eG`qZDl0nD#P<VnKGA0yr}
z?p`-Lgs*WNV7E}%ajjBR6Sxn@1XAdw<;p#cK7;9B%5(mVXp97Kq<<hW-S+qo|A>v^
z0679N-WvU&>=PUt#$%Bm!l{a_t}S~cZkPU|z-sn3l=JW#3Eh6R#G<);RX^?W-aV|l
zJyjc!=%9F3NZ(H>EltRQw_UvriC)#<LF5&JkqSzzP$@g~0Z)!FV$}6<A@U>~$yYJ$
zEC?@l=;#@N0W^^Nhd%LlR9{T)1RhJ|A9xO<e!_nlp8hhH6Di<l)V<~F;9}c(>V4k!
z0%)|oOQmamyW=@;G+4N5FPO3ivC!1==<-W!8l90DE5ioq|EN+D+m9L#j&%DHhsV-3
zf9Evi0)js|I~;Jqv@ibevLbL8&;Lmd4rM|f9`vxT4cWTwy*c=JqGUE|^OMbqu#SnR
zn{SvGrM4mf-idQtr)6syT#VH>o~KOw1x8j2pO4ubZu@w0du0$uKShi%Jd3K0w@8Wn
zI6a_zhjT96%3)sk+}AmkNb2Z#9~q0V*tYu7Mwq8p;2JhJ)5W!9D(dfi{<K=4Hn+X-
z_2GVtkg8$(D~n54m-LqSW8iGv(r5YL>hORiroy_kshzRuv+y4ZN(bHiM;PDQ@+I6;
z2QKB4F^Ghg!m%RUc3VgDqt=y1<{lefapWrXUiF&G=F_L#9nRVLS|t{iC_H&hvTp6F
z;^<J}TFdOW<(z~G+|wThv9InWr3{n95amP$df<k0(AH>Rv#8xpA5Hga*J9?ch-NrX
zKR4z_8X%;JLy3|RU*-*+w;~T5CsU#tM{Q1RSqePCubYQt%6C`YNf)n{l0w-se6`pW
z&JLVNEssn2*GA^+PwZdewzu2&-xYqwnbCqN0B=4`b~(!SlOy#s#qbNKt?bR)9I^?+
zvaQp;5?7X8W<+x^4d8Sbo3aLE3=gAdZE^g~rPW#cp;Lh>j>wMh?~DCK`tKI9@|y_;
zMy_XSQc}Nq^blZ4SGo`D^F;*B1RRnVjpg_{m)hN`6eA3w`WC!r^fs*DT))-Hx<js+
z>aFXo<9YztoiDnw`}j*&I7fn*it9eibMY_=sH<8>{qFLpPE`*Gcxfhd{KXl!uv7c?
z&wFiIX0Zlj6cu!)XE$C6J!pynO6b(4ANtxJJ9csLXW`8;PGcY-qvheQui4ExA>(fw
z*D5NQCzC5-b&v|uJ%6A3wD1ORHXfub!v$T9)Og3JI}U4HTl;=O<CCq~iszE|F5JJ3
z>TBBg!wK$j=5smMFc6T*Tz6=gq~2YNFycjJMExZy{`(}t-}@mrVXby<Q$feXU}Jtg
zduF{MxUPR<+MX5O58iKIJ?`YTEZZ-;QWBw1^mTZD1rp+V?|jbA$)mq1XYF$cspJ~S
zxVt?PdCT9asA#u6+Ig_*y<eENI~>~>PERq^4}Q<))y@-Z3p_W#2`t|nnJn%(xtn06
zJQ*M08!V~w3QJT;ey4avuKs3_P596(p+F-V43`xqJ_y_xB+Q2l-AHbZcUZ#`CD~b5
zqB^MT*}5FHhsY6H-r8pObL6OPhyQ@<9sskZPOo_)mDOVplOsNO1a&BH4j)wEK}_AD
zA{E=_IOm>W%Cb`sIzoFlzg5LXf#G76zTPbYsS6J;)ZYT((2ssb0=M$byk24Q#Xuqn
z@d1t!lXEAgL=Jygc}eJVvGGKxk!u7g_ec8l7<CDqQ9Fb$4HOaQUWG~Oz?)wj957B>
zy?M*wNl{_{j}h@FmXXv`m(j`K;jotS!t@i2Z`b-BAn$ddTw7NLsfJcwHU|gaMIHfl
sV8WBpDSI~o+X(yfx&OnT2HTQYt<=C0;hHD#{|y#%6HDWVMrWe_1p^m!EC2ui