{ "cells": [ { "cell_type": "code", "execution_count": 2, "metadata": {}, "outputs": [ { "name": "stdout", "output_type": "stream", "text": [ "package 'arules' successfully unpacked and MD5 sums checked\n", "\n", "The downloaded binary packages are in\n", "\tC:\\Users\\User\\AppData\\Local\\Temp\\RtmpEXWcKI\\downloaded_packages\n" ] }, { "name": "stderr", "output_type": "stream", "text": [ "also installing the dependencies 'mclust', 'flexmix', 'prabclus', 'diptest', 'trimcluster', 'gridExtra', 'fpc', 'viridis', 'TSP', 'qap', 'gclus', 'dendextend', 'registry', 'irlba', 'crosstalk', 'scatterplot3d', 'seriation', 'igraph', 'DT', 'plotly'\n", "\n" ] }, { "name": "stdout", "output_type": "stream", "text": [ "package 'mclust' successfully unpacked and MD5 sums checked\n", "package 'flexmix' successfully unpacked and MD5 sums checked\n", "package 'prabclus' successfully unpacked and MD5 sums checked\n", "package 'diptest' successfully unpacked and MD5 sums checked\n", "package 'trimcluster' successfully unpacked and MD5 sums checked\n", "package 'gridExtra' successfully unpacked and MD5 sums checked\n", "package 'fpc' successfully unpacked and MD5 sums checked\n", "package 'viridis' successfully unpacked and MD5 sums checked\n", "package 'TSP' successfully unpacked and MD5 sums checked\n", "package 'qap' successfully unpacked and MD5 sums checked\n", "package 'gclus' successfully unpacked and MD5 sums checked\n", "package 'dendextend' successfully unpacked and MD5 sums checked\n", "package 'registry' successfully unpacked and MD5 sums checked\n", "package 'irlba' successfully unpacked and MD5 sums checked\n", "package 'crosstalk' successfully unpacked and MD5 sums checked\n", "package 'scatterplot3d' successfully unpacked and MD5 sums checked\n", "package 'seriation' successfully unpacked and MD5 sums checked\n", "package 'igraph' successfully unpacked and MD5 sums checked\n", "package 'DT' successfully unpacked and MD5 sums checked\n", "package 'plotly' successfully unpacked and MD5 sums checked\n", "package 'arulesViz' successfully unpacked and MD5 sums checked\n", "\n", "The downloaded binary packages are in\n", "\tC:\\Users\\User\\AppData\\Local\\Temp\\RtmpEXWcKI\\downloaded_packages\n" ] } ], "source": [ "# install.packages(\"arules\")\n", "# install.packages(\"arulesViz\")" ] }, { "cell_type": "code", "execution_count": 2, "metadata": {}, "outputs": [ { "name": "stderr", "output_type": "stream", "text": [ "Loading required package: Matrix\n", "\n", "Attaching package: 'arules'\n", "\n", "The following objects are masked from 'package:base':\n", "\n", " abbreviate, write\n", "\n", "Loading required package: grid\n" ] } ], "source": [ "library(arules)\n", "library(arulesViz)\n", "# library(datasets)" ] }, { "cell_type": "code", "execution_count": 3, "metadata": {}, "outputs": [ { "name": "stdout", "output_type": "stream", "text": [ " lhs rhs support confidence lift \n", "[1] {laptop} => {mobile} 0.125 1.0000000 1.6000000\n", "[2] {headset,laptop} => {mobile} 0.125 1.0000000 1.6000000\n", "[3] {charger,pad} => {mobile} 0.125 1.0000000 1.6000000\n", "[4] {charger,headset,pad} => {mobile} 0.125 1.0000000 1.6000000\n", "[5] {charger} => {mobile} 0.250 0.6666667 1.0666667\n", "[6] {pad} => {mobile} 0.250 0.6666667 1.0666667\n", "[7] {headset,pad} => {mobile} 0.250 0.6666667 1.0666667\n", "[8] {} => {mobile} 0.625 0.6250000 1.0000000\n", "[9] {headset} => {mobile} 0.500 0.5714286 0.9142857\n", "[10] {charger,headset} => {mobile} 0.125 0.5000000 0.8000000\n" ] }, { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAAAM1BMVEUAAABNTU1oaGh8fHyM\njIyampqnp6eysrK9vb2+vr7Hx8fQ0NDZ2dnh4eHp6enw8PD////ojgWfAAAACXBIWXMAABJ0\nAAASdAHeZh94AAAcEklEQVR4nO3d2WKbyBZA0UJzW9bw/1/bQpNBYrDQKTuGtR7S6SY23Jva\nZlAB6Qi8Lf32BsAYCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkC\nCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkC\nCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkC\nCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkC\nCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkCCAkC\nCAkCCAkCCAkCCAkCCAkCCAkCDA0pFZ+h2wF/2uCQUlocQrcE/rDhIW2LtJISnA0P6XhYpLTc\nhm4N/FFvhHQ87hblEd5m97xjSlXt36PdwM2C3/FWSKeUVkXvuG8P6b9WQuJveTOkk91mMRMS\nE/d+SMNXISRGQ0gQ4AdGrJAYPyFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFB\nACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFB\nACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFB\nACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFB\nACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBACFBgMEj9rAqTr+uZynNPwauQkiM\nxtARuy9SOh5Ov5Tmw1YhJEZj6IhdpsXh9Mtyf2pqmVaDViEkRmPoiE3pcP3ldJSXikGrEBKj\nMTyk0y9FqvzLw+KK1u8hJMZi+KHd7nhcl7+Ue6TOkyQhMX5DR+wuFavdcVGcStrO0nbQKoTE\naAwesdvi69htPWwVQmI03hixH8tZWdFivR+4CiExGmY2QAAhQQAhQQAhQQAhQQAhQQAhQQAh\nQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAh\nQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAh\nQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAh\nQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAhQQAh\nQYA3R+xmltJiO3AVQmI0ho7YdP7CeTpbDVuFkBiNt0JapdXheNyv0mbQKoTEaLwVUpEO5e8P\naTZoFUJiNN4KKaXKvzwsrmj9Hn0hpQ4DtxuyeCuk5S2kYtAq+kOyy+KPGB7SYr3Zpo/Tbw+r\n7qsNQmL8hod0P8JKqTgMWoWQGI3BA3K322wWi/Mlh1VnR0JiAv7pmQ1C4q8QEgQQEgQQEgQQ\nEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgQQEgSoDcjPVfkM4vnq\nM98qaguExFhUBuTH7P70xVnPc/GHruJhgZAYi/uA3M/TfLMrnwd0+Fyffr+PX8XTAiExFrcB\nuU21h2rtVylspyQkxu82IBePz6Y7LKNX8bxASIyFq3YQQEgQoD4gt4vyad6LuAsNz6uoLhAS\nY1EbkPPLY/FTEVqSkBi/6oDcpPmhDGmTwi40PK6ivkBIjEV1QJZvsqy9iS9+FfUFQmIsqgPy\nfFgnJHhddUDOrnukXffLld9ZRX2BkBiLhnOkbZE2uVZRXyAkxqI2IBfXOavzfKuoLRASY/H8\nOVJafORcRXWBkBgLMxsggJAgwOPl77OiyLWK+gIhMRZNIe19jgSv+bqxr8rnSPCS+4CcVTsK\nffqJkBi/xnOkfKuoLxASY+GqHQQQEgSoH9rd5VpFfYGQGAshQYCGAfk5X+RexXWBkBiLpgF5\ncKs5vKZxQDq0g9c0DchNMtcOXtJ8sWGdaxX1BUJiLJpCmoXeaS4kJsAHshBASBDgNiBTXY5V\nPC8QEmMhJAjg0A4CCAkC1Afkx9xz7WCA2oCce9IqDFJ/9ndRvsrcs7/hVdUBOUu78z+9jQJe\n1PjwE5e/4TXNeySzv+ElzpEggKt2EODhcyTvR4IhzGyAAEKCALUBuZkdj/tZ8DP0hcQEVAfk\ntvz8qCivNngbBbykOiDn6eM8q+Ej9rKdkBi/x5kNu7QyswFe9RjSIm2FBK+qH9rttuXsIId2\n8KKHiw3nZ0Omcq+UZxX1BUJiLOqXv4vyDOk4i53aICTGzweyEEBIEKBp0mroGZKQmILG2yhe\nemNf77VyITF+1QG5ut/Y98prXYQEtVFevHCr+QuPOBYS4zf04SefhZDgrn5od9sjrfq/8LBI\n8/35OzSN6W9VJiRGozYgF+dzpM/iey81/0ip/OTWORK89VqX/TwtDkKC90I6Htep2AoJ3p3Z\nsJv1Vyckxu/tAbkUEjSP8s+XpjYMWsV5gZAYi9qAXHmHLAxS/xzpxo198JL6FKGP4zzt93OP\n44LXPE4RWp/2RjvPbIDXPIa0LV/p4hwJXlMdkIvTod0+zY6fQoLXPDxF6Hpz3/cm2w1YRX2B\nkBiL2oBcl/+2TN+Z/D10FbUFQmIsPPwEAggJAtwG5OLwsOAQdp4kJMbvNiC3aVVNab+Km90g\nJMbvPiD38zTf7MqYDp/r+fU28thVPC0QEmNRGZAfs/tcu1nkZDshMX61Afm5Kj9Fmq+8QxZe\n46odBBASBBASBBASBBASBBASBBASBKgOyNk6bjpDyyrqC4TEWNRvNU85WhIS41cdkIePZY6W\nhMT4PQ7Iz/UsuiUhMX4NA3JXvoxvk3UV1wVCYiyeB+T28m7zuEfbCYnxexiQh3VR3kRxONUU\n9iB9ITF+9dsoyosNq8uLZOOebSckxq/2OdJpZ7S53XCeihyrqC8QEmNR+xxpEfoWiqZV1BcI\nibGofY6UfxX1BUJiLGoD8rAqj+eKVWxRQmL8qgNyX5yvMKRUhM5tEBLjVx2Q87Q8P45rFXfp\n+3EV9QVCYizqk1YffxO+ivoCITEW1QFZpMvJ0UFI8JrqgFyleflEu8957HtdhMT41Qbk/Pqg\n1dBXyAqJCagPyI9FmVHgzO/nVVQXCImx8MwGCCAkCCAkCFAbkOv7i12yraK2QEiMRXVAru/v\nRxISvKT+gWzw9brnVdQXCImxaJwilG8V9QVCYiyqA3KRstyRJCTGr34bxTz2pZfPq6gvEBJj\n8fDIYhcbYAghQQAfyEIAIUGA+oDcLsqjukXs6yiExPg9349UPhvSw0/gJdUBuUnz813mm7TM\ntYr6AiExFo/PbLg+kCvXKuoLhMRYPE4REhIMUB2Qs+seaZdmuVZRXyAkxqLhHGkbPAtcSIxf\nbUAuPEUIBnn+HCktPnKuorpASIyFmQ0QQEgQQEgQwG0UEEBIEKBhQH7OQ98zJiQmoGlAHkxa\nhdc0DkiHdvCapgG5SUXuVVwWCImxaL7YsM61ivoCITEWTSHNYp9cLCTGzweyEEBIEKDlA9nI\nD2WFxPi9G9Km6D2lEhLjVxuQ62J7+vWz+M6NfbtFKjbXd5N1/3khMX7VAblOu/M/d6l/jtDu\nXNAqLQ/H/aL71nQhMX6PTxGq/6bdMq2Ox9Xlk9tD98NShMT41Z9rd9sj9T9F6NLaddf1HN63\nTrbeDil1+M5yiFIdUKcdTHmO9K2nCF1G4sflD3ZPKcoY0pvLIUptQM2vP61X/V+3LM+OLg7L\n7i8QEuNXH1Af56cIbb/xdYeickbVPcdVSIzf8AG1uuVT9OzAhMT4/ekpQkLiX/H8gMg/9KIx\nIfGveL7YcPw7LxoTEv+K6oD6cy8aExL/ivoHsn/sRWNC4l/xOEVISDBAdUD9uReNCYl/RcM5\n0t950ZiQ+FfUBtRfe9GYkPhXPH+O9IdeNCYk/hVmNkCA6oBafGPW95urqC8QEmPReIdsvlXU\nFwiJsXi8/J15FfUFQmIsqgPqsJh/Zl5FfYGQGIv6oV2WJxoIifETEgS4DahV6JtcGlfxvEBI\njMVtQN0nrOZbxfMCITEWXyHthQRD3QbUMt/jE4XE+N0G1GEhJBjMzAYIICQIYPY3BBASBBAS\nBBASBBASBBASBBASBBASBKgNqFVhihAMUR1QK3PtYJj6FKHQRxU3raK+QEiMhbl2EKB+aOdx\nXDBIbUDN57Fvj21YRW2BkBiL2oDautgAg1QH1NpVOximOqCCXzDWtIr6AiExFq7aQYD6oZ2r\ndjBIbUCtPUQfBqkf2rnYAIMICQK4jQICCAkC1AfUdlEe1S1iJwoJifGrz7W7nB6lIrQkITF+\n1QG1SfNDGdImLXOtor5ASIxFfYrQ4TK7wVU7eM3jFCEhwQDVATW77pF2aZZrFfUFQmIsGs6R\ntsGzwIXE+NUG1O2tffN8q6gtEBJj8fw5Ulp85FxFdYGQGAszGyCAkCBA4x2yRZFrFfUFQmIs\nmkLa+xwJXnMbUNtU5XMkeMl9QM2qHYXecS4kxq/xHCnfKuoLhMRYuGoHAW4D6jJh1TMbYBAh\nQQCHdhBASBBASBBASBBASBBASBBASBBASBBASBBASBBASBBASBBASBBg8IA6LFOab6/fpPO7\nCInxGzqgDsX5dovF5ZsIiYkbOqBW5fPBD5vi/HRjITF1QwdUcfnCfTHbCwmGDqhbO4f5vCmk\n2sO9Wr/Hr4eU2g38/4WJGjpgyncpXX83/7t7pPY/ICReMnTAfL1ndp/mQmLqBg+Y1b2ebc+B\nkJAYv+EDZre4/W6/FBITN+2ZDUIiiJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIi\ngJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERAAhCYkAQhISAYQkJAIISUgE\nEJKQCCAkIRFASEIigJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERAAhCYkA\nQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFA\nSEIigJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERAAhCYkAQhISAYQkJAII\nSUgEEJKQCCAkIRFASEIigJCERAAhCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERAAh\nCYkAQhISAYQkJAIISUgEEJKQCCAkIRFASEIigJCERIChAybVDVqFkBiNoQNm0x3Styr790NK\nHb6znMkY/Pe9K+bvruIPhPTuCpiK4X/fu7R6cxVCYjTe+PvepN17qxASo+GqXc4NYDKElHMD\nmAwh5dwAJkNIOTeAyRBSzg1gMoSUcwOYDCHl3AAmQ0g5N4DJEFLODWAyhJRzA5gMIeXcACZD\nSDk3gMkQUs4NYDKElHMDmAwh5dwAJkNIOTeAyRBSzg1gMoSUcwOYDCHl3AAmQ0g5N4DJEFLO\nDWAyhJRzA5gMIeXcACZDSDk3gMkQUs4NYDKElHMDmAwh5dwAJkNIOTeAyRBSzg1gMoSUcwOY\nDCHl3AAmQ0g5N4DJEFLODWAyhJRzA5gMIeXcACZDSDk3gMkQUs4NYDKElHMDmAwh5dwAJkNI\nOTeAyRBSzg1gMoSUcwOYDCHl3AAmQ0g5N4DJEFLODWAyhJRzA5gMIeXcACZDSDk3gMkQUs4N\nYDKElHMDmAwh5dwAJkNIOTeAyRBSzg1gMoSUcwOYDCHl3AAmQ0g5N4DJEFLODWAyhJRzA5gM\nIeXcACZDSDk3gMkQUs4NYDKElHMDmAwh5dwAJkNIOTeAyRBSzg1gMoSUcwOYDCHl3AAmQ0g5\nN4DJEFLODWAyhJRzA5gMIeXcACZDSDk3gMkQUs4NYDKElHMDmAwh5dwAJkNIOTeAyRBSzg1g\nMoSUcwOYDCHl3AAmQ0g5N4DJEFLODWAyhv99f64XqbRYfQ5chZAYjaF/34dZ+jIftgohMRpD\n/75XqfjYnX+33xZpNWgVQmI0hv59F2l3//0uFYNWISRGY+jfd0pt/3L9LxXt36Pdt/7Au8u7\n/kDIBjAZP7BHgvF74xxpuz//rvccCcZv8BHIvHIUMztEbhL8PW98jrQ6f45ULNY9nyPB+Dkn\nhgBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBCggBC\nggBCggBCggBCggBCggBCggBCggBCggBCggBCggBTCGm9/+0tYPQmENIuFUois3GEtOt8r/pW\nSeT2L4S03r75DQ4pdb6jSUnk9i+ENE/b/Tsvzzx8VF5o26inpN0iLbuW71eLZWfsh/Vi9e5P\nA/60fyGkfZGKzmOzbodi3v2/4nNWvlmwvZTPlGZdy08ZLlJatK9gW6TuP8Do/QshnUZq+uj8\nA90/8Vcpde5v0mK3W3eUUlbctc8qyt3lMrW2vj+/jPq0V+vYCEbunwhpMS9S15FR30/8Vfsg\nP5nPyl93RUsph10q3yXdWtJp+XUlbYefy3IF+3d2qvx5/0RIh/Lorr2k/p/4nSWlzfkfLVfB\n7weGLSV9HTguUsvL24vFpaP9zHnSZP0TIR2PnSV1/MS/HfN1lXQLcNVcyunA8BJIS0n35Z9t\nx59lQ+XWHVr3WYzer4d0S+Fc0qa+bHWpo/0n/tcxX0dJi+sZ1GZWrJuW3790m1qWX0rcpc3z\nwv28/AObS+XNX88U/HZIXymcSpo/jMTrEG/9iV895msv6XZMt160HJrdv7TlIvr17GjbdElj\nc8p/ny7fYNt5oseo/XJI1RROJT0eGl2GeOtP/Nox3+r5uGq/SIt9OdiLz/Jqw9MOpe/A8LR8\ncVm++Dwl33i1o/yvp4PC7bHtDzAJvxxS/fSntsdYXRqaH9t/4vec5Z/G9/y8N/pIqZg9x9J3\nYHhafjLfn8+TUssJ0Kr8MHhbLvdB0pT9ckgdKazO037OQ7ztJ373Wf6+3M9driDcdi0Py7sP\nDPfXJcWh68Dxsu7TCrrnPjByvx1SRwq7Y3lOci3p6Sf+frbvOctflIs+2uc09B0YnpeX3+F5\nn3XeW+5X5z3oqu2qOFPyyyF1pnAo7kd3zz/xP0+BdJ7lH8qLbIdi3fpJa9/HP7dwl1+7xq/N\n/iynCKbV/rZjY+J+MaTdvuP05+x2reH5sOo6fa7rLP+8kytnNZwOzhquW3fsDa+z0W8hXS97\nr6p7xPPecleeYe2Oi6LnfygT8Gsh7U4prPsueLWVdJ4+tynKktrP8pcfx3V5JWAzmzXuM1r3\nhtfZ6LfPn26fH9VutL3sLQ+r08o3TZ8vMTG/FdL2NACvn850XfBqKWl2Pn3Zn0rqPss/72sa\nTn/OWveG19nouzS7bmrzhIfLNm2KdP1zTNlvhVScZwsctvuWC163W4CuJT20cN0H7FtOf25f\nfN6X7J9v+rt+ftS6N7zORl+nYld+/vQ8x283r06IaN7hMSk/HtLlAOmjvNR1WJ72Rc+Xvcvx\neRrK89R6hnSfPrdsLOl+/9DhVEpTJ7fPj9r2hrfZ6JuW5Zc7crvnnDMtPx3Sdb5OeU/rujy/\nKJ7O1M/js7wF6LBsLKncG9ynzxXnT3kefN0/tG3qoPL5UcuB4X02+qHx1tjbHblK4u7H90jX\nT0jLSQPlZefN813ip/H5ebsF6PyRaO3I6bw32F2H8OkI7SmU2v1D+83z/Llv3T7UPBv9vDv9\nurFCSdz8/DnSpaT9cnG+KWHdsAGrVLTeAnTdG6zP0+fK6Tmrh2/Qf/9Q9+dHt/Orptno193p\n1x25SuLqFy42VD8h3Tfe2dB+C9A9k8vpy6b8zbe/uHQ6MOycWPT1fIaG2ei3Tf/qp+2KIFPz\n4yF9PYnkMN+sW36it98CdN8bHDaLVblvmj1de+66f6g8MOycTVF5PkPDbPTnkuDs5y823J9E\nUl4JaLsTrv0WoIcxvGp4Elf7F58PDDtmUzw8n6Hh0FBJNPrpkGpPImm4ka7/FqCvMbwrFrOW\nqUXNX3w9MGz9/Kj3/Oprd6okan46pO4nkXTeAnS9Te9rDO+Xadl8U2vb/UPXA8PW2RQ9z2eo\nPthLSVT9eEidTyKp3wJUL+F+m953xnDbH7n+99aJRZ3PZ6jvTl1noOKnQ+p+Ekn9FqD6/ujr\nNr1hJR02y4+uL73s8Lqez9C3O2XCfmlmQ8uTSOq3ANXUbtP7xt7gsZjzQeO2vaTbDq/r+Qw9\nD/Ziwn4upL4nkZy3pn4LUEXvbXpPavcPlTu0w/Hz8t+bSvra4XU8n6HvwV5M14+F1PckkrPH\nW4C+9N6m96x2/9Dy9nHTvrmkyg7vjQd7MVk/FVLfk0guOm4B6rtNr8dt97SaNR4Y1nZ4TSVd\n3vzSuTtlyn4qpL4nkXzOUvljvv0WoGPPbXo9bm08TpK9Psy1vsN7Lun25peu3SlT9kMh9Z3i\n7MrxWewbbwHazS+fH7Xdpvctq+vX7R5DulZR3+GtHj9kur/5pWN3ypT9WEjdpzjzebm/Oh/4\nVW4BOu8u7q8Ba7lNr9/u8sVfdxRWfe19qju8+ovQ+978Aj91aNdzinPeTzwN1Ms9fvfXgDXe\nptfr6ykrH40HjbeS2nd4fW9+gZ8I6faE7dZTnP3qOvW0qaTPys6g6Ta9Pl9PWSlO5zfN84Iu\nsx3ad3h9b36B/CHdnpDQ+hN/+/XBTUNJxZs7g76nrBzvJXXs8Pre/MLkZQ/p/oSE1p/4xfzw\nebux+2mgvrsz6HjKSnUl506adnjX3Wnfm1+YuuwhfT0hofkn/uUWoPsjEpqe4HD5zbCdQcdT\nVppW8uj+wCGTvemUPaTKExIaf+IX8+vDHhtus6tPMx20M+h6ykpFSyeVBw4piS75Q+p5wert\n3vHnkvqmmX5P11NWapvRtJLqA4eURIfsIfW+YPU2QE8l1fYZfdNMX9P8lJXqZjR1XnvgkBuQ\naPcDFxv6XrB6L6k+1PummX5fx1NWenhfOd+UMaTr1J7+F6w2d9IzzfQFXU9Z6eZ95XxTlpDq\nU3v6X7Da/HzvlmmmQwz9Dt5XzjflCak+taf/BatNJbVNM/0Z1weuel8535Pn0O5has83vqDp\nFqGWaaY/4f7AVe8r51synSO9P7WnY5rpD/h64Kr3lfMduS42RMzzbJ1mmtvDA1ehV7ardhHz\nPH9pb9D/Qgt4kO/y9x+e59nzwFV4kvFzpD88p6b7gavwJOfMhj9dUscDV+FJ1ilCf7qk9geu\nwpO8c+3+8DzPjgeuwpNfePXlH/GHd6f8PCG1UhLfJ6R2SuLbhNTh6YGr0EJIXdaufvM9QoIA\nQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIAQoIA\nQoIAQoIAQoIAQoIAQoIA/wOg3uGpKN1UkwAAAABJRU5ErkJggg==", "text/plain": [ "plot without title" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "# w1 = read.table(\"C:/Users/sbgowtham/Desktop/comm.csv\")\n", "w1 = read.table(\"data//retail.csv\")\n", "\n", "# trans = read.transactions(\"C:/Users/sbgowtham/Desktop/comm.csv\", format = \"basket\", sep=\",\");\n", "trans = read.transactions(\"data//retail.csv\", format = \"basket\", sep=\",\");\n", "\n", "itemFrequencyPlot(trans,topN=20,type=\"absolute\")\n", "\n", "\n", "rules<-apriori(data=trans, parameter=list(supp=0.001,conf = 0.08), \n", "appearance = list(default=\"lhs\",rhs=\"mobile\"),control = list(verbose=F))\n", "\n", "rules<-sort(rules, decreasing=TRUE,by=\"confidence\")\n", "\n", "\n", "inspect(rules[1:10])\n", "\n", "\n", "plot(rules,method=\"graph\",interactive=TRUE,shading=NA)" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "* Market Basket Analysis is for the retailers to identify relationships between the items that people buy.\n", "\n", "* Association Rules is widely used to analyze retail basket or transaction data\n", "\n", "An Example of Association Rules Assume there are 100 customers 10 out of them bought milk, 8 bought butter and 6 bought both of them.\n", ">bought milk => bought butter \n", "Support = P(Milk & Butter) = 6/100 = 0.06 \n", "confidence = support/P(Butter) = 0.06/0.08 = 0.75 \n", "lift = confidence/P(Milk) = 0.75/0.10 = 7.5 " ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Online Retail dataset from UCI Machine Learning repository's \n", "http://archive.ics.uci.edu/ml/datasets/online+retail " ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "https://bit.ly/2xFRaS3 \n", "http://www.salemmarafi.com/code/market-basket-analysis-with-r/ \n", "https://rpubs.com/emzak208/281776 " ] }, { "cell_type": "code", "execution_count": null, "metadata": {}, "outputs": [], "source": [] } ], "metadata": { "kernelspec": { "display_name": "R", "language": "R", "name": "r" }, "language_info": { "codemirror_mode": "r", "file_extension": ".r", "mimetype": "text/x-r-source", "name": "R", "pygments_lexer": "r", "version": "3.4.1" }, "toc": { "base_numbering": 1, "nav_menu": {}, "number_sections": true, "sideBar": true, "skip_h1_title": false, "title_cell": "Table of Contents", "title_sidebar": "Contents", "toc_cell": false, "toc_position": {}, "toc_section_display": true, "toc_window_display": false } }, "nbformat": 4, "nbformat_minor": 2 }