{ "cells": [ { "cell_type": "markdown", "metadata": {}, "source": [ "I've been hearing about the [Monty Hall problem](https://en.wikipedia.org/wiki/Monty_Hall_problem) for years and its never quite made sense to me, so I decided to program up a quick simulation. \n", "\n", "In the Monty Hall problem, there is a car behind one of three doors. There are goats behind the other two doors. The contestant picks one of the three doors. Monty Hall (the game show host) then reveals that one of the two unchosen doors has a goat behind it. The question is whether the constestant should change the door they picked or keep their choice. \n", "\n", "My first intuition was that it doesn't matter whether the contestant changes their choice because its equally probable that the car is behind either of the two unopened doors, but I've been told this is incorrect! Instead, the contestant is more likely to win the car if they change their choice. \n", "\n", "How can this be? Well, I decided to create a simple simulation of the Monty Hall problem in order to prove to myself that there really is an advantage to changing the chosen door and (hopefully) gain an intuition into how this works. \n", "\n", "Below I've written my little simulation. A jupyter notebook with this code is available on my [github](https://github.com/dvatterott/jupyter_notebooks). " ] }, { "cell_type": "code", "execution_count": 1, "metadata": { "collapsed": true }, "outputs": [], "source": [ "import random\n", "import copy\n", "import numpy as np\n", "\n", "start_vect = [1,0,0] #doors\n", "\n", "samples = 5000 #number of simulations to run\n", "\n", "change, no_change = [],[]\n", "for i in range(samples):\n", " \n", " #shuffle data\n", " vect = copy.copy(start_vect)\n", " random.shuffle(vect)\n", "\n", " #make choice\n", " choice = vect.pop(random.randint(0,2))\n", " no_change.append(choice) #outcome if do not change choice\n", "\n", " #show bad door\n", " try:\n", " bad = vect.pop(int(np.where(np.array(vect)==0)[0]))\n", " except:\n", " bad = vect.pop(0)\n", "\n", " change.append(vect) #outcome if change choice" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Here I plot the results" ] }, { "cell_type": "code", "execution_count": 24, "metadata": { "collapsed": false }, "outputs": [ { "name": "stdout", "output_type": "stream", "text": [ "Probability of choosing correctly if change choice: 0.67\n", "Probability of choosing correctly if do not change choice: 0.33\n", "Probability of difference arising from chance: 0.00000\n" ] }, { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAh8AAAFqCAYAAAC6Wjg+AAAABHNCSVQICAgIfAhkiAAAAAlwSFlz\nAAAPYQAAD2EBqD+naQAAIABJREFUeJzt3XtYVWX+///X5iQgcgpQ0VFEUitxMC0bxSTz7Hy05lOW\nWXkoG0/zLcexyQtNmfnYuaasrCzP5iFHm1TULFJLGU+ZB/IcpqIiIAIqggL794eX++cO0M1is8DN\n83FdXVd7rXut/d5rL+HFve51L4vVarUKAADAJG7VXQAAAKhdCB8AAMBUhA8AAGAqwgcAADAV4QMA\nAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFQe1V1AWfbv368VK1YoNTVVOTk5Gj9+vNq3\nb3/DbX7++WfNmzdPaWlpCgkJ0cMPP6y4uDhzCgYM2LRpk2JjY6u7DNQCnGuoaWpkz0dhYaEiIiL0\n7LPPOtQ+IyNDr732mqKjo/Xmm2+qd+/e+uSTT7Rnz54qrhQwbvPmzdVdAmoJzjXUNDWy5yMmJkYx\nMTEOt1+3bp3q16+vJ598UpIUHh6uAwcOKDExUW3atKmqMgEAgAE1suejog4fPqzo6Gi7ZTExMTp0\n6FA1VQQAAMrjEuEjJydHAQEBdssCAgKUn5+vK1euVFNVAACgLC4RPoBbUf369au7BNQSnGuoaWrk\nmI+KCgwMVG5urt2y3Nxc+fr6ytPTs8xtNm3aVGoQ1h133KF+/fpVWZ3A9YYMGVLdJaCW4FyDmVas\nWKH9+/fbLevUqZPdHVcuET5atGihXbt22S3bvXu3WrRoUe42sbGx5d56du7cORUVFTm1RuC3/P39\nlZeXV91loBbgXIMZPDw8FBQUpH79+t30D/kaGT4KCgqUnp5ue33mzBn9+uuv8vPzU0hIiBYuXKjs\n7GyNGTNGktS9e3d9/fXXWrBggbp27aq9e/dqy5YtmjBhgqH3LyoqYqwIqpzVauU8gyk411DT1Mjw\nkZqaqoSEBNvrefPmSZK6dOmiUaNGKScnR2fPnrWtDwsL00svvaS5c+dqzZo1uu222zRy5EhuswUA\noAayWK1Wa3UXUdNkZmbyVwKqXHBwsLKzs6u7DNQCnGswg6enp0JDQx1qy90uAADAVIQPAABgKsIH\nAAAwFeEDAACYivABAABMRfgAAACmInwAAABTET4AAICpCB8AAMBUhA8AAGAqwgcAADAV4QMAAJiK\n8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAAMBXhAwAAmIrwAQAATEX4AAAA\npiJ8AAAAUxE+AACAqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivABAABMRfgAAACmInwAAABTET4A\nAICpCB8AAMBUhA8AAGAqwgcAADAV4QMAAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSE\nDwAAYCrCBwAAMBXhAwAAmMqjMhtfuXJFR48eVW5urlq2bCl/f39n1QUAAFyU4fCxevVqLV26VPn5\n+ZKkSZMmqXXr1srLy9PYsWM1aNAgde3a1WmFAgAA12Dossv69es1d+5cxcTEaOTIkXbr/P39dddd\ndyk5OdkpBQIAANdiKHysWrVK7du31/PPP6927dqVWh8ZGakTJ05UujgAAOB6DIWP9PR0tW3bttz1\nfn5+unDhguGiAACA6zIUPnx9fZWXl1fu+rS0NAUGBhouCgAAuC5D4aNt27ZKSkrSxYsXS607ceKE\nkpKSyrwcAwAAYLFardaKbpSdna34+HhZrVa1a9dO3377rTp37qySkhJt3bpVQUFBeuWVVyp16+3a\ntWu1cuVK5eTkKCIiQkOHDlVUVFS57X/44QetWLFC6enp8vX1VUxMjJ566in5+flV+L0zMzN15coV\nw7UDjggODlZ2dnZ1l4FagHMNZvD09FRoaKhDbQ2FD0nKzc3VokWLtHXrVtvttt7e3urQoYMGDRqk\ngIAAI7uVJCUnJ+vDDz/Uc889p6ioKCUmJuq///2v3nvvvTIDzYEDBzRlyhQNGTJE7dq1U3Z2tmbM\nmKHw8HCNGzeuwu9P+IAZ+IUAs3CuwQwVCR+G5/kICAjQiBEjNGLECOXl5amkpET+/v5yc6v8pKmJ\niYnq1q2bunTpIkkaPny4du7cqfXr16t///6l2h8+fFhhYWHq1auXJCk0NFTdu3fXV199VelaAACA\nczllenV/f38FBgY6JXgUFRUpNTVV0dHRtmUWi0XR0dE6dOhQmdu0aNFCZ8+e1U8//SRJysnJ0X//\n+1/dfffdla4HAAA4l6Gej8WLF+vHH3/Um2++Web6F198Uffcc48effTRCu/7/PnzKikpKXXZJiAg\nQKdOnSpzm5YtW+ovf/mL3n33XV2+fFklJSVq166dnnnmmQq/PwAAqFqGuiq2bNlyw3k+2rZta+oM\np2lpaZo9e7YeffRRvf7664qPj1dmZqZmzJhhWg0AAMAxhno+srKyVL9+/XLXh4WFKSsry1BB9erV\nk5ubm3Jzc+2W5+bmljt3yH/+8x+1bNlSf/zjHyVJTZo00TPPPKPJkyfr8ccfL3O7TZs2afPmzXbL\n6tevryFDhsjf318Gx+ECDvP09FRwcHB1l4FagHMNZrBYLJKkOXPm6MyZM3brOnXqpNjYWNtrQ+HD\n29tbmZmZ5a7PyMiQp6enkV3Lw8NDkZGR2rt3r9q3by9JslqtSklJUe/evcvcprCwUB4e9h/lZuNP\nYmNj7Q7E9fLy8rjbBVWOOxBgFs41mOHa3S5Dhgy5aVtDl13uvPNOffvtt2WezFlZWfr222911113\nGdm1JKlv375KSkrSxo0bdfLkSX366acqLCxUXFycJGnhwoX64IMPbO3btWunrVu3at26dcrIyNCB\nAwc0e/Zs3X777cy0CgBADWOo5+Pxxx/XhAkT9Ne//lVdu3ZV48aNJV2d3XT9+vWyWq167LHHDBfV\nsWNHnT9/Xl988YVtkrH4+HjbHB85OTk6e/asrX1cXJwKCgr09ddfa/78+apbt65at26tQYMGGa4B\nAABUDcOTjB07dkyzZs3SgQMH7JbfcccdGjp0qJo2beqUAqsDk4zBDHSFwyycazCDKTOcXpOXl6eM\njAxJVweaVmZK9ZqC8AEz8AsBZuFcgxlMmeH0Gn9/f5cIHAAAwBwOhY+NGzdKku6//35ZLBbb65u5\nNj06AADANQ6Fj+nTp0u6ep+uh4eH7fXNED4AAMBvOTTm49qcHteu5dxojo/rOXrtp6ZhzAfMwHV4\nmIVzDWZw+piP3+7sVg0VAACg+lV6wGlaWppdz8i1OT8AAADKYjh8bN++XfPmzbPdZntNWFiYBg8e\nbJsaHQAA4HqGwsfOnTv19ttvKzQ0VAMHDrT1dqSlpSkpKUlvvfWWXnrpJcXExDi1WAAAcOszFD6W\nLVumpk2bKiEhQd7e3rbl7du3V69evfTyyy9r6dKlhA8AAFCKoQfLHT9+XF26dLELHtd4e3srLi5O\nx48fr3RxAADA9RgKH56enrpw4UK56y9cuCBPT0/DRQEAANdlKHy0bt1aq1ev1qFDh0qtO3z4sNas\nWaPo6OhKFwcAAFyPoQfLZWRkKD4+Xnl5eYqKilJ4eLgk6dSpUzpy5IgCAgL0f//3fwoLC3N6wWZg\nkjGYgYmfYBbONZjBlKfa5ubm6ssvv9SuXbvs5vlo27atHnroIQUEBBjZbY1A+IAZ+IUAs3CuwQym\nPNU2ICBAQ4YMMbo5AACopQyN+QAAADDKcM9HWlqaNmzYoDNnzujixYv67dUbi8Wil19+udIFAgAA\n12IofHz//feaPn263N3dFR4eLj8/v1JtDA4lAQAALs5Q+Fi6dKmaNWumCRMmyN/f39k1AQAAF2Zo\nzEd2drYeeOABggcAAKgwQ+GjadOm3LYFAAAMMRQ+nn76aa1fv14HDx50dj0AAMDFOTTm4/XXXy+1\nzNfXVy+//LIaN26skJAQubnZ5xiLxaIXX3zROVUCAACX4VD4KO8JtSEhISooKFBaWlqpdRaLpXKV\nAQAAl+RQ+Pjwww+rug4AAFBLMMMpAAAwlcPhIz8/X1OnTtXy5ctv2G758uV65ZVXdOnSpUoXBwAA\nXI/D4WPt2rU6dOiQunXrdsN2Dz74oA4ePKg1a9ZUujgAAOB6HA4f27ZtU8eOHW86sVhAQIA6deqk\nrVu3Vro4AADgehwOHydPnlTz5s0dahsZGanTp08bLgoAALiuKhtwyoPlAABAWRwOHyEhIUpNTXWo\nbWpqqkJCQgwXBQAAXJfD4aNt27b64Ycfbno55fTp0/rhhx/Utm3bShcHAABcj8Pho3///vLy8tKU\nKVOUnJys4uJiu/XFxcVKTk5WQkKCvLy81K9fP6cXCwAAbn0WawUGZxw5ckRvvfWWzp07Jy8vL4WH\nh8vb21sFBQU6deqULl++rMDAQI0fP15RUVFVWXeVyszM1JUrV6q7jFvKxWKL8q+UVHcZtxQ3d3eV\n/CbE4+Z8Pd1U150xZRURHBzMk8hR5Tw9PRUaGupQ2wqFD+nqZGPr1q3Tjz/+qJMnT+rSpUvy8fFR\no0aN1K5dO3Xv3l1169Y1VHhNQfiouMwCq55dxlOOUfU++9+WCvXm2VEVQfiAGSoSPhx6tsv1fH19\n9dBDD+mhhx6qcGEAAAA82wUAAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkMhY9///vfOn78eLnr\nT5w4oX//+9+GiwIAAK7LUPhYunTpTcPH0qVLDRcFAABcV5Vcdrlw4YI8PCo8hQgAAKgFHE4I+/bt\n0759+2yvt27dqvT09FLtLl68qOTkZDVp0sQ5FQIAAJficPj4+eef7cZxbNu2Tdu2bSuzbePGjTVs\n2LDKVwcAAFyOw+Gjf//+6tWrl6xWq4YPH67hw4erQ4cOdm0sFou8vLzk5eXl9EIBAIBrcDh8XB8q\nPvjgAwUEBBAyAABAhRkacGq1WrVnz55y1+/YsUMZGRmGiwIAAK7L0C0p8+bN06VLl9S+ffsy13/9\n9deqW7euXnjhBcOFrV27VitXrlROTo4iIiI0dOhQRUVFldu+qKhIS5cu1aZNm5STk6OgoCA98sgj\niouLM1wDAABwPkPh4/Dhw+rTp0+566Ojo5WYmGi4qOTkZM2fP1/PPfecoqKilJiYqKlTp+q9996T\nv79/mdu88847ysvL08iRI9WgQQOdO3dOVqvVcA0AAKBqGAofFy5ckI+PT7nrvb29deHCBcNFJSYm\nqlu3burSpYskafjw4dq5c6fWr1+v/v37l2q/a9cu7d+/Xx988IHq1q0rSQoJCTH8/gAAoOoYGvMR\nEhKiAwcOlLt+//79Cg4ONlRQUVGRUlNTFR0dbVtmsVgUHR2tQ4cOlbnNjh071Lx5c3311VcaMWKE\nnn/+ec2fP1+XL182VAMAAKg6hsJHp06dtHnzZq1evVolJSW25SUlJVq9erWSk5MVGxtrqKDz58+r\npKREAQEBdssDAgKUk5NT5jYZGRnav3+/Tpw4ofHjx2vo0KHasmWLZs6caagGAABQdQxddnn44Yd1\n8OBBzZ07V19++aXCw8MlSadOnVJeXp7uvPNO/elPf3JqoTditVrl5uam559/Xt7e3pKkwYMH6513\n3tGzzz4rT09P02oBAAA3Zih8eHp6Kj4+Xhs3btTWrVt15swZSVLz5s1133336f7775ebm7HHxtSr\nV09ubm7Kzc21W56bm6vAwMAytwkMDFRwcLAteEhSo0aNZLVadfbsWTVo0KDUNps2bdLmzZvtltWv\nX19DhgyRv78/g1Ur6OyZsnulAGdzc3dXcHDZPwtQNk9PT8OXwgFHWSwWSdKcOXNsueCaTp062V0R\nMfz0Nzc3Nz3wwAN64IEHjO6iTB4eHoqMjNTevXttt/JarValpKSod+/eZW7TsmVLbdmyRYWFhapT\np46kq70wbm5uuu2228rcJjY2ttxLQ3l5ebpy5YoTPk3tUVJMWIM5SoqLlZ2dXd1l3FKCg4M5Zqhy\nnp6eCg0N1ZAhQ27atlJPtb1y5YoOHTqk7du3Ky8vrzK7stO3b18lJSVp48aNOnnypD799FMVFhba\n5uxYuHChPvjgA1v72NhY1atXT9OnT1daWpr27dunBQsW6IEHHuCSCwAANYzhno/Vq1dr6dKlys/P\nlyRNmjRJrVu3Vl5ensaOHatBgwapa9euhvbdsWNHnT9/Xl988YVtkrH4+HjbHB85OTk6e/asrb23\nt7cmTpyo2bNna8KECapXr546duyoxx57zOjHAwAAVcRQ+Fi/fr3mzp2rjh076ve//70++ugj2zp/\nf3/dddddSk5ONhw+JKlnz57q2bNnmetGjRpVall4eLji4+MNvx8AADCHocsuq1atUvv27fX888+r\nXbt2pdZHRkbqxIkTlS4OAAC4HkPhIz09XW3bti13vZ+fX6VmOAUAAK7LUPjw9fW94QDTtLS0cm+L\nBQAAtZuh8NG2bVslJSXp4sWLpdadOHFCSUlJZV6OAQAAMDTg9PHHH1d8fLzGjRtnCxkbNmzQd999\np61bt9oeZw8AAPBbhsJHcHCwXnvtNS1atEjJycmSpB9++EHe3t7q1KmTBg0aZLstFgAA4HqG5/kI\nCAjQiBEjNGLECOXl5amkpET+/v6Gp1UHAAC1Q4WTQmFhoYYNG6YVK1bYlvn7+yswMJDgAQAAbqrC\naaFOnTpyd3e3PUMFAACgIgx1VXTo0EFbtmzhya8AAKDCDI356Nixo2bOnKmEhAQ9+OCDCg0NlZeX\nV6l2kZGRlS4QAAC4FkPhIyEhwfb/+/fvL7fdkiVLjOweAAC4MEPhY+TIkc6uAwAA1BIVDh9Wq1X3\n3nuvPDw8yrzUAgAAcCMVHnBaVFSkYcOGac2aNVVRDwAAcHEVDh+enp4KDAyUp6dnVdQDAABcnKFb\nbePi4rRx40YVFRU5ux4AAODiDA04bdKkibZv366//vWviouLK/dW2w4dOlS6QAAA4FoMhY/33nvP\n9v83up2WW20BAMBvGQofkydPdnYdAACgljAUPu68805n1wEAAGoJQ+HjemlpacrMzJQkhYaGqnHj\nxpUuCgAAuC7D4WP79u2aN2+eMjIy7JaHhYVp8ODBat++faWLAwAArsdQ+Ni5c6fefvtthYaGauDA\ngbbejrS0NCUlJemtt97SSy+9pJiYGKcWCwAAbn2GwseyZcvUtGlTJSQkyNvb27a8ffv26tWrl15+\n+WUtXbqU8AEAAEoxNMnY8ePH1aVLF7vgcY23t7fi4uJ0/PjxShcHAABcj6Hw4enpqQsXLpS7/sKF\nC0y/DgAAymQofLRu3VqrV6/WoUOHSq07fPiw1qxZo+jo6EoXBwAAXI+hMR9PPvmk4uPjNWnSJEVF\nRSk8PFySdOrUKR05ckQBAQEaNGiQUwsFAACuwVD4CAsL01tvvaUvv/xSu3btUnJysqSr83z06dNH\nDz30kAICApxaKAAAcA2G5/kICAjQkCFDnFgKAACoDSo05uPQoUP65Zdfbtjml19+0eHDhytVFAAA\ncF0Oh4+UlBRNmjRJp06dumG7U6dOaeLEidq3b1+liwMAAK7H4fDxzTffKDIyUp07d75hu86dOysq\nKkpr166tdHEAAMD1OBw+Dhw4oHvvvdehtvfcc48OHjxouCgAAOC6HA4f58+fV1BQkENtAwMDdf78\necNFAQAA1+Vw+PDx8VFOTo5DbXNycuTj42O4KAAA4LocDh9RUVHasmWLQ223bNmi5s2bGy4KAAC4\nLofDx4MPPqijR49q3rx5slqtZbaxWq2aP3++jh49qm7dujmtSAAA4DocnmTs3nvvVZcuXZSYmKjd\nu3erU6dOatKkiby9vVVQUKDjx49r8+bNSktL0/333+/w4FQAAFC7VGiG01GjRqlx48b66quvtGTJ\nklLr69atqyeeeEL9+vVzWoEAAMC1VHh69X79+qlXr146cOCATp48qUuXLsnHx0eNGjVSq1at5OXl\nVRV1AgAAF2Ho2S5eXl5q06aN2rRp4+x6AACAi6vQs10AAAAqi/ABAABMRfgAAACmInwAAABTET4A\nAICpCB8AAMBUhm61tVqt+vbbb/Xdd98pIyNDFy5cKNXGYrFo8eLFlS4QAAC4FkPhY8GCBVq1apUi\nIiLUuXNn1a1b19l1AQAAF2UofGzcuFEdOnTQX//6V2fXY7N27VqtXLlSOTk5ioiI0NChQxUVFXXT\n7Q4cOKCEhAQ1adJEr7/+epXVBwAAjDE05uPy5ctVOrtpcnKy5s+frwEDBuiNN95Q06ZNNXXqVOXl\n5d1wu/z8fH344YeKjo6ustoAAEDlGAofrVu31pEjR5xdi01iYqK6deumLl26qFGjRho+fLjq1Kmj\n9evX33C7GTNmqHPnzrr99turrDYAAFA5hsLHs88+q8OHD2v58uU6f/68UwsqKipSamqqXe+FxWJR\ndHS0Dh06VO5269evV2Zmph555BGn1gMAAJzL0JiPF154QVarVUuWLNGSJUvk5eUlN7fSOWbu3LkV\n3vf58+dVUlKigIAAu+UBAQE6depUmducPn1aixYt0j/+8Y8y6wAAADWHofDRoUMHWSwWZ9diSElJ\niaZNm6YBAwaoQYMGkq7eCgwAAGomQ+Fj9OjRzq7Dpl69enJzc1Nubq7d8tzcXAUGBpZqX1BQoNTU\nVP3666+aOXOmpKuBRJIGDhyoiRMn6q677iq13aZNm7R582a7ZfXr19eQIUPk7+9PgKmgs2dyqrsE\n1BJu7u4KDi79swDl8/T0VHBwcHWXARd3rVNizpw5OnPmjN26Tp06KTY21vbaUPioSh4eHoqMjNTe\nvXvVvn17SVd7MlJSUtS7d+9S7X18fPT222/bLVu7dq1+/vlnjRs3TmFhYWW+T2xsrN2BuF5eXp6u\nXLlSyU9Su5QUE9ZgjpLiYmVnZ1d3GbeU4OBgjhmqnKenp0JDQzVkyJCbtjUcPvLz85WYmKidO3cq\nKytLkhQSEqJ27dqpT58+8vX1Nbpr9e3bV9OnT1dkZKSioqKUmJiowsJCxcXFSZIWLlyo7OxsjRkz\nRhaLRY0bN7bbPiAgQF5eXqWWAwCA6mcofGRnZ2vy5MnKyMhQeHi4WrZsKUk6deqUli5dqo0bN+of\n//iHgoKCDBXVsWNHnT9/Xl988YVtkrH4+Hj5+/tLknJycnT27FlD+wYAANXLYjUwuOH999/Xtm3b\nNHbsWN19991263766Se988476tChg8aMGeO0Qs2UmZnJZZcKyiyw6tllB6u7DNQCn/1vS4V614wB\n77cKLrvADNcuuzjC0H2pu3btUp8+fUoFD0lq27atevfurZ9++snIrgEAgIszFD4KCwtLzcNxvcDA\nQBUWFhouCgAAuC5D4aNx48bavHmzioqKSq0rKirS5s2bGewJAADKZGjAaf/+/fXuu+9qwoQJ6tmz\npxo2bCjp6oDTb775RseOHdPYsWOdWigAAHANhsLHH/7wBxUWFurzzz/Xp59+arfO399fI0eO1H33\n3eeUAgEAgGsxPM9HXFycOnfurF9++cVuno/mzZvL3d3daQUCAADXUqkZTt3d3dWiRQu1aNHCWfUA\nAAAX51D42LdvnyTpzjvvtHt9M9faAwAAXONQ+EhISJAkff755/Lw8LC9vpklS5YYrwwAALgkh8LH\n5MmTrzb28LB7DQAAUFEOhY/fXj7hcgoAADDK0CRjCQkJ2rt3b7nrU1JSHL40AwAAahdD4WPfvn3K\nzc0td31eXp7Dg1IBAEDtYih83Ex6erp8fHyqYtcAAOAW5/A8Hxs2bNDGjRttr5cvX66kpKRS7fLz\n83Xs2DG1bdvWORUCAACX4nD4uHz5svLy8myvL126JIvFYtfGYrGoTp066t69ux555BHnVQkAAFyG\nw+GjR48e6tGjhyRp9OjRGjp0qNq3b19lhQEAANdU4enVL1++rHvuuacqagGAm/Jwd1NmQUl1l3FL\nOXsmRyXF1uou45bj6+mmuu4ct6pQ4fDh5eWlpKQk/e53v6uKegDghgqKSjRi+cHqLgO1wGf/21J1\n3S03b4gKM3S3S2RkpE6cOOHsWgAAQC1gKHwMHjxYmzdvVlJSkoqLi51dEwAAcGEVvuwiSdOnT5eb\nm5tmzJih2bNnKzg4WF5eXnZtLBaL3nzzTacUCQAAXIeh8OHn56d69eopPDzc2fUAAAAXZyh8TJky\nxcllAACA2qJKplcHAAAoj6GeD0kqKSnR999/r507dyorK0uSFBISonbt2qlz585ycyPXAACA0gyF\nj/z8fE2dOlVHjhyRj4+P6tevL0nau3evtm7dqnXr1ik+Pl6+vr5OLRYAANz6DIWPRYsWKTU1VcOG\nDdODDz4oD4+ruykqKtJ3332n2bNna/HixRo2bJhTiwUAALc+Q9dGtm3bph49eqhnz5624CFJHh4e\n6tGjh7p3766tW7c6rUgAAOA6DIWPCxcu3PA220aNGunChQuGiwIAAK7LUPho0KCBduzYUe76HTt2\n2MaBAAAAXM9Q+OjRo4f27NmjV199Vbt371ZGRoYyMjK0a9cuvfrqq9qzZ4969erl7FoBAIALMDTg\ntGfPnsrNzdVXX32lXbt22e/Qw0OPPPKIevTo4ZQCAQCAazE8z8eAAQPUq1cv7dmzxzbPR2hoqKKj\no+Xv7++0AgEAgGsxHD4kyd/fX7Gxsc6qBQAA1AKVCh8//vijfvrpJ2VmZkq62vPRtm1btWvXzinF\nAQAA12MofFy8eFFvvfWW9u3bJzc3NwUFBUmS9uzZo2+++UZ33HGHxo8fr7p16zq1WAAAcOszFD5m\nz56t/fv3a9CgQerRo4e8vb0lSQUFBVq3bp0WLlyo2bNna8yYMU4tFgAA3PoMhY/t27erR48e6tev\nn91yb29v9evXT1lZWdq4caNTCgQAAK7F0DwfHh4eN5zhNDw83G7adQAAgGsMhY8OHTpoy5YtKikp\nKbWuuLhY//3vf3XfffdVujgAAOB6DHVPdO7cWbNmzdLEiRPVrVs3NWjQQJJ0+vRpffvttyoqKlLn\nzp2VmpqsoBSeAAAYSUlEQVRqt11kZGTlKwYAALc0Q+FjypQptv//5ZdfymwzefLkUsuWLFli5O0A\nAIALMRQ+Ro4c6ew6AABALWEofMTFxTm5DAAAUFtU+paUgoIC27NdQkJCbHN+AAAAlMVw+Dhy5Ig+\n//xzHThwwHbXi5ubm1q1aqUnn3xSzZs3d1qRAADAdRgKH4cPH9aUKVPk4eGhrl27qlGjRpKkkydP\navPmzZo8ebKmTJmiqKgopxYLAABufYbCx+LFixUcHKx//vOfCgwMtFv36KOPatKkSVq0aJEmTZrk\nlCIBAIDrMDTJ2OHDh9W9e/dSwUOSAgMD1a1bNx0+fLjSxQEAANdjKHxYLBYVFxeXu76kpEQWi8Vw\nUQAAwHUZuuzSsmVLff3114qNjVVoaKjduqysLK1bt06tWrWqVGFr167VypUrlZOTo4iICA0dOrTc\nMSTbtm3TunXr9Ouvv+rKlSv63e9+p0cffVS///3vK1UDAABwPkPhY+DAgZo8ebJeeOEF3XvvvWrY\nsKEk6dSpU9qxY4fc3d01cOBAw0UlJydr/vz5eu655xQVFaXExERNnTpV7733nvz9/Uu137dvn9q0\naaMnnnhCvr6+Wr9+vV5//XW98sorioiIMFwHAABwPkPho1mzZpo6daoWL16sHTt26PLly5IkLy8v\nxcTE6PHHH1fjxo0NF5WYmKhu3bqpS5cukqThw4dr586dWr9+vfr371+q/ZAhQ+xeDxw4UDt27NCP\nP/5I+AAAoIYxPM/H7373O40fP14lJSXKy8uTJPn7+8vNzdAwEpuioiKlpqbq4Ycfti2zWCyKjo7W\noUOHHNqH1WrVpUuX5OfnV6laAACA81U4KRQWFmrYsGFasWLF1R24uSkwMFCBgYGVDh6SdP78eZWU\nlCggIMBueUBAgHJychzax4oVK1RYWKg//OEPla4HAAA4V4XTQp06deTu7q46depURT2VtmnTJi1b\ntkxjx44tc3wIAACoXoYuu3To0EFbtmxRjx49nH5Lbb169eTm5qbc3Fy75bm5uWXOK3K9zZs365NP\nPtG4cePUunXrG7bdtGmTNm/ebLesfv36GjJkiPz9/WW1Wo19gFrq7BnHeqWAyrKI2/hhDjd3dwUH\n3/j3Dv5/1/LAnDlzdObMGbt1nTp1UmxsrO21ofDRsWNHzZw5UwkJCXrwwQcVGhoqLy+vUu0iIyMr\nvG8PDw9FRkZq7969at++vaSrYzhSUlLUu3fvcrfbtGmTPvnkE73wwguKiYm56fvExsbaHYjr5eXl\n6cqVKxWuvTYrKSaswRxWca7BHCXFxcrOzq7uMm4Znp6eCg0NLXUTSFkMhY+EhATb/+/fv7/cdkuW\nLDGye/Xt21fTp09XZGSk7VbbwsJCxcXFSZIWLlyo7OxsjRkzRtLV4PHhhx9q6NChat68uW1siJeX\nl3x9fQ3VAAAAqoah8DFy5Ehn12GnY8eOOn/+vL744gvbJGPx8fG2MRw5OTk6e/asrX1SUpJKSko0\nc+ZMzZw507a8S5cuGjVqVJXWCgAAKsZiZXBDKZmZmVx2qaDMAqueXXawustALfDxn1pqxHLONVS9\nz/63pUK9GWPkqGuXXRxRoZ6Py5cva8eOHcrIyJCfn5/atWunoKAgQ0UCAIDayeHwkZubq4kTJyoj\nI8O2bO7cuRo/frzatGlTJcUBAADX4/A8H8uWLVNmZqb69u2rv//97xo8eLC8vLz06aefVmV9AADA\nxTjc87F7927df//9evrpp23LAgMD9d577+nUqVMKDw+vkgIBAIBrcbjnIysrS61atbJbdu21o9Oe\nAwAAOBw+ioqKSk0k5unpKUkqKSlxblUAAMBlVehul4yMDKWmptpe5+fnS5JOnz5d5mReRmY4BQAA\nrq1C4WPJkiVlzlr62WefldseAADgeg6Hj6qe1RQAANQODoePa89VAQAAqAyHB5wCAAA4A+EDAACY\nivABAABMRfgAAACmInwAAABTET4AAICpCB8AAMBUhA8AAGAqwgcAADAV4QMAAJiK8AEAAExF+AAA\nAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAAMBXhAwAAmIrwAQAATEX4AAAApiJ8AAAAUxE+\nAACAqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivABAABMRfgAAACmInwAAABTET4AAICpCB8AAMBU\nhA8AAGAqwgcAADAV4QMAAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAA\nMJVHdRdQnrVr12rlypXKyclRRESEhg4dqqioqHLb//zzz5o3b57S0tIUEhKihx9+WHFxceYVDAAA\nHFIjez6Sk5M1f/58DRgwQG+88YaaNm2qqVOnKi8vr8z2GRkZeu211xQdHa0333xTvXv31ieffKI9\ne/aYXDkAALiZGhk+EhMT1a1bN3Xp0kWNGjXS8OHDVadOHa1fv77M9uvWrVP9+vX15JNPKjw8XL16\n9VKHDh2UmJhocuUAAOBmalz4KCoqUmpqqqKjo23LLBaLoqOjdejQoTK3OXz4sF17SYqJiSm3PQAA\nqD41LnycP39eJSUlCggIsFseEBCgnJycMrfJyckps31+fr6uXLlSZbUCAICKq7EDTquThweHpaJ8\nSqxqGeZX3WWgFvDx8uRcgyl8vDzl6Wmp7jJuGRX53VnjfsvWq1dPbm5uys3NtVuem5urwMDAMrcJ\nDAwss72vr688PT3L3GbTpk3avHmz3bI77rhD/fr1U1BQUCU+Qe0UKmnB4LDqLgO1BOcaUHOtWLFC\n+/fvt1vWqVMnxcbG2l7XuPDh4eGhyMhI7d27V+3bt5ckWa1WpaSkqHfv3mVu06JFC+3atctu2e7d\nu9WiRYty3yc2NtbuQABmmzNnjoYMGVLdZaAW4FyDmfr166d+/frdsE2NG/MhSX379lVSUpI2btyo\nkydP6tNPP1VhYaFt3o6FCxfqgw8+sLXv3r27zpw5owULFujUqVP6+uuvtWXLFvXt27eaPgFwc2fO\nnKnuElBLcK6hpqlxPR+S1LFjR50/f15ffPGFbZKx+Ph4+fv7S7o6wPTs2bO29mFhYXrppZc0d+5c\nrVmzRrfddptGjhypNm3aVNdHAAAA5aiR4UOSevbsqZ49e5a5btSoUaWW3XnnnXr99deruiwAAFBJ\nNfKyCwAAcF2ED6CadOrUqbpLQC3BuYaaxmK1Wq3VXQQAAKg96PkAAACmInwAAABTET4AAICpCB9w\nSY899ph27NhR3WVUqQ0bNmjo0KGV2kdmZqYee+wxHTt2zElVoSo447uuiZx1/o0ePVqrV692UlUw\nQ42d5wMoT05OjpYvX66ffvpJ2dnZCggIUNOmTdW3b1+1bt26ustzmpSUFK1cuVJHjhzR5cuXFRYW\npt///vf64x//qODgYKe8R0hIiGbMmKF69eo5ZX9mmz59ujZu3ChJcnNzk5+fn5o2bapOnTopLi5O\nFkv1PxRs9OjR6tu3r/r06VPdpbis1157TXXq1KnuMlABhA/cUjIzMzVx4kT5+fnpqaeeUpMmTVRU\nVKRdu3Zp5syZ+te//lXdJTrFN998o5kzZyouLk7jxo1TWFiYsrKytHHjRq1atUpPP/20U97HYrEo\nICDAKfuqLjExMRo9erSKi4uVm5urXbt2ac6cOdq6datefPFFubnRwevqbtXwXJsRPnBL+eyzz+Tm\n5qZXX31VXl5etuWNGzdW165d7drm5eXprbfe0u7duxUcHKynnnrK9rDCkpISzZgxQykpKcrJyVFI\nSIh69Ohh99fp9OnTdfHiRbVq1UqrVq1SUVGROnbsqKFDh9p+oeXk5Oijjz7Szz//rKCgIA0cOFCf\nf/653V+6+fn5mjdvnnbs2KErV64oKipKTz/9tJo2bVrmZ8zOztacOXPUp08fu5AREhKiVq1aKT8/\n36797t27NWfOHJ09e1atWrXSqFGjbE+AtlqtWrZsmZKSkpSXl6dGjRrpiSeeUExMjKSrYW7MmDF6\n4403bPWkpaVpwYIFtqdSRkREaPTo0QoLu/ok2aSkJK1atUoZGRkKCwtT79691aNHj4p8jU7l6elp\ne/RCUFCQIiIiFBUVpX/+85/asGGD7bzIysrSrFmzlJKSIovFopiYGA0bNqzc8HXt2IwbN05r1qzR\nkSNH1KBBAw0fPtzuoZVbtmzR0qVLlZ6ersDAQPXu3Vt//OMfJUkJCQnKysrS3LlzNXfuXEnSkiVL\nyny//Px8LViwQNu3b1d+fr4aNmyoJ554QnfffbetzY2+619++UWLFi3S0aNHVVxcrIiICA0ePFjN\nmjWzbf/YY4/pz3/+s3bu3FnmvwvJ+d+/1WrVihUrlJSUpLNnzyowMFDdunXTww8/bGtz5swZzZkz\nx9Axlkr3Lt3sWB44cECLFi3SL7/8In9/f91zzz164okn6D0xEeEDt4wLFy5o165deuKJJ+yCxzW+\nvr52r//973/rySef1FNPPaU1a9bo/fff1/Tp01W3bl1ZrVbddtttGjdunPz8/HTw4EHNmDFDwcHB\nuu+++2z7uBYqJk+erPT0dP3rX/9Ss2bNbL/Q3n//fV24cEEJCQlyd3fX3LlzlZeXZ1fH22+/LW9v\nb8XHx8vHx0fffvut/vnPf+q9995T3bp1S32O5ORkFRUVlftUyOs/Z2FhoVatWqX/9//+nywWi6ZN\nm6b58+frL3/5iyQpMTFRiYmJeu655xQREaHvvvtOb7zxht555x01aNCg1L6zs7M1efJk3XXXXZoy\nZYp8fHx06NAhFRcXS5J++OEHLV26VM8884wiIiJ09OhRffLJJ/L29tb9999fZr3VoXXr1mratKm2\nbdumrl27ymq16o033pCPj4/+8Y9/qKioSDNnztS7776ryZMn33Bfixcv1tNPP60GDRpo4cKFmjZt\nmqZNmyY3Nzelpqbq3Xff1YABA9SxY0cdPHhQn332merVq6cuXbpo3LhxGj9+vLp3764HH3yw3Pew\nWq2aOnWqCgsL9fzzzyssLEynTp2ya3Oz7/rSpUuKi4vTM888I6vVqpUrV+rVV1/VtGnT5O3tbdvP\njf5dVMX3//nnn2v9+vUaPHiwWrVqpdzcXKWlpTntGFf0WKanp+uVV17RwIEDNWrUKOXm5mrWrFma\nNWuWRo4cecNzAc5DfyRuGenp6ZKk8PBwh9rHxcWpY8eOql+/vgYOHKiCggIdOXJEkuTu7q5HH31U\nzZo1U2hoqGJjYxUXF6fk5GS7ffj5+emZZ55ReHi47r77bt19993au3evJOnkyZNKSUnRiBEj1Lx5\nc0VEROjPf/6zLl++bNv+wIEDSk1N1dixY9WsWTM1aNBATz75pHx9fbVly5ZyP6evr6/tL9obKS4u\n1vDhw9WsWTNFRESoV69eSklJsa1ftWqV+vfvrz/84Q9q2LChBg0apIiIiHIH561du1a+vr564YUX\nbPXef//9atiwoSRp6dKlevrpp3XPPfcoNDRU9957r/r27atvvvnmprWaLTw8XJmZmZKkvXv36sSJ\nE3r++edtPSOjR4/Wvn37lJqaesP99OvXTzExMWrQoIEGDBigzMxM27m4atUqRUdH609/+pMaNGig\nLl26qGfPnlqxYoWkq+ePm5ubvL29FRAQUG4vy549e5Samqq//e1vat26tcLCwhQTE2ProZJu/l23\nbt1asbGxatiwocLDwzV8+HAVFhZq3759du91o38Xzv7+CwoKtGbNGj355JO6//77FRYWpttvv10P\nPPCA045xRY/lf/7zH3Xu3Fm9e/dW/fr11aJFCw0ZMkQbN25UUVFRmfuE89HzAZfVpEkT2//XqVNH\nPj4+ys3NtS1bu3atNmzYoKysLF2+fFlFRUV2XdTS1cs51w9aDAoK0okTJyRJp0+flru7u902DRo0\nsOvNOHbsmC5duqRhw4bZ7ffKlStOecx5nTp1bN3hkhQYGGj7jJcuXdK5c+fUsmVLu21atmyp48eP\nl7m/Y8eO6Y477ihznERhYaHOnDmjjz76SB9//LFteUlJSZk9ODXJyZMnFRISYjdQt3HjxvL19VVa\nWpoiIyPL3fb68ygoKEjS1Ut64eHhOnnypO655x679q1atdKaNWtktVodHvB67NgxBQcHl9kbdc2N\nvmtJys3N1aJFi7R//37l5uaqpKREly9fVlZWVrmf57f/Lpz9/aelpamoqOimA8GdeYxvdiyPHTum\n48eP64cffrAtuzbRd0ZGhsN/3KByCB+4ZVz7YVLWD6OyeHjYn94Wi8X2Q2bz5s1asGCBBg8erNtv\nv10+Pj766quv9Msvv9xwH9LVH7aOKigoUFBQkBISEvTbJxmU9wO7YcOGys/PV05Ozk17P9zd3e1e\nX/8ZjSjrctY1BQUFkqQRI0YoKirKbl1NHNR58uRJu1/WRl1/jK/9oqvIOeCIGx33suq4Vsv13/UH\nH3ygixcvaujQoQoJCZGnp6fi4+NL/TV/o38Xzv7+HflcknOP8c3es6CgQN27d1efPn1K/VsJCQkx\n9J6ouJr3EwMoh5+fn2JiYvT111/bXdq45rcDMW/k4MGDatmypbp3766IiAjVr1+/wj0R4eHhKi4u\n1tGjR23L0tPTdfHiRdvrZs2aKScnR25ubqpfv77df35+fmXu97777pOHh0e53cqOfk4fHx8FBQXp\n4MGDdssPHjyoRo0alblN06ZNtX///jJ/8AcEBCgoKEhnzpwp9VlCQ0MdqsksKSkpOn78uG38TqNG\njZSVlaXs7Gxbm7S0NOXn56tx48aG36dRo0alju+BAwfUsGFD2y9RDw+Pm/4ibdKkibKzs22XGow4\ndOiQevfurZiYGDVu3Fju7u46f/58hfbh7O+/YcOG8vLysl2qNMKRY3y9mx3LZs2aKS0tTWFhYaU+\nx28DHqoO4QO3lGeeeUYlJSWaMGGCtm7dqvT0dJ08eVKrV6/WxIkTHd5Pw4YNlZqaqt27d+v06dNa\nsmRJqV6PmwkPD1d0dLQ++eQTHTlyREePHtWMGTPk5eVl+6HYpk0btWjRQm+++ab27NmjzMxMHTx4\nUIsXLy53rMFtt92mwYMHa/Xq1fr444+1b98+ZWVl2QbFLlu2zOEa+/Xrp6+++krJyck6deqUPv/8\ncx07dqzcOSd69eqlS5cu6V//+pdSU1OVnp6u77//XqdPn5YkDRgwQF9++aXWrFmj06dP6/jx49qw\nYYMSExMrdOyc6cqVK8rJyVF2draOHj2q5cuX680331S7du1sgyDbtGmjJk2aaNq0aTp69KiOHDmi\nDz/8UHfdddcNL7nczP/8z/8oJSVFy5Yt0+nTp7VhwwZ9/fXXdoOFw8LCtH//fmVnZ5cbBu688061\natVKb7/9tvbs2aOMjAzt2rVLu3fvdriWBg0a6Pvvv9fJkyd1+PBhvf/++w73PFzj7O/f09NT/fv3\n1+eff67vv/9eZ86c0eHDh/Xdd985XJMjx/h65R3LXbt2SZIeeughHTx4ULNmzdKvv/6q9PR0bd++\nXbNmzarQsULlcNkFt5SwsDC9/vrrWr58uebPn69z587J399fTZs2rdDcF927d9evv/6qd999VxaL\nRZ06dVLPnj1tP6AcNWbMGH388ceaMmWKAgMDNXDgQJ04cUKenp62NhMmTNDixYv10UcfKS8vT4GB\ngbrjjjtueEmlR48eCg8P18qVK/X222/r8uXLCg0N1V133aW+ffs6XF/v3r2Vn5+v+fPnKy8vT40b\nN9bf//73cq+H+/n56eWXX9aCBQs0ZcoUubm5KSIiQq1atZIkde3aVXXq1NGKFSu0YMECeXt7q0mT\nJtU6gdauXbv05z//We7u7qpbt64iIiI0bNiwUndCvPjii5o1a5amTJlid6ttZTRr1kxjx47VkiVL\ntHz5cgUGBuqxxx6zu/NjwIAB+vTTT/WXv/xFRUVF5d5q+7e//U3z58/XtGnTVFhYqAYNGuiJJ55w\nuJaRI0dqxowZeumll3Tbbbdp4MCBmj9/foU+T1V8/4888ojc3d31xRdf6Ny5cwoMDFT37t0drsmR\nY/zbHpAbHcsmTZooISFBixYtst3pVL9+fXXs2NHhmlB5FmtlLhADsHP27FmNGjVKkyZNcqnZVgHA\nmej5ACohJSVFBQUFatKkic6dO6cFCxYoLCxMd955Z3WXBgA1FuEDqITi4mItWrRIGRkZ8vHxUcuW\nLfX888/XyLs/AKCm4LILAAAwFX+eAQAAUxE+AACAqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivAB\nAABMRfgAAACmInwAAABT/X+IRYCm/jnMwwAAAABJRU5ErkJggg==\n", "text/plain": [ "" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "import matplotlib.pyplot as plt\n", "%matplotlib inline\n", "plt.style.use('ggplot')\n", "\n", "plt.bar([0.5,1.5],[np.mean(change),np.mean(no_change)],width=1.0)\n", "plt.xlim((0,3))\n", "plt.ylim((0,1))\n", "plt.ylabel('Proportion Correct Choice')\n", "plt.xticks((1.0,2.0),['Change Choice', 'Do not chance choice'])\n", "\n", "import scipy.stats as stats\n", "obs = np.array([[np.sum(change), np.sum(no_change)], [samples, samples]])\n", "print('Probability of choosing correctly if change choice: %0.2f' % np.mean(change))\n", "print('Probability of choosing correctly if do not change choice: %0.2f' % np.mean(no_change))\n", "print('Probability of difference arising from chance: %0.5f' % stats.chi2_contingency(obs)[1])" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Clearly, the contestant should change their choice! \n", "\n", "So now, just to make sure I am not crazy, I decided to simulate the Monty Hall problem with the contestant choosing what door to open after Monty Hall opens a door with a goat. " ] }, { "cell_type": "code", "execution_count": 25, "metadata": { "collapsed": true }, "outputs": [], "source": [ "change, no_change = [],[]\n", "for i in range(samples):\n", " #shuffle data\n", " vect = copy.copy(start_vect)\n", " random.shuffle(vect)\n", "\n", " #show bad door\n", " bad = vect.pop(int(np.where(np.array(vect)==0)[0][0]))\n", "\n", " #make choice\n", " choice = vect.pop(random.randint(0,1))\n", " no_change.append(choice)\n", "\n", " change.append(vect)\n" ] }, { "cell_type": "code", "execution_count": 26, "metadata": { "collapsed": false }, "outputs": [ { "name": "stdout", "output_type": "stream", "text": [ "Probability of choosing correctly if change choice: 0.51\n", "Probability of choosing correctly if do not change choice: 0.49\n", "Probability of difference arising from chance: 0.57546\n" ] }, { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAh8AAAFqCAYAAAC6Wjg+AAAABHNCSVQICAgIfAhkiAAAAAlwSFlz\nAAAPYQAAD2EBqD+naQAAIABJREFUeJzt3XlclXX+///nYRMQWQxQ0VFEUjNxMC0bRSVzdz46zads\nXMqlbHKZrzmOTd7Q1JmPNa1TVlaW+56jTSpuSWqp45a5kLuYihsgAioCAuf3hzfPzzOAHi4OF3h4\n3G83bzfPdb2v67zOORecJ+/rfb0vi9VqtQoAAMAkbhVdAAAAqFoIHwAAwFSEDwAAYCrCBwAAMBXh\nAwAAmIrwAQAATEX4AAAApiJ8AAAAUxE+AACAqQgfAADAVB4VXUBxDh8+rJUrVyopKUkZGRkaN26c\nWrdufddtfv75Z82bN0/JyckKDg7WU089pdjYWHMKBgzYunWrYmJiKroMVAEca6hsKmXPR25ursLD\nw/Xiiy861D4lJUX/+Mc/FBUVpXfeeUc9evTQ559/rgMHDpRzpYBx27Ztq+gSUEVwrKGyqZQ9H9HR\n0YqOjna4/YYNG1SrVi0NHDhQkhQWFqYjR44oPj5eLVq0KK8yAQCAAZWy56O0jh8/rqioKLtl0dHR\nOnbsWAVVBAAASuIS4SMjI0MBAQF2ywICApSdna2bN29WUFUAAKA4LhE+gPtRrVq1KroEVBEca6hs\nKuWYj9IKDAxUZmam3bLMzEz5+vrK09Oz2G22bt1aZBDWQw89pN69e5dbncCdBg8eXNEloIrgWIOZ\nVq5cqcOHD9sta9eund0VVy4RPho3bqx9+/bZLdu/f78aN25c4jYxMTElXnp25coV5efnO7VG4L/5\n+/srKyurostAFcCxBjN4eHgoKChIvXv3vucf8pUyfOTk5OjixYu2x5cuXdIvv/wiPz8/BQcHa9Gi\nRUpPT9eoUaMkSV26dNH69eu1YMECderUSQcPHtSOHTs0fvx4Q8+fn5/PWBGUO6vVynEGU3CsobKp\nlOEjKSlJU6ZMsT2eN2+eJKljx44aMWKEMjIydPnyZdv60NBQvfbaa5o7d67Wrl2rBx54QMOHD+cy\nWwAAKiGL1Wq1VnQRlU1qaip/JaDc1axZU+np6RVdBqoAjjWYwdPTUyEhIQ615WoXAABgKsIHAAAw\nFeEDAACYivABAABMRfgAAACmInwAAABTET4AAICpCB8AAMBUhA8AAGAqwgcAADAV4QMAAJiK8AEA\nAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAAMBXhAwAAmIrwAQAATEX4AAAApiJ8\nAAAAUxE+AACAqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivABAABMRfgAAACmInwAAABTET4AAICp\nCB8AAMBUhA8AAGAqwgcAADAV4QMAAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAA\nYCrCBwAAMBXhAwAAmIrwAQAATOVRlo1v3rypU6dOKTMzU02aNJG/v7+z6gIAAC7KcPhYs2aNli1b\npuzsbEnSxIkT1bx5c2VlZWnMmDEaMGCAOnXq5LRCAQCAazB02mXTpk2aO3euoqOjNXz4cLt1/v7+\nevjhh7V9+3anFAgAAFyLofCxevVqtW7dWqNHj1arVq2KrI+IiNDZs2fLXBwAAHA9hsLHxYsX1bJl\nyxLX+/n56dq1a4aLAgAArstQ+PD19VVWVlaJ65OTkxUYGGi4KAAA4LoMhY+WLVsqISFB169fL7Lu\n7NmzSkhIKPZ0DAAAgMVqtVpLu1F6erri4uJktVrVqlUrbdy4Ue3bt1dhYaF27typoKAgvfHGG2W6\n9HbdunVatWqVMjIyFB4eriFDhigyMrLE9j/88INWrlypixcvytfXV9HR0Xruuefk5+dX6udOTU3V\nzZs3DdcOOKJmzZpKT0+v6DJQBXCswQyenp4KCQlxqK2h8CFJmZmZWrx4sXbu3Gm73Nbb21tt2rTR\ngAEDFBAQYGS3kqTt27frk08+0UsvvaTIyEjFx8frP//5jz788MNiA82RI0c0efJkDR48WK1atVJ6\nerpmzJihsLAwjR07ttTPT/iAGfhCgFk41mCG0oQPw/N8BAQE6OWXX9bLL7+srKwsFRYWyt/fX25u\nZZ80NT4+Xp07d1bHjh0lScOGDdPevXu1adMm9enTp0j748ePKzQ0VN27d5ckhYSEqEuXLvrmm2/K\nXAsAAHAup0yv7u/vr8DAQKcEj/z8fCUlJSkqKsq2zGKxKCoqSseOHSt2m8aNG+vy5cv66aefJEkZ\nGRn6z3/+o0ceeaTM9QAAAOcy1POxZMkS/fjjj3rnnXeKXf/qq6/q0Ucf1TPPPFPqfV+9elWFhYVF\nTtsEBATo/PnzxW7TpEkT/elPf9IHH3ygvLw8FRYWqlWrVnrhhRdK/fwAAKB8Geqq2LFjx13n+WjZ\nsqWpM5wmJydr9uzZeuaZZ/TWW28pLi5OqampmjFjhmk1AAAAxxjq+UhLS1OtWrVKXB8aGqq0tDRD\nBdWoUUNubm7KzMy0W56ZmVni3CH//ve/1aRJE/32t7+VJNWvX18vvPCCJk2apD/84Q/Fbrd161Zt\n27bNblmtWrU0ePBg+fv7y+A4XMBhnp6eqlmzZkWXgSqAYw1msFgskqQ5c+bo0qVLduvatWunmJgY\n22ND4cPb21upqaklrk9JSZGnp6eRXcvDw0MRERE6ePCgWrduLUmyWq1KTExUjx49it0mNzdXHh72\nL+Ve409iYmLs3og7ZWVlcbULyh1XIMAsHGsww+2rXQYPHnzPtoZOuzRr1kwbN24s9mBOS0vTxo0b\n9fDDDxvZtSSpV69eSkhI0JYtW3Tu3Dl98cUXys3NVWxsrCRp0aJF+vjjj23tW7VqpZ07d2rDhg1K\nSUnRkSNHNHv2bD344IPMtAoAQCVjqOfjD3/4g8aPH68///nP6tSpk+rVqyfp1uymmzZtktVq1bPP\nPmu4qLZt2+rq1av66quvbJOMxcXF2eb4yMjI0OXLl23tY2NjlZOTo/Xr12v+/PmqXr26mjdvrgED\nBhiuAQAAlA/Dk4ydPn1as2bN0pEjR+yWP/TQQxoyZIgaNGjglAIrApOMwQx0hcMsHGswgykznN6W\nlZWllJQUSbcGmpZlSvXKgvABM/CFALNwrMEMpsxwepu/v79LBA4AAGAOh8LHli1bJEkdOnSQxWKx\nPb6X29OjAwAA3OZQ+Jg+fbqkW9fpenh42B7fC+EDAAD8N4fGfNye0+P2uZy7zfFxJ0fP/VQ2jPmA\nGTgPD7NwrMEMTh/z8d87u19DBQAAqHhlHnCanJxs1zNye84PAACA4hgOH7t379a8efNsl9neFhoa\nqkGDBtmmRgcAALiTofCxd+9evffeewoJCVG/fv1svR3JyclKSEjQu+++q9dee03R0dFOLRYAANz/\nDIWP5cuXq0GDBpoyZYq8vb1ty1u3bq3u3bvr9ddf17JlywgfAACgCEM3ljtz5ow6duxoFzxu8/b2\nVmxsrM6cOVPm4gAAgOsxFD48PT117dq1Etdfu3ZNnp6ehosCAACuy1D4aN68udasWaNjx44VWXf8\n+HGtXbtWUVFRZS4OAAC4HkM3lktJSVFcXJyysrIUGRmpsLAwSdL58+d14sQJBQQE6P/+7/8UGhrq\n9ILNwCRjMAMTP8EsHGswgyl3tc3MzNTXX3+tffv22c3z0bJlS/3ud79TQECAkd1WCoQPmIEvBJiF\nYw1mMOWutgEBARo8eLDRzQEAQBVlaMwHAACAUYZ7PpKTk7V582ZdunRJ169f13+fvbFYLHr99dfL\nXCAAAHAthsLH999/r+nTp8vd3V1hYWHy8/Mr0sbgUBIAAODiDIWPZcuWqWHDhho/frz8/f2dXRMA\nAHBhhsZ8pKen64knniB4AACAUjMUPho0aMBlWwAAwBBD4eP555/Xpk2bdPToUWfXAwAAXJxDYz7e\neuutIst8fX31+uuvq169egoODpabm32OsVgsevXVV51TJQAAcBkOhY+S7lAbHBysnJwcJScnF1ln\nsVjKVhkAAHBJDoWPTz75pLzrAAAAVQQznAIAAFM5HD6ys7M1depUrVix4q7tVqxYoTfeeEM3btwo\nc3EAAMD1OBw+1q1bp2PHjqlz5853bffkk0/q6NGjWrt2bZmLAwAArsfh8LFr1y61bdv2nhOLBQQE\nqF27dtq5c2eZiwMAAK7H4fBx7tw5NWrUyKG2ERERunDhguGiAACA6yq3AafcWA4AABTH4fARHBys\npKQkh9omJSUpODjYcFEAAMB1ORw+WrZsqR9++OGep1MuXLigH374QS1btixzcQAAwPU4HD769Okj\nLy8vTZ48Wdu3b1dBQYHd+oKCAm3fvl1TpkyRl5eXevfu7fRiAQDA/c9iLcXgjBMnTujdd9/VlStX\n5OXlpbCwMHl7eysnJ0fnz59XXl6eAgMDNW7cOEVGRpZn3eUqNTVVN2/erOgy4OJq1qzJ3aFhCo41\nmMHT01MhISEOtS1V+JBuTTa2YcMG/fjjjzp37pxu3LghHx8f1a1bV61atVKXLl1UvXp1Q4VXFoQP\nmIEvBJiFYw1mKNfwURUQPmAGvhBgFo41mKE04YN7uwAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAA\nMJWh8PGvf/1LZ86cKXH92bNn9a9//ctwUQAAwHUZCh/Lli27Z/hYtmyZ4aIAAIDrKpfTLteuXZOH\nh0d57BoAANznHE4Ihw4d0qFDh2yPd+7cqYsXLxZpd/36dW3fvl3169d3ToUAAMClOBw+fv75Z7tx\nHLt27dKuXbuKbVuvXj0NHTq07NUBAACX4/D06nl5ecrNzZXVatWwYcM0bNgwtWnTxn5nFou8vLzk\n5eVVLsWahenVYQamvIZZONZghtJMr+5wz8edoeLjjz9WQEDAfR8yAACA+QwNOLVarTpw4ECJ6/fs\n2aOUlBTDRQEAANdl6JKUefPm6caNG2rdunWx69evX6/q1avrlVdeMVzYunXrtGrVKmVkZCg8PFxD\nhgxRZGRkie3z8/O1bNkybd26VRkZGQoKCtLTTz+t2NhYwzUAAADnMxQ+jh8/rp49e5a4PioqSvHx\n8YaL2r59u+bPn6+XXnpJkZGRio+P19SpU/Xhhx/K39+/2G3ef/99ZWVlafjw4apdu7auXLkiB4ez\nAAAAExkKH9euXZOPj0+J6729vXXt2jXDRcXHx6tz587q2LGjJGnYsGHau3evNm3apD59+hRpv2/f\nPh0+fFgff/yxqlevLkkKDg42/PwAAKD8GBrzERwcrCNHjpS4/vDhw6pZs6ahgvLz85WUlKSoqCjb\nMovFoqioKB07dqzYbfbs2aNGjRrpm2++0csvv6zRo0dr/vz5ysvLM1QDAAAoP4bCR7t27bRt2zat\nWbNGhYWFtuWFhYVas2aNtm/frpiYGEMFXb16VYWFhQoICLBbHhAQoIyMjGK3SUlJ0eHDh3X27FmN\nGzdOQ4YM0Y4dOzRz5kxDNQAAgPJj6LTLU089paNHj2ru3Ln6+uuvFRYWJkk6f/68srKy1KxZM/3+\n9793aqF3Y7Va5ebmptGjR8vb21uSNGjQIL3//vt68cUX5enpaVotAADg7gyFD09PT8XFxWnLli3a\nuXOnLl26JElq1KiRHn/8cXXo0EFubsZuG1OjRg25ubkpMzPTbnlmZqYCAwOL3SYwMFA1a9a0BQ9J\nqlu3rqxWqy5fvqzatWsX2Wbr1q3atm2b3bJatWpp8ODB8vf3Z7Aqyp2np6fh05NAaXCswQwWi0WS\nNGfOHFsuuK1du3Z2Z0QM3/3Nzc1NTzzxhJ544gmjuyiWh4eHIiIidPDgQdulvFarVYmJierRo0ex\n2zRp0kQ7duxQbm6uqlWrJulWL4ybm5seeOCBYreJiYkp8dRQVlYWM5yi3DHrJMzCsQYz3J7hdPDg\nwfdsW6a72t68eVPHjh3T7t27lZWVVZZd2enVq5cSEhK0ZcsWnTt3Tl988YVyc3Ntc3YsWrRIH3/8\nsa19TEyMatSooenTpys5OVmHDh3SggUL9MQTT3DKBQCASsZwz8eaNWu0bNkyZWdnS5ImTpyo5s2b\nKysrS2PGjNGAAQPUqVMnQ/tu27atrl69qq+++so2yVhcXJxtjo+MjAxdvnzZ1t7b21sTJkzQ7Nmz\nNX78eNWoUUNt27bVs88+a/TlAQCAcuLwjeXutGnTJn322Wdq27atfv3rX+vTTz+1hQ/p1oRf2dnZ\nmjBhgtMLNgM3loMZ6AqHWTjWYIbS3FjO0GmX1atXq3Xr1ho9erRatWpVZH1ERITOnj1rZNcAAMDF\nGQofFy9eVMuWLUtc7+fnV6YZTgEAgOsyFD58fX3vOsA0OTm5xMtiAQBA1WYofLRs2VIJCQm6fv16\nkXVnz55VQkJCsadjAAAADA04TU9PV1xcnKxWq1q1aqWNGzeqffv2Kiws1M6dOxUUFKQ33nijxDvQ\nVnYMOIUZGAQIs3CswQylGXBqKHxIt2YcXbx4sXbu3Gm73Nbb21tt2rTRgAEDityb5X5C+IAZ+EKA\nWTjWYAZTwsedsrKyVFhYKH9/f8PTqlcmhA+YgS8EmIVjDWYo10ttc3NzNXToUK1cudK2zN/fX4GB\ngS4RPAAAQPkqdVqoVq2a3N3dbfdQAQAAKA1DXRVt2rTRjh07uPMrAAAoNUNjPg4dOqSZM2eqRo0a\nevLJJxUSEiIvL68i7SIiIpxSpNkY8wEzcB4eZuFYgxlKM+bD0I3lpkyZYvv/4cOHS2y3dOlSI7sH\nAAAuzFD4GD58uLPrAAAAVUSpw4fVatVjjz0mDw+PYk+1AAAA3E2pB5zm5+dr6NChWrt2bXnUAwAA\nXFypw4enp6cCAwPl6elZHvUAAAAXZ+hS29jYWG3ZskX5+fnOrgcAALg4QwNO69evr927d+vPf/6z\nYmNjS7zUtk2bNmUuEAAAuBZD4ePDDz+0/f9ul9NyqS0AAPhvhsLHpEmTnF0HAACoIgyFj2bNmjm7\nDgAAUEUYCh93Sk5OVmpqqiQpJCRE9erVK3NRAADAdRkOH7t379a8efOUkpJitzw0NFSDBg1S69at\ny1wcAABwPYbCx969e/Xee+8pJCRE/fr1s/V2JCcnKyEhQe+++65ee+01RUdHO7VYAABw/zN0V9u4\nuDjl5+drypQp8vb2tluXk5Oj119/XZ6enpo6darTCjUTd7UtvesFFmXfLKzoMu4rbu7uKiwoqOgy\n7ju+nm6q7l7qX1tVGne1hRnK/a62Z86cUb9+/YoED0ny9vZWbGysFi9ebGTXuE9l3yzUi8uPVnQZ\nqAK+/N8mqu5uqegyAJSBoRlOPT09de3atRLXX7t2jenXAQBAsQz1fDRv3lxr1qxRdHS0GjdubLfu\n+PHjWrt2rVq0aOGUAgHgTh7ubkrN4RRfaVy+lKHCAk5VlRan+MqPofAxcOBAxcXFaeLEiYqMjFRY\nWJgk6fz58zpx4oQCAgI0YMAApxYKAJKUk1+ol1dwig/lj1N85cdQ+AgNDdW7776rr7/+Wvv27dP2\n7dsl3Zrno2fPnvrd736ngIAApxYKAABcg+F5PgICAjR48GAnlgIAAKqCUg04PXbsmE6ePHnXNidP\nntTx48fLVBQAAHBdDoePxMRETZw4UefPn79ru/Pnz2vChAk6dOhQmYsDAACux+Hw8e233yoiIkLt\n27e/a7v27dsrMjJS69atK3NxAADA9TgcPo4cOaLHHnvMobaPPvqojh5lNDoAACjK4fBx9epVBQUF\nOdQ2MDBQV69eNVwUAABwXQ6HDx8fH2VkZDjUNiMjQz4+PoaLAgAArsvh8BEZGakdO3Y41HbHjh1q\n1KiR4aIAAIDrcjh8PPnkkzp16pTmzZunkm6Ea7VaNX/+fJ06dUqdO3d2WpEAAMB1ODzJ2GOPPaaO\nHTsqPj5e+/fvV7t27VS/fn15e3srJydHZ86c0bZt25ScnKwOHTo4PDgVAABULaWa4XTEiBGqV6+e\nvvnmGy1durTI+urVq6t///7q3bu30woEAACupdTTq/fu3Vvdu3fXkSNHdO7cOd24cUM+Pj6qW7eu\nmjZtKi8vr/KoEwAAuAhD93bx8vJSixYt1KJFC2fXAwAAXFyp7u0CAABQVoQPAABgKsIHAAAwFeED\nAACYivABAABMRfgAAACmMnSprdVq1caNG/Xdd98pJSVF165dK9LGYrFoyZIlZS4QAAC4FkPhY8GC\nBVq9erXCw8PVvn17Va9e3dl1AQAAF2UofGzZskVt2rTRn//8Z2fXY7Nu3TqtWrVKGRkZCg8P15Ah\nQxQZGXnP7Y4cOaIpU6aofv36euutt8qtPgAAYIyhMR95eXnlOrvp9u3bNX/+fPXt21dvv/22GjRo\noKlTpyorK+uu22VnZ+uTTz5RVFRUudUGAADKxlD4aN68uU6cOOHsWmzi4+PVuXNndezYUXXr1tWw\nYcNUrVo1bdq06a7bzZgxQ+3bt9eDDz5YbrUBAICyMRQ+XnzxRR0/flwrVqzQ1atXnVpQfn6+kpKS\n7HovLBaLoqKidOzYsRK327Rpk1JTU/X00087tR4AAOBchsZ8vPLKK7JarVq6dKmWLl0qLy8vubkV\nzTFz584t9b6vXr2qwsJCBQQE2C0PCAjQ+fPni93mwoULWrx4sf72t78VWwcAAKg8DIWPNm3ayGKx\nOLsWQwoLCzVt2jT17dtXtWvXlnTrUmAAAFA5GQofI0eOdHYdNjVq1JCbm5syMzPtlmdmZiowMLBI\n+5ycHCUlJemXX37RzJkzJd0KJJLUr18/TZgwQQ8//HCR7bZu3apt27bZLatVq5YGDx4sf39/Akwp\nXb6UUdEloIqwqHL84QPX5+burpo1i37voHi3OyXmzJmjS5cu2a1r166dYmJibI8NhY/y5OHhoYiI\nCB08eFCtW7eWdKsnIzExUT169CjS3sfHR++9957dsnXr1unnn3/W2LFjFRoaWuzzxMTE2L0Rd8rK\nytLNmzfL+EqqlsICwhrMYRXHGsxRWFCg9PT0ii7jvuHp6amQkBANHjz4nm0Nh4/s7GzFx8dr7969\nSktLkyQFBwerVatW6tmzp3x9fY3uWr169dL06dMVERGhyMhIxcfHKzc3V7GxsZKkRYsWKT09XaNG\njZLFYlG9evXstg8ICJCXl1eR5QAAoOIZCh/p6emaNGmSUlJSFBYWpiZNmkiSzp8/r2XLlmnLli36\n29/+pqCgIENFtW3bVlevXtVXX31lm2QsLi5O/v7+kqSMjAxdvnzZ0L4BAEDFslgNDG746KOPtGvX\nLo0ZM0aPPPKI3bqffvpJ77//vtq0aaNRo0Y5rVAzpaamctqllFJzrHpx+dGKLgNVwGe/b6KXV3Cs\nofx9+b9NFOLNGCNH3T7t4ghD16Xu27dPPXv2LBI8JKlly5bq0aOHfvrpJyO7BgAALs5Q+MjNzS0y\nD8edAgMDlZuba7goAADgugyFj3r16mnbtm3Kz88vsi4/P1/btm1jsCcAACiWoQGnffr00QcffKDx\n48erW7duqlOnjqRbA06//fZbnT59WmPGjHFqoQAAwDUYCh+/+c1vlJubq4ULF+qLL76wW+fv76/h\nw4fr8ccfd0qBAADAtRie5yM2Nlbt27fXyZMn7eb5aNSokdzd3Z1WIAAAcC1lmuHU3d1djRs3VuPG\njZ1VDwAAcHEOhY9Dhw5Jkpo1a2b3+F5utwcAALjNofAxZcoUSdLChQvl4eFhe3wvS5cuNV4ZAABw\nSQ6Fj0mTJt1q7OFh9xgAAKC0HAof/336hNMpAADAKEOTjE2ZMkUHDx4scX1iYqLDp2YAAEDVYih8\nHDp0SJmZmSWuz8rKcnhQKgAAqFoMhY97uXjxonx8fMpj1wAA4D7n8Dwfmzdv1pYtW2yPV6xYoYSE\nhCLtsrOzdfr0abVs2dI5FQIAAJficPjIy8tTVlaW7fGNGzdksVjs2lgsFlWrVk1dunTR008/7bwq\nAQCAy3A4fHTt2lVdu3aVJI0cOVJDhgxR69aty60wAADgmko95iMvL0+PPvpoedQCAACqgFKHDy8v\nLyUkJNz1ahcAAICSGLraJSIiQmfPnnV2LQAAoAowFD4GDRqkbdu2KSEhQQUFBc6uCQAAuDCHB5ze\nafr06XJzc9OMGTM0e/Zs1axZU15eXnZtLBaL3nnnHacUCQAAXIeh8OHn56caNWooLCzM2fUAAAAX\nZyh8TJ482cllAACAqqJcplcHAAAoiaGeD0kqLCzU999/r7179yotLU2SFBwcrFatWql9+/ZycyPX\nAACAogyFj+zsbE2dOlUnTpyQj4+PatWqJUk6ePCgdu7cqQ0bNiguLk6+vr5OLRYAANz/DIWPxYsX\nKykpSUOHDtWTTz4pD49bu8nPz9d3332n2bNna8mSJRo6dKhTiwUAAPc/Q+dGdu3apa5du6pbt262\n4CFJHh4e6tq1q7p06aKdO3c6rUgAAOA6DIWPa9eu3fUy27p16+ratWuGiwIAAK7LUPioXbu29uzZ\nU+L6PXv22MaBAAAA3MlQ+OjatasOHDigN998U/v371dKSopSUlK0b98+vfnmmzpw4IC6d+/u7FoB\nAIALMDTgtFu3bsrMzNQ333yjffv22e/Qw0NPP/20unbt6pQCAQCAazE8z0ffvn3VvXt3HThwwDbP\nR0hIiKKiouTv7++0AgEAgGsxHD4kyd/fXzExMc6qBQAAVAFlCh8//vijfvrpJ6Wmpkq61fPRsmVL\ntWrVyinFAQAA12MofFy/fl3vvvuuDh06JDc3NwUFBUmSDhw4oG+//VYPPfSQxo0bp+rVqzu1WAAA\ncP8zFD5mz56tw4cPa8CAAeratau8vb0lSTk5OdqwYYMWLVqk2bNna9SoUU4tFgAA3P8MhY/du3er\na9eu6t27t91yb29v9e7dW2lpadqyZYtTCgQAAK7F0DwfHh4ed53hNCwszG7adQAAgNsMhY82bdpo\nx44dKiwsLLKuoKBA//nPf/T444+XuTgAAOB6DHVPtG/fXrNmzdKECRPUuXNn1a5dW5J04cIFbdy4\nUfn5+Wrr4ZF9AAAYTElEQVTfvr2SkpLstouIiCh7xQAA4L5mKHxMnjzZ9v+TJ08W22bSpElFli1d\nutTI0wEAABdiKHwMHz7c2XUAAIAqwlD4iI2NdXIZAACgqijzJSk5OTm2e7sEBwfb5vwAAAAojuHw\nceLECS1cuFBHjhyxXfXi5uampk2bauDAgWrUqJHTigQAAK7DUPg4fvy4Jk+eLA8PD3Xq1El169aV\nJJ07d07btm3TpEmTNHnyZEVGRjq1WAAAcP8zFD6WLFmimjVr6u9//7sCAwPt1j3zzDOaOHGiFi9e\nrIkTJzqlSAAA4DoMTTJ2/PhxdenSpUjwkKTAwEB17txZx48fL3NxAADA9RgKHxaLRQUFBSWuLyws\nlMViMVwUAABwXYZOuzRp0kTr169XTEyMQkJC7NalpaVpw4YNatq0aZkKW7dunVatWqWMjAyFh4dr\nyJAhJY4h2bVrlzZs2KBffvlFN2/e1K9+9Ss988wz+vWvf12mGgAAgPMZCh/9+vXTpEmT9Morr+ix\nxx5TnTp1JEnnz5/Xnj175O7urn79+hkuavv27Zo/f75eeuklRUZGKj4+XlOnTtWHH34of3//Iu0P\nHTqkFi1aqH///vL19dWmTZv01ltv6Y033lB4eLjhOgAAgPMZCh8NGzbU1KlTtWTJEu3Zs0d5eXmS\nJC8vL0VHR+sPf/iD6tWrZ7io+Ph4de7cWR07dpQkDRs2THv37tWmTZvUp0+fIu0HDx5s97hfv37a\ns2ePfvzxR8IHAACVjOF5Pn71q19p3LhxKiwsVFZWliTJ399fbm6GhpHY5OfnKykpSU899ZRtmcVi\nUVRUlI4dO+bQPqxWq27cuCE/P78y1QIAAJyv1EkhNzdXQ4cO1cqVK2/twM1NgYGBCgwMLHPwkKSr\nV6+qsLBQAQEBdssDAgKUkZHh0D5Wrlyp3Nxc/eY3vylzPQAAwLlKnRaqVasmd3d3VatWrTzqKbOt\nW7dq+fLlGjNmTLHjQwAAQMUydNqlTZs22rFjh7p27er0S2pr1KghNzc3ZWZm2i3PzMwsdl6RO23b\ntk2ff/65xo4dq+bNm9+17datW7Vt2za7ZbVq1dLgwYPl7+8vq9Vq7AVUUZcvOdYrBZSVRVzGD3O4\nuburZs27f+/g/3c7D8yZM0eXLl2yW9euXTvFxMTYHhsKH23bttXMmTM1ZcoUPfnkkwoJCZGXl1eR\ndhEREaXet4eHhyIiInTw4EG1bt1a0q0xHImJierRo0eJ223dulWff/65XnnlFUVHR9/zeWJiYuze\niDtlZWXp5s2bpa69KissIKzBHFZxrMEchQUFSk9Pr+gy7huenp4KCQkpchFIcQyFjylTptj+f/jw\n4RLbLV261Mju1atXL02fPl0RERG2S21zc3MVGxsrSVq0aJHS09M1atQoSbeCxyeffKIhQ4aoUaNG\ntrEhXl5e8vX1NVQDAAAoH4bCx/Dhw51dh522bdvq6tWr+uqrr2yTjMXFxdnGcGRkZOjy5cu29gkJ\nCSosLNTMmTM1c+ZM2/KOHTtqxIgR5VorAAAoHYuVwQ1FpKamctqllFJzrHpx+dGKLgNVwGe/b6KX\nV3Csofx9+b9NFOLNGCNH3T7t4ohS9Xzk5eVpz549SklJkZ+fn1q1aqWgoCBDRQIAgKrJ4fCRmZmp\nCRMmKCUlxbZs7ty5GjdunFq0aFEuxQEAANfj8Dwfy5cvV2pqqnr16qW//vWvGjRokLy8vPTFF1+U\nZ30AAMDFONzzsX//fnXo0EHPP/+8bVlgYKA+/PBDnT9/XmFhYeVSIAAAcC0O93ykpaWpadOmdstu\nP3Z02nMAAACHw0d+fn6RicQ8PT0lSYWFhc6tCgAAuKxSXe2SkpKipKQk2+Ps7GxJ0oULF4qdzMvI\nDKcAAMC1lSp8LF26tNhZS7/88ssS2wMAANzJ4fBR3rOaAgCAqsHh8HH7vioAAABl4fCAUwAAAGcg\nfAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAAMBXhAwAAmIrwAQAATEX4AAAApiJ8AAAAUxE+AACA\nqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivABAABMRfgAAACmInwAAABTET4AAICpCB8AAMBUhA8A\nAGAqwgcAADAV4QMAAJiK8AEAAExF+AAAAKYifAAAAFMRPgAAgKkIHwAAwFSEDwAAYCrCBwAAMBXh\nAwAAmIrwAQAATEX4AAAApiJ8AAAAUxE+AACAqQgfAADAVIQPAABgKsIHAAAwFeEDAACYivABAABM\nRfgAAACm8qjoAkqybt06rVq1ShkZGQoPD9eQIUMUGRlZYvuff/5Z8+bNU3JysoKDg/XUU08pNjbW\nvIIBAIBDKmXPx/bt2zV//nz17dtXb7/9tho0aKCpU6cqKyur2PYpKSn6xz/+oaioKL3zzjvq0aOH\nPv/8cx04cMDkygEAwL1UyvARHx+vzp07q2PHjqpbt66GDRumatWqadOmTcW237Bhg2rVqqWBAwcq\nLCxM3bt3V5s2bRQfH29y5QAA4F4qXfjIz89XUlKSoqKibMssFouioqJ07NixYrc5fvy4XXtJio6O\nLrE9AACoOJUufFy9elWFhYUKCAiwWx4QEKCMjIxit8nIyCi2fXZ2tm7evFlutQIAgNKrtANOK5KH\nB29LafkUWtUk1K+iy0AV4OPlybEGU/h4ecrT01LRZdw3SvPdWem+ZWvUqCE3NzdlZmbaLc/MzFRg\nYGCx2wQGBhbb3tfXV56ensVus3XrVm3bts1u2UMPPaTevXsrKCioDK+gagqRtGBQaEWXgSqCYw2o\nvFauXKnDhw/bLWvXrp1iYmJsjytd+PDw8FBERIQOHjyo1q1bS5KsVqsSExPVo0ePYrdp3Lix9u3b\nZ7ds//79aty4cYnPExMTY/dGAGabM2eOBg8eXNFloArgWIOZevfurd69e9+1TaUb8yFJvXr1UkJC\ngrZs2aJz587piy++UG5urm3ejkWLFunjjz+2te/SpYsuXbqkBQsW6Pz581q/fr127NihXr16VdAr\nAO7t0qVLFV0CqgiONVQ2la7nQ5Latm2rq1ev6quvvrJNMhYXFyd/f39JtwaYXr582dY+NDRUr732\nmubOnau1a9fqgQce0PDhw9WiRYuKegkAAKAElTJ8SFK3bt3UrVu3YteNGDGiyLJmzZrprbfeKu+y\nAABAGVXK0y4AAMB1ET6ACtKuXbuKLgFVBMcaKhuL1Wq1VnQRAACg6qDnAwAAmIrwAQAATEX4AAAA\npiJ8wCU9++yz2rNnT0WXUa42b96sIUOGlGkfqampevbZZ3X69GknVYXy4IzPujJy1vE3cuRIrVmz\nxklVwQyVdp4PoCQZGRlasWKFfvrpJ6WnpysgIEANGjRQr1691Lx584ouz2kSExO1atUqnThxQnl5\neQoNDdWvf/1r/fa3v1XNmjWd8hzBwcGaMWOGatSo4ZT9mW369OnasmWLJMnNzU1+fn5q0KCB2rVr\np9jYWFksFX9TsJEjR6pXr17q2bNnRZfisv7xj3+oWrVqFV0GSoHwgftKamqqJkyYID8/Pz333HOq\nX7++8vPztW/fPs2cOVP//Oc/K7pEp/j22281c+ZMxcbGauzYsQoNDVVaWpq2bNmi1atX6/nnn3fK\n81gsFgUEBDhlXxUlOjpaI0eOVEFBgTIzM7Vv3z7NmTNHO3fu1Kuvvio3Nzp4Xd39Gp6rMsIH7itf\nfvml3Nzc9Oabb8rLy8u2vF69eurUqZNd26ysLL377rvav3+/atasqeeee852s8LCwkLNmDFDiYmJ\nysjIUHBwsLp27Wr31+n06dN1/fp1NW3aVKtXr1Z+fr7atm2rIUOG2L7QMjIy9Omnn+rnn39WUFCQ\n+vXrp4ULF9r9pZudna158+Zpz549unnzpiIjI/X888+rQYMGxb7G9PR0zZkzRz179rQLGcHBwWra\ntKmys7Pt2u/fv19z5szR5cuX1bRpU40YMcJ2B2ir1arly5crISFBWVlZqlu3rvr376/o6GhJt8Lc\nqFGj9Pbbb9vqSU5O1oIFC2x3pQwPD9fIkSMVGnrrTrIJCQlavXq1UlJSFBoaqh49eqhr166l+Rid\nytPT03brhaCgIIWHhysyMlJ///vftXnzZttxkZaWplmzZikxMVEWi0XR0dEaOnRoieHr9nszduxY\nrV27VidOnFDt2rU1bNgwu5tW7tixQ8uWLdPFixcVGBioHj166Le//a0kacqUKUpLS9PcuXM1d+5c\nSdLSpUuLfb7s7GwtWLBAu3fvVnZ2turUqaP+/fvrkUcesbW522d98uRJLV68WKdOnVJBQYHCw8M1\naNAgNWzY0Lb9s88+qz/+8Y/au3dvsT8XkvM/f6vVqpUrVyohIUGXL19WYGCgOnfurKeeesrW5tKl\nS5ozZ46h91gq2rt0r/fyyJEjWrx4sU6ePCl/f389+uij6t+/P70nJiJ84L5x7do17du3T/3797cL\nHrf5+vraPf7Xv/6lgQMH6rnnntPatWv10Ucfafr06apevbqsVqseeOABjR07Vn5+fjp69KhmzJih\nmjVr6vHHH7ft43aomDRpki5evKh//vOfatiwoe0L7aOPPtK1a9c0ZcoUubu7a+7cucrKyrKr4733\n3pO3t7fi4uLk4+OjjRs36u9//7s+/PBDVa9evcjr2L59u/Lz80u8K+SdrzM3N1erV6/W//t//08W\ni0XTpk3T/Pnz9ac//UmSFB8fr/j4eL300ksKDw/Xd999p7ffflvvv/++ateuXWTf6enpmjRpkh5+\n+GFNnjxZPj4+OnbsmAoKCiRJP/zwg5YtW6YXXnhB4eHhOnXqlD7//HN5e3urQ4cOxdZbEZo3b64G\nDRpo165d6tSpk6xWq95++235+Pjob3/7m/Lz8zVz5kx98MEHmjRp0l33tWTJEj3//POqXbu2Fi1a\npGnTpmnatGlyc3NTUlKSPvjgA/Xt21dt27bV0aNH9eWXX6pGjRrq2LGjxo4dq3HjxqlLly568skn\nS3wOq9WqqVOnKjc3V6NHj1ZoaKjOnz9v1+Zen/WNGzcUGxurF154QVarVatWrdKbb76padOmydvb\n27afu/1clMfnv3DhQm3atEmDBg1S06ZNlZmZqeTkZKe9x6V9Ly9evKg33nhD/fr104gRI5SZmalZ\ns2Zp1qxZGj58+F2PBTgP/ZG4b1y8eFGSFBYW5lD72NhYtW3bVrVq1VK/fv2Uk5OjEydOSJLc3d31\nzDPPqGHDhgoJCVFMTIxiY2O1fft2u334+fnphRdeUFhYmB555BE98sgjOnjwoCTp3LlzSkxM1Msv\nv6xGjRopPDxcf/zjH5WXl2fb/siRI0pKStKYMWPUsGFD1a5dWwMHDpSvr6927NhR4uv09fW1/UV7\nNwUFBRo2bJgaNmyo8PBwde/eXYmJibb1q1evVp8+ffSb3/xGderU0YABAxQeHl7i4Lx169bJ19dX\nr7zyiq3eDh06qE6dOpKkZcuW6fnnn9ejjz6qkJAQPfbYY+rVq5e+/fbbe9ZqtrCwMKWmpkqSDh48\nqLNnz2r06NG2npGRI0fq0KFDSkpKuut+evfurejoaNWuXVt9+/ZVamqq7VhcvXq1oqKi9Pvf/161\na9dWx44d1a1bN61cuVLSrePHzc1N3t7eCggIKLGX5cCBA0pKStJf/vIXNW/eXKGhoYqOjrb1UEn3\n/qybN2+umJgY1alTR2FhYRo2bJhyc3N16NAhu+e628+Fsz//nJwcrV27VgMHDlSHDh0UGhqqBx98\nUE888YTT3uPSvpf//ve/1b59e/Xo0UO1atVS48aNNXjwYG3ZskX5+fnF7hPOR88HXFb9+vVt/69W\nrZp8fHyUmZlpW7Zu3Tpt3rxZaWlpysvLU35+vl0XtXTrdM6dgxaDgoJ09uxZSdKFCxfk7u5ut03t\n2rXtejNOnz6tGzduaOjQoXb7vXnzplNuc16tWjVbd7gkBQYG2l7jjRs3dOXKFTVp0sRumyZNmujM\nmTPF7u/06dN66KGHih0nkZubq0uXLunTTz/VZ599ZlteWFhYbA9OZXLu3DkFBwfbDdStV6+efH19\nlZycrIiIiBK3vfM4CgoKknTrlF5YWJjOnTunRx991K5906ZNtXbtWlmtVocHvJ4+fVo1a9Ystjfq\ntrt91pKUmZmpxYsX6/Dhw8rMzFRhYaHy8vKUlpZW4uv5758LZ3/+ycnJys/Pv+dAcGe+x/d6L0+f\nPq0zZ87ohx9+sC27PdF3SkqKw3/coGwIH7hv3P5lUtwvo+J4eNgf3haLxfZLZtu2bVqwYIEGDRqk\nBx98UD4+Pvrmm2908uTJu+5DuvXL1lE5OTkKCgrSlClT9N93MijpF3adOnWUnZ2tjIyMe/Z+uLu7\n2z2+8zUaUdzprNtycnIkSS+//LIiIyPt1lXGQZ3nzp2z+7I26s73+PYXXWmOAUfc7X0vro7btdz5\nWX/88ce6fv26hgwZouDgYHl6eiouLq7IX/N3+7lw9ufvyOuSnPse3+s5c3Jy1KVLF/Xs2bPIz0pw\ncLCh50TpVb7fGEAJ/Pz8FB0drfXr19ud2rjtvwdi3s3Ro0fVpEkTdenSReHh4apVq1apeyLCwsJU\nUFCgU6dO2ZZdvHhR169ftz1u2LChMjIy5Obmplq1atn98/PzK3a/jz/+uDw8PErsVnb0dfr4+Cgo\nKEhHjx61W3706FHVrVu32G0aNGigw4cPF/uLPyAgQEFBQbp06VKR1xISEuJQTWZJTEzUmTNnbON3\n6tatq7S0NKWnp9vaJCcnKzs7W/Xq1TP8PHXr1i3y/h45ckR16tSxfYl6eHjc84u0fv36Sk9Pt51q\nMOLYsWPq0aOHoqOjVa9ePbm7u+vq1aul2oezP/86derIy8vLdqrSCEfe4zvd671s2LChkpOTFRoa\nWuR1/HfAQ/khfOC+8sILL6iwsFDjx4/Xzp07dfHiRZ07d05r1qzRhAkTHN5PnTp1lJSUpP379+vC\nhQtaunRpkV6PewkLC1NUVJQ+//xznThxQqdOndKMGTPk5eVl+6XYokULNW7cWO+8844OHDig1NRU\nHT16VEuWLClxrMEDDzygQYMGac2aNfrss8906NAhpaWl2QbFLl++3OEae/furW+++Ubbt2/X+fPn\ntXDhQp0+fbrEOSe6d++uGzdu6J///KeSkpJ08eJFff/997pw4YIkqW/fvvr666+1du1aXbhwQWfO\nnNHmzZsVHx9fqvfOmW7evKmMjAylp6fr1KlTWrFihd555x21atXKNgiyRYsWql+/vqZNm6ZTp07p\nxIkT+uSTT/Twww/f9ZTLvfzP//yPEhMTtXz5cl24cEGbN2/W+vXr7QYLh4aG6vDhw0pPTy8xDDRr\n1kxNmzbVe++9pwMHDiglJUX79u3T/v37Ha6ldu3a+v7773Xu3DkdP35cH330kcM9D7c5+/P39PRU\nnz59tHDhQn3//fe6dOmSjh8/ru+++87hmhx5j+9U0nu5b98+SdLvfvc7HT16VLNmzdIvv/yiixcv\navfu3Zo1a1ap3iuUDaddcF8JDQ3VW2+9pRUrVmj+/Pm6cuWK/P391aBBg1LNfdGlSxf98ssv+uCD\nD2SxWNSuXTt169bN9gvKUaNGjdJnn32myZMnKzAwUP369dPZs2fl6elpazN+/HgtWbJEn376qbKy\nshQYGKiHHnrorqdUunbtqrCwMK1atUrvvfee8vLyFBISoocffli9evVyuL4ePXooOztb8+fPV1ZW\nlurVq6e//vWvJZ4P9/Pz0+uvv64FCxZo8uTJcnNzU3h4uJo2bSpJ6tSpk6pVq6aVK1dqwYIF8vb2\nVv369St0Aq19+/bpj3/8o9zd3VW9enWFh4dr6NChRa6EePXVVzVr1ixNnjzZ7lLbsmjYsKHGjBmj\npUuXasWKFQoMDNSzzz5rd+VH37599cUXX+hPf/qT8vPzS7zU9i9/+Yvmz5+vadOmKTc3V7Vr11b/\n/v0drmX48OGaMWOGXnvtNT3wwAPq16+f5s+fX6rXUx6f/9NPPy13d3d99dVXunLligIDA9WlSxeH\na3LkPf7vHpC7vZf169fXlClTtHjxYtuVTrVq1VLbtm0drgllZ7GW5QQxADuXL1/WiBEjNHHiRJea\nbRUAnImeD6AMEhMTlZOTo/r16+vKlStasGCBQkND1axZs4ouDQAqLcIHUAYFBQVavHixUlJS5OPj\noyZNmmj06NGV8uoPAKgsOO0CAABMxZ9nAADAVIQPAABgKsIHAAAwFeEDAACYivABAABMRfgAAACm\nInwAAABTET4AAICpCB8AAMBU/x8K3gNlKG5gUwAAAABJRU5ErkJggg==\n", "text/plain": [ "" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plt.bar([0.5,1.5],[np.mean(change),np.mean(no_change)],width=1.0)\n", "plt.xlim((0,3))\n", "plt.ylim((0,1))\n", "plt.ylabel('Proportion Correct Choice')\n", "plt.xticks((1.0,2.0),['Change Choice', 'Do not chance choice'])\n", "\n", "obs = np.array([[np.sum(change), np.sum(no_change)], [samples, samples]])\n", "print('Probability of choosing correctly if change choice: %0.2f' % np.mean(change))\n", "print('Probability of choosing correctly if do not change choice: %0.2f' % np.mean(no_change))\n", "print('Probability of difference arising from chance: %0.5f' % stats.chi2_contingency(obs)[1])" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Now, there is clearly no difference between whether the contestant changes their choice or not. \n", "\n", "So what is different about these two scenarios? \n", "\n", "In the first scenario, the contestant makes a choice before Monty Hall reveals which of the two unchosen options is incorrect. Here's the intution I've gained by doing this - because Monty Hall cannot reveal what is behind the chosen door, when Monty Hall reveals what is behind one of the unchosen doors, this has no impact on how likely the car is to appear behind the chosen door. Yet, the probability that the car is behind the revealed door drops to 0 (because Monty Hall shows there's a goat behind it), and the total probability must be conserved so the second unchosen door receives any belief that the car was behind the revealed door! Thus, the unchosen and unrevealed door becomes 66% likely to contain the car! I am still not 100% convinced of this new intuition, but it seems correct given these simulations! " ] } ], "metadata": { "kernelspec": { "display_name": "Python [conda root]", "language": "python", "name": "conda-root-py" }, "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.5.2" } }, "nbformat": 4, "nbformat_minor": 1 }