09_SimpleStockPlots.ipynb

{
  "cells": [
    {
      "cell_type": "markdown",
      "source": [
        "# Simple Stock Plots in R"
      ],
      "metadata": {
        "nteract": {
          "transient": {
            "deleting": false
          }
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "library(quantmod)\n",
        "library(TTR)"
      ],
      "outputs": [
        {
          "output_type": "stream",
          "name": "stderr",
          "text": [
            "Warning message:\n",
            "\"package 'quantmod' was built under R version 3.5.3\"Loading required package: xts\n",
            "Warning message:\n",
            "\"package 'xts' was built under R version 3.5.3\"Loading required package: zoo\n",
            "Warning message:\n",
            "\"package 'zoo' was built under R version 3.5.3\"\n",
            "Attaching package: 'zoo'\n",
            "\n",
            "The following objects are masked from 'package:base':\n",
            "\n",
            "    as.Date, as.Date.numeric\n",
            "\n",
            "Loading required package: TTR\n",
            "Warning message:\n",
            "\"package 'TTR' was built under R version 3.5.3\"Version 0.4-0 included new data defaults. See ?getSymbols.\n"
          ]
        }
      ],
      "execution_count": 1,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:16.250Z",
          "iopub.execute_input": "2020-06-09T02:37:16.259Z",
          "shell.execute_reply": "2020-06-09T02:37:16.367Z",
          "iopub.status.idle": "2020-06-09T02:37:16.382Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "getSymbols('AAPL', src = 'yahoo', from = as.Date('2019-01-01'), to = as.Date('2020-01-01'))"
      ],
      "outputs": [
        {
          "output_type": "stream",
          "name": "stderr",
          "text": [
            "'getSymbols' currently uses auto.assign=TRUE by default, but will\n",
            "use auto.assign=FALSE in 0.5-0. You will still be able to use\n",
            "'loadSymbols' to automatically load data. getOption(\"getSymbols.env\")\n",
            "and getOption(\"getSymbols.auto.assign\") will still be checked for\n",
            "alternate defaults.\n",
            "\n",
            "This message is shown once per session and may be disabled by setting \n",
            "options(\"getSymbols.warning4.0\"=FALSE). See ?getSymbols for details.\n",
            "\n"
          ]
        },
        {
          "output_type": "display_data",
          "data": {
            "text/html": [
              "'AAPL'"
            ],
            "text/markdown": [
              "'AAPL'"
            ],
            "text/latex": [
              "'AAPL'"
            ],
            "text/plain": [
              "[1] \"AAPL\""
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 2,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:16.392Z",
          "iopub.execute_input": "2020-06-09T02:37:16.408Z",
          "iopub.status.idle": "2020-06-09T02:37:18.017Z",
          "shell.execute_reply": "2020-06-09T02:37:18.008Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "AAPL <- na.omit(AAPL)"
      ],
      "outputs": [],
      "execution_count": 3,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.027Z",
          "iopub.execute_input": "2020-06-09T02:37:18.032Z",
          "iopub.status.idle": "2020-06-09T02:37:18.042Z",
          "shell.execute_reply": "2020-06-09T02:37:18.092Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "head(AAPL)"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/plain": [
              "           AAPL.Open AAPL.High AAPL.Low AAPL.Close AAPL.Volume AAPL.Adjusted\n",
              "2019-01-02    154.89    158.85   154.23     157.92    37039700      154.7950\n",
              "2019-01-03    143.98    145.72   142.00     142.19    91312200      139.3763\n",
              "2019-01-04    144.53    148.55   143.80     148.26    58607100      145.3261\n",
              "2019-01-07    148.70    148.83   145.90     147.93    54777800      145.0027\n",
              "2019-01-08    149.56    151.82   148.52     150.75    41025300      147.7669\n",
              "2019-01-09    151.29    154.53   149.63     153.31    45099100      150.2762"
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 4,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.048Z",
          "iopub.execute_input": "2020-06-09T02:37:18.052Z",
          "shell.execute_reply": "2020-06-09T02:37:18.096Z",
          "iopub.status.idle": "2020-06-09T02:37:18.066Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "plot(Cl(AAPL), main=\"Line Chart of Apple\", xlab=\"Date\")"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/plain": [
              "plot without title"
            ],
            "image/png": [
              "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAAOVBMVEUAAAAzMzNxcXGGhoaW\n",
              "lpajo6Opqamurq64uLjCwsLKysrS0tLZ2dng4ODn5+ft7e3z8/P19fX///9K8Kr6AAAACXBI\n",
              "WXMAABJ0AAASdAHeZh94AAAgAElEQVR4nO2di3bayhYEhePETk6c5PL/H3vNQ2JGz5m9dw8C\n",
              "V511YgxqtRBTlhACuiMAuOnuvQAAzwAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAi\n",
              "AQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJA\n",
              "AIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSA\n",
              "SAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgE\n",
              "EAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAAB\n",
              "IBJAAIgEEAAiAQSASAABhIl0OBxmLy/y++1weHn7UzT928L17y+HQ3Lb5xwP34uXEiCOu4n0\n",
              "frjwvj39x8vCzSdxUpHOMyxeSjDx93Otv36cLn28fv7d+rhe/X5ZsX9eDy/v/25Tz00zvuU2\n",
              "xwv/Dt8sVbdbxjP879vh26/RNNFIRCrg56Hn92Z28ebPG/4mv36c5/cxP61pKWHC30O/lv9d\n",
              "Lp33KU5/F08//pyvehkelblpxrfc5njlv8NPQ9XtlvEM/zv/+iubJpw7ifT3cs8+/6ic/vo4\n",
              "REp//VxH3y+buKClhClvpxX8fnrUfp0uvV0G/dt1xb6dHtVft8dgbprxLbc5Xnm9GlNXld6S\n",
              "z/Dbp1O/Dy/ZNOHodu1O/3w+h7luUz8vpdvhn9cB//fbz7+XSX9+Tvr7dNWf0309b5hPf1W+\n",
              "HV4Poz2202a+vz274dvh8Pmn6+W6BKft+/vM5ZmlgXIuu9mn1fj9NN7/nJ+Uvrx8HIbrP/99\n",
              "7aeem2Z8y0uSPHMd85VVt1smM7z9OlqIQKQivQ7b1JfLdngYu6/ZTtkw6X/9/tl5w3xKnDcy\n",
              "mS/XJ1c/JyL9PR1p+H6Z8SV6OK/m0eWZpYFaTn/uk/H6Pozr0Riem2ZyyzDHC7/znYrSqnFB\n",
              "som7zfR9IlgUWpH+nYb9t/MG6ONzM3zd9x1N3U/66zzWv51s+u988TL4/+UT/zlN++/1vMOc\n",
              "z+XXScT/LuJe5vh6VnN0eWZpoJLfp5Wcj+TLz9fTDcnTkLlp5m65zPHCW/Y0t7hqVJDM8Hja\n",
              "pH2fmSYSqUh/+suv5xsPt+3wRKQ/+ZX9HD4mE7+dr/w4H63L53Leyv0btjyXqb5PLs8sDdTx\n",
              "9+Wyjo/H8eg+70+81ot0meP1lhdTVV6QzvCT92+DSY8oUno53w+biJT8+Pfr7TWdQz7xSz/t\n",
              "y3Qup4356YnSpDy/PFkaqOI6SGcl+f05Yj//mPWvRMxMM3dLOuw/0hc0KqrSKQb/bg/yf/0O\n",
              "43OJ9Nofy0yzlx/fh0lnRZpR5MLvoeT37FSIFMSf66i/rtbr9iN7svo60iWdZuaWP+nm4/3w\n",
              "21SV3vKn9y/72z1JR9JMpHzq9+tRtD/DUbt+0s9bXv/7Z9givQ1+vM2WZyJF3esvyH/9TtK3\n",
              "26G0YzY+P25HCxanSW/5LzsdJXn1vaoquSWf4ecc/x2fRKT8IN3x8mra6XWkb/1RhVFsWaTF\n",
              "50gvg0gv28+R8qWBcj6Gp5bvp4fgrX9Of3kovn1uTv59v+1tzE0zvuUje7L697ZnV1d1u+Vj\n",
              "9Oz3/XRY6Vc/3wcQKd8nS+34eRr3H+mJcO/D5B/5pC+na96XRfpYOGr3pz9Z6PtpBoeNo3aj\n",
              "pYFiXodH+XJqweH6IsLlofh1vuq2lZibZnzLbY4nft727OqqbrfkM/x80n3+G9ufA/HQIv37\n",
              "dkjvy4l+Tyw5164f5YfzCz9/B0/eDukZde+T3JmfZ1GO50PnP0+3nCuvTznTy7NLA6XcHuXb\n",
              "K+OX688/fqWntS1MM7olmePxtKGxVg235DM8Xs69e/ubp6NpI9LnOP+W3Jczv7+Pz/6+/Ph1\n",
              "Ohvi30mdfl38/Z5tPX6fVurvJHfmW/8H6+/p6N3plrfDy3A2Q3p5dmkAXDzp+5FSxQ6iv0EA\n",
              "NxAJIABEAggAkQACeFKRANqCSAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJA\n",
              "AIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSA\n",
              "SAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgEEAAiAQSASAABIBJAAIgE\n",
              "EECUSD/aBs11nqyn1J53tN5lge/y0JiznXcdDTMKmg8iqfKIpMx2UQIgUptSex6RlFlEsoNI\n",
              "0jwiuUAkVR6RhNkOkewgkjT/YCJxsMEMIknziOQCkVR5RBJmEcla58kikroUkRBJlkckXbbr\n",
              "3OtomFXQfBBJlUckWfZ0yA6RzCCSNP84Ip0PfSOSGUSS5h9IJG/lZGYBIJIqj0iibIdIiCSP\n",
              "2vOPIVLXn9OASGYQSZp/CJEGjxDJDiJJ8w8iUkRlNseg+SCSKo9Igiwiees8WURSlyISIsny\n",
              "iCTIIpK3zpNFJHUpIiGSLI9I8dnk7XyIZAaRpHlEcoFIqjwixWcRyV3nySKSuhSREEmWR6T4\n",
              "LCK56zxZRFKXIhIiyfKIFJ5NP4MLkcwgkjSPSC4QSZVHpPAsIvnrPFlEUpciEiLJ8ogUnkUk\n",
              "f50ni0jqUkRCJFkekaKz2QfnI5IZRJLmEckFIqnyiBSdRaSAOk8WkdSliIRIsjwiRWcRKaDO\n",
              "k0UkdWmL7OhL+hDJDCJJ8zsXqUOkkDpPFpHUpU1EiqvM5hs0H0RS5REpNItIMXWeLCKpS/XZ\n",
              "ydeYI5IZRJLm9y5SYGU246D5IJIqj0iRWUQKqvNkEUldKs9O9uwQyQ4iSfM7FymyMptz0HwQ\n",
              "SZVHpMAsIkXVebKIpC5VZ6d7dohkB5Gk+X2LFFqZzTpoPoikyiNSXBaRwuo8WURSl4qzM3t2\n",
              "iGQHkaT5XYsUW5nNO2g+iKTKI1JYFpHi6jxZRFKXqrIXg+b27BDJDiJJ8zsUqesJrsw6guaD\n",
              "SKo8InmznwIhUnSdJ4tI6lKZSJcfiBRX58kikrpUKlJ8ZVYSNB9EUuURyZmd3xJFVGYtQfNB\n",
              "JFUekZzZVY8QyQ4iSfOI5AKRVHlE8mXX9+wQyQ4iSfP7E0lWmdUEzQeRVHlE8mURSVLnySKS\n",
              "ulSQ3dizQyQ7iCTN704kXWXWEzQfRFLlEcmVRSRNnSeLSOpSREIkWR6RPNmtp0iIZAeRpPm9\n",
              "iSSszIqC5oNIqjwiebKIJKrzZBFJXRqe3dyzQyQ7iCTN70wkZWXWFDQfRFLlEcmRRSRVnSeL\n",
              "SOrS6Oz2nh0i2UEkaX5fIkkrs6qg+SCSKo9I9iwiyeo8WURSlyISIsnyiGTPIpKszpNFJHUp\n",
              "IiGSLI9I9iwiyeo8WURSlyISIsnyiGTOFniESHYQSZpHJBeIpMojkjmLSLo6TxaR1KWIhEiy\n",
              "PCKZs4ikq/NkEUldikiIJMsjkjmLSLo6TxaR1KXRIokra7tKQCRVHpGs2ZINEiLZQSRpfjci\n",
              "FXmESHYQSZq/r0i398SWeYRIdhBJmkckF4ikyiNSTRaRGtV5soikLg0R6TqkEUla58kikro0\n",
              "UKSCDxByV6YgUptSex6RarJdb1KhR4hkB5Gk+XuLdESkFnWeLCKpSxEJkWR5RKrJnkXqjoik\n",
              "rvNkEUldGiLS9X9EktZ5soikLo0SqSveICGSHUSS5u8q0vD8CJHEdZ4sIqlLq7O3119zkYr3\n",
              "7BDJDiJJ881FujozEklWubQkQfNBJFUekVYYDtJlIpUfakAka50ni0jq0q3sxI/kSDciNa3z\n",
              "ZBFJXbqRne6yXXflhmy5QIWVxSBSm1J7HpGudDOHtZOzGBCpaZ0ni0jq0rXsZXOUmJJ4hUiI\n",
              "pGx9JpFub49Irknfe4RITes8WURSly5nZ96vl75ahEiIJGx9KpGmF6Yi1XuESHYQSZq/j0gd\n",
              "IrWt82QRSV1aJ1L6chEiIZKu9ZlF6kYidYjUtM6TRSR16Xw2f/0oOXqXvj6LSG3rPFlEUpdW\n",
              "i5ROdESkhnWeLCKpSxdFyl6HvV43nuiISA3rPFlEUpfWiDSdCpEa1nmyiKQudYpk8AiR7CCS\n",
              "NB/+0OSH5/p9OEQKCSKSOGrPq0Va2odDpKZ1niwiqUsRCZFkeUQaGTIWa2EyT6UBRGpTas9/\n",
              "cZFm3xU7ZwwiNa3zZBFJXTov0vQaRIoKIpI4as/HPjTzypRfa6i0gUhtSu35Ly1ShRs/EKll\n",
              "nSeLSOrSqUgVWURqWefJIpK6dJytUQORmtZ5soikLp2IVJNFpJZ1niwiqUtH2SozEKlpnSeL\n",
              "SOrSPFsnBiI1rfNkEUldOhKpLotILes8WURSl2bZSi8QqWmdJ4tI6tI0W6sFIjWt82QRSV2a\n",
              "ZKut+GHyCJHsIJI0fzeR3JUuEKlNqT2PSNJeRDKDSNI8IrlAJFX+a4pUf+QAkZrWebKIpC5N\n",
              "RWrUi0hmEEmaRyQXiKTKI5K0F5HMIJI0735oum7hzeSSXkQyg0jSvPeh6RCpYRCRxFF73vnQ\n",
              "2E70sfcikhlEkuZ9D43ZI0RqW+fJIpK61HjiqacXkcwgkjTvKXV4hEht6zxZRBKXejxCpLZ1\n",
              "niwiiUs9HiFS2zpPFpHEpYiESLo8Ikl7EckMIknziOQCkVR5RJL2IpIZRJLmEckFIqnyiCTt\n",
              "RSQziCTNI5ILRFLlEUnai0hmEEmaRyQXiKTKI5K0F5HMIJI0j0guEEmVRyRpLyKZQSRpHpFc\n",
              "IJIq/3VE6ro7PKyIZAaRpHlEcoFIqjwiSXv1Ih0+6X8Ol+KXB5F0rYjkiNWN/2WRDtf/j4fJ\n",
              "NVXLswUi6VoRyR6rHP+LIh0m2UPyb/nybIJIulZEMsdqx//Gc6TDSEhE8oBI6+xJpAvl479A\n",
              "pGEPcXVGiKTKI5K0d1OksvG/LlK2n4hIiKQt3Z1IFeN/W6Th0oZIAE4+RboDMeN/VaRDdpEt\n",
              "Elskbenetkg1439NpEN+GZEQSVu6M5Gqxv/aC7LpD0RyltrziCTtXX5BNv3hEGn6OhQvyDpK\n",
              "7fkvINL1rO9diVQ5/pdfkJ05M4JThHwg0gKXD8///Gc/ItWOf05abVRqzyOSrNcRm4BIbUrt\n",
              "+ecXqUOkG4ikyn8BkY6INIBIqvzTi9QhUgIiqfLPL9IRkW4gkir/7CJ1iJSCSKr804t0RKQE\n",
              "RFLln1ykDpEyEEmVf26RLic1INIAIqnyiKTo9cYmIFKbUnv+K4jUHwJHJESS5RFJ0euNTUCk\n",
              "NqX2PCIper2xCYjUptSeRyRFrzc2AZHalNrzTy1S//0TiNSDSKo8Igl63bEJiNSm1J5HJEGv\n",
              "OzYBkdqU2vOIJOh1xyYgUptSex6RBL3u2AREalNqzyOSoNcdm4BIbUrt+WcWafjS2O7ydnNE\n",
              "QiRZ/olF6jKRrIX1vQGxCYjUptSef16Rbh65Cn1ZRDKDSNJ8jUghhb4sIplBJGkekVwgkiqP\n",
              "SNG9YZUpiNSm1J5HpOjesMoURGpTas8jUnRvWGUKIrUptecRKbo3rDIFkdqU2vNPK9LUI0RC\n",
              "JF0ekYJ74ypTEKlNqT2PSMG9cZUpiNSm1J5HpODeuMoURGpTas8/p0jXs1QjCn1ZRDKDSNI8\n",
              "IrlAJFX+eUUKKvRlEckMIknzRaFZjRDpiEi6/JOKFFfoyyKSGUSS5ktCCxskREIkXf45RQos\n",
              "9GURyQwiSfOI5AKRVPknFGlpzw6REEmXf0qRIgt9WUQyg0jSPCK5QCRV/vlEWtyzQyRE0uWf\n",
              "UaTQQl8WkcwgkjS/GVreICESIunyTyhSbKEvi0hmEEmaRyQXiKTKP5tIK3t2iIRIuvwTiNSl\n",
              "7z5a8QiREEmXfxqR+u8vR6Q1EEmVfwqRxv9GFvqyiGQGkaT5RZEuPxBpHURS5Z9HpCMibYNI\n",
              "qvwzidSte4RIiKTLP5FIn6NtfbwhEiLJ8k8l0voGCZEQSZd/JpG2hhsiIZIs/1QiKQp9WUQy\n",
              "g0jSPCK5QCRVHpGkWUQyg0jSPCK5QCRV/vFFKvYIkRBJl0ckaRaRzCCSNI9ILhBJlUckaRaR\n",
              "zCCSNI9ILhBJlUckaRaRzCCSNI9ILhBJlUckaRaRzCCSNI9ILhBJlUckaRaRzCCSNI9ILhBJ\n",
              "lUckaRaRzCCSND8JlXuESIikyyOSNItIZhBJmkckF4ikyiOSNItIZhBJmkckF4ikyiOSNItI\n",
              "ZhBJmh+HKjxCJETS5RFJmkUkM4gkzSOSC0RS5RFJmkUkM4gkzSOSC0RS5R9TpNuXXSJSFYik\n",
              "yj+kSN3wtbE1HiESIunyDyrS8foDkepAJFUekaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8IrlA\n",
              "JFX+kUXa/NLYiEJfFpHMIJI0j0guEEmVRyRpFpHMIJI0j0guEEmVfzCR8vOCEKkWRFLlH06k\n",
              "7piKJC90ZhHJDCIp87lIDQqdWUQyg0jCvOFMVV+hN4tIZhDJli96voNIThBJld+TSNujBZGc\n",
              "IJIq/1AiWd6EtFjYJItIZhDJli85ce46DSKZQSRVfp8iLWydEMkLIqnyiCTNIpIZRLLlC0Tq\n",
              "EMkLIqnyjyXSEZF8IJIqv1uRZobO6bofte/mWyxskkUkM4hky2+L1CGSG0RS5R9KpCMiOUEk\n",
              "Vf4RRLp9RAMiOUEkVX5PIt0MyY8opJ9O/KPoVKKSwiZZRDKDSLZ8KlI3J1KHSH4QSZXfi0jp\n",
              "+4zG7zlKz7BDJBeIpMrvUKTJ10xcnhYhUgCIpMrvT6Tp97WcLepuIoUUtskikhlEMuV7kYYN\n",
              "zlSkSwiRPCCSKr8zkZIdt+wCIsWASKr87kTKr0lvuoQQyQMiqfJ7E2nmmlykqMI2WUQyg0im\n",
              "/HQ70+/R5ZsgRHKBSKr8nkXqXz9CJERqVGrP71ykIyKdQaQ2pfb8rkW6XogqRSREkuX3K1J8\n",
              "KSIhkiyPSNIsIplBJFMekVZBpDal9vxORCp+lRWRXCCSKo9I0iwimUEkSx6R1kGkNqX2PCJJ\n",
              "s4hkBpEseURaB5HalNrziCTNIpIZRDLky98agUguEEmVRyRpFpHMIJIhj0gbIFKbUnsekaRZ\n",
              "RDKDSIY8Im2ASG1K7fk9iFTzMQyI5AKRVPn7izR+M7muFJEQSZa/r0jTz2RQliISIsnydxWp\n",
              "WiNEcoJIqry19XP8R4hkCHkKm2cRycyXEalDJG1lCiK1KbXn5SIt77whUjmI1KbUnkckaRaR\n",
              "zCDSeMIlXxCpHESqCjo+IB6RdplFJDOINJ4OkfwgUlXQ8bWO+xVp8Uw6RCoHkaqCiLQJIrlA\n",
              "JFWxcXE7RJJXpiBSMV36lcPtis0iFVnQfzHLQjUilYJIxXSrg05WLBVp/T4hUjmIVMzs12rp\n",
              "i8UipT+m1YhUCiIVc/terabFiCTNIpIZv0jGldbwrnZlInWIhEhmvCKZN0nt7uplUUtEyn9O\n",
              "qhGpFEQqptv4+y0qNqQuhxe3l7PbEslyTxHJxZcQabhgW2viu3o7Mt9d/l9YzNvVyT2amw0i\n",
              "VYBIxcwMwBbFVSJlu56LIk38QSQ3iFTM/kW6LticHtl03ejCSKThV0QqB5GKSUaVzSTtXR2e\n",
              "FW0JP/PMaCRS/zsilYNIxexepMl5c2aRjohUCyIV8xAidcexEzMTdtnP45xI5ysQqRxEWmZ0\n",
              "guoDiDRa5C2RZidMDliY7iYiuXhWkeaH5Q5FmjvrYlWkbv7+ZIfQEakYRFpm9Jrm3kW6/Ztf\n",
              "N51yMumcSMsvRK2DSC4QKbDYkppbJI9IZSfrzYBILhApsNiQmj3bYk2kmb3W0VuTEKkGRFqm\n",
              "67aeSIiKDanZJVoXaTLhWCTbqVCI5OIJRRqPt8cTaf7w9ZJIkzfLIlIFiLTI5DSBH/lNsuKq\n",
              "1PQQXBJdEml8IGFeJNvgQCQXX0ukls8eNkVaPlBtECm72rTAiOQCkeKKi1P9yQwhInXTL+dD\n",
              "pHIQaZHRUeL9iXT7LJaFZzOVIk2OLyBSOYi0SH8mzbH/a70zkbpUpPnowjHxOZHmhESkchBp\n",
              "lmQnpxu4l0jzn0rZdf2iBYl0RCQHiDRh/GRh+Mt/V5EmjbctJSI5sohkpkSk2WvvJ9JMY3qg\n",
              "bekFnxWR8lsWZoFI5SDSmIVBuTORhpePupUzEGY/TmtJpKgFRiQXTyPS0qC8v0jTc3ou1xaK\n",
              "dIsgUlBlCiLlLBpyb5FG7iTLUSxS10fmRApbYERy8eVEMpyIJhCpv2I9mk2GSGGVKYiUs0OR\n",
              "BgFuPxEpLItIZiJEWpvSVrycSp7cXBdk/HypVqSVvcFR3gAiuUAkZ/EiXS7S7GtKi4ULIq3I\n",
              "l+cNIJILRHIWL5IcWLgeBq8QKVnK3j9ECqtMQaScGpFq151TpGOgSGWPOyKVs7xCD5/0F475\n",
              "hcjleViR6jdJpoXOz1Wqa10RqTRfz7OIVDf+l0U6XP+fuVC1PFsg0jppS83W6FqYvuKESBWx\n",
              "yvG/KNKh/3d6oWp5NkGkVbqJSHWFuUiVm7QvLFLt+N/YV0ak9Ib7iOR49Wok0nH+NPLVfD3P\n",
              "IdIFRKrKjv7oFwdrTXKLVHuAYyxS8QtIt3w9iDQ7ny8g0njvqSLoKy6g84qUnFlU3/7VRaoY\n",
              "/3EiPSifA/U0WNPfa7IyrvMeVXT1lX1CubAPTQORhmMVz7tFGr8bdi9bpOGdr5NnZrWFbJHM\n",
              "sZrxvybSIf/3OUU6Zgey1p9CiEWaOT53+h+RpNnlWNX4X3tBdjS7ZxQpPf1s+yw2uUjZhhGR\n",
              "mmSXX5BNfzhEOqQXnvUF2WGQTXbxSkrjRUrPBupffY0RyeLRlxapcvwvvyB74XpxuK56eTa5\n",
              "p0jZLt32UFs9bl5VPEvX3Zaju32mCSJJs0svyFaO/6990qp3ixIo0rAJup1+ECNS/YlBo3yT\n",
              "0P2ynsqUryySe9csVKQu2T72Im2lSgoRSVaZ8qVF8pY+jkiGN8ZbqxHJxQOK5D9XLnjXLr0c\n",
              "LpI53yR0vywimRlEcpfGipRcTn9DJGkWkcxcs/VjC5FkoftlEcnMJWsYWo8rku0pEiJVgEie\n",
              "0vqTsZfI5hQqUvXbAZ3ViOQCkSz5hTkhUrssIpm57vAgUmG+Reh+WUQyk7xM6S0NEymfESK1\n",
              "yyKSGUSqy7cI3S+LSGZOWdNhrIYilaXKChFJVZnyNUWKOmNGJFJpqqwQkVSVKU8t0vz4+RH3\n",
              "+uRDiGR9FQmRanhykebu3o+41yc9Io2O01W01hYikqgy5YuKFFVaNaexSNnJDDWtlYWIJKpM\n",
              "QSRXqU+k7K3lFa2VhYgkqkz5iiJZB1a0SMlJdYh0rywiFbAokqkzVqThsxm2ZoNI0iwiFbBv\n",
              "kdJ/EeleWUQq4BFESnfwSlsrC633F5EqQCRXqVek4/YHgflFaptHJBeIVJlPRKpuNRW2yiOS\n",
              "iwcSKXJPJ0Kk+lZTYas8Irn4oiJVzSzNl+cQSZpFpAL2K1JFDJGkWUQqYMci+Vr1UXsekVzs\n",
              "UaSFJ/I7EMm6Q1gJImkrUxDJV2oUydmqj9rziOTicUQyexQnkuMMvSoQSVuZ8uVEMp8vsyZS\n",
              "2Tz7fNxnD+mi9jwiudinSJMxe3IrdFELTpab5OvWOSJJs4i0zWl0Tz6ex/E14asiFazIH2nE\n",
              "1aqP2vOI5GKvImV30PkVeLPB/t0QBXr8uAW8rfKoPY9ILvYrUpf83tkbl4KXzR4ihZQi0n5F\n",
              "Sgbu9ZJCpCI/EGmHWUTapj8vdPhVK9LmqkSkHWYRaZvR+7j7nxqRCgRBpB1mEWmbkUFykcre\n",
              "EIFIu8oi0jZdl1y4HaEOF6krfFUWkXaYRaRtUpGSV3oEIuV163lE2lUWkTbJDtclwxeRpHlE\n",
              "crE3kTJ3lCLdtnWFn76ASLvKItIq3UikroFIm4og0g6ziLRGN/qUq5ivwEMkdSki7Uukbvyp\n",
              "i2KRbrUFeUTaVRaRVpi8rNNKpPW1iUg7zCLSMtPXR9uItOUIIu0wi0iLbL3XTizSsiiItMMs\n",
              "Ii1R+HJOWOlUpHWDEWlXWURaoPTc0bDSTKTV08ARaYdZRFrgDiLllxGpcaEvi0gLNBdpXI5I\n",
              "jQt9WURaYO8i1XqESNosIs1T/EbVyNKsHZEaF/qyiDRP8UcnRJam9SufzIVIO8wi0jw7EGlx\n",
              "GRBph1lEmgeRYqL2PCK5QKRrPSK1LvRlEWmWko8Oli7qlkjVHiGSNotIs5SMU0SS5hHJBSL1\n",
              "C4BIjQt9WUSaZQciLS8EIu0wi0hz1Hy7SljpzFIs5xFpZ1lEmqNomOoXdWExflg8QiRtFpHm\n",
              "QKSoqD2PSC4QaXsxEGmHWUSaA5GiovY8IrnYhUhlwxSRpHlEcrEPkYSNNUFEalnoyyLSlMJR\n",
              "2mBR55fkh8UjRNJmEWlC6ShFJGkekVwgUgoiNSz0ZRFpAiIFRu15RHKBSCmI1LDQl0WkMUXn\n",
              "2dkbq4KI1LDQl0WkMcWD9H4iWTxCJG0WkcbsSaT5hUGkHWYRacyuRJpdGkTaYRaRRhQ/RWq0\n",
              "qDPLg0g7zCLSiPJB2kyksUuItMMsIo3Ym0g3lYYlQ6QdZhFpxP5EOo6/MAmRdphFpBG7FOm8\n",
              "WIi05ywi5VSM0baLmjxVQqQdZhEpZ7ciHW+fc4dIO8wiUs5+RToi0p6ziJSDSLFRex6RXCDS\n",
              "CteFQ6QdZhEpo2aI3k0kk0eIpM0iUgYiBUfteURycQeR0lNwECk4as8jkov2ImUnsyFScNSe\n",
              "RyQXrUUancaGSMFRex6RXLR+lfO6MbIMUUSS5hHJRbvR2aWnrx0fQqRjZn2zVkQSV6Y8nEij\n",
              "7w03DNE7iHRZQETaYfbpRCobZdcjDMnE9UP0HiKtfiWmrBWRtJUpexFp8nbSWa4WdY8n0hGR\n",
              "9pl9PpEKxll3tabrfiTX1Y7QO4lUcgeDWxFJW5nySCL1G6KHFKlwmxvaikjaypQHEmkYiCOR\n",
              "av/U30mkiljIn1UAAArDSURBVM85impFJG1lyuOIlJ7GkIhUv890L5GM6xqRpNkvJ1L+9zwT\n",
              "qfIv/d1EMp7E0brQmUckF87Ruf1MJ78VkcRRex6RXASItG7SmkiWRgOIpC5FpDuKZGxsGXTl\n",
              "EUma/VoidePtDiKJo/Y8IrmQijTzMdrWOk8WkdSliCQWafJECJHEUXsekVz4Ruf6OdwdIrUs\n",
              "dOYRyUWMSMOpC8PN/V4dIrWN2vOI5CJCpPRkuusbJqbPjpx1niwiqUsRyTc607Porj9WJHLV\n",
              "ebKIpC5FJK9I/W/DZ5psvMqKSOKoPY9ILoJEGr+TPLzOk0UkdSkiuUZnvge3tkfnr/NkEUld\n",
              "ikhOkbJrSk6eQyRx1J5HJBeBIknrPFlEUpcikmd0Wt45ikjiqD2PSC5cIjWs82QRSV2KSIgk\n",
              "yyOSNItIZhBJmkckF/bRafpwHUQSR+15RHLhEallnSeLSOpSREIkWR6RpNmnEcn2sYmIJI7a\n",
              "84jkwiFS0zpPFpHUpYhkXZ47fCA2ImnziOTCtjxFJ6jG1TmziKQuRSSzSO1HFyJp84jkwrQ8\n",
              "HSJJWxFJW5lyZ5HuMLoQSZtHJBeIpMojkjT7DCJ1iKRtRSRtZcp9RTIGEUketecRyQUiqfKI\n",
              "JM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYR\n",
              "yQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0i\n",
              "khlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUi\n",
              "qfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyQUiqfKIJM0ikhlEkuYRyTUby3wQSdyKSNrK\n",
              "lKgtUoVJw9fGIpK4FZG0lSn3Eam7ZRBJ14pI2sqUO4nUDRlE0rUikrYy5S4iXffuEEncikja\n",
              "ypQ2ImU3nibtLv8cEUnZikjaypQmInXZrdetUYdI6lZE0lamtBDp5Mxk0v6ZEiLpWhFJW5nS\n",
              "QKRhLy6fFJHkrYikrUxpJFJ6OyK1akUkbWVKK5GOiIRIe8w+nkjdeEpEUrcikrYyRS/ScB7D\n",
              "eEpEUrcikrYypYVI8z+vFxBJ14pI2sqUdiIdxyJdQCRdKyJpK1NaitTNTYlIulZE0lamyEVK\n",
              "zmq4nhuESK1aEUlbmaIRaWTPraxDpIatiKStTJGI1C2J1CFSy1ZE0lamKETqlkS6bpKyICLp\n",
              "WhFJW5miESl9O3k3nhCRWrUikrYyRSTS9FWjuQlPIJKuFZG0lSnNRRqDSLpWRNJWpiBSm1J7\n",
              "HpGk2R2LlJ2kikjePCJJs7sXaXzS9xKIpGtFJG1lyto4P1z+PXO9tDyfiUjH0fv5FkAkXSsi\n",
              "uWI1439NpGtsCB/SXybzmRGpQ6SAPCJJs8uxqvG/ItLhmM9oNNvxfKYiHfsPCloFkXStiOSI\n",
              "1Y3/ZZEO11AmZIlIqVKI5M8jkjS7FKsc/9vPkW57iKszmhdpcl7DFETStSKSK1Yz/gtE6v8x\n",
              "iDQ9QWgKIulaEckVqxn/BUft+otbIv24crt0+uUHwK6JGf9hIv2YfkpQGWyRdK1skVwxRBJl\n",
              "EUld+swiDflCkSo9QiRhKyK5YjXjv+TMhnSWi/NBJFUekaTZ7TMbjiXjv2TXbjgzYu0UCURS\n",
              "5RFJmt3etSsa/2EnrSKSKo9I0qx3HfUEitR1ZWfXjYK2OlPKmUUkdSki9SKVnMswCtrqTCln\n",
              "FpHUpYh0FqnsnKBx0FZnSjmziKQuRaSrSJZgw5Qzi0jqUkRCJFkekaRZRDKDSNI8IrlAJFUe\n",
              "kaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8\n",
              "IrlAJFUekaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8IrlAJFUekaRZRDKDSNI8IrlAJFUekaRZ\n",
              "RDKDSNI8IrlAJFUekaRZRDKDSNI8IrlAJFUekaTZHYpkDDZMObOIpC5FJICvDSIBBIBIAAEg\n",
              "EkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIB\n",
              "BIBIAAEgEkAAiAQQQJRI/zv+73/9het/w2/9L8fxTaPpbr+lv2Spmbmv3rS5TJObprUzy7Rd\n",
              "3M8laJmO2+updJmK11O2OmbXk3aZFm/Kp0tWTfEyHdO5x4BIM8t0nLvJMgoQybFMizfl0yES\n",
              "IpUvEyIhEiIFLBMiIRIiBSwTIiESIgUsEyIhEiIFLBMifRWRDgAPSZAAYSK1DXrufuNF9eYd\n",
              "rXdZ4Ls8NPYsIplBJGkekVwgkiqPSNIsIplBJGkekVwgkiqPSNIsIplBJGkekVwgkiqPSNIs\n",
              "IplBJGkekQDACiIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQ\n",
              "ACIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEg\n",
              "EkAAiAQQwLZIyx/XP3wldPbl0MMvyZWH4/ia1aKFqaYzdPUVdUpa5/pvF6WFlxmtTp8+rAH9\n",
              "h9HP5b6o+1vwdeXx69gh0qG/8ZBONXdtv3hrcxumSi4s9GVT2PtKOjWt+dxHF7WFx0Py7+IE\n",
              "ioe13QreKJR0OkQaGrKHZu7aw23x1hZnY1BPZ+jsK+gUtY5nn15sVLg4fd50mL227mFdn0Jw\n",
              "f8vuYz+foHVcKNJ1o3dINnGjmR9GmczkyjU+rhz1HSZzMfUtdo77wluns7jNXF+Y/HLoR8t4\n",
              "V2Z+LDof1qFRvILz+zK/pzpZ787OQpGG0ttqKBfpWLg0+aDOKifxtXtf2rfYOf84B7ZOZzEn\n",
              "kqQwnbC/y+mjOipYEam0Px2MmS+yFZyNyXQsZXf+MJ7a1Vkm0iG7MCvSRHbzGj/MVE7ikwfY\n",
              "LNJM5+K9jGqd9JeJFFF4TP5CZ0sw0z9+gm1+WCcCJYNacH/TITMdR5crZg82ODrLnyPddnqs\n",
              "Il2uLhQpr5z0ldz7rb71TuvjXNI66feIVFd4SeQ7WEsijRfA/LCGirR9fwtEOi7cRfs6Lty1\n",
              "uw6vRZEmK3z25tNsttb4sN7TSknfeqfqXk76i0UKKUyL+6PEKyKl83U8rMf0sbyt86UZuvpG\n",
              "IuV3cmayoHW8KlL+GK+INF2YxRVUKNL0L8niGrf2LXeWPM6e1tskFSK5C8fta2t2RiTPw3pd\n",
              "o41WcCbSciB2HYeINOPRzNLMODdpM4hk7lvuLHicXa3Z1IUi+Quz6aareFwwb5TtYTWI5Li/\n",
              "6ayn40jTWSHS+DnSbTnnPErvRr4GN9tmKhdm6Otb7kweZ0lrVn045ndUVjjODMHsqN3Ktbb+\n",
              "fkAeskmVD+vEh+zeHkd3LWgdrz9H6s+ZOFx3EXNvkhuzs4Vu14/v2vZzxNt9Tisn8XQZrH3L\n",
              "nerW20z66Q/T1RpfmMwqCx7yOcy98OJ9WPufo0OGk5qAvtGAnH8dKX4dc9LqLDUj8+H5UndW\n",
              "BSLN8qXG1pe6syoQaYa6V2Uenq91b0UgEkAAiAQQACIBBIBIAAEgEkAAiAQQACIBBIBIAAEg\n",
              "EkAAiAQQACIBBIBIAAH8H9nNdx1DWhJZAAAAAElFTkSuQmCC"
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 5,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.075Z",
          "iopub.execute_input": "2020-06-09T02:37:18.079Z",
          "iopub.status.idle": "2020-06-09T02:37:18.173Z",
          "shell.execute_reply": "2020-06-09T02:37:18.210Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "barplot(Cl(AAPL), main=\"Bar Chart of Apple\",\n",
        "   xlab=\"Date\")"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/plain": [
              "Plot with title \"Bar Chart of Apple\""
            ],
            "image/png": [
              "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAAMFBMVEUAAABNTU1oaGh8fHyM\n",
              "jIyampqnp6eysrK9vb3Hx8fQ0NDZ2dnh4eHp6enw8PD////QFLu4AAAACXBIWXMAABJ0AAAS\n",
              "dAHeZh94AAAgAElEQVR4nO2di3aiWhBED2qMY1T+/29HQF6CIPSL0trrrjsaaBqrq4Ii0ZQT\n",
              "QsSk6B0g5BNgkAhRgEEiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQ\n",
              "BRgkQhRgkAhRgEEiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgk\n",
              "QhRgkAhRgEEiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRg\n",
              "kAhRgEEiRAEGiRAFGCRCFGCQ9Ek1+9N7BX8/u5Syw7+m/J2in6mFv1lK/RWO980e39udN3eA\n",
              "dKFk+qSWt6x7qNfO/h7l8zV/2dRKv8XW+kEqG7yzNwzSKiiZPp0gpX/zq+87q1/yN308vdKu\n",
              "2lKHf+/uzbs7QPpQMn1qI97uT6d2s2vfj0fZ6Zbn19O97pCrBGm49J7W+97s5zf87g6QPpRM\n",
              "n9aI9a1/xbO33fH6+Nl11z7nu9xzdH3c3P1eH0V/d+P/PH48Uvw4fnWbnn+KZ3Pn5z14cL13\n",
              "KY5T13b5ade0GLlbcDtmKTtepXJ8BwySPt0gZcU/zZO3v2rprnNsuIfiNCivklIFbKx4GKT6\n",
              "R49D2nPM7hv8LV45HZsWh06L4d3in2vW9iVzMEj61Ca+/lTOvT9n299KM7c2b16t7JvDRKf8\n",
              "wc+r4kFUmvMVxVojQbpn4pbfHrnuttiN333UVOlSFedTYZD0aX2ZsnsGmqdUlUFTlYzOysPy\n",
              "4vTdsbLwi+J+2fl+9/4661acrTuPbPRcHQIP1dKmxTlrVn+6m9cJvv28e4riy2GQ9OkE6XDr\n",
              "/7z6/3nww6fyYoVbf8lTcX/hT/388Fgdxp43+kjQuTqslcvLdJyb1Z/uVjWPyB4WPv6vhEHS\n",
              "pxOk6pB0f5b377hPTRaG6cpHftIsGSsepOzRp1mtu8XmOV3WhCPVhbtXdzuPYZ0M3wWDpE/j\n",
              "y8u+epH0b1d7Mh+YfPiWz1OQxovHDlftracep06yT/lwM6N3OzXrZPguKJI+HeuVv86LcwO7\n",
              "n9Nl1OSjZ+06/74ofn1EyoY9dp1Q7Hrrjx7nqv9nDNASKJY+vSCl0sfn9udPJv9r30f6a99H\n",
              "ald/UdzfymHyNdJf97lmfRa9XP/cnAt8upt3zkyQd2CQ9Glf3PyUZ8se98ePSO2VDcUpt+6V\n",
              "Db3Vx45I7Uut6bN2x/bE26l6rlkE6l91mu40ejcvD4XFqbx/714P8eUwSPr0DgDn6vKcyqZj\n",
              "Qbpl7crZ8Ij0ori437kitr1e7ycf9Ejt6Y3b8+ufLB+9W7dojmFkBgZJn26OCrPXT62y0pPP\n",
              "QcpvTQp23QsLHv++KC4uCOoeKept/OTdTZT8614IfiiPPal/8cTwbvHPufMQyBwMkj5tjA7V\n",
              "q4zL3fbZz+VaX3fwXHD+yYozCk8Xyj3+fVF8ePo7iXIbo9fa7bsvds7Nk81/u5Qd23MMT3cL\n",
              "bsdd8xDIDAzSN/IU5pFsk4VQwW+EQVKHCn4jDJI6VPAbYZDUoYLfCIOkDhUkRAEGiRAFGCRC\n",
              "FGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRgkAhRgEEiRAEGiRAFGCRCFGCQ\n",
              "CFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRgkAhRgEEiRAEGiRAFGCRCFGCQCFGA\n",
              "QSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgk8p0of98ng0S+k5QxSISIYZAIUYBBIkTM/RUS\n",
              "g0SIlHuMGCRCpDBIhCjAIBEiI5UwSISIKDPEIBEig0EiRAEGiRAFGCRCFGCQCFGAQSJEAQaJ\n",
              "EAUYJEIUYJAIUYBBIkRKfXUQg0TIasoUMUiEyGgzxCARshoGiRAFGCRCFGCQCFGAQSJEAQaJ\n",
              "EAUYJEJWU37Kd/U/BomQVVSXMjw+D5JBImQdneR0rw5ikAhZQi85DBIh62CQCFGAQSJEAQaJ\n",
              "EAUYJEIUYJAIUYBBIkQBBokQKenpb8sZJEJWkLJXGWKQCHkbBokQBRgkQhRgkAhRgEEiRAEG\n",
              "iRAxxblvBokQIUVYGCRCVlF+OEPzafkMEiGreATkERYGiZBVMEiEKMAgEaJAGZDmYlUGiZBV\n",
              "pN4H2DFIhLxFepyma+4zSITM8hSb6uqF7s8YJELmGfi/Cktvhc5HqjJIhIyROsef8lndSJAy\n",
              "BomQCepjTX33nhMGiZClPCVgGKTBB+UzSIQMmA/Sc1gYJEK61F8U9hyk+k8lUvd6BgaJkHFS\n",
              "Nh6kNiyPtRgkQl7TC1Jz/GGQCFlEP0gZg0TIGlLW/9jU6mcMEiHvktLIRw9XP2OQCHmXiSz0\n",
              "gzTySd8MEiEP3g/S+AoMEiE5g0SInOlvZmGQCHmDuc947Abp+TI7BomQB3NZyN5ZgUEi3w6D\n",
              "RIgCDBIhAuq/gv2GIP39Hsp3lw/HP8X9ISSvLwia//hu/CDddqllr7lHhOTvZgE/SMeU/buU\n",
              "t67nLB31doiQbwpSli7N7UvKdHaGkIL+e7CfHaTex/Q9f2YfIRLezwJ+kHhEImZ8U5Dur5HO\n",
              "1/IWXyMRZb4pSPm+c9Zud9PcJfLtfFWQ8r9j+T5Sdvjl+0hEle8KEiFGMEiEKPCFQTrtUjqc\n",
              "dXaFkIpvClL11tHjjANP2hFNvi5Ix3S85fn1mE6au0S+na8LUpbK8963tNPbIUK+Lkj1pUHD\n",
              "S4RSl/V7R76SrwvSTx2kyUuEGCSyjO8K0uH3dE7/7jdvx+mzDQwSeYfOd8N+VZCap233nZq8\n",
              "RIhBIu/wcPaib6/ED1J+uZxOh0N5yuE4fakdg0TeoQ7Skix8QJA21YJ8AAxSfAvyAXxpkG4/\n",
              "Ke0fFwdNn+FmkMgs1Suj8tZ3BemWVZ/FVW2EQSIyKm+3t74mSOVlQbdTVn4SF4NEhHxtkB57\n",
              "cc12VwaJiPnaINXZue33DBIR87VB2qX6zaPdnkEiUr42SKf087h1TXsGiUhovpWvvPNdQcqP\n",
              "TXrOMxd4M0hkis638qWxL7r88CDll0N96/rDIJHVSLLwCUHaUgsCDIO0nRYEGAZpOy0IMAzS\n",
              "dloQYBik7bQgmJTnexmk7bQgmBSOfissDJJPC4KJOAsMEiEM0uZaEEwYpI21IJgwSBtrQTBh\n",
              "kDbWgmDCIG2sBQGkc+abQdpICwJC9y9uNLLAIJGvpLBw5xO+GaSNtSAgVCYuLwxKDNL2WhAQ\n",
              "ahN3vnGCQdpQCwJCbeKklAUGiXwl2llgkMhXwiBtuwUBgUHadgsCAoO07RYEBAZp2y0ICAzS\n",
              "tlsQEBikbbcgIDBI225BEOi+DcsgbbIFQcAgCwwS+T4YpM23IAgwSJtvQRBgkDbfgiDAIG2+\n",
              "Bdku1dfwdf6Sj0HabguyXSo7j76FxCBtrQXZLgwSUAuyXRgkoBZkuzBIQC3I9qg/d6uy8+jV\n",
              "QQzS1lqQrVEGp7plmQUGiUDT/cTU8RUaozJIQC2IM4UVJ+fKIOnDIH0eXR+msUwxSPowSJ9H\n",
              "L0jZiCUZJH0YpM+DQRo8YM2NhbUgzjBIgwesubGwFsSZTk5S9TZRvaDz7lHKu18mxiABtCDO\n",
              "DA847YLuCtZZYJAINMMDTrug+qMJBkkdBunzGOakXVAvYZCUYZA+j8qMqRek+khUL3lagUEC\n",
              "aEGcGbr18fLIOQsMEoFmxK3NUzoGyQgG6fN4Zee03M4M0oZaEGe2kgUGieAy+Cs9BolBIsvZ\n",
              "UBYYJILLhrLAIBFcNpQFBongsqEsMEgElZFT3AwSg0SWsqksMEgkgNnP/pmv39i3VzJIJID3\n",
              "vFN/fcRo/caywCCRAN4MUmmzF0s2lgUG6XORPn8yhEFikHBQHpAmDBKDBEH9p23R+/EKBolB\n",
              "giBl4EGqT8sxSMu11dxYWIuNsOEgvXew7NjsxeKNZYFB+kiKAb0yYTDvZXwqSJv8iiMG6SOp\n",
              "Jxe9Hw3tO0JTGe98vONIkJpvJd9iFhikj6SZ3FbOgLd2mdq11lKjQXrc3WQWGKSPpDO56F2p\n",
              "eNil/8HBY2u1txiklVKvrvz7PZQH/cPxz6rF5nm6mGZbQapf1DQZYJA2GKTbLrXsTVoA8DSO\n",
              "jQWp9kxikLYbpGPK/l3KW9dzlo4WLQDACNKTqcZWLP/p/aVRcw6CQXpP7ZV1Wbo0ty8ps2gB\n",
              "wGcFqee6zo8ZpHfUXluXXt1RawFANZPu2eNtBGn8fPWaINVHqVcf/cgg1SKurOMRqaB1XXM3\n",
              "Nkjt0zGtIG07C/hBur9GOl/LW1/7GqnzVn/7nqVrkIZvCpX7wiABBSnfd87a7W4mLTbN8LlO\n",
              "QJCy5yg9/DEZpLH0Vf8MHk1ysPO3Byn/O5bvI2WH3698H2k4mJAgZSNBevXFEM8G6lw+VP0z\n",
              "fDRbz8InBGlLLbwZvYCzF6SXn3uguhuNG6ondKlnkvkgZQyS3iw0NxbWwpvRwfSCZH9Yai9c\n",
              "yEefy6UlQSqC2N/3sQ/K314WPiFI33yJ0CaC1HXDSJAmTNVuof73vixHzAJ+kL77EqH4ILUH\n",
              "nGaHhoegRUFKiFnAD9J3XyK0gSB13NC/uHtRkHpn7QGzgB+kr3tD9vky7+FghnY2PN3QC9Ib\n",
              "nnkVpO5uA2YBP0gzlwilLitbbIY0+LyDtydnt09tnyQLUrSdvzxI33REqt3a/0lMkLoXUSzx\n",
              "DIO00SB90yVCPd0rJzsHKT19qoJGkPqPAjQL+EH6pkuEGvHTGy/rbYKUdY5ESSlIG7Hztwfp\n",
              "iy4REkxOoXn3iRyD9IFB2lILWwST02nebLB/po1BYpCgkExOfM6yt/UFpzmmVhhuGDULHxCk\n",
              "209K+/NjI5NbAQ+S9EW5tL1JkEYvpQPMAn6Qbll1oV21kY8OknBymu31grQdO395kI7pdE/T\n",
              "KSsvs/vcICn85pbuAYNkVbyJID324prtrp8bpBd/ihAXpAXvYE2twCBtJ0h1dm77/QcE6cU5\n",
              "AZXJCfdmmaleeqa3AoO0nSDtUv0m7G7/AUEaF1VlcsK9WWaql57prcAgbSdIp/TzuHVN+48M\n",
              "0us3axyCVF/HsPTvVF96prcCg7SdIOXHJj3nmTdLUIOkNLlVezPl91We6a+QNmTnbw9SfjnU\n",
              "t64/DNLrya3am2QbpC3Z+euDtKUWUsZE1Zrc4n1pDxdpfusMEoO0IcZE1Zrcin1ZbypRMWAW\n",
              "GKRtMSaq1uRW7AuD5FLMIKlTKNvfzVdvfa4L0pJrV1+OXeSZ7dqZQdpQCylDWfUm99jasn1Z\n",
              "aypRMWAWGKRt8STr+FtIsiC9d1Ca6MwgaRczSOo8yao6uXaD7+3Iy7GLPLNdOzNIG2oh5UlW\n",
              "1cm1G3zjoDQ1dpFntmtnBmlDLaRU2tYX5STVyXVOXMyPbmrsIs9s184M0oZarOX5grZ88KnD\n",
              "KkFql83uEIPkV8wgqZGersNhkL6pmEFSIzFI4XZmkDbUYi3pKUjvff6jJEgzZxymxi7yzHbt\n",
              "zCBtqMU6UpMdy8k9BWn6sDQ1dpFntmtnBmlDLdbhM7nUXcYgbaiYQVIiYOyTQVrypXtLPbNd\n",
              "OzNIG2qxjoCxTwdJngVRMWAWGKQtEDB2BmlDxQySBjMXphqNnUHaUDGDpEHM2BmkDRUzSBrE\n",
              "jD1V/3u1SwySZzGDpEHo2Ed3KDFIDFJwixWEjv3FDjFIDFJsi6Ws/zR6BulzihkkIXNPohik\n",
              "7yhmkITEj33NXjFI2sUMkpD4sa/ZKwZJu5hBErKBsT+fAX/jDzgYJO1iBknCm39zZD72fpTe\n",
              "GbvIM26PC6iYQZKwnbH394pBci9mkCRsaOyPT16p9opBci9mkCRsaux5/WHG74xd5Bnfx4VR\n",
              "zCBJ2NTYU0oMUlgxgyRhe2Ov9opBci9mkCRsb+zVXjFI7sUM0uI96Jxr3t7Yq71ikNyLGaTF\n",
              "e5C1Udre2FNikBikbbR41bn70d71zzY4dgaJQQpqUX1pxOwKvQ9Srd+x2d7YGSQGKahFpdH0\n",
              "Cqnn0ZQyBmmLdmaQIlukd4PU+wu+asEGx57eKGaQtIsZpLkgvfoD2PZv+hDHbl4MKAqDJN3m\n",
              "dJBe6JeCJ8cgbaqYQZoI0uNk8jYnxyBtqvjrg9QcWcaWZQwS1uNikMJaNPo9ToC3f4/QfOPR\n",
              "NifHIG2qmEHq6JdScxTqfxPRFicnG7t5MaAoMkVVTam5MacWff2eM7ThycnGbl4MKIpMUVVT\n",
              "am7MqUVfv9Fvldjm5GRjNy8GFEWmqKopNTfm1AJ2crKxmxcDiiJTVNWUmhtzagE7OdnYzYsB\n",
              "RZEpqmpKzY05tYCdnGzs5sWAosgUVTWl5sacWsBOTjZ282JAUWSKqppSc2NOLWAnJxu7eTGg\n",
              "KDJFVU2puTH7Fo8/MwKdnGzs5sWAosgUVTQmXJCixQ8cu3kxoCgyRRWNySDBFDNI6ooqGhMr\n",
              "SL0/gAOcnGzs5sWAosgUVTNmjhakePEDx25eDCiKTFE1Y+YMEk4xg6SuqJoxcwYJp5hBUldU\n",
              "zZg5g4RTzCCpK6pmzJxBwilmkNQVVTNmziDhFDNI6oqqGTNnkHCKGSR1RdWMmTNIOMUMkrqi\n",
              "asbMGSScYgZJXVE1Y+YMEk4xg6SuqJoxcwYJp5hBUldUzZg5g4RTzCCpK6pmzJxBwilmkNQV\n",
              "VTNmziDhFDNI6oqqGTOPDdLMl+6NFMSLHzh282JAUWSKiq3d9abmxha2KB7me1uoP+Q7XvzA\n",
              "sZsXA4oiU1TH3w+Prq78+z2UH6BwOP6tbPF+kDIGiUH6zCDddqllv67FTJDaJ36JQXpz66Ji\n",
              "QFFkii41/RRrN3ZM2b9Leet6ztJxVYu5IGWdINVfOxEtfuDYzYsBRZEputj1a1w+Q5Yuze1L\n",
              "yla1mApS9dn4zYrVnQ2IHzh282JAUWSKLjX9KpfP1aVXd95v8TpI9WfXNSsySAzSZwbJ9ohU\n",
              "S9DeLf7bgviBYzcvBhRFpuhy269w+Qz310jna3nL4jVSLUF7dyviB47dvBhQFJmi66y/0OVz\n",
              "7Dtn7Xa3VS2eg9Q7TfcIUn2SYSviB47dvBhQFJmia72/yOWz/B3L95Gyw6/K+0jt2YXmS8uz\n",
              "+mcbEj9w7ObFgKLIFF3t/SUud2jRD1LWBOlZgrQh8QPHbl4MKIpMUReXO7QYCVLnidw2xQ8c\n",
              "u3kxoCgyRV1c/h6nXUqH88oWI0HKGKSXYzcvBhRFpqjM+2+6fK6uLHyccZg8accgKY3dvBhQ\n",
              "FJmiK72/zOVzdUXhMR1veX49ptOqFp0gta+DGCTJ1kXFgKLIFF3p/WUun6srCrNUnve+pd2q\n",
              "Ft0gdR7cpsUPHLt5MaAoMkVXen+Zy+fqUv2/zr/dxR1ebmMsSL3vQNqe+IFjNy8GFEWm6Erv\n",
              "j5t5bV1R+FMHSXyJEIz4gWM3LwYURaboSu8vc/lcXTr8ns7p3/3m7Si/RAhG/MCxmxcDiiJT\n",
              "dKX3l7l8rq592nbfKcklQv2/NNq6+IFjNy8GFEWm6ErvL3P5HJfL6XQ4lKccjpM5mg1S1r2u\n",
              "e+viB47dvBhQFJmia72/yOUOLZogAYkfOHbzYkBRZIq6uNyhBYPEIDFICi0YJAaJQVJowSAx\n",
              "SAySQgsGiUH6+iCl9NbFC5MtGCQG6euDdGKQvMduXgwoikzRld5f5vI5Ltn056u+0YJBYpAY\n",
              "pPwy82dI8y0YJAaJQSqe3V3mV5pqwSAxSAySQgsGiUFikBRaFA9z9DK7DYsfOHbzYkBRZIq6\n",
              "uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84\n",
              "dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaao\n",
              "i8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEFoviB\n",
              "YzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSK\n",
              "urjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIof\n",
              "OHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWm\n",
              "qIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4\n",
              "gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFk\n",
              "irq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCK\n",
              "Hzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRF\n",
              "pqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi\n",
              "+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBR\n",
              "ZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVog\n",
              "ih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYU\n",
              "Raaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEF\n",
              "oviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JA\n",
              "UWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1a\n",
              "IIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8G\n",
              "FEWmqIvLHVogih84dvNiQFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uNyh\n",
              "BaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFjNy8GFEWmqIvLHVogih84dvNi\n",
              "QFFkirq43KEFoviBYzcvBhRFpqiLyx1aIIofOHbzYkBRZIq6uHyWv99DKjgc/1a2QBQ/cOzm\n",
              "xYCiyBRd7f0lLp/htkst+3UtEMUPHLt5MaAoMkVXen+Zy2c4puzfpbx1PWfpuKoFoviBYzcv\n",
              "BhRFpuhK7y9z+QxZujS3Lylb1QJR/MCxmxcDiiJTdKX3l7l8ri69uvN+C0TxA8duXgwoikzR\n",
              "ld5f5vIZeERyH7t5MaAoMkVXen+Zy2e4v0Y6X8tbfI3kNHbzYkBRZIqu9P4yl8+x75y1291W\n",
              "tUAUP3Ds5sWAosgUXev9RS6f5e9Yvo+UHX75PhKDhFi8kSDJWyCKHzh282JAUWSKurjcoQWi\n",
              "+IFjNy8GFEWmqIvLZ+ElQgwSdvEmgsRLhNzHbl4MKIpM0ZXeX+byGXiJkPvYzYsBRZEputL7\n",
              "y1w+A9+QdR+7eTGgKDJFV3p/mcvn6qYvEUpdXm4DUPzAsZsXA4oiU3Sl98fNvLKORyT3sZsX\n",
              "A4oiU3Sl95e5fAZeIuQ+dvNiQFFkiq70/jKXz8FLhLzHbl4MKIpM0bXeX+TyWXiJEIOEXbyR\n",
              "IMlbIIofOHbzYkBRZIq6uNyhBaL4gWM3LwYURaaoi8sdWiCKHzh282JAUWSKurjcoQWi+IFj\n",
              "Ny8GFEWmqIvLHVogih84dvNiQFFkirq4fK4uvXXxwmQLRPEDx25eDCiKTNGV3l/m8hlODJL3\n",
              "2M2LAUWRKbrS+8tcPsclm/7jiTdaIIofOHbzYkBRZIqu9f4il89ymb4w6I0WiOIHjt28GFAU\n",
              "maKrvb/E5fOcOtetrmqBKH7g2M2LAUWRKbre+wtc7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5\n",
              "MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXl\n",
              "Di0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGb\n",
              "FwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c\n",
              "7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7\n",
              "eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF\n",
              "5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCx\n",
              "mxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVd\n",
              "XO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8c\n",
              "u3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPU\n",
              "xeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzA\n",
              "sZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJF\n",
              "XVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUP\n",
              "HLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDigTW\n",
              "sU8AABFpSURBVCJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5\n",
              "MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXl\n",
              "Di0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGb\n",
              "FwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c\n",
              "7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7\n",
              "eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF\n",
              "5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCx\n",
              "mxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVd\n",
              "XO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8c\n",
              "u3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXD7L3+8hFRyOfytbIIof\n",
              "OHbzYkBRZIqu9v4Sl89w26WW/boWiOIHjt28GFAUmaIrvb/M5TMcU/bvUt66nrN0XNUCUfzA\n",
              "sZsXA4oiU3Sl95e5fIYsXZrbl5StaoEofuDYzYsBRZEputL7y1w+V5de3Xm/BaL4gWM3LwYU\n",
              "RaboSu8vc/kMPCK5j928GFAUmaIrvb/M5TPcXyOdr+UtvkZyGrt5MaAoMkVXen+Zy+fYd87a\n",
              "7W6rWiCKHzh282JAUWSKrvX+IpfP8ncs30fKDr98H4lBQizeSJDkLRDFDxy7eTGgKDJFXVwu\n",
              "3GyXlysBih84dvNiQFFkiqo6XlZ+2qV0OK9sgSh+4NjNiwFFkSkq8/6bLp+rKwsfZxwmT9ox\n",
              "SEpjNy8GFEWm6ErvL3P5XF1ReEzHW55fj+m0qgWi+IFjNy8GFEWm6ErvL3P5XF1RmKXyvPct\n",
              "7Va1QBQ/cOzmxYCiyBRd6f1lLp+rS/X/Ov8ubIEofuDYzYsBRZEputL7y1w+V1cU/tRB4iVC\n",
              "DmM3LwYURaboSu8vc/lcXTr8ns7p3/3m7chLhBgkwOKNBKl5j+i+U7xEyGHs5sWAosgUXen9\n",
              "ZS6f43I5nQ6H8pTDcTJHDJLS2M2LAUWRKbrW+4tc7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5\n",
              "MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXl\n",
              "Di0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGb\n",
              "FwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c\n",
              "7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7\n",
              "eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF\n",
              "5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCx\n",
              "mxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVd\n",
              "XO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8c\n",
              "u3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPU\n",
              "xeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzA\n",
              "sZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJF\n",
              "XVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUP\n",
              "HLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT\n",
              "1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8\n",
              "wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgy\n",
              "RV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDF\n",
              "Dxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oi\n",
              "U9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR\n",
              "/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAo\n",
              "MkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0Q\n",
              "xQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOK\n",
              "IlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tAC\n",
              "UfzAsZsXA4oiU9TF5Q4tEMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGg\n",
              "KDJFXVzu0AJR/MCxmxcDiiJT1MXlDi0QxQ8cu3kxoCgyRV1c7tACUfzAsZsXA4oiU9TF5Q4t\n",
              "EMUPHLt5MaAoMkVdXO7QAlH8wLGbFwOKIlPUxeUOLRDFDxy7eTGgKDJFXVzu0AJR/MCxmxcD\n",
              "iiJT1MXlDi0QxQ8cu3kxoCgyRV1cPsvf7yEVHI5/K1sgih84dvNiQFFkiq72/hKXz3DbpZb9\n",
              "uhaI4geO3bwYUBSZoiu9v8zlMxxT9u9S3rqes3Rc1QJR/MCxmxcDiiJTdKX3l7l8hixdmtuX\n",
              "lK1qgSh+4NjNiwFFkSm60vvLXD5Xl17defykw+ttEBLISu+Pm3ll3YIjEiGfj+A10vla3pp9\n",
              "jUTI57P68LbvHCJ3N81dIgQPwftIx/J9pOzwO/M+EiGfj8OVDYR8PgwSIQowSIQowCARogCD\n",
              "RIgCDBIhCjBIhCjAIBGiAINEiAIMEiEKMEiEKMAgEaIAg0SIAgwSIQowSIQowCARogCDRIgC\n",
              "DBIhCjBIhCjAIBGiAINEiAIMEiEKMEiEKMAgEaIAg0SIAgwSIQowSIQowCARogCDRIgCDBIh\n",
              "CugG6bRL2bH6sqRj1ty8/7xuc//p/twrGV9vuLCzad22t5+Ufi55n6bSrO3oty8+Kme+m1HS\n",
              "d2zT7fa02/YXPgk5OXm1vsMBdjZyKWZ/fdl5CapBOpZjyIqdrL6HbFf9/FLPpvrpb6dkfL3h\n",
              "ws6mldtm5c1+kppKs7aXMc/WlbXZx79RVNR3ZNPt9kZ3StB2sHA3uk/5cPJqfYcD7GzkPDHd\n",
              "pWgG6ZJ+bsXvgp88/0vZJb9kqfwOsvu/VZtT2t+KI0Dr2vH1hgs7m1ZueyzqjunQ22Jdadf2\n",
              "0u/Yb1txTqPf4CZV+XnTne2N7ZSgbWfhYA+mJ6/WdzjA7kay+83bQeeLWzWDdKh/nxbOLI61\n",
              "/8rfE/dH+nhY+3L3r509H19vuLCzaeW2Wbo9b7ittGt7evoVOnz8t2zc1UKVB5vubG9kpyRt\n",
              "Owuf92Bm8mp9hwPsbORfWXPT+Spxg5MNxV4fUvHMs/oNd9/d1Hs8ad+sO77eyMK8uwHVttWy\n",
              "rpiDHTFoe0qnwZb6bQ9p8imH5OGObboK0mCnJG07C4ejnJy8Wt9O9bDvT3p+aSxAP0i34iF1\n",
              "H+Qlf37MbdPx9UYWtpvWbltw7DnoeUcs2h7S+ef+mre7qX7by/QzDsnDHdt0ub2RnZK0XT95\n",
              "tb6d6mHfXcp/s/K5nwL6QToVx86nR/f4d1f+Nvh7PeKZIJWb1m/7Lw2c9fRUT7/toXpZ/5TQ\n",
              "3m/OyQFLVB7bdLm98Z1a3XbY+t3Jq/XtVA/7pnR4fUpnKepBupbPv8cf82863PLL/l05n9W/\n",
              "vnjVIG17OmTPLw66O2LSNqV/99+Ux6fnUu26l9ETHPK+LzZdb29sp1a3HbZeG6TVfTvVw76p\n",
              "OO9w+5l4YbgA7SDdsvL32QuZylPNh5VBemzaoG3xdPmVo03b3nonhLtLjhNHQWHfkU33HuPz\n",
              "Tq1uO1x3ZZDW9+1UD/tWb3pcXz7cRWgHaV/tVTb+mO/xz36Le/X7FaPrvVi4n3jAsrbVqZvu\n",
              "eyidOVi27S7sL8kmByPq29xr+/Yf40tTL2w71nN68up92+qRvsN0C9AN0nW3r94nrs6NXOuz\n",
              "NL19vdx/BdQPa3S90YXNpg3a5q8dHdR26h0dYd96023f58f4wlmL23YWtiWTk1fv21aP9J16\n",
              "c2MxqkE6N69Tf8unD+f6RXzze6l4lXvqmGR8vZGF54mXwKK21cLn43u9I+Zt+3lpHv/UiWih\n",
              "yoNNt9sb36nVbTsLn0pebkS773CAnY1UN69TJ1feRzNInV16eie7eXZevD+9K17STq43XDj1\n",
              "aGVty4W3w/hrJMu2x/J1ff/lSvP4D6/f4pCq/LzpzvbGd2p1287CmSsbJoIk6zscYM9Uu/Ka\n",
              "iH+5AppB+kmpObrueidSHw/rVl3X1v3dMbrecGF308pts15Jv9Ku7WPh02n3ptHu9clvqcrP\n",
              "m+5sb3yn1rftPKJ+yfAnL4Mk6zsywM5GfsdGvxLNIKXOXt/Ka2zbJdW/1/sDO/R+342vN1iY\n",
              "hoKotb3f3D0/kWpeh5q1vU20nXzeLn24z5t+3t5gp9a37Szslwx/8vIBy/qODLC7kfN++v3n\n",
              "BeiebCDkS2GQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRgkAhRgEEiRAEGiRAF\n",
              "GCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRgkAhRgEEiRAEGiRAFGCRC\n",
              "FGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRgkECovnhudxx8JebYF74Sdxgk\n",
              "EOrvcMyu/Z/vOMFNwDGAUH0N6nX/4mujSTAcAwjt14OfR39OYuEYQKgDc04/xf8Pqfo+7uYr\n",
              "u0+7lI1/HznxgEECoQ7SLe3y/Ld6vXRsg3Qob+wnN0EMYZBAaJ7CFTdS+pfn/8ofVT8/p/0t\n",
              "v+0TT+FFwSCB0AtS51Z195CK0+K3dAjYM1LAIIHwFKTr+XffCVJ9cpzjjILKg1Bn5Fq+ENo3\n",
              "sWGQtgGVB6HOyL/iFMNP2p3O116QAneN5AwSDO37SH+PO9feaySeZoiFQQKhd2VDuqfpUr9G\n",
              "Kq4Z+peyS56feLIhDAYJhN61dsfHnb/iCJWyvH7R9HwhHnGDQQKhSs7+t7r3c7/5dy4OQH+7\n",
              "MkjFlQ3phzkKg0EiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgk\n",
              "QhRgkAhRgEEiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIUYJAIUYBBIkQBBokQBRgkQhRg\n",
              "kAhRgEEiRAEGiRAFGCRCFGCQCFGAQSJEAQaJEAUYJEIU+A90ags+pubCAgAAAABJRU5ErkJg\n",
              "gg=="
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 6,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.187Z",
          "iopub.execute_input": "2020-06-09T02:37:18.193Z",
          "iopub.status.idle": "2020-06-09T02:37:18.304Z",
          "shell.execute_reply": "2020-06-09T02:37:18.328Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "barplot(Cl(AAPL), main=\"Bar Chart of Apple\", horiz=TRUE, ylab=\"Date\")"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/plain": [
              "Plot with title \"Bar Chart of Apple\""
            ],
            "image/png": [
              "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAAMFBMVEUAAABNTU1oaGh8fHyM\n",
              "jIyampqnp6eysrK9vb3Hx8fQ0NDZ2dnh4eHp6enw8PD////QFLu4AAAACXBIWXMAABJ0AAAS\n",
              "dAHeZh94AAAgAElEQVR4nO3d6YKaMBSG4bCIuAD3f7dlcUFHazg5JJC8z492ph3NEM5HkCWY\n",
              "DoAzE/oXAGJAkAAFBAlQQJAABQQJUECQAAUECVBAkAAFBAlQQJAABQQJUECQAAUECVBAkAAF\n",
              "BAlQQJAABQQJUECQAAUECVBAkAAFBAlQQJAABQQJUECQAAUECVBAkAAFBAlQQJAABQQJUECQ\n",
              "AAUECVBAkAAFBAlQQJAABQQJUECQAAUECVBAkAAFBAlQQJAABQQJUECQ9Jm7orZ7weWQG5OV\n",
              "p8fLbV50+N9/HjNjXn+g6t+2svt1LH8BzNFl+syTVemW95/OLreX/37NJfvfDx2Hd3sN0tiA\n",
              "zW9DkEToMn2zIJnT7x8vZj9+7Szr+P8/lE/vNHOy/W1sfwG8osv03Qux7Xen8p8/3Y9HWd12\n",
              "XVP3rys7lSD9/d8+rf1vU/x+Y9tfAK/oMn3PQrx/dRr23vKquf1bkz/3+a59jprbl/mxub3o\n",
              "0hf+4fbPH158G7/mjZ4Pw97c+f03uGn6VoZxqnn+f50/mvjw7aCtMpNVjWt3pIEg6ZsHKRv+\n",
              "euy8Xab/zWdjQx+K+s/Lp6RMAfv04r9Buv/TbUh7j1n/hsfhk1P1aKKcNfH32+GvJnu2i18I\n",
              "kr57ETeHqXL7fbaiHYv5WeaPTyvFY5iYvfzm8O3Ff6LyOF4x/NSHIPWZaLv2lut5E/nnb2+v\n",
              "mdKl2jmxIkj6nnVpsj4Dj12qqUDNlIzZD/99+XD4rppK+MuLX1927r/tP2e1w9G684c3PU9D\n",
              "YDn976OJc/b48bdvu3uC24PtIYrEESR9syCV7eu/T3+e//zj28uHH2hf/+ftxa//ebjvH1bT\n",
              "MPb+prcEnadhbfz/MR3nx4+/fTu95hbZcuHyJ4kg6ZsFaRqS+r28U1WYRxb+pqv78C+P//n0\n",
              "4j8pu7Xz+LH5Oz726bJHOMz9hfm3b2fLIOuGtBAkfY+6vBbTh6RTfq/J7k+R/z3l8xakzy/+\n",
              "NFw9v3pro54lu+7+vs3Hb2evkXVDWugkfbPSGzfnw7GB/FBfPxb5x6N2s7+/vPj7iJT9bSOf\n",
              "hSJ/+fmP49z0Z0aAlqCz9L0EyYx1fH7++1uRX57nkS7P80jPH//y4td3Kf/7Geky39e8H0Uf\n",
              "f/78OBb49m03OzIBGwRJ3/PDzWE8Wnb7/vOI9LyyYTjkNr+y4eXHP41Iz49a/z9qVz0PvNXT\n",
              "vuYQqNN0mK7++G03DoXDobyT7fUQiSNI+l4GgPN0ec5Upp+C1GbPH87+jkhfXjx8P7si9nm9\n",
              "3qH704Z5Ht5o3z//ZN3Hb+9NPMYw/ECQ9M1zNBT7fdcqG2vyPUhd+0hBPr+w4Pb3lxcPFwTN\n",
              "R4r7exy6+VuMTvMLwctx7DGvF0/8/Xb46zxbBPxCkPQ9Y1ROnzKufdlnh2tzv+7g/QXnQzYc\n",
              "UXi7UO7295cXl2/3SYzv8fFau2L+Yef82Nk85SarnscY3r4dtFX+WAT8QJBS9BbmD9nGQvRg\n",
              "igiSOnowRQRJHT2YIoKkjh5MEUFSRw8CCggSoIAgAQoIEqCAIAEKCBKggCABCggSoIAgAQoI\n",
              "EqCAIAEKCBKggCABCggSoIAgAQoIEqCAIAEKCBKggCABCggSoIAgAQoIEqCAIAEKCBKggCAB\n",
              "CggSoIAgAQoIEqCAIAEKCBKggCABCggSoIAgAQoIEqCAIAEKCBKggCABCggSoIAgAQoIEqCA\n",
              "IAEKCBKggCABCggSoIAgAQoIEqCAIAEKCBKggCABCggSoIAgAQoIEqCAIAEKCBKggCABCggS\n",
              "oIAgAQr8BckAeyEob/3EfGspA/Zh20EC9kJQ3vqJ+dZS6M0M8Js0EIxIwJy0vFXD8t+WQm9r\n",
              "gP9zCQMjEnDnUt5qQfnZErBxLuWtFpSfLYUeuIH/20mQgI1zKW+1oPxsKfT2BvhDrf4ZkZA0\n",
              "tfLWeqPfLYXe+AB/7DFIwPaolbfWG/1uKfTGB5isUfSMSEjPGuW9wnt+aQnYihXKW/8tv7UU\n",
              "ekAHbvYdJGArVihv/bf81lLozRBws+8gAZuhX97q7/i1pdCbIeBu10ECNkO/vNXf8WtLwFas\n",
              "UN76b/mtJWArVihv/bf81hIQ1Lrlveq7v7QU+gMm0hZNkICg1i3vVd/9paXQWyQkyVOFMyIh\n",
              "cp7K208zHSMSgvBV4IxIiJuv8vbUDkGCb95Keyxvfy2FHuSRlmiDBHjlrbTH8vbXUugtFBLi\n",
              "/dnIjEiIm6/y9tQOIxKCiDBIQAC+yttTOwQJ/ngr6ll5+2sJ8MRbUc/K219LwLq81fKn8vbX\n",
              "UuiPnYhcKkEC1uWtlj+Vt7+WQm+wEK2gEbqVt7+WAA+8FfRbeftrKfRmCylIIEiAB94K+q28\n",
              "/bUEeOStsG/lLX7ltSrGXzgvT3YthR70kZLdBOk4C39p1RLgk7SyZaTNnc2h6bpLUXbXOjdn\n",
              "m5ZCb6OQlJ0EqTDt8NfVHPs4WQ1JoTdQSIywsoWkzd1/T5PNvvn/K0JvopCEQIftpM1m04jU\n",
              "jhmyCxLgjbCs5aQtVqa4dF1TmkPXHvo/LFoKvalCOvYTpG469m2yth9qssamJcAbaVmLyVus\n",
              "+yjlx/6LrGqtWgLWJa5lBVxrh1ikEiRgXd5q+VN5S1/YHowpbidiOfyNDdhlkNps3AZMZ2I5\n",
              "/I2NEJazO/nh77pPU50V45swImET9hek26/cZHnDiITNEJazO9dLhNqiIEjYGmFVO5A2mZv7\n",
              "yaO8IEjYGGFVO5A2WT8uC2pMQZCwNcK6FhM3WD1+17Pdr83BBviznyB118dNSM2BEQkbI65r\n",
              "IS4RQnSYRB/Q4K2oZ+Xt/Aa278CIhLUFvEjIY5CAtblWsxxBQmRcK1qGXTvEJf4gAT64VrQM\n",
              "IxJiscv7kQQtASvzVswfylv8ysuxHH/5srrYtRR6g4XY7TFIbT7bEBRWLQErExazBvkdstnp\n",
              "On7VnDNT2bQErEdYx2rkd8heH19fxwnAf7YErEdYx2pc75D9+833VwArEVaxIo8jUuiPoojW\n",
              "joPUf0Y6TzN+8xkJwQmrWJHrJPqj3Gbyb0YkrGADGRo5nEeqxvNIWXm0PI8ErEBcwLq4Qxa7\n",
              "lmCQgBV4K+D/I0jYOW8V/F/s2mHf0gsSsAZvFfxf8isbli4MIxK0bSREA/mUxYuDBGgTVu8K\n",
              "xL/KNbO6eWLWUujNF/ZuQ7n5w2HKYqsLg2YtAY7Exbo+h9+tnl23atNS6O0Z9mjL4ZnjqB22\n",
              "zVuBuiFI2DZvBeqGE7LYtGSCxASR8Me1WtfDBJHYD4LUMSJBgWu1rocRCXuw4QhNGJGwC651\n",
              "ujaChG1zLVBPOI+EbfNWoG4crrWrpomE8vJk1xKwnLg+PRP/osfZwpZWLYX+vIodij5IZ3No\n",
              "uu5SlN21zs3ZpiVgOWF9eif9RQszTgp5Ncc+TlZDEiMSFthNgm5cJ9Efp/3mDlnoE1ZmIPJJ\n",
              "9McRqR2XlzkboC6RIFWmuHRdU5pD1x76PyxaApYQVmYgrpPoZ22fkKyxaQmwIC3IwOS/d91H\n",
              "KT/2X2SVzcMo2LWDjfSCtLglwIK3gtTFHbLYjr2mqGNEwqZ4q0Z1jEjYih3HiBEJm+KtGtUx\n",
              "iT62I8EgMYk+ViCsxg3wOIk+8JO0HIPzOIl+6P0GbF+KQVo8iT7wm7wew+LwN7aEIP1uCfjN\n",
              "Wz0qY0RCWLuNziv5YlyO5bgJKauLXUvAJ+IK3BTpYrT5rCusDoQHW1HYKGHpbZP8DtnsNB20\n",
              "a86Z1YHw0KsNWyMsvW2Sz9nwPPZ9HWdA+dkScCMsui1znUXo7zdfXxH6Uy22giA9MSLBlbD0\n",
              "tsnhM9J5mvLE+jNS6O0gtoUgjYrZpiW3mf0k2IYPGyUtvU1yOI9UjeeRsvJoeR4p9BYQ20KQ\n",
              "hC0BL7yVng8ECd54q7UAxAvXHowpbo9z4fA3LBCkD9ps3MZMz3PhVnPYENbaLsgPf9d9murp\n",
              "fnNGJPwQdYgG8hOy419NljeMSFhIWHRb5nqJUFsUjEhYhiA95eZ+EjYvGJGwjLDotkw+r939\n",
              "4WKNKQgSlhDW3KaJF6p69MfZrmtCrz1shrTmtsxhXrvHo8ybA0HCD+I62wkmP4EPBEmvJaTN\n",
              "W6UFwYgEPwiSVktInrdi848RCd4QJJWWkDxvxeYfQcL6vBVZOOzaYXUESbUlJMxbmYXCiAQP\n",
              "CJJiS0iYtzILhREJq4s/RoxI8MlbsfnHiARvCJJKS0iet2LzjyDBL28F5xe7dvCKIDm3BBhG\n",
              "pM/q3JjybNdS6G0hAos1QyO3ee1uD0myec4YIxKEtbYLTkGqTNV2XTNOX/z7FaE3iAgq6hg5\n",
              "BimbZolsTW71CiRNWGk74RSke+cwrx1+EdbZbjgF6T6fHU81xy/COtsNeZDKY302p/7LtrJ7\n",
              "qjkwEFbcxsmD9OgVYzKrp5qH/rSLTSBIr67Xui7L8ZBDZZMjRiTcSEtu07hECJ4RJMeWgJG3\n",
              "kvOJEQkrizM47xiRsDZvJRYSQcJ6vBVXeK6Hv+17jF275BCk3+rlQUJyhMW1R/LzSFmxsKXQ\n",
              "20f4lVKMnJ4ha3cb0rMlJEZcWnvksLS1uS5qKfQWEn4RpJVaQmK8ldYWECTo8lZQ20KQoMtb\n",
              "QW2L83Jb91zoFYx1uRbSznkMUugPv1gTQXJ9A0YkzLjW014xIkETQRK/ASMS5lwLaqcYkaCK\n",
              "IK3eEpLgraC2RbzczcFkx3EW/czumrvQKxjrkhZSJKTL32ZD59XHsQ+trgNn1y5qBElmnBSy\n",
              "ysyhZYJIDISFFAvp8k9bIDPNom83ZXHobSZWk3qKOtfnI922Q9whC5P4mOQ6Ig1/toxISH1Y\n",
              "cv2MNExXzGckDISlFAeO2sFN2vl54DwSHEkrKC5c2YB1eCusbWDub6yCINm6HMtxy1NWF7uW\n",
              "kBRxYe2T+GBDPuszDjbgHUGyU5nsNE1r15wzDn/jD2Fh7ZX8hOxzdsgrJ2Qxk1qGRm6XCH36\n",
              "5vsrkAhhTe2axxEJqRDW1K45fEY6N+NXfEbCG2FN7Zp4oYtZx+WtTUuInLSUouBwHqkazyNl\n",
              "5dHyPFLoz8BYF0Hy1BIi562UtohLhOAi7fTMMEEkHLlWUByYIBJuCNKIEQmOXCsoDgQJulwL\n",
              "aqfYtYMqgiR9A0YkzLkW1E5x+BtiqYbmE3lfXKvpKqG8PNm1hPiIqyc64q44zrqztGop9PYT\n",
              "6gjSg7QrzubQdN2lKLtrnZuzTUuIlbCGoiLthGKaPv9qjn2crIYkRqRYEaTO/Q7Z8Z4+7pBN\n",
              "m7CGoiK/Q3YckdqxFwlSioSVEyn5HbLFpeua0hy69tD/YdFS6D0QqCJIL1zvkM3afqjJGpuW\n",
              "EBdp5cRJ3h11H6X82H+RVTZ3mjMixYMM/cUdsljOW9HsB5cIwRb5+Q9GJFjzVis7RJDgzlsR\n",
              "bRe7dnBGkFyubFi6SQqyqYRnwnLaP+mS14v7jxEpAQRpsWtm9XixWUtIi7Sy9snhxj6rqfNn\n",
              "LYXeWsIrgmSrnj3ZxaYlpEVeWXvEUTtoSiw+T5xHgipv9bQxBAnKvFXUpjg8H+k4Ph/JlBXP\n",
              "R8ITQVqkzWfbIKsD4WE2j/BOWFE75/AM2dN00M76GbKhN5VYXaIhGvBUcygSVlMEXGcR+vvN\n",
              "11eE3lxiZQnHiBEJioS1FAWHz0jnacoT689ISIGwnnbPdRahUW4z+0mwVQufpPW0dw7nkarx\n",
              "PFJWHi3PIyEF4nraOa61gyaCtH5LSIG3etoY8YK3B2OK2+NcOPyNQbIp6hwuEcrG7c/0PBfm\n",
              "bMBIWEwxkB/+rvs01dP95oxICUs5PTPyE7LjX02WN4xIaRNWUGRcLxFqi4IgwSSfJ+ny5+Z+\n",
              "EjYv2LVD8nt48nnt7g8Xa0zBiASCJFQ9uu5s14uMSLFKPUOj1044l0MmSpsH8HXXx6PMmwMj\n",
              "UuKWFV2MXrqgmPrE7lGWi1sKveHEagjSS5BqU4xPKa+tHq68uCXEbIWK2ZV5B2SmnQ7ArdIt\n",
              "jEgxI0jzr023ZpAQsxUqZlfmHZDfRqSryddoCbFaoVp258NnpHM2XEen31LovQ+shCB1b0ft\n",
              "ytsWZuGTjyxbQqzWKJe9+XseyZSndVoKveHECgjRDXfIwpW3Etoy5myAI4I0+DhhamYz4ePi\n",
              "lhCpFYplfz4FqeE8EiytUCj7NL+E+4nzSLCzQqHs06Mn5s87yu2mfFzYEmKzQpXs1uKHSshb\n",
              "Cv2hGMoI0gyHv6HAWxVt1scuuJSf/tW1pdAbUKyGIL0GqVpzCxNwe4m1rVAvOzPvgmeOztav\n",
              "rzOT213iyogUL4L0dmPfqStM0xTG4qjdtTRZ3R3H3PFU89QJqy8i70ftjv1odLVIxnXsv8oc\n",
              "2q4prW67CLyqsRZx7UXlPUjnIRQWnXMYHndZTQ+Pba1O4LJrFyeCNJp3Q9nv2jV9KC4WQZp+\n",
              "hKdRgCCN5t1wHjplnJLr9yxCU/+dpn06u6eah950Qh8punvpiePw3cHYPKT8MHw6mrQHnmqe\n",
              "rMUFFyuXB43d38JqQGJEigkBeifvkeoen8xmPGJEiou4bGI165HzYbgCvKjWuPS7I0jxWadO\n",
              "durRG03x6KBijam/CVJ01qiS3br3Rv+ZJz8Phw+aU273medynGbvKi2HsMBrHeqEJRene29U\n",
              "s6sZCnP8+bp2fiOg3SVCoT8gQxdBmrv3Rm6e+3ONRTIqk52u00+fMw5/J0lQbvF6HsOe/+Pv\n",
              "PsrM9fH1lROyCSE/H0mDtPTnGZFis6DIUsCIBBGC9EoapP4z0nn6VMVnpDQtLrW4PYO0sJeK\n",
              "2U/n7e+fJ0iRcam6CImD1F2q8TxSVh4tzyOF3hmBJoL0ium4IOWtdPaAp1FAiCDNOfeG9YYp\n",
              "9PYT2lxLJyoegxR6Cwo9hOgdIxJEXOsmNoxIkCBIbxiRIOJaN7EhSFjAtVrixeFv2CNIX4m7\n",
              "ph0nPznmxhQnu5awf9JqiZ+0a5phOq5hTq4Bd8imgBT9j7R3DqZsh1kimz5TTBCZDGG1JEDa\n",
              "Nca0tz+GSfS5HykNBOkreZC64e6+2Te/X4HdE1ZLAuS7dtdhrvDxNtnW6kNS6BqAAmG1JEDa\n",
              "NVeTVdeuzPoknXOrR2WGrgEoEFZLAsRdc86e3ft7GryOIEVCWi+xc+iY0zhXuCmPdjMcc7Ah\n",
              "BgTpC+6QxSLe6mVnuEQIlsjQ/8h7h0n0UyMulRSIn9jHJPrpIEK/SfuISfRTIiySlEj7SDBl\n",
              "MXZFWBipcrpE6OM3X18RegcFSxCkZRiR8JmwMFLl8Blp6ST6obexsEOEJMS9xiT60ZKWRNIc\n",
              "ziMxiX5kSJADLhHCg7daiBCXCKWM6KhhXrukua593BGk5LlWAAbM/Z06gqSCEQkT10JIHCMS\n",
              "RgTJDSMSJq6FkDgOfyNjPHIn78FrNV0llJdMor9/4jLARNyDx9laKK1awqZJCwEjaf+dx/nz\n",
              "L0XZXWvLCSJD777gfwiSG2n/FdP8+ddhcsiL1ZAUeouLX4SlgIHrHbLjPX3cIRsDguRCfofs\n",
              "7YkuwxvwNIo4CGsBncsdssWl65rSHLr20P9h0VLoLS5+IEgOXO+Qzdp+qMlsZv8Ou7HFAtKa\n",
              "SJm80+o+SvnwHIqssrnTnBFpNwiSAHfI4g9vNRERgoTvvBXH/nGtHb4iSPYYkfCdt+LYP0Yk\n",
              "vCM/AvIrG5ZuuoJsUuFOWCGJkXZTvbizGZH2iSBZEXfTNbN6vNisJeyTtELS4nBjn9XU+bOW\n",
              "sFviIkmHQx/Vsye72LSE3ZIXSTI4/A0b3spkrzj8DQsE6RdGJNjwViZ75fB8pOP4fCRTVjwf\n",
              "KWJEyI60n9p8trmyOhAeZksKV8ICSY3DM2RP00E7niEbKSK0BE81xzfC0kiT6yxCf7/5/grE\n",
              "Qlg0MfM4IoXeVYEWgvSXw2ek8zTlifVnJMRHWD0Rcp1FaJTbzH7CiBQfgvTgcB6pGs8jZeXR\n",
              "8jwSIiUuoZhwiRAcEaQBlwjBlbcS2jJxL7QHY4rb41y4QzZlBGkgvkQoGzdG0/NcOI+UNGEJ\n",
              "xUV++Lvu01RP95sTJNwJ62n35Cdkx7+aLG/YtcMDQVr6utsL26JgRMIfwrLaL+kS5+Z+EjYv\n",
              "GJHwhiDZqh8PF2tMwYiEN8Ky2i/xElePzjrb9RsjUhLSi9DEYV67x6PMmwMjEu7EBbVvXNkA\n",
              "dd5qakMIEtR5q6kNIUiQ81Y828fV3xAjSE+MSNDgrYy2ihEJCggSIxI0eCujrWJEgjtyxIgE\n",
              "Dd6qaLMIElR4q6ONYtcOGgiSv5YQPW/FtD2MSFBDkLy0hOh5K6btYUSCGoLkpSVEz1sxbQ9B\n",
              "ggJvVbRZBAkKvFXRZhEkuPNWRNvlMGdDNT0iKS9Pdi2F/iiMtRAkhyAdZxuk8vePMyLFTFpE\n",
              "EZH2wdkcmq67FGV3rXNztmkp9HYT6yBGA2kvFNNMq1dz7ONkNSSF3mpiLcISiovr3N/jA82Z\n",
              "IDJB5OeF/GkU44jUjhliyuIUCSsnUvLnIxWXrmtKcxie3Xf4/QKCFBth5URK3B3TsW+TtX1C\n",
              "ssampdD7IlBFkF7Iu6Puo5Qf+y+yqv35wx0jUnTElRMlrv6GCDl6xSVCkPFWOPvAiAQRgvSK\n",
              "EQly3opn+xiRIEaQnuRXNizdNAXZZGJVwuKJkfxhzEt7NMyqxnqEpRMncW9cs2JhS6F3RKCL\n",
              "IM053NhnqmUtITbi2omQQ2fU5rqopdBbUCgjSDMc/oaYt9rZAQ5/YzES9BcjEpbzVjT74dwn\n",
              "1r0aeuVDiWvFxIkgYSHXiokTQcIyrgUTKY9BCv0RGRoI0meMSFjGtWAixYgEe6ToKw5/YwFv\n",
              "1bI7rl1TZyav7VoKvTmFHAn6RX71d2my+jaVvtV14IG3pXAiLZNkSHvoOnZvZQ7tMEukzZgU\n",
              "uBIgJ6yRpEg76TDcRFGNM393rcltWgq9ewIhgmTBbRL922MouEM2bsIaSYpbkE7TPt00MP16\n",
              "RegNK0SIkRX5rt3hPlFxe7C6Vzb0ZhVCwgpJjLSb2uzRw8ZqQGJE2idyZEfeT9U9Ppnd3A2h\n",
              "N6yQERdIWriyAd95K479I0j4zltx7J+8ry7HcuzssrrYtYR9EldIUsQHG/JZV9tdIhT6YzNE\n",
              "CJIV+TNks9M0rV1zzjj8HT1hmaRD/lTz5+yQV07Ixo4g/eJ2ZcOnb76/AhEQ1kv0GJGwBEH6\n",
              "wuEz0rkZv+IzUlKE9RI9cccUs87N298/T5D2SVofqXE4j1SN55Gy8mh5Hin0XgkECJIlrmzA\n",
              "f3mrj53jaRT4hhAtwASR+C/X+kgFE0TifwiSJUYk/JdrfaSCEQlfkKElGJHwjWtpJIUg4QPX\n",
              "qkgPh7/xF0FaTN5l12q6SigvT3YtYT/EVZEscZcdZ91eWrUUejMLG2RIRtpvZ3Nouu5SlN21\n",
              "zs3ZpiXsgrAgUiftt8KMV3xfzbGPk9WQxIi0A8RIyvUO2fGePu6QjYawHCC/Q3Yckdqx6wlS\n",
              "FISlgIH8Dtni0g3PGDsMk+gfbFrCxglLAQPXO2SzdphEv7FpCZsjXfn4Q96XdR+l/NgNk+jb\n",
              "3GnOwYbtIUh6uEM2Zd5Wfvy4RChd5EgRI1LivK3/yDEipY0gKWFESpy39R85+ZUNS1dHkDKB\n",
              "BWEJYE7ai/XidcGu3UYRJA3iXrxmVo8Xm7WErZLWAJ4cbuyzmjp/1lLoLS++IEgKHDqxnj3Z\n",
              "xaYlbJW8BnDH4e/UESMVHP5OnrcKiBojUsLIkB6H5yMdx+cjmbKyfD4SNke88vFO2pdtPlsf\n",
              "VgfCg1UL/ktYAHjl8AzZ03TQzvoZsqF3ZPAJQdLh8anm2CRhAeCV6yxCf7/5+orQ2158QI6U\n",
              "MCIlTrj+8cbhM9J5mvKEz0h7RpCUuM4iNMptZj8Jts3F/0jXP145nEeqxvNIWXnkPNJeiVc+\n",
              "3nGJUMq8rfz4EaREeVvviRB3aHswprg9zoXD37tDkJSJLxHKxu3a9DwX5mzYJeGqxyfyw991\n",
              "n6Z6ut+cEWmPCJIm+QnZ8a8myxtGpJ0Srnp84nqJUFsUjEg7RIqUSTs0N/eTsHnBiLRDwvWO\n",
              "L+Tz2t0fLtaYgiDtjnC14xtxj1aPlXG2Wy/s2m0IQdLmMK/d41HmzYERaXfE6x0fMflJmgiS\n",
              "Mi4RSpS39Z4IRqQUESN1jEhJ8rbWk0GQEuVtvSeCICXK23pPBEFKkbeVng4ONiSIIOljREqT\n",
              "t9WeCkakJBEkbYxIifK23hPBiJQmgqSMESlR3tZ7IghS4ryt/8ixa5c2gqSEESlx3tZ/5BiR\n",
              "0kaQlDAiJc7b+o8cUxYnigTpYsriVAlXPD5jyuKUkJ7VMGVxUoRrGz95nLIY4QnXNn7yOGVx\n",
              "6P0asGu3HqYsTopwbeMnpixOBilaE1MWp0O8qvEblwjFhrwEwSVC0fG2RjEj7/bLsRzXW1ld\n",
              "7FqCP+K1CiHxJUL5bLUVVi3BH+FahZj8EqHsdB2/as6ZqWxaglfCFQsZ+SVC18fXV5PZtBT6\n",
              "U3haCJJfrpcI/f3m+yvgk3DFQoYRKSakJxiHz0jnZvyKz0ibIlyfcCTu+GK28vL2988zInlB\n",
              "kAJxOI9UjeeRsvLIeaQNEa9POOHKhrh4W514xbV2USFIoTj3vPVGMPS2Oi2uqxULeQxS6K11\n",
              "SgiSb4xIcXJdrViIESlCxMg/RqQYua5ULEaQ4uO6SiHAeaT4eFuleCJIUfG2NvGGE7IxIUjB\n",
              "MCJFxdvaxBv5jX1LVyAj0opIUGjyKYsXBwmrE65MuBP3/TWzmjto1lLorXb8CFI4DlMWW90X\n",
              "O2sJqxOvTLhy6Pt6Nm2DTUvwQb4+4YLD33EhSIFw+Dsy3tYnXjAiRYUchcIk+nERr0648TiJ\n",
              "fuitddyIUFhMoh8L4YqEDqYs3jsStAlMor97wjUIVR5HJKxEuAqhyeMk+qH3gWJFkLbA4yT6\n",
              "WIl0FUKRx0n0Q2+540F0todLhKLlbc2i4xKheBEkr5jXLlquaxZL+AsSEDGCBCggSIACgnhO\n",
              "4PEAAAVPSURBVAQoIEiAAmIAKHCYjquarhLKy5Pi7wPskjhIx9kZi1LzNwJ2SBqkszk0XXcp\n",
              "yu5a5+as+jsBuyMNUmHGK76v5tjHiSEJqXO9Q3a8p48jd0id/A7ZcURqxwwRJKROfodscem6\n",
              "pjSHrj30fwBJc71DNmv78ShrNH8lYH/kO2V1H6X82H+RVTZ3mgMx49MNoIAgAQoIEqCAIAEK\n",
              "CBKgQH5lAxNtAA/SCNQECXgSR+CaWT1ebNYS4E5ar2tzuLHPaup8jZbkgnQ7CxpZm1YcfrF6\n",
              "9mSXdVsSo75iazTGIG22pbBtsqCxtWmFIEXRKAsaGkGKolEWNDSH5yMdx+cjmbKyfD6SuCU5\n",
              "6iu2RqMLUpvPDklaHQhPpttZ0MjatOLwDNnTdNDO+hmywpZcUF+xNRpdkARPNRe25IL6iq3R\n",
              "6IL0corZ6nxzMt3OgkbWphVGpCgaZUFDc/iMdJ6mPOEz0gYaZUFDc51FaJQz+wkS53AeqRrP\n",
              "I2Xl0e48EhCxzQ6VwJ4QJECBOEjtwZji9jiX7d5uBfghvkQomy60m96EICFx8sPfdZ+merrf\n",
              "nCAhdfITsuNfTZY3BAlwvUSoLQqCBEgjkJv7Sdi8IEhInnxeu/vDxRpTECSkThyB6pGe84Zn\n",
              "GwP8cJjX7vEo8+ZAkJA4IgAoIEiAAoIEKPAUpCozHp/ZPJ9v3U/L9b0fZ82t3fK9TY9LW+ef\n",
              "lm7dRp9t+l+tC/gJ0nQXYO6lreHW92eP+2n5ej9uOWtu7ZbvbXpc2mp8+6ztPC7os03/q3UJ\n",
              "L0G6mOzaXTPj6Q7Aq3kcUPTTct+AeW9u7ZYfbfpb2qs5tLcziN4WdNam99W6iJcgVWa43+Jk\n",
              "jj4aG7r90ZCXluvHKelZcyu3/GzT39KWU4NDu94WdNam79W6jJcglWaYJ2W2RVlXPVyZ7rFl\n",
              "U90vkpo1t3LLzzZ9L+3Yrr8FfbbpfUEX8RIkY+Z/ra4050P/UdRby9f3doa/Vm752abvpW1N\n",
              "4XNBn236XtBl4gzSY0ZyXy17D1I3C5Lfpa2H3SrPQRrbDLBaF4gxSMac+o3YeOthAkHyvLRN\n",
              "Vna+g3Rv0/tqXSDGIE3a4ehoAkGa+Fra9uWeaD8L2s6f++11tS7g5VfJgiz30Jyvlm8NzJpb\n",
              "v+XXt/a0tMV07sbrghYv54t8rtYFPB61azwfZHkeXVq/5Zejds3zYNaaLf8N0uptNnkxzVPt\n",
              "cUEfbd74XK0LeAnScTzsf7aaIlxBNt69O3azr5ZvRT1rbv2WH6Ogt6U9Px4p529Bn20GWK0L\n",
              "xHhlQzV0cDuetPPVsv8rGx5t+lva5vloRm8LOmszwGpdwM9eZm7/hEwFtzn3Ko8t33ezZs2t\n",
              "3vKtTX9Le7g/NKHzt6CzNgOs1gX8BKkdL9b10tS9ubz22fJjUqVnc6u3PG/Ty9KaWZB8Leh7\n",
              "m35X6wIbOu4B7BdBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFB\n",
              "AhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRA\n",
              "AUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQ\n",
              "JEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUEC\n",
              "FBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEABQQIUECRAAUECFBAkQAFBAhQQJEAB\n",
              "QQIUECRAAUECFBAkQME/46r6/fZQQwQAAAAASUVORK5CYII="
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 7,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.311Z",
          "iopub.execute_input": "2020-06-09T02:37:18.316Z",
          "iopub.status.idle": "2020-06-09T02:37:18.412Z",
          "shell.execute_reply": "2020-06-09T02:37:18.446Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "AAPL.DF<-data.frame(Date=index(AAPL),coredata(AAPL))"
      ],
      "outputs": [],
      "execution_count": 8,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.422Z",
          "iopub.execute_input": "2020-06-09T02:37:18.428Z",
          "iopub.status.idle": "2020-06-09T02:37:18.461Z",
          "shell.execute_reply": "2020-06-09T02:37:18.452Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "AAPL.DF"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/html": [
              "<table>\n",
              "<caption>A data.frame: 252 × 7</caption>\n",
              "<thead>\n",
              "\t<tr><th scope=col>Date</th><th scope=col>AAPL.Open</th><th scope=col>AAPL.High</th><th scope=col>AAPL.Low</th><th scope=col>AAPL.Close</th><th scope=col>AAPL.Volume</th><th scope=col>AAPL.Adjusted</th></tr>\n",
              "\t<tr><th scope=col>&lt;date&gt;</th><th scope=col>&lt;dbl&gt;</th><th scope=col>&lt;dbl&gt;</th><th scope=col>&lt;dbl&gt;</th><th scope=col>&lt;dbl&gt;</th><th scope=col>&lt;dbl&gt;</th><th scope=col>&lt;dbl&gt;</th></tr>\n",
              "</thead>\n",
              "<tbody>\n",
              "\t<tr><td>2019-01-02</td><td>154.89</td><td>158.85</td><td>154.23</td><td>157.92</td><td>37039700</td><td>154.7950</td></tr>\n",
              "\t<tr><td>2019-01-03</td><td>143.98</td><td>145.72</td><td>142.00</td><td>142.19</td><td>91312200</td><td>139.3763</td></tr>\n",
              "\t<tr><td>2019-01-04</td><td>144.53</td><td>148.55</td><td>143.80</td><td>148.26</td><td>58607100</td><td>145.3261</td></tr>\n",
              "\t<tr><td>2019-01-07</td><td>148.70</td><td>148.83</td><td>145.90</td><td>147.93</td><td>54777800</td><td>145.0027</td></tr>\n",
              "\t<tr><td>2019-01-08</td><td>149.56</td><td>151.82</td><td>148.52</td><td>150.75</td><td>41025300</td><td>147.7669</td></tr>\n",
              "\t<tr><td>2019-01-09</td><td>151.29</td><td>154.53</td><td>149.63</td><td>153.31</td><td>45099100</td><td>150.2762</td></tr>\n",
              "\t<tr><td>2019-01-10</td><td>152.50</td><td>153.97</td><td>150.86</td><td>153.80</td><td>35780700</td><td>150.7565</td></tr>\n",
              "\t<tr><td>2019-01-11</td><td>152.88</td><td>153.70</td><td>151.51</td><td>152.29</td><td>27023200</td><td>149.2764</td></tr>\n",
              "\t<tr><td>2019-01-14</td><td>150.85</td><td>151.27</td><td>149.22</td><td>150.00</td><td>32439200</td><td>147.0317</td></tr>\n",
              "\t<tr><td>2019-01-15</td><td>150.27</td><td>153.39</td><td>150.05</td><td>153.07</td><td>28710900</td><td>150.0410</td></tr>\n",
              "\t<tr><td>2019-01-16</td><td>153.08</td><td>155.88</td><td>153.00</td><td>154.94</td><td>30569700</td><td>151.8740</td></tr>\n",
              "\t<tr><td>2019-01-17</td><td>154.20</td><td>157.66</td><td>153.26</td><td>155.86</td><td>29821200</td><td>152.7757</td></tr>\n",
              "\t<tr><td>2019-01-18</td><td>157.50</td><td>157.88</td><td>155.98</td><td>156.82</td><td>33751000</td><td>153.7168</td></tr>\n",
              "\t<tr><td>2019-01-22</td><td>156.41</td><td>156.73</td><td>152.62</td><td>153.30</td><td>30394000</td><td>150.2664</td></tr>\n",
              "\t<tr><td>2019-01-23</td><td>154.15</td><td>155.14</td><td>151.70</td><td>153.92</td><td>23130600</td><td>150.8741</td></tr>\n",
              "\t<tr><td>2019-01-24</td><td>154.11</td><td>154.48</td><td>151.74</td><td>152.70</td><td>25441500</td><td>149.6783</td></tr>\n",
              "\t<tr><td>2019-01-25</td><td>155.48</td><td>158.13</td><td>154.32</td><td>157.76</td><td>33535500</td><td>154.6382</td></tr>\n",
              "\t<tr><td>2019-01-28</td><td>155.79</td><td>156.33</td><td>153.66</td><td>156.30</td><td>26192100</td><td>153.2070</td></tr>\n",
              "\t<tr><td>2019-01-29</td><td>156.25</td><td>158.13</td><td>154.11</td><td>154.68</td><td>41587200</td><td>151.6191</td></tr>\n",
              "\t<tr><td>2019-01-30</td><td>163.25</td><td>166.15</td><td>160.23</td><td>165.25</td><td>61109800</td><td>161.9799</td></tr>\n",
              "\t<tr><td>2019-01-31</td><td>166.11</td><td>169.00</td><td>164.56</td><td>166.44</td><td>40739600</td><td>163.1464</td></tr>\n",
              "\t<tr><td>2019-02-01</td><td>166.96</td><td>168.98</td><td>165.93</td><td>166.52</td><td>32668100</td><td>163.2248</td></tr>\n",
              "\t<tr><td>2019-02-04</td><td>167.41</td><td>171.66</td><td>167.28</td><td>171.25</td><td>31495500</td><td>167.8612</td></tr>\n",
              "\t<tr><td>2019-02-05</td><td>172.86</td><td>175.08</td><td>172.35</td><td>174.18</td><td>36101600</td><td>170.7332</td></tr>\n",
              "\t<tr><td>2019-02-06</td><td>174.65</td><td>175.57</td><td>172.85</td><td>174.24</td><td>28239600</td><td>170.7920</td></tr>\n",
              "\t<tr><td>2019-02-07</td><td>172.40</td><td>173.94</td><td>170.34</td><td>170.94</td><td>31741700</td><td>167.5573</td></tr>\n",
              "\t<tr><td>2019-02-08</td><td>168.99</td><td>170.66</td><td>168.42</td><td>170.41</td><td>23820000</td><td>167.7542</td></tr>\n",
              "\t<tr><td>2019-02-11</td><td>171.05</td><td>171.21</td><td>169.25</td><td>169.43</td><td>20993400</td><td>166.7895</td></tr>\n",
              "\t<tr><td>2019-02-12</td><td>170.10</td><td>171.00</td><td>169.70</td><td>170.89</td><td>22283500</td><td>168.2267</td></tr>\n",
              "\t<tr><td>2019-02-13</td><td>171.39</td><td>172.48</td><td>169.92</td><td>170.18</td><td>22490200</td><td>167.5278</td></tr>\n",
              "\t<tr><td>...</td><td>...</td><td>...</td><td>...</td><td>...</td><td>...</td><td>...</td></tr>\n",
              "\t<tr><td>2019-11-18</td><td>265.80</td><td>267.43</td><td>264.23</td><td>267.10</td><td>21675800</td><td>265.7482</td></tr>\n",
              "\t<tr><td>2019-11-19</td><td>267.90</td><td>268.00</td><td>265.39</td><td>266.29</td><td>19041800</td><td>264.9423</td></tr>\n",
              "\t<tr><td>2019-11-20</td><td>265.54</td><td>266.08</td><td>260.40</td><td>263.19</td><td>26558600</td><td>261.8580</td></tr>\n",
              "\t<tr><td>2019-11-21</td><td>263.69</td><td>264.01</td><td>261.18</td><td>262.01</td><td>30348800</td><td>260.6840</td></tr>\n",
              "\t<tr><td>2019-11-22</td><td>262.59</td><td>263.18</td><td>260.84</td><td>261.78</td><td>16331300</td><td>260.4551</td></tr>\n",
              "\t<tr><td>2019-11-25</td><td>262.71</td><td>266.44</td><td>262.52</td><td>266.37</td><td>21005100</td><td>265.0219</td></tr>\n",
              "\t<tr><td>2019-11-26</td><td>266.94</td><td>267.16</td><td>262.50</td><td>264.29</td><td>26301900</td><td>262.9524</td></tr>\n",
              "\t<tr><td>2019-11-27</td><td>265.58</td><td>267.98</td><td>265.31</td><td>267.84</td><td>16308900</td><td>266.4845</td></tr>\n",
              "\t<tr><td>2019-11-29</td><td>266.60</td><td>268.00</td><td>265.90</td><td>267.25</td><td>11654400</td><td>265.8975</td></tr>\n",
              "\t<tr><td>2019-12-02</td><td>267.27</td><td>268.25</td><td>263.45</td><td>264.16</td><td>23621800</td><td>262.8231</td></tr>\n",
              "\t<tr><td>2019-12-03</td><td>258.31</td><td>259.53</td><td>256.29</td><td>259.45</td><td>28607600</td><td>258.1370</td></tr>\n",
              "\t<tr><td>2019-12-04</td><td>261.07</td><td>263.31</td><td>260.68</td><td>261.74</td><td>16795400</td><td>260.4153</td></tr>\n",
              "\t<tr><td>2019-12-05</td><td>263.79</td><td>265.89</td><td>262.73</td><td>265.58</td><td>18606100</td><td>264.2359</td></tr>\n",
              "\t<tr><td>2019-12-06</td><td>267.48</td><td>271.00</td><td>267.30</td><td>270.71</td><td>26518900</td><td>269.3399</td></tr>\n",
              "\t<tr><td>2019-12-09</td><td>270.00</td><td>270.80</td><td>264.91</td><td>266.92</td><td>32010600</td><td>265.5691</td></tr>\n",
              "\t<tr><td>2019-12-10</td><td>268.60</td><td>270.07</td><td>265.86</td><td>268.48</td><td>22605100</td><td>267.1212</td></tr>\n",
              "\t<tr><td>2019-12-11</td><td>268.81</td><td>271.10</td><td>268.50</td><td>270.77</td><td>19689200</td><td>269.3997</td></tr>\n",
              "\t<tr><td>2019-12-12</td><td>267.78</td><td>272.56</td><td>267.32</td><td>271.46</td><td>34327600</td><td>270.0862</td></tr>\n",
              "\t<tr><td>2019-12-13</td><td>271.46</td><td>275.30</td><td>270.93</td><td>275.15</td><td>33396900</td><td>273.7575</td></tr>\n",
              "\t<tr><td>2019-12-16</td><td>277.00</td><td>280.79</td><td>276.98</td><td>279.86</td><td>32046500</td><td>278.4436</td></tr>\n",
              "\t<tr><td>2019-12-17</td><td>279.57</td><td>281.77</td><td>278.80</td><td>280.41</td><td>28539600</td><td>278.9909</td></tr>\n",
              "\t<tr><td>2019-12-18</td><td>279.80</td><td>281.90</td><td>279.12</td><td>279.74</td><td>29007100</td><td>278.3242</td></tr>\n",
              "\t<tr><td>2019-12-19</td><td>279.50</td><td>281.18</td><td>278.95</td><td>280.02</td><td>24592300</td><td>278.6028</td></tr>\n",
              "\t<tr><td>2019-12-20</td><td>282.23</td><td>282.65</td><td>278.56</td><td>279.44</td><td>68994500</td><td>278.0258</td></tr>\n",
              "\t<tr><td>2019-12-23</td><td>280.53</td><td>284.25</td><td>280.37</td><td>284.00</td><td>24643000</td><td>282.5627</td></tr>\n",
              "\t<tr><td>2019-12-24</td><td>284.69</td><td>284.89</td><td>282.92</td><td>284.27</td><td>12119700</td><td>282.8313</td></tr>\n",
              "\t<tr><td>2019-12-26</td><td>284.82</td><td>289.98</td><td>284.70</td><td>289.91</td><td>23280300</td><td>288.4428</td></tr>\n",
              "\t<tr><td>2019-12-27</td><td>291.12</td><td>293.97</td><td>288.12</td><td>289.80</td><td>36566500</td><td>288.3333</td></tr>\n",
              "\t<tr><td>2019-12-30</td><td>289.46</td><td>292.69</td><td>285.22</td><td>291.52</td><td>36028600</td><td>290.0446</td></tr>\n",
              "\t<tr><td>2019-12-31</td><td>289.93</td><td>293.68</td><td>289.52</td><td>293.65</td><td>25201400</td><td>292.1638</td></tr>\n",
              "</tbody>\n",
              "</table>\n"
            ],
            "text/markdown": [
              "\n",
              "A data.frame: 252 × 7\n",
              "\n",
              "| Date &lt;date&gt; | AAPL.Open &lt;dbl&gt; | AAPL.High &lt;dbl&gt; | AAPL.Low &lt;dbl&gt; | AAPL.Close &lt;dbl&gt; | AAPL.Volume &lt;dbl&gt; | AAPL.Adjusted &lt;dbl&gt; |\n",
              "|---|---|---|---|---|---|---|\n",
              "| 2019-01-02 | 154.89 | 158.85 | 154.23 | 157.92 | 37039700 | 154.7950 |\n",
              "| 2019-01-03 | 143.98 | 145.72 | 142.00 | 142.19 | 91312200 | 139.3763 |\n",
              "| 2019-01-04 | 144.53 | 148.55 | 143.80 | 148.26 | 58607100 | 145.3261 |\n",
              "| 2019-01-07 | 148.70 | 148.83 | 145.90 | 147.93 | 54777800 | 145.0027 |\n",
              "| 2019-01-08 | 149.56 | 151.82 | 148.52 | 150.75 | 41025300 | 147.7669 |\n",
              "| 2019-01-09 | 151.29 | 154.53 | 149.63 | 153.31 | 45099100 | 150.2762 |\n",
              "| 2019-01-10 | 152.50 | 153.97 | 150.86 | 153.80 | 35780700 | 150.7565 |\n",
              "| 2019-01-11 | 152.88 | 153.70 | 151.51 | 152.29 | 27023200 | 149.2764 |\n",
              "| 2019-01-14 | 150.85 | 151.27 | 149.22 | 150.00 | 32439200 | 147.0317 |\n",
              "| 2019-01-15 | 150.27 | 153.39 | 150.05 | 153.07 | 28710900 | 150.0410 |\n",
              "| 2019-01-16 | 153.08 | 155.88 | 153.00 | 154.94 | 30569700 | 151.8740 |\n",
              "| 2019-01-17 | 154.20 | 157.66 | 153.26 | 155.86 | 29821200 | 152.7757 |\n",
              "| 2019-01-18 | 157.50 | 157.88 | 155.98 | 156.82 | 33751000 | 153.7168 |\n",
              "| 2019-01-22 | 156.41 | 156.73 | 152.62 | 153.30 | 30394000 | 150.2664 |\n",
              "| 2019-01-23 | 154.15 | 155.14 | 151.70 | 153.92 | 23130600 | 150.8741 |\n",
              "| 2019-01-24 | 154.11 | 154.48 | 151.74 | 152.70 | 25441500 | 149.6783 |\n",
              "| 2019-01-25 | 155.48 | 158.13 | 154.32 | 157.76 | 33535500 | 154.6382 |\n",
              "| 2019-01-28 | 155.79 | 156.33 | 153.66 | 156.30 | 26192100 | 153.2070 |\n",
              "| 2019-01-29 | 156.25 | 158.13 | 154.11 | 154.68 | 41587200 | 151.6191 |\n",
              "| 2019-01-30 | 163.25 | 166.15 | 160.23 | 165.25 | 61109800 | 161.9799 |\n",
              "| 2019-01-31 | 166.11 | 169.00 | 164.56 | 166.44 | 40739600 | 163.1464 |\n",
              "| 2019-02-01 | 166.96 | 168.98 | 165.93 | 166.52 | 32668100 | 163.2248 |\n",
              "| 2019-02-04 | 167.41 | 171.66 | 167.28 | 171.25 | 31495500 | 167.8612 |\n",
              "| 2019-02-05 | 172.86 | 175.08 | 172.35 | 174.18 | 36101600 | 170.7332 |\n",
              "| 2019-02-06 | 174.65 | 175.57 | 172.85 | 174.24 | 28239600 | 170.7920 |\n",
              "| 2019-02-07 | 172.40 | 173.94 | 170.34 | 170.94 | 31741700 | 167.5573 |\n",
              "| 2019-02-08 | 168.99 | 170.66 | 168.42 | 170.41 | 23820000 | 167.7542 |\n",
              "| 2019-02-11 | 171.05 | 171.21 | 169.25 | 169.43 | 20993400 | 166.7895 |\n",
              "| 2019-02-12 | 170.10 | 171.00 | 169.70 | 170.89 | 22283500 | 168.2267 |\n",
              "| 2019-02-13 | 171.39 | 172.48 | 169.92 | 170.18 | 22490200 | 167.5278 |\n",
              "| ... | ... | ... | ... | ... | ... | ... |\n",
              "| 2019-11-18 | 265.80 | 267.43 | 264.23 | 267.10 | 21675800 | 265.7482 |\n",
              "| 2019-11-19 | 267.90 | 268.00 | 265.39 | 266.29 | 19041800 | 264.9423 |\n",
              "| 2019-11-20 | 265.54 | 266.08 | 260.40 | 263.19 | 26558600 | 261.8580 |\n",
              "| 2019-11-21 | 263.69 | 264.01 | 261.18 | 262.01 | 30348800 | 260.6840 |\n",
              "| 2019-11-22 | 262.59 | 263.18 | 260.84 | 261.78 | 16331300 | 260.4551 |\n",
              "| 2019-11-25 | 262.71 | 266.44 | 262.52 | 266.37 | 21005100 | 265.0219 |\n",
              "| 2019-11-26 | 266.94 | 267.16 | 262.50 | 264.29 | 26301900 | 262.9524 |\n",
              "| 2019-11-27 | 265.58 | 267.98 | 265.31 | 267.84 | 16308900 | 266.4845 |\n",
              "| 2019-11-29 | 266.60 | 268.00 | 265.90 | 267.25 | 11654400 | 265.8975 |\n",
              "| 2019-12-02 | 267.27 | 268.25 | 263.45 | 264.16 | 23621800 | 262.8231 |\n",
              "| 2019-12-03 | 258.31 | 259.53 | 256.29 | 259.45 | 28607600 | 258.1370 |\n",
              "| 2019-12-04 | 261.07 | 263.31 | 260.68 | 261.74 | 16795400 | 260.4153 |\n",
              "| 2019-12-05 | 263.79 | 265.89 | 262.73 | 265.58 | 18606100 | 264.2359 |\n",
              "| 2019-12-06 | 267.48 | 271.00 | 267.30 | 270.71 | 26518900 | 269.3399 |\n",
              "| 2019-12-09 | 270.00 | 270.80 | 264.91 | 266.92 | 32010600 | 265.5691 |\n",
              "| 2019-12-10 | 268.60 | 270.07 | 265.86 | 268.48 | 22605100 | 267.1212 |\n",
              "| 2019-12-11 | 268.81 | 271.10 | 268.50 | 270.77 | 19689200 | 269.3997 |\n",
              "| 2019-12-12 | 267.78 | 272.56 | 267.32 | 271.46 | 34327600 | 270.0862 |\n",
              "| 2019-12-13 | 271.46 | 275.30 | 270.93 | 275.15 | 33396900 | 273.7575 |\n",
              "| 2019-12-16 | 277.00 | 280.79 | 276.98 | 279.86 | 32046500 | 278.4436 |\n",
              "| 2019-12-17 | 279.57 | 281.77 | 278.80 | 280.41 | 28539600 | 278.9909 |\n",
              "| 2019-12-18 | 279.80 | 281.90 | 279.12 | 279.74 | 29007100 | 278.3242 |\n",
              "| 2019-12-19 | 279.50 | 281.18 | 278.95 | 280.02 | 24592300 | 278.6028 |\n",
              "| 2019-12-20 | 282.23 | 282.65 | 278.56 | 279.44 | 68994500 | 278.0258 |\n",
              "| 2019-12-23 | 280.53 | 284.25 | 280.37 | 284.00 | 24643000 | 282.5627 |\n",
              "| 2019-12-24 | 284.69 | 284.89 | 282.92 | 284.27 | 12119700 | 282.8313 |\n",
              "| 2019-12-26 | 284.82 | 289.98 | 284.70 | 289.91 | 23280300 | 288.4428 |\n",
              "| 2019-12-27 | 291.12 | 293.97 | 288.12 | 289.80 | 36566500 | 288.3333 |\n",
              "| 2019-12-30 | 289.46 | 292.69 | 285.22 | 291.52 | 36028600 | 290.0446 |\n",
              "| 2019-12-31 | 289.93 | 293.68 | 289.52 | 293.65 | 25201400 | 292.1638 |\n",
              "\n"
            ],
            "text/latex": [
              "A data.frame: 252 × 7\n",
              "\\begin{tabular}{r|lllllll}\n",
              " Date & AAPL.Open & AAPL.High & AAPL.Low & AAPL.Close & AAPL.Volume & AAPL.Adjusted\\\\\n",
              " <date> & <dbl> & <dbl> & <dbl> & <dbl> & <dbl> & <dbl>\\\\\n",
              "\\hline\n",
              "\t 2019-01-02 & 154.89 & 158.85 & 154.23 & 157.92 & 37039700 & 154.7950\\\\\n",
              "\t 2019-01-03 & 143.98 & 145.72 & 142.00 & 142.19 & 91312200 & 139.3763\\\\\n",
              "\t 2019-01-04 & 144.53 & 148.55 & 143.80 & 148.26 & 58607100 & 145.3261\\\\\n",
              "\t 2019-01-07 & 148.70 & 148.83 & 145.90 & 147.93 & 54777800 & 145.0027\\\\\n",
              "\t 2019-01-08 & 149.56 & 151.82 & 148.52 & 150.75 & 41025300 & 147.7669\\\\\n",
              "\t 2019-01-09 & 151.29 & 154.53 & 149.63 & 153.31 & 45099100 & 150.2762\\\\\n",
              "\t 2019-01-10 & 152.50 & 153.97 & 150.86 & 153.80 & 35780700 & 150.7565\\\\\n",
              "\t 2019-01-11 & 152.88 & 153.70 & 151.51 & 152.29 & 27023200 & 149.2764\\\\\n",
              "\t 2019-01-14 & 150.85 & 151.27 & 149.22 & 150.00 & 32439200 & 147.0317\\\\\n",
              "\t 2019-01-15 & 150.27 & 153.39 & 150.05 & 153.07 & 28710900 & 150.0410\\\\\n",
              "\t 2019-01-16 & 153.08 & 155.88 & 153.00 & 154.94 & 30569700 & 151.8740\\\\\n",
              "\t 2019-01-17 & 154.20 & 157.66 & 153.26 & 155.86 & 29821200 & 152.7757\\\\\n",
              "\t 2019-01-18 & 157.50 & 157.88 & 155.98 & 156.82 & 33751000 & 153.7168\\\\\n",
              "\t 2019-01-22 & 156.41 & 156.73 & 152.62 & 153.30 & 30394000 & 150.2664\\\\\n",
              "\t 2019-01-23 & 154.15 & 155.14 & 151.70 & 153.92 & 23130600 & 150.8741\\\\\n",
              "\t 2019-01-24 & 154.11 & 154.48 & 151.74 & 152.70 & 25441500 & 149.6783\\\\\n",
              "\t 2019-01-25 & 155.48 & 158.13 & 154.32 & 157.76 & 33535500 & 154.6382\\\\\n",
              "\t 2019-01-28 & 155.79 & 156.33 & 153.66 & 156.30 & 26192100 & 153.2070\\\\\n",
              "\t 2019-01-29 & 156.25 & 158.13 & 154.11 & 154.68 & 41587200 & 151.6191\\\\\n",
              "\t 2019-01-30 & 163.25 & 166.15 & 160.23 & 165.25 & 61109800 & 161.9799\\\\\n",
              "\t 2019-01-31 & 166.11 & 169.00 & 164.56 & 166.44 & 40739600 & 163.1464\\\\\n",
              "\t 2019-02-01 & 166.96 & 168.98 & 165.93 & 166.52 & 32668100 & 163.2248\\\\\n",
              "\t 2019-02-04 & 167.41 & 171.66 & 167.28 & 171.25 & 31495500 & 167.8612\\\\\n",
              "\t 2019-02-05 & 172.86 & 175.08 & 172.35 & 174.18 & 36101600 & 170.7332\\\\\n",
              "\t 2019-02-06 & 174.65 & 175.57 & 172.85 & 174.24 & 28239600 & 170.7920\\\\\n",
              "\t 2019-02-07 & 172.40 & 173.94 & 170.34 & 170.94 & 31741700 & 167.5573\\\\\n",
              "\t 2019-02-08 & 168.99 & 170.66 & 168.42 & 170.41 & 23820000 & 167.7542\\\\\n",
              "\t 2019-02-11 & 171.05 & 171.21 & 169.25 & 169.43 & 20993400 & 166.7895\\\\\n",
              "\t 2019-02-12 & 170.10 & 171.00 & 169.70 & 170.89 & 22283500 & 168.2267\\\\\n",
              "\t 2019-02-13 & 171.39 & 172.48 & 169.92 & 170.18 & 22490200 & 167.5278\\\\\n",
              "\t ... & ... & ... & ... & ... & ... & ...\\\\\n",
              "\t 2019-11-18 & 265.80 & 267.43 & 264.23 & 267.10 & 21675800 & 265.7482\\\\\n",
              "\t 2019-11-19 & 267.90 & 268.00 & 265.39 & 266.29 & 19041800 & 264.9423\\\\\n",
              "\t 2019-11-20 & 265.54 & 266.08 & 260.40 & 263.19 & 26558600 & 261.8580\\\\\n",
              "\t 2019-11-21 & 263.69 & 264.01 & 261.18 & 262.01 & 30348800 & 260.6840\\\\\n",
              "\t 2019-11-22 & 262.59 & 263.18 & 260.84 & 261.78 & 16331300 & 260.4551\\\\\n",
              "\t 2019-11-25 & 262.71 & 266.44 & 262.52 & 266.37 & 21005100 & 265.0219\\\\\n",
              "\t 2019-11-26 & 266.94 & 267.16 & 262.50 & 264.29 & 26301900 & 262.9524\\\\\n",
              "\t 2019-11-27 & 265.58 & 267.98 & 265.31 & 267.84 & 16308900 & 266.4845\\\\\n",
              "\t 2019-11-29 & 266.60 & 268.00 & 265.90 & 267.25 & 11654400 & 265.8975\\\\\n",
              "\t 2019-12-02 & 267.27 & 268.25 & 263.45 & 264.16 & 23621800 & 262.8231\\\\\n",
              "\t 2019-12-03 & 258.31 & 259.53 & 256.29 & 259.45 & 28607600 & 258.1370\\\\\n",
              "\t 2019-12-04 & 261.07 & 263.31 & 260.68 & 261.74 & 16795400 & 260.4153\\\\\n",
              "\t 2019-12-05 & 263.79 & 265.89 & 262.73 & 265.58 & 18606100 & 264.2359\\\\\n",
              "\t 2019-12-06 & 267.48 & 271.00 & 267.30 & 270.71 & 26518900 & 269.3399\\\\\n",
              "\t 2019-12-09 & 270.00 & 270.80 & 264.91 & 266.92 & 32010600 & 265.5691\\\\\n",
              "\t 2019-12-10 & 268.60 & 270.07 & 265.86 & 268.48 & 22605100 & 267.1212\\\\\n",
              "\t 2019-12-11 & 268.81 & 271.10 & 268.50 & 270.77 & 19689200 & 269.3997\\\\\n",
              "\t 2019-12-12 & 267.78 & 272.56 & 267.32 & 271.46 & 34327600 & 270.0862\\\\\n",
              "\t 2019-12-13 & 271.46 & 275.30 & 270.93 & 275.15 & 33396900 & 273.7575\\\\\n",
              "\t 2019-12-16 & 277.00 & 280.79 & 276.98 & 279.86 & 32046500 & 278.4436\\\\\n",
              "\t 2019-12-17 & 279.57 & 281.77 & 278.80 & 280.41 & 28539600 & 278.9909\\\\\n",
              "\t 2019-12-18 & 279.80 & 281.90 & 279.12 & 279.74 & 29007100 & 278.3242\\\\\n",
              "\t 2019-12-19 & 279.50 & 281.18 & 278.95 & 280.02 & 24592300 & 278.6028\\\\\n",
              "\t 2019-12-20 & 282.23 & 282.65 & 278.56 & 279.44 & 68994500 & 278.0258\\\\\n",
              "\t 2019-12-23 & 280.53 & 284.25 & 280.37 & 284.00 & 24643000 & 282.5627\\\\\n",
              "\t 2019-12-24 & 284.69 & 284.89 & 282.92 & 284.27 & 12119700 & 282.8313\\\\\n",
              "\t 2019-12-26 & 284.82 & 289.98 & 284.70 & 289.91 & 23280300 & 288.4428\\\\\n",
              "\t 2019-12-27 & 291.12 & 293.97 & 288.12 & 289.80 & 36566500 & 288.3333\\\\\n",
              "\t 2019-12-30 & 289.46 & 292.69 & 285.22 & 291.52 & 36028600 & 290.0446\\\\\n",
              "\t 2019-12-31 & 289.93 & 293.68 & 289.52 & 293.65 & 25201400 & 292.1638\\\\\n",
              "\\end{tabular}\n"
            ],
            "text/plain": [
              "    Date       AAPL.Open AAPL.High AAPL.Low AAPL.Close AAPL.Volume\n",
              "1   2019-01-02 154.89    158.85    154.23   157.92     37039700   \n",
              "2   2019-01-03 143.98    145.72    142.00   142.19     91312200   \n",
              "3   2019-01-04 144.53    148.55    143.80   148.26     58607100   \n",
              "4   2019-01-07 148.70    148.83    145.90   147.93     54777800   \n",
              "5   2019-01-08 149.56    151.82    148.52   150.75     41025300   \n",
              "6   2019-01-09 151.29    154.53    149.63   153.31     45099100   \n",
              "7   2019-01-10 152.50    153.97    150.86   153.80     35780700   \n",
              "8   2019-01-11 152.88    153.70    151.51   152.29     27023200   \n",
              "9   2019-01-14 150.85    151.27    149.22   150.00     32439200   \n",
              "10  2019-01-15 150.27    153.39    150.05   153.07     28710900   \n",
              "11  2019-01-16 153.08    155.88    153.00   154.94     30569700   \n",
              "12  2019-01-17 154.20    157.66    153.26   155.86     29821200   \n",
              "13  2019-01-18 157.50    157.88    155.98   156.82     33751000   \n",
              "14  2019-01-22 156.41    156.73    152.62   153.30     30394000   \n",
              "15  2019-01-23 154.15    155.14    151.70   153.92     23130600   \n",
              "16  2019-01-24 154.11    154.48    151.74   152.70     25441500   \n",
              "17  2019-01-25 155.48    158.13    154.32   157.76     33535500   \n",
              "18  2019-01-28 155.79    156.33    153.66   156.30     26192100   \n",
              "19  2019-01-29 156.25    158.13    154.11   154.68     41587200   \n",
              "20  2019-01-30 163.25    166.15    160.23   165.25     61109800   \n",
              "21  2019-01-31 166.11    169.00    164.56   166.44     40739600   \n",
              "22  2019-02-01 166.96    168.98    165.93   166.52     32668100   \n",
              "23  2019-02-04 167.41    171.66    167.28   171.25     31495500   \n",
              "24  2019-02-05 172.86    175.08    172.35   174.18     36101600   \n",
              "25  2019-02-06 174.65    175.57    172.85   174.24     28239600   \n",
              "26  2019-02-07 172.40    173.94    170.34   170.94     31741700   \n",
              "27  2019-02-08 168.99    170.66    168.42   170.41     23820000   \n",
              "28  2019-02-11 171.05    171.21    169.25   169.43     20993400   \n",
              "29  2019-02-12 170.10    171.00    169.70   170.89     22283500   \n",
              "30  2019-02-13 171.39    172.48    169.92   170.18     22490200   \n",
              "... ...        ...       ...       ...      ...        ...        \n",
              "223 2019-11-18 265.80    267.43    264.23   267.10     21675800   \n",
              "224 2019-11-19 267.90    268.00    265.39   266.29     19041800   \n",
              "225 2019-11-20 265.54    266.08    260.40   263.19     26558600   \n",
              "226 2019-11-21 263.69    264.01    261.18   262.01     30348800   \n",
              "227 2019-11-22 262.59    263.18    260.84   261.78     16331300   \n",
              "228 2019-11-25 262.71    266.44    262.52   266.37     21005100   \n",
              "229 2019-11-26 266.94    267.16    262.50   264.29     26301900   \n",
              "230 2019-11-27 265.58    267.98    265.31   267.84     16308900   \n",
              "231 2019-11-29 266.60    268.00    265.90   267.25     11654400   \n",
              "232 2019-12-02 267.27    268.25    263.45   264.16     23621800   \n",
              "233 2019-12-03 258.31    259.53    256.29   259.45     28607600   \n",
              "234 2019-12-04 261.07    263.31    260.68   261.74     16795400   \n",
              "235 2019-12-05 263.79    265.89    262.73   265.58     18606100   \n",
              "236 2019-12-06 267.48    271.00    267.30   270.71     26518900   \n",
              "237 2019-12-09 270.00    270.80    264.91   266.92     32010600   \n",
              "238 2019-12-10 268.60    270.07    265.86   268.48     22605100   \n",
              "239 2019-12-11 268.81    271.10    268.50   270.77     19689200   \n",
              "240 2019-12-12 267.78    272.56    267.32   271.46     34327600   \n",
              "241 2019-12-13 271.46    275.30    270.93   275.15     33396900   \n",
              "242 2019-12-16 277.00    280.79    276.98   279.86     32046500   \n",
              "243 2019-12-17 279.57    281.77    278.80   280.41     28539600   \n",
              "244 2019-12-18 279.80    281.90    279.12   279.74     29007100   \n",
              "245 2019-12-19 279.50    281.18    278.95   280.02     24592300   \n",
              "246 2019-12-20 282.23    282.65    278.56   279.44     68994500   \n",
              "247 2019-12-23 280.53    284.25    280.37   284.00     24643000   \n",
              "248 2019-12-24 284.69    284.89    282.92   284.27     12119700   \n",
              "249 2019-12-26 284.82    289.98    284.70   289.91     23280300   \n",
              "250 2019-12-27 291.12    293.97    288.12   289.80     36566500   \n",
              "251 2019-12-30 289.46    292.69    285.22   291.52     36028600   \n",
              "252 2019-12-31 289.93    293.68    289.52   293.65     25201400   \n",
              "    AAPL.Adjusted\n",
              "1   154.7950     \n",
              "2   139.3763     \n",
              "3   145.3261     \n",
              "4   145.0027     \n",
              "5   147.7669     \n",
              "6   150.2762     \n",
              "7   150.7565     \n",
              "8   149.2764     \n",
              "9   147.0317     \n",
              "10  150.0410     \n",
              "11  151.8740     \n",
              "12  152.7757     \n",
              "13  153.7168     \n",
              "14  150.2664     \n",
              "15  150.8741     \n",
              "16  149.6783     \n",
              "17  154.6382     \n",
              "18  153.2070     \n",
              "19  151.6191     \n",
              "20  161.9799     \n",
              "21  163.1464     \n",
              "22  163.2248     \n",
              "23  167.8612     \n",
              "24  170.7332     \n",
              "25  170.7920     \n",
              "26  167.5573     \n",
              "27  167.7542     \n",
              "28  166.7895     \n",
              "29  168.2267     \n",
              "30  167.5278     \n",
              "... ...          \n",
              "223 265.7482     \n",
              "224 264.9423     \n",
              "225 261.8580     \n",
              "226 260.6840     \n",
              "227 260.4551     \n",
              "228 265.0219     \n",
              "229 262.9524     \n",
              "230 266.4845     \n",
              "231 265.8975     \n",
              "232 262.8231     \n",
              "233 258.1370     \n",
              "234 260.4153     \n",
              "235 264.2359     \n",
              "236 269.3399     \n",
              "237 265.5691     \n",
              "238 267.1212     \n",
              "239 269.3997     \n",
              "240 270.0862     \n",
              "241 273.7575     \n",
              "242 278.4436     \n",
              "243 278.9909     \n",
              "244 278.3242     \n",
              "245 278.6028     \n",
              "246 278.0258     \n",
              "247 282.5627     \n",
              "248 282.8313     \n",
              "249 288.4428     \n",
              "250 288.3333     \n",
              "251 290.0446     \n",
              "252 292.1638     "
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 9,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.472Z",
          "iopub.execute_input": "2020-06-09T02:37:18.479Z",
          "shell.execute_reply": "2020-06-09T02:37:18.616Z",
          "iopub.status.idle": "2020-06-09T02:37:18.560Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "x = AAPL.DF[,'AAPL.Open']\n",
        "y = AAPL.DF[,'AAPL.Close']"
      ],
      "outputs": [],
      "execution_count": 10,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.573Z",
          "iopub.execute_input": "2020-06-09T02:37:18.581Z",
          "iopub.status.idle": "2020-06-09T02:37:18.627Z",
          "shell.execute_reply": "2020-06-09T02:37:18.621Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "x = AAPL.DF['AAPL.Open']"
      ],
      "outputs": [],
      "execution_count": 11,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.635Z",
          "iopub.execute_input": "2020-06-09T02:37:18.642Z",
          "shell.execute_reply": "2020-06-09T02:37:18.730Z",
          "iopub.status.idle": "2020-06-09T02:37:18.651Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "y = AAPL.DF['AAPL.Close']"
      ],
      "outputs": [],
      "execution_count": 12,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:37:18.662Z",
          "iopub.execute_input": "2020-06-09T02:37:18.669Z",
          "shell.execute_reply": "2020-06-09T02:37:18.735Z",
          "iopub.status.idle": "2020-06-09T02:37:18.683Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "library(ggplot2)"
      ],
      "outputs": [
        {
          "output_type": "stream",
          "name": "stderr",
          "text": [
            "Warning message:\n",
            "\"package 'ggplot2' was built under R version 3.5.3\""
          ]
        }
      ],
      "execution_count": 15,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:39:20.430Z",
          "iopub.execute_input": "2020-06-09T02:39:20.435Z",
          "shell.execute_reply": "2020-06-09T02:39:20.711Z",
          "iopub.status.idle": "2020-06-09T02:39:20.718Z"
        }
      }
    },
    {
      "cell_type": "code",
      "source": [
        "ggplot(AAPL, aes(x=AAPL.Open, y=AAPL.Close)) + ggtitle(\"Scatterplot Open vs Close\") +\n",
        "  geom_point()"
      ],
      "outputs": [
        {
          "output_type": "display_data",
          "data": {
            "text/plain": [
              "plot without title"
            ],
            "image/png": [
              "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAANlBMVEUAAAAzMzNNTU1oaGh8\n",
              "fHyMjIyampqnp6eysrK9vb3Hx8fQ0NDZ2dnh4eHp6enr6+vw8PD////agy6EAAAACXBIWXMA\n",
              "ABJ0AAASdAHeZh94AAAgAElEQVR4nO2di3qqOhBGc6i1u/f6/i97REG5BAHJDMnM+r9vt9ZW\n",
              "F6OzdkhADSdCyOaEvTeAEAtBJEISBJEISRBEIiRBEImQBEEkQhIEkQhJEEQiJEEQiZAEQSRC\n",
              "EiSFSJ/HKoSXt78Hf/J3vH+d26LhJg1v9fEaQnj9WLWJ87ne62d8EwiZSYKWqTvwks8HmHD/\n",
              "OrdFwz/qX/FTNbSXn7Ub+iDf7b0eoptAyEy2t8x7qGqDft5D+J7GpBLp7NGhxn0eQpXOpO/z\n",
              "YPR1/v51CK+xTSBkJttbpgpNQ7+H6T23ZCK9hLfm0lt4WbyNc3kJ782lQz2uIhJZm+0tc++6\n",
              "66XzWBGO1/nS28t5X+nr8ptzmq+ny3/813HlfNXfy3kQOF/9Xt2uqr9+n+dd1fH7dtsmn5cR\n",
              "45qXpudvt+zf8emtCi/t3ubfzbqX8He+83C+869T5F6/a1GHm3Dq3eIOIaTNdpEOtzHikrdL\n",
              "41f1xeo2deqL9HG9vr7ZeZeqvhDCv85Vp7q1B7dtcuxMxD7rEbB7y/4dH3rztmNoLDjf6Gs4\n",
              "p3sdTO+Gm9C7RQdCSJvtIv3U/29/tNOj73rG9HeR61/4d6q/1vP37q7d92WU+m52og5/l19U\n",
              "H+fWrepZVv1H5znLv7/T31nKn/6OVj2etLmMMt1b9u+4+jr9vV4XDy7Q66DzehbqJdRLfh/3\n",
              "XcMq9FccR5vQuUUXQkibBLOBn+uy3XXp+HiZbVx6vGn6iwddkd6u1//VrR2uA0Vo5llVs1/1\n",
              "1vyHf7zvaDWb293e+ofuLft3/Hm5ePv769Y08g0fhDD+eWoTuhBC2iSZVv99/js0S8cvvf/c\n",
              "vy+/OPVFemmXy8OtQ9uB47Vp85dGj59h349F6twydsed2VUtxr96aHmth9Cf08S9niKb0LlF\n",
              "F0JIm3TtcJ6D/+v35Ht167iuSCHS781e1ktox5l280L/LqvO5b96Jta/5QORTlXVfrkeinp5\n",
              "v/3qJbJr19uEzi0CIpFINrfDvaGujX2/w/fzGPX28RMRaXTrVofDnEjjxYbBLYd33N0n+2iG\n",
              "pfpcjNqEf7F7Pf1ENqFzCwQisWxui86su+6xzrz9pZ3/nPoKVZ0Dt22/NxOO2V27z9vqQbv8\n",
              "3bll7I7vt62nR4dw26P7Pl6XFq/3epvw/FSHyCZ0blE9OOxM/GazSPfFr4+6yY/NJP82OH2O\n",
              "RDpeD9x+h0On368z+Ptiw/XY7mixYXRAtnvL6B3fb/oajr0Vgu5uX2hO3Tvvw31GNqFziy6E\n",
              "kDYpjiNVH+dm/nm7LJR9huq7Wf6+nC7wWTUi/dy+fl8OwnxXnXMIwuU0o8/LcHaZk5z/5Lr2\n",
              "/H1fmLukPkWoOZmn+hncMnrH95t+tYeOrovZbx2rvq6nCP2dZ3XtKUK9TejcogshpE2C40iH\n",
              "dvZ9mXNcD8jW/12/t9d/Xde62q/toc7b0dfmuGzT56OjoS+9if1Pu2x2PWm1e8voHXe29KUZ\n",
              "PJvDq91z9VreVa6pA7KXW3QghLRJMXX+fL28jKKZO7y/hOraZe/1odqvywTk+6Xe2bt+rUev\n",
              "qlk0u/f7WcDr6Tij83PaW7XpvYyie8v4HXdu2J5R93U54ad3zuvfZQH/2H0ZRfcUoe4t7hBC\n",
              "2uSxBvX8UhiLaCSL5NGHiEQKTx59iEik8OTRh4hECg99SEiCIBIhCYJIhCQIIhGSIIhESIIg\n",
              "EiEJgkiEJMhWkX63Zevti8JSrDksIvmhUqwkboVIVVVVse+IVAaVYiVxy0Wqmi/D74hUCJVi\n",
              "JXGI5IZKsZK45SK1NiFSoVSKlcSlEOm/OotuToj1LBDpurjAiFQolWIlcWtEOrFrVzKVYiVx\n",
              "iOSGSrGSuOUisWpXOJViJXGI5IZKsZK45SJxZkPhVIqVxK0Q6XG2bkiScgrBUqw5LCL5oVKs\n",
              "JA6R3FApVhKHSG6oFCuJQyQ3VIqVxCGSGyrFSuIQyQ2VYiVxiOSGSrGSOERyQ6VYSRwiuaFS\n",
              "rCQOkdxQKVYSh0huqBQriUMkN1SKlcQhkhsqxUriEMkNlWIlcYjkhkqxkjhEckOlWEkcIrmh\n",
              "UqwkDpHcUCl2fUIIC3GI5IZKsasTwlKTEMkPlWLXJoTFJiGSHyrFrg0iZY6l2DKwiJQ5lmIL\n",
              "wTJHyhtLsaVgWbXLGkux5rCI5IdKsZI4RHJDpVhJHCK5oVLs2iyeISESvWWUmgK7fM0Okegt\n",
              "o9QE2BVHkRCJ3jJKRSTd0FtGqYikG3rLKJU5km7oLaNUVu10Q28Zpa7EPlRmiU+I5IdKsZN5\n",
              "uBO3aA8PkfxQKXYqD5cVlq05IJIfKsVOBZE2h94ySkUk3dBbRqnMkXRDbxmlsmqnG3rLKJWX\n",
              "UeiG3jJKRSTd0FtGqYikG3rLKBWRdENvGaUikm7oLaNURNINvWWUiki6obeMUhFJN/SWUSoi\n",
              "6YbeMkpFJN3QW0apiKQbessoFZF0Q28ZpSKSbugto1RE0g29ZZSKSLqht4xSEUk39JZRKiLp\n",
              "ht4ySkUk3dBbRqmr37NhKw6R3FAp9pKINGve5HsKh0huqBRbJyLNqo+dmMIhkhsqxf7GpUGk\n",
              "7aG3jFIRSTf0llHqGpGYI20PvWWUumaOxKrd9tBbRqmrVu1S4BDJDZViJXGI5IZKsZI4RHJD\n",
              "pVhJHCK5oVKsJA6R3FApVhKHSG6oFCuJQyQ3VIqVxCGSGyrFSuIQyQ2VYiVxiOSGSrFCZzVc\n",
              "cIjkhkqxCU5OncQhkhuq+2JTvFxiEodIbqhOi72rg0hy8dlbDqg37N2dgEhycdlbHqgttiNP\n",
              "6JuUVilE8kN1WeykSIkHJ0TyQ3VZ7MidvlXpcIjkhuqz2K4vY6nS4RDJDdVpsT1dujMkREoY\n",
              "n73lgDqLZY6UNPSWUeo8llW7lKG3jFI5aVU39JZRKiLpht4ySkUk3dBbRqmIpBt6yygVkXRD\n",
              "bxmlIpJu6C2jVETSDb1llIpIuqG3jFIRSTf0llEqIumG3jJKRSTd0FtGqYikG3rLBnV8Bioi\n",
              "qcZwb+WC1aBGXhOBSKqx21vZYBWosVfpIZJqzPZWPlhEIqSMNCLtvRnXMCJZpxouljnSfUOS\n",
              "lFMIlmJTh1W724YkKacQLMWawyKSHyrFSuIQyQ2VYiVxiOSGSrGSOERyQ6VYSRwiuaFSrCQO\n",
              "kdxQKVYSh0huqBQriUMkN1SKlcQhkhsqxUriEMkN1VCxCz5JApFUY6e3ssUKUJd8thEiqcZM\n",
              "b+WLTU9d9Gl7iKQaK72VMVZMpMcuIZJqrPRWxtjk1BCWmIRIqjHSWzljU1NDWGQSIqnGRm9l\n",
              "jUUkRLJFNVIsIj3ekCTlFIKl2C1pBGKOFN+QJOUUgqXYTWkEYtUuuiFJyikES7HmsIjkh0qx\n",
              "kjhEckOlWEkcIrmhGit25iQhRFKNrd7KEitE5RShiQ1JUk4hWIrdHE4RmtqQJOUUgqXYZ9Lz\n",
              "BpGmNiRJOYVgKfaJ9MVBpKkNSVJOIViKXZ/hWUHMkSY2JEk5hWApdn1G59exahffkCTlFIKl\n",
              "2PWZOFN1UidEUk3RvVUGNukcaSjS9A4eIqmm7N4qAruFGlleWLrkgEiqKa+3isNuoPYs6XrU\n",
              "Xo1I4w1JUk4hWIpdlIEmPY9ur6RApMGGJCmnECzFLspwVy4yDjFHGm1IknIKwVLsokSX6X77\n",
              "4xCrdsMNSVJOIViKXZYJkx7s0CXBPhNE8kMtsNhHJglinwgi+aEWWezkzp0sdnUQyQ+1zGIX\n",
              "7celx67GIZIbakHFjg666mA3BJH8UMspdnT6wvCXMtgtQSQ/1GKKfbg3t3RPD5FUU0pvFYxN\n",
              "K1J88SEJdlMQyQ+1mGIRacuGJCmnECzFPs7snh0iTW9IknIKwVLsTKKmXK9kjjSzIUnKKQRL\n",
              "sU+kFYhVu8cbkqScQrAUuybdkWj5ASVEUk2hvVUSdiu18QeRFm5IknIKwVLsODPLdIi0dEOS\n",
              "lFMIlmJHGVpy++km0MpThRBJNTn3lhHsIupgvLmPQp3frDvlDpFUk3FvWcE+IVIYRQibLojk\n",
              "h5pzsT1fxh4h0vINSVJOIViKHeXxgIRIyzckSTmFYCl2nNEMaZtHiKSbrHvLBvbZc+2adYaV\n",
              "awxbsFuCSH6oBRUbbu9ap4rdEETyQ8292C3abMAmwiGSG2rmxT47GdqITYVDJDfUvIt9fllh\n",
              "EzYZDpHcUPMuFpEQqRBq1sVuWOjegk2HQyQ31JyL3XLEaAM2XRDJDzXnYhEJkYqh5lwsIiFS\n",
              "MdSsi03tESLpJufeMoJds2qnj02GQyQ3VIqVxCGSGyrFSuIQyQ0122LT7tMtxqbFIZIbaqbF\n",
              "pl5lWIhNjUMkN9Q8i02+7r0MmxyHSG6oWRab/gDSImzyIJIfapbFIhIilUbNslgpjxBJNzn2\n",
              "ljHssjmSNjY5DpHcUDMtVsYjRNJNnr1lB3t2ZJYq4hEi6QaRRCM02iwJIqkGkSQjNf9ZEkRS\n",
              "DSJJBpEQySAVkSRxiOSGyhxJEodIbqi5rtrJBJFUg0hGqYikG3rLKBWRdENvGaUikm7oLaNU\n",
              "RNINvWWUiki6obeMUhFJN/SWUSoi6YbeMkpFJN3QW0apiKQbessoFZF0Q28ZpSKSbugto1RE\n",
              "0g29ZZSKSLqht4xSEUk39JZRKiLpht4ySkUk3dBbRqmIpBt6yyg1Z5Gqc9rvVednRCqDSrGS\n",
              "uOUiVe2XavAzIpVBpVhJHCK5oVKsJG65SK091f0iIpVEpVhJ3BMitVOkm0j/1Vl0c0KsZ5FI\n",
              "XYEYkQqj6mF77wppvdgGt16k9gIiFUZVw/bfX9V4sS1ulUhV9xIiFUbVwg7e8dt2sTfcGpGq\n",
              "+1dEKo+qhB1+KqzpYu+4FSJ1lr37iw2IVAQVkSRxy0Wqhmc0cGZDWVRdkZSpo+Qr0ky2bkiS\n",
              "cgrB2i528Fkutou94RDJDVVz1W4H6iCIpBpEMkpFJN3QW0apiKQbessoFZF0Q29tzeyHxFoq\n",
              "9gEOkdxQRbDzH7dsqNhHOERyQ5XADg8a6VCXBJFUg0jbgkgtDpHcUBFJEodIbqjMkSRxiOSG\n",
              "yqqdJA6R3FApVhKHSG6oFCuJQyQ3VIqVxCGSGyrFSuIQyQ2VYiVxiOSGSrGSOERyQ5XEPlgE\n",
              "t1dsFIdIbqiC2EeHZc0VG8chkhtqcuxNnqkThS7XGSl2DodIbqipsXd5hu/A1fsDG8XO4hDJ\n",
              "DTUxtiNPiJrUXGei2HkcIrmhyokUH5IQCZFMUgVFis6SEAmRTFLl5kjDH3rX2Sh2FodIbqhy\n",
              "q3ajH7rXGSl2DodIbqgUK4lDJDdUipXEIZIbKsVK4hDJDZViJXGI5IZKsZI4RHJD3YCdfYcT\n",
              "EeqmIJJqEGlJ5t9zS4K6LYikGkRakAXvAilA3RhEUg0iLcjE+T/C1I1BJNUg0oJERFoxRBVW\n",
              "7LM4RHJDTThHWrOzV1qxT+IQyQ014aodIo1wiOSGmhCLSCMcIrmhpsQyRxriEMkNNSmWVbsB\n",
              "DpHcUClWEodIbqgUK4lDJDdUipXEIZIbKsVK4hDJDZViJXGI5IZKsZI4RHJDpVhJHCK5oVKs\n",
              "JA6R3FApVhKHSG6oq7BbXlz+PDVhEEk1iDTM1aBNLy5/gpo+iKQaRBrkatC2F5evpwoEkVSD\n",
              "SP2EfpSoEkEk1SBSPyG9SfkWmxSHSG6oK0TqfHLYZpvyLTYpDpHcUFfMkQZGiVMFgkiqQaRh\n",
              "Wm+S7eHlXGxCHCK5oa7DItI6HCK5oS7F9vbtEGkhDpHcUBdie7Mk5khLcYjkhrp4jnQ36ZdV\n",
              "u6U4RHJDXSuSJjV9EEk1iDQMIj2HQyQ31JVzJF1q8iCSahBpnLQeZV5sMhwiuaFSrCQOkdxQ\n",
              "KVYSh0huqBQriUMkN1SKlcQhkhsqxUriEMkNlWIlcYjkhkqxkjhEckOlWEkcIrmhUqwkDpHc\n",
              "UClWEodIbqgUK4lDJDdUipXEIZIbah+b+NTUhVS9IJJq3IqU+sUSy6iKQSTVeBUp+cv3FlE1\n",
              "g0iqQSRNqmYQSTWIpEnVDCKpxqtIzJFS4xDJDZVVO0kcIrmhUqwkDpHcUClWEodIbqgUK4lD\n",
              "JDdUipXETYv0/hrC6fCNSFaoFCuJmxLp76VeHz2F8IVIRqgUK4mbEukY3s4WnT7CAZGMUClW\n",
              "Ejcl0lmi2z9EMkE9Y+8fDKtJ3SWIpBpfIqX6EL51VDXSnthJkZpdu7dwRCQj1P6nWaqZ5OOZ\n",
              "nRTpr7o+3NUPIhmhIpIkbkqk0+nfSwgvb38LPUKk7KmIJImbFmlltm5IknIKwTJHModFJD9U\n",
              "Vu0kcZMivVen01eo/iGSFSrFSuKmRHoP4fRTLzgsNWnrhiQppxAsxZrDTor0Er7O/96/Q4VI\n",
              "RqgUK4mbEuk8IH2GFw7IGqJSrCRuSqQq/BzDdz1LQiQjVPVlhmt8PLOTIv2rD8bWA9LbQpFI\n",
              "5rktfO+9IcYzfHzfQvV5HpgWe7TV6CT/LxSClaeOR549DiFd4uOZnRZpbbZuSJJyCsGKUyO+\n",
              "IJIsDpGsUDuGxIRBJFncpEh/b5xrVxK1q0hUmJ08cvLMTor0w9nfRVF7kkyKxKqdGG5KpGM4\n",
              "nBX6OfB6pDKofXemBqT03Pn4eGYnRWpXSTkgWwZ1MAhNTZHSg2fj45lFJCvUvicjaxBJGDcl\n",
              "Ert2pVFHHvW0QSRh3JRILDaUTI1owxxJFjclEsvfJVMnDiRJY6Px8cxOi7Q2WzckSTmFYFVO\n",
              "ERp7Y7XYHLCIZJQaG3/MFpsBNi5S6AaRjFApVhKHSHaosYOwCtiZ+Hhm4yI9k60bkqScQrAy\n",
              "1HZe1D9TSBw7Fx/PLCKZobYrdTd9Rkt3horNDjsl0vvlFeZfx8WfM4ZIe1N7++PhF5F0cXGR\n",
              "DiFcFKqWv9J864YkKacQLCKZw8ZF+ri8zLwekqrwgUglUEMYicQcSRMXFekQPptLn3xiXxHU\n",
              "jkAdfVi108NFReqsebP8XQJ16FH8bCAjxWaJnReJ97UrgDrcn0OkPEQ6hPac7x9eRlECdSxS\n",
              "7yUVUthF8fHMxkV6v+lzvM2WECln6n2/bmhS57KVYnPExkU6VeH16/zt67V++29EKoDanR91\n",
              "TepeNlNshtgJkdqX9S1/XR8i7U+NrIAjkhYuLtLp9PF6fvhflx5EQqQcqIi0H3ZSpNXZuiFJ\n",
              "yikEqyPS6KisqWIzwyKSJeqUScLYx/HxzM6KxAHZkqhTS3fC2Ifx8cwikklqQKTcRFqcrRuS\n",
              "pJxCsIhkDotIRVKHikR+P/ao1GKLwCJSidSIJLG/GP5JmcWWgZ0ViTlSftTocDP+m9TYJ+Pj\n",
              "mUWkAqlLRBLAPhkfzywiFUhFpPywiFQi9TmPCi22DCwiFUl9yqNSiy0Ci0h+qBQriYuK1Dtf\n",
              "C5GMUClWEodIbqgUK4mLivRMtm5IknIKwVKsOSwilUtdveJQcrG5YydE+j6EcFz8KnNE2oO6\n",
              "fg284GKzx8ZF+r7Ojpa/gz4iqVOfOCpbbrH5Y+MiHev3zj8ufks7RNqBikhZYeMiXZbq/ha/\n",
              "ySoiKVFD/93qECkf7AORlh+LRSQd6t2crkfLbSqq2MKwiFQOtedO/7Ikdmt8PLOIVA41DNO5\n",
              "UhC7NT6eWUQqh4pIGWOnROIUoQypEY8QKRMsIpVEHXvEHCkTbFykZ7J1Q5KUUwj2CepwvW78\n",
              "GxFsgvh4ZhGpDOpz+3KbsSni45mdE+nrjY++zIA6mhXpYJPExzP7UKTPYxX4DNkcqL1h6FmP\n",
              "Sim2SOy0SJ/H+qk7Lv3kS0SSpG7Yn9uCTRIfz+yESFeLQvhbqhEiyVJTeFRMsSVi4yI1Y9Gq\n",
              "I7JbNyRJOYVg11FD8zEtythU8fHMTon0+ndaeWrD1g1JUk4h2FXU0ZEjHWyy+HhmGZFyp0aO\n",
              "wWpg08XHMxsXiTlSFtTQfP4eIuWPnRDp5tLxC5H2ol7dQaQisNMinTiOtC+1lYc5UgnYhyKd\n",
              "OLNhR+rNHlbtCsDOibQ8WzckSTmFYGvqrBm9ESkZVj8+ntk5kRiRhKizeoR+EmF3iI9n9qFI\n",
              "zJHEqGM9BrKEYX5/p/94MXaP+Hhmp0XiXDtJ6siO2I+TJj05RiGSIC4uEseRhKlDOSZ+jov0\n",
              "7N4eIgnioiI1YxFnNshRZ9zoCoRIBWCnROJcO2lqZGctKtLveE8OkfLDMiJlQZ3Z0xtawxwp\n",
              "O2xcJOZIutTRPKizVxe9g6c8yqRYm9gJkU6ca6dIHS8oxBcZEmOV4uOZnRbpxHEkLepImhBE\n",
              "TMqiWKPYhyKdOLNBhTpYWECkArFzIi3P1g1JUk4h2Kk5UuylE4hUBBaRsqCGgTo9reSwKvHx\n",
              "zCJSHtSISc3VoliN+HhmESkLahhGB6sSH88sIuVAHcyRpEzKo1ibWETKgdpftRMzKY9ibWIR\n",
              "KQdqVx5Bk/Io1iYWkbKgdt1BpBKxiLQ7dbTEgEgFYhFpb2pkta63Ai6E1YuPZxaRdqaOFr7b\n",
              "84QERqXdizWMRaSdqWORNn/C5RKsYnw8s4i0RzqGRETqLt4lxSKSIA6R9DNe6kak0rGIpJ67\n",
              "LhMebf3M5ckgkiAOkZRz1+WhR6lPWK2DSII4RNJNeCRSbBxK6BMiCeIQSTcPB6T4OxknMwmR\n",
              "BHGIpJuHHqV7L8hoEEkQh0jKacWIzo0QqVQsIqnn7MXpd+JjWxCpVCwi7UaN7s6NtGGOVAYW\n",
              "kbRTe3G6XfodvmxipE06jxBJEodIurk4045ItysSDjsPgkiCOERSzWBd4ReRjGARSTWRlTo9\n",
              "jxBJEodIinmw5K2BRyRB3AqRqnNi3xHpcYaL29ERSWE7EEkSt1ykqvky/I5Ij3P35MGAhEiF\n",
              "YxFJOqPJUN8jRLKBXSFSaxMirUorSsQjsRceTQSRBHEpRPqvzqKbO8xQnu4Vt7/YdxNJyix6\n",
              "MqsTI9Kq3Mae2ICkMw7dw4gkiEMkydyNycAjRJLErRKp6n5BpNmMpkKIZBW7SqSqZxMizWa8\n",
              "qMCunVHsGpGq/rCESLOJLM8hkk3sCpGqqjmVgTMbFqenDCIZxq4ZkR5n64YkKSc77EORhNmj\n",
              "IJIgDpFk82DfTho9CiIJ4hBJOI0zYXAsSZwbCSIJ4hBJOmHoECIZxCKSeMZrDDt5hEiSOEQS\n",
              "Tk+f217eLkEkQRwiCSc2DpktNh8qIulGVSRFajSIJIhDJOl0duoUqbEgkiAOkeRyPxCrSZ0O\n",
              "IgniEEks4+W59meDxeZGRSTdiGDDxLua3H62VGymVETSTRps1JeRSPcrii62DCoi6SYJti9M\n",
              "55gRIu1GRSTdpMAOjLn9GN2zQySbWETangmRmCPtSUUk3QiINDi5bvCXyahPBJEEcYi0PYND\n",
              "rtMiJaWuDyIJ4hApQW57cs0PMx6VXWwZVETSTTJsf4kBkfamIpJuNEW6/1R6sQVQEUk30iIN\n",
              "/yIxdV0QSRCHSIlyE6e7+D36Pat2RrGIlCxdkyZ/jUhGsYiULI9WF34RyTgWkZLl4TrdL3Mk\n",
              "21hESpY5kVi1s4xFpHSZE0mGuiKIJIhDpHRZ6pGJYjOnIpJu0mIXemSj2LypiKQb4RFpwiwL\n",
              "xWZORSTdPIOdGncensywmZogiCSIQ6S1mZwJjUSaXH0op9hiqYikm/XY6bU5RMqIiki6SSJS\n",
              "++Oj0+s2UpMEkQRxiLQyj2ZCkbUG5kg+ikWk1Rma9Og4LKt2XopFpNVZI1I6aoogkiAOkdYG\n",
              "kUqgIpJunjyOhEi5UxFJN09hu+Z0z/lerFNJxRZKRSTdbBCp995bt8ty1O1BJEEcIq1OR57u\n",
              "bt2KXbyCii2Viki6eX6xAZGypiKSbp4+INv1CJHyoyKSblZjux4N3GGOlBEVkXSzFhseDUKs\n",
              "2uVDRSTdbBNpxSC0iZooiCSIQ6RVCc8OQpuoiYJIgjhEWpeHKwrMkbKhIpJuVmIHGg3EYdUu\n",
              "Hyoi6WYddmBK7Efe1y4PKiLpZhV2PD8ajk+IlAsVkXSzBhtZaECkXKmIpJsV2MHKd+S9vpkj\n",
              "5UNFJN08IVL8x/a61NSUQSRBHCLNJ4xOUF3w2RObqemDSII4RJpNK8zDCVJyqkAQSRCHSHO5\n",
              "K/PcysJzVIkgkiAOkeYyocwGjzIu1gwVkXTzvEhPnma3lCoRRBLEIdJstow9z1MFgkiCOESa\n",
              "T2qPsi7WCBWRdLMYm1Sm3Is1QEUk3SzFpt29y7xYC1RE0s1C7KbF7qepqYNIgjhEWhJEKo2K\n",
              "SLpZhr2dr5pIpayLtUFFJN0sXbVLa1LOxRqhIpJuVouUxKScizVCRSTdIJJRKiLpZu0cCZEK\n",
              "oSKSbmaxvdciMUcqhopIupnD3uVh1a4oKiLpZgbbHYY4jlQSFZF0E8fenEl8IPYxVTyIJIhD\n",
              "pHGG+3OIVB4VkXQTww7259J7lFOxVqmIpJs5kdK/FmmKqhBEEsQh0ihC+3MzVIUgkiAOkcaR\n",
              "9iirYo1SEUk3p6gywh456a1dqYikm+jgw4hUPhWRVBOdDjFHMkBFJNUgklUqIqkGkaxSEUk1\n",
              "cWfETfLRW7tSEUk1fWXqS80/RCqcikiqGZ7E0Isc1kdv7UpFJN3s4pGT3tqViki66RyQ7TrE\n",
              "caTSqYikmws2DF5OLntaw6+X3tqViki6qbGtO2oeOemtXamIpJvT8KMtNTxy0lu7UhFJNyeN\n",
              "468x6h5BJEEcIiGSRSoi6aY7R9Kl7hBEEsQhkvzLj+JU/SCSIM69SOoW/XrprV2piKSbk/5+\n",
              "3a+X3tqViki62WGl4ddLb+1KRSTdIJJRKiJp5KJO+2UHk3z01q5URFJI56S60y4m+eitXamI\n",
              "JJ/uayVOYQ+TfPTWrtRyRSonIWrS3ltFjMTniKTxwvJxfPwnvSu13BFp64YkKWdRBiJxipBF\n",
              "KiKJJwxF4hQhg1REEs9YJPX46K1dqYgknvEUSQ3dxkdv7UpFJKF0duLGi3bC7FF89NauVESS\n",
              "SWeBLqITpwiZoyKSSMbW7DpR8tFbu1IRSSQja/ZdcfDRW7tSEUkkkQVv5kimqYgkk4kBiVfI\n",
              "WqUikoWvX2EAAAlfSURBVFCiMyR6yywVkcTSmw61F+kto1RESpbhPlt/XaG5RG8ZpSJSqgys\n",
              "uZ/m3fOL3jJKRaREic2IIibRW0apiJQoN2VCLGLYZfHRW7tSESlRRqMQIlGsJM6qSMN5ESJR\n",
              "rCjOrEiRU1OZI/mhIlLazHhEb1mlIlLidOQZa0RvmaUiUuqE3skMiOSEikhSiXpEb1mlIpJU\n",
              "oh7RW1apiCQVRKJYSZwbkeLvA0lvGaUiklwiHtFbVqmIpBt6yygVkXRDbxmlIpJu6C2jVETS\n",
              "Db1llIpIuqG3jFIRSTf0llEqIiVIWP4hE/SWUSoibU/s5RIK2BXx0Vu7UhFpc+IvPBLHromP\n",
              "3tqVikibg0h5YX0Ui0h7xEdv7UpFpO1hjpQV1kexRkTqW8OqXU5YH8XaEGnp+JMY+3R89Nau\n",
              "VER6Isv35JJin4+P3tqVikhPBJFyxvooFpH2iI/e2pWKSM+EOVLGWB/F2hDp+Q+CpbeMUhFJ\n",
              "N/SWUSoi6YbeMkpFJN3QW0apiKQbessoFZF0Q28ZpSKSbugto1RE0g29ZZSKSLqht4xSEUk3\n",
              "9JZRKiLpht4ySkUk3dBbRqmIpBt6yygVkXRDbxmlIpJu6C2jVETSDb1llIpIuqG3jFIRSTf0\n",
              "llEqIumG3jJKRSTd0FtGqYikG3rLKBWRdENvGaUikm7oLaNURNINvWWUiki6obeMUhFJN/SW\n",
              "USoi9fL0O6huw0rHR2/tSkWkbja8O/4WrHh89NauVETqZM1nWCbEysdHb+1KRaRO1nyqckKs\n",
              "fHz01q5UROoEkSxgfRSbtUiDfTsJoegto1RE6mXgUXqT6C2jVEQapudRcpPoLaNURBrnqg8i\n",
              "FYr1UWwBIjX+IFKhWB/F5izSYCRijlQm1kexGYs0GolYtSsS66PYfEVqBZI9kkRvGaUiUhvZ\n",
              "XbpJrEp89NauVES6pHdOA2c2FI31UWyeIg3PDWLXrmCsj2KzFCnikZRJ9JZRKiL9jg4ZSS43\n",
              "0FtGqYj0OxqREKlorI9icxQphL5JiFQ01kexGYoUQtSkjfc/i9WMj97alepbpO4B2OHO3dZK\n",
              "H2DV46O3dqW6FanjTlwkdu0KxfooNheRwjBdewQnSfSWUapTkSIedQ7DIlLJWB/FZijSbxgu\n",
              "MSBSyVgfxeYnUvMjcyQrWB/FZiLS73gs6g1DrNqVi/VRbC4idVUZTZYEQ28ZpboV6cGZDZKh\n",
              "t4xSEan32tiNd7oKqxgfvbUrFZF+hV8TO43Vi4/e2pWKSHXUPKK3rFJ9inQWx8fDvSuVYiVx\n",
              "OYikuCs3DL1llJq3SNX1a53mewqRlBbooqG3jFKzFqnxpupYdTfp+W3QXKUbht4ySs1ZpOok\n",
              "KtIuwxK9ZZSas0gDd5KJtKdJ9JZRagkitVOk2zX/1Vlw88nUq3aNSFvuhpD9s25EqlKOSBej\n",
              "GZGMYn0U+4RI7aXEIu2zCE5vGaU6FolVO5tYH8U+IZLQrl2ScgrBUqw57JMi9RcbFov0YMzx\n",
              "8XDvSqVYSdx6kW5nNKw+syE6C2qu8vFw70qlWEncKpEeZZ4VXZdrr/LxcO9KpVhJ3M4i3a7z\n",
              "8XDvSqVYSRwiuaFSrCROUaTYHAmRzGN9FKsqUmzVjjmSdayPYnVFioVVO+NYH8XuL1K7IUnK\n",
              "KQRLseawiOSHSrGSOERyQ6VYSRwiuaFSrCQOkdxQKVYSh0huqBQriUMkN1SKlcQhkhsqxUri\n",
              "EMkNlWIlcYjkhkqxkjhEckOlWEkcIrmhUqwkDpHcUClWEodIbqgUK4lDJDdUipXEIZIbKsVK\n",
              "4hDJDZViJXGI5IZKsZI4RHJDpVhJnKJID98k38fDvSuVYiVxeiI9/tgWHw/3rlSKlcSpiTTz\n",
              "QWI+Hu5dqRQriUMkN1SKlcQhkhsqxUri1ERijrQ3lWIlcXoisWq3M5ViJXGKIj3ekCTlFIKl\n",
              "WHNYRPJDpVhJHCK5oVKsJA6R3FApVhKHSG6oFCuJQyQ3VIqVxCGSGyrFSuIQyQ2VYiVxiOSG\n",
              "SrGSOERyQ6VYSRwiuaFSrCQOkdxQKVYSh0huqBQriUMkN1SKlcQhkhsqxUriEMkNlWIlcYjk\n",
              "hkqxkjhEckOlWEkcIrmhUqwkDpHcUClWEodIbqgUK4lDJDdUipXEIZIbKsVK4hDJDZViJXGI\n",
              "5IZKsZI4RHJDpVhJHCK5oVKsJA6R3FApVhKHSG6oFCuJQyQ3VIqVxCUTaWP+2xevG4o1HETS\n",
              "C8UaDiLphWINB5H0QrGGs7NIhNgIIhGSIIhESIIgEiEJgkiEJAgiEZIgO4lUXb/Wab7vsx0K\n",
              "aYsbfjeZbpHmn9le9hGpeXSbx7jqXDaXtrjhd5O5Fefhme1nF5GqEyKZDCJpp/cI23+4vYh0\n",
              "SeXpmb1lV5HaHenbNVbjTiQ3z+wtu49IHnqr21MUazO7rto1l8w/3K56q+pcMF/sPYgkH1fD\n",
              "r6tnthN27cTTWaGkWLPZWyT7U9LBSrCbYu0/s73sfmZD97vFVMOD/BRrMpxrR0iCIBIhCYJI\n",
              "hCQIIhGSIIhESIIgEiEJgkiEJAgiEZIgiERIgiBShgkhDC+Ga47fl8vDG3wcQji8620gGQWR\n",
              "8svn2ZjPwcXQ5jsi0uH6q5cf5Q0l9yBSfjmG13AcXGzkeQuHsUiHcPg6nb4O9e/ITkGk/BLC\n",
              "X+vK7eL9ipFIn61Ah3rwOv/yNRwuY9Pf8bwv+He50c9rqN50tt5pECm7fJ7HoON1h+5+8YFI\n",
              "r+GrveFr/cuzPqGq/aku+3uXG10uYpJgECm71OZ8Xnfo7hev8pzHmONIpO7KRP3v8Hcem87S\n",
              "/Ku/vIX35rr34OQFDfsEkbLLRYzODl3zpcnPrEjfp9NPPRC9XO/iMkr9nEY3I0nDg5tbPhtj\n",
              "PnsXrxeq2PL3UKT7pWt6VhKh8ODmlmN7yKh3sWvB1Bzp6zr6tH+CSJrhwc0tVagXCv7qGU3n\n",
              "4gOROqt2H81u3E991Uvo3wCRJMODm1m+mkNIx/DVufhIpPtxpOsK3eH0dwj/6nWGt9Pp437g\n",
              "CZEkw4ObWd6aHbXP8Na5OBCp3We7Xv3z0jmz4SxSPZk6X/qr+qdCIJJkeHAzy+1ddzpvwHO+\n",
              "8Eik0+n9fq7dedfuEI6XA7I/5zlWPVYhkkJ4cI0FXfYJD7uxINI+4WE3FkTaJzzsxoJI+4SH\n",
              "nZAEQSRCEgSRCEkQRCIkQRCJkARBJEISBJEISRBEIiRB/gcFGKPmbXgRnwAAAABJRU5ErkJg\n",
              "gg=="
            ]
          },
          "metadata": {}
        }
      ],
      "execution_count": 20,
      "metadata": {
        "collapsed": true,
        "jupyter": {
          "source_hidden": false,
          "outputs_hidden": false
        },
        "nteract": {
          "transient": {
            "deleting": false
          }
        },
        "execution": {
          "iopub.status.busy": "2020-06-09T02:42:24.181Z",
          "iopub.execute_input": "2020-06-09T02:42:24.188Z",
          "shell.execute_reply": "2020-06-09T02:42:24.416Z",
          "iopub.status.idle": "2020-06-09T02:42:24.409Z"
        }
      }
    }
  ],
  "metadata": {
    "kernel_info": {
      "name": "python3"
    },
    "language_info": {
      "name": "R",
      "codemirror_mode": "r",
      "pygments_lexer": "r",
      "mimetype": "text/x-r-source",
      "file_extension": ".r",
      "version": "3.5.2"
    },
    "kernelspec": {
      "argv": [
        "C:\\Users\\Tin Hang\\Anaconda3\\envs\\py35\\python.exe",
        "-m",
        "ipykernel_launcher",
        "-f",
        "{connection_file}"
      ],
      "display_name": "Python 3",
      "language": "python",
      "name": "python3"
    },
    "nteract": {
      "version": "0.23.3"
    }
  },
  "nbformat": 4,
  "nbformat_minor": 0
}