Regression for Bank Debt.ipynb

{
 "cells": [
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "## 1. Regression discontinuity: banking recovery\n",
    "<p>After a debt has been legally declared \"uncollectable\" by a bank, the account is considered \"charged-off.\" But that doesn't mean the bank <strong><em>walks away</em></strong> from the debt. They still want to collect some of the money they are owed. The bank will score the account to assess the expected recovery amount, that is, the expected amount that the bank may be able to receive from the customer in the future. This amount is a function of the probability of the customer paying, the total debt, and other factors that impact the ability and willingness to pay.</p>\n",
    "<p>The bank has implemented different recovery strategies at different thresholds (\\$1000, \\$2000, etc.) where the greater the expected recovery amount, the more effort the bank puts into contacting the customer. For low recovery amounts (Level 0), the bank just adds the customer's contact information to their automatic dialer and emailing system. For higher recovery strategies, the bank incurs more costs as they leverage human resources in more efforts to obtain payments. Each additional level of recovery strategy requires an additional \\$50 per customer so that customers in the Recovery Strategy Level 1 cost the company \\$50 more than those in Level 0. Customers in Level 2 cost \\$50 more than those in Level 1, etc. </p>\n",
    "<p><strong>The big question</strong>: does the extra amount that is recovered at the higher strategy level exceed the extra \\$50 in costs? In other words, was there a jump (also called a \"discontinuity\") of more than \\$50 in the amount recovered at the higher strategy level? We'll find out in this notebook.</p>\n",
    "\n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "<p>First, we'll load the banking dataset and look at the first few rows of data. This lets us understand the dataset itself and begin thinking about how to analyze the data.</p>\n"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 2,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/html": [
       "<div>\n",
       "<style scoped>\n",
       "    .dataframe tbody tr th:only-of-type {\n",
       "        vertical-align: middle;\n",
       "    }\n",
       "\n",
       "    .dataframe tbody tr th {\n",
       "        vertical-align: top;\n",
       "    }\n",
       "\n",
       "    .dataframe thead th {\n",
       "        text-align: right;\n",
       "    }\n",
       "</style>\n",
       "<table border=\"1\" class=\"dataframe\">\n",
       "  <thead>\n",
       "    <tr style=\"text-align: right;\">\n",
       "      <th></th>\n",
       "      <th>id</th>\n",
       "      <th>expected_recovery_amount</th>\n",
       "      <th>actual_recovery_amount</th>\n",
       "      <th>recovery_strategy</th>\n",
       "      <th>age</th>\n",
       "      <th>sex</th>\n",
       "    </tr>\n",
       "  </thead>\n",
       "  <tbody>\n",
       "    <tr>\n",
       "      <th>0</th>\n",
       "      <td>2030</td>\n",
       "      <td>194</td>\n",
       "      <td>263.540</td>\n",
       "      <td>Level 0 Recovery</td>\n",
       "      <td>19</td>\n",
       "      <td>Male</td>\n",
       "    </tr>\n",
       "    <tr>\n",
       "      <th>1</th>\n",
       "      <td>1150</td>\n",
       "      <td>486</td>\n",
       "      <td>416.090</td>\n",
       "      <td>Level 0 Recovery</td>\n",
       "      <td>25</td>\n",
       "      <td>Female</td>\n",
       "    </tr>\n",
       "    <tr>\n",
       "      <th>2</th>\n",
       "      <td>380</td>\n",
       "      <td>527</td>\n",
       "      <td>429.350</td>\n",
       "      <td>Level 0 Recovery</td>\n",
       "      <td>27</td>\n",
       "      <td>Male</td>\n",
       "    </tr>\n",
       "    <tr>\n",
       "      <th>3</th>\n",
       "      <td>1838</td>\n",
       "      <td>536</td>\n",
       "      <td>296.990</td>\n",
       "      <td>Level 0 Recovery</td>\n",
       "      <td>25</td>\n",
       "      <td>Male</td>\n",
       "    </tr>\n",
       "    <tr>\n",
       "      <th>4</th>\n",
       "      <td>1995</td>\n",
       "      <td>541</td>\n",
       "      <td>346.385</td>\n",
       "      <td>Level 0 Recovery</td>\n",
       "      <td>34</td>\n",
       "      <td>Male</td>\n",
       "    </tr>\n",
       "  </tbody>\n",
       "</table>\n",
       "</div>"
      ],
      "text/plain": [
       "     id  expected_recovery_amount  actual_recovery_amount recovery_strategy  \\\n",
       "0  2030                       194                 263.540  Level 0 Recovery   \n",
       "1  1150                       486                 416.090  Level 0 Recovery   \n",
       "2   380                       527                 429.350  Level 0 Recovery   \n",
       "3  1838                       536                 296.990  Level 0 Recovery   \n",
       "4  1995                       541                 346.385  Level 0 Recovery   \n",
       "\n",
       "   age     sex  \n",
       "0   19    Male  \n",
       "1   25  Female  \n",
       "2   27    Male  \n",
       "3   25    Male  \n",
       "4   34    Male  "
      ]
     },
     "execution_count": 2,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Import modules\n",
    "import numpy as np\n",
    "import pandas as pd\n",
    "\n",
    "# Read in dataset\n",
    "df = pd.read_csv('/Users/kshit/Desktop/Python/bank_data.csv')\n",
    "\n",
    "# Print the first few rows of the DataFrame\n",
    "df.head()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "## 2. Graphical exploratory data analysis\n",
    "<p>The bank has implemented different recovery strategies at different thresholds (\\$1000, \\$2000, \\$3000 and \\$5000) where the greater the Expected Recovery Amount, the more effort the bank puts into contacting the customer. Zeroing in on the first transition (between Level 0 and Level 1) means we are focused on the population with Expected Recovery Amounts between \\$0 and \\$2000 where the transition between Levels occurred at \\$1000. We know that the customers in Level 1 (expected recovery amounts between \\$1001 and \\$2000) received more attention from the bank and, by definition, they had higher Expected Recovery Amounts than the customers in Level 0 (between \\$1 and \\$1000).</p>\n",
    "<p>Here's a quick summary of the Levels and thresholds again:</p>\n",
    "<ul>\n",
    "<li>Level 0: Expected recovery amounts &gt;\\$0 and &lt;=\\$1000</li>\n",
    "<li>Level 1: Expected recovery amounts &gt;\\$1000 and &lt;=\\$2000</li>\n",
    "<li>The threshold of \\$1000 separates Level 0 from Level 1</li>\n",
    "</ul>\n",
    "<p>A key question is whether there are other factors besides Expected Recovery Amount that also varied systematically across the \\$1000 threshold. For example, does the customer age show a jump (discontinuity) at the \\$1000 threshold or does that age vary smoothly? We can examine this by first making a scatter plot of the age as a function of Expected Recovery Amount for a small window of Expected Recovery Amount, \\$0 to \\$2000. This range covers Levels 0 and 1.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 4,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "image/png": "iVBORw0KGgoAAAANSUhEUgAAA4EAAAJRCAYAAAD747JXAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAAALEgAACxIB0t1+/AAAADl0RVh0U29mdHdhcmUAbWF0cGxvdGxpYiB2ZXJzaW9uIDIuMi4zLCBodHRwOi8vbWF0cGxvdGxpYi5vcmcvIxREBQAAIABJREFUeJzs3X+8ZWddH/rPc0kwioH84EeBwE1MMQa8/JoBxp9JTUvij0qIpZUWS9WXc3uv8fqjtNLpyzszel9BrK1XX8XCMVARqKASrlxvmwipxlaH1BmIGggKQcuEpCaOBBCDJfDcP84+Yc/J2Wf/Wmuvtc96v1+v89pnr73W83yf51lrnfnO3ud8S601AAAADMP/1HUAAAAArI4kEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGpNUksJRyTinlV0opHyyl3FFK+apSynmllHeVUj40ejy3zRgAAAD4grbfCfzpJDfWWr8iybOS3JHklUlurrU+LcnNo+cAAACsQGmrWHwp5dFJfi/Jl9WxTkopf5jk8lrrPaWUJyb5zVrrJa0EAQAAwGnafCfwy5Lcl+TflVLeV0q5vpTyqCRPqLXekySjx8e3GAMAAABjzmi57ecm+b5a662llJ/OHB/9LKUcTHIwSR71qEft+4qv+Ip2ogQAAOi5EydO/Fmt9XFNtNXmx0H/WpL31FovHD3/umwmgX89c34cdP/+/fX48eOtxAkAANB3pZQTtdb9TbTV2sdBa63/PcnJUspWgndFkg8keWeSl4+2vTzJr7YVAwAAAKdr8+OgSfJ9Sd5SSnlkko8k+c5sJp6/VEr57iQfTfKSlmMAAABgpNUksNZ6W5Kd3rK8os1+AQAA2Fnb7wS25rOf/WzuuuuufOYzn+k6lMacddZZueCCC3LmmWd2HQoAALBHrW0SeNddd+Xss8/OhRdemFJK1+EsrdaaU6dO5a677spFF13UdTgAAMAe1WadwFZ95jOfyfnnn78nEsAkKaXk/PPP31PvbAIAAP2ztklgkj2TAG7Za+MBAAD6Z62TQAAAAOYjCQQAABgQSeASrr766uzbty/PeMYzsrGxkSR5/etfny//8i/P5Zdfnu/5nu/JtddemyS577778m3f9m153vOel+c973n57d/+7S5DBwAABmpt/zpoH7zhDW/IeeedlwceeCDPe97z8s3f/M35sR/7sbz3ve/N2WefnW/4hm/Is571rCTJ93//9+cHf/AH87Vf+7X56Ec/miuvvDJ33HFHxyMAAACGRhK4hJ/5mZ/JO97xjiTJyZMn86Y3vSmXXXZZzjvvvCTJS17ykvzRH/1RkuTd7353PvCBDzx07Cc/+cl86lOfytlnn736wAEAgMEa1MdBj508lqvefFWOnTy2dFu/+Zu/mXe/+905duxYfu/3fi/Pec5zcskll0zc//Of/3yOHTuW2267Lbfddls+9rGPSQABAICVG1QSePSWo7npzpty9JajS7f1iU98Iueee26+5Eu+JB/84Afznve8J3/5l3+ZW265JR//+Mfz4IMP5u1vf/tD+7/whS/Mv/k3/+ah57fddtvSMQAAAMxrUB8HPXzZ4dMel3HVVVflta99bZ75zGfmkksuyYEDB/LkJz85hw4dygte8II86UlPytOf/vQ85jGPSbL50dHv/d7vzTOf+cw8+OCD+fqv//q89rWvXToOAACAeZRaa9cxTLV///56/Pjx07bdcccdufTSSzuKaLK/+Iu/yJd+6ZfmwQcfzItf/OJ813d9V1784hfPfHxfxwUAAHSnlHKi1rq/ibYG9XHQVThy5Eie/exn5yu/8itz0UUX5eqrr+46JAAAgIcM6uOgq/CTP/mTXYcAAAAwkXcCAQAABmStk8B1+H3Geey18QAAAP2ztkngWWedlVOnTu2ZxKnWmlOnTuWss87qOhQAAGAPW9vfCbzgggty11135b777us6lMacddZZueCCC7oOAwAA2MPWNgk888wzc9FFF3UdBgAAwFpZ24+DAgAAMD9JIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgHY046dPJar3nxVjp081nUowB7lPsO6OaPrAACgTUdvOZqb7rwpSXLjy27sOBpgL3KfYd1IAgHY0w5fdvi0R4Cmuc+wbkqttesYptq/f389fvx412EAAAB0opRyota6v4m2/E4gAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCAQAYjGMnj+WqN1+VYyePdR3KTNYtXtbDGV0HAAAAq3L0lqO56c6bkiQ3vuzGjqOZbt3iZT1IAgEAGIzDlx0+7bHv1i1e1kOptXYdw1T79++vx48f7zoMAACATpRSTtRa9zfRlt8JBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAbkjDYbL6X8SZJPJflckgdrrftLKecleVuSC5P8SZK/W2v9eJtxAAAAsGkV7wT+jVrrs2ut+0fPX5nk5lrr05LcPHoOAADACnTxcdAXJXnj6Ps3Jrm6gxgAAAAGqe0ksCb59VLKiVLKwdG2J9Ra70mS0ePjW44BAACAkVZ/JzDJ19Ra7y6lPD7Ju0opH5z1wFHSeDBJnvrUp7YVHwAAwKC0+k5grfXu0eO9Sd6R5PlJ/rSU8sQkGT3eO+HYjVrr/lrr/sc97nFthgkAADAYrSWBpZRHlVLO3vo+yQuT3J7knUlePtrt5Ul+ta0YAAAAOF2bHwd9QpJ3lFK2+vn3tdYbSym/m+SXSinfneSjSV7SYgwAAACMaS0JrLV+JMmzdth+KskVbfULAADAZF2UiAAAAKAjkkAAAIABkQQCAAAMiCQQAACYybGTx3LVm6/KsZPHug6FJbRdLB4AANgjjt5yNDfdeVOS5MaX3dhxNCxKEggAAMzk8GWHT3tkPUkCAQCAmXzVU77KO4B7gN8JBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAPTckAp0b41148TGYMYMq6ZEBABAzw2pQPfWWI/ffTynHjiVZO+PGVZNEggA0HNDKtC9NcZrLr0mN9xxwyDGDKtWaq1dxzDV/v376/Hjx7sOAwAAoBOllBO11v1NtOV3AgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAB7zJCKy8MkroPJ1AkEANhjhlRcHiZxHUwmCQQA2GOGVFweJnEdTKZYPAAAQM8pFg8AAMBCJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCAAAMCCSQIABOnbyWK5681U5dvJY16EAHerjvaCPMXVht3kwR80b2pye0XUAAKze0VuO5qY7b0qS3PiyGzuOBuhKH+8FfYypC7vNgzlq3tDmVBIIMECHLzt82iMwTH28F/Qxpi7sNg/mqHlDm9NSa+06hqn2799fjx8/3nUYAAAAnSilnKi17m+iLb8TCAAAMCCSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEYCnrUmB3XeIE2tWHe0EfYqA967C+6gQCsJR1KbC7LnEC7erDvaAPMdCedVhfSSAAS1mXArvrEifQrj7cC/oQA+1Zh/VVLB4AAKDnFIsHAABgIZJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQSAjq1DYWF2t9MazrKui6y98+XhupiTvq5DX+OaxTrHvm7UCQSAjq1DYWF2t9MazrKui6y98+XhupiTvq5DX+OaxTrHvm4kgQDQsXUoLMzudlrDWdZ1kbV3vjxcF3PS13Xoa1yzWOfY141i8QAAAD2nWDwAAAALkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAALGy/sq8jvbNqap3VrtyuLjsf8rqc21+3A9Qdy4PoD1i6rPY9dM81QJxCAhY0X9k2iyO8M2iqGvG7tdmXR8Zjf9dTmut36sVsf+n7oa7fK89g10wxJIAAL261ANjtrqxjyurXblUXHY37XU5vrdv9n7m+l7XW0yvPYNdMMxeIBAAB6TrF4AAAAFiIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAOqHg7+m25mPjxIZ52aP6dM63Hcsqi6mvYl5n6WPaPttf79P50IQ+jWeZWJoeR5/mZZw6gQB0QsHf023Nx/G7j+fUA6eSmJe9pk/nfNuxrLKY+irmdZY+pu2z/fU+nQ9N6NN4loml6XH0aV7GSQIB6ISCv6fbmodrLr0mN9xxg3nZg/p0zrcdyyqLqa9iXmfpY9o+21/v0/nQhD6NZ5lYmh5Hn+ZlnGLxAAAAPadYPAAAAAuRBAIAAAxI60lgKeURpZT3lVJ+bfT8olLKraWUD5VS3lZKeWTbMQAAALBpFe8Efn+SO8aevzrJT9Van5bk40m+ewUxAAAAkJaTwFLKBUm+Ocn1o+clyTck+ZXRLm9McnWbMQAAAPAFbb8T+H8n+WdJPj96fn6S+2utD46e35XkyS3HAECPtFE4t6/FeCdZt3jb0OQctFmYfFLbQ1nDWce51+djr49vHtPmwlxNt9scbb22cWKj1XlsrU5gKeVbktxbaz1RSrl8a/MOu+5Yo6KUcjDJwSR56lOf2kqMAKxeG4Vz+1qMd5J1i7cNTc5Bm4XJJ7U9lDWcdZx7fT72+vjmMW0uzNV0u83R1mvH7z6eUw+c2nGfJrRZLP5rknxrKeWbkpyV5NHZfGfwnFLKGaN3Ay9IcvdOB9daN5JsJJt1AluME4AVaqNwbl+L8U6ybvG2ock5aLMw+aS2h7KGs45zr8/HXh/fPKbNhbmabrc52tp2zaXX5IY7bmhtHldSLH70TuAraq3fUkr55SRvr7W+tZTy2iS/X2v92d2OVyweAAAYsnUvFv/DSX6olPLhbP6O4Os7iAEAAGCQ2vw46ENqrb+Z5DdH338kyfNX0S8AAACn6+KdQAAAADoiCQQAABgQSSAAAMCASAIB9jiFe4fL2vdfk2s03tYs7To/Jpt3bvo4l6uISeH4na3DuFfyh2EA6I7CvcNl7fuvyTUabyvJ1HadH5PNOzd9nMtVxKRw/M7WYdySQIA9TuHe4bL2/dfkGu3U1m7tOj8mm3du+jiXq4hJ4fidrcO4V1IsflmKxQMAAEO27sXiAQAA6IgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAGvu2MljuerNV+XYyWNdhzLVKmPt+7zME1/fx8KmVa/TqvrbqZ9V9N1WH329nlYZl2LxALDmjt5yNDfdeVOS5MaX3dhxNLtbZax9n5d54uv7WNi06nVaVX879bOKvtvqo6/X0yrjkgQCwJo7fNnh0x77bJWx9n1e5omv72Nh06rXaVX97dTPKvpuq4++Xk+rjKvUWlvvZFn79++vx48f7zoMAACATpRSTtRa9zfRlt8JBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCQMM2TmzksT/x2Gyc2Og6lKnFh5ctTtynostbsWyc2Og8pj7NS5v24vnTVCx9GlufNDEvbc/tENZOnUAAaNihmw/l1AOncujmQzm472CnsUwrPrxsceI+FV3eiuX43cdz6oFTncbUp3lp0148f5qKpU9j65Mm5qXtuR3C2kkCAaBh111xXQ7dfCjXXXFd16FMLT68bHHiPhVd3orhmkuvyQ133NBpTH2alzbtxfOnqVj6NLY+aWJe2p7bIaydYvEAAAA9p1g8AAAAC5EEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSDACgyh8Oy4dR/vusffZ7vN7TLzbs3am9umY+lSX+NqyrTxbb2+cWKjV/PQ1Lqs0/oudL0+Mo9qqn91AgFWYAiFZ8et+3jXPf4+221ul5l3a9be3DYdS5f6GldTpo1v6/Xjdx/PqQdOTdxv1Zpal3Va34Wu17PzpKb6lwQCrMAQCs+OW/fxrnv8fbbb3C4z79asvbltOpYu9TWupkwb39b2ay69JjfccUNv5qGpdVmn9V3oev1U7m6qf8XiAQAAek6xeAAAABYiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAYC7rVIh1knUbw8aJjTz2Jx6bjRMbp20fH8esBYLbHPOxk8dy4PoDOXD9gbn72Sm+WWNe5thl4tttnyb7n6etRc6DdSjQPqmfSdfGvDE2tXbzHrt9/+3XUFvn1DK6WPNlC5x3dT3utH8Xa9rkPaQNk3527DZ3664PY1MnEJjLOhVinWTdxnDo5kM59cCpHLr5UA7uO/jQ9vFxJJmpQPCk15tw9JajufVjtz70/Tz97BTfrDEvc+wy8e22T7L7ejTd96z7Nj1Xq7qWJvUz6dqYN8am1m7e+di+//ZraDyWZeJqUhdrnmSpAudNxtzEGq96TZu8h7Rh0s+O3eZuHX5276YPY5MEAnNZp0Ksk6zbGK674rocuvlQrrviutO27zSOaQWC2xzz4csO5/7P3L9QP7uNZVpbyxy7THzzxNF237Pu2/RcrepamtTPpGtjlmOn7bOK+di+/6RrqOlzahldrvmiBc6bjLmJNd5+fFfXz7L7NmXaeb/b3K2rPoxNsXgAAICeUyweAACAhUgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBCYqi8FWtuIoy9ja0LXY5m3WPwshb6n9TfveOctHN603cY8a/HgeQu+z7Mus459luLdTRVD7uq8XqZAedfn2So0EX+b9/RJ6zbt+ln3dZnVMuNc9N69yrld5vrtg5XMVa2191/79u2rQHeufNOVNUdSr3zTlXsujr6MrQldj2Wr/1ljOP/V59ccST3/1ecv1d88453lmDbncbcxb+93Uhw7bd8t5nnWZdaxb+23NZ7d+p02nmm6Oq9nGeO0Y7s6z1ahifjbvKdPWrdp18+6r8uslhnnovfuVc7tMtdvH0yaqyTHa0P51SOOHDnSXobZkI2NjSMHDx7sOgwYrIvPvTh3ffKuHL7scJ7ymKfsqTj6MrYmdD2Wi8+9OLffe3suePQFedUVr5oawzlnnZNjJ4/luiuuy74n7Vuov3nHO8sxbc7jbmPe3u+kOHbavlvM86zLrGPf2u/a51+bz37usxP7nWU803R1Xs8yxmnHdnWerUIT8bd5T5+0btOun8svvHyt12VWy8z9ovfuVZ7zy1y/fTBpro4ePXrPkSNHFvv4zDaKxQMAAPScYvEAAAAsRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgcDc2ixi2lSB6XUyrZj3vEXYx4+bVCx3VfPaxfpNK5y+01xsn995C7InDy+g3NTYmyx6vFNR7K12Fy2u3Vb8k/ro4z1h0eLZi+pzMfpl+23z+EXbbrKY/KL380nx7PR80WPautfstq2vllnzneZx2fNya588Mo9aeFDbNVVwsM0vxeKhX9os+NpUgel1Mq2Y97xF2Lcft1Ox3FXNaxfrN0vh9J3mYtp5N20s2wsoNzX2Jose71QUezzuJorTNxX/pD76eE9YtHj2ovpcjH7Zfts8ftG2mywmv+j9fFI8Oz1f9Ji27jW7beurZdZ8p3lc9rx86Lw5P5+oisUDXWmz4GtTBabXybRi3vMWYR8/blKx3FXNaxfrN61w+k6ForfP77wF2ZOHF1BuauxNFj3eqSj2VruLFteeFsui8U/qo4/3hEWLZy+qz8Xol+23zeMXbbvJYvKL3s8nxTPrz8lZjmnrXrPqnztNWGbNd5rH3dqYZ/3u/OU7//jIjxx5TRNjVCweAACg5xSLBwAAYCGSQAAAgAGRBAIAAAyIJBAAAGBAJIEAAAADIgkEemWVhYa7Kkzft4K5bcXTZEHrVc/ZPMW/2yic3sU5Mq2Y8bIFrtuIa9Z9l5nPpgpxL2KV58Gy1+L2a2bZtWhr7PNc24vG0WTs88bbRgzz9tV034sWa5+3/0ULui9bCL4zTRUcbPNLsXgYjlUWGu6qMH3fCua2FU+TBa1XPWfzFP9uo3B6F+fILMWM+158vI0C800V4l7EKs+DZa/F7dfMsmvR1tjnubYXjaPJ2OeNt40Y5u2r6b4XLdY+b/+LFnRfthD8PJIcr4rFA3vRKgsNd1WYvm8Fc9uKp8mC1ques3mKf7dROL2Lc2Rake1lC1y3Edes+y4zn00V4l7EKs+DZa/F7dfMsmvR1tjnubYXjaPJ2OeNt40Y5u2r6b7nbW/R/qfdA5t+bRFHjx6958iRI/O9LTyBYvEAAAA9p1g8AAAAC5EEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSCwEk0WDp9336YtWrx32T4f86rH5KKfvmjXgt1dFuldRd9NFuWdp/15Y2nCpPNs1oLzy2pifNPaaOK+0EaB+HGzXO/zjGPjxEYOXH9g1+t40T5m2bfXxatHlomx7fH1cf5WWdB+0b5mOeebuofPe3316ZxZ6fnVVMHBNr8Ui4f112Th8Hn3bdqixXub6HNawe4ui/Suou8mi/LO0/68sTRh0nk2a8H5ZTUxvmltNHFfaKNA/LhZrvd5xjF+LbdVgHyVxavbsEyMbY+vj/O3yoL2y/TV5L8BJu0/a1/L9DuvJn+ORrF4YN00WTh83n2btmjx3mX7/K0/+a088ewn5pLzL5lYsLvLIr2r6LvJorzztD9vLE2YdJ7NWnB+WU2Mb1obTdwX2igQP26W632ecVz7/Gtz36fvywWPvmDidbxoH7Ps2+W9c1bLxNj2+Po4f6ssaL9oX7ffe/vUc76pe/gsfS07pnk0+XN0pcXiSylPSHJdkifVWr+xlPL0JF9Va319EwHMQrF4AABgyFZdLP7nk9yU5Emj53+U5Aea6BwAAIDVmiUJfGyt9ZeSfD5Jaq0PJvlcq1EBAADQilmSwE+XUs5PUpOklHIgySemHVRKOauU8l9LKb9XSnl/KeXoaPtFpZRbSykfKqW8rZTyyKVGAAAAwMxmSQJ/KMk7k1xcSvntJL+Q5PtmOO6vknxDrfVZSZ6d5KpRAvnqJD9Va31ako8n+e6FIgcAAGBuZ0zbodb63lLKZUkuSVKS/GGt9bMzHFeT/MXo6Zmjr5rkG5L8/dH2NyY5kuTfzh05AAAAc5v6TmAp5Zok35rNJPDLk/ztUsoVpZTHz3DsI0optyW5N8m7ktyZ5P7R7xUmyV1Jnrxo8ABD00Qx3e2vzVp0fJai2cvEOuvxTReSXqZo8vaixNvb2j7H43M973wuE+u0dhadlyaKwTdp2py2XVS7q0Liy5zXTd5TltX0XLcRa9P3pUXuA7NYpGh60/335VpYZJ9VxjOXR+ZRzTSU6cXik/x/Sf48ydtHX6dG2z6U5DtmKUaY5Jwkv5Hk65J8eGz7U5L8wYRjDiY5nuT4U5/61KnFFQGGoIliuttfm7Xo+CxFs5eJddbjmy4kvWzR5PFjt7e1fY7H53re+Vwm1mntLDovTRSDb9K0OW27qHZXhcSXOa+bvKcsq+m5biPWpu9Li9wHZrFI0fQ2+u/DtbDIPquMZx45P5+oDRWLnyWB+3+TPGHs+ROS3JDkvCS3z9xRcjjJP03yZ0nOGG37qiQ3TTt23759jUwcwLr7nY/+Tr3yTVfW3/no7yy9/9Zrrzv+upnafN3x19XzX31+fd3x17US66zHL9PuTscu2t7vfPR36gt+7gX1BT/3goeO3d7W9jken+t553OZWKe1s+i8TNunqXhnNW1OF4lnnmNWPd7d+p01libvKctqeq7biLXp+9Ii94FZ7HR/WqU+XQuL7LPKeOaRR+aO2lASOEux+D+otf4vY8/L6N27ryylvK/W+pwJxz0uyWdrrfeXUr44ya9n84/CvDzJ22utby2lvDbJ79daf3a3GBSLBwAAhqzJYvFT/zBMkv9cSvm1JL88ev5tSX6rlPKoJPfvctwTk7yxlPKIbP7u4S/VWn+tlPKBJG8tpfxfSd6X5PWLhw8AAMA8ZkkCvzfJNUm+dvT8vyZ5Yq3100n+xqSDaq2/n+Rh7xLWWj+S5PnzhwoAAMCypv510Lr5edE7k3w2yYuTXJHkjpbjAgAAoAUT3wkspXx5km9P8tJs/kXQtyUptdaJ7/4BAADQb7t9HPSDSf5zkr9da/1wkpRSfnAlUQEAANCK3T4O+m1J/nuS3yil/Fwp5YokZTVhAXRXbHaatoowryquefdvo+jwtKLqq1zz3fpuqxj6bseNv7Y19894zTPmnv9ZCsLPYtZi1suc7/MWO19m3tsqoL193WaZ+66Lo28/92e9/saP67Ig+SwWnfs+/fxZJJZVxd/FPC17b2gy5t2u+7b6bMy0GhJJHpXkHyT5tSR/meTfJnlhUzUqZvlSJxCGqatis9O0VYR5VXHNu38bRYenFVVf5Zrv1ndbxdB3O278tfG5X7bIedvFrJc53+ctdr7svLdxju20btPmvuvi6NvP/Vmvv+3H9fE+vWXRue/Tz59FYllV/F3M07L3hiZj3u26b6PPJMdrQ/nV1L8OWjf/CuhbkryllHJekpckeWU26/4BtObwZYdPe+yLWeNadfzz9jfPOO7/zP1ztT1v31uP11x6TW6444aVrvlufU+bo0XXeLfjtr92/2fuz6f+6lM5+4vOnqufSXM8b6zXXXFdDt18KNddcd1c/c1jp2PnmaN5+mn6XN4tpmlzP884Ztl30XvA1rk/6/U3ftwb3veGufpctUXnvk8/fxaJZVXxdzFPy94bmowXnBnYAAAgAElEQVR5t+u+rT6bMrVYfB8oFg8AAAxZk8Xip5aIAAAAYO+QBAIAAAyIJBAAAGBAJIEAAAADIgkEAAAYEEkg0Ft9K+a7bDyriLepYthNxTpLMeq2CvfOuv+0+Wq6IPy8hdEXjWOnsTVVQL5L4+Oatbj5PG3vVPi56XnaOLGRx/7EY7NxYqOR9nYza2H3Wc/Xpu4xO7Xf9L1gPM51OtebmOO2fh6t8txt2rqdA63H2lTBwTa/FIuHYepbMd9l41lFvE0Vw24q1lmKUbdVuHee/VdZEH7ewuiLxrHT2JoqIN+l8XHNWtx83ra3F35uep7Gr4e2zVrYfdbztal7zE7tt3EvaGsN29TEHLf182iV527T1vEc2B5rGiwW/4gjR460l2E2ZGNj48jBgwe7DgNYsYvPvTh3ffKuHL7scJ7ymKfM/Xrf4llFvBefe3Fuv/f2XPDoC/KqK161cD9NxbrVzrXPvzaf/dxnH3ocb7fJeZm3rVnma9H4Jh230/ZZ+mhibNvbWPU11ITxcb3iq1/xsPNp2ba35uPyCy/f8fsm+jnnrHNy7OSxXHfFddn3pH1Lt7eb8Wvwvk/fN/Fcn/V8beoes1P7Tc7z9jibXsM2NTHHbf08WuW527R1ut9NivXo0aP3HDlypJG3YRWLBwAA6DnF4gEAAFiIJBAAAGBAJIEAAAADIgkEAAAYEEkgAADAgEgCgYcsW5x0LxSi3k3TBdSbLpje9Pp1Zdni0asYR1t9TCvYvWxx9FVfo222P0/bbY27rcLZfbkWl7HbnO82vlWeo32f52n3g1Xdf7oy1HhWNu6mCg62+aVYPKzGsoVU90Ih6t00XUC96YLpTa9fV5YtHr2KcbTVx7SC3csWR1/1Ndpm+/O03da42yqc3ZdrcRm7zflu41vlOdr3eZ52P1jV/acrQ41nt36iWDzQhmULqe6FQtS7abqAetMF05tev64sWzx6FeNoq49pBbuvff61SxVHX/U12mb787Td1rjbKpzdl2txGbvN+W7X9SrP0b7P87T7waruP10Zajy79aNYPAAAwIAoFg8AAMBCJIEAAAADIgkEAAAYEEkgAADAgEgCAQAABkQSCPTKuhaH3V7Me9ai3l0Um56n8HjT67HbeOctEt3GubI9vi5i2qmNReKatTj3ojHN8tqkfX/43T889byfNqY24mvSqgt9r5s2i8Iv09Yq1qep+/4818i043ba7lxd3LGTx3Lg+gM5cP2B/s5fUwUH2/xSLB6GY12Lw24v5j1rUe8uik3PU3i86fXYbbzzFolu41zZHl8XMe3UxiJxzVqce9GYZnlt0r5n/uiZU8/7aWNqI74mrbrQ97ppsyj8Mm2tYn2auu/Pc41MO26n7c7VxW3NXdPzF8Xigb1qXYvDbi/mPWtR7y6KTc9TeLzp9dhtvPMWiW7jXNkeXxcx7dTGInHNWpx70ZgWGfPWvldfenU++Gcf3PW8nzamWYtnd3VPWXWh73XTZlH4Zdpaxfo0dd+f5xqZdtxO252ri7v43Itz+72354JHX5BXXfGqxuZPsXgAAIABUSweAACAhUgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBD2iDaKug61UGxThbVnLRi/dUxXhWWXKS48bf+tOdg4sdGbwrnjc709rrYLfM+zzk32uUhB6d3amHb8uhZKn2Wci1zfk9paNK42tHm+ddlOV+33zW7j7WouFr2PNNlXE32schx5ZB61fCMjTRUcbPNLsXiYro2irkMtFNtUYe1ZC8aPH9Onotbz7rPT/uNFkbsa36TYdoqr7QLf86xz033OW1B6tzamHb+uhdJnGeci1/ekthaNqw1tnm9dttNV+32z23i7motF7yNN9tVEH6scR87PJ6pi8cC4Noq6DrVQ7LLjnqcY+/gxbRSWncUyxYWntbk1B9c+/9rc9+n7OhnfTrFtzfUrvvoVp8U1qah6U9fCPOvcZJ+LFJTerY1px69rofRZxrnI9b1T28vE1YY2z7cu2+mq/b7ZbbxdzcWi95Em+2qij1WO4+iPHP3jIz9y5DVLNTKiWDwAAEDPKRYPAADAQiSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEgjseYsUal1FkdpZjx0vbL7VzrLFvrsyHkcbBXZ3Kwi8W5H2puazL+fNrO3MWwS+D3Zby3WJf9YYFx3PKudhq6/x+9NOcczyfR/Gs4xVrO28ba1q7vbSOq5CH+bijM56BliRo7cczU133pQkufFlN7Z2TBttHb3laG792K1Jkg//+Ydz6oFTD702T5tNjmcZ43Eku4+hyXUbn8ejtxx9WHvz9rVbP304b2ZtZ/trfTlPdrPbWq5L/LPGuOh4VjkPW30dv/v4Q/enrT4nXe+Tvp8U6zqsa7KatZ23rVXN3Sz9rMs6rkIf5kISCOx5hy87fNpjW8e00dbhyw7n/s/cnyT5rud8V26444bT2pm1zSbHs4yd4pgUU5PrNj6PO7U3b1+79TNvzPP20WQ721/ry3mym93Wcl3iH39sat8mjlvEVh/XXHrNxPvTpOt91nvZOqxrspq1nbetVc3dLP2syzquQh/mQrF4AACAnlMsHgAAgIVIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQ6J1li6svU8S7DwVcZ7VOsc5jt+LTO+23yFpPKx6/aMyLFEre2v7D7/7hPPYnHpuNExtL99V07OM2TmzMFGcbMcxTZLyrwt2z9LV17k07x5ftZ5brqOn+lulnr97TdjLvWKet5yJzt+rzvi9r29dzdXubrc9ZrbX3X/v27avAcFz5pitrjqRe+aYrGzt21jaX6XvV1inWeWyN6/xXn7/r+JZZ6619mpq/efqcFO+ZP3rmQ+Netq+mYx+3tS7T4mwjhvH9ph0zz7hWeS2Nn3vTzvEm+mmzj536W6afvXpP28m8Y522novMXRfnfR/Wtq/n6vY2d+ojyfHaUH71iCNHjrSTXTZoY2PjyMGDB7sOA1iRi8+9OHd98q4cvuxwnvKYpzRy7KxtLtP3qq1TrPPYGte1z782n/3cZyeOb5m1vvjci3P7vbfngkdfkFdd8aql52/WPneL9+pLr84H/+yDue6K67LvSfuW6qvp2Medc9Y5OXby2NQ424hhfL/LL7x812PmGdcqr6Xxc+8VX/2KXc/xZfuZ5Tpqur9l+tmr97SdzDvWaeu5yNyt+rzvy9r29Vzd3uZOfRw9evSeI0eONPIxDMXiAQAAek6xeAAAABYiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAoBFNFTXtU0HZRbRRSHs3qy4IPd5nE8WK24plmXaOnTyWZ7zmGTnnx8+Zex23F6Ffpoj8bvF1Mf87xbDK826e+Lpoe5GC932Jrc2Y1v2evqUP9711nst1jr0vjp08lpyfpzXV3hlNNQQM29FbjuamO29Kktz4shs7b6crh24+lFMPnMqhmw/l4L7265tuzdfxu4/n1AOnkrQ/b5PWqIu1a+O8S5IP/NkHkmTudTx6y9Hc+rFbH/o+ydT4ZhnD9vi6mP+dYljleTdNm+Ofd41267/pOJuIrc2YkunXwDrow31vnX8+rnPsfXH0lqPJI/PoptqTBAKNOHzZ4dMeu26nK9ddcV0O3Xwo111x3Ur625qnay69JjfcccNK5m3SGnWxdm2ddyc/cTIf+9TH5l7Hw5cdzv2fuf9hMe0W3yxj2GmfVc//Tu2v8rybps3xL7pGy+y3ythWEVMfzpFl9OG+t84/H9c59r44fNnh3PQ/bvpkU+0pFg8AANBzisUDAACwEEkgAADAgEgCAQAABkQSCAAAMCCSQAAAgAGRBAIAAAyIJBDYk46dPJar3nxVjp08NtP2ddHn+JeJrYlxHTt5LAeuP5BnvOYZOXD9gYfa6nLO2ux7a7zjY12mrfE4m2x7nn67thXPxomNVtetybbH25ul7b7NeVuaGucqroV5Yt1L67fKsSzb116a9y2KxQN70tFbjuamO29Kktz4shunbl8XfY5/mdiaGNfRW47m1o/detrzG192Y6dz1mbf4+PdGusybY3H2WTb8/Tbta14jt99PKceOJWknXVrcszj7SWZ2nbf5rwtTY1zFdfCPLHupfVb5ViW7WsvzfsWSSCwJx2+7PBpj9O2r4s+x79MbE2M6/Blh3P/Z+7Pp/7qUzn7i85+WJtdzFmbfW+Nt4n2d5qrptqep9+ubcVxzaXX5IY7bmht3cYf22hvt7b7NudtaWqcq7gW5ol1L63fKseybF97ad63lFpr1zFMtX///nr8+PGuwwAAAOhEKeVErXV/E235nUAAAIABkQQCAAAMSGtJYCnlKaWU3yil3FFKeX8p5ftH288rpbyrlPKh0eO5bcUAAADA6dp8J/DBJP+k1nppkgNJvreU8vQkr0xyc631aUluHj0HAABgBVpLAmut99Ra3zv6/lNJ7kjy5CQvSvLG0W5vTHJ1WzEAAABwupX8TmAp5cIkz0lya5In1FrvSTYTxSSPX0UMAKvWZAHgPhSqbTKGNttatO15j2ur6HebhcqXMWm8bRUoX6a/ndoaL/jdh+tpJ32NayddFfpusgh8F8XDm7hftX2vmBTTxomNPPYnHpuNExsLtzHtNVan9TqBpZQvTfL2JD9Qa/1kKWXW4w4mOZgkT33qU9sLEKAlTRYA7kOh2iZjaLOtRdue97i2in63Wah8GZPGO8s8LDJXy/S3U1vjBb+T6UXVu9CH63xWXRX6TppZu66Khzdxv2r7XjEppkM3H8qpB07l0M2HcnDfwYXamPYaq9NqElhKOTObCeBbaq03jDb/aSnlibXWe0opT0xy707H1lo3kmwkm3UC24wToA1NFgDuQ6HaJmNos61F2573uLaKfrdZqHwZk8Y7yzwsMlfL9LdTWzsV/F6XOe6jrgt9N1EEfpl2mrrPLHNttHWvmBTTdVdcl0M3H8p1V1y3cBvTXmN1WisWXzbf8ntjkj+vtf7A2PZ/meRUrfXHSymvTHJerfWf7daWYvEAAMCQNVksvs13Ar8myXck+YNSym2jbYeS/HiSXyqlfHeSjyZ5SYsxAAAAMKa1JLDW+l+STPoFwCva6hcAAIDJVvLXQQEAAOgHSSAAAMCASAIBAAAGRBI4AIpy0rahnmNdFUseuraKPC/TbleF5psswr7IcbMUvp61OPaqz/Fp/e1UGHuV892GWdana/PE01RB8nVf10Rx9nXSm/Wotfb+a9++fZXFXfmmK2uOpF75piu7DoU9aqjn2CrHPdQ53smyczHp+GXanffYptZzkXYW7Xun47ZvW3SfZeJa1LT+zn/1+TVHUs9/9flLxdina3eW9enaPPHstm9T7TR5TJuamgvat8x6JDleG8qvHnHkyJFus9AZbGxsHDl48GDXYayti8+9OHd98q4cvuxwnvKYp3QdDnvQUM+xVY57qHO8k2XnYtLxy7Q777FNreci7Sza907Hbd+26D7LxLWoaf2dc9Y5OXbyWK674rrse9K+hWPs07U7y/p0bZ54dtu3qXaaPKZNTc0F7VtmPY4ePXrPkSNHNqbvOV1rxeKbpFg8AAAwZE0Wi/c7gQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAYKV6UyR1ZJGCwhsnNloZw26x7FS4ehX9rrqPNmIZb3Na4fI257lNfZnfJto6cP2BHLj+wFLtzXtdN9FnkzGtwirjmXbd9cmisXUxpj7OYx9jWrW1mYOmCg62+aVYPOwdfStau0hB4a0i0k2PYbdYdipcvYp+V91HG7GMtzmtcHmb89ymvsxvU20t294i13VfroFVWWU80667Plk0ti7G1Md57GNMq9bmHESxeGBd9a1o7SIFha99/rX57Oc+2/gYdotlp8LVq+h31X20Ect4m5dfePmuhcvbnOc29WV+l23z4nMvzu333p4LHn1BXnXFqxZub97ruok+m4xpFVYZz/a++jYX4xaNrYsx9XEe+xjTqrU5B4rFAwAADIhi8QAAACxEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAZEEggAADAgkkAAAIABkQQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAAwIBIAgEAAAaktSSwlPKGUsq9pZTbx7adV0p5VynlQ6PHc9vqHwAAgIdr853An09y1bZtr0xyc631aUluHj0HAABgRVpLAmutv5Xkz7dtflGSN46+f2OSq9vqHwAAgIdb9e8EPqHWek+SjB4fv+L+AQAABq23fximlHKwlHK8lHL8vvvu6zocAACAPWHVSeCfllKemCSjx3sn7Vhr3ai17q+17n/c4x63sgABAAD2slUnge9M8vLR9y9P8qsr7h8AAGDQ2iwR8YtJjiW5pJRyVynlu5P8eJK/VUr5UJK/NXoOAADAipzRVsO11pdOeOmKtvoEAABgd739wzAAAAA0TxIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJJAAACAAZEEAgAADIgkEAAAYEAkgQAAAAMiCQQAABgQSSAAAMCASAIBAAAGRBIIAAAwIJ0kgaWUq0opf1hK+XAp5ZVdxAAAADBEK08CSymPSPKaJN+Y5OlJXlpKefqq4wAAABiiLt4JfH6SD9daP1Jr/R9J3prkRR3EAQAAMDhdJIFPTnJy7Pldo20AAAC07IwO+iw7bKsP26mUg0kOjp7+VSnl9lajYhmPTfJnXQfBrqxR/1mjfrM+/WeN+s8a9Zv16b9LmmqoiyTwriRPGXt+QZK7t+9Ua91IspEkpZTjtdb9qwmPeVmf/rNG/WeN+s369J816j9r1G/Wp/9KKcebaquLj4P+bpKnlVIuKqU8Msm3J3lnB3EAAAAMzsrfCay1PlhKuTbJTUkekeQNtdb3rzoOAACAIeri46Cptf6HJP9hjkM22oqFRlif/rNG/WeN+s369J816j9r1G/Wp/8aW6NS68P+JgsAAAB7VBe/EwgAAEBHep0EllKuKqX8YSnlw6WUV3Ydz1CVUp5SSvmNUsodpZT3l1K+f7T9SCnlY6WU20Zf3zR2zD8frdsfllKu7C76YSil/Ekp5Q9G63B8tO28Usq7SikfGj2eO9peSik/M1qf3y+lPLfb6Pe+UsolY9fJbaWUT5ZSfsA11K1SyhtKKfeOlyBa5Loppbx8tP+HSikv72Ise9GE9fmXpZQPjtbgHaWUc0bbLyylPDB2Lb127Jh9o/vjh0druFOpKhYwYY3mvq/59157JqzR28bW509KKbeNtruOVmyXf2O3/7Oo1trLr2z+0Zg7k3xZkkcm+b0kT+86riF+JXlikueOvj87yR8leXqSI0lescP+Tx+t1xcluWi0jo/oehx7+SvJnyR57LZtP5HklaPvX5nk1aPvvynJf8xmzc4DSW7tOv4hfY3ubf89yf/sGup8Lb4+yXOT3D62ba7rJsl5ST4yejx39P25XY9tL3xNWJ8XJjlj9P2rx9bnwvH9trXzX5N81Wjt/mOSb+x6bHvla8IazXVf8++91a/Rttf/VZL/c/S962j16zPp39it/yzq8zuBz0/y4VrrR2qt/yPJW5O8qOOYBqnWek+t9b2j7z+V5I4kT97lkBcleWut9a9qrX+c5MPZXE9W60VJ3jj6/o1Jrh7b/gt103uSnFNKeWIXAQ7UFUnurLX+t132cQ2tQK31t5L8+bbN8143VyZ5V631z2utH0/yriRXtR/93rfT+tRaf73W+uDo6XuyWWt4otEaPbrWeqxu/kvpF/KFNWVJE66hSSbd1/x7r0W7rdHo3by/m+QXd2vDddSeXf6N3frPoj4ngU9OcnLs+V3ZPfFgBUopFyZ5TpJbR5uuHb0d/Yatt6pj7bpQk/x6KeVEKeXgaNsTaq33JJs3mSSPH223Pt369pz+A9c11C/zXjfWqjvflc3/Ed9yUSnlfaWUW0opXzfa9uRsrskW67Ma89zXXEPd+bokf1pr/dDYNtdRR7b9G7v1n0V9TgJ3+qyxP2XaoVLKlyZ5e5IfqLV+Msm/TXJxkmcnuSebHylIrF0XvqbW+twk35jke0spX7/LvtanI6WURyb51iS/PNrkGlofk9bEWnWglPIvkjyY5C2jTfckeWqt9TlJfijJvy+lPDrWpwvz3tesUXdemtP/U9J11JEd/o09cdcdti10HfU5CbwryVPGnl+Q5O6OYhm8UsqZ2Tw531JrvSFJaq1/Wmv9XK3180l+Ll/4uJq1W7Fa692jx3uTvCOba/GnWx/zHD3eO9rd+nTnG5O8t9b6p4lrqKfmvW6s1YqN/uDBtyT5B6OPpmX0EcNTo+9PZPN3zL48m+sz/pFR69OyBe5rrqEOlFLOSHJNkrdtbXMddWOnf2NnBT+L+pwE/m6Sp5VSLhr97/m3J3lnxzEN0ugz469Pcket9V+PbR//PbIXJ9n6y1PvTPLtpZQvKqVclORp2fyFYlpQSnlUKeXsre+z+YcTbs/mOmz9daiXJ/nV0ffvTPIPR39h6kCST2x95IDWnfa/rq6hXpr3urkpyQtLKeeOPvb2wtE2WlBKuSrJDyf51lrrX45tf1wp5RGj778sm9fMR0Zr9KlSyoHRz7J/mC+sKS1Y4L7m33vd+JtJPlhrfehjnq6j1Zv0b+ys4GfRGQ2Oo1G11gdLKddmcwCPSPKGWuv7Ow5rqL4myXck+YMy+jPCSQ4leWkp5dnZfLv5T5L8r0lSa31/KeWXknwgmx/X+d5a6+dWHvVwPCHJOzbvIzkjyb+vtd5YSvndJL9USvnuJB9N8pLR/v8hm39d6sNJ/jLJd64+5OEppXxJkr+V0XUy8hOuoe6UUn4xyeVJHltKuSvJ4SQ/njmum1rrn5dSfiyb/5BNkh+ttc76hzLYxYT1+efZ/OuS7xrd895Ta/3H2fwLiD9aSnkwyeeS/OOxdfjfkvx8ki/O5u8Qjv8eIUuYsEaXz3tf8++99uy0RrXW1+fhv5+euI66MOnf2K3/LCqjT1IAAAAwAH3+OCgAAAANkwQCAAAMiCQQAABgQCSBAAAAAyIJBAAAGBBJIAAPU0r5XCnltrGvV66gz3NKKf/7AscdKaW8YsL2j43i/0Ap5aXNRLp6pZTnlFJqKeXKjuP4R6WUJ3UZAwDLkwQCsJMHaq3PHvv68RX0eU6SuZPAKX6q1vrsJC9K8rpSypkNt7+QUaHfeX4GvzTJfxk9dukfJZEEAqw5SSAAMymlPKaU8oellEtGz3+xlPI9o+//opTyr0op7y2l3FxKedxo+8WllBtLKSdKKf+5lPIVo+1PKKW8o5Tye6Ovr85mcdyLR+/c/cvRfv+0lPK7pZTfL6UcHYvlX4xieXeSS6bFXmv9UDYL6567QFwppfxQKeX20dcPjLa9evydy9E7j/9kUtyllAtLKXeUUn42yXuT/Egp5afGjv+eUsq/3mHeS5K/k80E7IWllLPG2vtgKeX6UVxvKaX8zVLKb5dSPlRKef5ov/NKKf/PKJb3lFKeORbvK8b6uX3U5lacP1dKeX8p5ddLKV9cSvk7SfYnectojb542rwD0E+SQAB28sXbPg7692qtn0hybZKfL6V8e5Jza60/N9r/UUneW2t9bpJbkhwebd9I8n211n1JXpHkZ0fbfybJLbXWZyV5bpL3J3llkjtH7zz+01LKC5M8Lcnzkzw7yb5SyteXUvYl+fYkz0lyTZLnTRtMKeW5ST5Ua7133rhG/X1nkhckOZDke0opz0ny1iR/b6ybv5vklyfFPdrnkiS/UGt9TpKfTPKtY+9OfmeSf7dD+F+T5I9rrXcm+c0k3zT22l9P8tNJnpnkK5L8/SRfOxrTodE+R5O8r9b6zNG2X5g2X6P4X1NrfUaS+5N8W631V5IcT/IPRmv0wAztANBDZ3QdAH6jpJcAAAODSURBVAC99MDoY5SnqbW+q5TykiSvSfKssZc+n+Rto+/fnOSGUsqXJvnqbCZGW/t90ejxG5L8w1Gbn0vyiVLKudu6e+Ho632j51+azeTk7CTvqLX+ZZKUUt65yzh+cPRu5ZcluWq0/7xxfe2ov0+Pjr8hydfVWn+mlPL40e/IPS7Jx2utHy2l/B8T4v5okv9Wa33PqP1Pl1L+U5JvKaXckeTMWusf7DCGl2Yz4czo8TuS3DB6/sdbx5RS3p/k5lprLaX8QZILR/t8bZJvG/X5n0op55dSHrPLnG21e9vo+xNjbQGwB0gCAZjZ6PfYLk3yQJLzktw1YdeazU+b3L9TMjlrd0leVWt93bYYfmDU/ix+qtb6k6WUa5L8Qinl4gXiKru89ivZ/KjmX8sXErVJcV+Y5NPbjr8+m+/OfTA7vAtYSnlENhO4by2l/ItR2+eXUs4e7fJXY7t/fuz55/OFn/E7xV+TPJjTPxF01tj34+1+LomPfgLsIT4OCsA8fjD5/9u5f9aogigM48/RTo2IhY0EtbFJ6wdQsBUTsJEUAbWxErS1kFSCX8BCJJWKGG1sFNJsDBIhMRFESKON2CiCf+pjMXNhWS7Z1cJluc+vnB2Gs/dWL+fc4QOlO3W/b5RxDyUMQRlJfJWZP4CPtXPYXIbSdA9XgKt1fW9EHAR+Urp8jRfApdq5IyKORsQRoAfM1e/UpoBzw4rOzKeUUcaFf6irB8xGxL6I2A/MAat1/yPKaOoFSiDcre62utaB6frMHrZsOQtsZ+Z0Zh7PzGPAMjA77D/36QHztZbTwNf6DD5RRl6bcdkTI5w1+I4kSRPIEChJajP4TeDtiDgJXAFuZOYqJVzcrPt/AzMRsUEZqVys6/PA5YjYpnz3d76uXwPO1LHFDWAmM78Ba/WCkjuZ+RJ4ALyu+54AU5m5SRk93aIEoiaQDbMIXK/dzL+paxNYAt4A68C9zHwLkJnvKaHoc2Z+qWutde9S12NgLTO/t/x2EXg2sLZMCY2jugWcioh3lMt3FvrOORwRW5TguzPCWUvAXS+GkaTJFpmjTtRIktQuIn5l5oFx1zGJIuI5ZWx1Zdy1SJK6wU6gJEljEBGHImKHcgmPAVCS9N/YCZQkSZKkDrETKEmSJEkdYgiUJEmSpA4xBEqSJElShxgCJUmSJKlDDIGSJEmS1CGGQEmSJEnqkD+hlYNVFP0+2AAAAABJRU5ErkJggg==\n",
      "text/plain": [
       "<Figure size 1080x720 with 1 Axes>"
      ]
     },
     "metadata": {
      "needs_background": "light"
     },
     "output_type": "display_data"
    }
   ],
   "source": [
    "# Scatter plot of Age vs. Expected Recovery Amount\n",
    "from matplotlib import pyplot as plt\n",
    "%matplotlib inline\n",
    "plt.figure(figsize=(15,10))\n",
    "plt.scatter(x=df['expected_recovery_amount'], y=df['age'], c=\"g\", s=2)\n",
    "plt.xlim(0, 2000)\n",
    "plt.ylim(0, 60)\n",
    "plt.xlabel('Expected Recovery Amount')\n",
    "plt.ylabel('Age')\n",
    "plt.legend(loc=2)\n",
    "# ... YOUR CODE FOR TASK 2 ...\n",
    "plt.show()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 3. Statistical test:  age vs. expected recovery amount\n",
    "<p>We want to convince ourselves that variables such as age and sex are similar above and below the \\$1000 Expected Recovery Amount threshold. This is important because we want to be able to conclude that differences in the actual recovery amount are due to the higher Recovery Strategy and not due to some other difference like age or sex.</p>\n",
    "<p>The scatter plot of age versus Expected Recovery Amount did not show an obvious jump around \\$1000.  We will now do statistical analysis examining the average age of the customers just above and just below the threshold. We can start by exploring the range from \\$900 to \\$1100.</p>\n",
    "<p>For determining if there is a difference in the ages just above and just below the threshold, we will use the Kruskal-Wallis test, a statistical test that makes no distributional assumptions.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 5,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/plain": [
       "KruskalResult(statistic=3.4572342749517513, pvalue=0.06297556896097407)"
      ]
     },
     "execution_count": 5,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Import stats module\n",
    "from scipy import stats\n",
    "\n",
    "# Compute average age just below and above the threshold\n",
    "era_900_1100 = df.loc[(df['expected_recovery_amount']<1100) & \n",
    "                      (df['expected_recovery_amount']>=900)]\n",
    "by_recovery_strategy = era_900_1100.groupby(['recovery_strategy'])\n",
    "by_recovery_strategy['age'].describe().unstack()\n",
    "\n",
    "# Perform Kruskal-Wallis test \n",
    "Level_0_age = era_900_1100.loc[df['recovery_strategy']==\"Level 0 Recovery\"]['age']\n",
    "Level_1_age = era_900_1100.loc[df['recovery_strategy']==\"Level 1 Recovery\"]['age']\n",
    "stats.kruskal(Level_0_age,Level_1_age) "
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 4. Statistical test:  sex vs. expected recovery amount\n",
    "<p>We have seen that there is no major jump in the average customer age just above and just \n",
    "below the \\$1000 threshold by doing a statistical test as well as exploring it graphically with a scatter plot.  </p>\n",
    "<p>We want to also test that the percentage of customers that are male does not jump across the \\$1000 threshold. We can start by exploring the range of \\$900 to \\$1100 and later adjust this range.</p>\n",
    "<p>We can examine this question statistically by developing cross-tabs as well as doing chi-square tests of the percentage of customers that are male vs. female.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 6,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "sex                Female  Male\n",
      "recovery_strategy              \n",
      "Level 0 Recovery       32    57\n",
      "Level 1 Recovery       39    55\n",
      "0.5377947810444592\n"
     ]
    }
   ],
   "source": [
    "# Number of customers in each category\n",
    "crosstab = pd.crosstab(df.loc[(df['expected_recovery_amount']<1100) & \n",
    "                              (df['expected_recovery_amount']>=900)]['recovery_strategy'], \n",
    "                       df['sex'])\n",
    "# ... YOUR CODE FOR TASK 4 ...\n",
    "print(crosstab)\n",
    "# Chi-square test\n",
    "chi2_stat, p_val, dof, ex = stats.chi2_contingency(crosstab)\n",
    "# ... YOUR CODE FOR TASK 4 ...\n",
    "print(p_val)"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 5. Exploratory graphical analysis: recovery amount\n",
    "<p>We are now reasonably confident that customers just above and just below the \\$1000 threshold are, on average, similar in their average age and the percentage that are male.  </p>\n",
    "<p>It is now time to focus on the key outcome of interest, the actual recovery amount.</p>\n",
    "<p>A first step in examining the relationship between the actual recovery amount and the expected recovery amount is to develop a scatter plot where we want to focus our attention at the range just below and just above the threshold. Specifically, we will develop a scatter plot of  Expected Recovery Amount (X) versus Actual Recovery Amount (Y) for Expected Recovery Amounts between \\$900 to \\$1100.  This range covers Levels 0 and 1.  A key question is whether or not we see a discontinuity (jump) around the \\$1000 threshold.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 8,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "image/png": "iVBORw0KGgoAAAANSUhEUgAAAuYAAAHkCAYAAAByuerFAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAAALEgAACxIB0t1+/AAAADl0RVh0U29mdHdhcmUAbWF0cGxvdGxpYiB2ZXJzaW9uIDIuMi4zLCBodHRwOi8vbWF0cGxvdGxpYi5vcmcvIxREBQAAIABJREFUeJzs3XmcXGWZ8P3fxSIIAoZNGRJMyEQRXkIgDRIYNhmTyCuyKAI6EtAxjiPuyyCOE+LuoPLqowNGBwFBUFGEZ14kYoSAEpAORkCWh6AgEYaEAEGHnVzPH3U6VJpeqrtrOVX1+34+9emqu0+duuru01VX3XXd94nMRJIkSVJrbdDqACRJkiSZmEuSJEmlYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSXQsMQ8IiZExFURcXtE/D4iPlC0bx0RV0bEXcXPcUV7RMTXI2J5RNwcEXtV7WtOsf1dETGnUTFLkiRJrRKNWsc8InYAdsjMmyJiC2ApcCRwIvBwZn4xIk4BxmXmv0TEYcD7gMOA1wBfy8zXRMTWQC/QA2Sxn+mZ+UhDApckSZJaoGEj5pn5QGbeVFz/C3A7sCNwBHBusdm5VJJ1ivbzsuJ64KVFcj8LuDIzHy6S8SuB2Y2KW5IkSWqFptSYR8REYE/gBuBlmfkAVJJ3YPtisx2B+6rutqJoG6xdkiRJ6hgbNfoBIuIlwI+BD2bmYxEx6KYDtOUQ7QM91lxgLsDmm28+fZdddhl5wJIkSVKNli5d+lBmblePfTU0MY+Ijakk5Rdk5k+K5gcjYofMfKAoVVlZtK8AJlTdfTxwf9F+cL/2qwd6vMxcACwA6Onpyd7e3jo9E0mSJOmFIuLeeu2rkauyBPCfwO2Z+dWqX10G9K2sMge4tKr9hGJ1ln2BNUWpy0JgZkSMK1ZwmVm0SZIkSR2jkSPm+wNvB26JiGVF26nAF4EfRsQ7gT8BxxS/u5zKiizLgceBkwAy8+GI+AxwY7HdpzPz4QbGLUmSJDVdw5ZLbDVLWSRJktRoEbE0M3vqsa+GT/4sk2eeeYYVK1bw5JNPtjoUdZFNN92U8ePHs/HGG7c6FEmSVGJdlZivWLGCLbbYgokTJzLE6jBS3WQmq1evZsWKFUyaNKnV4UiSpBJryjrmZfHkk0+yzTbbmJSraSKCbbbZxm9pJEnSsLoqMQdMytV0HnOSJKkWXZeYS5IkSWVkYl5SV199Ndddd92Y9vGSl7ykTtFoOJ///OdbHYIkSWpzJuYlVY/EvFbPPfdcUx5nOM8++2yrQxg1E3NJkjRWJuZNduSRRzJ9+nR22203FixYAMAVV1zBXnvtxR577MGhhx7KPffcw1lnncUZZ5zBtGnTuPbaaznxxBO5+OKL1+2nbzT8r3/9K4ceeih77bUXu+++O5deeumAj9vf1VdfzSGHHMJb3/pWdt99dwDOP/989tlnH6ZNm8a73/3udQl7//gAHn74YY488kimTp3Kvvvuy80338zatWuZOHEijz766LrH+du//VsefPBBVq1axZve9Cb23ntv9t57b379618DcNpppzF37lxmzpzJCSecwAEHHMCyZcvW3X///ffn5ptvHvA5/OY3v2G//fZjzz33ZL/99uPOO+8E4JxzzuHII4/k8MMPZ9KkSXzjG9/gq1/9KnvuuSf77rsvDz9cOT/VsmXL2HfffZk6dSpHHXUUjzzyCAAHH3wwfWvgP/TQQ0ycOHHdfo8++mhmz57NlClT+PjHPw7AKaecwhNPPMG0adN429veVlP/S5IkvUBmduRl+vTp2d9tt932grbhXPen63LW92bldX+6bsT3Hcjq1aszM/Pxxx/P3XbbLf/7v/87x48fn3/4wx/W+/28efPy9NNPX3e/OXPm5I9+9KN1tzfffPPMzHzmmWdyzZo1mZm5atWqnDx5cq5du3a9bQZy1VVX5WabbbbucW+77bZ8wxvekE8//XRmZr7nPe/Jc889N1euXDlgfCeffHKedtppmZm5aNGi3GOPPTIz8/3vf3+effbZmZl5/fXX56GHHpqZmccff3xee+21mZl577335i677LLuee611175+OOPZ2bmOeeckx/4wAcyM/POO+/Mgf6OfdasWZPPPPNMZmZeeeWVefTRR2dm5ne/+92cPHlyPvbYY7ly5crccsst88wzz8zMzA9+8IN5xhlnZGbm7rvvnldffXVmZn7qU59a97gHHXRQ3njjjev69BWveMW6/U6aNCkfffTRfOKJJ3KnnXbKP/3pT8P2dV//SpKkzgP0Zp3y165ax3w05i+ez8K7FwJwxT9cMeb9ff3rX+eSSy4B4L777mPBggUceOCB69a43nrrrUe0v8zk1FNP5ZprrmGDDTbgz3/+Mw8++CAvf/nLh73vPvvss+5xFy1axNKlS9l7770BeOKJJ9h+++25/vrrB4zvV7/6FT/+8Y8BeO1rX8vq1atZs2YNxx57LJ/+9Kc56aSTuOiiizj22GMB+MUvfsFtt9227rEfe+wx/vKXvwDwxje+kRe/+MUAHHPMMXzmM5/h9NNP5+yzz+bEE08cNP41a9YwZ84c7rrrLiKCZ555Zt3vDjnkELbYYgu22GILttpqKw4//HAAdt99d26++WbWrFnDo48+ykEHHQTAnDlzOOaYY4bts0MPPZStttoKgF133ZV7772XCRMmDHs/SZKk4ZiYD2PeQfPW+zkWV199Nb/4xS9YsmQJm222GQcffDB77LHHuhKMoWy00UasXbsWqCTjTz/9NAAXXHABq1atYunSpWy88cZMnDix5jWzN99883XXM5M5c+bwhS98Yb1tLrvssgGX+6t8QFxfRDBjxgyWL1/OqlWr+OlPf8q//uu/ArB27VqWLFmyLgEfLI7NNtuM173udVx66aX88Ic/XFdSMpBPfepTHHLIIVxyySXcc889HHzwwet+t8kmm6y7vsEGG6y7vcEGGwxby17d1/37snq/G264YVvXxUuSpHKxxnwYMybM4Ip/uIIZE2aMeV9r1qxh3LhxbLbZZtxxxx1cf/31PPXUUyxevJg//vGPAOvqn7fYYot1I8oAEydOZOnSpQBceuml60aH16xZw/bbb8/GG2/MVVddxb333juq2A499FAuvvhiVq5cuS6Oe++9lxkzZgwY34EHHsgFF1wAVD5wbLvttmy55ZZEBEcddRQf/vCHefWrX80222wDwMyZM/nGN76x7vGq68j7+8d//Efe//73s/feew/5DcKaNWvYcccdgUr990hstdVWjBs3jmuvvRaA733ve+tGz6v7urqufygbb7zxeiP2kiRJI2Vi3kSzZ8/m2WefZerUqXzqU59i3333ZbvttmPBggUcffTR7LHHHutKPw4//HAuueSSdZM/3/Wud7F48WL22WcfbrjhhnWjzG9729vo7e2lp6eHCy64gF122WVUse2666589rOfZebMmUydOpXXve51PPDAA4PGd9ppp9Hb28vUqVM55ZRTOPfcc9ft69hjj+X8889fty1USnj6tt91110566yzBo1l+vTpbLnllpx00klDxvzxj3+cT3ziE+y///6jWlnm3HPP5WMf+xhTp05l2bJl/Nu//RsAH/3oRznzzDPZb7/9eOihh2ra19y5c5k6daqTPyVJ0qjFQCUJnaCnpyf7l0HcfvvtvPrVr25RRKrV/fffz8EHH8wdd9zBBht0xmdHjz1JkjpTRCzNzJ567Kszsh51jPPOO4/XvOY1fO5zn+uYpFySJKkWTv7scLfccgtvf/vb12vbZJNNuOGGG1oU0dBOOOEETjjhhPXavvvd7/K1r31tvbb999+fb37zm80MTZIkqaFMzDvc7rvvPuREy3Zw0kknDVtvLkmS1O66rlagU2vqVV4ec5IkqRZdlZhvuummrF692kRJTZOZrF69mk033bTVoUiSpJLrqlKW8ePHs2LFClatWtXqUNRFNt10U8aPH9/qMCRJUsl1VWK+8cYbrzu1vCRJklQmXVXKIkmSJJWVibkkSZJUAibmkiRJUgmYmEuSJEklYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSVgYi5JkiQNYsl9S5h9/myW3Lek4Y/VVWf+lCRJkkZi/uL5LLx7IQBX/MMVDX0sE3NJkiRpEPMOmrfez0YyMZckSZIGMWPCjIaPlPexxlySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqgYYl5hFxdkSsjIhbq9p+EBHLiss9EbGsaJ8YEU9U/e6sqvtMj4hbImJ5RHw9IqJRMUuSJEmtslED930O8A3gvL6GzDy273pEfAVYU7X93Zk5bYD9nAnMBa4HLgdmAz9rQLySJElSyzRsxDwzrwEeHuh3xaj3W4ALh9pHROwAbJmZSzIzqST5R9Y7VkmSJKnVWlVjfgDwYGbeVdU2KSJ+GxGLI+KAom1HYEXVNiuKtgFFxNyI6I2I3lWrVtU/akmSJKlBWpWYH8/6o+UPADtl5p7Ah4HvR8SWwED15DnYTjNzQWb2ZGbPdtttV9eAJUmSpEZqZI35gCJiI+BoYHpfW2Y+BTxVXF8aEXcDr6QyQj6+6u7jgfubF60kSZLUHK0YMf974I7MXFeiEhHbRcSGxfWdgSnAHzLzAeAvEbFvUZd+AnBpC2KWJEmSGqqRyyVeCCwBXhURKyLincWvjuOFkz4PBG6OiN8BFwP/lJl9E0ffA3wHWA7cjSuySJIkqQNFZbGTztPT05O9vb2tDkOS2tKS+5Ywf/F85h00jxkTZrQ6HEkqrYhYmpk99dhX02vMJUnlN3/xfBbevRCAK/7hihZHI0ndwcRckvQC8w6at95PSVLjmZhLkl5gxoQZjpRLUpO1ah1zSZIkSVVMzCVJkqQSMDGXJEkNs+S+Jcw+fzZL7lvS6lCk0rPGXJIkNYwr/Ei1MzGXJEkN4wo/Uu1MzCVJUsO4wo9UO2vMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSUNyHWpJag5XZZEkDcl1qCWpOUzMJUlDch1qSWoOE3NJ0pBch1qSmsMac0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqgYYl5hFxdkSsjIhbq9pOi4g/R8Sy4nJY1e8+ERHLI+LOiJhV1T67aFseEac0Kl5JkiSplRo5Yn4OMHuA9jMyc1pxuRwgInYFjgN2K+7zHxGxYURsCHwTeD2wK3B8sa0kSZLUUTZq1I4z85qImFjj5kcAF2XmU8AfI2I5sE/xu+WZ+QeAiLio2Pa2OocrSZIktVQrasxPjoibi1KXcUXbjsB9VdusKNoGa5ckSZI6SrMT8zOBycA04AHgK0V7DLBtDtE+oIiYGxG9EdG7atWqscYqSZIkNU1TE/PMfDAzn8vMtcC3eb5cZQUwoWrT8cD9Q7QPtv8FmdmTmT3bbbddfYOXJEmSGqipiXlE7FB18yigb8WWy4DjImKTiJgETAF+A9wITImISRHxIioTRC9rZsySJElSMzRs8mdEXAgcDGwbESuAecDBETGNSjnKPcC7ATLz9xHxQyqTOp8F3puZzxX7ORlYCGwInJ2Zv29UzJIkSVKrROagJdttraenJ3t7e1sdhiRJkjpYRCzNzJ567Mszf0qSJEklYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSVgYi5JkiSVgIm5JEmSVAIm5pIkSVIJmJhLkiRJJWBiLkmSJJWAibkkSZJUAibmkiRJUgmYmEuSJEklYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSVgYi5JkiSVgIm5JEmSVAIm5pIkSVIJmJhLkiRJJWBiLkmSJJWAibkkSZJUAibmkiRJUgmYmEuSJEklYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSVgYi5JkiSVgIm5JEmSVAIm5pIkSVIJmJhLkiRJJWBiLkmSJJWAibkkSZJUAibmkiRJUgmYmEuSJEklYGIuSZIklYCJuSRJklQCJuaSJElSCZiYS5IkSSVgYi5JkqSWWXLfEmafP5sl9y1pdSgtN2xiHhH719ImSZIkjdT8xfNZePdC5i+e3+pQatLIDxIb1bDN/wL2qqFNkiRJGpF5B81b72fZ9X2QALjiH66o674HTcwjYgawH7BdRHy46ldbAhvWNQpJkiR1pRkTZtQ9wW2kRn6QGKqU5UXAS6gk71tUXR4D3jzcjiPi7IhYGRG3VrWdHhF3RMTNEXFJRLy0aJ8YEU9ExLLiclbVfaZHxC0RsTwivh4RMbqnKkmSJI1N3weJGRNm1H3fg46YZ+ZiYHFEnJOZ945i3+cA3wDOq2q7EvhEZj4bEV8CPgH8S/G7uzNz2gD7OROYC1wPXA7MBn42ingkSZKk0qqlxnyTiFgATKzePjNfO9SdMvOaiJjYr+3nVTevZ5iR94jYAdgyM5cUt88DjsTEXJIkSR2mluUSfwT8FvhX4GNVl7F6B+sn2JMi4rcRsTgiDijadgRWVG2zomiTJEmqO5fuUyvVMmL+bGaeWc8HjYhPAs8CFxRNDwA7ZebqiJgO/DQidgMGqifPIfY7l0rZCzvttFM9Q5YkSV2gkStuSMOpJTH/3xHxz8AlwFN9jZn58GgeMCLmAG8ADs3MLPb1VN++M3NpRNwNvJLKCPn4qruPB+4fbN+ZuQBYANDT0zNoAi9JkjSQdlu6T52llsR8TvGzunwlgZ1H+mARMZvKZM+DMvPxqvbtgIcz87mI2BmYAvwhMx+OiL9ExL7ADcAJVNZQlyRJqrt2W7pPnWXYxDwzJ41mxxFxIXAwsG1ErADmUVmFZRPgymLVw+sz85+AA4FPR8SzwHPAP1WNyL+HygovL6ZSk+7ET0mSJHWcKKpJBt8g4oSB2jPzvIHay6Knpyd7e3tbHYYkNd2S+5Ywf/F85h00ryHr7EqSnhcRSzOzpx77qmVVlr2rLgcApwFvrMeDS5Lqr2/y2vzF81sdSldxNQ9JY1VLKcv7qm9HxFbA9xoWkSRpTJy81hqu5iFprGoZMe/vcSqTMyWprXXqCGcjTxetwc07aB6zJs/yA5GkURt2xDwi/jfPrx2+IfBq4IeNDEqSmsERTtWTq3lIGqtalkv8ctX1Z4F7M3PFYBtLUruw5EOSVCbDlrJk5mLgDmALYBzwdKODkqRmsORDnaZTy7OkbjFsYh4RbwF+AxwDvAW4ISLe3OjAJEnSyLgij9Teaill+SSwd2auhHVn6fwFcHEjA5MkSSNjeZbU3mpJzDfoS8oLqxndai6SJKmBnIAqtbdaEvMrImIhcGFx+1jgZ40LSZIkSeo+tUz+/BiwAJgK7AEsyMyPNzowSWpHTr6TJI1WLSPmZOaPI+LKvu0jYuvMfLihkUlSG3JtdEnSaNVygqF3A58GngDWAkHlhEM7NzY0SWo/Tr6TJI1WLZM4PwrslpkTM3PnzJyUmSblkjQA10aX1Iks02uOWkpZ7gYeb3QgkiRJKifL9JqjlsT8E8B1EXED8FRfY2a+v2FRSZIkqTQs02uOWhLzbwG/BG6hUmMuSZKkDrfkviXMXzyfeQfNc438JqklMX82Mz/c8EgkSZJUGpavNF8tkz+vioi5EbFDRGzdd2l4ZJIkSWqa/hM85x00j1mTZ1m+0kS1JOZvpagzB5YWl95GBiVJktrXYCt4uLJHufWNkM9fPB9or1WmOuXYGraUJTMn9W+LiBc1JhxJktTuBiuBsDSi3Np5gmenHFs1nfkTICICOITKCPrhwMsaFZQkSWpfgyV47Zz4dYN2nuDZKcdWZObQG0S8hkoyfhSwNfBe4LLMfKTx4Y1eT09P9vZacSNJtei/+oIkqTYRsTQze+qxr0FrzCPicxFxF/B5Kksl7gmsysxzy56US5JGpn9tqSSp+YYqZZkL3AmcCfxXZj4ZEUMPr0uS2lKnfA0sSe1sqMT85cBM4Hjg/4uIq4AXR8RGmflsU6KTJDVFO9eWSlKnGDQxz8zngJ8BP4uITYE3AJsBf46IRZn51ibFKEmSJHW8WtYxJzOfzMyLM/NNwBRgYWPDkiRJnaZT1prur1Ofl5qv5uUS+2TmY8C5DYhFkiR1sE5Za7q/Tn1ear4RJ+aSJEmj0amTjDv1ean5hl3HvF25jrkkSWp3nmOg/Oq5jvmwI+YR0Qt8F/i+65dLkiQ1j2Uy3aWWyZ/HAX8D3BgRF0XErIiIBsclSZLU9eYdNI9Zk2dZJtMEZZjEO2xinpnLM/OTwCuB7wNnA3+KiPkRsXWjA5QkSZ2vDElRGfWdY6AVZSzd9jcpwxmQa5r8GRFTgZOAw4AfAxcAfwf8EpjWsOgkSVJXsGSjfLrtb1KGSby11JgvBR4F/hM4JTOfKn51Q0Ts38jgJElSd6g1KXIyZPOUIVFtpjKcAXnIVVkiYgMqyfjnmxdSfbgqiyRJnWf2+bNZePdCZk2e1fIkSoL6rsoyZI15Zq4FZtfjgSRJksbKyZC16bb68E5Ry6osV0bERyNiQkRs3XdpeGSSJGlY3ZaAtXIyZDspw0RGjVwtkz/fUfx8b1VbAjvXPxxJkjQS3TZBT7XptvrwTjFsYp6Zk5oRiCRJGjkTMA2kDBMZNXK1rMqyGfBhYKfMnBsRU4BXZeZ/NTw6SZI0JBMwqXPUUmP+XeBpYL/i9grgsw2LSFLH6LbaV0lS67Xze08tNeaTM/PYiDgeIDOfiIhocFySOoC1r5KkZmvn955aEvOnI+LFVCZ8EhGTgaeGvoskWfsqSWq+dn7vGfIEQwARMRP4JLAr8HNgf+DEzLy64dGNgScYkiRJqp1nVR2dpp1gCCAzfw4cDZwIXAj01JqUR8TZEbEyIm6tats6Iq6MiLuKn+OK9oiIr0fE8oi4OSL2qrrPnGL7uyJizsieoiRJ7a2da2bVPlz7vPWGTcwj4jJgJnB1Zv5XZj40gv2fwwvPHHoKsCgzpwCLitsArwemFJe5wJnF428NzANeA+wDzOtL5iVJ6gYmTGoGz6raerWsyvIV4ADgtoj4UUS8OSI2rWXnmXkN8HC/5iOAc4vr5wJHVrWflxXXAy+NiB2AWcCVmflwZj4CXMkLk31JkjpWtyVM/b8h8BuD5vCsqq1XSynL4sz8Zypn+lwAvAVYOYbHfFlmPlDs+wFg+6J9R+C+qu1WFG2Dtb9ARMyNiN6I6F21atUYQpQktYtuSNq6LWHq/w2B3xh0r274/65Wy6osFKuyHA4cC+zF8yPe9TTQEow5RPsLGzMXUPnwQE9Pz9CzWiVJHaGdl0ZrtHadzNd/VY12XmVDY9Nt/9+11Jj/ALgdeC3wTSrrmr9vDI/5YFGiQvGzb/R9BTCharvxwP1DtEuSNGSZR7eNtvXXriPN/b8h6MRvDLr92KxVt5Vx1TJi/l3grZn5XJ0e8zJgDvDF4uelVe0nR8RFVCZ6rsnMByJiIfD5qgmfM4FP1CkWSVKbG+qU9N022tafI83lVZZjs+zfqgz1/92JaknMFwHvjYgDi9uLgbMy85nh7hgRFwIHA9tGxAoqq6t8EfhhRLwT+BNwTLH55cBhwHLgceAkgMx8OCI+A9xYbPfpzOw/oVSSpBfo9sS025KadlKWY7MsHxBUUcsJhr4DbMzzdeVvB57LzH9scGxj4gmGJElqvbKPyHY7/z5jV88TDNUyYr53Zu5RdfuXEfG7ejy4JEnqbI7IlpvfqpRLLeuYPxcRk/tuRMTOQL3qzaW6cjKNJJVLt03ek8ailsT8Y8BVEXF1RCwGfgl8pLFhSaPTrisQSFKnKvuKKg7otIb9PrBaTjC0CJgCvL+4vCozr2p0YNJoODIjSe2vmUlbqwZ0WpWYliUhdiBtYMPWmEfEe4ELMvPm4va4iHhnZv5Hw6OTRshaOUlqf82sS2/V6iitqr0vS81/WValKZtaJn++KzO/2XcjMx+JiHcBJuaSJKnumpm01XtAp9ZVTlqVmJYlIXYgbWC1LJd4M7BHFhtGxIbAzZm5WxPiGzWXS5QkSc1QnYz3jUjPmjzLxLNL1HO5xFomfy6kckKgQyPitcCFgEeaJA2gLPWbkpqnul663eY6+ZpVLrWUsvwL8G7gPUAAPwe+08igJKldlaV+U1LzVJeHtFuJhq9Z5TJsYp6ZayPiHOCXmXln40OSpPZVlvpNSc3Tbsl4NV+zyqWWGvM3AqcDL8rMSRExDfh0Zr6xGQGOljXmkurFU1ZLkgZTzxrzWkpZ5gH7AFcDZOayiJhYjweXpHbgV72SpGaoJTF/NjPXRETDg5GkMvKrXklSM9SyKsutEfFWYMOImBIR/wu4rsFxSVJplP2U4pLUzlwZ5nm1JObvA3YDngK+DzwGfLCRQUmSpPZlotUcndLP1ctNdrtaVmV5HPhkcQEgIl4B3NvAuCRJUptyXkZzdEo/Wy74vCET84iYAewIXJOZKyNiKnAKcAAwoQnxSZKkNmOi1Ryd0s/tvNxkvQ26XGJEnA68AVgG/C3wX8A/A58HvpWZTzYryNFwuURJkiQ1Wj2XSxyqxvz/BfbMzOOBmVRGyv8uM79W9qS8WqfUX0mSJKmzDZWYP9GXgGfmI8CdmXlXc8KqHycUqEz8oCh1H//vO5N/VzXCUDXmkyPisqrbE6tvl/3Mn306pf5KnaFTJupIqp3/953Jv2v3aObZn4dKzI/od/srjQykUeoxocDTcate/KAodZ/R/t/73lNuvp53j2Z+CBt08me7q+fkz9nnz2bh3QuZNXmWn4o1IN9ApfZT9v9b33ukchjutaKekz+HXcdcfirW8PxKU2o/Zf8an0S8AAAef0lEQVS/9b1HZVX2D7X11szlHE3Ma+D6mhqOb6BS+yn7/63vPSqrsn+obWeWskjqWt026iNJ9eBr5/qaso55RPzviLhssEs9HlySWsnlVDWQeiyD16ql9LphCb9ueI5l1/dtjkl5/Q1VyvLlpkUhSS1Q9lIGra9Zo3T1+Jq+VV/1N/NxWzVqWo/n6IivymrQxDwzFzczEElqNmt420uzks56fGBr1Ye+Zj5uqz581OM5WiOtshq2xjwipgBfAHYFNu1rz8ydGxva2FhjLnU+R726i3/vcmnnv0c7x67yqWeNeS2J+a+AecAZwOHAScX9Sv3dr4m51Plc51kjYTImqRGavY75izNzUUREZt4LnBYR11JJ1iWpZawR10hYviCp7AZdlaXKkxGxAXBXRJwcEUcB2zc4LkkalisDaCTmHTSPWZNn+UFOdVfrSjGuKKPh1JKYfxDYDHg/MB14OzCnkUFJklRvfpBTo9S69GqnLtHqB476GbaUJTNvLK7+lUp9uSRJkgq1ltV1avmdZWL1U8vkz6uAF2yUma9tVFD14ORPVXPSlyRJjdHt77FNOfNnlY8CHysunwKWAWa8GpVWfd3VqV8fSpLUamUoE+uUcppaSlmW9mv6dUR48iGNSjufkEKSJJVTp5TTDDtiHhFbV122jYhZwMubEJsG0c6fClu1KkIZPs1Lqp92fh2UVH+dsupSLaUsS6mUriwFlgAfAd7ZyKA0tHYuyyhLguybutqRx+3z2vl1sB48FqT1lSW/GKtaTjD06sx8srohIjZpUDyqgWUZY9cpX3mpu3jcPq+Rr4PtMJHNY0HqTLUk5tcBe/VrWzJAm5qk71OhRs8PN2pHHrfPa+TrYDskvR4LUmcadLnEiHg5sCNwPvBWIIpfbQmclZm7NCXCUXK5REkqj3YYhe7TTrFKar1mLZc4C/gyMB74StXlQ8Cp9XjwbmVtYLn595Hqr51qwjulVlVS+xm0lCUzzwXOjYg3ZeaPmxhTx2uHr0m7mX8fqf4svZAay296OkMtq7JMj4iX9t2IiHER8dnRPmBEvCoillVdHouID0bEaRHx56r2w6ru84mIWB4RdxbLNba1TlnSp1P59+ls3f6NSKuev6PQGolu/z8djXb6VkqDqyUxf31mPtp3IzMfAQ4bYvshZeadmTktM6cB04HHgUuKX5/R97vMvBwgInYFjgN2A2YD/xERG4728cug+g3KF5/yMYHobN3+5tXtz1/tweN05NphUMmcZ3i1rMqyYURskplPAUTEi4F6LZd4KHB3Zt4bEYNtcwRwUfH4f4yI5cA+VFaGaXuWTdSXX+VpON1eUtHtz1/tweN05NphxTZznuHVkpifDyyKiO8CCbwDOK9Oj38ccGHV7ZMj4gQqJzT6SDE6vyNwfdU2K4q2juCLT335T6/htMObVyN1+/NXe/A47UzmPMMbdLnE9TaKmA38PZUlE3+emQvH/MARLwLuB3bLzAcj4mXAQ1SS/88AO2TmOyLim8CSzDy/uN9/ApcPNCE1IuYCcwF22mmn6ffee+9Yw1SbccRcUifytU0qr2Ytl7hOZl6RmR/NzI8Afy2S5bF6PXBTZj5YPMaDmflcZq4Fvk2lXAUqI+QTqu43nkpCP1CcCzKzJzN7tttuuzqEqHZjffjwrPGT2o8111J3qCkxj4hpEfGliLgH+CxwRx0e+3iqylgiYoeq3x0F3Fpcvww4LiI2iYhJwBTgN3V4fKkr+QavRvFDX+O0w8Q+SWM3aI15RLySSg348cBq4AdUSl8OGeuDRsRmwOuAd1c1/3tETKNSynJP3+8y8/cR8UPgNuBZ4L2Z+dxYY5C6lTV+ahTneDSONddS7dq59GvQGvOIWAtcC7wzM5cXbX/IzJ2bGN+o9fT0ZG9vb6vDkNQC7fyi3M7sd0llMPv82Sy8eyGzJs9qygfaZtWYvwn4b+CqiPh2RBxKZfKnJI1ZI8seLNdpDed4DMwSH6m52rn0a9DEPDMvycxjgV2Aq4EPAS+LiDMjYmaT4pPagm+8I9fI5LmdX5RVm3b6n/ODotRc7TxIMOw65pn5P8AFwAURsTVwDHAK8PMGxya1DWtrR66Rte7W43a+dvqf66R5HZYrSY1V06osfTLz4cz8Vma+tlEBSe2o20doRzN62c4jGmq9dvqf66Rj3dH/cmmnb45Um1rO/ClpGN0+QttOo5et4khjfXX7/1yrdNLofyfwtbfzmJhLGjPfrIfnG6g6gR+IxqbeH9B97e08JuaSxsw36+H5Biqp3h/Qfe3tPCOqMZckjU4n1RlLWl+ttd7tNDdCreGIuSRJ0hjUOhLuCLeGY2IuSZI0BpaqqV4sZZEkaRRcqm5w3dY3lqqpXhwxlyRpFFxpZ3D2jTQ6XT1i3m2f6CVJ9eNEvsHZN83RznlMO8debcl9S2AbptRrf12dmHsGM6lzXhyrdeJzUvnUWr7QjcejpR3N0c55TDvHXm3+4vnwIras1/66upTFyRpSe3/lPNjJOtr5OanzeDyqUdo5j2nn2KvNO2geC59e+Fi99tfVibnLFknt/eI4WMLTzs9JncfjUY3SznlMO8debcaEGbCau+q1v8jMeu2rVHp6erK3t7fVYTRFvU/xK7ULj31JUqtFxNLM7KnHvrp6xLxT+DWpulWnjLhIkgQm5h3Br0klSZLaX1evytIpnP0uSVJ9dOMqOioPE3NJ6/iGJKnbdcoyfmXke8zwTMzHwANMncY3JEndzpMjNY7vMcOzxnwMnHSpTuN8BUndzknljeN7zPBcLnEMunGptm58zpIkSYOp53KJlrKMQTdOuvRrKI2F5V/tw7+VJDWfpSwaEb+G0lhY/tU+/FtJUvOZmGtErL3TWPjBrn34t5Kk5rPGXJIG4HwKSVIt6llj7oi5JA3AUg5JUrM5+XMATnpSM3iclZtrGUuSms3EfACuPKJm6H+cmaiXSzeuuiRJai1LWQbgpCc1Q//jzNIJSZK6m5M/O4CT1DqDf0dJktqPkz+1HkdaO4NLUUqS1N1MzDuApTeSJEntz8S8AzjSKkmS1P46dlWWux6+q+1Wt3BVDkmSpO7VsYn5Y08+1nbLHbpMoyRJUvfq2FKWLTfdsu1qrq0VlyRJ6l4dO2LejupxQpMFSxew7b9vy4KlC+oYmRrB0iVJklStYxPzdixlqYdTF53K6idWc+qiU1sdigZQnYx/aOGHWHj3Qj608EOtDquu/MAhSdLoWMrSYT5/6Oc5ddGpfP7Qz7c6FA2ges35TuW6+pIkjU7HJuZTtp7SlWdPnDt9LnOnz211GBpE/3kEfWf67CTOlZAkaXQiM1sdQ0P09PRkb29vq8OQJElSB4uIpZnZU499dWyNeZlYcytptKpfP3wtkaTO1rJSloi4B/gL8BzwbGb2RMTWwA+AicA9wFsy85GICOBrwGHA48CJmXlTK+IeDWtuJY1W/3kJvpZIUudq9Yj5IZk5rWr4/xRgUWZOARYVtwFeD0wpLnOBM5se6RjMO2gesybPsuZWbaWVo7OdODJc63Pqv13164evJZLU2VpWY16MmPdk5kNVbXcCB2fmAxGxA3B1Zr4qIr5VXL+w/3aD7X+rnbfKKxaPbU1wqZvNPn82C+9eyKzJs5o+OtvKx26UWp9TJz53SepknVJjnsDPI2JpRPQtI/KyvmS7+Ll90b4jcF/VfVcUbYPq1nXM++vEkUc1RytHZztxZLj/cxrsf7MTn7skqTatHDH/m8y8PyK2B64E3gdclpkvrdrmkcwcFxH/P/CFzPxV0b4I+HhmLu23z7lUSl3YdJtNp//yt7/s+hHzTh99W3LfknVLDnb731rtpdP/NzU4X7ekztIRI+aZeX/xcyVwCbAP8GBRwkLxc2Wx+QpgQtXdxwP3D7DPBZnZk5k9u03czRc8On/0rW9inN+OlMdovqXpxm92qv83u/H5dzNftyQNpiWrskTE5sAGmfmX4vpM4NPAZcAc4IvFz0uLu1wGnBwRFwGvAdYMVV+u582YMKOjR+M8mU35jGYVom5cuaj6f7Nv9By65/l3M1+3JA2mVcslvgy4pLIKIhsB38/MKyLiRuCHEfFO4E/AMcX2l1NZKnE5leUST2p+yCqjTv/g0Y5Gk3R0e6LS7c+/2/i6JWkwnvlTkhrEWmJJ6nwdUWMuSbVo5/pra4klSSNhYi6p1No5ua3H5Ot2/mAyGt32fCWpWqtqzCWpJu1cf11dSzzaspZumxjbbc9XkqqZmEsqtU6ZKDfahLOdP5iMRrc9X0mq5uRPSWoCJ4JKUmeq5+RPR8wlqQk6ZeRfktQ4Tv6UJEmSSsDEXJIkSSoBE3OphFwyTpKk7mNiLpVQO6/dLUlqPgd0OoOJuVRC9TgxjcrFN01JjeSATmdwVRaphFzBo1zqsdShJ86R1EieA6AzmJhL0jDqkVT7pimpkRzQ6Qwm5pI0jHok1b5pSpKGY425Wsq6W7WDvqR6oDIWj2FJUr04Yq6Wsu5W7c5jWJJUL46Yq6VcfUTtrtHHsCPyktQ9IjNbHUND9PT0ZG9vb6vDkKQxmX3+bBbevZBZk2c5Ii9JJRQRSzOzpx77csRcUsfppFFmv1WSpO5hjbmkjtNJdd+u5iJJ3cMRc0kdpyyjzJ00ci9JajwTc0kdZ6jlDas1OnH2FNmSpJGwlEVS12p0yYtn+5QkjYSJuaSu1ejE2fpwSdJIWMoiaczatZa61pIXSZKawRFzSWPWSaugSJLUKibmksbMWmpJksbOxFzSmFlLLUnS2FljLkmSJJWAibkkFdp1EqskqTOYmEs1MmnrfJ4QSJLUStaYSzVy5ZHO5yRWSVIrOWKulmqnUeh5B81j1uRZJm0dzHXNJUmt5Ii5WqqdRqFdeUSSJDWSI+Yj1E4jvO3AUWhJkqQKR8xHqJ1GeNuBo9CSJEkVjpiPUBlHeB3F7wz+HSVJ6m6OmI9QGUd4HcXvDP4dJUnqbibmHcAl3jqDf0dJkrpbZGarY2iInp6e7O3tbXUYkiRJ6mARsTQze+qxL2vMJUmSpBIwMZfqzEmckiRpNKwxl+rMSZySJGk0TMylOnMSpyRJGg0Tc6nOyrikpiRJKj9rzCVJkqQSaHpiHhETIuKqiLg9In4fER8o2k+LiD9HxLLicljVfT4REcsj4s6ImNXsmCVJkqRGa0Upy7PARzLzpojYAlgaEVcWvzsjM79cvXFE7AocB+wG/A3wi4h4ZWY+19SoJUmSpAZq+oh5Zj6QmTcV1/8C3A7sOMRdjgAuysynMvOPwHJgn8ZHKkmSJDVPS2vMI2IisCdwQ9F0ckTcHBFnR8S4om1H4L6qu61gkEQ+IuZGRG9E9K5atapBUUuSJEn117LEPCJeAvwY+GBmPgacCUwGpgEPAF/p23SAu+dA+8zMBZnZk5k92223XQOiliRJkhqjJYl5RGxMJSm/IDN/ApCZD2bmc5m5Fvg2z5errAAmVN19PHB/M+OVJEmSGq0Vq7IE8J/A7Zn51ar2Hao2Owq4tbh+GXBcRGwSEZOAKcBvmhWvJEmS1AytWJVlf+DtwC0RsaxoOxU4PiKmUSlTuQd4N0Bm/j4ifgjcRmVFl/e6IoskSZI6TdMT88z8FQPXjV8+xH0+B3yuYUFJkiRJLeaZPyVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEjAxlyRJkkrAxFySJEkqARNzSZIkqQRMzCVJkqQSMDGXJEmSSsDEXJIkSSoBE3NJkiSpBEzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlSZKkEmibxDwiZkfEnRGxPCJOaXU8kiRJUj21RWIeERsC3wReD+wKHB8Ru7Y2KkmSJKl+2iIxB/YBlmfmHzLzaeAi4IgWxyRJkiTVTbsk5jsC91XdXlG0SZIkSR1ho1YHUKMYoC1fsFHEXGBucfOpiLi1oVF1j22Bh1odRAexP+vL/qwf+7K+7M/6sj/rx76sr1fVa0ftkpivACZU3R4P3N9/o8xcACwAiIjezOxpTnidzb6sL/uzvuzP+rEv68v+rC/7s37sy/qKiN567atdSlluBKZExKSIeBFwHHBZi2OSJEmS6qYtRswz89mIOBlYCGwInJ2Zv29xWJIkSVLdtEViDpCZlwOXj+AuCxoVSxeyL+vL/qwv+7N+7Mv6sj/ry/6sH/uyvurWn5H5gjmUkiRJkpqsXWrMJUmSpI7Wtol5RHwgIm6NiN9HxAeLtq0j4sqIuKv4Oa5oj4j4ekQsj4ibI2Kv1kZfLoP05ekRcUfRX5dExEuL9okR8URELCsuZ7U2+vIZpD9Pi4g/V/XbYVXbf6I4Nu+MiFmti7ycBunPH1T15T0Rsaxo9/jsJyLOjoiV1cvHjua1MiLmFNvfFRFzWvFcymCE/fm2oh9vjojrImKPqvvcExG3FMdp3VZ0aCcj7MuDI2JN1f/2v1XdZ3bx+rk8Ik5pxXMpgxH258eq+vLWiHguIrYuftf1xyYM2p/HFO9FayOip9/2A76Xj/j4zMy2uwD/D3ArsBmVOvlfAFOAfwdOKbY5BfhScf0w4GdU1kPfF7ih1c+hLJch+nImsFGxzZeq+nIicGur4y7rZYj+PA346ADb7wr8DtgEmATcDWzY6udRlstg/dlvm68A/1Zc9/h8YR8eCOxV3S8jfa0Etgb+UPwcV1wf1+rn1gb9uV9fPwGvr37vAe4Btm3182mjvjwY+K8B9rFh8bq5M/Ci4vV011Y/t7L3Z7/7HQ78sup21x+bQ/Tnq6msWX410FPVPuB7+WiOz3YdMX81cH1mPp6ZzwKLgaOAI4Bzi23OBY4srh8BnJcV1wMvjYgdmh10SQ3Yl5n58+I2wPVU1o7X8AY7NgdzBHBRZj6VmX8ElgP7NCHOdjFkf0ZEAG8BLmxRfKWXmdcAD/drHulr5Szgysx8ODMfAa4EZjc++vIZSX9m5nVFf4Gvoy8wwmNzMPsAyzPzD5n5NHBRsY+uM4b+PB5fQ19goP7MzNsz884BNh/svXzEx2e7Jua3AgdGxDYRsRmVUZ4JwMsy8wGA4uf2xfY7AvdV3X9F0abB+7LaO6iMovWZFBG/jYjFEXFAswJtE0P158nFV9pn932diMfmcIY7Pg8AHszMu6raPD6HN9LXSo/ToQ3Wn9Xeyfqvown8PCKWRuWs1aoYqi9nRMTvIuJnEbFb0eaxObQhj83idXU28OOqZo/Nkavba2fbLJdYLTNvj4gvURm1+SuVrwaeHeIuMdBuGhFbuxmuLyPik8XtC4qmB4CdMnN1REwHfhoRu2XmY00OvZSG6M8zgc9QOe4+Q6X84h14bA6phv/1/iM9Hp9jM9jx6HE6BhFxCJXE/O+qmvfPzPsjYnvgyoi4oxih08BuAl6RmX+Nyhydn1IpE/TYHJvDgV9nZvXIsMfmyA12HA40AD7k8dmuI+Zk5n9m5l6ZeSCVrxruAh7sK1Epfq4sNl/B+qNs44H7mxlvmQ3SlxQTvN4AvC2LIqria5rVxfWlVGqnXtmayMtpoP7MzAcz87nMXAt8m+fLVTw2hzHE8bkRcDTwg6ptPT5rM9LXSo/ToQ3Wn0TEVOA7wBF9xyZAZt5f/FwJXIIlbH0G7MvMfCwz/1pcvxzYOCK2xWNzOIMem4Xj6FfG4rE5KnV77WzbxLz4JEdE7ETlzflC4DKgb7WAOcClxfXLgBOiYl9gTd9XOxq4LyNiNvAvwBsz8/GqbbeLiA2L6ztTGbH4Q/OjLq9B+rN6TsNRVEo0oHJsHhcRm0TEJCr9+Ztmxlt2g/yvA/w9cEdmrqja1uOzNiN9rVwIzIyIcUUZ1syiTRUD9mdxzP4EeHtm/p++jSNi84jYou86lf68FcHgffnyYk4JEbEPlfxlNXAjMCUiJkXEi6gkmpc1PeryGux/nYjYCjioX5vH5ugM9l4+8uNzrLNWW3UBrgVuo/LV9qFF2zbAIiojaouArYv2AL5JZfTsFqpm0noZtC+XU6mLWlZczira3wT8vtj2JuDwVsdftssg/fm94ti7ufin3KFq+08Wx+adwOtbHX/ZLgP1Z9F+DvBP/bb1+Hxh/11IpcTnGSqjN+8czWslldKr5cXlpFY/rzbpz+8Aj1S9jvYW7TsXx+jviuP1k61+Xm3QlydX/W9fD+xXtZ/DgP9THLdd2Zcj7c9i+xOpTFis3ofH5tD9eVRx/SngQWBh1fYDvpeP9Pj0zJ+SJElSCbRtKYskSZLUSUzMJUmSpBIwMZckSZJKwMRckiRJKgETc0mSJKkETMwlda2IeC4illVdTmnCY740Iv55FPc7LSI+Okj7n4v4b4uI4+sTafNFxJ4RkRExq8VxnBgRf9PKGCR1JxNzSd3sicycVnX5YhMe86XAiBPzYZyRmdOAI4BvRcTGdd7/qBQnKhrJ+8zxwK+Kn610ImBiLqnpTMwlqUpEbBURd0bEq4rbF0bEu4rrf42Ir0TETRGxKCK2K9onR8QVEbE0Iq6NiF2K9pdFxCUR8bvish/wRWByMcJ9erHdxyLixoi4OSLmV8XyySKWXwCvGi72zLwLeBwYN4q4iIgPR8StxeWDRduXqkf4ixH6jwwWd0RMjIjbI+I/qJzk6VMRcUbV/d8VEV8doN8DeDOVpHhmRGxatb87IuI7RVwXRMTfR8SvI+Ku4iyQRMTWEfHTIpbrI2JqVbwfrXqcW4t99sX57Yj4fUT8PCJeHBFvBnqAC4q/0YuH63dJqhcTc0nd7MX9SlmOzcw1VM4yeE5EHAeMy8xvF9tvDtyUmXsBi4F5RfsC4H2ZOR34KPAfRfvXgcWZuQewF5Uz6Z0C3F2M0H8sImZSOX3zPsA0YHpEHBgR06mcvnlP4Ghg7+GeTETsBdyVmStHGlfxeCcBrwH2Bd4VEXsCFwHHVj3MW4AfDRZ3sc2rgPMyc0/gy8Abq0bxTwK+O0D4+wN/zMy7gaupnC2vz98CXwOmArsAbwX+rnhOpxbbzAd+m5lTi7bzhuuvIv5vZuZuwKPAmzLzYqAXeFvxN3qihv1IUl1s1OoAJKmFnihKQNaTmVdGxDFUTk+/R9Wv1gI/KK6fD/wkIl4C7EclWe3bbpPi52uBE4p9PgesiYhx/R5uZnH5bXH7JVQSxi2ASzLzcYCIuGyI5/GhYlR/Z2B2sf1I4/q74vH+p7j/T4ADMvPrEbF9UXO9HfBIZv4pIt4/SNx/Au7NzOuL/f9PRPwSeENE3A5snJm3DPAcjqfyIYDi59uBnxS3/9h3n4j4PbAoMzMibgEmFtv8HfCm4jF/GRHbRMRWQ/RZ336XFdeXVu1LklrCxFyS+inqol8NPAFsDawYZNOk8s3jowMl+LU+HPCFzPxWvxg+WOy/Fmdk5pcj4mjgvIiYPIq4YojfXUylzOTlPJ88Dxb3ROB/+t3/O1RGse9ggNHyiNiQSlL9xoj4ZLHvbSJii2KTp6o2X1t1ey3Pv48NFH8Cz7L+t8ObVl2v3u9zgGUrklrKUhZJeqEPAbdTGcU9u6oMYwMqCSpUyil+lZmPAX8sRtj7Jjz2jbIvAt5TtG8YEVsCf6EyGt5nIfCOYoSbiNgxIrYHrgGOKuqetwAOHy7ozPwJlTKMOaOI6xrgyIjYLCI2B44Cri22v4hKWc2bqSTpQ8U9UFw3ABOKPrtwgE3+HvhdZk7IzImZ+Qrgx8CRwz3nKtcAbytiORh4qOiDe6iU6/SV+kyqYV/9/0aS1BQm5pK6Wf8a8y9GxCuBfwQ+kpnXUkn4/rXY/n+A3SJiKZVykE8X7W8D3hkRv6NSR35E0f4B4JCi5GIpsFtmrgZ+XUxCPD0zfw58H1hSbHcxsEVm3kSlbGYZlSS1L0kezqeBDxej/iOJ6ybgHP5ve3eIE0EQRAH0l0ftWbgMiqtwjBUINAnBYFciwEBIMOsJEoMvRCMI2WzGwDbhPdmTdEr+qe5KJ/dJ7pKcd/dDknT3c0ZQfenu18+1nXXvqesyyW13v+34dpLk+tvaVUaQX+osyXFVPWUM2J5+2WdVVY8ZPyPbBXtdJFkb/gR+W3UvPSkF+N+q6r27jw5dx19UVTcZV242h64FYFY65gD8mBoPKm0zBm2FcoA9dMwBAGACOuYAADABwRwAACYgmAMAwAQEcwAAmIBgDgAAExDMAQBgAh+GNNAMBb2JtQAAAABJRU5ErkJggg==\n",
      "text/plain": [
       "<Figure size 864x576 with 1 Axes>"
      ]
     },
     "metadata": {
      "needs_background": "light"
     },
     "output_type": "display_data"
    }
   ],
   "source": [
    "# Scatter plot of Actual Recovery Amount vs. Expected Recovery Amount \n",
    "plt.figure(figsize=(12,8))\n",
    "plt.scatter(x=df['expected_recovery_amount'], y=df['actual_recovery_amount'], c=\"g\", s=2)\n",
    "plt.xlim(900, 1100)\n",
    "plt.ylim(0, 2000)\n",
    "plt.xlabel(\"Expected Recovery Amount\")\n",
    "plt.ylabel(\"Actual Recovery Amount\")\n",
    "plt.legend(loc=2)\n",
    "# ... YOUR CODE FOR TASK 5 ...\n",
    "plt.show()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 6. Statistical analysis:  recovery amount\n",
    "<p>As we did with age, we can perform statistical tests to see if the actual recovery amount has a discontinuity above the \\$1000 threshold. We are going to do this for two different windows of the expected recovery amount \\$900 to \\$1100 and for a narrow range of \\$950 to \\$1050 to see if our results are consistent.</p>\n",
    "<p>Again, we will use the Kruskal-Wallis test.</p>\n",
    "<p>We will first compute the average actual recovery amount for those customers just below and just above the threshold using a range from \\$900 to \\$1100.  Then we will perform a Kruskal-Wallis test to see if the actual recovery amounts are different just above and just below the threshold.  Once we do that, we will repeat these steps for a smaller window of \\$950 to \\$1050.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 9,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/plain": [
       "KruskalResult(statistic=30.246000000000038, pvalue=3.80575314300276e-08)"
      ]
     },
     "execution_count": 9,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Compute average actual recovery amount just below and above the threshold\n",
    "by_recovery_strategy['actual_recovery_amount'].describe().unstack()\n",
    "\n",
    "# Perform Kruskal-Wallis test\n",
    "Level_0_actual = era_900_1100.loc[df['recovery_strategy']=='Level 0 Recovery']['actual_recovery_amount']\n",
    "Level_1_actual = era_900_1100.loc[df['recovery_strategy']=='Level 1 Recovery']['actual_recovery_amount']\n",
    "stats.kruskal(Level_0_actual,Level_1_actual) \n",
    "\n",
    "# Repeat for a smaller range of $950 to $1050\n",
    "era_950_1050 = df.loc[(df['expected_recovery_amount']<1050) & \n",
    "                      (df['expected_recovery_amount']>=950)]\n",
    "Level_0_actual = era_950_1050.loc[df['recovery_strategy']=='Level 0 Recovery']['actual_recovery_amount']\n",
    "Level_1_actual = era_950_1050.loc[df['recovery_strategy']=='Level 1 Recovery']['actual_recovery_amount']\n",
    "# ... YOUR CODE FOR TASK 6 ...\n",
    "stats.kruskal(Level_0_actual, Level_1_actual)"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 7. Regression modeling: no threshold\n",
    "<p>We now want to take a regression-based approach to estimate the program impact at the \\$1000 threshold using data that is just above and below the threshold. </p>\n",
    "<p>We will build two models. The first model does not have a threshold while the second will include a threshold.</p>\n",
    "<p>The first model predicts the actual recovery amount (dependent variable) as a function of the expected recovery amount (independent variable). We expect that there will be a strong positive relationship between these two variables.  </p>\n",
    "<p>We will examine the adjusted R-squared to see the percent of variance explained by the model.  In this model, we are not representing the threshold but simply seeing how the variable used for assigning the customers (expected recovery amount) relates to the outcome variable (actual recovery amount).</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 10,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/html": [
       "<table class=\"simpletable\">\n",
       "<caption>OLS Regression Results</caption>\n",
       "<tr>\n",
       "  <th>Dep. Variable:</th>    <td>actual_recovery_amount</td> <th>  R-squared:         </th> <td>   0.261</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Model:</th>                      <td>OLS</td>          <th>  Adj. R-squared:    </th> <td>   0.256</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Method:</th>                <td>Least Squares</td>     <th>  F-statistic:       </th> <td>   63.78</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Date:</th>                <td>Wed, 08 Apr 2020</td>    <th>  Prob (F-statistic):</th> <td>1.56e-13</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Time:</th>                    <td>16:18:26</td>        <th>  Log-Likelihood:    </th> <td> -1278.9</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>No. Observations:</th>         <td>   183</td>         <th>  AIC:               </th> <td>   2562.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Residuals:</th>             <td>   181</td>         <th>  BIC:               </th> <td>   2568.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Model:</th>                 <td>     1</td>         <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Covariance Type:</th>         <td>nonrobust</td>       <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "              <td></td>                <th>coef</th>     <th>std err</th>      <th>t</th>      <th>P>|t|</th>  <th>[0.025</th>    <th>0.975]</th>  \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>const</th>                    <td>-1978.7597</td> <td>  347.741</td> <td>   -5.690</td> <td> 0.000</td> <td>-2664.907</td> <td>-1292.612</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>expected_recovery_amount</th> <td>    2.7577</td> <td>    0.345</td> <td>    7.986</td> <td> 0.000</td> <td>    2.076</td> <td>    3.439</td>\n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "  <th>Omnibus:</th>       <td>64.493</td> <th>  Durbin-Watson:     </th> <td>   1.777</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Prob(Omnibus):</th> <td> 0.000</td> <th>  Jarque-Bera (JB):  </th> <td> 185.818</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Skew:</th>          <td> 1.463</td> <th>  Prob(JB):          </th> <td>4.47e-41</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Kurtosis:</th>      <td> 6.977</td> <th>  Cond. No.          </th> <td>1.80e+04</td>\n",
       "</tr>\n",
       "</table><br/><br/>Warnings:<br/>[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.<br/>[2] The condition number is large, 1.8e+04. This might indicate that there are<br/>strong multicollinearity or other numerical problems."
      ],
      "text/plain": [
       "<class 'statsmodels.iolib.summary.Summary'>\n",
       "\"\"\"\n",
       "                              OLS Regression Results                              \n",
       "==================================================================================\n",
       "Dep. Variable:     actual_recovery_amount   R-squared:                       0.261\n",
       "Model:                                OLS   Adj. R-squared:                  0.256\n",
       "Method:                     Least Squares   F-statistic:                     63.78\n",
       "Date:                    Wed, 08 Apr 2020   Prob (F-statistic):           1.56e-13\n",
       "Time:                            16:18:26   Log-Likelihood:                -1278.9\n",
       "No. Observations:                     183   AIC:                             2562.\n",
       "Df Residuals:                         181   BIC:                             2568.\n",
       "Df Model:                               1                                         \n",
       "Covariance Type:                nonrobust                                         \n",
       "============================================================================================\n",
       "                               coef    std err          t      P>|t|      [0.025      0.975]\n",
       "--------------------------------------------------------------------------------------------\n",
       "const                    -1978.7597    347.741     -5.690      0.000   -2664.907   -1292.612\n",
       "expected_recovery_amount     2.7577      0.345      7.986      0.000       2.076       3.439\n",
       "==============================================================================\n",
       "Omnibus:                       64.493   Durbin-Watson:                   1.777\n",
       "Prob(Omnibus):                  0.000   Jarque-Bera (JB):              185.818\n",
       "Skew:                           1.463   Prob(JB):                     4.47e-41\n",
       "Kurtosis:                       6.977   Cond. No.                     1.80e+04\n",
       "==============================================================================\n",
       "\n",
       "Warnings:\n",
       "[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.\n",
       "[2] The condition number is large, 1.8e+04. This might indicate that there are\n",
       "strong multicollinearity or other numerical problems.\n",
       "\"\"\""
      ]
     },
     "execution_count": 10,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Import statsmodels\n",
    "import statsmodels.api as sm\n",
    "\n",
    "# Define X and y\n",
    "X = era_900_1100['expected_recovery_amount']\n",
    "y = era_900_1100['actual_recovery_amount']\n",
    "X = sm.add_constant(X)\n",
    "\n",
    "# Build linear regression model\n",
    "model = sm.OLS(y, X).fit()\n",
    "predictions = model.predict(X)\n",
    "\n",
    "# Print out the model summary statistics\n",
    "# ... YOUR CODE FOR TASK 7 ...\n",
    "model.summary()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 8. Regression modeling: adding true threshold\n",
    "<p>From the first model, we see that the expected recovery amount's regression coefficient is statistically significant. </p>\n",
    "<p>The second model adds an indicator of the true threshold to the model (in this case at \\$1000).  </p>\n",
    "<p>We will create an indicator variable (either a 0 or a 1) that represents whether or not the expected recovery amount was greater than \\$1000. When we add the true threshold to the model, the regression coefficient for the true threshold represents the additional amount recovered due to the higher recovery strategy.  That is to say, the regression coefficient for the true threshold measures the size of the discontinuity for customers just above and just below the threshold.</p>\n",
    "<p>If the higher recovery strategy helped recovery more money, then the regression coefficient of the true threshold will be greater than zero.  If the higher recovery strategy did not help recovery more money, then the regression coefficient will not be statistically significant.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 11,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/html": [
       "<table class=\"simpletable\">\n",
       "<caption>OLS Regression Results</caption>\n",
       "<tr>\n",
       "  <th>Dep. Variable:</th>    <td>actual_recovery_amount</td> <th>  R-squared:         </th> <td>   0.314</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Model:</th>                      <td>OLS</td>          <th>  Adj. R-squared:    </th> <td>   0.307</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Method:</th>                <td>Least Squares</td>     <th>  F-statistic:       </th> <td>   41.22</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Date:</th>                <td>Wed, 08 Apr 2020</td>    <th>  Prob (F-statistic):</th> <td>1.83e-15</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Time:</th>                    <td>16:19:17</td>        <th>  Log-Likelihood:    </th> <td> -1272.0</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>No. Observations:</th>         <td>   183</td>         <th>  AIC:               </th> <td>   2550.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Residuals:</th>             <td>   180</td>         <th>  BIC:               </th> <td>   2560.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Model:</th>                 <td>     2</td>         <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Covariance Type:</th>         <td>nonrobust</td>       <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "              <td></td>                <th>coef</th>     <th>std err</th>      <th>t</th>      <th>P>|t|</th>  <th>[0.025</th>    <th>0.975]</th>  \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>const</th>                    <td>    3.3440</td> <td>  626.274</td> <td>    0.005</td> <td> 0.996</td> <td>-1232.440</td> <td> 1239.128</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>expected_recovery_amount</th> <td>    0.6430</td> <td>    0.655</td> <td>    0.981</td> <td> 0.328</td> <td>   -0.650</td> <td>    1.936</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>indicator_1000</th>           <td>  277.6344</td> <td>   74.043</td> <td>    3.750</td> <td> 0.000</td> <td>  131.530</td> <td>  423.739</td>\n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "  <th>Omnibus:</th>       <td>65.977</td> <th>  Durbin-Watson:     </th> <td>   1.906</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Prob(Omnibus):</th> <td> 0.000</td> <th>  Jarque-Bera (JB):  </th> <td> 186.537</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Skew:</th>          <td> 1.510</td> <th>  Prob(JB):          </th> <td>3.12e-41</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Kurtosis:</th>      <td> 6.917</td> <th>  Cond. No.          </th> <td>3.37e+04</td>\n",
       "</tr>\n",
       "</table><br/><br/>Warnings:<br/>[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.<br/>[2] The condition number is large, 3.37e+04. This might indicate that there are<br/>strong multicollinearity or other numerical problems."
      ],
      "text/plain": [
       "<class 'statsmodels.iolib.summary.Summary'>\n",
       "\"\"\"\n",
       "                              OLS Regression Results                              \n",
       "==================================================================================\n",
       "Dep. Variable:     actual_recovery_amount   R-squared:                       0.314\n",
       "Model:                                OLS   Adj. R-squared:                  0.307\n",
       "Method:                     Least Squares   F-statistic:                     41.22\n",
       "Date:                    Wed, 08 Apr 2020   Prob (F-statistic):           1.83e-15\n",
       "Time:                            16:19:17   Log-Likelihood:                -1272.0\n",
       "No. Observations:                     183   AIC:                             2550.\n",
       "Df Residuals:                         180   BIC:                             2560.\n",
       "Df Model:                               2                                         \n",
       "Covariance Type:                nonrobust                                         \n",
       "============================================================================================\n",
       "                               coef    std err          t      P>|t|      [0.025      0.975]\n",
       "--------------------------------------------------------------------------------------------\n",
       "const                        3.3440    626.274      0.005      0.996   -1232.440    1239.128\n",
       "expected_recovery_amount     0.6430      0.655      0.981      0.328      -0.650       1.936\n",
       "indicator_1000             277.6344     74.043      3.750      0.000     131.530     423.739\n",
       "==============================================================================\n",
       "Omnibus:                       65.977   Durbin-Watson:                   1.906\n",
       "Prob(Omnibus):                  0.000   Jarque-Bera (JB):              186.537\n",
       "Skew:                           1.510   Prob(JB):                     3.12e-41\n",
       "Kurtosis:                       6.917   Cond. No.                     3.37e+04\n",
       "==============================================================================\n",
       "\n",
       "Warnings:\n",
       "[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.\n",
       "[2] The condition number is large, 3.37e+04. This might indicate that there are\n",
       "strong multicollinearity or other numerical problems.\n",
       "\"\"\""
      ]
     },
     "execution_count": 11,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Create indicator (0 or 1) for expected recovery amount >= $1000\n",
    "df['indicator_1000'] = np.where(df['expected_recovery_amount']<1000, 0, 1)\n",
    "era_900_1100 = df.loc[(df['expected_recovery_amount']<1100) & \n",
    "                      (df['expected_recovery_amount']>=900)]\n",
    "\n",
    "# Define X and y\n",
    "X = era_900_1100[['expected_recovery_amount','indicator_1000']]\n",
    "y = era_900_1100['actual_recovery_amount']\n",
    "X = sm.add_constant(X)\n",
    "\n",
    "# Build linear regression model\n",
    "model = sm.OLS(y,X).fit()\n",
    "\n",
    "# Print the model summary\n",
    "# ... YOUR CODE FOR TASK 8 ...\n",
    "model.summary()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# 9. Regression modeling: adjusting the window\n",
    "<p>The regression coefficient for the true threshold was statistically significant with an estimated impact of around \\$278.  This is much larger than the \\$50 per customer needed to run this higher recovery strategy. </p>\n",
    "<p>Before showing this to our manager, we want to convince ourselves that this result wasn't due to choosing an expected recovery amount window of \\$900 to \\$1100. Let's repeat this analysis for the window from \\$950 to \\$1050 to see if we get similar results.</p>\n",
    "<p>The answer? Whether we use a wide (\\$900 to \\$1100) or narrower window (\\$950 to \\$1050), the incremental recovery amount at the higher recovery strategy is much greater than the \\$50 per customer it costs for the higher recovery strategy.  So we conclude that the higher recovery strategy is worth the extra cost of \\$50 per customer.</p>"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 12,
   "metadata": {},
   "outputs": [
    {
     "data": {
      "text/html": [
       "<table class=\"simpletable\">\n",
       "<caption>OLS Regression Results</caption>\n",
       "<tr>\n",
       "  <th>Dep. Variable:</th>    <td>actual_recovery_amount</td> <th>  R-squared:         </th> <td>   0.283</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Model:</th>                      <td>OLS</td>          <th>  Adj. R-squared:    </th> <td>   0.269</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Method:</th>                <td>Least Squares</td>     <th>  F-statistic:       </th> <td>   18.99</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Date:</th>                <td>Wed, 08 Apr 2020</td>    <th>  Prob (F-statistic):</th> <td>1.12e-07</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Time:</th>                    <td>16:20:43</td>        <th>  Log-Likelihood:    </th> <td> -692.92</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>No. Observations:</th>         <td>    99</td>         <th>  AIC:               </th> <td>   1392.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Residuals:</th>             <td>    96</td>         <th>  BIC:               </th> <td>   1400.</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Df Model:</th>                 <td>     2</td>         <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Covariance Type:</th>         <td>nonrobust</td>       <th>                     </th>     <td> </td>   \n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "              <td></td>                <th>coef</th>     <th>std err</th>      <th>t</th>      <th>P>|t|</th>  <th>[0.025</th>    <th>0.975]</th>  \n",
       "</tr>\n",
       "<tr>\n",
       "  <th>const</th>                    <td> -279.5243</td> <td> 1840.707</td> <td>   -0.152</td> <td> 0.880</td> <td>-3933.298</td> <td> 3374.250</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>expected_recovery_amount</th> <td>    0.9189</td> <td>    1.886</td> <td>    0.487</td> <td> 0.627</td> <td>   -2.825</td> <td>    4.663</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>indicator_1000</th>           <td>  286.5337</td> <td>  111.352</td> <td>    2.573</td> <td> 0.012</td> <td>   65.502</td> <td>  507.566</td>\n",
       "</tr>\n",
       "</table>\n",
       "<table class=\"simpletable\">\n",
       "<tr>\n",
       "  <th>Omnibus:</th>       <td>39.302</td> <th>  Durbin-Watson:     </th> <td>   1.955</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Prob(Omnibus):</th> <td> 0.000</td> <th>  Jarque-Bera (JB):  </th> <td>  82.258</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Skew:</th>          <td> 1.564</td> <th>  Prob(JB):          </th> <td>1.37e-18</td>\n",
       "</tr>\n",
       "<tr>\n",
       "  <th>Kurtosis:</th>      <td> 6.186</td> <th>  Cond. No.          </th> <td>6.81e+04</td>\n",
       "</tr>\n",
       "</table><br/><br/>Warnings:<br/>[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.<br/>[2] The condition number is large, 6.81e+04. This might indicate that there are<br/>strong multicollinearity or other numerical problems."
      ],
      "text/plain": [
       "<class 'statsmodels.iolib.summary.Summary'>\n",
       "\"\"\"\n",
       "                              OLS Regression Results                              \n",
       "==================================================================================\n",
       "Dep. Variable:     actual_recovery_amount   R-squared:                       0.283\n",
       "Model:                                OLS   Adj. R-squared:                  0.269\n",
       "Method:                     Least Squares   F-statistic:                     18.99\n",
       "Date:                    Wed, 08 Apr 2020   Prob (F-statistic):           1.12e-07\n",
       "Time:                            16:20:43   Log-Likelihood:                -692.92\n",
       "No. Observations:                      99   AIC:                             1392.\n",
       "Df Residuals:                          96   BIC:                             1400.\n",
       "Df Model:                               2                                         \n",
       "Covariance Type:                nonrobust                                         \n",
       "============================================================================================\n",
       "                               coef    std err          t      P>|t|      [0.025      0.975]\n",
       "--------------------------------------------------------------------------------------------\n",
       "const                     -279.5243   1840.707     -0.152      0.880   -3933.298    3374.250\n",
       "expected_recovery_amount     0.9189      1.886      0.487      0.627      -2.825       4.663\n",
       "indicator_1000             286.5337    111.352      2.573      0.012      65.502     507.566\n",
       "==============================================================================\n",
       "Omnibus:                       39.302   Durbin-Watson:                   1.955\n",
       "Prob(Omnibus):                  0.000   Jarque-Bera (JB):               82.258\n",
       "Skew:                           1.564   Prob(JB):                     1.37e-18\n",
       "Kurtosis:                       6.186   Cond. No.                     6.81e+04\n",
       "==============================================================================\n",
       "\n",
       "Warnings:\n",
       "[1] Standard Errors assume that the covariance matrix of the errors is correctly specified.\n",
       "[2] The condition number is large, 6.81e+04. This might indicate that there are\n",
       "strong multicollinearity or other numerical problems.\n",
       "\"\"\""
      ]
     },
     "execution_count": 12,
     "metadata": {},
     "output_type": "execute_result"
    }
   ],
   "source": [
    "# Redefine era_950_1050 so the indicator variable is included\n",
    "era_950_1050 = df.loc[(df['expected_recovery_amount']<1050) & \n",
    "                      (df['expected_recovery_amount']>=950)]\n",
    "\n",
    "# Define X and y \n",
    "X = era_950_1050[['expected_recovery_amount','indicator_1000']]\n",
    "y = era_950_1050['actual_recovery_amount']\n",
    "X = sm.add_constant(X)\n",
    "\n",
    "# Build linear regression model\n",
    "model = sm.OLS(y,X).fit()\n",
    "\n",
    "# Print the model summary\n",
    "model.summary()"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "metadata": {},
   "outputs": [],
   "source": []
  }
 ],
 "metadata": {
  "kernelspec": {
   "display_name": "Python 3",
   "language": "python",
   "name": "python3"
  },
  "language_info": {
   "codemirror_mode": {
    "name": "ipython",
    "version": 3
   },
   "file_extension": ".py",
   "mimetype": "text/x-python",
   "name": "python",
   "nbconvert_exporter": "python",
   "pygments_lexer": "ipython3",
   "version": "3.7.0"
  }
 },
 "nbformat": 4,
 "nbformat_minor": 2
}