02_unique_devices.ipynb

{
 "cells": [
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# Monthly Unique Devices on Wikipedias #"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 1,
   "metadata": {},
   "outputs": [],
   "source": [
    "shhh <- function(expr) suppressPackageStartupMessages(suppressWarnings(suppressMessages(expr)))\n",
    "shhh({\n",
    "    library(tidyverse); library(ggplot2); library(wmf)\n",
    "})\n"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 2,
   "metadata": {},
   "outputs": [],
   "source": [
    "query <- \"\n",
    "SELECT\n",
    "  year, month, CONCAT(year,'-',LPAD(month,2,'0')) AS date,\n",
    "  SUM(uniques_estimate) as unique_devices\n",
    "FROM \n",
    "\twmf.unique_devices_per_project_family_monthly\n",
    "WHERE year >= 2018 \n",
    "  AND project_family = 'wikipedia'\n",
    "GROUP BY year, month ORDER BY year, month LIMIT 1000;\""
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 3,
   "metadata": {},
   "outputs": [],
   "source": [
    "unique_devices_monthly <- wmf::query_hive(query)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 4,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/plain": [
       "\n",
       "\n",
       "|date    | unique_devices| yoy_percent|\n",
       "|:-------|--------------:|-----------:|\n",
       "|2018-01 |     1554911548|          NA|\n",
       "|2018-02 |     1487086660|          NA|\n",
       "|2018-03 |     1577671296|          NA|\n",
       "|2018-04 |     1522050732|          NA|\n",
       "|2018-05 |     1562607664|          NA|\n",
       "|2018-06 |     1481623542|          NA|\n",
       "|2018-07 |     1484414539|          NA|\n",
       "|2018-08 |     1516850100|          NA|\n",
       "|2018-09 |     1609517085|          NA|\n",
       "|2018-10 |     1646304870|          NA|\n",
       "|2018-11 |     1584755682|          NA|\n",
       "|2018-12 |     1589472863|          NA|\n",
       "|2019-01 |     1584392317|    1.895977|\n",
       "|2019-02 |     1531982663|    3.019058|\n",
       "|2019-03 |     1636520495|    3.730131|\n",
       "|2019-04 |     1581509035|    3.906460|\n",
       "|2019-05 |     1594894475|    2.066213|\n",
       "|2019-06 |     1506535565|    1.681400|\n",
       "|2019-07 |     1502241031|    1.200911|\n",
       "|2019-08 |     1509794957|   -0.465118|\n",
       "|2019-09 |     1695556764|    5.345683|"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# Calculate total monthly unique devices with yoy changes\n",
    "unique_devices_summary <- unique_devices_monthly  %>%\n",
    "  select(-c(1,2)) %>%\n",
    "  arrange(date) %>%\n",
    "  mutate(unique_devices = unique_devices,\n",
    "    yoy_percent = (unique_devices/lag(unique_devices,12) -1)*100)\n",
    "\n",
    "knitr::kable(unique_devices_summary)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 5,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAIAAAByhViMAAAACXBIWXMAABJ0AAASdAHeZh94\nAAAgAElEQVR4nOzdeWATdf7/8XeanrRg6YFCpaWtoCgiIkVBYAGpxdXCsq6oZUEF8edXORZX\nEJQbPPBC1sV1BU8uwRNWFyigoMh6gQoKAqVcAnK19AptU5rfH/M135Ck6UyaadPPPh9/lZnJ\nvN8ZJs2rn7ksDodDAAAA0PiFNHQDAAAACAyCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0A\nAIAiCHYAAACKINgBAAAogmAHAACgCIJdsLP85vHHH69pmaeeesq5WH325pWhNkzqudbV1r1u\nkGxt/Szni46Obtmy5dVXXz18+PDXXnutpKSk/pupz4qNyOTJk7Xt8+ijj9a0jOcG1LlJU1JS\nLBbLzp07PWf9z//8j7aSu+66y3Pujz/+aLFY2rRp46Oc/v/WINkB/N6M9ennn39+5plnsrOz\nU1NTIyMjmzRpcskll4wYMeK7776r6SXV1dXz58/v2rVrs2bNmjVr1rVr15deeqm6utpzyf37\n97/66qs5OTkXXXSRnvf+ySef3HnnnampqVFRUZGRkW3atLnjjjs2bNjQSN/OwYMHR40adckl\nl0RGRsbHx/fp02fJkiX630vwciC4Of+n2rZtW9Myl112WT3/h/qoZagNk3qudbV1r9voPj6+\nfw9ER0dPmTKlsrKyPpupn1qNS3V1dUpKirZ9Lr744nPnznldzHMD6tykQ4YMEZGXXnrJc1aH\nDh20laSmpnrOnT9/vogMHTrURzn9/61BsgP4vRnrU02fWavV+swzz3guX1FRkZmZ6bl8//79\nPT/gnovV1EZ1dfX9999fUzP3339/dXV1I3o7Dodj/fr1TZs29XzJHXfcUdPnrrEIrj0YnrRd\nrWXLliKyZcsWzwW+/PJL5wK+9+OAd2V0Vh0X1q/W1da9bn1u7YBwa9hut586deq777575ZVX\n+vTpo83t2bPn2bNn678ZOH3yyScikpqampqaKiLr1q3zupjnBtS5Sf/5z39qX11u0wsKCiwW\nS1RUlPZVd+TIEbcFbr/9dhFZsGCBj3L6/1uDZAfwezPWp3bt2o0bN+7999/fs2dPWVlZWVnZ\ntm3bnKOq//rXv9yWf+ihh0QkMTFx6dKlZ86cOXPmzNKlSxMTE0VkwoQJbgunpKQMGzbstdde\n279/v+/3/ve//11ErFbrAw88sG3bNm3NW7duvf/++0NCQkRk/vz5jejtHD58+IILLhCRe+65\nZ8+ePRUVFXv27HG2MXPmTD3vJWgF1x4MT9p+Nn78eBH5f//v/3kuoP0VNWHCBIKd/tUG4a9v\ns/l+y2vXrk1ISBCRESNG1GdXcKN9tUybNm3atGniMkLmxu9EsmvXLhFp1aqV2/RVq1aJSO/e\nvW+88UYRWb58udsCrVq1EpHdu3f7WHmj+1g1uoZdTZw4UUR+97vfuU48cuRIRESE1Wr95ptv\nXKd//fXXVqs1MjLy119/rWmFvrfGlVdeKSIvvPCC56znn39eRDp27Gj4Pbio57ej5cWbb77Z\nbXr//v1FJDo6+tSpU/68jeDQWPfp/x7a3vnjjz+KSGxsrNuASnl5efPmzUXkp59+ItjpX22j\n/oXun1rf8hdffBESEhISErJr16566wquSktLY2JiRGTfvn379u3TToUsKSnxXNLvYOdwOFq0\naCEieXl5rhO1Px2nTJkyc+ZMERk9erTr3L1794rIhRde6HvNje5j1egadnX06FERadq0qevE\nF198UURuvfVWz+VvvfVWqeEovMb31oiIiBCRM2fOeM4qLCwUkcjISCPtu6vnt9O+fXsR+fzz\nz92mb9q0SXuhc3C6MeLiicbhiiuu6NKly5kzZ1auXOk6feXKlYWFhRkZGZdffnlNrz1x4sQj\njzzSoUOHmJiY6OjoDh06TJw48eTJk26LOU81Xbt27c0335yYmBgREdGmTZtRo0a5Lux6Rqrr\nyfiedX2vx6uMjAyLxbJ48WKvc1999VWLxXLttdf6XonfdG4Bt4XdHDt2bPTo0ampqREREYmJ\nif3799f+ywydpu11VkVFxfz583v16hUfHx8eHn7xxRcPGTLExxnHRnXv3v3222+vrq52O31Y\nT92rr77aYrG8++67Xte8YsUKi8XSuXNn55Sa3ntZWdlzzz13/fXXx8XFhYWFtW7dOicnx/mr\n1lBLIrJjx45hw4a1adMmIiIiKiqqXbt2w4cP//zzz3VukMB+cPR47733SktLe/TokZaWlpaW\n1qNHj7Kyspq2qt969uwpIp999pnrRG2z9OjRo0ePHiKyefNm17nawr169XJO0XmRwZkzZ667\n7jqLxRIWFua6X/m+9uLDDz/MysrStmRqauro0aN//fVXz5Xr/0TU9Kn05LWx77//fuLEidde\ne21sbGxYWFiLFi1+//vff/jhh54vr+MuZ0izZs1ExO0ago0bN4rIH/7wB8/lBw4cKCLasX4/\nxMXF1XEB3+r57Rw4cEBEPL83nWearl+/3r81B4WGTpaohfO/Sfvb5aabbnKd+/vf/15E/v73\nvztq+APlm2++0U5HcHPhhRdu3brVs9CUKVM8F05PTy8sLHRdzMeOpHM9bu9O8+qrr4pIt27d\nvG6Kq6++WkQWLVqkf6MZWqAunWu2bdumHdB0ow2HiO4hFs9Zv/zyy1VXXeW55tDQ0Ndee833\n1qi1nNP7778vIj179jRaV9s5+/fv73W1WVlZ8tte6qOZ3bt3X3LJJZ61/NsUGzZs0MYYfK+t\nJgH/4OjRt29fcRkqWLhwoYj06dPHc0nPN6L/rc2bN09E7r77bucUm80WFhZmtVqLi4vLysqc\nPzsX0A4Qv/jii77LuU08efKk9pmNiIj44IMPau1Wm/jwww97bsmEhIRt27a5Lqz/E1H3T6Xn\nazVjx451XayOu5xRH3/8sYhcd911rhO1gagdO3Z4Lr99+3YRueKKK2paoe9W77zzThH529/+\n5jlr7ty5IpKTk2OkfXf1/HYiIyNF5PTp027TT58+rb2wQ4cOBt9BECHYBTvn3nn69Onw8HCr\n1Xr06FFt1rFjx6xWa3h4uLZ3eu7HhYWFSUlJItK5c+e1a9eWlpaWlpauWbOmU6dOItK6dWvX\ncXXn76CsrKzPP/+8oKDgxIkTixcvjo+PF5FJkyZ57aqmhv1bj81m044sf/fdd26r1f7qbdGi\nRUVFhf6NZmiBOm6B4uJi7XrGLl26rFu3Ttvaubm5riNVOpt0m1VZWXnNNdeISM+ePT/66KMj\nR47YbLaffvpp7NixISEhoaGh33//fd23icPhOHTokIgkJSUZrVtQUBAZGRkSEnL48GHPdYaE\nhERGRhYUFPhopqysrF27diJy2WWXrVix4uTJk5WVlYcOHVq0aJFr0NTfkrZY//79v/rqq6Ki\nooqKivz8/DfffNN1bTUx74Pje+OHhIRERUU5V15UVBQVFWWxWA4cOOC2sKHdyY02ppWWluac\n8umnn4rINddco/2za9euIrJ27VrnAtqVHD/88IPvcq4Tjx07dsUVV4hIdHS05yUgvj+AXbp0\nyc3NdfsEtWnTxpk19e8GAflUXnvttfPnz9+xY0dpaenZs2d37949ffp0LRmsWbPGuVhddjmj\n7Ha7FprdjhjGxsaKzwOmcXFxNa3T9y60Z8+e+Pj40NDQMWPGfPfdd0VFRUVFRdu2bRs1apTV\nak1ISNizZ08jejtt27YVkc2bN7tNd45kx8fHG3wTQYRgF+xc984//vGPIvL0009r/3z66afF\n5fwDz/34ySefFJHLL7+8tLTUdXpJSYl2h5Q5c+a4Ffrzn//s1sAbb7whHn++1BpK/F7PX/7y\nFxEZOXKk28u1i/ImT57stajXHowuUMfOn3vuORG58sorbTab6/TS0lLngL/OJt1maQOZN910\nk91ud1tSO8V+2LBhNb5VHeWcbDabiERFRflRV/uDftasWW5Laudsuf0179nMCy+8ICLt2rXz\n+kvcSX9L2tjJ8ePHfb9lr8z74Pgwe/Zs8bheNScnx+tWNbQ7uTl37pz2felM4dr/kXP8ady4\ncSIyZcoU7Z+HDx8WkebNm7vez8LHJ8jhcBw6dEj74oyNjfV6Lb+Pl/v4BD333HPaFP27QQA/\nlW4WLFgg55/+VZddzqgHHnhARDIyMty2QFhYmIh4bhaHw1FZWSki4eHhNa2z1vf+888/a2e2\nubn11lt//vlnv9+LoyHejlYxOzvbbbp2EMz3moMfwS7Yue6d2pVrzsFn7Q9i5/Xhnvtx9+7d\nxdsFbg6HY9myZSLSo0cPt0I7d+50W1I7p7VJkyY1deW1Yb/Xs3v3bu2c8aKiItfXhoWFhYaG\n/vLLL16Leu3B6AJ17Fw7Oemdd97xLPf2228b+gpxm6Xdxumzzz7zXFL70k1OTva6Hp3lnMrK\nysQl2Bmqu27dOhFJTU11/fqvrq7WBnvWr1/vuxnt/K2lS5f67lB/S+np6SLy+OOP+3EDF/M+\nOD5oA5arV692nbh27Vrxdg9LQ7uTp5tvvllElixZov1T26rvvvuu9s/33ntPXA4Ba+e8un0F\n+vgE7du3Txska9GiRU1jyT5e7uMT5Bz60r8bBPBT6aagoEBEWrdu7ZxSl13OkKeeekpE4uLi\n9u7d6zbLRxKy2+1St2C3bt065ylorjp06FDTfXn0aJC3s3fv3qioKBG599579+7dW1lZuXfv\n3uHDh4uIVrSO14I0LIJdsHPdO+12u3ZF27fffvvNN9+IyIUXXujc6T33Y+2wpte/II8dOybn\nj2NrL6+qqvLdQ01TArieG264Qc4/mWPq1Kkictttt3mtqKeQngXq2Ll27rDXre089Vtnk26z\ntJO9rL/Rrl11Pcs7LCzMx5uttZzTwYMHReTiiy/2o251dbX2WIINGzY4J2onILdp08bt5qWG\ntp4r/S1pQ4AiEh0d3b9//2nTpuXm5paXl9e2nRwOMz84NfnPf/4jIi1btnRbz7lz57SDwm7j\nXoZ2J09z5syR326fVFVVpV2K67xzxPHjx0WkSZMm2u+W++67T0Tcbh7r4xOkNdy6dWsf90bx\n8XIfnyDnZte/GwTkU1lcXDxnzpyePXsmJiaGhoaKi4iICOdiddnl9NPGIKOjo//zn/94zjXv\n2OWWLVvCw8NDQkLuv//+rVu3ut3HLjw83LmLiocgfDsOh+O9997Tjqe7slqt2qGwiy66yMdr\ngxzBLti57Z3aUZLRo0ePGjVKRB566KGalnQ4HFarVXyOY4eGhvp4uY9ZhhY2uh5twKB9+/bO\nVi+66CKp4Q90r7RjImVlZV7nlpaWirc/yOrYufYb38fW9nsbun2XeOV1PTrLOWlbvlevXv7V\nnTFjhogMGTLEOUU7kuh5t09DW89zMZ0t/fOf/3S7GiM2Nvbxxx+v9bby5n1waqLdjfLhhx/2\nnPXII4+Ixz0sPdesv5bjtxypfcS0PxHdBgW1A6lfffWV47cH22g/+y6nTdQ+rZ07dz5x4kRN\nDfh4uZ7Nrn83qPun8sCBA85ngfje3xx12OV00mJQRERETSNk5l1toN3gzXk03LMr57VTvjdR\nkLwdze7du0eOHKldLh0XF5ednb1lyxbtknDnr8HGiGAX7Nz2zu+//15E4uPjtVOzfZ/O7GPg\nwe0vYK8v9zHL0MJG12O327U/+j/55BOHw6HdJeGqq67yuk6vtJup1nTax88//ywu41KB6lzb\n2l6/zAyN2GmHGFxnaX+2Hjp0yGtvOun5NXfHHXeIy8lVRus6r5PQLgUtLCzUrqjwXINnMzpH\n7PzYFHv37l2yZMm4ceO0Sx/k/DPkvDLvg+OV826UPsTGxrqO/Rj6SHqy2+3R0dHa7qrdXXb4\n8OGuC9xzzz0i8uyzz544cUJEoqOj3bKR13LaxPz8fC3ctGvXzvOyj1pf7uMT5Nzs+neDun8q\nb7vtNhHp1KnTu+++m5+fX1ZWpqU0z8+pkx+7nB7aSFJYWJjn4xmctPOwvd464K233hKRP/3p\nTzW91vcupH1CvV7lrQ2eGb3aoGHfjg+zZs0SkUceecSP1wYJgl2w89w7nb8srr76at9LduvW\nTURWrFjhuVrtVKHrr7/ex8t9zPLvy0z/eqZPn+780F533XVi8HaR2gmwL7/8ste5L7/8sojc\ncsstge3cx9k8y5cv91xeO8Pj2LFjbgt73mv6+uuvF5HFixd77U2nWn/NaTcotlqtzkDsR13t\nuQXaw4W0ZxBlZWXpaUY7x27ZsmW+11/HTbFo0SIRSU9P972YeR8cr1asWCE6uPZj6CPplXbC\nw3vvvTdo0CARef31113nalcn/OEPf9DuopeZmannrTkn/vrrr9pFjq1atfI63OLj5T4+Qc5z\n7PTvBkY/lZ5TagqR2k3ja93mOne5Wj3xxBMiEhoa+t577/lYrNY7+vp48Jfvt6P9vvJ6VFQ7\n3VD/6aSOIHg7NamoqNBOC96+fbvR1wYPgl2w89w7tZsGicfTXTyX1C7u69ChQ01XhHle3Kez\nB+1D7nqnK//WU9PCR44cCQ0NDQ0N/de//iUicXFxbm/BN+2CtUsuucTzrv0lJSXacMLChQsD\n2/mzzz4rIh07dnQ7ddpmsznPOHadrl378tZbb7nV0h7T7rqw9j+ekpLi+4pR33z/msvNzdXu\n9XXvvffWpa72ZandOEO7o4TXeOTZjHZztUsvvdTrTlWXllxp40/Oq0NqYt4HxyvtUgbXu8S5\n0TaO6+OP9H+UaqIdNx8zZox22q7beeu7d+8WkcTExNGjR4u+y3LdJhYVFfXu3VtEmjdv7nlT\nCR8v9/EJch4H1L8bGP1Uek7RTsNyC3bV1dXO60N9N6Bzl/NNu2w5NDTU66fJ1ZEjR7S7Yrk9\ng+ubb76xWq0RERGef0k6+X47WlJ//vnnPWdpY2+dO3eu7X38r2B4OzXRdnjPP/sbF4JdsNO/\nd3ouWVBQ0LJlSxHJyMjwvIdTUlKS5+24dK5Ze27gnDlzPL+GDa3Hx8La703tkeTjx4+v4U17\nd/bs2UsvvVT7hf7ee++dPHnSbrefPHnyvffe0zq/9NJLPa9cq2PnRUVFycnJInLttddu2LBB\n29rr16/v0qWL/MZ1+UmTJolIQkLC0qVLT548WVBQ8Pnnn990002eCzvv8XbFFVesWLHixIkT\nVVVVZ86c+eabb5599lnn7cd8c1un3W4/ffr0d999t2DBAu2+uCLSs2dP183iR92KigrtJAHt\nZh/x8fFe7zvouTWctS6//PJ333331KlTdrv90KFDixcvdj3ZRX9LHTt2nDlz5qZNm06cOGG3\n24uKir744gttQLF79+6+t5V5HxxPv/76a2hoaFhY2MmTJ2ta5uTJk9pV4c7rGwx9lLzS7l2n\npXmv54lrgU9bYNOmTW5zvZZzm1heXq4dSouKinI73Obj5SLStWvX9evXu32CkpOTnb9t9O8G\nRj+VnlO0Mb/u3bt/8cUXpaWlJ06cWLdunetDOJxL6t/lDP1naYcvrFar18u0PWl3jEpMTFy6\ndKl2icPSpUu1y028nsSpsyttAN7t4olvv/32vvvuCwkJEZF//OMfjejtOByOzp07v/zyy/n5\n+ZWVlWfOnFm/fr12qKdFixae9+NsXAh2wU7/rwCvS3755ZfaF62bxMREt7+BDH0/Pf74424r\n9G89PhbesGGDNjckJGT//v3e33PNdu3apV2k6alNmzZeH4da986//fZbr8/V8XqP+8LCQu3+\nCG6czzBwXXjv3r3aN5lXejZITa/VNGnSZPLkyZWVlW6v8qPu2LFjRUQb0/3LX/6ic3s6HI7d\nu3enpaXVWkhnSzUtEBcX5/YMA69M+uB40s4fHzhwoO/FsrOzxWW8xHPNemq5Onv2bHh4uPYq\nr9eba4doRSQiIkLnX0GeE6uqqkaOHCkioaGhb7zxhp6Xe33yRHx8/Lfffuu6sP4909Cn0nPK\n5s2bvT5PQvvDTPza5by+/ZrUtFont1Gr8vJy7Ti7m8zMTM+/snyv2XXJc+fODRs2rKYl77nn\nHp0XiATJ26lp4bS0tJ9++knPGwlmBLtg53WPNLTksWPHHn744fbt20dFRUVFRbVv3378+PGe\nJ4b7KOQ5y263T58+vV27ds7vBv/W4/vdaaNuAwYMqGkB34qLi59++unrr7++efPmoaGhzZs3\nv/76659++umaDvYFpPNffvnlgQceSElJCQsLi4uL69evn3YSidflT5w4MWrUKOfCWVlZ//73\nv2tauKysbO7cuT169GjevLnVao2Nje3ateu0adN0/hpy+/0VGRnZokWLq6666q677lq4cKHr\nXQPrWFe7Wk1T03kqNW294uLiJ598MiMjo1mzZmFhYcnJyUOGDPEcLtLT0vbt26dOndqzZ8/4\n+Hir1RoTE3PVVVdNmDDB+eCWWpnxwfHUsWNHEfF9ppHD4dDOdXNeQmT0o+SVNhYlIvPmzfOc\nqyVOOf8Rc77L1dTDY489JiIWi8V5zxTfL3/nnXduuOEG7XnBKSkpDzzwwJEjRzxXq3/P1P+p\n9NrYtm3bBg0apD13oUWLFjfffPNHH33kubDOXe6XX34Rl+e71Epq43k4sqqq6m9/+9s111wT\nExMTExPTpUuXF1980ccdeWriufxHH3106623tm7dOjw8PDw8vHXr1rfeeuvHH3+s870E1dvZ\nsmXL8OHDU1NTtb2ie/fuzz33nKFzfoKWxaFjQwP1r7q6Ojk5+ciRI+vWrevXr19Dt1NX2h22\n+LgBNfkv+YwsXrx46NChf/7zn7XrKoCAC2noBgDvNm7ceOTIkfbt2yuQ6gBA88knn4hInz59\nGroRKKv22zwC9cxut+/Zs2fChAki8te//rWh2wGAgNEuW3FesQQEHIdiEVycDwUSkYyMjC1b\ntui5y3zw+y85zAT4jc8IEBAcikUwuuiii+65556PPvpIjVQHAED9YMQOAABAEYzYAQAAKIJg\nBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINjVld1ur6qqqp9C\ndrtdpUJVVVX1Wage7sWtXqFz587VZ6Hq6mplClVXVytZ6Ny5c8oUcjgc9VmoHr4p1CskfMka\nZ50+fbp5a1dedXX1mjVrDh8+nJ6ebnattWvX7t+/v23btmYX2rBhw549e9q2bev62FYzbNy4\n8eeff05NTbVaraYW2rx5886dO1u3bh0WFmZqoS+//PLHH39s1apVRESEqYW+/fbb7du3JyYm\nRkVFmVro+++///777+Pi4qKjo00t9OOPP27btq1p06ZNmzY1tdDu3bu/+eabqKioCy64wNRC\ne/fu/frrr8PCwpo3b25qof3793/55ZcWiyU+Pt7UQocPH96yZUt1dXViYqKphY4dO7Z58+bK\nysoLL7zQ1EKnTp3atGmTzWZr2bKlqYUKCws3btxYXFyclJRkaqHS0tINGzYUFBS0bt3a1ELl\n5eXr1q07ceJESkqKqYXsdvvatWuPHj2amppqaiGHw7F69er6+TbPzc3dt2+fed/mjNgBAAAo\ngmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACgitKEb\naHjV1dUFBQX+vVZ71FJ1dfWpU6cC2lSNteqhkPZsolOnTpn95AntST6nT58ODTV3P9QeR1NY\nWGiz2UwtpD0l5syZMxUVFaYWqqysFJGioiKzHySlvZHi4mKzd4by8nIRKSkpMXsPP3v2rIiU\nlpaaXUjb2crKyswuVFZWppUzu1BpaamInD171uxCJSUlIlJeXm52oeLiYhGpqKion3dUWVlZ\nP7u33W43u5D2m6GqqsrsQtpv73PnzpldqJ6/zR0OR10KxcfH+/idbKmHp0AGObvdvnXrVr9f\nfurUqZCQkLi4uAC2VFOhenhqkIgUFBRUV1cnJCSYXaiwsPDcuXO+d9AAFmrevLnZzy4rKiqy\n2+31UKi4uLiysvKCCy4w+yFpJSUlFRUV9VCotLS0vLy8adOmZj+NzWaz2Wy2mJiYyMjIeigU\nHR1t9mPfzp49W1ZW1qRJkyZNmphaqLy8vLS0NCoqyuzny1VUVJSUlERGRsbExJhayG63FxUV\nRUREmP0gO61QeHh4s2bNTC107ty5wsLCsLAws5+Ypw2IhIaGxsbGmlrI4XCcPn3aarWa/Wg+\nqcdv89OnTzscjrp8yXbt2jUkpMYjrozYSVhY2HXXXeffa6urq//973/XZQ36/fvf/7ZYLPVQ\nKDc3t7Ky8tprrzU7b33yySc2m61Lly5mh4bPPvusuLj46quvNvubb8uWLQUFBR07djT7e+Lr\nr78+ceLEFVdcYfbvoG3bth09evSyyy4z+/Gg27dvP3ToUNu2bVu1amVqoV27du3bty8tLS05\nOdnUQnv27NmzZ09KSkpaWpqphfLz83fu3HnxxRe3a9fO1EKHDh3avn17y5YtL7/8clMLHT16\ndNu2bS1atOjYsaOphU6ePPnVV1/Fx8d37tzZ1EIFBQVbtmyJjY3t2rWrqYVKSko2bdrUtGlT\ns78pzp49u2HDhiZNmphdSHtWbEREhNmFHA7Hxx9/HBoaWg9fsqtXr3Y4HOYV4hw7AAAARRDs\nAAAAFEGwAwAAUATBDgAAQBEEOwAAAEUQ7AAAABRBsAMAAFAEwQ4AAEARBDsAAABFEOwAAAAU\nQbADAABQBMEOAABAEQQ7AAAARRDsAAAAFEGwAwAAUATBDgAAQBEEOwAAAEUQ7AAAABRBsAMA\nAFBEaEM3AAAA0Ij1OfiDgaUvbyUizxh5yacpV+lfmBE7AAAARRDsAAAAFEGwAwAAUATBDgAA\nQBEEOwAAAEUQ7AAAABRBsAMAAFAEwQ4AAEARBDsAAABFEOwAAAAUQbADAABQBMEOAABAEQQ7\nAAAARRDsAAAAFEGwAwAAUATBDgAAQBEEOwAAAEWENnQDAFBXfQ7+oHfRJiJXthu7UAgAACAA\nSURBVBZHoRws1PmKT1Ou8rMtAKh3jNgBAAAogmAHAACgCIIdAACAIjjHDgCgDgMnXIrIla1F\nRHS/hBMuEfwYsQMAAFAEwQ4AAEARBDsAAABFEOwAAAAUQbADAABQBMEOAABAEQQ7AAAARRDs\nAAAAFEGwAwAAUARPngBgFgPPALhA5MrWYj8pB0/qfAXPAAAAT4zYAQAAKIJgBwAAoAiCHQAA\ngCIIdgAAAIrg4gkAAIKXgYuQROTK1iIiRl7CdUiKYcQOAABAEYzYAUDQMTBIY9UGac7qH6Rh\nhAZQGCN2AAAAimDEDgD0MjCQFqENpJUE+UCa8fO37EH+joD/cgQ7AAAM45oGBCcOxQIAACiC\nEbv/Csb+srz0QhF57tB2/a/gL0sAAIIBI3YAAACKINgBAAAogmAHAACgCIIdAACAIrh4Ao2S\nsctBUi4QueC5k3v1v4LLQQAAjREjdgAAAIog2AEAACiCQ7Fe+HE/8Se4nzgAAGhojNgBAAAo\ngmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIrgBsUAANMZv/G7\nQ3S/hLu+A06M2AEAACiCYAcAAKAIDsUikIwdbUmPF4l/7uhO/a/ggAsAAD4wYgcAAKCIoBix\n27dvX25u7qZNm2w226pVq3wvPGDAALcpzpe4zrJYLM2aNbvooov69et34403WiyWwPYMNF4G\nBlbjrRLfWmxH5eBRna9gVBUAGlBQBLvnn3++R48ezzzzzIMPPqhneR/hzznL4XCUlJTk5eUt\nXrz44MGD9913X2B6BQAACFZBEezmz58f8HVqI3adO3dOSkoaM2YMwQ4AACgvKIKdqSwWS0gI\npxICAPDfxfjdE+VJIy8JzjNPGmWwGzZsWElJSbNmzTp27Hj77bdffPHFnss4HI7S0tL8/PxF\nixZ169at/psEAKAR8SMG6b+JtARrDFJP4wt2Xbt2HTRoUNu2bYuLi7ds2TJp0qQZM2akpaVp\ncz0vrUhOTr733ntdp1RWVi5btsz5z4iIiIyMjPNeY/JW2bdvnx+vcjgcfr+2/t6ReoWMKC8v\nF5HDhw9HREQEuqPz2Gw2ETly5EhhYaE/rzdz65236ShEIQrVvZZ6hXQ7d+6ciNjtdr77XP+Z\nlpbm45LQxhfsJk+erP2QkJAwYMCAsLCwt956a/r06dpE1+sqSkpK9uzZs3Dhwg8++GDIkCHO\n6eXl5S+++KLzn82bN4+JiTmvhvaHiGl27drl3wsdDoefr623d6ReIePy8/MD2IkPBw8e9POV\nZm698zYdhShEobrXUq7Qc/oLhTq7KtVf6K87Dv/vT8ptOk2bNm2sVmtNCze+YOemW7dur7/+\nutdZTZs2veaaa2JiYp599lnXYBcZGTl69GjnPyMiItq3b3/+Sw3sQH7wKKfLzz//bLFYLr30\nUr9q1ts7Uq+QAQcPHrTZbGlpaWaP2B0+fLi0tDQlJaVJkyZ+rcDErXf+pqMQhShU91oUotB5\nX0m+rxxo9MGuVikpKadPn3adEh4eftddd/l6jaHzDIxLT0/341W7d++2WCz+vbb+3pF6hYw4\nfvy4zWZr3bp106ZNA96Sq9OnT5eWliYlJcXFxfnzejO33nmbjkIUolDda1GIQka+khr95aKf\nf/6578GVgwcP+vnlBwAA0Kg0gmDnej3E5MmTv/jii8LCwnPnzh0/fvydd95Zvnz5sGHDvL6w\npKRk69atL7zwQnZ2dn01CwAA0GCC4lCsa3Rz/uz18RKDBw/++OOPX3rpJZvNFhsb27Fjxzlz\n5iQlJXldVUxMTFJSUk5OTs+ePU3rvU6MXVt+RZKIPM215QAAoAZBEex8Px/WdW7Hjh07duzo\n33qAYGYs5V8YIRe2fq7ksJQcrn1hESHlA8B/h6AIdkDQMpa3kqIlKfq5gnwp0PsK8hYAIIAa\nwTl2AAAA0INgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgB\nAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiC\nYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAA\noAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIId\nAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAi\nCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAA\nAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDY\nAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAo\ngmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcA\nAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKCK0oRtoeHa7\nfevWredNahllasUvv/ySQhRqsEIm16IQhSgU4FoUopDrjifStWvXkJAaB+YIdhIaGtq+ffvz\nJp05YGrF/ytHIQrVfyGTa1GIQhQKcC0KUej8lGKxWHwsTLATi8VywQUXnDfpjLkV/68chShU\n/4VMrkUhClEowLUoRCG3lOIT59gBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAA\noAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIId\nAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCKMBbvVq1f3798/ISHBarVaPJjUIgAAAPQI\n1b/osmXLcnJyzGsFAAAAdWFgxG7WrFki0rdv3+3bt1dUVDg8mNYkAAAAamdgxG7fvn0isnDh\nwtTUVNP6AQAAgJ8MjNi1bNlSROLi4kxrBgAAAP4zEOxGjBghIuvWrTOtGQAAAPjPwKHYRx99\n9MCBAw888IDdbs/KymLoDgAAIKjUEuy83sSkpmtjuX4CAACgAXGDYgAAAEXUMmLHIBwAAEBj\nwYgdAACAIgwEOx/PDeORYgAAAA2OETsAAABFBCDY2Ww2EYmIiKj7qgAAAOC3uga78vLyJUuW\niEhSUlIg+gEAAICfar9BsdvJczWdS/eHP/whMB0BAADALwaePOH99aGhLVu2HDRo0KxZswLS\nEAAAAPxTe7Bz3spOG6vjznYAAADBycCIHZEOAAAgmHG7EwAAAEUQ7AAAABRhLNitXr26f//+\nCQkJVqvV4sGkFgEAAKCHgXPsli1blpOTY14rAAAAqAsDI3baDU369u27ffv2iooKhwfTmgQA\nAEDtDIzY7du3T0QWLlyYmppqWj8AAADwk4ERu5YtW4pIXFycac0AAADAfwaC3YgRI0Rk3bp1\npjUDAAAA/xk4FPvoo48eOHDggQcesNvtWVlZDN0BAAAEFQPBLjT0fxeu6dpYrp8AAABoQNyg\nGAAAQBE8KxYAAEARjNgBAAAogmAHAACgCMPBbvny5TfeeGNCQkJYWFhiYuKNN964YsUKMzoD\nAACAIQbOsauurh46dOjSpUudU06dOrVu3bp169Z99NFHb775psViMaFDAAAA6GJgxO6f//zn\n0qVLw8PDp0yZsnfvXpvNlpeXN3Xq1PDw8EWLFr3yyivmdQkAAIBaGQh2r776qog89dRTM2fO\nvOSSS6KiotLT02fMmPHUU0855wIAAKChGAh2O3fuFJE777zTbbo25aeffgpgWwAAADAqYFfF\ncoIdAABAwzIQ7Nq3by8iy5cvd5v+9ttvO+cCAACgoRi4Knb48OHbtm175JFHioqK/vznP7dq\n1ero0aOLFy9+4oknRGTEiBGmNQkAAIDaGQh2//M///PZZ5+tWLFi2rRp06ZNc52Vk5Nz3333\nBbo3AAAAGGDgUGxISMjy5cuXLFlyww03xMXFWa3WuLi4fv36LV26dMmSJSEhPMQCAACgIRkY\nsdPk5OTk5OSY0QoAAADqgmE2AAAARRDsAAAAFGEs2P3nP/8ZNGhQampqeHi4xYNJLQIAAEAP\nA+fYLV++/M4773Q4HOZ1AwAAAL8ZGLGbPn26w+HIysr68ccfKysrHR7M6xIAAAC1MjBil5+f\nLyKvvPJKcnKyaf0AAADATwZG7JKSkkTkggsuMK0ZAAAA+M9AsBs6dKiIrF271rRmAAAA4D8D\nh2InT568ffv2Bx98sKqqKisrKz4+3ry2AAAAYJSBEbuwsLDx48dbrdYhQ4YkJCRwuxMAAICg\nYiDY/etf//rd7353/Phx87oBAACA3wwEu8mTJ2sHYbndCQAAQBAycI7dnj17hNudAAAABCsD\nI3YXXXSRcLsTAACAYGUg2N1zzz3C7U4AAACClYFDsY8++uj+/fu53QkAAEBwMhDswsLCtB+G\nDBnidQGunwAAAGhABg7FAgAAIJgZGLFjQA4AACCYMWIHAACgCIIdAACAIgh2AAAAijBwjl2Q\n2LdvX25u7qZNm2w226pVq1xnDRgwwPmzxWJp1qzZRRdd1K9fvxtvvNFisdR7pwAAAPWq8QW7\n559/vkePHs8888yDDz7oOdcZ9RwOR0lJSV5e3uLFiw8ePHjffffVb5sAAAD1rfEFu/nz5+tZ\nTBux69y5c1JS0pgxYwh2AABAeeqfY2exWEJC1H+bAAAABkbstNPUGsvd7BwOR2lpaX5+/qJF\ni7p169bQ7QAAAJjOQLBLTEw8efJkSUlJ06ZNzWuojlyvn9AkJyffe++9rlOKi4v79u3r/Gfz\n5s3Hjh173muubG1agyIiH330EYUo1GCFTK5FIQpRKMC1KEQh1x1P5KabbrJarTUtbCDY/elP\nf/rHP/6Rm5t76623+t+dyVyvky0pKdmzZ8/ChQs/+OADt+fbNmvWzPlzTEyM8zG49aPeylGI\nQhSiEIUaY6H6rEUhxQpZ9B9atdlsw4YN27hx41NPPXXTTTe1bNmyYc9dGzBggOftTtymiMju\n3bufffbZBQsW6F9zn4M/BKC/mn2achWFKNRQhcyuRSEKUSiwtShEIdcdr1YGRuyio6O1H0aO\nHOl1geA8/S4lJeX06dMN3QUAAIDp1L9c9ODBg3FxcQ3dBQAAgOkMjNgF54CcD85z7LKzsxu6\nFwAAANM1vhsUu1736vzZeWqd69yYmJikpKScnJyePXvWZ4cAAAANovEFO8/LI/TMAgAAUJ6x\nc+yKi4snTpzYtm3b8PBw7X7FItK9e3eLxbJjxw4T2gMAAIBeBoJdUVFRt27d5syZk5eXZ7fb\nndPvvvtuEVm8eHHAmwMAAIB+BoLd7Nmzd+7cmZGRkZ+f7zq9d+/eIrJmzZrAdgYAAABDDAS7\n999/X0TmzZuXmprqOj05OVlE8vLyAtsZAAAADDEQ7A4fPiwinTp1EhHnCXYiUllZKSJVVVWB\n7g0AAAAGGAh22pMnbDab23RtrK5Vq1YBbAsAAABGGQh2Xbp0EZGNGzfK+SN2L7/8soj06tUr\nwK0BAADACAPBbsyYMSIybty4zZs3a8EuPz9//PjxCxYssFqtY8eONatHAAAA6GDgBsXZ2dmT\nJk168sknnQ9ySE9PFxGLxTJ37tzOnTub0iAAAAD0MXaD4ieeeCI3N3fgwIEtWrQIDQ1NSEjI\nzs7euHHj6NGjTeoPAAAAOhl+pFhmZmZmZqYZrQAAAKAujI3YAQAAIGgZC3YOh2Pp0qWZmZkJ\nCQlhYWEJCQmZmZnLli0zqTkAAADoZ+BQbGVl5eDBg1euXOmccvr06fXr169fv3758uUrVqwI\nDw83oUMAAADoYmDE7qmnnlq5cmVkZOTMmTPz8vJsNlteXt6MGTMiIiJWrlw5Z84c87oEAABA\nrQwEuzfeeENEnn766SlTpqSnp0dFRaWnp0+dOlWLdG+++aZJLQIAAEAPA8HuyJEjIjJ48GC3\n6bfffruI/PLLLwFsCwAAAEYZCHY1PQ1WewpFUlJSYDoCAACAXwwEu6FDh4rIihUr3Ka//fbb\nInLXXXcFsC0AAAAYZeCq2ClTpuzfv3/ChAlFRUU5OTmtWrU6evTokiVLHn/88aFDhz766KPm\ndQkAAIBaGQh2zruZTJkyZcqUKa6zFi1atGjRItcpDoej7s0BAABAP548AQAAoAgDI3YMwgEA\nAAQzRuwAAAAUQbADAABQBMEOAABAEQQ7AAAARRDsAAAAFEGwAwAAUATBDgAAQBEEOwAAAEUY\nCHbr16+3WCz9+/fX/vnpp5927do1JiYmISFh5syZ5rQHAAAAvQw8eeIf//iHiIwaNUpEDh06\ndPPNN589e1ZEysrKpk2b1r59+9tuu82kLgEAAFArAyN2W7ZsEZHu3buLyGuvvXb27Nm+ffsW\nFhY+8sgj8lvsAwAAQEMxEOxOnTolIk2bNhWRTz75REQefPDB2NjYMWPGiMiuXbvM6RAAAAC6\nGAh2cXFxInL06NGqqqpvv/1WRHr16iUiiYmJIlJQUGBOhwAAANDFQLC77LLLRGTevHlr1649\ne/bsVVddlZCQICLHjx8XkaSkJJNaBAAAgB4Ggt19990nInPnzr3llltE5J577tGmb9y4UURu\nuOGGwHcHAAAA3QxcFTtkyJDdu3e/9NJLDocjJydHuzxWRF555RURGTFihCkNAgAAQB8DwU5E\nZs6c6XnLus8++yxw/QAAAMBPPHkCAABAEcaCXXFx8cSJE9u2bRseHm6xWLSJ3bt3t1gsO3bs\nMKE9AAAA6GUg2BUVFXXr1m3OnDl5eXl2u905/e677xaRxYsXB7w5AAAA6Gcg2M2ePXvnzp0Z\nGRn5+fmu03v37i0ia9asCWxnAAAAMMRAsHv//fdFZN68eampqa7Tk5OTRSQvLy+wnQEAAMAQ\nA8Hu8OHDItKpUycRcZ5gJyKVlZUiUlVVFejeAAAAYICBYBcdHS0iNpvNbbo2VteqVasAtgUA\nAACjDAS7Ll26yG/PmXAdsXv55Zflt+fGAgAAoKEYCHZjxowRkXHjxm3evFkLdvn5+ePHj1+w\nYIHVah07dqxZPQIAAEAHA0+eyM7OnjRp0pNPPtmzZ09tSnp6uohYLJa5c+d27tzZlAYBAACg\nj7EbFD/xxBO5ubkDBw5s0aJFaGhoQkJCdnb2xo0bR48ebVJ/AAAA0MnYs2JFJDMzMzMz04xW\nAAAAUBc8KxYAAEARBoJdbm6uxWLJyspym56VlWWxWNatWxfQxgAAAGCMgWD34osvym/XxrrS\npsyfPz+AbQEAAMAoA8Fuy5YtInL99de7TdemfPHFFwFsCwAAAEYZCHYlJSUiEhrqfr2FNqWo\nqCiAbQEAAMAoA8EuMTFRRPbu3es2fc+ePSISHx8fwLYAAABglIFgp92XeO7cuW7TX3jhBRHp\n0aNHANsCAACAUQaC3dixYy0Wy6JFi0aOHPnTTz/ZbLaffvpp5MiRixYtslgsf/nLX8zrEgAA\nALUyEOy6dev29NNPWyyWhQsXdujQITo6ukOHDgsXLrRYLM8884znRRUAAACoT8ZuUPzwww9/\n8sknAwcOTExMDA0NbdGixcCBAzdu3PjXv/7VpP4AAACgk+FHivXu3bt3794mdAIAAIA64ZFi\nAAAAiiDYAQAAKKKWQ7EWi0VEHA6H82cftMUAAADQIBixAwAAUEQtI3aug3AMyAEAAAQzRuwA\nAAAUYSDYde7cef78+YWFheZ1AwAAAL8ZCHbffffdqFGjWrVqlZOTs379eo7MAgAABBUDwW7F\nihVZWVmVlZXLli3LzMxMS0ubMWPGoUOHzGsOAAAA+hkIdrfddtuaNWsOHDgwc+bMtLS0AwcO\nTJ8+PTU19cYbb1y+fHlFRYV5XQIAAKBWhi+eaN269ZQpU/Ly8jZs2DBkyJCIiIh169bdcccd\nrVq1MqM/AAAA6OTnVbEWi6Vv376LFy/etWtXRkaGiBQUFAS0MQAAABjjZ7BzOByffvrp0KFD\n27dv/80334hI8+bNA9oYAAAAjKnlBsWefvnllzfeeOP111/Pz88XkZCQkH79+o0YMWLQoEEm\ntAcAAAC9DAS7d95557XXXsvNza2urhaRlJSUu++++5577klJSTGtPQAAAOhlINgNHjxYRCIi\nIgYNGjR8+PB+/fpZLBbTGgMAAIAxBoJdp06dRowYMWTIEE6nAwAACEIGgt13331nXh8AAACo\nI2NXxRYXF0+cOLFt27bh4eHO47Ddu3e3WCw7duwwoT0AAADoZSDYFRUVdevWbc6cOXl5eXa7\n3Tn97rvvFpHFixcHvDkAAADoZyDYzZ49e+fOnRkZGdqNTpx69+4tImvWrAlsZwAAADDEQLB7\n//33RWTevHmpqamu05OTk0UkLy8vsJ0BAADAEAMXTxw+fFhEOnXqJCIWi8XhcGjTKysrRaSq\nqsqE9upDdXV1PT8P7dSpUxSiEIUoRCEKBUMtCjW6QvHx8T7uN2cg2EVHR585c8Zms0VFRblO\n18bqWrVqZbDPYHHu3Dn34caWUTUsGxj/V45CFKr/QibXohCFKBTgWhSi0PkpJS4uLjDBrkuX\nLuvXr9+4ceOtt97qOmL38ssvi0ivXr386rbhhYWFXXfddedNOviDqRX/rxyFKFT/hUyuRSEK\nUSjAtShEIbeU4pOBc+zGjBkjIuPGjdu8ebMWFfPz88ePH79gwQKr1Tp27FijjQIAACCADIzY\nZWdnT5o06cknn+zZs6c2JT09XUQsFsvcuXM7d+5sSoMAAADQx9gNip944onc3NyBAwe2aNEi\nNDQ0ISEhOzt748aNo0ePNqk/AAAA6GRgxE6TmZmZmZlpRisAAACoC2MjdgAAAAhaBDsAAABF\n1HIo1seNUjw5b4ACAACA+seIHQAAgCJqCXYOF3a7fejQoREREdOnT8/Ly7PZbHl5eVOnTg0P\nDx86dKjdbq+fjgEAAOCVgatiZ8+evWjRonnz5ml3KhaR9PT0GTNmxMbGPvTQQ+3atZs8ebI5\nTQIAAKB2Bg7FvvnmmyJy++23u02/8847ReT1118PYFsAAAAwykCwO3r0qNfp2gUWR44cCUxH\nAAAA8IuBYJeUlCQiK1ascJv+9ttvO+cCAACgoRgIdnfffbeITJgwYfbs2fn5+eXl5fn5+bNm\nzXrkkUeccwEAANBQDFw8MXHixK1bt65atWrKlClTpkxxnTVw4EAt3gEAAKChGBixCw8P//DD\nD5csWdKvX7+4uDir1RoXF9evX78lS5Z88MEH4eHh5nUJAACAWhkYsRMRi8WSk5OTk5NjUjcA\nAADwG0+eAAAAUATBDgAAQBEEOwAAAEUQ7AAAABRBsAMAAFAEwQ4AAEARBDsAAABFGAt2xcXF\nEydObNu2bXh4uMVi0SZ2797dYrHs2LHDhPYAAACgl4FgV1RU1K1btzlz5uTl5dntdud07Smx\nixcvDnhzAAAA0M9AsJs9e/bOnTszMjLy8/Ndp/fu3VtE1qxZE9jOAAAAYIiBYPf++++LyLx5\n81JTU12nJycni0heXl5gOwMAAIAhBoLd4cOHRaRTp04i4jzBTkQqKytFpKqqKtC9AQAAwAAD\nwS46OlpEbDab23RtrK5Vq1YBbAsAAABGGQh2Xbp0EZGNGzfK+SN2L7/8soj06tUrwK0BAADA\nCAPBbsyYMSIybty4zZs3a8EuPz9//PjxCxYssFqtY8eONatHAAAA6BCqf9Hs7OxJkyY9+eST\nPXv21Kakp6eLiMVimTt3bufOnU1pEAAAAPoYu0HxE088kZubO3DgwBYtWoSGhiYkJGRnZ2/c\nuHH06NEm9QcAAACdDIzYaTIzMzMzM81oBQAAAHXBs2IBAAAUQbADAABQhIFDsa63OPHK4XDU\nrRkAAAD4jxE7AAAARRgIdg4Pp0+fXrJkSUJCwvDhw3mkGAAAQMMyfFWsq7i4uJycnLCwsMGD\nB6elpT322GOBagsAAABGBeBQrHb3kwULFtR9VQAAAPBbAIJdYWGhiBw7dqzuqwIAAIDf6hTs\n7Hb7jh077r33XhFp27ZtgFoCAACAPwJzuxOLxTJ16tRA9AMAAAA/1WnEzmKxxMXFZWVlrV69\nevDgwYHqCQAAAH4wMGLH/YcBAACCGTcoBgAAUATBDgAAQBEEOwAAAEUE5qpYT5yQBwAAUM8Y\nsQMAAFCEgWBnt9uHDh0aERExffr0vLw8m82Wl5c3derU8PDwoUOH2u12hwvzOgYAAIBXBg7F\nzp49e9GiRfPmzRszZow2JT09fcaMGbGxsQ899FC7du0mT55sTpMAAAConYERuzfffFNEbr/9\ndrfpd955p4i8/vrrAWwLAAAARhkIdkePHvU6Xbuo4siRI4HpCAAAAH4xEOySkpJEZMWKFW7T\n3377bedcAAAANBQDwe7uu+8WkQkTJsyePTs/P7+8vDw/P3/WrFmPPPKIcy4AAAAaioGLJyZO\nnLh169ZVq1ZNmTJlypQprrMGDhyoxTsAAAA0FAMjduHh4R9++OGSJUv69esXFxdntVrj4uL6\n9eu3ZMmSDz74IDw83LwuAQAAUCsDI3YiYrFYcnJycnJyTOoGAAAAfuPJEwAAAIog2AEAACii\nlkOx2j3qtEeEaT/7wJPEAAAAGhAjdgAAAIqoZcTOdRCOATkAAIBgxogdAACAIgh2AAAAiiDY\nAQAAKMJYsFu9enX//v0TEhKsVqvFg0ktAgAAQA8DT55YtmwZz5wAAAAIWgZG7GbNmiUiffv2\n3b59e0VFhcODaU0CAACgdgZG7Pbt2yciCxcuTE1NNa0fAAAA+MnAiF3Ljr8O1AAAIABJREFU\nli1FJC4uzrRmAAAA4D8DwW7EiBEism7dOtOaAQAAgP8MHIp99NFHDxw48MADD9jt9qysLIbu\nAAAAgoqBYBca+r8L13RtLNdPAAAANCBuUAwAAKAIAyN2DMgBAAAEM0bsAAAAFEGwAwAAUATB\nDgAAQBEGzrGzWCy+F+AkPAAAgAbEiB0AAIAiDAQ7h4fTp08vWbIkISFh+PDhVVVV5nUJAACA\nWhk4FOspLi4uJycnLCxs8ODBaWlpjz32WK0vGTBggNuUVatWOX8+efLkwoULf/jhB4fD0alT\np5EjRyYkJOiZO2DAgB49ekyYMMGz4pw5c7744gvXKgAAAEoKwKHYzMxMEVmwYIHO5Vedzzm9\nvLz8scceS09PX7hw4auvvpqenj558uSKigo9c0Vk7969J06ccKt14sSJkydP1untAQAANBIB\nCHaFhYUicuzYsTquZ+3atZdddtngwYNjYmJiYmIGDx7crl273NxcPXNF5Kabblq5cqXbOleu\nXPn73/++jo0BAAA0CnUKdna7fceOHffee6+ItG3bto6tfP3113369HGd0qdPn6+++krPXBG5\n8cYbP//887KyMueUsrKyr7/+umfPnnVsDAAAoFEIzO1OLBbL1KlTda5n2LBhJSUlzZo169ix\n4+23337xxRdr0w8dOpSamuq6ZJs2bQ4fPqxnrojExMR069Zt7dq1f/zjH7Upa9as6dWrV1hY\nmM7GAAAAGrU6XTxhsViaN2+ekZExbty4rKwsPS/p2rXroEGD2rZtW1xcvGXLlkmTJs2YMSMt\nLU1ESktLmzZt6rpws2bNSkpKtJ99z9VkZ2dPnTp14MCBVqv13Llzq1evfuqppzx7qKysXLZs\nmfOfERERGRkZ5y1Rp61Su3379lGIQg1WyORaFKIQhQJci0IUct3xRNLS0nyMtRnoJSD3H548\nebL2Q0JCwoABA8LCwt56663p06fXfc0icvHFFycnJ3/22Wd9+vTZtGlT27ZtXS+qdSovL3/x\nxRed/2zevHlMTMx5S1zZOiD91GTXrl0UolCDFTK5FoUoRKEA16IQhVx3PJE2bdpYrdaaFjY5\nZNamW7dur7/+uvZzTExMSUlJbGysc25xcbFzlM73XKcBAwa8+eabffr0Wbly5ciRI70WjYyM\nHD16tPOfERER7du3P3+RUr/fkR4u5ShEofovZG4tClGIQoGuRSEKnZdSQkJ8XSDRwMHOVXJy\n8v79+6+++mrnlAMHDrRu3VrPXKerr7761VdffeONN6qrqzt06OC1UHh4+F133eWrlYM/+PcW\ndEpPT6cQhRqskMm1KEQhCgW4FoUo5Lrj1aaBHyn2+eefO3NoRkbGp59+6jr3008/vfbaa/XM\ndbJYLLfccsv7779/yy23mNY1AABAMKrXYDd58uQvvviisLDw3Llzx48ff+edd5YvXz5s2DBt\nblZW1q5du1asWFFaWlpaWrpixYqff/5Zu/txrXNd3XTTTatWrdJ5MQcAAIAy6vVQ7ODBgz/+\n+OOXXnrJZrPFxsZ27Nhxzpw5SUlJ2tyoqKjHH3984cKFI0aMEJGrrrpq9uzZkZGReuYCAACg\nXoNdx44dO3bs6GOBFi1aPProo37M9f0oWB4UCwAA/hs08Dl2AAAACBSCHQAAgCIIdgAAAIog\n2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAA\nKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAH\nAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAI\ngh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAA\ngCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIIdAACAIgh2\nAAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEAACiCYAcAAKAIgh0AAIAiCHYAAACK\nINgBAAAogmAHAACgCIIdAACAIgh2AAAAiiDYAQAAKIJgBwAAoAiCHQAAgCIIdgAAAIog2AEA\nACiCYAcAAKAIgh0AAIAiCHYAAACKINgBAAAogmAHAACgCIId/n979x4XVZ0/fvwMoIAiiJfM\nC95A1CxNUFS+WmmmuY+Hm66rK95RcalHW2tuPlwjS4XU1OxqPbxs64haaqJ4IUnA22Imuepm\nuggDgqIgclUYbnN+f8zjNzsOpDAz54x8eD3/mzOnec1p8MObuZwBAACCYLADAAAQBIMdAACA\nIBjsAAAABMFgBwAAIAgGOwAAAEEw2AEAAAiCwQ4AAEAQDHYAAACCYLADAAAQBIMdAACAIBjs\nAAAABMFgBwAAIAgGOwAAAEEw2AEAAAiCwQ4AAEAQDHYAAACCcHH0HXC8qqqqH3/88YFNXT0V\nLZ46dYoQIYeFFG4RIkTIzi1ChMx/8CTp//7v/5ycfvOJOQY7ycXFpX///g9sKspUtPi/HCFC\n6ocUbhEiRMjOLUKEHpxSNBrNQ3ZmsJM0Go2Xl9cDm4qULf4vR4iQ+iGFW4QIEbJzixAhiynl\noXiPHQAAgCAY7AAAAATBYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASD\nHQAAgCAY7AAAAATBYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAA\ngCAY7AAAAATBYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY\n7AAAAATBYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAA\nAATBYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATB\nYAcAACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATBYAcA\nACAIBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATBYAcAACAI\nBjsAAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATBYAcAACAIBjsA\nAABBMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATBYAcAACAIBjsAAABB\nMNgBAAAIgsEOAABAEAx2AAAAgmCwAwAAEASDHQAAgCAY7AAAAATBYAcAACAIBjsAAABBMNgB\nAAAIwsXRd8D+7ty5s2XLlosXL8qy/Oyzz4aFhbVr187RdwoAAEBxoj1jp9fr33nnHV9f3y1b\ntmzdutXX1zciIqKiosLR9wsAAEBxog12R48e7dOnz5QpUzw8PDw8PKZMmeLv7x8fH+/o+wUA\nAKA40Qa7n376aeTIkeZbRo4cefbsWUfdHwAAANWINthlZWX16NHDfEv37t2zs7MddX8AAABU\nI9qHJ+7du9eqVSvzLZ6enqWlpeZbSkpKRo0aZbro7e395ptvPnArz/goeR+lQ4cOESLksJDC\nLUKECNm5RYiQ+Q+eJI0bN87Z2fm3dtbIsqzovVHZxIkT9+7da37ANTU1kydP3rdvn2lLSUnJ\nhAkTTBe9vLzCw8OtLlZVVWk0GhcXxUfkqqoqSZKaNWsmTKi6ulqWZdVCLi4uGo1GhZBqR+Ts\n7OzkpOyT7qr9r6upqTEYDCockcFgqKmpUSFkPCInJ6eHrL+NK2T8XydSSJbl6upqFRZw4xGp\n9puCkNUhqZH8kh09evRD/nWI9oydh4dHaWlp69atTVtKSkpqP4eXmJhol5zBYDhy5Ejz5s1f\neuklu9zgQxw5ckSj0YwdO1bpUHx8fGVl5ZgxY5T+XZ6YmFhWVjZq1Cil/yGdPHmypKTkueee\na9GihaKh5OTkgoKC4OBgix85u/vpp5/y8vKGDBnSpk0bRUPnz5/PyckJDAxs3769oqFLly5l\nZWUNGDCgU6dOioauXLmSnp7er1+/rl27KhpKTU1NTU3t06dPz549FQ3pdLpff/3Vz8/P399f\n0VBWVtalS5e6d+/+1FNPKRrKyck5f/58ly5d+vfvr2jozp07Z8+e7dixY0BAgKKhgoKC5OTk\n9u3bBwUFKRoqLS09ceKEt7d3cHCwoqHy8vKEhIRWrVo999xzioaqqqqOHj3q7u5u/jqbEmRZ\nPnz4cPPmzceMGaNoSJKkuLg4WZaV+20u2nvsunbtmpGRYb4lMzPTx0fZ50gBAAAeB6INdoMH\nD05KSjLfkpSUNGTIEEfdHwAAANWINtiNHTv2ypUru3fvvnfv3r1793bv3n316lUVXicFAABw\nONHeY+fu7h4VFbVly5Z58+ZJkjRgwIDIyEg3NzdH3y8AAADFiTbYSZL0xBNPLF261NH3AgAA\nQG2ivRQLAADQZDHYAQAACILBDgAAQBAMdgAAAIJgsAMAABAEgx0AAIAgGOwAAAAEwWAHAAAg\nCAY7AAAAQTDYAQAACILBDgAAQBAMdgAAAIJgsAMAABAEgx0AAIAgGOwAAAAEwWAHAAAgCAY7\nAAAAQTDYAQAACILBDgAAQBAMdgAAAIJgsAMAABAEgx0AAIAgGOwAAAAEwWAHAAAgCAY7m8iy\nrNPprl+/rkIrMzMzMzNTnZBOpzMYDEqHsrKydDpddXW10qHs7GydTldZWal06MaNGzqdTq/X\nKx26efOmTqcrKytTOpSTk6PT6UpKSpQO3b59W81QYWGh0qE7d+7odLqCggKlQwUFBTqd7s6d\nO0qHioqKdDpdbm6u0qGSkhKdTnf79m11Qjk5OUqHysrKdDrdzZs3lQ7p9XqdTnfjxg2lQxUV\nFTqdLjs7W+lQdXW1TqfLyspSOmQwGHQ6nWq/ZBUNMdjZpKamRqvV7t69W4VWdHR0dHS0CqHd\nu3drtVoVQjExMVqttqqqSunQ4cOHtVqtCmPQDz/8oNVqi4uLlQ6dOHFCq9XevXtX6VBycrJW\nq1Xhd3lKSopWq1Xh98SlS5e0Wm1GRobSocuXL2u12tTUVKVDqampWq328uXLSocyMjK0Wu3F\nixeVDmVnZ2u12pSUFKVDubm5Wq02OTlZ6dDdu3e1Wu2JEyeUDhUXF2u12h9++EHpUHl5uVar\nPXz4sNKhqqoqrVYbExOjdEiSJGF+mzPYAQAACILBDgAAQBAMdgAAAIJwfv/99x19Hxq3qqqq\ngQMHBgQEKB2qqKgYMGDA4MGDlQ5VVlb269cvKChIo9EoGqqqqurTp09QUJCLi4uiocrKSn9/\n/6CgIFdXV0VDVVVVvr6+QUFBLVq0UDrUvXv3wYMHt2rVStFQdXW1j49PUFCQl5eXoqGqqqpO\nnToNGjSobdu2ioZqamo6dOgwePDg9u3bKx1q167doEGDnnzySaVD3t7egwYN6ty5s6Ihg8Hg\n6ekZGBjYtWtXpUMeHh4BAQE9evRQNCTLspubW2BgoJ+fn9Kh5s2bBwQE9O7dW+mQs7PzwIED\nn3rqKUVDRgMHDnzmmWcUTciyXFNTM3DgwAEDBigakiSpsrJSnd/mlZWV/fv3V+63uUaWZYVu\nGgAAAGripVgAAABBMNgBAAAIgsEOAABAEAx2cJiamhrBQqqJiYlR4cy3AOyCtc5qrHVWYLDD\n/5SUlMTHx8fExKjwTQN79+6NiIhQ4du39u7d+8UXXyhdkSSpqKjo9OnT6hzRt99+q8IZ0nNz\nc/fu3btjxw4VvgpJhS98kyRJluXS0lI+MQZJxeWOtc5qrHXW4XQnVjpy5IiXl1fLli2VDl29\nenXHjh3x8fFFRUV+fn5OTkrN4omJiVFRUc2aNSsrK9uyZcvAgQO9vb0VakmStHbt2j59+hw8\neHD48OHKne5k7969iYmJCxcudHd3Vyhh9P33369Zs8bDw6Njx46KnhnEeESrVq3asWPHCy+8\noNx5VeLi4tauXdumTZuqqqqtW7cGBga2bt1aidDx48dXrVp16tSpEydOZGdn9+rVq3nz5kqE\nEhMTly9fHhsbu2/fvsLCwl69eil0+hvxFgfxjkjN5Y61zjqsddaT0XCnT5+eNm3avHnzcnNz\nFQ3FxsbOnTs3ISHhwoULkZGRERER1dXVSoQOHjy4YMGC7Oxs48W4uLgPPvhAiZDJkiVLcnJy\nNm7cuGTJkvLyciUSe/bsefXVVwsKCpS4cXNXrlwJCwtT+odBfvCIvvrqq2+++UahUFxc3IIF\nC27evGm8eOTIkTVr1igROnr0aFhYWGZmpvHi6dOnw8PDr127ZvdQUlLSggULjKGCgoJNmzbN\nnTs3NTXV7iHxFgfxjkjl5Y61zgqsdbZgsLPGW2+9dfLkyf379yu62F29enXKlCmm2zcYDAsX\nLkxISLB76Pr16zNmzDA/kAsXLixbtszuIXNffPHF2bNnDQaDQutd7ZXu1q1bx48f/+mnn/R6\nvX1bGzZs+PHHH00Xr1y5Ehsbe/z48bKyMjtWLI5Ip9PNmzfPYDDYMWGUn58/bdq0GzdumLac\nP39++fLldg/p9fqpU6emp6ebb4yNjZ08efLly5ft25o/f77FGnru3LkZM2b88ssv9g0JtjjI\nwh2R+ssda11DsdbZiPfYNVhaWpperx8+fPgrr7wyfvz4pUuX5uXlKRH69ttvhw4d+sQTTxgv\najSa559/Pi0tze6hXbt2TZ8+3RSSJOno0aPXrl2bOHHi3/72t/T0dLsXJUnq2rVrVlaWRqMJ\nDw/v2rXr8uXL9Xp9amrq5s2bbb9xWZavX7/evn17Dw8PSZIqKys//fTTiIiIixcvHjly5NVX\nX71y5YrtFZM7d+4Yz/Ou1+tXrVr10UcfZWdnJyUlhYeH2yt08OBB44tHpheMevTo4eXl9e9/\n/9sut2/uzJkzAQEB5l9jcOzYsbS0tJCQkKVLl2ZkZNgrlJGR4e3t3bNnT/ONw4cP1+v1a9eu\nzc/Pt1eopqYmPz/f4tsFBg0atHjx4g8//NCO76oRb3EQ74jUX+5Y6xqEtc52DHYN1rNnz8WL\nFxu/bku5xc5gMKSnp1v8KvLx8bH7WzRkWc7NzX3ppZdMW2JjY8+fPx8SErJu3boXXnjh/fff\nv379un2jkiT5+PhkZ2dLkmRa7955553IyMjAwEDbb1yj0SxcuNDT0zMqKqq8vHz58uUGg+Gr\nr75644033nvvvTfffHPVqlV2fMjatm2bk5MjSdKGDRuaN2/+xRdfvPbaa++///5f/vKXyMjI\n27dv254YMGCA+UpnNGbMmPj4eNtv3ILBYDB/e+++ffsuXLgQEhISFRU1bNiwZcuW6XQ6u4Ra\ntmxZXFwsP/hRhtLSUi8vr+nTp9vl156Rs7Nz+/bta/8YP/PMM9OnT9+wYYNsp49TCLY4SMId\nkUOWO9a6BmGtsx0fnmgwjUZj/s7KPn36yLL85ZdfDh061PTmYlmWbfyiVY1GExAQ4OLi0rFj\nR9PGW7du3b59e+DAgbbccu3QyJEjmzVrZrz4/fff79+/f82aNYGBgW3atPH392/ZsuWxY8eG\nDx9ux6gkSa6urrGxsS+//LLxPnh6eu7Zs6djx44hISF2Wc01Gs3QoUPPnz+/detWSZLeffdd\n0zE++eSTZWVl//nPf+yysBp9//33Tz755IEDB1auXGl6P2ynTp30en1KSsqQIUNsvH0vL6/a\n74nu0qXL5s2bR48e7ebmZuPtm+vQoUN0dHRpaem9e/d27NiRlJS0bt26gIAAb2/v3r17u7u7\n79+//8UXX7Q95OXllZycfP/+/b59+5o2bty48emnn540aVJMTExQUJC93gleUVFx4sSJESNG\nWGz39fWNj49v165dp06dbK8ItjhIwh2RQ5Y71roGYa2zHc/Y1Yv80LMkWPwhW1xc/Pbbb1v3\nR5J5qFu3bhbfRlxRUWH+MbHi4uKSkhIrKhYh8w/mdOzYMSoqynx57devn/FPNNtD5ry9vU1/\nwaSmpkZFRUVERPTu3dv4OoVdQk5OTgsXLuzfv//LL79sWumM+vTpY8eDGjp06N27d7du3dq3\nb1+LTzkNGDDAlhd3Hv6D5+bmFhwcnJCQYPXt1xlq3br1+vXry8rKzpw5k5GRMXXqVPOh59ln\nn7127ZpdQpIkvfXWWwcOHPjHP/6RlZWVmpq6cuXK4uLiGTNmGEN2fCXu97//fU5OzuHDh2tf\nNXz48AsXLtgrZMGOi4M51RaH2lju6hkysftaVzvEWmddSMi1TpIkpT56LZLExMRt27ZVV1dL\nkjRy5Mg//elPrVq1stjnlVdekSRp6dKlS5Ys+eSTT4KDg83fw2GvkMFgMK10xcXFERERv/vd\n78aNG2fH0IABAyx2vnr1ardu3RqaeGRIkqT27dvn5eUVFxdHRkb+9a9/DQgICAgI+Oqrr06f\nPj169Gi7hIzrXe3VMysry3w1t7319ttvv/322+Xl5RY737x50+rTKNTnB2/MmDHr16+fOHGi\nLU+Z1A61a9cuPDxckqT58+dbvC8kLS2tS5cu9gp17tx5/fr10dHRy5Ytc3d3f/755ydNmmT8\nzaTX660+qCNHjgwaNMj832Dz5s3feeedJUuWuLu7jxo1ynxn40cv7RWqzS6LwyNDKiwOJix3\nDQ3Zca37rRBrnXWhxr7W1c2+n8UQT4POkrBr167x48fv3LlToVBycvLXX38ty3JRUdHrr7+u\nXMikoKBg7ty5Fp/lsVfo888/j46Onjlz5s8//2zF7dc/ZKGgoCA0NPT69ev2bWVlZYWGhsbG\nxpqHZs+efe7cOfuGLLzxxhuXLl2yIlGf0OrVq7du3Wra2fi/7syZM3YPWcjPzw8NDTX+vdtQ\nDzk9h/Ex0mq1pvNoFBYWzp0798qVK/YN1WbL4lCfkPqLA8td/UP2WuseGbLAWlf/UGNc634L\ng90j1P8sCbasPvUM/fjjj5s2bVIhZJSZmfnnP/95//79CoUyMzNDQ0NtX+kadCaLnJycV199\n1XxJsmOrsLAwKipqw4YNycnJsbGxs2bNiomJUSJk7tChQ+vWrbOu8shQXl7erFmztm3blpqa\nmpCQMGfOnD179igRMqmurk5JSQkLCzt06JB1oYefnqOwsHDlypVhYWHbtm3bvn37nDlzrH6M\n6n8eEBv/zdYnpPLiwHLXoJC91rpHhsyx1jUo1BjXut/CYPcw1dXVEyZMqL390qVLs2bNMj/5\nTWlpqS2rTz1D586di4qKUiF048aNbdu2zZw5MykpSdFQZWWldbff0JAsyxkZGRs3blThoNLT\n07/77ru9e/dmZWUpGjK6f//+d999p1woNzd39erVs2bNWrJkiXV/kdczZLR58+bIyMiUlBTr\nQteuXXvttdeMp7x6yCR07dq1b775ZufOnWlpaYqGZJsXh3qGVFscZJY7q0K2r3X1DMmsddaG\nGtda9xAMdo9gfqpoc0ePHl20aJHplIk1NTXJyclKh3Jzc6dPn271Mlf/UGZmZlxc3P3795UO\n2UU9Q0IeFCELNTU15hXlTqtb/5CNi0M9Q6otDjLLnbUhu2iaR0SoQTjdySPU8ywJGo3Gx8dH\n6VDLli1ffPHFQYMGKR1q3bq1n5+fxaerlAjZcvsNDQl5UIQsqHN6jgaFbFwc6hny8PBQZ3GQ\nWO6sDdly+w0KiXdEhBqEwe4R/Pz8jM/9+vv7W1xVVlaWkZFh8RF9pUO2n8XncTuiRhRSs0XI\nXiwmIePnK5999lm7f6W9w0Nt27a18ZYftx8GljtChKzAeewewXiWhD179iQmJlpcZctZEgg1\nxpCaLUJ2ZDr1WlpaWkRERGBgoBWn52gKIfF+GAgREjj0mxR5gVc49j1LAqFGHVKzRciObDk9\nR5MKiffDQIiQwKHaNLIKw6MQioqKPv/886ysrOHDhzs5OSUkJLzyyisTJkwg1ARDarYI2YXx\n9crg4OCQkBBCjyTeDwMhQgKHLDDYSZIk5ebmnjp1qqKi4oUXXujcubPFtVu2bOnQocP48eMl\nSUpLS/v5558NBkNQUJCvry+hphyysUVIoVDt1r179/7+979bNwM16KAaRUiSpMrKSovvg6oz\nZOM/JUKECNkl1FAMdlJcXFx0dHRwcLCzs/OpU6eioqK6d+9uunbLli1Xr15dsWJFixYtCBEi\n9JiH6mwZDIazZ88OGzbMvq3GGDp+/PiuXbs8PDxcXV39/f0nT55s/tkOOz5MhAgRsj1kJaVf\n633MxcXFLViw4ObNm8aLR44cWbNmjena6OjoRYsW2Xg2IEKECKkTUrPVGENHjx41P8PW6dOn\nw8PDTafIJ0SI0GMVslqTHuzy8/OnTZtmfibo8+fPL1++3HQxKyvLLg8PIUKEVAip2Wp0Ib1e\nP3XqVIsvQo2NjZ08efLly5cJESL0WIVs0aRPd3LmzJmAgADzt7McO3YsLS0tJCRk6dKlGRkZ\nPj4+dnkqlRAhQiqEJEkS76DsFcrIyPD29u7Zs6f5xuHDh+v1+rVr1+bn5xMiROjxCdmiSQ92\nBoOhsrLSdHHfvn0XLlwICQmJiooaNmzYsmXLdDodIUKEmlpIzZZqIeOpjOUH31RdWlrq5eU1\nffr0zZs326VCiBAhh2vS3zzRoUOH6Ojo0tLSe/fu7dixIykpad26dQEBAd7e3r1793Z3d9+/\nf/+LL75IiBChJhVSs6VayMvLKzk5+f79+3379jVt3Lhx49NPPz1p0qSYmJigoCB3d3dChAg9\nDiFbNOnBzs3NbcSIERcvXtTpdOnp6X/4wx8GDx5sutbDw2PHjh1TpkwhRIhQkwqp2VLzoJ5+\n+umNGzcWFha2bds2Nzd348aNpaWlb775prOzc25urrOzc53njiHPVR4OAAAJp0lEQVREiJBD\nQlZzcWze4dq1axceHi5J0vz58y1eNU9LS+vSpQshQoSaYEjNlmqhzp07r1+/Pjo6etmyZe7u\n7s8///ykSZOMXxWv1+s1Gg0hQoQen5D1HPaxDUc4fPhwbm5unVetXr1669atposFBQWhoaFn\nzpwhRIhQUw7Zt6Va6JEtc/n5+aGhoaWlpYQIEXJUyI6a0GB3+vTpadOmzZs3r84HKS8vb9as\nWdu2bUtNTU1ISJgzZ86ePXsIESLUxEN2bKkWqk/LqLq6OiUlJSws7NChQ4QIEXJUyL6a0DdP\nLFq0aMKECQUFBQcPHvzggw+eeOIJix3y8vK+/vrrX3/9tVOnTpMmTRo0aBAhQoQI2aulWqie\nLUmStmzZkpub+/LLLwcGBhIiRMhRITtz9GSpkmvXrr322msGg0GW5f379z9yACdEiBChxhhS\ns0WIEKHHUFMZ7GpqakxfACIr+SARIkSIkANDarYIESL0GGoqpzvRaDStW7c2XezTp48sy19+\n+eXQoUNN390ry7Ltn2chRIgQIQeG1GwRIkTosfgYrAWlJsbHgMFgKCkpMT6PWifzAbyoqGjR\nokXWDeOECBEi9DiH1GwRIkTIsYR9xi4xMXH58uWxsbH79u0rLCzs1auXq6urxT6mAfypp55a\ntWrVkCFDhg4dSogQIUKChYQ8KEKEGmlIcaqOkWpJSkpasGCB8dXxgoKCTZs2zZ07NzU1tc6d\nd+3aNX78+J07dxIiRIiQwCE1W4QIEXIUMQe7+fPnX7t2zXzLuXPnZsyY8csvv1jsWVRU9Prr\nr1v98BAiRIhQowip2SJEiJADCTjYVVdXT5gwofb2S5cuzZo168aNG6YtpaWltjw8hAgRItQo\nQmq2CBEi5FgCDnayLIeFhZl/Stnk6NGjixYtMr0vsqamJjk5mRAhQoTEDqnZIkSIkGOJ+eGJ\nioqKEydOjBgxwmK7r69vfHx8u3btOnXqJEmSRqPx8fEhRIgQIbFDarYIESLkWGIOdn5+ft99\n950sy/7+/hZXlZWVZWRkBAQEECJEiBChx7BFiJDAIRWIMNhdvXp1x44d8fHxRUVFfn5+Tk5O\nzs7OAQEBn376qaenZ48ePcx3/uWXX/R6vXWPECFChAg1zZAkSeIdFCFCSoccQ9UXfhUQGxs7\nd+7chISECxcuREZGRkREVFdXG6/KysoKDQ3VarWmLYWFhXPnzr1y5QohQoQIEWpoSMiDIkRI\noZCjNO7B7urVq1OmTDGd99lgMCxcuDAhIcG0Q2Fh4cqVK8PCwrZt27Z9+/Y5c+bExMQQIkSI\nECHrQkIeFCFCdg85UON+KXbjxo2+vr6jR482XtRoNHq9Pjs7OzAw0LjFzc3tueee69u3b15e\nnkajCQkJCQ4OJkSIECFC1oWEPChChOweciAXR98B6xkMhvT09D/+8Y/mG318fO7evWuxp5+f\nn5+fHyFChAgRsktIzRYhQo0u5FiNeLBzcnJasWJFnSsOIUKECBF6bENqtggRUj/kWI14sJMk\nqVu3bt26dTPfUlFRYfwAl1FxcbFGo/H09CREiBAhQo9PSM0WIULqhxzI6dG7NCoGg8H0CBUX\nF0dERPzrX/8iRIgQIUKPeUjNFiFC6odUI9pg5+TkZDAYpP//8AQHB48bN44QIUKECD3mITVb\nhAipH1KNgINdVVWV6eEJCQkhRIgQIUKPf0jNFiFC6odUo5Fl2dH3wZ5SUlLi4+Nv3bql9MND\niBAhQoQaaYsQIfVDqhHtGbuuXbv++uuvKjw8hAgRIkSokbYIEVI/pBrRnrGTJKm4uNjLy4sQ\nIUKECDWukJotQoTUD6lDwMEOAACgaRLtpVgAAIAmi8EOAABAEAx2AAAAgmCwAwAAEASDHQAA\ngCAY7AAAAATBYAcADaPRaDQajaPvBQDUgcEOANTAOAhABQx2AAAAgmCwAwAAEASDHQD8psrK\nypUrV/r6+rq5ufn6+kZGRlZXV9fe7fTp0zNnzuzSpUuzZs06dOgwderU1NRU8x1ML8JqzJiu\nPXz48NixY9u0aePq6urn57d48eLi4mJFjwuAqPiuWAComyzLEydOPHDggPnGmTNnbt++3Xit\naWPtN895e3v//PPPPXr0+K0dTLewbNmylStXWlzVr1+/5ORkT09Pmw8CQNPCM3YAULddu3Yd\nOHDA1dX1448/vn379q1btz766KNvv/229p7jxo2Li4srKioqKytLSUkZNWpUYWHhqlWrTDuY\npkDZjCRJx44dW7lyZefOnXfv3n3nzp2ysrLk5OTBgwdfvnz5gw8+UOcwAYiEZ+wAoG4vvfTS\nsWPHVqxY8e6775o2vvfeeytWrJAefMbOwu3btzt27NijRw+dTmfaaHzSzuK/mjBhwoEDB06e\nPDlixAjTRp1O5+vr26tXL4vXcwHgkRjsAKBubdu2LSgoSE9P79mzp2ljenq6n5+f9OCIlpCQ\n8Mknn5w7dy4/P9/0JjxXV1e9Xm/ap87BrkOHDnl5ec7OzqarTE/mNW/evKKiQrmjAyAkBjsA\nqJuLi0tNTU15ebmbm5tpY3l5eYsWLSSzEW337t1Tp06tcy2t/T48i92aNWtW56cxav/nAFAf\nvMcOAOrm5eUlSVJOTo75RouLkiQtX75cluXw8PD//ve/5eXlsizfv3+/nonWrVtLkpSeni7X\nxR4HAaBpYbADgLoFBARIkrRz507zjdHR0Ra7paenS5K0evVqf39/43N7x44dq31rLi4ukiSZ\nvzgrSdKwYcMkSfryyy/teb8BNGEMdgBQt9DQUEmSoqKiPvvss9zc3Nzc3E8//dT8s65GPj4+\nkiR9+OGHBQUFRUVFe/bsWbBgQe1b69ixoyRJ27dvLysrM21ctGiRRqNZt27dggULzp8/X1JS\nUlFRkZqaunnz5uDgYAWPDYCgeI8dANRNluUJEybExsaab6x9Hru1a9cuXrzYfJ9Zs2ZptVrp\nwTfJvfHGG5999pnF7UuS9PHHHy9atMhgMNR5B+xzJACaDAY7APhNlZWVq1ev/uc//3nz5s1O\nnTrNnj07IiKiWbNmktnUVVNTs2HDhk2bNmVlZXXu3Hn27NlLly612EeSpLKysoiIiP3799+4\ncaOqqsr82pSUlE8++eTkyZO3b992dnbu2bPn2LFjZ8+e3b9/f7UPGEAjx2AHAAAgCN5jBwAA\nIAgGOwAAAEEw2AEAAAiCwQ4AAEAQDHYAAACCYLADAAAQBIMdAACAIBjsAAAABMFgBwAAIAgG\nOwAAAEEw2AEAAAiCwQ4AAEAQDHYAAACCYLADAAAQxP8Dv45QXB/dSuAAAAAASUVORK5CYII=",
      "text/plain": [
       "plot without title"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# Plot monthly unique devices \n",
    "p <- ggplot(unique_devices_summary, aes(x=date, y = unique_devices)) +  \n",
    "  geom_col(fill= 'turquoise') +\n",
    "  scale_y_continuous(\"unique devices per month\", labels = polloi::compress) +\n",
    "  labs(title = \"Monthly Unique Devices on All Wikipedias, 2018-2019\") +\n",
    "  ggthemes::theme_tufte(base_size = 12, base_family = \"Gill Sans\") +\n",
    "  theme(axis.text.x=element_text(angle = 45, hjust = 1),\n",
    "        plot.title = element_text(hjust = 0.5),\n",
    "        panel.grid = element_line(\"gray70\"))\n",
    "\n",
    "#ggsave(filename=\"unqiue_devices_monthly.png\", plot = p, path = \"Figures\", units = \"in\", dpi = 150, height = 6, width = 10, limitsize = FALSE)  \n",
    "p"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "metadata": {},
   "outputs": [],
   "source": []
  }
 ],
 "metadata": {
  "kernelspec": {
   "display_name": "R",
   "language": "R",
   "name": "ir"
  },
  "language_info": {
   "codemirror_mode": "r",
   "file_extension": ".r",
   "mimetype": "text/x-r-source",
   "name": "R",
   "pygments_lexer": "r",
   "version": "3.3.3"
  }
 },
 "nbformat": 4,
 "nbformat_minor": 2
}