{ "nbformat": 4, "nbformat_minor": 0, "metadata": { "colab": { "provenance": [] }, "kernelspec": { "name": "ir", "display_name": "R" }, "language_info": { "name": "R" } }, "cells": [ { "cell_type": "code", "execution_count": 1, "metadata": { "id": "zuCvGryZ2__O" }, "outputs": [], "source": [ "data <- rnorm(500)\n", "data[1:10] <- c(46,9,15,-90,\n", " 42,50,-82,74,61,-32)" ] }, { "cell_type": "code", "source": [ "boxplot(data)" ], "metadata": { "colab": { "base_uri": "https://localhost:8080/", "height": 437 }, "id": "C4uuvAh93Pex", "outputId": "8de70176-2d0a-4fd6-c578-be58184d153e" }, "execution_count": 2, "outputs": [ { "output_type": "display_data", "data": { "text/plain": [ "plot without title" ], "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAACuFBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERESEhITExMUFBQVFRUW\nFhYXFxcYGBgZGRkaGhobGxscHBwdHR0eHh4fHx8gICAhISEiIiIkJCQlJSUmJiYnJycoKCgp\nKSkqKiorKyssLCwtLS0uLi4vLy8wMDAxMTEyMjIzMzM0NDQ1NTU2NjY3Nzc4ODg5OTk6Ojo7\nOzs9PT0+Pj4/Pz9AQEBBQUFCQkJDQ0NFRUVGRkZHR0dISEhJSUlKSkpLS0tMTExNTU1PT09Q\nUFBRUVFSUlJTU1NUVFRVVVVWVlZXV1dZWVlaWlpbW1tcXFxdXV1eXl5fX19gYGBhYWFiYmJj\nY2NkZGRmZmZnZ2doaGhpaWlqampra2tsbGxubm5vb29ycnJzc3N0dHR1dXV3d3d4eHh5eXl6\nenp8fHx+fn5/f3+AgICBgYGCgoKDg4OFhYWGhoaHh4eIiIiJiYmKioqLi4uNjY2Ojo6Pj4+S\nkpKTk5OVlZWWlpaXl5eYmJiZmZmampqbm5ucnJydnZ2enp6fn5+goKCioqKjo6OlpaWmpqan\np6eoqKipqamqqqqrq6usrKytra2urq6wsLCysrKzs7O0tLS1tbW2tra3t7e4uLi5ubm6urq7\nu7u8vLy9vb2+vr7AwMDBwcHCwsLDw8PExMTFxcXGxsbHx8fIyMjJycnKysrLy8vMzMzNzc3O\nzs7Pz8/Q0NDR0dHS0tLU1NTV1dXW1tbX19fY2NjZ2dna2trb29vc3Nzd3d3e3t7f39/g4ODh\n4eHi4uLj4+Pk5OTl5eXm5ubn5+fp6enq6urr6+vs7Ozt7e3u7u7v7+/w8PDx8fHy8vLz8/P0\n9PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7///9X5bx0AAAACXBIWXMAABJ0AAAS\ndAHeZh94AAAUeUlEQVR4nO3d/ZvVdZ3H8S/iDKCwKNuNSgptFuZdC7tmq+ZN6tqaZYviHWFW\n3pCJZRoWLCqmqd1Z7VYqpeUmi91sunJT2I0SmkUK2IqamA4wzL+xzhwv2cvd63A5veZ8ON/v\n4/HDfD6X5+P4vs7ME8+c+XJONQD8xarSA0AdCAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKE\nBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGA\nkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQI\nEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQE\nAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQ\nIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQI6EBIq1dCV1n92r/LRz6kFRV0mRWv+dt8\n5EP6adU34v8NCOqrfvqa/x0hwasICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFB\ngJAgQEgQICQIEFKTPDjvlFPmPVh6iloSUoMsGH3MZZcdM3pB6TnqSEjNcVvvksFlSe/tpSep\nISE1x99+orV+YnrZOWpJSI3xXHV/a3PfqM1lJ6kjITXG+mpNa/Nwtb7sJHUkpMbYMvZ7rc1d\nY7eUnaSOhNQcp5+4fXDpf8/ppSepISE1x8MTZ20YGNgwa+Ka0pPUkJAaZNUh1dSp1SGrSs9R\nR0Jqkv5Vt966sr/0FLUkJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFB\ngJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAk\nCBASBAipUTYuW7ax9Az1JKQGeeykqre3Ovmx0nPUkZCa4/H9jl++devy4yc/XnqSGhJSc5z3\nzqF7te+I2aUnqSEhNcbW8be3NrdP2FZ2kjoSUmNsqB5qbR6qNpSdpI6E1BjPVCtbmxXVs2Un\nqSMhNce0+a31M9OKjlFPQmqOm8ffN7jcN/6W0pPUkJCaY/uFPWddf/1ZPRduLz1JDQmpSe6e\nddhhs+4uPUUtCQkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBAS\nBAgJAoQEAUKCACFBgJAgQEgQ0OmQtj+6dMmSZet2ckpIdJnOhrTp0jdUQw6Y/+d254REl+lo\nSOvfXB04+8pFi644c7/q8E1tDgqJLtPRkM7v+fbLu203jJrb5qCQ6DIdDWmfOTv2Z+zf5qCQ\n6DIdDannszv2V/W2OSgkukxHQ5oyc8f+fVPbHBTSyFh6zvTp5ywtPUUtdTSkuaOuebG12/zp\nal6bg0IaCdsv6Tnj2mvP6LnE27rkdTSkp6dXE06YffFF5x27R3X0c20OCmkkfGnPnwwuP9nz\nS6UnqaHO/h6p77p3jB78NVLPkbe0fWNtIY2Eg65qrVcdVHaOWur4JUIv/GbVqrX/XyZ9t978\nikuFlPdstaK1We7NmPNKXGvXt/ze3/7ff7ruoL95xeurdg/8GJYN1cOtzUPVhrKT1FFHQ7r6\n3sGPN+390oO7GT9vd/AmIeVtHb+ktbljfNvH1QxHR0MaeqburmrM+z9yVDXxkTYHhTQSzn3X\nlsFly5Hnlp6khjof0oETf/3SxztGfajNQSGNhHX7vudn27b97D37/qH0JDXU8ZCerD41tD9t\ncpuDQhoRj55QjR1bnfBo6TnqqOMhrau+PrS/oqfNQSGNkCd+8IMnSs9QTx0PadvEBUP7OZPa\nHBQSXaazIZ25Yu0fP/mW51/aPrTnqW0OCoku09mQWm4fGPjGnrstb3NQSHSZjob01cVXzj3v\ntGOXDQzcMPnOdgeFNDLunnXYYbPuLj1FLRV6FaHn+tveLKSRsP3CnrOuv/6sngtd/Z23a74c\nl5BGws3j7xtc7ht/S+lJakhIzTFtfmv9zLSiY9STkBrjmWpla7PC1d95QmqMDdVDrY2rv0eA\nkBpj64Q7WpvbJ7j6O05IzXHeEUN/XbLviNmlJ6khITXH4/sdv2Lr1uXHT3689CQ1JKQGeeyk\nqre3Ovmx0nPUkZAaZeOyZRtLz1BPQoIAIUGAkCBASE1y58yDDprZ9rp7hklIzbH9gt5zb7zx\n3N4LXP2dJ6Tm+MKEBwaXBybcVHiQOhJSc7z16tZ69dvKzlFLQmqMV67+Xlk9U3aSOhJSY7j6\neyQJqTG2TbittbnN1d95QmqOD/390Pslvvh3c3Z2ktdMSM3xxJvefX9f333vftP60pPUkJAa\n5PfvHbX77qP+6fel56gjITXKUz/60VOlZ6gnIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQ\nIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQ\nEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQB\nQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAg\nQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECCkJum7\n59pr7+krPUUtCalBfrj/uOnTxx3ww9Jz1JGQmmP1Hhf/aWDgTxfvsbr0JDUkpOZ47/tb62nv\nLTtHLQmpMfp6ftDa/HuvH5PihNQYT1RrWps11RNlJ6kjITXG86P+s7X5yajny05SR0JqjiMv\nbq0XHVl2jloSUnPcvfuXBpcv7n536UlqSEgNctOYg8+fc/CYm0vPUUdCapLfLTrnnEW/Kz1F\nLQkJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQmqSF+5csODOF0pPUUtCapCl+45/5zvH\n7/cfpeeoIyE1x6qxH988MLD542N/VnqSGhJSc5z8wdb6wZPLzlFLQmqMF3vuaW3u6fHiJ3FC\nagwvfjKShNQYz+/249bmx7v9uewkdSSk5jjqo631o0eVnaOWhNQc9+x+4/aBge037r609CQ1\nJKQG+crYt5599lvHfaX0HHUkpCZ5fPGHP7z48dJT1JKQIEBIECAkCBASBAgJAoQEAUKCACFB\ngJAgQEgQIKQm+f6Zhx565vdLT1FLQmqO7R/rPfvznz+r92PbS09SQ0JqjpvH3z+43D/ee1/m\nCak53ja/tc6fVnSMehJSYzxTrWxtVlTPlp2kjoTUXb48Y9gOqw6eMWPKlBkzDq4OG/5n+XLp\ne2AXJaTusnLhsH1uzNkLF86YsXDh2WM+N/zPsrL0PbCLElJzzD6ib2D27IG+I2aXnqSGhNQc\nj08+bvm55z5w3GQva5cnpAZ57ORqt92qf/xd6TnqSEiN8uRJJz1ZeoZ66nRI2x9dumTJsnU7\nOSWkkbLSkwUjo7Mhbbr0DdWQA+a3fdXc+oa05uaGW1P6KzBCOhrS+jdXB86+ctGiK87crzp8\nU5uD9Q1pzrh9Gm3cnNJfgRHS0ZDO7/n2y7ttN4ya2+ZgfUOaXTVcXZ9672hI+/yvP47O2P9V\nNz598QWvOFpIdSWkHYYdUs9nd+yv6n3Vjf999j+/YoaQ6kpIOww7pCkzd+zfN7XNwRo/tNv7\n0EbbW0g7DDukuaOuebG12/zpal6bg/UN6QvDv1w0Yt99Cw/whdJfgRHS0ZCenl5NOGH2xRed\nd+we1dHtUqlvSKXNruv/EUrr7O+R+q57x+jBB8o9R96yrd05IY2QbR/4QNs7nuHq+CVCL/xm\n1aq1O3tXbSGNiKfOH1dV485/qvQcdeRau+Z4atqhS2bOXHLoNCXlCam7XL338I0ZvdfeY8bs\nvdfoMX/BJ7m69D2wixJSd1m/dNjumXD50qXf+tbSpZdPuGf4n2V96XtgFyWkxthY/bq1+VW1\nsewkdSSkxthUrW5tfl61u2CYYRFSc0y9rrVe2+6iEoZHSM3xL68b+stAa163qPQkNSSk5thy\n2sR5d9wx769O21p6khoSUoP0f/HoSZOO/mJ/6TnqSEgQICQIEBIECAkChAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIE\nCAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKC\nACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBI\nECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQI\nCQKEBAFCggAhQYCQIEBIECAkCBASBAipUfofeaS/9Az1JKQG2XTBHlW1xwVPl56jjoTUHJve\nfvBt69bddvDbN5WepIaE1ByXTHt2cHl22iWFB6kjITVG/6SvtTZf+2s/J8UJqTE2Vr9qbX5V\nbSw7SR0JqTGeqla3NqsrPyTFCak5pixurYunlJ2jloTUHAtfv3ZwWfv6haUnqSEhNceWU/f6\n1He+88m9Tt1SepIaElKD9N901MSJ/3CT5+xGgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIE\nCAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCOh0SNsfXbpkybJ1\nOzklJLpMZ0PadOkbqiEHzP9zu3NCost0NKT1b64OnH3lokVXnLlfdfimNgeFRJfpaEjn93z7\n5d22G0bNbXNQSHSZjoa0z5wd+zP2b3NQSHSZjobU89kd+6t62xwUEl2moyFNmblj/76pbQ4K\niS7T0ZDmjrrmxdZu86ereW0OCoku09GQnp5eTThh9sUXnXfsHtXR7VIREl2ms79H6rvuHaMH\nf43Uc+Qt29qdExJdpuOXCL3wm1Wr1vbt5JCQ6DIlrrXrW37vb9ufEBJdpqMhXX3v4Meb9n7p\nwd2Mn7c7KCS6TEdDGnqm7q5qzPs/clQ18ZE2B4VEl+l8SAdO/PVLH+8Y9aFX3fjEu2a8YoqQ\n6C4dD+nJ6lND+9Mmv+rGFxYvfMUF1c6ejoBdSsdDWld9fWh/RU+bgz8VEt2l4yFtm7hgaD9n\nUpuDQqLLdDakM1es/eMn3/L8S9uH9jy1zUEh0WU6G1LL7QMD39hzt+VtDgqJLtPRkL66+Mq5\n55127LKBgRsm39nuoJDoMoVeRei5/rY3C4kus2u+HJeQ6DIlQrrmqJ2dEBJdpkRIH9npJxAS\nXUZIECAkCBASBJQI6ek/7OyEkOgynv6GACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIE\nCAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKC\nACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBI\nECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQI\nCQKEBAFCggAhQYCQIEBIECCkRvnlN7/5y9Iz1JOQGuQXM6o3vrGa8YvSc9SRkJrjkUkffGxg\n4LHTJz1SepIaElJzzDy+f3DpP25m6UlqSEiNsWXcd1ub747bWnaSOhJSY6yvHm5tHq7Wl52k\njoTUGH+qHmht/qt6ruwkdSSk5jj88tZ6+eFl56glITXHv4753uDyvTH/VnqSGhJSg1w5+sQr\nrjhx9JWl56gjITXJ8ktOOOGS5aWnqCUhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQ\nICQIEBIECAkChAQBQoIAIUGAkJqkf+Wtt67sLz1FLQmpQVYdUk2dWh2yqvQcdSSk5nh44qwN\nAwMbZk1cU3qSGhJSc3zgxO2DS/+Jp5eepIaE1Bhbxt7V2tw5dkvZSepISI2xvnr5IZ3X/h4B\nQmqM56r7W5v7Rm0uO0kdCak5pl/WWj8xvewctSSk5ritd8ngsqT39tKT1JCQGmTB6GMuu+yY\n0QtKz1FHQmqSB+edcsq8B0tPUUtCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQ\nICQIEBIECAkChAQBQoKAXTOkFRV0mRWv+dt85EMaWL0Susrq1/5d3oGQoP6EBAFCggAhQYCQ\nIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQ\nEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQB\nQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAg\nQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBAS\nBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFC\nggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQL+B4bP2VVST11HAAAAAElFTkSuQmCC" }, "metadata": { "image/png": { "width": 420, "height": 420 } } } ] }, { "cell_type": "code", "source": [ "newdata <- data[!data %in% boxplot.stats(data)$out]" ], "metadata": { "id": "a_fcUstL3Yz2" }, "execution_count": 3, "outputs": [] }, { "cell_type": "code", "source": [ "boxplot(newdata)" ], "metadata": { "colab": { "base_uri": "https://localhost:8080/", "height": 437 }, "id": "6f5uHfO43wlg", "outputId": "7ba940d1-6a94-4948-8179-209082a340e0" }, "execution_count": 4, "outputs": [ { "output_type": "display_data", "data": { "text/plain": [ "plot without title" ], "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAACFlBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERETExMWFhYXFxcYGBga\nGhocHBwdHR0eHh4fHx8gICAhISEjIyMlJSUpKSkqKiosLCwtLS0vLy8wMDAxMTEyMjIzMzM0\nNDQ1NTU4ODg7Ozs8PDw9PT0+Pj4/Pz9AQEBDQ0NERERFRUVGRkZHR0dISEhKSkpLS0tMTExN\nTU1OTk5PT09QUFBRUVFSUlJTU1NVVVVWVlZXV1dZWVlaWlpbW1tcXFxeXl5fX19gYGBiYmJj\nY2NlZWVmZmZnZ2doaGhqampra2tsbGxtbW1ubm5vb29wcHBzc3N0dHR1dXV3d3d4eHh5eXl6\nenp7e3t8fHx9fX1+fn5/f3+AgICCgoKDg4OFhYWHh4eIiIiKioqLi4uOjo6Tk5OVlZWYmJia\nmpqgoKCioqKpqamqqqqrq6usrKytra2urq6vr6+xsbGysrK0tLS1tbW7u7u9vb3AwMDDw8PE\nxMTFxcXGxsbHx8fIyMjKysrLy8vMzMzNzc3Q0NDR0dHS0tLT09PW1tbY2NjZ2dna2trb29vc\n3Nzd3d3f39/g4ODi4uLj4+Pk5OTl5eXm5ubn5+fo6Ojq6urr6+vs7Ozt7e3u7u7v7+/x8fHy\n8vLz8/P09PT29vb39/f4+Pj5+fn6+vr8/Pz9/f3+/v7///9mqcfdAAAACXBIWXMAABJ0AAAS\ndAHeZh94AAAUcUlEQVR4nO3a+7fldV3H8c3lMIghUpFcFEPDSyDWdBkSKsmIGDCzBIIJNSgj\nQEqlxC6AksWtkAjNghIHZARmmPkP88wwM2cNrD2LM+/X5zNnvx+PH87+rrW/7PNd857n4szn\nvBcHgBO2mP0AsAqEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWE\nBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWE\nBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWE\nBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWE\nBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWE\nBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAWEBAUGhPTEY7ClPPH2/5bnQ3p0AVvMo2/7r3k+pEcW\nr8W/BxR6bfHI2/5vhATHEBIUEBIUEBIUEBIUEBIUmBLSvqcefWXpDUJiixkb0iPXfPA3Hz/w\nzCWLxdn3Lb1PSGwtQ0P6l7XF2uJdz172zt/77Z9a/MOSG4XEFjM0pN9Ye2Dff3/gutO+eeDA\n0+/cvuRGIbHFDA3pp6/7yZeHFlesX+88d8mNQmKLGRrS2p0/+bJn8Yfr158//Zg3nz1z4wbg\njzf7PWCGoSG99/fXv57zp+tfP/Wzx7y5/+EHj7h58fJmvwfMMDSkG7d98/Dlt9c+ueTGvxYS\nW8vQkJ4595TbD11dt3b6vy65UUhsMWN/j/TU9i8euvjA+X+/7D4hscVMWhH6n+VvCynjyV07\ndux6cvZTrKSTc9dOSBF3nXbFbbddcdpds59jFQmpj78944H1lwfO+LvZT7KChNTHpbceer31\nQ3OfYyUJqY2XF98+dPHPp+yZ+ySrSEhtPLd4+tDFdxbPTX2QlSSkNvae+U+HLv7xzL1zn2QV\nCamPT/7q/vWX139l2VIJmyOkPr5zzrXPHzjw/LXnPD37SVaQkBp5/JLFRRctLnl89nOsIiF1\n8vrjX/nKY6/PfoqVJCQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIKSt\n5QuLyb4w+0/gJCWkrWX3YyfmE584wQ/YPftP4CQlpF527pz9BCtKSL0IKURIvQgpREi9fPrT\ns59gRQmpl90OCzKEBAWEBAWEBAWE1Mttt81+ghUlpF4cf4cIqRchhQipFyGFCKkXIYUIqReb\nDSFC6sVmQ4iQoICQoICQoICQerHZECKkXhx/hwipFyGFCKkXIYUIqRchhQipF5sNIULqxWZD\niJCggJCggJCggJB6sdkQIqReHH+HCKkXIYUIqRchhQipFyGFCKkXmw0hQurFZkOIkKCAkKCA\nkKCAkHqx2RAipF4cf4cIqRchhQipFyGFCKkXIYUIqRebDSFC6sVmQ4iQoICQoICQoICQerHZ\nECKkXhx/hwipFyGFCKkXIYUIqRchhQipF5sNIULqxWZDiJCggJCggJCggJB6sdkQIqReHH+H\nCKkXIYUIqRchhQipFyGFCKkXmw0hQurFZkOIkKCAkKCAkKCAkHqx2RAipF4cf4cIqRchhQip\nFyGFCKkXIYUIqRebDSFC6sVmQ4iQoICQoMC0kHZ/d8mbQmKLGRvSkzsuvPy+fQcvdy37FCGl\n2GwIGRrSt7YtzlpbfPzgv3eFNIXj75ChIV259o39r9679tE9B4Q0iZBChoZ0/nXrXx86Y8e+\ntwhpzz1/dcRvCSlESCFDQ1q74+DLVxc3vUVIz//69iPeL6QQIYUMDek9Vx16vX1xtx/t5rDZ\nEDI0pJtO+fLe9df91y9u+ZyQZrDZEDI0pBcuWGw/eLH/psVCSKyQsb9H+sFnb3nj6uvvExIr\nxIoQFBBSLzYbQoTUi+PvECH1IqQQIfUipBAh9SKkECH1YrMhREi92GwIERIUEBIUEBIUEFIv\nNhtChNSL4+8QIfUipBAh9SKkECH1IqQQIfVisyFESL3YbAgREhQQEhQQEhQQUi82G0KE1Ivj\n7xAh9SKkECH1IqQQIfUipBAh9WKzIURIvdhsCBESFBASFBASFBBSLzYbQoTUi+PvECH1IqQQ\nIfUipBAh9SKkECH1YrMhREi92GwIERIUEBIUEBIUEFIvNhtChNSL4+8QIfUipBAh9SKkECH1\nIqQQIfVisyFESL3YbAgREhQQEhQQEhQQUi82G0KE1Ivj7xAh9SKkECH1IqQQIfUipBAh9WKz\nIURIvdhsCBESFBASFBASFBBSLzYbQoTUi+PvECH1IqQQIfUipBAh9SKkECH1YrMhREi92GwI\nERIUEBIUEBIUEFIvNhtChNSL4+8QIfUipBAh9SKkECH1IqQQIfVisyFESL3YbAgREhQQEhQQ\nEhQQUi82G0KE1Ivj7xAh9SKkECH1IqQQIfUipBAh9WKzIURIvdhsCBESFBASFBASFBBSLzYb\nQoTUi+PvECH1IqQQIfUipBAh9SKkECH1YrMhREi92GwIERIUEBIUEBIUEFIvNhtCpoX0wjNL\n3hRSiuPvkGkh7Vr2KUJKEVKIkHoRUoiQehFSyNCQPrzBeUKawWZDyNCQTj112xGnHfspz56+\n2EBIGTYbQoaGtOvso0d1b/rRbv8jDx5xs5DYWoaGtPfSj+w9fO3fSKySsYcNT73j1sOXQmKV\nDD61e+mHh68evmvJbUJKsdkQYkWoF8ffIULqRUghQupFSCFC6kVIIULqxWZDiJB6sdkQIiQo\nICQoICQoIKRebDaECKkXx98hQupFSCFC6kVIIULqRUghQurFZkOIkHqx2RAiJCggJCggJCgg\npLG+d/9cV101+QG+N3sCIUIa64a1d021bdvc7792w+wJhAhprJ1X/3trV6/q77GENJaQZk8g\nREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKE\nNJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhj\nCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQ\nZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2\nBEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8g\nREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKE\nNJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhj\nCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQ\nZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2\nBEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8gREhjCWn2BEKENJaQZk8g\nREhjCWn2BEKENJaQZk8gREhj7Xz3z7f2biEdJaTN27loTkhHCWnzhDR7AiFCGktIsycQIqSx\nHDbMnkCIkMYS0uwJhIwOaf+zDz7wwEP/dZy7hLSqhLTB5kPa/Sc/c+gn5Qv+4sfL7hPSqhLS\nBpsO6bn3Li7eeefdd3/xd39u8cHdS24U0qoS0gabDunGtfvfuNp33yk3L7lRSKtKSBtsOqTz\nbjh6/anzj3nz5T/bdcSvCWlFCWmDTYe09pdHr//8jGPe/N8rtx/x/sWPNvs9TnJCmj2BkKEh\nXfg7R6+vvmjJjX60W1VC2mDTId18yj2vHrrac8di15IbhbSqhLTBpkN68UOLs3955x//0fW/\ndNbiY8tSEdKqEtIGm/890mv3/sJp679GWvvFv9m37D4hrSohbXBCK0Kv/Mfjjz/z2nFuEtKq\nEtIGdu02T0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0iz\nJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsC\nIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAi\npLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIa\nS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGE\nNHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0iz\nJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsC\nIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAi\npLGENHsCIUIaS0izJxAipLGENHsCIUIaS0izJxAipLF2XnxDaxcL6Sghbd791zR3/+wJhAgJ\nCgiplzvvnP0EK0pIvexc1X+jzCakXoQUIqRehBQipF6EFCKkXm68cfYTrCgh9fLcc7OfYEUJ\nCQoICQoICQoIqRebDSFC6sXxd4iQehFSiJB6EVKIkHoRUoiQerHZECKkXmw2hAgJCggJCggJ\nCgipF5sNIULqxfF3iJB6EVKIkHoRUoiQehFSiJB6sdkQIqRebDaECAkKCAkKCAkKCKkXmw0h\nQurF8XeIkHoRUoiQehFSyLSQXnhmyZtCShFSyLSQdi37FCGl2GwIEVIvNhtChAQFhob04Q3O\nExIrZGhIp5667YjThMQKGRrSrrOPHtX50W4Kmw0hQ0Pae+lH9h6+fnNIe3Yfca+QQhx/h4w9\nbHjqHbcevnxTSP956mKDH236e7CMkEIGn9q99MPDVw/fdex7//bYEZ/3f6QQIYVYEepFSCFC\n6sVmQ8iMkO657Hh3CCnFZkPIjJA+c9wPEBJbjJCggJCggJB6sdkQMiOkF79/vDuElOL4O8Tx\ndy9CChFSL0IKEVIvQgoRUi82G0KE1IvNhhAhQQEhQQEhQQEh9WKzIURIvTj+DhFSL0IKEVIv\nQgoRUi9CChFSLzYbQoTUi82GECFBASFBASFBASH1YrMhREi9OP4OEVIvQgoRUi9CChFSL0IK\nEVIvNhtChNSLzYYQIUEBIUEBIUEBIfVisyFESL04/g4RUi9CChFSL0IKEVIvQgoRUi82G0KE\n1IvNhhAhQQEhQQEhQQEh9WKzIURIvTj+DhFSL0IKEVIvQgoRUi9CChFSLzYbQoTUi82GECFB\nASFBASFBASH1YrMhREi9OP4OEVIvQgoRUi9CChFSL0IKEVIvNhtChNSLzYYQIUEBIUEBIUEB\nIfVisyFESL04/g4RUi9CChFSL0IKEVIvQgoRUi82G0KE1IvNhhAhQQEhQQEhQQEh9WKzIURI\nvTj+DhFSL0IKEVIvQgoRUi9CChFSLzYbQoTUi82GECFBASFBASFBASH1YrMhREi9OP4OEVIv\nQgoRUi9CChFSL0IKEVIvNhtChNSLzYYQIUEBIUEBIUEBIfVisyFESL04/g4RUi9CChFSL0IK\nEVIvQgoRUi82G0KmhbT7u0veFFKKzYaQsSE9uePCy+/bd/By17JPERJbzNCQvrVtcdba4uO7\n16+FxCoZGtKVa9/Y/+q9ax/dc0BIrJahIZ1/3frXh87YsU9Ik9hsCBka0todB1++urhJSJM4\n/g4ZGtJ7rjr0evvibiHNIaSQoSHddMqX966/7r9+ccvnhDSDkEKGhvTCBYvtBy/237RYHPsp\nL938B0d8TEghQgoZ+3ukH3z2ljeuvv6+Yz/l/6695ojLF69s+nuwjM2GkJNzReiRxWvx79GT\nzYYQIUGBGSHdc9nx7hASW8yMkD5z3A8QEluMkHqx2RAipF4cf4cIqRchhcwI6cXvH+8OIaUI\nKcTxdy9CChFSLzYbQoTUi82GECFBASFBASFBASH1YrMhREi9OP4OEVIvQgoRUi9CChFSL0IK\nEdLW8qVzT8y2bSf4AV+a/SdwkhLS1vLcgyfma187wQ+wGfHWhAQFhAQFhAQFhAQFhAQFhAQF\nhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFhAQFTs6QHl3AFvPo\n2/5rng/pwBOPwZbyxNv/Wz4gJFh9QoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoICQoIC\nQoIC/w96MpSMBlHICQAAAABJRU5ErkJggg==" }, "metadata": { "image/png": { "width": 420, "height": 420 } } } ] }, { "cell_type": "code", "source": [ "set.seed(123)\n", "\n", "data <- c(rnorm(1000), 10, 15, 12, 100)\n", "\n", "hist(data)" ], "metadata": { "colab": { "base_uri": "https://localhost:8080/", "height": 437 }, "id": "nm92oym233qW", "outputId": "133666c6-5ae4-4a46-a1d9-c5acc989910d" }, "execution_count": 5, "outputs": [ { "output_type": "display_data", "data": { "text/plain": [ "Plot with title “Histogram of data”" ], "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAC+lBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERESEhITExMUFBQVFRUW\nFhYXFxcYGBgZGRkaGhobGxscHBwdHR0eHh4fHx8gICAhISEiIiIjIyMkJCQlJSUmJiYnJyco\nKCgpKSkqKiorKyssLCwtLS0uLi4vLy8wMDAxMTEyMjIzMzM0NDQ1NTU2NjY3Nzc4ODg5OTk6\nOjo7Ozs8PDw9PT0+Pj4/Pz9AQEBBQUFCQkJDQ0NERERFRUVGRkZHR0dISEhJSUlKSkpLS0tM\nTExNTU1OTk5PT09QUFBRUVFSUlJTU1NUVFRVVVVWVlZXV1dYWFhZWVlaWlpbW1tcXFxdXV1e\nXl5fX19gYGBhYWFiYmJjY2NkZGRlZWVmZmZnZ2doaGhpaWlqampra2tsbGxtbW1ubm5vb29w\ncHBxcXFzc3N0dHR1dXV2dnZ3d3d4eHh5eXl6enp7e3t8fHx9fX1+fn5/f3+AgICBgYGCgoKD\ng4OEhISFhYWGhoaHh4eIiIiJiYmKioqLi4uMjIyNjY2Ojo6Pj4+QkJCRkZGSkpKTk5OUlJSV\nlZWWlpaXl5eYmJiZmZmampqbm5ucnJydnZ2enp6fn5+goKChoaGioqKjo6OkpKSlpaWmpqan\np6eoqKipqamqqqqrq6usrKytra2urq6vr6+wsLCxsbGysrKzs7O0tLS1tbW2tra3t7e4uLi5\nubm6urq7u7u8vLy9vb2+vr6/v7/AwMDBwcHCwsLDw8PExMTFxcXGxsbHx8fIyMjJycnKysrL\ny8vMzMzNzc3Ozs7Pz8/Q0NDR0dHS0tLT09PU1NTV1dXW1tbX19fY2NjZ2dna2trb29vc3Nzd\n3d3e3t7f39/h4eHi4uLj4+Pk5OTl5eXm5ubn5+fo6Ojp6enq6urr6+vs7Ozt7e3u7u7v7+/w\n8PDx8fHy8vLz8/P09PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7////Z7SHyAAAA\nCXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nO3dC3xU1YHH8ZPHJCQQEBWK4RFQWfpYSwQt\ndBVLhfpCCq2tiNqSQusLNBZ30RYBsaiFitsq1eKDrbbWosRaV2tNqW7xVYW6rYpbIlpQFB+J\nFOQRQu7ns3cemdwZySXc/OdOJuf3/Xw6czM5956bND8nMznMGAdAh5lsnwDQFRASIEBIgAAh\nAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhheR+Y4qzNvnKEd1KjtyZduODxhRk5Wy6JELKjNuNMQ3xzXHGnJrdkJ4zUdvT\nbiUkJULKjI+FVHfTTTd/bNQ7BebVEE7mQmN63XR3Y9qt+w0ppDPqeggpMz4W0n79xITyY3u6\nMRd+/Nb9hhTSGXU9hJQZ7QvphHB+bN0zmP3xW/cbUkhn1PUQUma0+Rhp78/G9Snsc9x17znO\nhNhDF1Pt3rpt0ajekb6n3NUU3+WukaWHTnjhdfeTuxznTmNO2nvZ4X0dp/lXp/QpLPvcT6Kj\n3FvHOPdXllR8v9FZP/GQ7l962Tu993gXxqfxPEZaMbK09xkv/CYRkueorWfknQrtQEiZ0VZI\njWMTP9ZHvub5sf3f/olbP/9+dI/vxraLl7kX7kf3GvPZG2M/9OclRp3Z7Dj3GfOvK/OiH818\n/fDoVZ8PW2dPOd7HQpodP/zcREieo7aekXcqtAMhZUZbId1qzCd/9cxjZxnzBeeVh9xBv1zz\nulPv/twPufU3cwqNmeCOed69ufL2e/6tR/wn3d1z8MBI5TDnYWPyf/rSne6olbFbjxjw5Vm9\n3MOeXl49yt3lpuTkqcd7bc1xxpyzZs2+xGf/7I49uea3pxXGD+89avKMUqZCOxBSZtxuvFpD\nqjLmRveqceqsG/Y5b5v4I5JrjOn5lnt9j/vxWse5wJhD3HuSnRXJkMzQze7GLRMmRH8N/LIx\n34zf+nXHWeVeddvo7BlmzMTk5GnHS3uM9B333muH+zvmJ+OHTzlqyxml3Ih2IKTMaCuky4wZ\ndPc7iUEtP7bDjamKftzU25iFjvNpY74R/fDq1pDu9Rz6UmNOid/6vFtksTFT3RuvcO/EkiPS\njpcW0qeMmR69vjblyYb4UVvOKOVGtAMhZUY0pIEVMd28Ib1YGg3rqBmroo/iEz+2zYXxuynH\n+XysCnfIddGPHmgNKZ5e7aQji2NhjovfGl2rMMCY690r90HUUS1zpx8vLaSS+B5OTSIk71GT\nIXlvRDsQUma0+azdE5+J30kNfib5Y7vDvfpZbOh499G90+x++OPoR48lQyqIPb75qfuJ7p8a\nfnhLSLHjHWXMre7VzZ6Q0o6XFlL64VOO2hJSyo1oB0LKjLaXCDU/s/C0Xib2OMVzj7Qk9rlR\nxpznOMWJu4z7kyHF9tzu3lOd694JXXKgkNKPl3aP1C1xh7cydvjUoybOKPVGtAMhZYb/Wrum\nh9xHL48m//tfGf95dxrLjPmh4xydeIw0NzWkP7mjX4wfzz+k9OOlhfQviWcQroodPvWoiTNK\nvRHtQEiZ0UZIO6+r+nLs17RTjHnQeccdtMb9YKH7e1T0abnlxuT93XHON6bXe+7dwsDUkGrj\nTy+8km/MSf4hpR0vLaRpxhxS7x5+QOzwqUdNnFHqjWgHQsqMtu6R3DuLsx5d+6drIqZ4q9MU\nMWbMyt87De7P9NHLVv27+zvdt90xq919P/tfdx7fPTWkt9wf64kv/bb/MGN6PrvVL6S046WF\n9KR7+JH3/fz4Hsbkpx81cUapN4byDct1hJQZbYX00oDEM+L5dzqx1aSxv5kmVyJ8dVd0j2mx\n7dIfpoYUfTLaVf5GuXs53y+k9OOlrbX7VuxT3W9xL/alHbXljFJvxIERUma0+RjpnWuP+0Sk\n9JMX/DX6wZuTD+k2ZJG7se0Hx/eKHPGV38b32LdkWHHfr/3t0fguyZAaf/jpkv7ffsupHVY4\n4D7fkNKOlxbSvhuHFfX92suvuKf4z7SjtpxR6o04MELqvH7u3idk+xzQToTU+ay//pJz9jqx\nBTqTs30uaCdC6nzq8tyCnnzqcvdXr8ezfS5oJ0LqhBa0rNG7OttngvYipM5o9dcGRIorpjyZ\n7fNAuxESIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKE\nBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nINCRkJo31tbUrN4kOxcgZwUPqX52XxMzaOFO4QkBuShwSFuGmKFV8xcvnju13AyvV54SkHsC\nhzQjsjKx1bQsr1p0NkCOChxSv+mt21MGCs4EyGGBQ4osat1eUKQ4FSB3BQ6p4uzW7UmDFacC\n5K7AIVXnLdkd39oxz8xRnQ6QmwKH1DDClI2rmjVz2thSM2a78pTaYXttYOtCPlXYIfjfkfYs\nrSyI/hkpMnp5k/CE2uUn+T0D6s7DOWRCh5YI7dqwbl3dHtWpHISln3opoDvys3C66Ppyc4kQ\nIaGTyc0lQoSETiY3lwgREjqZ3FwiREjoZDKzROijH92QdO20oFO0jZDQyWRmidCW08YnHW/0\nz+sREjqZzC8RepqQ0PVlfokQIcECmV8iREiwQOaXCBESLJD5JUJth3TLyKAGEBI6l46+HNee\n5//4uv+ItkOqGj4/oGGEhM4lcEjX/jF6eVtv95e7kS/6DfQJaVLQHL5ISOhcAocUe6buv03x\nVy48wfR6zWcgIcECHQtpaK/17uWqvG/5DCQkWKBDIb1rvhfbntzfZyAhwQIdCmmTuSe2PTfi\nM5CQYIEOhdTU6/rY9vRDfQYSEiwQPKSpL9S9d9XRH7mbr3af6DOQkGCB4CHFPeA4v+ye/7zP\nQEKCBQKHtOKm+dXTJo9d7TjL+j/sN5CQYAHBG41t3+f7aUKCBTL/jn2EBAsQEiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIg\nQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBI\ngAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAh0JqXljbU3N6k0HGEVIsEDwkOpn9zUx\ngxbu9BtHSLBA4JC2DDFDq+YvXjx3arkZXu8zkJBggcAhzYisTGw1Lcur9hlISLBA4JD6TW/d\nnjLQZyAhwQKBQ4osat1eUOQzkJBggcAhVZzduj1psM9AQoIFAodUnbdkd3xrxzwzx2cgIcEC\ngUNqGGHKxlXNmjltbKkZs91nICHBAsH/jrRnaWVB9M9IkdHLm/zGERIs0KElQrs2rFtX11Ym\nLQgJFmCJECDAEiFAgCVCgABLhACBDC0Remlt0l2EhK4vM0uEXsszHrvbOAQhocvI0BKh7fVJ\nj3GPhK6PJUKAAEuEAAGWCAECLBECBDr+clzb5rzq+3lCggU6HtJm87Dv5wkJFgi+sqHFVHPK\njBk+AwkJFggckknhM5CQYIHAIX23oPKxhqhXzH0NDT4DCQkWCP4Y6YXKvIs/dHiMBDgderJh\n7w0l5Q8QEuB08Fm718aZiZsICejo098rDu0xn5CAjv4daes5hpCAjv9B9tHZ630/T0iwAO/Y\nBwgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiA\nACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAh0JqXljbU3N6k0H\nGEVIsEDwkOpn9zUxgxbu9BtHSLBA4JC2DDFDq+YvXjx3arkZXu8zkJBggcAhzYisTGw1Lcur\n9hlISLBA4JD6TW/dnjLQZyAhwQKBQ4osat1eUOQzkJBggcAhVZzduj1psM9AQoIFAodUnbdk\nd3xrxzwzx2cgIcECgUNqGGHKxlXNmjltbKkZs91nICHBAsH/jrRnaWVB9M9IkdHLm/zGERIs\n0KElQrs2rFtX11YmLQgJFmCJECDAEiFAgCVCgABLhAABlggBAplZIvSPYUcmlZvdbRyCkNBl\nZGaJUOPdP0v6D+6R0PWxRAgQYIkQIMASIUCAJUKAQIdfjqtp/Qu7fAcQEizgDWn0bR8exJ5P\nf3345HVO3b8aU7bMdxwhoevzhlRoSqY+vq+dOz4XMRHTc+MJ3c/7ag/zW5+BhAQLeEN6/2fj\nCszA79e1a8czIzVNbx5zfsEax/l79/E+AwkJFkh7jPTurV/MNyfe8c8D73jY+e7FanNSdLuq\nt89AQoIFPv5kw5abhpvSi/5+oB0j892LHeai6Pb3Cn0GEhIs8LGQdt5/VokZFIksaPbfccg3\no5e9roxeTvmEz0BCggXSQnrq2z1NyXlPOJvOMvP9d5xRvKZl89nIWT4DCQkW8Ia06QdDjTn2\nlobodvP4vv471vXOuyq+dX6k8HmfgYQEC3hDyje9Llrb8sEteQfYc/34ufGNYwY+5DeOkGAB\nb0hj/svz4gt1Ne09xFv+nyYkWCD1MdLL70Uv/iKdgZBgAW9IjdPNE+7VzabKdzn3QSIkWMAb\n0o1mwuvu1f9NMf8pnIGQYAFvSMecmdg442jhDIQEC3hDKrkxsbE4IpyBkGABb0ifuDSxcYnf\nSoWDRUiwgDek6aWPRK8alxd+QzgDIcEC3pC2HGEGfenMEw81R/xDOAMhwQIpf0d656LDjDF9\nvvOmcgZCggXSFq02v/XaDvEMhAQLdPjFTw6IkGABb0jNK8+s/EyccAZCggW8IS0xprRXnHAG\nQoIFvCENOHVjBmYgJFjAG1LkuUzMQEiwQMo90rOZmIGQYAFvSP9+SSZmICRYwBvS9lPPfWx9\nXYxwBkKCBbwhmVbCGQgJFvAmM3XajBbCGQgJFmBlAyCQFtI/X25Qz0BIsEBKSE+ONOZ3jjPx\nD8oZCAkW8Ib056KyU92Q3u1XtLbN8QePkGABb0gTBm1+O3qPtHXQJOEMhAQLeEM67HonFpJz\nnd/7HR0sQoIFUt768heJkFbwKkLAQUlZa/f9REjfqhDOQEiwgDekC3qvi4ZU/z2jXHRHSLCA\nN6S3BxaOMJWVxWbQO8IZCAkWSPk70taLo68idPjFW5UzEBIskP4qQu/UKe+NoggJFmCtHSDg\nDWlc0hjhDIQEC+z33yOVlQtnICRYwBvS3piPXr7ipG3CGQgJFtjvY6QrLxLOQEiwwH5DepZf\n7YCDst+QHi8VzkBIsIA3pIa4d5+o5LW/gYOy/1cRukc4AyHBAin/sC9u8sX8U3Pg4LCyARAg\nJEDAG9Lwz43yEs1ASLCAN6RPlBhj8tz/lRREiWYgJFjAG1L9iTP/ssvZ9j9fPYUlQsBB8Yb0\nrarExmnfFs5ASLCAN6Q+dyY2ftRXOAMhwQLekIoXJTb+o1g4AyHBAt6Qji2Pv4nsU4cPF85A\nSLCAN6SHCsyQ8RPHH2nyHhDOQEiwQOq7UZzazRhTdHKtcgZCggXSVjbse3PD5ibtDIQEC/BG\nY4AAbzQGCPBGY4AAbzQGCPBGY4AAbzQGCPBGY4AAbzQGCPBGY4AAbzQGCPBGY4BAyurvlzMx\nAyHBAt6Qut2QiRkICRbwhjT+9H0ZmIGQYAFvSO9MPe3etXUxwhkICRbY/4voK19/lZBgAW8y\nU74xfUaCcAZCggV47W9AIBnSzWtiVy++qZ6BkGCBZEimOn41Uz0DIcEChAQIEBIgQEiAACEB\nAoQECBASINAa0qj5Ueb42JVwBkKCBVpDStGufZs31tbUrN50gFGEBAskk7knRTv2rJ/dNx7d\noIU7/cYREiwQeK3dliFmaNX8xYvnTi03w+t9BhISLBA4pBmRlYmtpmV51T4DCQkWCBxSv+mt\n21MG+gwkJFggcEiRRa3bC4p8BhISLBA4pIqzW7cnDfYZSEiwQOCQqvOW7I5v7Zhn5vgMJCRY\nIHBIDSNM2biqWTOnjS01Y7b7DCQkWCD4PzXfs7SyIPpnpMjo5b5v30xIsECHXrNh14Z16+ra\nyqQFIcECHQmJJUJAQvCQWCIEJLFECBBgiRAgkJklQh9WX5A0iZDQ9WVmidB753496WSzu41D\nEBK6DJYIAQIsEQIEWCIECLBECBBgiRAgIHl/pPo3fD5JSLBA8JD+ekbFicviv9TN8TsKIcEC\ngUN6qtiURswXYouDCAm2CxzShMiDzbuXRo7f4RASEDikgedHL1cXndFESEDwJULzYld3m8sI\nCQgc0oAvx6+vMosJCdYLHNJleTc3Rq+bp5nLLyUkWC5wSO8PMuNjG82X+b97BSHBAsH/jvTe\nJZcntlYdRUiwnGRlgy9CggUICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFC\nAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIE\nCAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJ\nECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAg\nJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRA\ngJAAAUICBDoSUvPG2pqa1ZsOMIqQYIHgIdXP7mtiBi3c6TeOkGCBwCFtGWKGVs1fvHju1HIz\nvN5nICHBAoFDmhFZmdhqWpZX7TOQkGCBwCH1m966PWWgz0BCggUChxRZ1Lq9oMhnICHBAoFD\nqji7dXvSYJ+BhAQLBA6pOm/J7vjWjnlmjs9AQoIFAofUMMKUjauaNXPa2FIzZrvPQEKCBYL/\nHWnP0sqC6J+RIqOXN/mNIyRYoENLhHZtWLeurq1MWhASLMASIUCAJUKAAEuEAAGWCAECmVki\n1Pw/tUn/SUjo+jKzRGhjsfHY3cYhCAldBkuEAAGWCAECLBECBFgiBAiwRAgQkLwc1/t1Pp8k\nJFhAEtIcv6MQEixASIAAIQECgUMa6dGPkGC5wCHl5xcnFRASLBc4pDllrU/V8asdbBc4pMZj\nj2ts2SYk2C74kw3rS65o2SQk2K4Dz9pt+6Bl68nrfYYREizAG40BAoQECBASIEBIgAAhAQKE\nBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiA\nACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAh\nAQKEBAgQEiBASIBAR0Jq3lhbU7N60wFGERIsEDyk+tl9TcyghTv9xhESLBA4pC1DzNCq+YsX\nz51abobX+wzsXCHdnr82qL8F/VbBAoFDmhFZmdhqWpZX7TOwc4U0xwT396DfK2TQ7vrA9gpP\nI3BI/aa3bk8Z6DOwc4U0Oz/onn8yLwX9XiGDvhD8v4yXCU8jcEiRRa3bC4rSPvl6n95JZaax\njUPMiPQMqDA/6J7dTNA9y0zP3gFFyoLuWVwadM/S4qB7lkWC7nlIQdA9excE/uYWBg9pRtAf\n/v0IHFLF2a3bkwanfXLfE7VJj/+irUNsqQ3qoRVB9/z9bYEnvfXxoHve8UjQPX+xKuieq34R\ndM9H7gi65+O3Bt2z9rbfB91zxUOBJ90S9Id/PwKHVJ23ZHd8a8c8M0d1OkBuChxSwwhTNq5q\n1sxpY0vNmO3KUwJyT/C/I+1ZWlkQ/UUzMnp5k/CEgFzUoSVCuzasW1fX1nNygEUyv9YOsAAh\nAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIBAboY0\nK/hLMAEtRgt/JHMzpMXDAr/wcGB/ML8Of9J/mxb+nD/oE/6ca/N/Gv6cE88V/kjmZkhLjw1/\nzvey8Uqrp2fhhc5+WR7+nE7BH8Kfs6pKeDBCai9CyiRCygpCyiBCCoKQ2ouQMomQsoKQMoiQ\ngiCk9iKkTCKkrCCkDCKkIAipvQgpkwgpKwgpgwgpCEJqL0LKJELKiltGhT/nh3lZeDPmSVeH\nP+f96e+/GIaSP4U/5wUXCA+WmyHteisLk27Mwpxbs/AWbnv/Ef6czuvN4c9ZXy88WG6GBHQy\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAQC6G1FBd\nETlixpawpqufPaho8KRnQ5/5u2ZGuHM+elKPXl98Itw5Xz2/X+Hhk/8c2qSNV+aPjG95plPM\nnIMh7Rlhzlo0PTJE+e8bfXww2Ey4+rzCbn8LeeYXCmIhhTfnXeaouVf0KXo6zDlfLjt03t3X\n9itcHdKk60eUJULyTCeZOQdDWmp+6F7+2swOZ7qZ5mb3cpU5I9yZ91YOj4UU2pxbexy7w3Hq\nelwS5td5rvmje/lXMzacSbeVHFdXHA/JM51k5hwMqbJsd/Tq6L7h/DP/y8c1upfNJRXhznxD\n3u9iIYU25xLzWPSqOcw5nVEm+s11eg4OZ9IPZjc6iZA800lmzr2QdhWMi11XmTBfjWR35IRQ\nZ36t5OKGaEjhzXlqSaOze1t0K8Svc1rsNc7eyz89vEnjIXmm08yceyFtMPGXI5tvakOc9cfu\nL3hhzjzuiA9jIYU3Z8Wn/3JCnjlqRajf4fW9h695+y/jSp8Lb9J4SJ7pNDPnXkjrzMzY9RJT\nE96kTxaduDfMmVeYB5xYSOHNWVZxxOwHfjzI/DLU7/D/fdoYM+iZEL/QeEie6TQz52JIs2LX\ni82Doc15b/GID8KceeuhZzotIYU1Z7H5uXu5pUe/phC/w+uHDLzx4Ts/06s2vC+0JaTkdJqZ\ncy+kOjMtdj3XhPUqt83zzGn/DHXmc3r8IxFSeHMeVvBR9Orr5m8hfodHl77pXn7Uv39jaJPG\nQ/JMp5k590LaUzg2dj3VhPSKoM3TzaVNoc78qLl68+bNr5ipm7eF99WOLIg9gXaJeTq8Obfn\nfTF2/U3zcmiTxkPyTKeZOfdCckaVRv/Tua98YEjzVZvrQp55tmkxJ7yvdpZ5Lnp1itkU3pzv\nms/Hrs82a0ObNPH0t2c6ycw5GNJys8C9vNVcE850q0x12DOvfzjqPnPKw6+G99WuzTt5t+O8\nkP/ZML/DQyLRdyZoOLTn7tAmTYTkmU4ycw6G1DTGTLrmnLxjPgpnuqPMpXNi6kOeOfYYKcQ5\nLzeV13ynpOiJMOesyT/s+3ctGmKWhTPpk+7/jQX93Iv3vdNJZs7BkJztV1RE+s/8IKTZkr9m\nvRHyzPGQwpuz+bbh3Xqd8XyoczrPTO5T2Hv8IyFNen3L/5d1KdMpZs7FkIBOh5AAAUICBAgJ\nECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAg\nJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkHJNwahsnwH2g5By\nTXpI19dl5zyQgpByTVpIW8zvsnQi8CKkXJMW0kOE1CkQUu54ZES3PjMaYiH9efJhkYrz33Cc\nCdH36F7juQHZQUg546mC8utuP39MxA1pbbfyhcuvLOv7vvPsN8y8Bz/w3IDsIKSccbp53r28\nxLgh/XTEE+7mzeZmx7k+9qud5wZkBSHlin0lR0WvXjSJx0iNu1ab2S0heW5AVhBSrnjTfCl6\ntSsW0t0nHRJ9cFSdDKn1BmQFIeWKDWZi7DrPDekqc9yKJ5+9ozUkzw3ICkLKFZvj90jb3Xuk\nXSUDt7ubjyVD8t6ArCCkXLG36Ojo1dNuSG+Yr0Q3r0qG5L0BWUFIOWNs7Fm7c92QduYd6269\n2N9c6DiLTY2TcgOygpByxqN5fa9ccubJvdzHSGeaC391de9HCwfcu+MB87kbn/fekO3TtBQh\n5Y77jinqM71hoHvn8+65fXqdvMa5pke/txvPKul9v/eGbJ+lpQgJECAkQICQAAFCAgQICRAg\nJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRA\ngJAAAUICBAgJEI1LCGQAAAAaSURBVCAkQICQAAFCAgQICRAgJECAkACB/wexUP32nDpGVwAA\nAABJRU5ErkJggg==" }, "metadata": { "image/png": { "width": 420, "height": 420 } } } ] }, { "cell_type": "code", "source": [ "sample_data <- data.frame(\n", " x=c(1,2,3,4,3,12,3,4,4,15,0),\n", " y=c(4,3,25,7,8,5,9,77,6,5,0),\n", " z=c(1,3,2,90,8,7,0,48,7,2,3)\n", ")\n", "sample_data\n", "boxplot(sample_data)" ], "metadata": { "colab": { "base_uri": "https://localhost:8080/", "height": 864 }, "id": "6nDkoq1u3_6M", "outputId": "b89c8d2d-3d6e-4021-dc29-0147804d08ca" }, "execution_count": 13, "outputs": [ { "output_type": "display_data", "data": { "text/html": [ "\n", "\n", "\n", "\t\n", "\t\n", "\n", "\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\n", "
A data.frame: 11 × 3
xyz
<dbl><dbl><dbl>
1 4 1
2 3 3
325 2
4 790
3 8 8
12 5 7
3 9 0
47748
4 6 7
15 5 2
0 0 3
\n" ], "text/markdown": "\nA data.frame: 11 × 3\n\n| x <dbl> | y <dbl> | z <dbl> |\n|---|---|---|\n| 1 | 4 | 1 |\n| 2 | 3 | 3 |\n| 3 | 25 | 2 |\n| 4 | 7 | 90 |\n| 3 | 8 | 8 |\n| 12 | 5 | 7 |\n| 3 | 9 | 0 |\n| 4 | 77 | 48 |\n| 4 | 6 | 7 |\n| 15 | 5 | 2 |\n| 0 | 0 | 3 |\n\n", "text/latex": "A data.frame: 11 × 3\n\\begin{tabular}{lll}\n x & y & z\\\\\n & & \\\\\n\\hline\n\t 1 & 4 & 1\\\\\n\t 2 & 3 & 3\\\\\n\t 3 & 25 & 2\\\\\n\t 4 & 7 & 90\\\\\n\t 3 & 8 & 8\\\\\n\t 12 & 5 & 7\\\\\n\t 3 & 9 & 0\\\\\n\t 4 & 77 & 48\\\\\n\t 4 & 6 & 7\\\\\n\t 15 & 5 & 2\\\\\n\t 0 & 0 & 3\\\\\n\\end{tabular}\n", "text/plain": [ " x y z \n", "1 1 4 1\n", "2 2 3 3\n", "3 3 25 2\n", "4 4 7 90\n", "5 3 8 8\n", "6 12 5 7\n", "7 3 9 0\n", "8 4 77 48\n", "9 4 6 7\n", "10 15 5 2\n", "11 0 0 3" ] }, "metadata": {} }, { "output_type": "display_data", "data": { "text/plain": [ "plot without title" ], "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAC9FBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERESEhITExMUFBQVFRUW\nFhYXFxcYGBgZGRkaGhobGxscHBwdHR0eHh4fHx8gICAhISEiIiIjIyMkJCQlJSUmJiYnJyco\nKCgpKSkqKiorKyssLCwtLS0uLi4vLy8wMDAxMTEyMjIzMzM0NDQ1NTU2NjY3Nzc4ODg5OTk6\nOjo7Ozs8PDw9PT0+Pj4/Pz9AQEBBQUFCQkJDQ0NERERFRUVGRkZHR0dISEhJSUlKSkpLS0tN\nTU1OTk5PT09QUFBRUVFSUlJTU1NUVFRVVVVWVlZXV1dYWFhZWVlaWlpbW1tcXFxdXV1eXl5f\nX19gYGBhYWFiYmJjY2NkZGRlZWVmZmZnZ2doaGhpaWlqampra2tsbGxtbW1ubm5vb29wcHBx\ncXFycnJzc3N0dHR1dXV2dnZ3d3d4eHh5eXl6enp7e3t8fHx9fX1+fn5/f3+AgICBgYGCgoKD\ng4OEhISFhYWGhoaHh4eIiIiJiYmKioqLi4uMjIyNjY2Ojo6Pj4+QkJCRkZGSkpKTk5OUlJSV\nlZWWlpaXl5eYmJiZmZmampqbm5ucnJydnZ2fn5+goKChoaGioqKjo6OkpKSlpaWmpqanp6eo\nqKipqamqqqqrq6usrKytra2urq6vr6+wsLCxsbGzs7O0tLS1tbW2tra3t7e4uLi5ubm6urq7\nu7u8vLy9vb2+vr6/v7/AwMDBwcHDw8PExMTFxcXGxsbHx8fIyMjJycnKysrLy8vMzMzNzc3O\nzs7Pz8/Q0NDR0dHS0tLT09PU1NTV1dXW1tbX19fY2NjZ2dna2trb29vc3Nzd3d3e3t7f39/g\n4ODh4eHi4uLj4+Pk5OTl5eXm5ubn5+fo6Ojp6enq6urr6+vs7Ozt7e3u7u7v7+/w8PDx8fHy\n8vLz8/P09PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7///+6Hvg/AAAACXBIWXMA\nABJ0AAASdAHeZh94AAAYeUlEQVR4nO3de5zddX3n8d8kmQwkBIxQQIQEtLFaVpPFS8MCCuIN\ntLQrt0gtWaCUFTQK7NIqEqBi2SBRt2QFtFht14KarTeQbOoFEBZio7i4kFIhtixVm0AMIYlJ\nzj+bmUmTrA6Hk/Ce33d+5zyff8zv+8h8M+czl9dj5pzfb85ULeA5q0oPAN1ASBAgJAgQEgQI\nCQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIA\nIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQ\nICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJ\nAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAh\nQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUFADSEtvw8a\nZfmuf5WPfkj3VtAw9+7yl/noh3RntWHUbwOCNlR37vL/ERL8EiFBgJAgQEgQICQIEBIECAkC\nhAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCouH+5drTj/vDz28uPIWQaLbvHHDYufNPmfT6\nNWXHEBKN9rP9ztm49fDIS08rO4eQaLQP//ovho73VCuKziEkGu2EC7ctDv500TmERKMd9aFt\ni1d8vOgcQqLRTp87fNy49+KicwiJRvvcXiuHjjdMeaLoHEKi0Ta/7jfu2vplvGjgurJzCIlm\ne/KMcVNfNnGf/1Z4DCHRdI8u/sTSwqdjhQQRQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAh\nQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAg\nJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIE1B3S\nloeXLF68dOWz7BISDVNvSKsu2r8aMu3Kde32CYmGqTWkxw6rZsydv2DBpXMOqmauarNRSDRM\nrSGd3X/LttWmRX3z2mwUEg1Ta0gHnrVjfdohbTYKiYapNaT+q3asL5/YZqOQaJhaQ5p+6o71\nSYe22SgkGqbWkOb1XbN+eLX2suqSNhuFRMPUGtLqI6opx8+94Pwzj51UHfPzNhuFRMPUex5p\nw8JZ4wdPI/XPvnFTu31ComFqv0To6YeWLVsxUiZPvPvc7U4UEs1S5Fq7jT+4b/2v/OPPzjhl\nu1dWa57rbUCd6g1p6bGHnnB367aDqmrvRe32XV+1uwcFY06tId01odp73OS79j7k90+dWt3a\nZqOQaJhaQ3rbgd9r/eS4aTPXtVqrDn1Lm41ComFqDWnfP9n64t7q04PrDz2/zUYh0TC1hjTh\nM1tfPFZ9dXD95xPabBQSDVNrSAfM3/rim9XHB9fvP6DNRiHRMLWGdPrz/3bD91/+smn/2Go9\nMPXkNhuFRMPUGtIPp1RV9fwHpk867sgJ4+9ps1FINEy955Hun/Nbc/9P6/7X9FUv+pt2+4RE\nw5R5FqGf/6T964VEw4zNp+MSEg0jJAgQEgQIqYds+au3HHzwW/5qS+k5upGQesem0ye/+y//\n8oLJc9r+UiW7RUi946NT7x88fH/qR0tP0oWE1DtetGD4+F9eXHaOriSknrGq+rvhxXer1WUn\n6UZC6hmPVw8MLx6oHi87STcSUs/Y9LzPDS/++/M2l52kGwmpd5z3iqcGD0+9/LzSk3QhIfWO\nn7z4VV9fvfq2V734Wa50ZDcIqYc8PmdCVU2Y88+l5+hGQuop67/73V99RkEChAQBQoIAIUGA\nkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQI\nEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQE\nAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQ\nIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQ\nEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBQN0hbXl4yeLFS1c+yy4h0TD1\nhrTqov2rIdOuXNdun5BomFpDeuywasbc+QsWXDrnoGrmqjYbhUTD1BrS2f23bFttWtQ3r81G\nIdEwtYZ04Fk71qcd0majkGiYWkPqv2rH+vKJbTYKiYapNaTpp+5Yn3Rom41ComFqDWle3zXr\nh1drL6suabNRSDRMrSGtPqKacvzcC84/89hJ1THtUhESDVPveaQNC2eNHzyN1D/7xk3t9gmJ\nhqn9EqGnH1q2bMWGkV7zg/u2e7+QaJYS19pt+v6dI1wj9Pd91U7WPMfbgFrVG9Kd52998dkD\ntoYy81u/8so1q7Zb6DsSzVJrSN+YuNeW1uervU551xvHDdzXZqP7SDRMrSEdu/+KVuuw6Y9t\nXd6959vabBQSDVNrSHtf3Go9UX18aP0Hz2uzUUg0TK0hTf5gq7W+74tD6yv2aLNRSDRMrSEd\nNeOpVuvfXTy4XD9zZpuNQqJhag3py9URX//Fshf8xVMb7359dUObjUKiYep9+PuTk6s9f3N6\nNX581Xfhljb7hETD1HxC9vFr3jx9ysC+r3zPsrbbhETDeBYhCBASBAgJAoQEAUKCACFBgJAg\nQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBAS\nBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFC\nggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIdF4jy9f\nW3oEIdFwW657YVWNO+ruwmMIiWY7f8pHfrj6rt+buKTsGEKi0b41/o6h43unbSg6h5BotHNO\nGj4+OVD2W5KQaLTXXrFtcfh1RecQEo12/Ae2LWbcUHQOIdFoFx85fHxk3P8qOoeQaLQH+68f\nPKw/4TVbis4hJJrtUxNOuelrCw9/4YqyYwiJhrv77YcNzLzwp4WnEBIECAkChAQBQoIAIUGA\nkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQI\nEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAF1h7Tl4SWLFy9d+Sy7hETD1BvSqov2\nr4ZMu3Jdu31ComFqDemxw6oZc+cvWHDpnIOqmavabBQSDVNrSGf337JttWlR37w2G4VEw9Qa\n0oFn7VifdkibjUKiYWoNqf+qHevLJ7bZKCQaptaQpp+6Y33SoW02ComGqTWkeX3XrB9erb2s\nuqTNRiHRMLWGtPqIasrxcy84/8xjJ1XHtEtFSDRMveeRNiycNX7wNFL/7Bs3tdsnJBqm9kuE\nnn5o2bIVG0Z4xWNHv3K7adWa53IbULcy19o9eckPf+Xfnrr26u1+13ckmqVMSD+uvtz29X60\no2HqvbLhX82p3nT22W02ComGqTWk6v/TZqOQaJhaQ3rf+Fm3rR70v6u/Xr26zUYh0TD13ke6\nd1bff3yi5T4SXafmBxt+cfWeB31BSHSd2h+1+/vjq7etFBJdpsDD3zc9f6/5QqK7lDiP9M+n\nV0Kiu5Q5Ifu1ix5o+3oh0TCejgsChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQ\nIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQ\nEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQB\nQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAg\nQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQUi95ZME737ngkdJTdCUh9ZDrBw4/66zD\nB24oPUc3ElLvuHXCpwYPn5xwa+FBupGQesfs84eP588uO0dXElLPeKrv28OLb/c9VXaSbiSk\nnvFP1YPDiwerfyo7STcSUs/YMPHrw4vbJm4oO0k3ElLveOvvDh9/561l5+hKQuodyyddsKbV\nWnPBpOWlJ+lCQuoh3zxkzyOO2HPaN0vP0Y2E1Es23H7ttbe7gzQahAQBQoIAIUGAkCBASBAg\nJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBNQd0paHlyxevHTls+wSEg1Tb0irLtq/GjLt\nynXt9gmJhqk1pMcOq2bMnb9gwaVzDqpmrmqzUUg0TK0hnd1/y7bVpkV989psFBINU2tIB561\nY33aIW02ComGqTWk/qt2rC+f2GajkGiYWkOafuqO9UmHttkoJBqm1pDm9V2zfni19rLqkjYb\nhUTD1BrS6iOqKcfPveD8M4+dVB3TLhUh0TD1nkfasHDW+MHTSP2zb9zUbp+QaJjaLxF6+qFl\ny1aM9GSfGz97w3ZnCIlmKXat3aof/dI/PPqSF223n5BolnpD+t6J049eNPxD3SXt3oof7WiY\nWkO6Y6Ca1F+9bujiICHRTWoN6a39/2PL+oX9r17bEhLdpdaQDvm9wZdLJ564SUh0l3ovEbps\n6PCZ6j1CorvUGtLBvz18/ONqgZDoKrWG9J6+P9s4eNxyZvXedwuJLlJrSD+bVr1haLHlPVUl\nJLpIveeRfvqu925bffHFQqKLeBYhCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQB\nQoIAIUGAkCBASBAgJAgQ0sh+euHMgUPffk/hKWgMIY1oxQsPX/i1m06Z8Odlx6AxhDSSLa85\nYegvol0/8cGic9AYQhrJPeMeHV4ceXHROWgMIY3khpdsW3zgDUXnoDGENJLrDt+2uOJ1Reeg\nMYQ0ktsHnhxe/PYfFJ2DxhDSSDZMe9/Q8dvjv1V0DhpDSCNaMvGd31n9w49MOb/sGDSGkEZ2\n91Hjqurg67YUHoOmENIzWbv88dIj0BxCggAhQYCQIEBIECAkCBASBAgJAoQEAUIa2bqPvvUl\nx7z3HwpPQWMIaUSP/5sDL7zxytmTv1J2DBpDSCN642+t3vpyywf3+seyc9AUQhrJ96sHho5b\nXvHBonPQGEIayacO27b4z28uOgeNIaSR/NeXb1tceUzROWgMIY3ky5PXDS9O+/2ic9AYQhrJ\nU/t9eOj4gwEP29ERIY3ocxPe/+PWmptfcHLZMWgMIY3sbw6t9uqbdMmGwmPQFEJ6Bpse+tK9\na0sPQWMICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJC6wMalSzp1880db126\nsfT71SRC6gLL953aqYGBjrfuu7z0+9UkQuotc+eWnqBLCWnMWv3wKHj720fjra4u/bEqT0hj\n1oFVYxxY+mNVnpDGrMlX3Jr3pS+Nwhu9YnLpj1V5QhqzJi+6vyEWCUlIY1evhzS748cX957Q\n8dapfzoao7aENIb1ekh33NKpPxroeOstj4zGqC0hjWG9HlLnvjIGfrQU0pjVlSF95g2jYNb4\n0Xirb354Vz5bQhqzujKkuTPOyjvjmFF4o2dN2KWnqxbSmNWdIZ1UetiO7Smk7iCksoTUJYRU\nlpC6hJDKElKXEFJZQuoSQipLSF1i0jvmN8Q7JnX8TglpJ0KqxUDpX47o3EDH75SQdiKkWgip\nLCF1CSGVJaQuMemcaxviHPeRhDR2edSuLCF1CSGVJaQuIaSyhNQlhFSWkLqEkMoSUpcQUllC\n6hKTjz65IY4WkpDGrivObYwrOn6nhLQTIbG7hLSTMRfSmoVXd2reCR074o0db31Hx7d/dY//\nrRQh7WTMhfTVcb/ZqRfs0bHxAx1v3bvj23/efxitj1ln5s8ve/tC2smYC+kre5b+oHfspMJ/\nn6j030cS0k6EtPuEVPoz0DEhjWVCKv0Z6FgvhjRQ+hcJOvbq0l/IpW//1aU/Ax0b6MGQxpf+\nzbbOFf5CPvvssrc/t/THv3PjhTSWFQ7pscfK3r6QdiKk56DH/6q4kHYy9kIaKP2EVB2b1esh\nzSr9GehYD95HurXv4KaYfNZofcyawaN2OxlzIa379A2NsWK0PmadcWVDx3owJDpW/OFvIe0g\npOYqHtJBb8p77fRReKNv6sEHG0bH3RtKTzAKSof0zUtGwcn9o/FW//inu/KOCekZ7X1r6QlG\nQemQRoW/av5MxkRIk3fpW3tDlL6yYVTctk/pCYTURleGVPrKhlGx8XulJxBSG10ZEqOk10J6\n5JaODfxRx1vvGKVpaYxeC+lPp3Zswt4db509StPSGHWHtOXhJYsXL135LLvGwI92a5Z+YvGj\npYfIK31lw6i474jSE9Qd0qqL9h++snbaleva7Ssf0qJ9Jr5s6rgzniw8RpyHv0dJrSE9dlg1\nY+78BQsunXNQNXNVm43FQ/qzgUUbWq07f+PYzWXniBPSKKk1pLP7b9m22rSob16bjaVDemLK\nDUPHlXt9rugceUIaJbWGdOBOv0Nw2iFtNpYO6Yv7bBxenHl60TnyhDRKag2p/6od68sn/tIr\n/+HXdjwKNqlau7u3EfHxV2xbfOjoonN0aPm+HT++ODDQ8dZ9Cz8p7Ks6nnSvvo63Tv2TUZq2\n1pCmn7pjfdKhv/TKzd9Yst3HqrIXjN70r98uLzyx6Bwd2rh0SaduvrnjrUs3ln2v/q7jSW+9\noeOtS0bryo5aQ5rXd8364dXay6pL2my8s3BIK6p7ho4bf/3DReegMWoNafUR1ZTj515w/pnH\nTqqOaXcvqHRIrdNeOngOaeM5+/1L2TloinrPI21YOGvoCX/6Z9+4qd2+4iGtef3kU+efe9gB\n3yk7Bo1R+yVCTz+0bNmKZ8ukeEitzZ//w+NOv7bduS7Yydi81q58SLBLhAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAsZmSPdW0DD37vKX+eiH1Fp+X3l7\nXPTZ7vPa15aeYBRctEfpr5WtduNZAGsIaSzoyj805plWxxAhNZeQxhAhNZeQxhAhNZeQxhAh\nNZeQxhAhNZeQxhAhNZeQxhAhNZeQxhAhNZeQxhAhNZeQxpAeCWnq7aUnGAXnnlt6glFw+9TS\nE+yeHgnpR5tLTzAKVnXjX6rZ/KPSE+yeHgkJRpeQIEBIECAkCBASBAgJAoQEAUKCACFBgJAg\nQEgQICQIEBIECAkChAQBQoIAIUGAkCBASBDQAyEt6ZszeDhh3LdLTxJ09LiVg4efTZhdepKg\nH237M1/7lh5kN/RASK3zqiWt1heq95WeI+nT1YcGDzdU15eeJOjnnxx0QXVU6UF2Qy+E9PND\nZ6xfe8hL1pWeI+mpfWYMHo7f44nSk6StetF+j5aeYTf0Qkitv+2bf/G4u0pPkXVedUer9ZPx\nc0rPkbblxPH/s/QMu6MnQmq9a6D/P5WeIey+6pxW6xNV1z3x5fzq6tIj7JbeCGlZVd1feoa0\nf7v3utZxh3TbE19+te/flx5h9/RESJuPPGDfY7aUniLsuurz/3fcB0pPEfbw1JeuKT3D7umJ\nkK6p/vqm6mOlpwhbvefJH6tWlJ4ia93MKQ+UnmE39UJID+55Yqt13KSHSs8RdsakWUeXniHs\nndUXSo+wu3ogpM1HTn5ka00DR3XZ/YlvVNWnSs+Q9dlq1tCZpE/+uPQku64HQvpItXDwcGV1\nbelJwqZNauj9iWfygW1XNlS3lp5k1/VASN1qZf95pUdgOyE11in9D5Yege2E1EwrFr2pml96\nCHYQUjN9se/XPtxtZ8YaTUgQICQIEBIECAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFC\nggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIECAkChAQBQoIAIUGAkCBA\nSBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKCACFBgJAgQEgQICQIEBIE\nCAkChAQBQoIAIUGAkCBASBAgJAgQEgQICQKEBAFCggAhQYCQIEBIECAkCBASBAgJAoQEAUKC\nACFBgJAgQEgQICQIEBIE/D9Kyfp/Ex1IXgAAAABJRU5ErkJggg==" }, "metadata": { "image/png": { "width": 420, "height": 420 } } } ] }, { "cell_type": "code", "source": [ "detect_outlier <- function(x){\n", " Q1 <- quantile(x,0.25)\n", " Q3 <- quantile(x,0.75)\n", " IQR <- Q3-Q1\n", " x > Q3+1.5*IQR | x < Q1-1.5*IQR\n", "}" ], "metadata": { "id": "0d-HqPUK4XpP" }, "execution_count": 7, "outputs": [] }, { "cell_type": "code", "source": [ "remove_outlier <- function(dataframe,columns=names(dataframe)){\n", " for(col in columns){\n", " dataframe <- dataframe[!detect_outlier(dataframe[[col]]),]\n", " }\n", " dataframe\n", "}" ], "metadata": { "id": "xR5m5vh-4ip8" }, "execution_count": 8, "outputs": [] }, { "cell_type": "code", "source": [ "remove_outlier(sample_data,c(\"x\",\"y\",\"z\"))" ], "metadata": { "colab": { "base_uri": "https://localhost:8080/", "height": 256 }, "id": "kVxxd9oQ4qXT", "outputId": "345039ae-b4a1-49de-dac6-a5aa1470c0be" }, "execution_count": 9, "outputs": [ { "output_type": "display_data", "data": { "text/html": [ "\n", "\n", "\n", "\t\n", "\t\n", "\n", "\n", "\t\n", "\t\n", "\t\n", "\t\n", "\t\n", "\n", "
A data.frame: 5 × 3
xyz
<dbl><dbl><dbl>
1141
2233
5388
7390
9467
\n" ], "text/markdown": "\nA data.frame: 5 × 3\n\n| | x <dbl> | y <dbl> | z <dbl> |\n|---|---|---|---|\n| 1 | 1 | 4 | 1 |\n| 2 | 2 | 3 | 3 |\n| 5 | 3 | 8 | 8 |\n| 7 | 3 | 9 | 0 |\n| 9 | 4 | 6 | 7 |\n\n", "text/latex": "A data.frame: 5 × 3\n\\begin{tabular}{r|lll}\n & x & y & z\\\\\n & & & \\\\\n\\hline\n\t1 & 1 & 4 & 1\\\\\n\t2 & 2 & 3 & 3\\\\\n\t5 & 3 & 8 & 8\\\\\n\t7 & 3 & 9 & 0\\\\\n\t9 & 4 & 6 & 7\\\\\n\\end{tabular}\n", "text/plain": [ " x y z\n", "1 1 4 1\n", "2 2 3 3\n", "5 3 8 8\n", "7 3 9 0\n", "9 4 6 7" ] }, "metadata": {} } ] }, { "cell_type": "code", "source": [], "metadata": { "id": "y56uRVgY455u" }, "execution_count": null, "outputs": [] } ] }