ETVL-R-9-graficos-interactivos.ipynb

{
 "cells": [
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "<center>\n",
    "# R -- Visualizacion interactiva."
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Autor.**\n",
    "> <img src=\"../firma_github.png\" width=\"500\" align='left'>"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "# Bokeh"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Bibliografía**.\n",
    "\n",
    "> [Bokeh](http://bokeh.pydata.org/en/latest/) by Continuum Analytics  \n",
    "[rBokeh](http://hafen.github.io/rbokeh/#building_with_layers) - R interface to Bokeh by Ryan Hafen (@hafenstats) \n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "Bokeh es una librería para graficación desarrollada por [Continuum Analytics](https://www.continuum.io). rbokeh es un puerto para usar Bokeh desde el lenguaje R. Los tutoriales de Bokeh y rBokeh puede consultarse en el vínculo suministrado en la bibiografía.\n",
    "\n",
    "Los gráficos en Bokeh pueden hacerse directamente desde Jupyter, RStudio o el R IDLE, tal como se ilustra en la siguiente gráfica:\n",
    "\n",
    "<img src=\"images/rbokehplot.png\" width=\"800\" align='center'>"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "A continuación se explica como graficar usando rBokeh en Jupyter."
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 4,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "name": "stderr",
     "output_type": "stream",
     "text": [
      "html file written to: files/out.html\n"
     ]
    },
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html>\n",
       "<html>\n",
       "<head>\n",
       "<script src=\"https://cdn.pydata.org/bokeh/release/bokeh-0.11.1.min.js\"></script>\n",
       "<link href=\"https://cdn.pydata.org/bokeh/release/bokeh-0.11.1.min.css\" rel=\"stylesheet\">\n",
       "</head>\n",
       "<body>\n",
       "<div id=\"4f5ec64eeb51aad0fc76ae8c091ef705\" class=\"plotdiv\"></div>\n",
       "<script type=\"text/javascript\">\n",
       "Bokeh.$(function() {\n",
       "  var modelid = \"da55b41a2dcc5c99d9022ca824d39779\";\n",
       "  var elementid = \"4f5ec64eeb51aad0fc76ae8c091ef705\";\n",
       "  var docid = \"4765aa30fc3d41b164b5c6149579b026\";\n",
       "  var docs_json = {\"4765aa30fc3d41b164b5c6149579b026\":{\"version\":\"0.11.1\",\"title\":\"Bokeh Figure\",\"roots\":{\"root_ids\":[\"da55b41a2dcc5c99d9022ca824d39779\"],\"references\":[{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"attributes\":{\"title\":null,\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"plot_width\":470,\"plot_height\":474,\"x_range\":{\"type\":\"Range1d\",\"id\":\"01ca0c1b226b39d7862998f84039d986\"},\"y_range\":{\"type\":\"Range1d\",\"id\":\"93700faa08e9392fab57d5df9880fcb7\"},\"left\":[{\"type\":\"LinearAxis\",\"id\":\"d6683affc649e962062bc0c5bf53adc3\"}],\"below\":[{\"type\":\"LinearAxis\",\"id\":\"fe18ed490ee6695db78213ba1eb9f2c3\"}],\"right\":[],\"above\":[],\"renderers\":[{\"type\":\"BoxAnnotation\",\"id\":\"24151f19e83c18d44024e8e0b3add2fe\"},{\"type\":\"GlyphRenderer\",\"id\":\"3ecf1947759a318754d2f4879135f776\"},{\"type\":\"LinearAxis\",\"id\":\"fe18ed490ee6695db78213ba1eb9f2c3\"},{\"type\":\"Grid\",\"id\":\"3ed62c1e8edd450e01b81da2fef42436\"},{\"type\":\"LinearAxis\",\"id\":\"d6683affc649e962062bc0c5bf53adc3\"},{\"type\":\"Grid\",\"id\":\"2ce6010a8972beeb97a749f358736e77\"}],\"tools\":[{\"type\":\"PanTool\",\"id\":\"77aa03e8ba8b5d41daf080b92a704708\"},{\"type\":\"WheelZoomTool\",\"id\":\"3a8c7d83e566e5440177b49f15a844cf\"},{\"type\":\"BoxZoomTool\",\"id\":\"bb02dc40a5501c062be66dfe9cb91a73\"},{\"type\":\"ResizeTool\",\"id\":\"27636bf2809d07d82cc5eb9a61142050\"},{\"type\":\"ResetTool\",\"id\":\"706fba041b6b206c1af74ce377e8d765\"},{\"type\":\"PreviewSaveTool\",\"id\":\"9ff302ccdd140f9c47bb5918abd14008\"},{\"type\":\"HelpTool\",\"id\":\"cced5aba7962ba8ee1fd31488e04d1fe\"}],\"tool_events\":{\"type\":\"ToolEvents\",\"id\":\"7b256172a1db4611bc0e5772ad0a6d26\"},\"extra_y_ranges\":{},\"extra_x_ranges\":{},\"tags\":[],\"doc\":null,\"min_border_left\":4,\"min_border_right\":4,\"min_border_top\":4,\"min_border_bottom\":4,\"lod_threshold\":null},\"subtype\":\"Figure\"},{\"type\":\"PanTool\",\"id\":\"77aa03e8ba8b5d41daf080b92a704708\",\"attributes\":{\"id\":\"77aa03e8ba8b5d41daf080b92a704708\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"dimensions\":[\"width\",\"height\"]}},{\"type\":\"ToolEvents\",\"id\":\"7b256172a1db4611bc0e5772ad0a6d26\",\"attributes\":{\"id\":\"7b256172a1db4611bc0e5772ad0a6d26\",\"tags\":[],\"doc\":null},\"geometries\":[]},{\"type\":\"WheelZoomTool\",\"id\":\"3a8c7d83e566e5440177b49f15a844cf\",\"attributes\":{\"id\":\"3a8c7d83e566e5440177b49f15a844cf\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"dimensions\":[\"width\",\"height\"]}},{\"type\":\"BoxAnnotation\",\"id\":\"24151f19e83c18d44024e8e0b3add2fe\",\"attributes\":{\"id\":\"24151f19e83c18d44024e8e0b3add2fe\",\"tags\":[],\"doc\":null,\"line_color\":{\"units\":\"data\",\"value\":\"black\"},\"line_alpha\":{\"units\":\"data\",\"value\":1},\"fill_color\":{\"units\":\"data\",\"value\":\"lightgrey\"},\"fill_alpha\":{\"units\":\"data\",\"value\":0.5},\"line_dash\":[4,4],\"line_width\":{\"units\":\"data\",\"value\":2},\"level\":\"overlay\",\"top_units\":\"screen\",\"bottom_units\":\"screen\",\"left_units\":\"screen\",\"right_units\":\"screen\",\"render_mode\":\"css\"}},{\"type\":\"BoxZoomTool\",\"id\":\"bb02dc40a5501c062be66dfe9cb91a73\",\"attributes\":{\"id\":\"bb02dc40a5501c062be66dfe9cb91a73\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"overlay\":{\"type\":\"BoxAnnotation\",\"id\":\"24151f19e83c18d44024e8e0b3add2fe\"}}},{\"type\":\"ResizeTool\",\"id\":\"27636bf2809d07d82cc5eb9a61142050\",\"attributes\":{\"id\":\"27636bf2809d07d82cc5eb9a61142050\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"}}},{\"type\":\"ResetTool\",\"id\":\"706fba041b6b206c1af74ce377e8d765\",\"attributes\":{\"id\":\"706fba041b6b206c1af74ce377e8d765\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"}}},{\"type\":\"PreviewSaveTool\",\"id\":\"9ff302ccdd140f9c47bb5918abd14008\",\"attributes\":{\"id\":\"9ff302ccdd140f9c47bb5918abd14008\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"}}},{\"type\":\"HelpTool\",\"id\":\"cced5aba7962ba8ee1fd31488e04d1fe\",\"attributes\":{\"id\":\"cced5aba7962ba8ee1fd31488e04d1fe\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"redirect\":[\"http://hafen.github.io/rbokeh\"],\"help_tooltip\":[\"Click to learn more about rbokeh.\"]}},{\"type\":\"ColumnDataSource\",\"id\":\"5bf3277a3a70632e74f5dcef05198ec9\",\"attributes\":{\"id\":\"5bf3277a3a70632e74f5dcef05198ec9\",\"tags\":[],\"doc\":null,\"column_names\":[\"x\",\"y\",\"size\",\"line_color\",\"fill_color\"],\"selected\":[],\"discrete_ranges\":{},\"cont_ranges\":{},\"data\":{\"x\":[1,2,3,4,5,6,7,8,9,10],\"y\":[1,2,3,4,5,6,7,8,9,10],\"size\":[15,30,45,60,75,90,105,120,135,150],\"line_color\":[\"#FF0000\",\"#E2001C\",\"#C60038\",\"#AA0055\",\"#8D0071\",\"#71008D\",\"#5500AA\",\"#3800C6\",\"#1C00E2\",\"#0000FF\"],\"fill_color\":[\"#FF0000\",\"#E2001C\",\"#C60038\",\"#AA0055\",\"#8D0071\",\"#71008D\",\"#5500AA\",\"#3800C6\",\"#1C00E2\",\"#0000FF\"]}}},{\"type\":\"Circle\",\"id\":\"fce7767fda629a19609fcc5320159edf\",\"attributes\":{\"id\":\"fce7767fda629a19609fcc5320159edf\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_alpha\":{\"units\":\"data\",\"value\":1},\"fill_alpha\":{\"units\":\"data\",\"value\":0.5},\"x\":{\"units\":\"data\",\"field\":\"x\"},\"y\":{\"units\":\"data\",\"field\":\"y\"},\"size\":{\"units\":\"screen\",\"field\":\"size\"},\"line_color\":{\"units\":\"data\",\"field\":\"line_color\"},\"fill_color\":{\"units\":\"data\",\"field\":\"fill_color\"}}},{\"type\":\"Circle\",\"id\":\"3b8f892666eae46626a33f22ba9a05a9\",\"attributes\":{\"id\":\"3b8f892666eae46626a33f22ba9a05a9\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_alpha\":{\"units\":\"data\",\"value\":1},\"fill_alpha\":{\"units\":\"data\",\"value\":0.5},\"x\":{\"units\":\"data\",\"field\":\"x\"},\"y\":{\"units\":\"data\",\"field\":\"y\"},\"size\":{\"units\":\"screen\",\"field\":\"size\"},\"line_color\":{\"units\":\"data\",\"value\":\"#e1e1e1\"},\"fill_color\":{\"units\":\"data\",\"value\":\"#e1e1e1\"}}},{\"type\":\"Circle\",\"id\":\"f32227dfb1113dfba3eafc7f50dc13b3\",\"attributes\":{\"id\":\"f32227dfb1113dfba3eafc7f50dc13b3\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_alpha\":{\"units\":\"data\",\"value\":1},\"fill_alpha\":{\"units\":\"data\",\"value\":1},\"x\":{\"units\":\"data\",\"field\":\"x\"},\"y\":{\"units\":\"data\",\"field\":\"y\"},\"size\":{\"units\":\"screen\",\"field\":\"size\"},\"line_color\":{\"units\":\"data\",\"field\":\"line_color\"},\"fill_color\":{\"units\":\"data\",\"field\":\"fill_color\"}}},{\"type\":\"GlyphRenderer\",\"id\":\"3ecf1947759a318754d2f4879135f776\",\"attributes\":{\"id\":\"3ecf1947759a318754d2f4879135f776\",\"tags\":[],\"doc\":null,\"selection_glyph\":null,\"nonselection_glyph\":{\"type\":\"Circle\",\"id\":\"3b8f892666eae46626a33f22ba9a05a9\"},\"hover_glyph\":{\"type\":\"Circle\",\"id\":\"f32227dfb1113dfba3eafc7f50dc13b3\"},\"server_data_source\":null,\"name\":null,\"data_source\":{\"type\":\"ColumnDataSource\",\"id\":\"5bf3277a3a70632e74f5dcef05198ec9\"},\"glyph\":{\"type\":\"Circle\",\"id\":\"fce7767fda629a19609fcc5320159edf\"}}},{\"type\":\"Range1d\",\"id\":\"01ca0c1b226b39d7862998f84039d986\",\"attributes\":{\"id\":\"01ca0c1b226b39d7862998f84039d986\",\"tags\":[],\"doc\":null,\"start\":0.37,\"end\":10.63}},{\"type\":\"Range1d\",\"id\":\"93700faa08e9392fab57d5df9880fcb7\",\"attributes\":{\"id\":\"93700faa08e9392fab57d5df9880fcb7\",\"tags\":[],\"doc\":null,\"start\":0.37,\"end\":10.63}},{\"type\":\"LinearAxis\",\"id\":\"fe18ed490ee6695db78213ba1eb9f2c3\",\"attributes\":{\"id\":\"fe18ed490ee6695db78213ba1eb9f2c3\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"axis_label\":\"index\",\"formatter\":{\"type\":\"BasicTickFormatter\",\"id\":\"538fd93e1a0957feeb697e366b4d234d\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"775fd56ef616d06d3d7a86995255790b\"},\"visible\":true,\"axis_label_text_font_size\":\"12pt\"}},{\"type\":\"BasicTickFormatter\",\"id\":\"538fd93e1a0957feeb697e366b4d234d\",\"attributes\":{\"id\":\"538fd93e1a0957feeb697e366b4d234d\",\"tags\":[],\"doc\":null}},{\"type\":\"BasicTicker\",\"id\":\"775fd56ef616d06d3d7a86995255790b\",\"attributes\":{\"id\":\"775fd56ef616d06d3d7a86995255790b\",\"tags\":[],\"doc\":null,\"num_minor_ticks\":5}},{\"type\":\"Grid\",\"id\":\"3ed62c1e8edd450e01b81da2fef42436\",\"attributes\":{\"id\":\"3ed62c1e8edd450e01b81da2fef42436\",\"tags\":[],\"doc\":null,\"dimension\":0,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"775fd56ef616d06d3d7a86995255790b\"}}},{\"type\":\"LinearAxis\",\"id\":\"d6683affc649e962062bc0c5bf53adc3\",\"attributes\":{\"id\":\"d6683affc649e962062bc0c5bf53adc3\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"axis_label\":\"seq_len(N)\",\"formatter\":{\"type\":\"BasicTickFormatter\",\"id\":\"1c77a9a359d0155d309b40fb247b4796\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"5e5a1150abd58af9b835a2a65fb21db8\"},\"visible\":true,\"axis_label_text_font_size\":\"12pt\"}},{\"type\":\"BasicTickFormatter\",\"id\":\"1c77a9a359d0155d309b40fb247b4796\",\"attributes\":{\"id\":\"1c77a9a359d0155d309b40fb247b4796\",\"tags\":[],\"doc\":null}},{\"type\":\"BasicTicker\",\"id\":\"5e5a1150abd58af9b835a2a65fb21db8\",\"attributes\":{\"id\":\"5e5a1150abd58af9b835a2a65fb21db8\",\"tags\":[],\"doc\":null,\"num_minor_ticks\":5}},{\"type\":\"Grid\",\"id\":\"2ce6010a8972beeb97a749f358736e77\",\"attributes\":{\"id\":\"2ce6010a8972beeb97a749f358736e77\",\"tags\":[],\"doc\":null,\"dimension\":1,\"plot\":{\"type\":\"Plot\",\"id\":\"da55b41a2dcc5c99d9022ca824d39779\",\"subtype\":\"Figure\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"5e5a1150abd58af9b835a2a65fb21db8\"}}}]}}};\n",
       "  var refkey = Object.keys(docs_json)[0]\n",
       "  var refs = docs_json[refkey].roots.references\n",
       "  function traverseObject(obj) {\n",
       "    for(var key in obj) {\n",
       "      if(obj[key].constructor === Object) {\n",
       "        traverseObject(obj[key]);\n",
       "      } else if(obj[key].constructor === Array) {\n",
       "        for (var i = 0; i < obj[key].length; i++) {\n",
       "          if(obj[key][i] === null)\n",
       "            obj[key][i] = NaN;\n",
       "        };\n",
       "      }\n",
       "    };\n",
       "  }\n",
       "  for(var i = 0; i < refs.length; i++) {\n",
       "    if(refs[i].type === \"ColumnDataSource\")\n",
       "      traverseObject(refs[i].attributes.data);\n",
       "  };\n",
       "  var render_items = [{\n",
       "    \"docid\": docid,\n",
       "    \"elementid\": elementid,\n",
       "    \"modelid\": modelid\n",
       "  }];\n",
       "  Bokeh.set_log_level('info');\n",
       "  Bokeh.embed.embed_items(docs_json, render_items);\n",
       "});\n",
       "</script>\n",
       "</body>\n",
       "</html>"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# El primer paso consiste en cargar la librería en Jupyter.\n",
    "library(rbokeh)\n",
    "\n",
    "# se define la cantidad de puntos.\n",
    "N <- 10\n",
    "\n",
    "# define una paleta con una secuencia de colores.\n",
    "ramp <- colorRampPalette(c(\"red\", \"blue\"))(N) \n",
    "\n",
    "p <- figure() %>% ly_points(seq_len(N), color = ramp, size = 15*seq_len(N))\n",
    "\n",
    "# salva el gráfico al disco duro\n",
    "rbokeh2html(p,'files/out.html')\n",
    "\n",
    "# visualiza el archivo que contiene el gráfico en Jupyter.\n",
    "IRdisplay::display_html(file='files/out.html')\n",
    "\n",
    "# el sistema genera un warning indicando que se \n",
    "# escribio el archivivo"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 5,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "name": "stderr",
     "output_type": "stream",
     "text": [
      "html file written to: files/out.html\n"
     ]
    },
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html>\n",
       "<html>\n",
       "<head>\n",
       "<script src=\"https://cdn.pydata.org/bokeh/release/bokeh-0.11.1.min.js\"></script>\n",
       "<link href=\"https://cdn.pydata.org/bokeh/release/bokeh-0.11.1.min.css\" rel=\"stylesheet\">\n",
       "</head>\n",
       "<body>\n",
       "<div id=\"dc441af5e96b20e2c46ed59507da7419\" class=\"plotdiv\"></div>\n",
       "<script type=\"text/javascript\">\n",
       "Bokeh.$(function() {\n",
       "  var modelid = \"4fe98e65e95082cb392f21ca83608698\";\n",
       "  var elementid = \"dc441af5e96b20e2c46ed59507da7419\";\n",
       "  var docid = \"f0f39dcf8cbd3e108410109050bf49e3\";\n",
       "  var docs_json = {\"f0f39dcf8cbd3e108410109050bf49e3\":{\"version\":\"0.11.1\",\"title\":\"Bokeh Figure\",\"roots\":{\"root_ids\":[\"4fe98e65e95082cb392f21ca83608698\"],\"references\":[{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"attributes\":{\"title\":\"Volcano\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"plot_width\":470,\"plot_height\":474,\"x_range\":{\"type\":\"Range1d\",\"id\":\"94b9a7317148d80878b9e67572cdff32\"},\"y_range\":{\"type\":\"Range1d\",\"id\":\"84e92f7115efc2b8a0132178c511e19d\"},\"left\":[{\"type\":\"LinearAxis\",\"id\":\"383e967b812bf2f98a45ebc45d7feb4d\"}],\"below\":[{\"type\":\"LinearAxis\",\"id\":\"d2dce7fdf3e72dc627b2aa03a09be7c2\"}],\"right\":[],\"above\":[],\"renderers\":[{\"type\":\"BoxAnnotation\",\"id\":\"be3e296ffb3873591ec1ad4d1d7ae8c1\"},{\"type\":\"GlyphRenderer\",\"id\":\"b99a562c0ab928533d34179312171960\"},{\"type\":\"GlyphRenderer\",\"id\":\"f9511ff9ea5ef28f1652799fe8ac7720\"},{\"type\":\"LinearAxis\",\"id\":\"d2dce7fdf3e72dc627b2aa03a09be7c2\"},{\"type\":\"Grid\",\"id\":\"dabcb1533bc4423678808bfae79ee3ce\"},{\"type\":\"LinearAxis\",\"id\":\"383e967b812bf2f98a45ebc45d7feb4d\"},{\"type\":\"Grid\",\"id\":\"e245e2e8cf8b00f1cbf7ac80a0c91564\"}],\"tools\":[{\"type\":\"PanTool\",\"id\":\"a1ac260f1aced2365d47509fced98b3b\"},{\"type\":\"WheelZoomTool\",\"id\":\"623fe5361611ea32862e34a1991e7217\"},{\"type\":\"BoxZoomTool\",\"id\":\"dd62765d7c451d5c8ae7b64f442fcf02\"},{\"type\":\"ResizeTool\",\"id\":\"c1d6581227aa3a1280cc3d4da96a55e6\"},{\"type\":\"ResetTool\",\"id\":\"d136cb2a7194123e146965506492318e\"},{\"type\":\"PreviewSaveTool\",\"id\":\"4ea2f6d7115ad876d95fa960c2fe1fc2\"},{\"type\":\"HelpTool\",\"id\":\"447bf07cd87d998ed17a41f4b3c4b529\"}],\"tool_events\":{\"type\":\"ToolEvents\",\"id\":\"53250e76cf1508515b0509eb0c3795ff\"},\"extra_y_ranges\":{},\"extra_x_ranges\":{},\"tags\":[],\"doc\":null,\"min_border_left\":4,\"min_border_right\":4,\"min_border_top\":4,\"min_border_bottom\":4,\"lod_threshold\":null},\"subtype\":\"Figure\"},{\"type\":\"PanTool\",\"id\":\"a1ac260f1aced2365d47509fced98b3b\",\"attributes\":{\"id\":\"a1ac260f1aced2365d47509fced98b3b\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"dimensions\":[\"width\",\"height\"]}},{\"type\":\"ToolEvents\",\"id\":\"53250e76cf1508515b0509eb0c3795ff\",\"attributes\":{\"id\":\"53250e76cf1508515b0509eb0c3795ff\",\"tags\":[],\"doc\":null},\"geometries\":[]},{\"type\":\"WheelZoomTool\",\"id\":\"623fe5361611ea32862e34a1991e7217\",\"attributes\":{\"id\":\"623fe5361611ea32862e34a1991e7217\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"dimensions\":[\"width\",\"height\"]}},{\"type\":\"BoxAnnotation\",\"id\":\"be3e296ffb3873591ec1ad4d1d7ae8c1\",\"attributes\":{\"id\":\"be3e296ffb3873591ec1ad4d1d7ae8c1\",\"tags\":[],\"doc\":null,\"line_color\":{\"units\":\"data\",\"value\":\"black\"},\"line_alpha\":{\"units\":\"data\",\"value\":1},\"fill_color\":{\"units\":\"data\",\"value\":\"lightgrey\"},\"fill_alpha\":{\"units\":\"data\",\"value\":0.5},\"line_dash\":[4,4],\"line_width\":{\"units\":\"data\",\"value\":2},\"level\":\"overlay\",\"top_units\":\"screen\",\"bottom_units\":\"screen\",\"left_units\":\"screen\",\"right_units\":\"screen\",\"render_mode\":\"css\"}},{\"type\":\"BoxZoomTool\",\"id\":\"dd62765d7c451d5c8ae7b64f442fcf02\",\"attributes\":{\"id\":\"dd62765d7c451d5c8ae7b64f442fcf02\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"overlay\":{\"type\":\"BoxAnnotation\",\"id\":\"be3e296ffb3873591ec1ad4d1d7ae8c1\"}}},{\"type\":\"ResizeTool\",\"id\":\"c1d6581227aa3a1280cc3d4da96a55e6\",\"attributes\":{\"id\":\"c1d6581227aa3a1280cc3d4da96a55e6\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"}}},{\"type\":\"ResetTool\",\"id\":\"d136cb2a7194123e146965506492318e\",\"attributes\":{\"id\":\"d136cb2a7194123e146965506492318e\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"}}},{\"type\":\"PreviewSaveTool\",\"id\":\"4ea2f6d7115ad876d95fa960c2fe1fc2\",\"attributes\":{\"id\":\"4ea2f6d7115ad876d95fa960c2fe1fc2\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"}}},{\"type\":\"HelpTool\",\"id\":\"447bf07cd87d998ed17a41f4b3c4b529\",\"attributes\":{\"id\":\"447bf07cd87d998ed17a41f4b3c4b529\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"redirect\":[\"http://hafen.github.io/rbokeh\"],\"help_tooltip\":[\"Click to learn more about rbokeh.\"]}},{\"type\":\"LinearColorMapper\",\"id\":\"35a85ce406b201608b80007810e60837\",\"attributes\":{\"id\":\"35a85ce406b201608b80007810e60837\",\"tags\":[],\"doc\":null,\"palette\":[\"#5e4fa2\",\"#3288bd\",\"#66c2a5\",\"#abdda4\",\"#e6f598\",\"#fee08b\",\"#fdae61\",\"#f46d43\",\"#d53e4f\",\"#9e0142\"]}},{\"type\":\"ColumnDataSource\",\"id\":\"59b01176adb3474770f36b4b3f6a8733\",\"attributes\":{\"id\":\"59b01176adb3474770f36b4b3f6a8733\",\"tags\":[],\"doc\":null,\"column_names\":[\"image\",\"palette\"],\"selected\":[],\"discrete_ranges\":{},\"cont_ranges\":{},\"data\":{\"image\":[[100,101,102,103,104,105,105,106,107,108,109,110,110,111,114,116,118,120,120,121,122,122,123,124,123,123,120,118,117,115,114,115,113,111,110,109,108,108,107,107,107,108,109,110,111,111,112,113,113,114,115,115,114,113,112,111,111,112,112,112,113,114,114,115,115,116,116,117,117,116,114,112,109,106,104,102,101,100,100,99,99,99,99,98,98,97,97,100,101,102,103,104,105,106,107,108,109,110,110,111,113,115,118,120,121,122,124,125,125,126,127,128,127,124,121,120,118,116,114,113,112,112,110,109,109,108,108,108,109,110,111,112,112,113,114,114,115,116,116,115,114,113,112,112,113,113,114,114,115,115,116,116,117,117,118,118,117,115,113,111,107,105,103,102,101,101,100,100,100,99,99,98,98,97,101,102,103,104,105,105,106,107,108,109,110,111,113,115,117,118,120,122,125,126,127,128,129,130,131,131,128,125,121,120,118,116,114,113,113,111,111,111,111,110,109,110,111,112,113,113,114,115,115,116,117,117,116,115,114,114,113,113,114,114,115,115,116,116,117,118,118,119,119,118,116,114,112,108,105,103,103,102,101,101,100,100,99,99,98,98,97,101,102,103,104,105,106,107,108,109,110,111,113,115,117,117,118,121,123,126,128,130,130,131,132,133,134,131,129,125,122,120,118,116,114,113,112,112,113,112,112,111,112,113,113,114,115,116,116,117,117,118,118,116,116,115,115,115,114,114,115,116,116,117,117,118,118,119,119,120,120,117,115,112,108,106,104,103,102,102,102,101,100,99,99,99,98,98,101,102,103,104,105,106,107,108,109,110,111,112,114,116,117,120,122,124,126,129,130,132,133,135,136,136,134,132,129,126,122,120,118,116,114,114,114,114,114,113,113,114,115,116,116,117,117,117,118,118,119,119,118,117,116,116,115,115,116,116,116,117,117,118,118,119,120,120,120,120,119,116,113,109,106,104,104,103,102,102,101,101,100,99,99,99,98,101,102,103,104,105,106,107,108,109,110,111,111,113,115,118,121,123,125,127,129,131,133,135,137,138,138,137,134,132,130,127,122,120,118,116,116,116,116,115,113,114,115,116,117,117,118,118,119,119,119,120,120,119,118,117,117,116,116,117,117,117,118,119,119,119,120,121,121,121,121,119,116,113,110,107,105,105,103,103,103,102,101,100,100,99,99,99,101,102,103,104,105,106,107,108,109,110,111,113,114,116,119,121,124,126,128,130,133,135,137,138,140,140,139,137,135,133,131,127,122,120,118,118,117,117,116,115,116,116,117,118,118,118,119,119,120,120,121,121,120,119,119,118,117,117,118,119,118,118,118,119,120,122,123,123,123,122,120,117,113,110,108,106,105,104,103,103,102,101,101,100,100,99,99,100,101,102,103,104,105,106,107,108,109,110,112,114,117,119,122,124,127,129,131,134,136,138,140,142,142,142,140,138,136,133,129,125,122,120,119,118,118,117,116,117,117,118,119,119,120,120,120,121,121,121,122,121,120,120,120,119,119,120,120,120,120,120,120,123,123,124,124,124,123,121,119,114,112,108,106,106,104,104,103,102,102,101,101,100,100,99,100,101,102,103,104,105,106,107,108,109,110,112,115,117,120,122,125,127,130,132,135,137,139,142,144,144,144,142,140,138,136,132,129,126,123,120,120,119,119,118,119,119,120,120,120,121,122,122,123,123,123,123,122,123,122,122,121,122,122,122,123,123,123,124,125,125,126,126,125,124,122,120,116,113,109,107,106,105,104,104,103,102,102,101,101,100,100,100,101,102,103,103,104,105,106,107,108,110,114,117,119,121,123,126,128,130,133,136,139,141,144,146,147,146,145,143,141,138,136,133,130,127,124,121,120,120,120,120,120,121,122,123,124,124,125,125,126,126,125,126,126,126,125,126,127,128,128,129,129,128,128,128,128,128,128,126,125,123,122,119,114,109,108,107,106,105,104,103,103,102,102,101,100,100,101,102,103,103,104,104,105,106,108,110,112,116,119,121,124,125,127,130,132,135,137,140,143,147,149,149,149,147,145,143,141,139,136,133,131,128,125,122,121,122,122,122,123,125,125,126,127,127,127,128,128,128,129,129,130,131,131,132,132,133,133,133,132,132,131,131,130,129,128,126,125,124,121,117,111,109,108,106,105,104,103,102,101,101,100,100,100,101,102,103,104,104,105,106,107,108,110,114,119,121,124,126,128,129,132,134,137,140,143,147,149,151,151,151,149,147,145,143,141,138,136,134,131,128,126,124,125,125,126,126,127,128,128,129,129,130,130,131,131,132,132,133,134,135,135,136,136,137,137,136,136,135,134,133,131,129,128,127,126,123,119,115,111,109,107,105,104,103,102,101,100,100,100,99,102,103,104,104,105,105,106,108,110,113,118,121,124,126,128,130,132,134,136,139,143,147,150,154,154,154,153,151,149,148,146,143,141,139,137,136,132,130,128,128,128,129,129,130,130,131,132,132,132,133,134,134,135,135,136,137,138,139,139,140,140,140,139,139,138,137,137,135,132,130,129,127,124,120,116,112,109,106,105,103,102,101,101,100,99,99,99,102,103,104,104,105,106,107,108,111,116,121,124,126,128,131,134,135,137,139,143,147,152,156,157,157,157,156,155,153,151,148,146,143,142,141,140,138,135,133,132,132,133,133,133,134,135,135,135,135,136,136,137,137,138,138,139,140,141,141,142,142,143,142,142,141,141,140,139,137,134,133,129,125,121,114,110,107,106,106,104,103,102,101,100,99,99,99,102,103,104,105,105,106,108,110,113,118,123,127,129,132,137,141,142,142,145,150,154,157,161,161,160,160,160,159,157,154,151,148,146,145,143,142,142,139,137,136,137,137,138,138,139,139,139,139,139,139,139,139,140,140,141,142,142,143,144,144,144,145,145,145,145,145,144,142,140,139,136,129,124,119,113,109,106,106,105,104,103,102,101,101,100,99,99,102,103,104,105,106,107,109,113,116,120,125,129,133,137,143,147,149,151,152,154,158,161,164,165,164,164,163,163,160,157,154,151,149,147,145,145,144,143,141,140,141,141,141,141,141,142,142,142,142,142,142,142,143,143,143,144,144,145,146,146,146,147,148,148,148,148,145,143,142,140,134,128,123,117,112,108,106,105,105,104,104,103,102,101,100,100,99,103,104,105,106,107,109,111,115,118,122,127,133,140,143,150,152,153,155,157,159,162,164,167,168,168,168,167,166,163,160,157,153,150,148,148,147,147,147,145,145,144,143,143,143,144,144,144,144,145,145,145,145,146,146,146,146,146,147,147,148,149,150,150,150,150,149,147,145,143,141,134,127,123,117,111,108,105,105,104,104,103,103,102,101,100,100,100,104,105,106,107,108,110,113,117,120,125,129,138,145,151,156,156,157,158,160,164,166,168,170,171,172,171,171,169,166,163,160,156,153,151,150,150,149,149,149,148,146,146,146,146,146,146,146,147,148,148,149,149,149,148,148,148,148,149,149,150,150,150,150,150,150,150,148,146,143,141,136,129,123,117,110,108,105,104,103,102,102,101,101,100,100,100,100,103,104,105,106,108,110,114,118,123,127,133,143,150,156,160,160,161,162,167,170,171,172,173,175,175,174,174,173,171,168,164,160,156,155,154,153,153,152,152,150,149,148,148,148,148,148,149,149,150,152,152,152,152,151,150,150,150,150,150,150,150,150,150,150,150,150,149,147,144,141,138,132,125,118,111,108,105,103,102,101,101,101,100,100,100,100,100,102,103,104,106,108,112,116,120,125,129,137,146,154,161,163,165,166,169,172,173,174,175,177,178,178,178,178,177,174,171,168,164,160,158,157,157,156,156,156,155,152,151,150,150,151,151,152,154,156,157,157,156,155,153,152,152,151,150,150,150,150,150,150,150,150,150,150,147,144,141,138,133,127,120,113,109,106,103,101,101,101,100,100,100,100,100,100,101,102,104,106,109,113,118,122,127,133,141,149,155,161,165,168,170,172,175,176,177,179,181,181,181,180,180,179,177,174,171,167,165,163,161,160,160,160,160,160,157,155,155,154,154,155,157,159,161,161,161,159,156,154,154,153,151,150,150,150,150,150,150,150,150,150,149,147,144,141,137,133,129,123,116,110,107,104,102,102,101,101,101,100,100,100,100,101,102,105,107,110,115,120,124,129,136,143,149,155,162,168,170,174,176,178,179,181,182,184,184,183,181,180,180,179,177,174,172,170,168,166,165,164,164,164,164,162,160,159,159,158,160,162,164,166,166,163,159,157,156,155,153,151,150,150,150,150,150,150,150,150,150,149,146,143,140,137,133,129,124,119,112,108,105,103,103,102,101,101,101,101,100,100,102,103,106,108,112,116,121,125,130,138,145,151,157,163,170,174,178,181,181,184,186,186,187,186,184,181,180,180,180,179,178,174,173,173,171,170,170,169,168,167,166,164,163,162,161,164,167,169,170,168,164,160,158,157,155,153,151,150,150,150,150,150,150,150,150,150,147,144,141,138,135,133,128,125,122,116,109,107,104,104,103,102,101,101,101,101,101,103,105,107,110,114,118,122,127,132,140,146,153,159,165,171,176,180,183,185,186,189,190,188,187,184,182,180,180,180,179,178,176,176,176,176,174,174,173,172,170,168,167,165,163,164,165,169,170,170,170,166,162,159,157,155,153,151,150,150,150,150,150,150,150,150,150,146,142,139,136,133,131,128,125,122,117,110,108,106,105,104,103,103,101,101,101,101,104,106,108,111,115,119,123,128,134,141,148,154,161,166,172,179,182,184,186,189,190,190,190,187,185,183,180,180,180,179,179,177,176,177,178,178,178,177,176,174,171,168,166,164,166,168,170,170,170,170,168,162,159,157,155,153,151,150,150,150,150,150,150,150,150,148,144,140,137,134,132,129,127,125,122,117,111,110,107,107,106,105,104,103,102,101,100,104,106,110,114,118,121,125,129,135,142,150,157,162,167,173,180,183,186,188,190,190,190,189,184,183,181,180,179,179,176,177,176,176,177,178,179,180,180,179,177,173,169,167,166,167,169,170,170,170,170,167,161,159,157,155,153,151,150,150,150,150,150,150,149,147,145,141,138,135,133,130,127,125,123,121,118,113,111,110,110,109,109,107,106,105,103,100,105,107,111,117,121,124,127,131,137,148,154,159,164,168,174,181,184,187,190,191,191,190,187,184,180,178,175,174,172,171,173,173,173,176,178,179,180,180,180,179,175,170,168,166,168,169,170,170,170,170,166,161,158,156,154,153,151,150,150,150,150,148,147,146,145,143,139,135,133,131,129,126,124,121,120,118,114,111,111,111,110,110,109,107,106,104,100,107,109,113,118,122,126,129,134,139,150,156,160,165,170,175,181,184,188,191,192,192,189,185,181,177,173,171,169,168,167,169,170,172,174,176,178,179,180,180,179,175,170,168,166,166,168,168,170,170,168,164,160,158,155,152,151,150,149,149,148,147,145,144,143,142,141,136,133,130,129,127,125,123,120,119,118,115,112,111,111,111,110,109,109,109,105,100,107,110,114,117,121,126,130,135,142,151,159,163,167,171,177,182,185,189,192,193,191,187,183,179,174,169,167,166,164,164,165,166,169,171,174,178,179,180,180,178,173,169,166,165,165,166,165,168,169,166,163,159,157,154,152,149,148,147,146,145,143,142,141,140,139,138,133,130,128,127,125,124,122,120,118,117,115,112,111,111,111,111,110,109,108,106,100,107,110,115,119,123,129,135,141,146,156,161,165,168,173,179,182,186,189,193,194,191,184,179,175,170,166,162,161,160,160,161,162,165,169,172,176,178,179,179,176,172,168,165,163,163,163,163,165,166,164,161,158,155,152,150,147,146,144,143,142,141,139,139,138,137,135,131,128,127,125,124,122,121,119,118,116,115,113,112,111,111,110,110,109,109,105,100,108,110,114,120,128,134,140,146,152,158,162,166,169,175,180,183,186,189,193,195,190,184,176,171,167,163,160,158,157,156,157,159,163,166,170,174,176,178,178,176,172,167,164,161,161,160,161,163,163,163,160,157,153,150,148,146,144,142,141,140,139,138,136,135,134,133,129,127,126,124,122,121,119,118,117,116,114,113,112,111,110,110,109,109,107,104,100,108,110,115,121,131,137,142,147,152,159,163,167,170,177,182,184,187,189,192,194,189,183,174,169,165,161,158,156,154,153,154,157,160,164,167,171,172,174,174,173,171,168,161,159,158,158,159,161,161,160,158,155,151,149,147,144,142,141,140,138,137,136,135,134,132,130,128,126,125,123,121,119,118,117,116,115,113,112,112,111,110,109,108,107,105,101,100,110,111,116,122,129,137,142,146,151,158,164,168,172,179,183,186,189,190,192,193,188,182,174,168,164,161,157,154,151,149,151,154,158,161,167,170,170,170,170,169,168,166,160,157,156,156,157,158,159,159,156,153,150,148,146,144,141,140,140,138,136,135,134,133,131,129,127,125,123,122,120,118,117,116,115,114,112,111,110,108,107,106,105,104,102,100,100,110,112,118,124,130,136,142,146,151,157,163,168,174,178,183,187,189,190,191,192,189,182,174,168,164,160,157,153,149,148,149,153,157,161,167,170,170,170,168,166,165,163,159,156,154,153,155,155,155,155,152,150,149,147,145,143,141,140,139,138,136,134,133,131,130,128,126,124,122,120,119,117,116,115,114,113,111,110,107,106,105,105,102,101,100,100,100,110,113,119,125,131,136,141,145,150,158,164,168,172,177,183,187,189,191,192,191,190,183,174,168,164,160,157,153,150,149,150,154,158,162,166,170,170,168,166,164,162,160,158,155,152,151,151,151,151,151,149,148,147,146,145,143,142,140,139,137,135,134,132,131,129,127,125,123,121,119,117,116,114,114,113,112,110,108,107,105,103,100,100,100,100,99,99,110,114,119,126,131,135,140,144,149,158,164,168,172,176,183,184,189,190,191,191,190,183,174,169,165,161,158,154,150,151,152,155,159,164,168,168,168,167,165,163,160,158,155,153,150,148,148,148,148,148,147,146,146,145,143,142,141,140,139,138,136,134,132,131,128,126,124,122,120,118,116,114,113,113,112,111,108,107,106,105,104,102,100,99,99,99,99,110,116,121,127,132,136,140,144,148,154,160,166,171,176,180,184,189,190,191,191,191,183,176,170,166,163,159,156,154,155,155,158,161,165,170,167,166,165,163,161,158,155,152,150,146,145,145,145,146,146,144,145,145,144,142,141,140,140,140,140,138,136,134,131,128,125,123,121,119,117,115,113,112,111,111,110,108,106,105,102,100,100,99,99,99,98,98,110,115,121,127,132,136,140,144,148,151,157,162,169,174,178,181,186,188,190,191,190,184,177,172,168,165,162,159,158,158,159,161,166,167,169,166,164,163,161,159,156,153,149,146,142,142,141,142,143,143,143,143,144,142,141,140,140,140,140,140,140,138,134,131,128,125,123,120,117,116,114,112,110,109,108,107,106,105,102,101,100,99,99,99,98,98,97,110,114,120,126,131,136,140,143,146,149,154,159,166,171,177,180,182,186,190,190,190,185,179,174,171,168,166,163,164,163,166,169,170,170,168,164,162,161,158,155,153,150,147,143,139,139,139,139,140,141,141,142,142,141,140,140,140,140,140,140,140,137,134,131,128,125,122,119,116,114,112,110,109,109,108,107,105,100,100,100,99,99,99,98,98,97,97,110,112,118,124,130,135,139,142,145,148,151,157,163,169,172,176,179,183,187,190,190,186,180,177,175,173,170,169,169,170,171,172,170,170,167,163,160,157,154,152,149,147,144,140,137,137,136,137,138,138,139,140,141,140,140,140,140,140,140,140,140,138,134,131,128,124,121,118,115,112,110,109,108,107,106,105,100,100,100,99,99,99,98,98,98,97,97,108,110,116,122,128,133,137,141,143,146,149,154,161,165,168,172,175,180,184,188,189,187,182,178,176,176,175,173,174,173,175,174,173,171,168,161,157,154,150,148,145,143,141,138,135,135,134,135,135,136,136,137,138,139,140,140,140,140,140,140,140,139,135,130,126,123,120,117,114,111,109,108,107,106,105,100,100,100,99,99,98,98,98,98,97,97,96,108,110,114,120,126,129,134,139,142,144,146,152,158,161,164,168,171,175,181,184,186,186,183,179,178,178,177,175,178,177,177,176,175,173,168,162,156,153,149,145,142,140,138,136,133,132,132,132,134,134,134,134,135,136,137,138,140,140,140,140,139,137,133,127,123,120,118,115,112,108,108,106,106,105,100,100,100,98,98,98,98,98,98,97,96,96,96,108,110,112,117,122,126,129,135,139,141,144,149,153,156,160,165,168,171,177,181,184,185,182,180,180,179,178,178,180,179,179,178,176,173,168,163,157,152,148,143,139,137,135,133,131,130,130,131,132,132,132,131,132,132,133,134,136,137,137,137,136,134,131,124,121,118,116,114,111,109,107,106,105,100,100,100,97,97,97,97,97,97,97,96,96,96,96,107,109,111,116,119,122,125,130,135,137,140,144,148,152,156,161,165,168,172,177,181,184,181,181,181,180,180,180,180,180,180,178,178,173,168,163,158,152,146,141,138,136,134,132,130,129,128,128,130,130,130,129,128,129,129,130,132,133,133,134,134,132,128,122,119,116,114,112,108,106,105,105,100,100,100,97,97,97,97,97,97,97,96,96,96,96,95,107,108,110,113,115,118,121,126,131,134,137,140,143,148,152,157,162,165,169,173,177,181,181,181,180,181,181,181,180,180,180,178,176,170,167,163,158,152,145,140,137,134,132,130,129,127,127,126,127,128,128,126,125,125,125,123,126,128,129,130,130,125,124,119,116,114,112,110,107,106,105,100,100,100,96,96,96,96,96,96,96,96,96,96,96,95,95,108,109,110,111,114,116,118,122,127,130,133,136,140,144,148,153,157,161,165,169,173,177,180,180,180,180,181,180,180,180,179,178,173,168,165,161,156,149,143,139,136,133,130,129,128,126,126,125,125,125,125,124,122,121,120,120,120,120,121,122,123,122,120,117,114,111,108,106,105,100,100,100,100,96,96,96,96,96,96,96,96,96,96,96,95,95,95,108,109,110,110,112,115,116,118,122,125,129,133,137,140,144,149,152,157,161,165,169,173,176,179,179,180,180,180,178,178,176,175,171,165,163,160,153,148,143,139,135,132,129,128,127,125,124,124,123,123,122,122,120,118,117,118,115,117,118,118,119,117,116,115,112,109,107,105,100,100,100,100,97,96,96,96,96,96,96,96,96,96,96,95,95,95,95,108,109,110,110,110,113,114,116,119,122,126,131,134,138,141,145,149,152,156,160,164,169,171,174,177,175,178,179,177,175,174,172,168,163,160,157,151,147,143,138,133,130,128,125,125,124,123,122,121,121,120,120,118,116,115,111,110,110,110,110,113,114,113,112,110,107,105,102,100,100,100,98,97,96,96,96,96,96,96,96,96,96,96,95,95,95,94,108,109,109,110,110,111,112,114,117,120,124,128,131,135,138,142,145,149,152,155,158,163,166,167,170,173,175,175,175,173,171,169,164,160,156,153,149,144,140,136,131,129,126,124,123,123,122,121,120,120,120,119,117,115,111,110,110,110,110,110,109,109,110,109,108,106,103,101,100,100,100,98,97,96,96,96,96,96,96,96,96,96,95,95,95,95,94,108,108,109,109,110,110,110,112,115,118,121,125,128,131,134,138,141,145,147,149,152,157,160,161,163,166,169,170,170,171,168,162,158,155,152,148,144,140,136,132,129,127,124,122,121,120,120,120,120,120,119,117,115,113,110,110,110,110,109,108,108,107,107,106,105,104,102,100,100,100,99,98,97,96,96,96,96,96,96,96,96,96,95,95,95,94,94,107,108,109,109,110,110,110,112,115,117,119,122,125,127,130,133,137,141,143,145,148,149,152,155,157,159,160,160,161,162,159,156,153,149,146,142,139,134,130,128,126,125,122,120,120,120,119,119,119,118,117,115,113,111,110,110,109,108,107,106,106,105,104,104,103,102,100,100,100,99,99,98,97,96,96,96,96,96,96,96,96,95,95,95,95,94,94,107,108,109,109,110,110,110,113,115,117,118,119,120,123,126,129,131,134,139,142,144,145,147,148,150,152,154,154,153,154,151,149,146,143,140,136,130,128,126,124,122,121,120,119,118,117,117,117,116,116,115,113,112,110,109,108,107,106,106,105,104,103,102,101,101,100,100,100,100,99,99,98,97,96,96,96,96,96,96,96,96,95,95,95,94,94,94,107,108,108,109,109,110,111,112,114,115,116,117,118,119,121,125,125,127,131,136,140,141,142,144,144,145,148,149,148,147,146,144,140,138,136,130,127,125,123,121,119,118,117,117,116,116,116,115,114,113,113,111,110,109,108,107,106,105,105,103,103,102,102,102,103,101,100,100,100,99,98,98,97,96,96,96,96,96,96,96,96,95,95,95,94,94,94,107,107,108,108,109,109,110,110,112,113,114,115,116,117,117,120,120,121,123,129,134,136,138,139,139,139,140,142,142,141,141,140,137,134,131,127,124,122,120,118,117,115,113,114,113,114,114,113,112,111,110,110,109,108,107,106,105,105,105,104,104,104,103,103,103,101,100,100,99,99,98,97,96,96,96,96,96,96,96,96,96,95,95,94,94,94,94,106,107,107,108,108,108,109,110,110,111,112,113,114,115,114,115,116,116,119,123,125,130,133,134,134,134,134,135,135,136,135,134,132,130,128,124,121,119,118,116,114,112,111,111,111,112,112,111,110,110,110,109,108,108,107,108,107,106,105,104,104,104,103,103,103,102,101,100,99,99,98,97,96,96,96,96,96,96,96,96,95,95,95,94,94,94,94,106,106,107,107,107,108,109,109,110,110,111,111,112,113,112,111,111,112,115,118,118,119,126,128,128,127,128,128,129,130,129,128,127,125,122,120,118,117,115,114,112,110,110,110,110,110,111,110,110,110,109,109,108,107,106,105,105,105,104,104,104,103,103,102,102,102,101,100,99,99,98,97,96,96,96,96,96,96,96,96,95,95,94,94,94,94,94,105,106,106,107,107,108,108,109,109,110,110,110,110,111,110,110,110,110,111,114,115,116,121,121,121,121,121,122,123,124,124,123,121,119,118,117,115,114,112,111,110,110,110,110,110,110,109,109,108,109,107,107,106,106,105,105,104,104,104,104,103,103,102,102,102,101,100,100,99,99,98,97,96,96,96,96,96,96,96,96,95,95,94,94,94,94,94,105,105,106,106,107,107,108,108,109,109,109,109,109,110,110,110,110,110,110,110,111,112,115,115,115,115,115,116,116,117,119,118,117,116,114,113,112,110,110,110,110,110,110,109,109,108,107,106,106,106,106,106,105,105,105,104,104,104,103,103,103,102,102,102,101,100,100,99,99,98,97,97,96,96,96,96,96,96,96,96,95,95,94,94,94,94,94,104,105,105,106,106,107,107,108,108,108,108,108,108,108,108,108,108,108,108,108,110,110,110,110,110,110,110,111,113,115,116,115,113,112,110,110,110,110,110,110,109,108,108,108,108,107,106,105,105,105,105,105,105,104,104,104,104,103,103,103,102,102,102,101,100,100,100,99,99,98,97,97,96,96,96,96,96,96,96,96,95,95,94,94,94,94,94,104,104,105,105,106,106,107,107,107,107,107,107,107,106,106,106,106,106,106,108,108,108,106,106,108,109,110,110,112,112,113,112,111,110,110,110,110,109,109,109,108,107,107,107,107,106,106,105,104,104,104,104,104,104,104,103,103,103,103,102,102,101,101,100,100,100,100,99,99,98,97,97,96,96,96,96,96,96,96,95,95,95,94,94,94,94,94,103,104,104,105,105,106,106,106,107,107,106,106,105,105,104,104,104,104,105,107,107,106,105,105,107,108,109,110,110,110,110,110,110,109,109,109,109,109,109,108,107,107,107,107,106,106,105,104,104,104,104,104,104,104,103,103,103,103,102,102,101,101,100,100,100,100,100,99,98,97,97,96,96,96,96,96,96,96,95,95,95,94,94,94,94,94,94]],\"palette\":[\"#5e4fa2\",\"#3288bd\",\"#66c2a5\",\"#abdda4\",\"#e6f598\",\"#fee08b\",\"#fdae61\",\"#f46d43\",\"#d53e4f\",\"#9e0142\"]}}},{\"type\":\"Image\",\"id\":\"e591cab1df768883a1591349cae49fcb\",\"attributes\":{\"id\":\"e591cab1df768883a1591349cae49fcb\",\"tags\":[],\"doc\":null,\"rows\":{\"units\":\"data\",\"value\":61},\"cols\":{\"units\":\"data\",\"value\":87},\"x\":{\"units\":\"data\",\"value\":0},\"y\":{\"units\":\"data\",\"value\":0},\"dw\":{\"units\":\"data\",\"value\":1},\"dh\":{\"units\":\"data\",\"value\":1},\"dilate\":false,\"image\":{\"units\":\"data\",\"field\":\"image\"},\"palette\":{\"units\":\"data\",\"field\":\"palette\"},\"color_mapper\":{\"type\":\"LinearColorMapper\",\"id\":\"35a85ce406b201608b80007810e60837\"}}},{\"type\":\"Image\",\"id\":\"37031390bbe714c305bff34867f48a4e\",\"attributes\":{\"id\":\"37031390bbe714c305bff34867f48a4e\",\"tags\":[],\"doc\":null,\"rows\":{\"units\":\"data\",\"value\":61},\"cols\":{\"units\":\"data\",\"value\":87},\"x\":{\"units\":\"data\",\"value\":0},\"y\":{\"units\":\"data\",\"value\":0},\"dw\":{\"units\":\"data\",\"value\":1},\"dh\":{\"units\":\"data\",\"value\":1},\"dilate\":false,\"image\":{\"units\":\"data\",\"field\":\"image\"},\"palette\":{\"units\":\"data\",\"field\":\"palette\"},\"color_mapper\":{\"type\":\"LinearColorMapper\",\"id\":\"35a85ce406b201608b80007810e60837\"}}},{\"type\":\"Image\",\"id\":\"944d9f6b40e838ee6e6e1a24a7ea7c67\",\"attributes\":{\"id\":\"944d9f6b40e838ee6e6e1a24a7ea7c67\",\"tags\":[],\"doc\":null,\"rows\":{\"units\":\"data\",\"value\":61},\"cols\":{\"units\":\"data\",\"value\":87},\"x\":{\"units\":\"data\",\"value\":0},\"y\":{\"units\":\"data\",\"value\":0},\"dw\":{\"units\":\"data\",\"value\":1},\"dh\":{\"units\":\"data\",\"value\":1},\"dilate\":false,\"image\":{\"units\":\"data\",\"field\":\"image\"},\"palette\":{\"units\":\"data\",\"field\":\"palette\"},\"color_mapper\":{\"type\":\"LinearColorMapper\",\"id\":\"35a85ce406b201608b80007810e60837\"}}},{\"type\":\"GlyphRenderer\",\"id\":\"b99a562c0ab928533d34179312171960\",\"attributes\":{\"id\":\"b99a562c0ab928533d34179312171960\",\"tags\":[],\"doc\":null,\"selection_glyph\":null,\"nonselection_glyph\":{\"type\":\"Image\",\"id\":\"37031390bbe714c305bff34867f48a4e\"},\"hover_glyph\":{\"type\":\"Image\",\"id\":\"944d9f6b40e838ee6e6e1a24a7ea7c67\"},\"server_data_source\":null,\"name\":null,\"data_source\":{\"type\":\"ColumnDataSource\",\"id\":\"59b01176adb3474770f36b4b3f6a8733\"},\"glyph\":{\"type\":\"Image\",\"id\":\"e591cab1df768883a1591349cae49fcb\"}}},{\"type\":\"ColumnDataSource\",\"id\":\"7c8f7e1d0c2240a8915ad3f7cad080cb\",\"attributes\":{\"id\":\"7c8f7e1d0c2240a8915ad3f7cad080cb\",\"tags\":[],\"doc\":null,\"column_names\":[\"xs\",\"ys\"],\"selected\":[],\"discrete_ranges\":{},\"cont_ranges\":{},\"data\":{\"xs\":[[1,0.9884,0.9778,0.9767,0.9651,0.9546,0.9535,0.9429,0.9419,0.9313,0.9302,0.9197,0.9186,0.908,0.907,0.8964,0.8953,0.8843,0.8837,0.8725,0.8721,0.8608,0.8605,0.8491,0.8488,0.8375,0.8372,0.826,0.8256,0.8145,0.8145,0.814,0.8034,0.8023,0.7918,0.7918,0.7918,0.7907,0.7801,0.7801,0.7801,0.7801,0.7791,0.7685,0.7685,0.7685,0.7685],[0.908,0.9186,0.9302,0.9419,0.9429,0.9429,0.9429,0.9535,0.9546,0.9651,0.9662,0.9767,0.9778,0.9884,0.9894,1],[1,0.9894,0.9884,0.9767,0.9662,0.9662,0.9767,0.9778,0.9884,0.9894,1],[0.1268,0.1163,0.1152,0.1152,0.1047,0.1036,0.1036,0.1036,0.1036,0.1047,0.1152,0.1152,0.1157,0.1047,0.1041,0.1041,0.093,0.0925,0.0891,0.0814,0.0808,0.0727,0.0698,0.064,0.0581,0.0576,0.0576,0.0523,0.0494,0.0465,0.0461,0.0407,0.0349,0.0345,0.031,0.0233,0.023,0.0203,0.0145,0.0116,0.0112,0.0112,0.0111,0.0111,0],[0,0.0111,0.0111,0.0111,0.0116,0.0174,0.0227,0.0222,0.0222,0.0222,0.0233,0.0338,0.0349,0.0454,0.0454,0.0454,0.0465,0.0571,0.0581,0.0687,0.0698,0.0803,0.0814,0.092,0.093,0.1036,0.1047,0.1163,0.1279,0.1395,0.1501,0.1512,0.1628,0.1744,0.186,0.1977,0.2093,0.2209,0.232,0.2326,0.2442,0.2558,0.2674,0.2791,0.2907,0.3013,0.3023,0.3129],[0.8333,0.8372,0.8401,0.843,0.843,0.8459,0.8488,0.8492,0.8494,0.8547,0.8576,0.8581,0.8605,0.8663,0.8721,0.8779,0.8798,0.8725,0.8721,0.8692,0.8663,0.8643,0.861,0.8643,0.8692,0.8721,0.8725,0.8779,0.8821,0.8837,0.8843,0.8953,0.8957,0.907,0.9186,0.9197,0.9302,0.9419,0.9429,0.9429,0.9535,0.9546,0.9546,0.9535,0.9429,0.9419,0.9313,0.9302,0.9186,0.9075,0.907,0.8957,0.8953,0.8843,0.8837,0.876,0.8727,0.8721,0.8605,0.8488,0.8383,0.8372,0.8266,0.8256,0.815,0.814,0.8081,0.8023,0.7965,0.7965,0.7907,0.7849,0.7794,0.7791,0.7674,0.7597,0.7558,0.7519,0.7446,0.7442,0.7326,0.722,0.7209,0.7199,0.7093,0.6977,0.6871,0.686,0.6744,0.6639,0.6628,0.6512,0.6406,0.6395,0.6279,0.6173,0.6163,0.6057,0.6047,0.5941,0.593,0.5825,0.5814,0.5708,0.5698,0.5581,0.5465,0.5349,0.5243,0.5233,0.5116,0.5,0.4894,0.4884,0.4767,0.4651,0.4546,0.4535,0.4419,0.4302,0.4197,0.4186,0.407,0.3953,0.3837,0.3732],[0.3964,0.407,0.408,0.4186,0.4302,0.4419,0.4535,0.4546,0.4651,0.4757,0.4767,0.4873,0.4884,0.4989],[0.1971,0.186,0.1855,0.1855,0.1822,0.1744,0.174,0.1705,0.1686,0.1667,0.1628,0.1624,0.157,0.1512,0.1453,0.1395,0.1337,0.1279,0.124,0.1163,0.114,0.1093,0.1047,0.1044,0.0988,0.093,0.0926,0.086,0.0814,0.0811,0.0756,0.0698,0.0695,0.0674,0.064,0.061,0.0581,0.0543,0.0465,0.0436,0.0407,0.0436,0.0378,0.0349,0.0347,0.0329,0.031,0.0271,0.0252,0.0249,0.0233,0.0209,0.0213,0.0231,0.0233,0.0271,0.031,0.0347,0.0349,0.0419,0.0465,0.0504,0.0581,0.0659,0.0698,0.0756,0.0814,0.0872,0.093,0.0969,0.1043,0.1047,0.1124,0.1163,0.1202,0.1279,0.1385,0.1395,0.1512,0.157,0.1628,0.174,0.1744,0.186,0.1977,0.2093,0.2122,0.2209,0.2326,0.2442,0.2458,0.2535,0.2558,0.2674,0.2791,0.2907,0.3023,0.314,0.3256,0.3372,0.3488,0.3605,0.3721,0.3779,0.3837,0.3953,0.407,0.4075,0.4186,0.4244,0.4302,0.4419,0.4424,0.4535,0.4593,0.4651,0.4767,0.4884,0.4894,0.5,0.5116,0.5233,0.5243,0.5349,0.5465,0.5581,0.5698,0.5708,0.5814,0.5825,0.593,0.5936,0.6047,0.6052,0.6163,0.6279,0.6395,0.6512,0.6628,0.6744,0.686,0.6977,0.7093,0.7209,0.7213,0.7302,0.7326,0.7403,0.7442,0.7481,0.7558,0.7564,0.7674,0.7678,0.7713,0.7752,0.7791,0.7794,0.7849,0.7907,0.7913,0.7965,0.8023,0.8034,0.814,0.8145,0.8198,0.8256,0.8314,0.8372,0.843,0.8488,0.8494,0.8499,0.8605,0.861,0.8643,0.8651,0.8651,0.8643,0.8605,0.8581,0.8538,0.849,0.8488,0.8455,0.843,0.843,0.843,0.8465,0.8488,0.8505,0.8491,0.8488,0.8459,0.8401,0.8372,0.8333,0.8259,0.8256,0.8198,0.8143,0.814,0.8081,0.8034,0.8027,0.8023,0.7907,0.7896,0.7791,0.7674,0.7664,0.7558,0.7547,0.7442,0.7431,0.7326,0.7209,0.7093,0.6977,0.686,0.6744,0.6734,0.6628,0.6512,0.6406,0.6395,0.6279,0.6163,0.6057,0.6047,0.5941,0.593,0.5814,0.5803,0.5698,0.5581,0.5571,0.5465,0.5349,0.5233,0.5222,0.5116,0.5,0.4884,0.4873,0.4767,0.4651,0.4535,0.4419,0.4302,0.4197,0.4186,0.407,0.3964,0.3953,0.3843,0.3837,0.3727,0.3721,0.361,0.3605,0.3494,0.3488,0.3378,0.3372,0.3261,0.3256,0.314,0.3029],[0.0465,0.0453,0.0465,0.048,0.0465,0.0463,0.0446,0.0442,0.0419,0.0419,0.0442,0.0463,0.0465,0.0512,0.0581,0.0605,0.0698,0.0717,0.0812,0.0814,0.0907,0.093,0.1043,0.1047,0.1163,0.1192,0.1256,0.1279,0.1357,0.1395,0.1473,0.1512,0.1624,0.1628,0.1744,0.1802,0.186,0.1977,0.2064,0.2093,0.2209,0.2233,0.2326,0.244,0.2442,0.2558,0.2674,0.2791,0.2907,0.3023,0.314,0.3256,0.3361,0.3372,0.3383,0.3488,0.3605,0.3721,0.3837,0.3843,0.3953,0.3983,0.407,0.4074,0.4186,0.4192,0.4302,0.4419,0.4424,0.4535,0.4612,0.4651,0.4709,0.4767,0.4773,0.4845,0.4884,0.4894,0.5,0.5011,0.5116,0.5127,0.5233,0.5349,0.5465,0.5576,0.5581,0.5698,0.5814,0.5825,0.593,0.6047,0.6163,0.6279,0.6385,0.6395,0.6512,0.6628,0.6744,0.685,0.686,0.6977,0.6979,0.7093,0.7151,0.7209,0.7226,0.7267,0.7326,0.7328,0.7364,0.7364,0.7364,0.7364,0.7364,0.7384,0.7442,0.7447,0.75,0.7558,0.7564,0.7645,0.7674,0.7713,0.7791,0.7796,0.7907,0.7918,0.8023,0.8081,0.814,0.8143,0.8217,0.8256,0.8295,0.8326,0.8343,0.8343,0.8314,0.8289,0.8256,0.8239,0.8206,0.8217,0.8239,0.8227,0.814,0.8034,0.8023,0.7907,0.7849,0.7791,0.7685,0.7674,0.7558,0.7442,0.7326,0.7209,0.7093,0.6977,0.686,0.6744,0.6628,0.6512,0.6395,0.6279,0.6268,0.6163,0.6047,0.593,0.5814,0.5698,0.5581,0.5571,0.5465,0.5349,0.5233,0.5116,0.5,0.4989,0.4884,0.4767,0.4651,0.4535,0.4419,0.4308,0.4302,0.4186,0.4109,0.407,0.3992,0.3953,0.3841,0.3837,0.3721,0.3682,0.3605,0.3576,0.3517,0.3488,0.3376,0.3372,0.3256,0.3217,0.314,0.3081,0.3023,0.2946,0.2907,0.2791,0.2674,0.2664,0.2558,0.2442,0.2326,0.232,0.2315,0.2267,0.2209,0.2204,0.2151,0.2093,0.2089,0.2087,0.1977,0.1973,0.1899,0.186,0.1744,0.1739,0.1628,0.1589,0.1512,0.1434,0.1395,0.1308,0.1279,0.1221,0.1176,0.1163,0.1105,0.1061,0.1047,0.0988,0.0947,0.093,0.0928,0.0884,0.0853,0.0833,0.0814,0.0785,0.0721,0.0698,0.0695,0.0601,0.0581,0.0504,0.0465],[0.0698,0.0696,0.0651,0.0651,0.0659,0.0674,0.0695,0.0695,0.0695,0.0695,0.0698,0.0736,0.0785,0.0814,0.0853,0.093,0.0988,0.1047,0.1159,0.1163,0.1275,0.1279,0.1392,0.1395,0.1508,0.1512,0.1589,0.1628,0.1686,0.1744,0.1822,0.186,0.1948,0.1977,0.2093,0.2132,0.2209,0.2323,0.2326,0.2442,0.2558,0.2674,0.2791,0.2907,0.3013,0.3023,0.314,0.3256,0.3372,0.3488,0.3605,0.3608,0.3721,0.3727,0.3837,0.3953,0.3956,0.407,0.4147,0.4186,0.4302,0.4305,0.4419,0.4421,0.4488,0.4506,0.4506,0.4535,0.4539,0.4574,0.4622,0.4651,0.4767,0.4773,0.4884,0.4922,0.5,0.5004,0.5087,0.5116,0.5233,0.5349,0.5465,0.5571,0.5581,0.5698,0.5814,0.592,0.593,0.6047,0.6163,0.6268,0.6279,0.6395,0.6506,0.6512,0.6628,0.6744,0.686,0.6871,0.6977,0.6987,0.6982,0.6981,0.6982,0.6977,0.6866,0.686,0.6744,0.6639,0.6639,0.6639,0.6744,0.675,0.675,0.686,0.6871,0.6977,0.7035,0.7093,0.7209,0.7326,0.7336,0.7442,0.7558,0.7581,0.7645,0.7674,0.7713,0.7791,0.7794,0.7868,0.7907,0.7946,0.8023,0.8027,0.8052,0.8062,0.8062,0.8047,0.804,0.8025,0.8023,0.7918,0.7907,0.7791,0.7685,0.7674,0.7558,0.7442,0.7326,0.7209,0.7104,0.7093,0.6977,0.686,0.685,0.6744,0.6628,0.6512,0.6501,0.6395,0.6279,0.6163,0.6047,0.6036,0.593,0.5814,0.5698,0.5581,0.5465,0.5349,0.5233,0.5116,0.5,0.4884,0.4767,0.4651,0.4535,0.4419,0.4302,0.4264,0.4186,0.4075,0.407,0.3953,0.3837,0.3779,0.3721,0.3643,0.3605,0.3547,0.3488,0.3411,0.3372,0.3261,0.3256,0.3145,0.314,0.3023,0.2918,0.2907,0.2791,0.2785,0.2674,0.2669,0.2597,0.2558,0.25,0.2442,0.2438,0.2326,0.2322,0.2238,0.2209,0.2122,0.2093,0.1977,0.186,0.1744,0.1715,0.1628,0.157,0.1512,0.1395,0.1394,0.1312,0.1279,0.1244,0.1202,0.1163,0.1148,0.1113,0.108,0.1047,0.1045,0.103,0.1013,0.0962,0.0941,0.093,0.0897,0.0814,0.0795,0.0698],[0.093,0.0891,0.0884,0.0907,0.0907,0.0928,0.093,0.0943,0.0969,0.1008,0.1047,0.107,0.1124,0.1163,0.1186,0.124,0.1279,0.1308,0.1395,0.1453,0.1512,0.157,0.1628,0.1674,0.1744,0.1783,0.186,0.1899,0.1977,0.2016,0.2093,0.2209,0.2248,0.2326,0.2442,0.2481,0.2558,0.2674,0.2785,0.2791,0.2907,0.3023,0.314,0.3256,0.3372,0.3488,0.3547,0.3605,0.3721,0.3808,0.3837,0.3953,0.4012,0.407,0.4157,0.4186,0.4215,0.4256,0.4286,0.4302,0.4336,0.4341,0.436,0.439,0.4419,0.4424,0.4535,0.4612,0.4651,0.4767,0.4771,0.4855,0.4884,0.5,0.5003,0.5116,0.5122,0.5233,0.5349,0.5465,0.5581,0.5698,0.5756,0.5814,0.593,0.5941,0.6047,0.6052,0.6105,0.6163,0.6168,0.6279,0.6283,0.6357,0.6395,0.6512,0.6522,0.6628,0.6744,0.686,0.6977,0.6982,0.7093,0.7209,0.722,0.7326,0.7442,0.7447,0.7558,0.7561,0.7562,0.7569,0.7569,0.7674,0.7678,0.7674,0.7569,0.7564,0.7558,0.7453,0.7442,0.7326,0.7209,0.7093,0.7082,0.6977,0.686,0.685,0.6744,0.6628,0.6512,0.6395,0.6279,0.6163,0.6047,0.593,0.5814,0.5698,0.5581,0.5571,0.5465,0.5349,0.5233,0.5116,0.5,0.4884,0.4767,0.4651,0.4546,0.4535,0.4419,0.4302,0.4186,0.408,0.407,0.3953,0.3837,0.3727,0.3721,0.3663,0.3605,0.3527,0.3488,0.3411,0.3372,0.3256,0.3198,0.314,0.3081,0.3023,0.2907,0.2791,0.2733,0.2674,0.2558,0.2554,0.2442,0.2395,0.2326,0.2209,0.2207,0.2093,0.1977,0.1919,0.186,0.1744,0.1628,0.1626,0.1512,0.1492,0.1395,0.1394,0.1337,0.1298,0.1298,0.1279,0.126,0.1229,0.1202,0.1163,0.1161,0.1085,0.1047,0.1045,0.1034,0.0977,0.093],[0.3256,0.3227,0.3256,0.3266,0.3372,0.3478,0.3488,0.3517,0.3488,0.343,0.3372,0.3314,0.3256],[0.1163,0.114,0.1105,0.1076,0.1085,0.1105,0.1085,0.1085,0.1161,0.1163,0.1233,0.1279,0.1296,0.1337,0.1379,0.1395,0.1473,0.1512,0.1625,0.1628,0.1721,0.1744,0.1814,0.186,0.1948,0.1977,0.2064,0.2093,0.2206,0.2209,0.2326,0.2372,0.2442,0.2554,0.2558,0.2674,0.2791,0.2907,0.3013,0.3023,0.314,0.3256,0.3372,0.345,0.3488,0.3605,0.3663,0.3721,0.3837,0.384,0.3953,0.3957,0.407,0.4071,0.4093,0.414,0.414,0.4128,0.4109,0.4099,0.4186,0.419,0.4302,0.4341,0.4419,0.4477,0.4535,0.4574,0.4651,0.4657,0.4767,0.4773,0.4855,0.4884,0.4888,0.4942,0.5,0.5116,0.5233,0.5349,0.5407,0.5465,0.5581,0.5698,0.5703,0.5814,0.5818,0.5853,0.5901,0.593,0.5936,0.5969,0.5988,0.6008,0.6008,0.5936,0.593,0.5901,0.5872,0.5814,0.5698,0.5581,0.5523,0.5465,0.5349,0.5233,0.5227,0.5116,0.5,0.4884,0.4778,0.4767,0.4651,0.4539,0.4535,0.4419,0.4302,0.4186,0.407,0.3953,0.3837,0.3727,0.3721,0.3608,0.3605,0.3491,0.3488,0.3376,0.3372,0.326,0.3256,0.314,0.3034,0.3023,0.2907,0.2791,0.2674,0.2558,0.2529,0.2442,0.2403,0.2326,0.2248,0.2209,0.2093,0.2087,0.1977,0.186,0.1744,0.1628,0.1625,0.1512,0.1495,0.1492,0.1478,0.1453,0.1415,0.1395,0.1379,0.1349,0.1302,0.1279,0.1276,0.1192,0.1163],[0.3023,0.2946,0.2936,0.2911,0.2911,0.2946,0.2994,0.3023,0.3101,0.314,0.3256,0.3372,0.3488,0.3547,0.3605,0.3682,0.3721,0.3744,0.3779,0.3808,0.3798,0.3721,0.3717,0.3634,0.3605,0.3488,0.3372,0.3256,0.314,0.3029,0.3023],[0.1395,0.1392,0.1337,0.1318,0.1337,0.1337,0.1372,0.1395,0.1419,0.1488,0.1512,0.155,0.1628,0.1686,0.1744,0.1822,0.186,0.1938,0.1977,0.2035,0.2093,0.2122,0.2209,0.2238,0.2326,0.2355,0.2442,0.25,0.2558,0.2674,0.2787,0.2791,0.2907,0.3023,0.3129,0.314,0.3256,0.3372,0.3411,0.3488,0.3547,0.3605,0.3663,0.3721,0.374,0.3791,0.3837,0.3841,0.3907,0.3907,0.3907,0.3876,0.3841,0.3843,0.3837,0.3721,0.371,0.3605,0.3488,0.3372,0.3361,0.3256,0.314,0.3034,0.3023,0.2907,0.2829,0.2791,0.2733,0.2677,0.2674,0.2651,0.2636,0.2636,0.2636,0.2651,0.2674,0.2703,0.2791,0.2794,0.2884,0.2907,0.3023,0.3081,0.314,0.3256,0.3372,0.3488,0.3594,0.3605,0.3721,0.3779,0.3837,0.3876,0.3951,0.3953,0.4041,0.4066,0.4066,0.4067,0.407,0.4186,0.4192,0.4302,0.4308,0.4419,0.4429,0.4535,0.4651,0.469,0.4698,0.4709,0.4738,0.4767,0.4773,0.4773,0.4767,0.4738,0.469,0.4651,0.454,0.4535,0.4419,0.4302,0.4197,0.4186,0.407,0.3953,0.3837,0.3727,0.3721,0.3605,0.3517,0.3488,0.3411,0.3372,0.3295,0.3256,0.314,0.3081,0.3023,0.2907,0.2791,0.2674,0.2558,0.2553,0.2442,0.2326,0.2209,0.2206,0.2093,0.2016,0.1977,0.186,0.1855,0.1744,0.1739,0.1628,0.1626,0.1609,0.1589,0.157,0.155,0.1512,0.1509,0.1483,0.1442,0.1415,0.1395],[0.3953,0.3951,0.3953,0.3957,0.3953],[0.5349,0.5343,0.5338,0.5338,0.5349,0.546,0.5465,0.5581,0.5587,0.5698,0.5701,0.5701,0.5703,0.5701,0.5698,0.5587,0.5581,0.5571,0.5465,0.5454,0.5349],[0.1628,0.1626,0.1581,0.1541,0.1558,0.157,0.1578,0.1625,0.1628,0.1705,0.174,0.1744,0.186,0.189,0.1974,0.1977,0.2074,0.2093,0.218,0.2209,0.2297,0.2326,0.2413,0.2442,0.2554,0.2558,0.2674,0.2791,0.2896,0.2907,0.3023,0.314,0.3145,0.3256,0.3372,0.3383,0.3488,0.3494,0.3494,0.3488,0.3372,0.3266,0.3256,0.325,0.314,0.3023,0.2907,0.2801,0.2791,0.2674,0.2645,0.2616,0.2562,0.2558,0.2539,0.2508,0.2492,0.2481,0.2481,0.2471,0.2471,0.2481,0.25,0.2535,0.2558,0.2645,0.2674,0.2703,0.2791,0.2796,0.2907,0.3023,0.3034,0.314,0.3256,0.3266,0.3266,0.3266,0.3256,0.315,0.314,0.3034,0.3023,0.2907,0.2791,0.2674,0.2558,0.25,0.2442,0.2326,0.2267,0.2209,0.2093,0.1977,0.1938,0.186,0.1858,0.1783,0.1744,0.1743,0.1728,0.1725,0.1698,0.1667,0.1628],[0.4186,0.4175,0.4175,0.4186,0.4292,0.4292,0.4302,0.4419,0.4424,0.4429,0.4429,0.4419,0.4313,0.4302,0.4186],[0.1977,0.1966,0.1966,0.1919,0.1966,0.1966,0.1977,0.2087,0.209,0.2093,0.2206,0.2209,0.2326,0.2328,0.2328,0.2328,0.234,0.2327,0.2327,0.2326,0.2287,0.2279,0.2302,0.2326,0.2328,0.2342,0.2355,0.2403,0.2442,0.2446,0.2453,0.2558,0.2562,0.2558,0.2447,0.2442,0.2431,0.2326,0.2315,0.2209,0.2204,0.2093,0.2089,0.2054,0.2016,0.2006,0.2006,0.2016,0.1977]],\"ys\":[[0.5515,0.5515,0.5667,0.5682,0.5682,0.5833,0.5849,0.6,0.6015,0.6167,0.6182,0.6333,0.6349,0.65,0.6515,0.6667,0.6675,0.6833,0.6839,0.7,0.7005,0.7167,0.7171,0.7333,0.7337,0.75,0.7505,0.7667,0.7675,0.7833,0.8,0.8015,0.8167,0.8182,0.8333,0.85,0.8667,0.8682,0.8833,0.9,0.9167,0.9333,0.9349,0.95,0.9667,0.9833,1],[0,0.0151,0.0151,0.0151,0.0167,0.0333,0.05,0.0651,0.0667,0.0818,0.0833,0.0985,0.1,0.1151,0.1167,0.1318],[0.1682,0.1833,0.1849,0.1849,0.2,0.2167,0.2318,0.2333,0.2485,0.25,0.2651],[0,0.0151,0.0167,0.0333,0.0485,0.05,0.0667,0.0833,0.1,0.1015,0.1167,0.1333,0.15,0.1659,0.1667,0.1833,0.1992,0.2,0.2167,0.2325,0.2333,0.25,0.2583,0.2667,0.2818,0.2833,0.3,0.3167,0.3333,0.3485,0.35,0.3667,0.3825,0.3833,0.4,0.4159,0.4167,0.4333,0.45,0.4651,0.4667,0.4833,0.5,0.5167,0.5325],[0.6508,0.6667,0.6833,0.7,0.7015,0.7167,0.7333,0.75,0.7667,0.7833,0.7849,0.8,0.8015,0.8167,0.8333,0.85,0.8515,0.8667,0.8682,0.8833,0.8849,0.9,0.9015,0.9167,0.9182,0.9333,0.9349,0.9349,0.9349,0.9349,0.95,0.9508,0.9508,0.9508,0.9508,0.9508,0.9508,0.9508,0.9667,0.9675,0.9675,0.9671,0.9671,0.9675,0.9682,0.9833,0.9849,1],[0,0.0083,0.0167,0.0333,0.05,0.0667,0.0818,0.0833,0.1,0.1167,0.1333,0.15,0.1583,0.1667,0.175,0.1833,0.2,0.2167,0.2182,0.2333,0.25,0.2667,0.2833,0.3,0.3167,0.3318,0.3333,0.35,0.3667,0.3818,0.3833,0.3992,0.4,0.4161,0.4161,0.4167,0.4318,0.4318,0.4333,0.45,0.4651,0.4667,0.4833,0.4849,0.5,0.5015,0.5167,0.5172,0.5222,0.5333,0.5339,0.55,0.5508,0.5667,0.5675,0.5833,0.6,0.6005,0.6056,0.6083,0.6167,0.6182,0.6333,0.6349,0.65,0.6515,0.6667,0.6722,0.6833,0.7,0.7056,0.7167,0.7333,0.7337,0.7417,0.75,0.7583,0.7667,0.7833,0.7841,0.7944,0.8,0.8005,0.8,0.7967,0.7958,0.8,0.8008,0.8015,0.8167,0.8175,0.8182,0.8333,0.8341,0.8349,0.85,0.8515,0.8667,0.8682,0.8833,0.8849,0.9,0.9015,0.9167,0.9182,0.9175,0.9182,0.925,0.9333,0.9341,0.9349,0.9349,0.95,0.9508,0.9508,0.9515,0.9667,0.9682,0.9682,0.9682,0.9833,0.9849,0.9849,0.9849,0.9849,1],[0,0.0151,0.0167,0.025,0.025,0.0278,0.0325,0.0333,0.0417,0.0333,0.0318,0.0167,0.0151,0],[0,0.0159,0.0167,0.0333,0.05,0.0659,0.0667,0.0833,0.1,0.1167,0.1318,0.1333,0.15,0.1583,0.1667,0.175,0.1833,0.1917,0.2,0.2111,0.2167,0.2333,0.2492,0.25,0.2667,0.2825,0.2833,0.3,0.3159,0.3167,0.3333,0.3492,0.35,0.3667,0.3833,0.4,0.4083,0.4167,0.4278,0.4333,0.45,0.4667,0.4833,0.4985,0.5,0.5167,0.5333,0.55,0.5667,0.5833,0.5917,0.6,0.6167,0.6333,0.6341,0.65,0.6667,0.6833,0.6839,0.7,0.7111,0.7167,0.725,0.7333,0.7389,0.75,0.7583,0.7667,0.7778,0.7833,0.8,0.8008,0.8167,0.825,0.8333,0.8444,0.85,0.8508,0.8625,0.8667,0.8708,0.8833,0.8837,0.8837,0.8867,0.8958,0.9,0.91,0.9119,0.9152,0.9167,0.9333,0.9361,0.9361,0.9361,0.9361,0.9361,0.9389,0.9405,0.9429,0.9467,0.9433,0.9375,0.9333,0.9306,0.925,0.9172,0.9167,0.9056,0.9,0.8944,0.8841,0.8833,0.8722,0.8667,0.8611,0.8556,0.8505,0.85,0.8349,0.8341,0.8339,0.8333,0.8182,0.8182,0.8182,0.8175,0.8167,0.8015,0.8,0.7849,0.7833,0.7675,0.7667,0.7556,0.7505,0.7508,0.7503,0.7505,0.7556,0.7583,0.7625,0.7567,0.7504,0.75,0.7333,0.7278,0.7167,0.7083,0.7,0.6841,0.6833,0.6675,0.6667,0.65,0.6333,0.6182,0.6167,0.6,0.5849,0.5833,0.5667,0.5515,0.55,0.5349,0.5333,0.5167,0.5083,0.5,0.4917,0.4833,0.4682,0.4667,0.45,0.4349,0.4333,0.4167,0.4,0.3833,0.3667,0.3556,0.35,0.3333,0.3167,0.3159,0.3,0.2833,0.2667,0.25,0.2333,0.225,0.2167,0.2,0.1985,0.1833,0.1667,0.1583,0.15,0.1333,0.1318,0.1167,0.1,0.0985,0.0833,0.0667,0.05,0.0492,0.0485,0.05,0.0651,0.0651,0.0667,0.0818,0.0833,0.0985,0.1,0.1151,0.1159,0.1159,0.1159,0.1151,0.1159,0.1167,0.1222,0.125,0.1167,0.1159,0.1151,0.1151,0.1,0.0985,0.0833,0.0818,0.0818,0.0833,0.0985,0.0985,0.1,0.1151,0.1151,0.1159,0.1167,0.1318,0.1318,0.1325,0.1333,0.1485,0.1485,0.1492,0.1485,0.1485,0.1333,0.1325,0.1318,0.1167,0.1159,0.1,0.0992,0.0833,0.0825,0.0667,0.0659,0.05,0.0492,0.0333,0.0325,0.0167,0.0161,0.0111,0],[0.5111,0.5167,0.525,0.5333,0.5485,0.55,0.5667,0.5833,0.6,0.6167,0.6333,0.65,0.6508,0.6667,0.6792,0.6833,0.6967,0.7,0.7167,0.7171,0.7333,0.7375,0.75,0.7503,0.7625,0.7667,0.7833,0.7889,0.8,0.8056,0.8167,0.8208,0.8333,0.8337,0.8458,0.85,0.8528,0.8595,0.8667,0.8688,0.881,0.8833,0.8907,0.9,0.9002,0.9071,0.9111,0.9111,0.9095,0.9111,0.9119,0.9139,0.9167,0.9169,0.9167,0.9139,0.9111,0.9067,0.9003,0.9,0.8889,0.8833,0.8672,0.8667,0.8505,0.85,0.8444,0.8337,0.8333,0.825,0.8167,0.8083,0.8,0.7849,0.7833,0.7667,0.7515,0.75,0.7349,0.7333,0.7182,0.7167,0.7015,0.7008,0.7056,0.7167,0.7172,0.7175,0.7175,0.7167,0.7083,0.7083,0.7111,0.7125,0.7167,0.7169,0.7222,0.7267,0.7292,0.7333,0.7335,0.7336,0.7333,0.7214,0.7167,0.7056,0.7,0.6833,0.6672,0.6667,0.65,0.6333,0.6167,0.6,0.5833,0.5667,0.5515,0.55,0.5333,0.5182,0.5167,0.5,0.4917,0.4833,0.4675,0.4667,0.4508,0.45,0.4417,0.4333,0.4182,0.4167,0.4,0.3917,0.3833,0.3667,0.35,0.3333,0.3167,0.3,0.2889,0.2833,0.2667,0.25,0.2333,0.2167,0.2042,0.2,0.1992,0.1889,0.1833,0.175,0.1667,0.1659,0.1611,0.1611,0.1583,0.1583,0.1542,0.1542,0.1567,0.1583,0.16,0.1633,0.1639,0.1663,0.1667,0.1722,0.1722,0.1778,0.1778,0.1825,0.1828,0.1833,0.1889,0.1889,0.1944,0.1992,0.1995,0.2,0.2042,0.2042,0.2083,0.2083,0.2067,0.2,0.1996,0.1917,0.1833,0.1778,0.1667,0.1625,0.15,0.1496,0.1375,0.1333,0.1222,0.1167,0.1,0.0958,0.0833,0.0829,0.0722,0.0667,0.0556,0.05,0.0444,0.0333,0.0292,0.0278,0.0328,0.0333,0.0417,0.0492,0.0495,0.05,0.0667,0.0833,0.0985,0.1,0.1167,0.1318,0.1333,0.15,0.1659,0.1667,0.1833,0.1889,0.1992,0.2,0.2111,0.2167,0.225,0.2333,0.2375,0.25,0.2542,0.2667,0.2833,0.2875,0.3,0.3167,0.3208,0.3333,0.35,0.3651,0.3667,0.3833,0.4,0.4167,0.425,0.4333,0.45,0.4651,0.4667,0.4833,0.4867,0.5,0.5111],[0.4997,0.5,0.5167,0.5333,0.55,0.5667,0.5833,0.6,0.6167,0.6333,0.6349,0.65,0.6667,0.675,0.6833,0.6944,0.7,0.7042,0.7167,0.7172,0.7333,0.7337,0.75,0.7505,0.7667,0.7675,0.7833,0.7889,0.8,0.8083,0.8167,0.8208,0.8333,0.8357,0.8458,0.85,0.8556,0.8667,0.8669,0.87,0.875,0.88,0.88,0.8806,0.8833,0.8836,0.8881,0.8881,0.8867,0.8861,0.8836,0.8833,0.8672,0.8667,0.86,0.8504,0.85,0.8389,0.8333,0.83,0.8169,0.8167,0.8004,0.8,0.7833,0.7667,0.75,0.7349,0.7333,0.7167,0.7,0.6944,0.6839,0.6833,0.6722,0.6667,0.6508,0.65,0.6333,0.6278,0.6278,0.625,0.6278,0.6333,0.6341,0.6389,0.6417,0.65,0.6505,0.6556,0.6515,0.6667,0.6672,0.6675,0.6833,0.6837,0.6839,0.6839,0.6839,0.6833,0.6682,0.6667,0.65,0.6333,0.6167,0.6159,0.6,0.5992,0.5985,0.5833,0.5667,0.55,0.5349,0.5333,0.5167,0.5008,0.5,0.4917,0.4833,0.4778,0.475,0.4675,0.4667,0.4611,0.4556,0.45,0.4333,0.425,0.4167,0.4008,0.4,0.3833,0.375,0.3667,0.3508,0.35,0.3333,0.3167,0.3,0.2833,0.2667,0.25,0.2485,0.2333,0.2328,0.2222,0.2167,0.2161,0.2125,0.2111,0.2056,0.2056,0.2,0.1995,0.1995,0.1996,0.2,0.2083,0.2083,0.2159,0.2167,0.2222,0.2278,0.2325,0.2328,0.2333,0.2389,0.2389,0.2389,0.2389,0.2389,0.2389,0.2389,0.2417,0.2444,0.2444,0.2458,0.2458,0.2496,0.2458,0.2375,0.2333,0.225,0.2167,0.2163,0.2125,0.2056,0.2,0.1944,0.1833,0.175,0.1667,0.1611,0.15,0.1444,0.1333,0.1325,0.1167,0.1161,0.1056,0.1,0.0992,0.0992,0.1,0.1159,0.1167,0.1333,0.1417,0.15,0.1651,0.1667,0.1828,0.1833,0.2,0.2042,0.2167,0.2194,0.2267,0.2286,0.231,0.2333,0.2417,0.25,0.2583,0.2664,0.2667,0.2833,0.29,0.3,0.3167,0.3292,0.3333,0.35,0.3667,0.3825,0.3833,0.4,0.4167,0.4333,0.45,0.4556,0.4667,0.4806,0.4833,0.4997],[0.4944,0.5,0.5167,0.5333,0.55,0.5667,0.5682,0.5833,0.6,0.6167,0.625,0.6333,0.65,0.6583,0.6667,0.6833,0.6944,0.7,0.71,0.7167,0.725,0.7333,0.7417,0.75,0.7625,0.7667,0.7778,0.7833,0.7944,0.8,0.8067,0.8139,0.8167,0.825,0.8312,0.8333,0.84,0.8452,0.85,0.8503,0.8548,0.8611,0.8633,0.86,0.8595,0.8533,0.85,0.8476,0.8405,0.8333,0.8306,0.8222,0.8167,0.81,0.8,0.7917,0.7833,0.7667,0.75,0.7444,0.7333,0.7167,0.7,0.6833,0.6682,0.6667,0.6583,0.65,0.6458,0.6339,0.6333,0.6167,0.6111,0.6004,0.6,0.5837,0.5833,0.5722,0.5722,0.5722,0.5722,0.5722,0.5667,0.5611,0.5508,0.55,0.5349,0.5333,0.5167,0.5015,0.5,0.4841,0.4833,0.4667,0.4583,0.4508,0.45,0.4349,0.4349,0.4341,0.4339,0.4333,0.4175,0.4172,0.4167,0.4015,0.4005,0.4,0.3841,0.3833,0.3667,0.35,0.3333,0.3182,0.3167,0.3151,0.3,0.2833,0.2818,0.2667,0.2659,0.2659,0.2659,0.2661,0.2667,0.2818,0.2825,0.2833,0.2985,0.2985,0.2992,0.2992,0.2992,0.2944,0.2889,0.2889,0.2889,0.2917,0.2992,0.3,0.3033,0.3056,0.3111,0.3111,0.3159,0.3159,0.3111,0.3056,0.3,0.2992,0.2889,0.2889,0.2875,0.2833,0.2828,0.2825,0.2778,0.2667,0.2651,0.25,0.2444,0.2333,0.2278,0.2167,0.2111,0.2042,0.2,0.1917,0.1833,0.175,0.175,0.175,0.1833,0.1867,0.1995,0.2,0.21,0.2167,0.2238,0.2331,0.2333,0.2452,0.2481,0.25,0.2542,0.26,0.2664,0.2667,0.2812,0.2833,0.2997,0.3,0.3167,0.3333,0.35,0.3583,0.3667,0.3833,0.4,0.4159,0.4167,0.4333,0.4492,0.45,0.4667,0.4833,0.4944],[0.5417,0.55,0.5651,0.5667,0.575,0.5667,0.5651,0.55,0.5417,0.5333,0.5292,0.5333,0.5417],[0.475,0.4833,0.5,0.5167,0.5333,0.55,0.5667,0.5833,0.6,0.6005,0.6167,0.6278,0.6333,0.65,0.6667,0.6722,0.6833,0.6867,0.7,0.7004,0.7167,0.7208,0.7333,0.74,0.75,0.7542,0.7667,0.77,0.7833,0.7837,0.7944,0.8,0.8083,0.8167,0.8169,0.8194,0.825,0.831,0.8333,0.8336,0.8336,0.8354,0.8375,0.8333,0.8315,0.8222,0.8167,0.8111,0.8003,0.8,0.7837,0.7833,0.7672,0.7667,0.75,0.7333,0.7167,0.7,0.6833,0.6667,0.6505,0.65,0.6375,0.6333,0.6222,0.6167,0.6083,0.6,0.5841,0.5833,0.5675,0.5667,0.55,0.5349,0.5333,0.5167,0.5083,0.5056,0.5008,0.5083,0.5167,0.5222,0.525,0.5182,0.5167,0.5008,0.5,0.4833,0.4667,0.4515,0.45,0.4333,0.4167,0.4,0.3833,0.3667,0.3651,0.35,0.3333,0.3292,0.3292,0.33,0.3333,0.3367,0.3433,0.3497,0.35,0.3611,0.3556,0.3542,0.35,0.3497,0.3433,0.3333,0.333,0.3329,0.3329,0.3329,0.3328,0.3292,0.3233,0.3167,0.3163,0.3,0.2996,0.2833,0.2828,0.2667,0.2661,0.25,0.2495,0.2375,0.2333,0.2329,0.2328,0.2328,0.2292,0.23,0.2333,0.2458,0.25,0.2583,0.2667,0.27,0.2828,0.2833,0.2917,0.2958,0.2996,0.2996,0.3,0.3133,0.3167,0.3333,0.35,0.3667,0.3833,0.3917,0.4,0.4167,0.4333,0.4485,0.45,0.4667,0.475],[0.5008,0.5167,0.5333,0.55,0.5667,0.5833,0.6,0.6056,0.6167,0.6208,0.6222,0.6233,0.619,0.6167,0.6111,0.6,0.5917,0.5833,0.5667,0.55,0.5333,0.5175,0.5167,0.5,0.4944,0.4875,0.4837,0.4839,0.4889,0.5,0.5008],[0.5151,0.5167,0.5333,0.55,0.5667,0.5833,0.6,0.6083,0.6167,0.6333,0.6417,0.65,0.6583,0.6667,0.675,0.6833,0.6889,0.7,0.7056,0.7167,0.7278,0.7333,0.7458,0.75,0.7625,0.7667,0.7792,0.7833,0.7867,0.7929,0.8,0.8002,0.8071,0.8139,0.8167,0.8168,0.8169,0.8185,0.8167,0.8056,0.8,0.7944,0.7833,0.7722,0.7667,0.75,0.7341,0.7333,0.7167,0.7,0.6833,0.6667,0.65,0.6333,0.6328,0.6329,0.6333,0.6389,0.6467,0.6498,0.65,0.6533,0.6542,0.65,0.6496,0.64,0.6333,0.6278,0.6167,0.6,0.5985,0.5833,0.5667,0.55,0.5333,0.5167,0.5083,0.5,0.4839,0.4833,0.4667,0.4625,0.4542,0.45,0.4467,0.4417,0.4375,0.4458,0.45,0.4504,0.4611,0.4667,0.475,0.4833,0.5,0.5005,0.5167,0.5333,0.55,0.5667,0.5675,0.5675,0.5667,0.5508,0.55,0.5341,0.5333,0.5292,0.5222,0.5167,0.5,0.4833,0.4667,0.4515,0.45,0.4333,0.4318,0.4167,0.4,0.3944,0.3833,0.3828,0.375,0.3708,0.3667,0.3664,0.3663,0.3633,0.3567,0.35,0.3497,0.3433,0.3333,0.3278,0.3167,0.3111,0.3,0.2967,0.2875,0.2833,0.2792,0.2778,0.275,0.2778,0.2828,0.2833,0.2917,0.2967,0.2997,0.3,0.31,0.3167,0.3222,0.3329,0.3333,0.3492,0.35,0.3659,0.3667,0.3833,0.4,0.4167,0.4333,0.4492,0.45,0.4667,0.4833,0.5,0.5151],[0.5992,0.6,0.6015,0.6,0.5992],[0.3985,0.4,0.4167,0.4333,0.4341,0.45,0.4508,0.4515,0.45,0.4341,0.4333,0.4167,0.4,0.3833,0.3825,0.3667,0.3663,0.3667,0.3818,0.3833,0.3985],[0.4985,0.5,0.5167,0.5333,0.55,0.5667,0.5833,0.6,0.6008,0.6167,0.6333,0.6337,0.6444,0.65,0.6667,0.667,0.6833,0.6875,0.7,0.7042,0.7167,0.7208,0.7333,0.7375,0.75,0.7504,0.7515,0.7515,0.7667,0.767,0.7675,0.7682,0.7667,0.7508,0.7508,0.75,0.7349,0.7333,0.7167,0.7151,0.7151,0.7,0.6992,0.7,0.7159,0.7159,0.7151,0.7,0.6992,0.6985,0.6833,0.6667,0.65,0.6485,0.6333,0.6167,0.6,0.5833,0.5667,0.55,0.5333,0.5167,0.5,0.4833,0.4792,0.4667,0.4583,0.45,0.4339,0.4333,0.4222,0.417,0.4167,0.4015,0.4015,0.4,0.3833,0.3667,0.3651,0.35,0.3485,0.3333,0.3325,0.3325,0.3278,0.3278,0.3292,0.3333,0.3389,0.3458,0.35,0.3533,0.3611,0.3633,0.3667,0.3825,0.3833,0.4,0.4151,0.4167,0.4333,0.45,0.4667,0.4833,0.4985],[0.4159,0.4167,0.4333,0.4349,0.45,0.4667,0.4682,0.4682,0.4667,0.45,0.4333,0.4318,0.4167,0.4161,0.4159],[0.5318,0.5333,0.55,0.5667,0.5833,0.6,0.6008,0.6167,0.6333,0.6339,0.65,0.6508,0.6515,0.65,0.6333,0.6167,0.6,0.5833,0.5667,0.5651,0.55,0.5333,0.5167,0.5015,0.5,0.4833,0.4667,0.45,0.4349,0.4333,0.4167,0.4015,0.4,0.3992,0.3833,0.3829,0.3833,0.3985,0.4,0.4151,0.4167,0.4325,0.4333,0.45,0.4667,0.4833,0.5,0.5167,0.5318]]}}},{\"type\":\"MultiLine\",\"id\":\"0a70317eddad30cc0307ae4f1983f307\",\"attributes\":{\"id\":\"0a70317eddad30cc0307ae4f1983f307\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_color\":{\"units\":\"data\",\"value\":\"black\"},\"line_alpha\":{\"units\":\"data\",\"value\":1},\"line_width\":{\"units\":\"data\",\"value\":1},\"xs\":{\"units\":\"data\",\"field\":\"xs\"},\"ys\":{\"units\":\"data\",\"field\":\"ys\"}}},{\"type\":\"MultiLine\",\"id\":\"22c4d6b43e1c6fcedd0ebd0d26230bc1\",\"attributes\":{\"id\":\"22c4d6b43e1c6fcedd0ebd0d26230bc1\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_color\":{\"units\":\"data\",\"value\":\"#e1e1e1\"},\"line_alpha\":{\"units\":\"data\",\"value\":1},\"line_width\":{\"units\":\"data\",\"value\":1},\"xs\":{\"units\":\"data\",\"field\":\"xs\"},\"ys\":{\"units\":\"data\",\"field\":\"ys\"}}},{\"type\":\"MultiLine\",\"id\":\"ab185c3278fd94287a964708b4eff524\",\"attributes\":{\"id\":\"ab185c3278fd94287a964708b4eff524\",\"tags\":[],\"doc\":null,\"visible\":true,\"line_color\":{\"units\":\"data\",\"value\":\"black\"},\"line_alpha\":{\"units\":\"data\",\"value\":1},\"line_width\":{\"units\":\"data\",\"value\":1},\"xs\":{\"units\":\"data\",\"field\":\"xs\"},\"ys\":{\"units\":\"data\",\"field\":\"ys\"}}},{\"type\":\"GlyphRenderer\",\"id\":\"f9511ff9ea5ef28f1652799fe8ac7720\",\"attributes\":{\"id\":\"f9511ff9ea5ef28f1652799fe8ac7720\",\"tags\":[],\"doc\":null,\"selection_glyph\":null,\"nonselection_glyph\":{\"type\":\"MultiLine\",\"id\":\"22c4d6b43e1c6fcedd0ebd0d26230bc1\"},\"hover_glyph\":{\"type\":\"MultiLine\",\"id\":\"ab185c3278fd94287a964708b4eff524\"},\"server_data_source\":null,\"name\":null,\"data_source\":{\"type\":\"ColumnDataSource\",\"id\":\"7c8f7e1d0c2240a8915ad3f7cad080cb\"},\"glyph\":{\"type\":\"MultiLine\",\"id\":\"0a70317eddad30cc0307ae4f1983f307\"}}},{\"type\":\"Range1d\",\"id\":\"94b9a7317148d80878b9e67572cdff32\",\"attributes\":{\"id\":\"94b9a7317148d80878b9e67572cdff32\",\"tags\":[],\"doc\":null,\"start\":0,\"end\":1}},{\"type\":\"Range1d\",\"id\":\"84e92f7115efc2b8a0132178c511e19d\",\"attributes\":{\"id\":\"84e92f7115efc2b8a0132178c511e19d\",\"tags\":[],\"doc\":null,\"start\":0,\"end\":1}},{\"type\":\"LinearAxis\",\"id\":\"d2dce7fdf3e72dc627b2aa03a09be7c2\",\"attributes\":{\"id\":\"d2dce7fdf3e72dc627b2aa03a09be7c2\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"axis_label\":\"index\",\"formatter\":{\"type\":\"BasicTickFormatter\",\"id\":\"c7aeb0391085ba0a51e67d08ced01634\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"9afb80064d384c9fb307b4479ace65af\"},\"visible\":true,\"axis_label_text_font_size\":\"12pt\"}},{\"type\":\"BasicTickFormatter\",\"id\":\"c7aeb0391085ba0a51e67d08ced01634\",\"attributes\":{\"id\":\"c7aeb0391085ba0a51e67d08ced01634\",\"tags\":[],\"doc\":null}},{\"type\":\"BasicTicker\",\"id\":\"9afb80064d384c9fb307b4479ace65af\",\"attributes\":{\"id\":\"9afb80064d384c9fb307b4479ace65af\",\"tags\":[],\"doc\":null,\"num_minor_ticks\":5}},{\"type\":\"Grid\",\"id\":\"dabcb1533bc4423678808bfae79ee3ce\",\"attributes\":{\"id\":\"dabcb1533bc4423678808bfae79ee3ce\",\"tags\":[],\"doc\":null,\"dimension\":0,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"9afb80064d384c9fb307b4479ace65af\"}}},{\"type\":\"LinearAxis\",\"id\":\"383e967b812bf2f98a45ebc45d7feb4d\",\"attributes\":{\"id\":\"383e967b812bf2f98a45ebc45d7feb4d\",\"tags\":[],\"doc\":null,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"axis_label\":\"x\",\"formatter\":{\"type\":\"BasicTickFormatter\",\"id\":\"8ec5b4055497c8a31aaee2480776db5f\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"8c03b142af31da8075019fdfe098f2fc\"},\"visible\":true,\"axis_label_text_font_size\":\"12pt\"}},{\"type\":\"BasicTickFormatter\",\"id\":\"8ec5b4055497c8a31aaee2480776db5f\",\"attributes\":{\"id\":\"8ec5b4055497c8a31aaee2480776db5f\",\"tags\":[],\"doc\":null}},{\"type\":\"BasicTicker\",\"id\":\"8c03b142af31da8075019fdfe098f2fc\",\"attributes\":{\"id\":\"8c03b142af31da8075019fdfe098f2fc\",\"tags\":[],\"doc\":null,\"num_minor_ticks\":5}},{\"type\":\"Grid\",\"id\":\"e245e2e8cf8b00f1cbf7ac80a0c91564\",\"attributes\":{\"id\":\"e245e2e8cf8b00f1cbf7ac80a0c91564\",\"tags\":[],\"doc\":null,\"dimension\":1,\"plot\":{\"type\":\"Plot\",\"id\":\"4fe98e65e95082cb392f21ca83608698\",\"subtype\":\"Figure\"},\"ticker\":{\"type\":\"BasicTicker\",\"id\":\"8c03b142af31da8075019fdfe098f2fc\"}}}]}}};\n",
       "  var refkey = Object.keys(docs_json)[0]\n",
       "  var refs = docs_json[refkey].roots.references\n",
       "  function traverseObject(obj) {\n",
       "    for(var key in obj) {\n",
       "      if(obj[key].constructor === Object) {\n",
       "        traverseObject(obj[key]);\n",
       "      } else if(obj[key].constructor === Array) {\n",
       "        for (var i = 0; i < obj[key].length; i++) {\n",
       "          if(obj[key][i] === null)\n",
       "            obj[key][i] = NaN;\n",
       "        };\n",
       "      }\n",
       "    };\n",
       "  }\n",
       "  for(var i = 0; i < refs.length; i++) {\n",
       "    if(refs[i].type === \"ColumnDataSource\")\n",
       "      traverseObject(refs[i].attributes.data);\n",
       "  };\n",
       "  var render_items = [{\n",
       "    \"docid\": docid,\n",
       "    \"elementid\": elementid,\n",
       "    \"modelid\": modelid\n",
       "  }];\n",
       "  Bokeh.set_log_level('info');\n",
       "  Bokeh.embed.embed_items(docs_json, render_items);\n",
       "});\n",
       "</script>\n",
       "</body>\n",
       "</html>"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# en este ejemplo se graficará la superficie del dataset volcano.\n",
    "\n",
    "p <- figure(title = \"Volcano\", padding_factor = 0) %>%  # genera la figura para graficar\n",
    "  ly_image(volcano) %>%                                 #\n",
    "  ly_contour(volcano)                                   # genera la gráfica de contorno\n",
    "\n",
    "p <- figure(xlim = c(0, 1),         # límites de x\n",
    "            ylim = c(0, 1),         # límites de y\n",
    "            title = \"Volcano\") %>%  # título del gráfico\n",
    "     ly_image(volcano) %>%          # superficie a color\n",
    "     ly_contour(volcano)            # líneas de contorno\n",
    "\n",
    "# salva la gráfica a un archivo html\n",
    "rbokeh2html(p,'files/out.html')\n",
    "\n",
    "# grafica el contenido del archivo.\n",
    "IRdisplay::display_html(file='files/out.html')"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {
    "collapsed": true
   },
   "source": [
    "----\n",
    "# LightningR"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Bibliografía**.\n",
    "\n",
    "> [LightningR](https://github.com/Ermlab/lightning-rstat)   \n",
    "\n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "Lighting es otra librería gráfica que puede usarse en varios lenguajes incluyendo R, Python y Scala. \n",
    "\n",
    "El paquete puede instalarse desde el CRAN con:\n",
    "```\n",
    "install.packages(\"LightningR\")\n",
    "```\n",
    "\n",
    "El sitio web indicado en la bibliografía contiene información detallada de como construir los gráficos."
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 13,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "name": "stderr",
     "output_type": "stream",
     "text": [
      "Loading required package: RJSONIO\n",
      "Loading required package: RCurl\n",
      "Loading required package: bitops\n",
      "Loading required package: R6\n",
      "Loading required package: httr\n"
     ]
    },
    {
     "data": {
      "text/html": [
       "<dl>\n",
       "\t<dt>$name</dt>\n",
       "\t\t<dd>'optional_session_name'</dd>\n",
       "\t<dt>$id</dt>\n",
       "\t\t<dd>28</dd>\n",
       "\t<dt>$updatedAt</dt>\n",
       "\t\t<dd>'2016-06-13T02:15:32.538Z'</dd>\n",
       "\t<dt>$createdAt</dt>\n",
       "\t\t<dd>'2016-06-13T02:15:32.538Z'</dd>\n",
       "\t<dt>$identifier</dt>\n",
       "\t\t<dd>'197f9998-4337-4b2d-87c6-d03d9ace2d64'</dd>\n",
       "</dl>\n"
      ],
      "text/latex": [
       "\\begin{description}\n",
       "\\item[\\$name] 'optional\\_session\\_name'\n",
       "\\item[\\$id] 28\n",
       "\\item[\\$updatedAt] '2016-06-13T02:15:32.538Z'\n",
       "\\item[\\$createdAt] '2016-06-13T02:15:32.538Z'\n",
       "\\item[\\$identifier] '197f9998-4337-4b2d-87c6-d03d9ace2d64'\n",
       "\\end{description}\n"
      ],
      "text/markdown": [
       "$name\n",
       ":   'optional_session_name'\n",
       "$id\n",
       ":   28\n",
       "$updatedAt\n",
       ":   '2016-06-13T02:15:32.538Z'\n",
       "$createdAt\n",
       ":   '2016-06-13T02:15:32.538Z'\n",
       "$identifier\n",
       ":   '197f9998-4337-4b2d-87c6-d03d9ace2d64'\n",
       "\n",
       "\n"
      ],
      "text/plain": [
       "$name\n",
       "[1] \"optional_session_name\"\n",
       "\n",
       "$id\n",
       "[1] 28\n",
       "\n",
       "$updatedAt\n",
       "[1] \"2016-06-13T02:15:32.538Z\"\n",
       "\n",
       "$createdAt\n",
       "[1] \"2016-06-13T02:15:32.538Z\"\n",
       "\n",
       "$identifier\n",
       "[1] \"197f9998-4337-4b2d-87c6-d03d9ace2d64\"\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# cargue la librería y cree un objeto para conectarse con el servidor.\n",
    "library(LightningR)\n",
    "vizserver <- Lightning$new(\"http://my-lightning.herokuapp.com/\")\n",
    "\n",
    "# debe crear una visualización en el servidor\n",
    "vizserver$createsession(\"optional_session_name\")"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 14,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<dl>\n",
       "\t<dt>$url</dt>\n",
       "\t\t<dd>'http://my-lightning.herokuapp.com/visualizations/45/'</dd>\n",
       "\t<dt>$id</dt>\n",
       "\t\t<dd>45</dd>\n",
       "</dl>\n"
      ],
      "text/latex": [
       "\\begin{description}\n",
       "\\item[\\$url] 'http://my-lightning.herokuapp.com/visualizations/45/'\n",
       "\\item[\\$id] 45\n",
       "\\end{description}\n"
      ],
      "text/markdown": [
       "$url\n",
       ":   'http://my-lightning.herokuapp.com/visualizations/45/'\n",
       "$id\n",
       ":   45\n",
       "\n",
       "\n"
      ],
      "text/plain": [
       "$url\n",
       "[1] \"http://my-lightning.herokuapp.com/visualizations/45/\"\n",
       "\n",
       "$id\n",
       "[1] 45\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# crea una gráfica\n",
    "vizserver$line(c(1,2,3,4,5,6,7,8))"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 15,
   "metadata": {
    "collapsed": true
   },
   "outputs": [],
   "source": [
    "# visualiza la gráfica llamando la función.\n",
    "vizserver$openviz()"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "Este último paso abre una ventana en el explorador en la que aparece una gráfica como la siguiente:\n",
    "\n",
    "<img src=\"images/ligthningRplot.png\"  align='left'>"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "---\n",
    "# rCharts"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Bibliografía**.\n",
    "\n",
    "> [rCharts](http://rcharts.io)   \n",
    "\n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "`rCharts` es otra librería gráfica que puede usarse en R. Es una interfaz para `Lattice`, pero permite crear gráficos interactivos.\n",
    "\n",
    "El paquete puede instalarse desde GitHub con:\n",
    "```\n",
    "require(devtools)\n",
    "install_github('ramnathv/rCharts', 'ramnathv')\n",
    "```\n",
    "\n",
    "El sitio web indicado en la bibliografía contiene información detallada de como construir los gráficos."
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 16,
   "metadata": {
    "collapsed": true
   },
   "outputs": [],
   "source": [
    "# cargue la librería\n",
    "library(rCharts)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 17,
   "metadata": {
    "collapsed": true
   },
   "outputs": [],
   "source": [
    "# crea una gráfica\n",
    "x <- 1:10\n",
    "y <- x^2\n",
    "df <- data.frame(x, y)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 18,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/plain": []
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "# construya la gráfica. Esta se abrirá en una nueva ventana del navegador.\n",
    "p <- rPlot(x ~ y, data = df, type = 'line')\n",
    "p"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "En el sitio web http://ramnathv.github.io/rCharts/ se presentan ejemplos que ilustran como crear gráficos interactivos."
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "---\n",
    "# googleVis"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Bibliografía**.\n",
    "\n",
    "> [googleVis](https://journal.r-project.org/archive/2011-2/RJournal_2011-2_Gesmann+de~Castillo.pdf)   \n",
    "\n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "`googleVis` es una librería para visualizar datos usando el API de visualización de Google.\n",
    "\n",
    "El paquete puede instalarse desde el CRAN:\n",
    "\n",
    "El articulo presentado en la bibliografía contiene información  de como construir los gráficos."
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 19,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "name": "stderr",
     "output_type": "stream",
     "text": [
      "\n",
      "Welcome to googleVis version 0.5.10\n",
      "\n",
      "Please read the Google API Terms of Use\n",
      "before you start using the package:\n",
      "https://developers.google.com/terms/\n",
      "\n",
      "Note, the plot method of googleVis will by default use\n",
      "the standard browser to display its output.\n",
      "\n",
      "See the googleVis package vignettes for more details,\n",
      "or visit http://github.com/mages/googleVis.\n",
      "\n",
      "To suppress this message use:\n",
      "suppressPackageStartupMessages(library(googleVis))\n",
      "\n"
     ]
    }
   ],
   "source": [
    "# cargue la librería\n",
    "library(googleVis)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 20,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n",
       "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n",
       "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
       "<head>\n",
       "<title>BubbleChartID661447b8c0a5</title>\n",
       "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n",
       "<style type=\"text/css\">\n",
       "body {\n",
       "  color: #444444;\n",
       "  font-family: Arial,Helvetica,sans-serif;\n",
       "  font-size: 75%;\n",
       "  }\n",
       "  a {\n",
       "  color: #4D87C7;\n",
       "  text-decoration: none;\n",
       "}\n",
       "</style>\n",
       "</head>\n",
       "<body>\n",
       " <!-- BubbleChart generated in R 3.3.0 by googleVis 0.5.10 package -->\n",
       "<!-- Sun Jun 12 21:21:09 2016 -->\n",
       "\n",
       "\n",
       "<!-- jsHeader -->\n",
       "<script type=\"text/javascript\">\n",
       " \n",
       "// jsData \n",
       "function gvisDataBubbleChartID661447b8c0a5 () {\n",
       "var data = new google.visualization.DataTable();\n",
       "var datajson =\n",
       "[\n",
       " [\n",
       " \"Apples\",\n",
       "98,\n",
       "78,\n",
       "\"2008\",\n",
       "20 \n",
       "],\n",
       "[\n",
       " \"Apples\",\n",
       "111,\n",
       "79,\n",
       "\"2009\",\n",
       "32 \n",
       "],\n",
       "[\n",
       " \"Apples\",\n",
       "89,\n",
       "76,\n",
       "\"2010\",\n",
       "13 \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "96,\n",
       "81,\n",
       "\"2008\",\n",
       "15 \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "85,\n",
       "76,\n",
       "\"2008\",\n",
       "9 \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "93,\n",
       "80,\n",
       "\"2009\",\n",
       "13 \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "94,\n",
       "78,\n",
       "\"2009\",\n",
       "16 \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "98,\n",
       "91,\n",
       "\"2010\",\n",
       "7 \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "81,\n",
       "71,\n",
       "\"2010\",\n",
       "10 \n",
       "] \n",
       "];\n",
       "data.addColumn('string','Fruit');\n",
       "data.addColumn('number','Sales');\n",
       "data.addColumn('number','Expenses');\n",
       "data.addColumn('string','Year');\n",
       "data.addColumn('number','Profit');\n",
       "data.addRows(datajson);\n",
       "return(data);\n",
       "}\n",
       " \n",
       "// jsDrawChart\n",
       "function drawChartBubbleChartID661447b8c0a5() {\n",
       "var data = gvisDataBubbleChartID661447b8c0a5();\n",
       "var options = {};\n",
       "options[\"hAxis\"] = {minValue:75, maxValue:125};\n",
       "\n",
       "\n",
       "    var chart = new google.visualization.BubbleChart(\n",
       "    document.getElementById('BubbleChartID661447b8c0a5')\n",
       "    );\n",
       "    chart.draw(data,options);\n",
       "    \n",
       "\n",
       "}\n",
       "  \n",
       " \n",
       "// jsDisplayChart\n",
       "(function() {\n",
       "var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "var chartid = \"corechart\";\n",
       "  \n",
       "// Manually see if chartid is in pkgs (not all browsers support Array.indexOf)\n",
       "var i, newPackage = true;\n",
       "for (i = 0; newPackage && i < pkgs.length; i++) {\n",
       "if (pkgs[i] === chartid)\n",
       "newPackage = false;\n",
       "}\n",
       "if (newPackage)\n",
       "  pkgs.push(chartid);\n",
       "  \n",
       "// Add the drawChart function to the global list of callbacks\n",
       "callbacks.push(drawChartBubbleChartID661447b8c0a5);\n",
       "})();\n",
       "function displayChartBubbleChartID661447b8c0a5() {\n",
       "  var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "  var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "  window.clearTimeout(window.__gvisLoad);\n",
       "  // The timeout is set to 100 because otherwise the container div we are\n",
       "  // targeting might not be part of the document yet\n",
       "  window.__gvisLoad = setTimeout(function() {\n",
       "  var pkgCount = pkgs.length;\n",
       "  google.load(\"visualization\", \"1\", { packages:pkgs, callback: function() {\n",
       "  if (pkgCount != pkgs.length) {\n",
       "  // Race condition where another setTimeout call snuck in after us; if\n",
       "  // that call added a package, we must not shift its callback\n",
       "  return;\n",
       "}\n",
       "while (callbacks.length > 0)\n",
       "callbacks.shift()();\n",
       "} });\n",
       "}, 100);\n",
       "}\n",
       " \n",
       "// jsFooter\n",
       "</script>\n",
       " \n",
       "<!-- jsChart -->  \n",
       "<script type=\"text/javascript\" src=\"https://www.google.com/jsapi?callback=displayChartBubbleChartID661447b8c0a5\"></script>\n",
       " \n",
       "<!-- divChart -->\n",
       "  \n",
       "<div id=\"BubbleChartID661447b8c0a5\" \n",
       "  style=\"width: 500; height: automatic;\">\n",
       "</div>\n",
       " <div><span>Data: Fruits &#8226; Chart ID: <a href=\"Chart_BubbleChartID661447b8c0a5.html\">BubbleChartID661447b8c0a5</a> &#8226; <a href=\"https://github.com/mages/googleVis\">googleVis-0.5.10</a></span><br /> \n",
       "<!-- htmlFooter -->\n",
       "<span> \n",
       "  R version 3.3.0 (2016-05-03) \n",
       "  &#8226; <a href=\"https://developers.google.com/terms/\">Google Terms of Use</a> &#8226; <a href=\"https://google-developers.appspot.com/chart/interactive/docs/gallery/bubblechart\">Documentation and Data Policy</a>\n",
       "</span></div>\n",
       "</body>\n",
       "</html>\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "x <- gvisBubbleChart(Fruits, idvar=\"Fruit\", \n",
    "                     xvar=\"Sales\", yvar=\"Expenses\",\n",
    "                     colorvar=\"Year\", sizevar=\"Profit\",\n",
    "                     options=list(\n",
    "                     hAxis='{minValue:75, maxValue:125}'))\n",
    "\n",
    "print(x, file='files/gvis.html')\n",
    "IRdisplay::display_html(file='files/gvis.html')"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 21,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n",
       "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n",
       "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
       "<head>\n",
       "<title>PieChartID66146212e397</title>\n",
       "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n",
       "<style type=\"text/css\">\n",
       "body {\n",
       "  color: #444444;\n",
       "  font-family: Arial,Helvetica,sans-serif;\n",
       "  font-size: 75%;\n",
       "  }\n",
       "  a {\n",
       "  color: #4D87C7;\n",
       "  text-decoration: none;\n",
       "}\n",
       "</style>\n",
       "</head>\n",
       "<body>\n",
       " <!-- PieChart generated in R 3.3.0 by googleVis 0.5.10 package -->\n",
       "<!-- Sun Jun 12 21:21:20 2016 -->\n",
       "\n",
       "\n",
       "<!-- jsHeader -->\n",
       "<script type=\"text/javascript\">\n",
       " \n",
       "// jsData \n",
       "function gvisDataPieChartID66146212e397 () {\n",
       "var data = new google.visualization.DataTable();\n",
       "var datajson =\n",
       "[\n",
       " [\n",
       " \"New York\",\n",
       "200 \n",
       "],\n",
       "[\n",
       " \"Boston\",\n",
       "300 \n",
       "],\n",
       "[\n",
       " \"Miami\",\n",
       "400 \n",
       "],\n",
       "[\n",
       " \"Chicago\",\n",
       "500 \n",
       "],\n",
       "[\n",
       " \"Los Angeles\",\n",
       "600 \n",
       "],\n",
       "[\n",
       " \"Houston\",\n",
       "700 \n",
       "] \n",
       "];\n",
       "data.addColumn('string','City');\n",
       "data.addColumn('number','Popularity');\n",
       "data.addRows(datajson);\n",
       "return(data);\n",
       "}\n",
       " \n",
       "// jsDrawChart\n",
       "function drawChartPieChartID66146212e397() {\n",
       "var data = gvisDataPieChartID66146212e397();\n",
       "var options = {};\n",
       "options[\"allowHtml\"] = true;\n",
       "\n",
       "\n",
       "    var chart = new google.visualization.PieChart(\n",
       "    document.getElementById('PieChartID66146212e397')\n",
       "    );\n",
       "    chart.draw(data,options);\n",
       "    \n",
       "\n",
       "}\n",
       "  \n",
       " \n",
       "// jsDisplayChart\n",
       "(function() {\n",
       "var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "var chartid = \"corechart\";\n",
       "  \n",
       "// Manually see if chartid is in pkgs (not all browsers support Array.indexOf)\n",
       "var i, newPackage = true;\n",
       "for (i = 0; newPackage && i < pkgs.length; i++) {\n",
       "if (pkgs[i] === chartid)\n",
       "newPackage = false;\n",
       "}\n",
       "if (newPackage)\n",
       "  pkgs.push(chartid);\n",
       "  \n",
       "// Add the drawChart function to the global list of callbacks\n",
       "callbacks.push(drawChartPieChartID66146212e397);\n",
       "})();\n",
       "function displayChartPieChartID66146212e397() {\n",
       "  var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "  var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "  window.clearTimeout(window.__gvisLoad);\n",
       "  // The timeout is set to 100 because otherwise the container div we are\n",
       "  // targeting might not be part of the document yet\n",
       "  window.__gvisLoad = setTimeout(function() {\n",
       "  var pkgCount = pkgs.length;\n",
       "  google.load(\"visualization\", \"1\", { packages:pkgs, callback: function() {\n",
       "  if (pkgCount != pkgs.length) {\n",
       "  // Race condition where another setTimeout call snuck in after us; if\n",
       "  // that call added a package, we must not shift its callback\n",
       "  return;\n",
       "}\n",
       "while (callbacks.length > 0)\n",
       "callbacks.shift()();\n",
       "} });\n",
       "}, 100);\n",
       "}\n",
       " \n",
       "// jsFooter\n",
       "</script>\n",
       " \n",
       "<!-- jsChart -->  \n",
       "<script type=\"text/javascript\" src=\"https://www.google.com/jsapi?callback=displayChartPieChartID66146212e397\"></script>\n",
       " \n",
       "<!-- divChart -->\n",
       "  \n",
       "<div id=\"PieChartID66146212e397\" \n",
       "  style=\"width: 500; height: automatic;\">\n",
       "</div>\n",
       " <div><span>Data: CityPopularity &#8226; Chart ID: <a href=\"Chart_PieChartID66146212e397.html\">PieChartID66146212e397</a> &#8226; <a href=\"https://github.com/mages/googleVis\">googleVis-0.5.10</a></span><br /> \n",
       "<!-- htmlFooter -->\n",
       "<span> \n",
       "  R version 3.3.0 (2016-05-03) \n",
       "  &#8226; <a href=\"https://developers.google.com/terms/\">Google Terms of Use</a> &#8226; <a href=\"https://google-developers.appspot.com/chart/interactive/docs/gallery/piechart\">Documentation and Data Policy</a>\n",
       "</span></div>\n",
       "</body>\n",
       "</html>\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "x <- gvisPieChart(CityPopularity)\n",
    "print(x, file='files/gvis.html')\n",
    "IRdisplay::display_html(file='files/gvis.html')"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 24,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n",
       "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n",
       "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
       "<head>\n",
       "<title>GeoChartID66144983b978</title>\n",
       "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n",
       "<style type=\"text/css\">\n",
       "body {\n",
       "  color: #444444;\n",
       "  font-family: Arial,Helvetica,sans-serif;\n",
       "  font-size: 75%;\n",
       "  }\n",
       "  a {\n",
       "  color: #4D87C7;\n",
       "  text-decoration: none;\n",
       "}\n",
       "</style>\n",
       "</head>\n",
       "<body>\n",
       " <!-- GeoChart generated in R 3.3.0 by googleVis 0.5.10 package -->\n",
       "<!-- Sun Jun 12 21:21:51 2016 -->\n",
       "\n",
       "\n",
       "<!-- jsHeader -->\n",
       "<script type=\"text/javascript\">\n",
       " \n",
       "// jsData \n",
       "function gvisDataGeoChartID66144983b978 () {\n",
       "var data = new google.visualization.DataTable();\n",
       "var datajson =\n",
       "[\n",
       " [\n",
       " \"Alabama\",\n",
       "2.1 \n",
       "],\n",
       "[\n",
       " \"Alaska\",\n",
       "1.5 \n",
       "],\n",
       "[\n",
       " \"Arizona\",\n",
       "1.8 \n",
       "],\n",
       "[\n",
       " \"Arkansas\",\n",
       "1.9 \n",
       "],\n",
       "[\n",
       " \"California\",\n",
       "1.1 \n",
       "],\n",
       "[\n",
       " \"Colorado\",\n",
       "0.7 \n",
       "],\n",
       "[\n",
       " \"Connecticut\",\n",
       "1.1 \n",
       "],\n",
       "[\n",
       " \"Delaware\",\n",
       "0.9 \n",
       "],\n",
       "[\n",
       " \"Florida\",\n",
       "1.3 \n",
       "],\n",
       "[\n",
       " \"Georgia\",\n",
       "2 \n",
       "],\n",
       "[\n",
       " \"Hawaii\",\n",
       "1.9 \n",
       "],\n",
       "[\n",
       " \"Idaho\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Illinois\",\n",
       "0.9 \n",
       "],\n",
       "[\n",
       " \"Indiana\",\n",
       "0.7 \n",
       "],\n",
       "[\n",
       " \"Iowa\",\n",
       "0.5 \n",
       "],\n",
       "[\n",
       " \"Kansas\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Kentucky\",\n",
       "1.6 \n",
       "],\n",
       "[\n",
       " \"Louisiana\",\n",
       "2.8 \n",
       "],\n",
       "[\n",
       " \"Maine\",\n",
       "0.7 \n",
       "],\n",
       "[\n",
       " \"Maryland\",\n",
       "0.9 \n",
       "],\n",
       "[\n",
       " \"Massachusetts\",\n",
       "1.1 \n",
       "],\n",
       "[\n",
       " \"Michigan\",\n",
       "0.9 \n",
       "],\n",
       "[\n",
       " \"Minnesota\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Mississippi\",\n",
       "2.4 \n",
       "],\n",
       "[\n",
       " \"Missouri\",\n",
       "0.8 \n",
       "],\n",
       "[\n",
       " \"Montana\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Nebraska\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Nevada\",\n",
       "0.5 \n",
       "],\n",
       "[\n",
       " \"New Hampshire\",\n",
       "0.7 \n",
       "],\n",
       "[\n",
       " \"New Jersey\",\n",
       "1.1 \n",
       "],\n",
       "[\n",
       " \"New Mexico\",\n",
       "2.2 \n",
       "],\n",
       "[\n",
       " \"New York\",\n",
       "1.4 \n",
       "],\n",
       "[\n",
       " \"North Carolina\",\n",
       "1.8 \n",
       "],\n",
       "[\n",
       " \"North Dakota\",\n",
       "0.8 \n",
       "],\n",
       "[\n",
       " \"Ohio\",\n",
       "0.8 \n",
       "],\n",
       "[\n",
       " \"Oklahoma\",\n",
       "1.1 \n",
       "],\n",
       "[\n",
       " \"Oregon\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Pennsylvania\",\n",
       "1 \n",
       "],\n",
       "[\n",
       " \"Rhode Island\",\n",
       "1.3 \n",
       "],\n",
       "[\n",
       " \"South Carolina\",\n",
       "2.3 \n",
       "],\n",
       "[\n",
       " \"South Dakota\",\n",
       "0.5 \n",
       "],\n",
       "[\n",
       " \"Tennessee\",\n",
       "1.7 \n",
       "],\n",
       "[\n",
       " \"Texas\",\n",
       "2.2 \n",
       "],\n",
       "[\n",
       " \"Utah\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Vermont\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"Virginia\",\n",
       "1.4 \n",
       "],\n",
       "[\n",
       " \"Washington\",\n",
       "0.6 \n",
       "],\n",
       "[\n",
       " \"West Virginia\",\n",
       "1.4 \n",
       "],\n",
       "[\n",
       " \"Wisconsin\",\n",
       "0.7 \n",
       "],\n",
       "[\n",
       " \"Wyoming\",\n",
       "0.6 \n",
       "] \n",
       "];\n",
       "data.addColumn('string','state.name');\n",
       "data.addColumn('number','Illiteracy');\n",
       "data.addRows(datajson);\n",
       "return(data);\n",
       "}\n",
       " \n",
       "// jsDrawChart\n",
       "function drawChartGeoChartID66144983b978() {\n",
       "var data = gvisDataGeoChartID66144983b978();\n",
       "var options = {};\n",
       "options[\"width\"] =    600;\n",
       "options[\"height\"] =    400;\n",
       "options[\"region\"] = \"US\";\n",
       "options[\"displayMode\"] = \"regions\";\n",
       "options[\"resolution\"] = \"provinces\";\n",
       "\n",
       "\n",
       "    var chart = new google.visualization.GeoChart(\n",
       "    document.getElementById('GeoChartID66144983b978')\n",
       "    );\n",
       "    chart.draw(data,options);\n",
       "    \n",
       "\n",
       "}\n",
       "  \n",
       " \n",
       "// jsDisplayChart\n",
       "(function() {\n",
       "var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "var chartid = \"geochart\";\n",
       "  \n",
       "// Manually see if chartid is in pkgs (not all browsers support Array.indexOf)\n",
       "var i, newPackage = true;\n",
       "for (i = 0; newPackage && i < pkgs.length; i++) {\n",
       "if (pkgs[i] === chartid)\n",
       "newPackage = false;\n",
       "}\n",
       "if (newPackage)\n",
       "  pkgs.push(chartid);\n",
       "  \n",
       "// Add the drawChart function to the global list of callbacks\n",
       "callbacks.push(drawChartGeoChartID66144983b978);\n",
       "})();\n",
       "function displayChartGeoChartID66144983b978() {\n",
       "  var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "  var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "  window.clearTimeout(window.__gvisLoad);\n",
       "  // The timeout is set to 100 because otherwise the container div we are\n",
       "  // targeting might not be part of the document yet\n",
       "  window.__gvisLoad = setTimeout(function() {\n",
       "  var pkgCount = pkgs.length;\n",
       "  google.load(\"visualization\", \"1\", { packages:pkgs, callback: function() {\n",
       "  if (pkgCount != pkgs.length) {\n",
       "  // Race condition where another setTimeout call snuck in after us; if\n",
       "  // that call added a package, we must not shift its callback\n",
       "  return;\n",
       "}\n",
       "while (callbacks.length > 0)\n",
       "callbacks.shift()();\n",
       "} });\n",
       "}, 100);\n",
       "}\n",
       " \n",
       "// jsFooter\n",
       "</script>\n",
       " \n",
       "<!-- jsChart -->  \n",
       "<script type=\"text/javascript\" src=\"https://www.google.com/jsapi?callback=displayChartGeoChartID66144983b978\"></script>\n",
       " \n",
       "<!-- divChart -->\n",
       "  \n",
       "<div id=\"GeoChartID66144983b978\" \n",
       "  style=\"width: 600; height: 400;\">\n",
       "</div>\n",
       " <div><span>Data: data.frame(state.name, state.x77) &#8226; Chart ID: <a href=\"Chart_GeoChartID66144983b978.html\">GeoChartID66144983b978</a> &#8226; <a href=\"https://github.com/mages/googleVis\">googleVis-0.5.10</a></span><br /> \n",
       "<!-- htmlFooter -->\n",
       "<span> \n",
       "  R version 3.3.0 (2016-05-03) \n",
       "  &#8226; <a href=\"https://developers.google.com/terms/\">Google Terms of Use</a> &#8226; <a href=\"https://google-developers.appspot.com/chart/interactive/docs/gallery/geochart\">Documentation and Data Policy</a>\n",
       "</span></div>\n",
       "</body>\n",
       "</html>\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "x <- gvisGeoChart(data.frame(state.name, state.x77), \n",
    "                  \"state.name\", \"Illiteracy\",\n",
    "                  options=list(region=\"US\", \n",
    "                  displayMode=\"regions\", \n",
    "                  resolution=\"provinces\",\n",
    "                  width=600, height=400))\n",
    "print(x, file='files/gvis.html')\n",
    "IRdisplay::display_html(file='files/gvis.html')"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 25,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n",
       "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n",
       "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
       "<head>\n",
       "<title>MotionChartID66141ac7cae9</title>\n",
       "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n",
       "<style type=\"text/css\">\n",
       "body {\n",
       "  color: #444444;\n",
       "  font-family: Arial,Helvetica,sans-serif;\n",
       "  font-size: 75%;\n",
       "  }\n",
       "  a {\n",
       "  color: #4D87C7;\n",
       "  text-decoration: none;\n",
       "}\n",
       "</style>\n",
       "</head>\n",
       "<body>\n",
       " <!-- MotionChart generated in R 3.3.0 by googleVis 0.5.10 package -->\n",
       "<!-- Sun Jun 12 21:22:08 2016 -->\n",
       "\n",
       "\n",
       "<!-- jsHeader -->\n",
       "<script type=\"text/javascript\">\n",
       " \n",
       "// jsData \n",
       "function gvisDataMotionChartID66141ac7cae9 () {\n",
       "var data = new google.visualization.DataTable();\n",
       "var datajson =\n",
       "[\n",
       " [\n",
       " \"Apples\",\n",
       "2008,\n",
       "\"West\",\n",
       "98,\n",
       "78,\n",
       "20,\n",
       "\"2008-12-31\" \n",
       "],\n",
       "[\n",
       " \"Apples\",\n",
       "2009,\n",
       "\"West\",\n",
       "111,\n",
       "79,\n",
       "32,\n",
       "\"2009-12-31\" \n",
       "],\n",
       "[\n",
       " \"Apples\",\n",
       "2010,\n",
       "\"West\",\n",
       "89,\n",
       "76,\n",
       "13,\n",
       "\"2010-12-31\" \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "2008,\n",
       "\"East\",\n",
       "96,\n",
       "81,\n",
       "15,\n",
       "\"2008-12-31\" \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "2008,\n",
       "\"East\",\n",
       "85,\n",
       "76,\n",
       "9,\n",
       "\"2008-12-31\" \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "2009,\n",
       "\"East\",\n",
       "93,\n",
       "80,\n",
       "13,\n",
       "\"2009-12-31\" \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "2009,\n",
       "\"East\",\n",
       "94,\n",
       "78,\n",
       "16,\n",
       "\"2009-12-31\" \n",
       "],\n",
       "[\n",
       " \"Oranges\",\n",
       "2010,\n",
       "\"East\",\n",
       "98,\n",
       "91,\n",
       "7,\n",
       "\"2010-12-31\" \n",
       "],\n",
       "[\n",
       " \"Bananas\",\n",
       "2010,\n",
       "\"East\",\n",
       "81,\n",
       "71,\n",
       "10,\n",
       "\"2010-12-31\" \n",
       "] \n",
       "];\n",
       "data.addColumn('string','Fruit');\n",
       "data.addColumn('number','Year');\n",
       "data.addColumn('string','Location');\n",
       "data.addColumn('number','Sales');\n",
       "data.addColumn('number','Expenses');\n",
       "data.addColumn('number','Profit');\n",
       "data.addColumn('string','Date');\n",
       "data.addRows(datajson);\n",
       "return(data);\n",
       "}\n",
       " \n",
       "// jsDrawChart\n",
       "function drawChartMotionChartID66141ac7cae9() {\n",
       "var data = gvisDataMotionChartID66141ac7cae9();\n",
       "var options = {};\n",
       "options[\"width\"] =    600;\n",
       "options[\"height\"] =    500;\n",
       "options[\"state\"] = \"\";\n",
       "\n",
       "\n",
       "    var chart = new google.visualization.MotionChart(\n",
       "    document.getElementById('MotionChartID66141ac7cae9')\n",
       "    );\n",
       "    chart.draw(data,options);\n",
       "    \n",
       "\n",
       "}\n",
       "  \n",
       " \n",
       "// jsDisplayChart\n",
       "(function() {\n",
       "var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "var chartid = \"motionchart\";\n",
       "  \n",
       "// Manually see if chartid is in pkgs (not all browsers support Array.indexOf)\n",
       "var i, newPackage = true;\n",
       "for (i = 0; newPackage && i < pkgs.length; i++) {\n",
       "if (pkgs[i] === chartid)\n",
       "newPackage = false;\n",
       "}\n",
       "if (newPackage)\n",
       "  pkgs.push(chartid);\n",
       "  \n",
       "// Add the drawChart function to the global list of callbacks\n",
       "callbacks.push(drawChartMotionChartID66141ac7cae9);\n",
       "})();\n",
       "function displayChartMotionChartID66141ac7cae9() {\n",
       "  var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "  var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "  window.clearTimeout(window.__gvisLoad);\n",
       "  // The timeout is set to 100 because otherwise the container div we are\n",
       "  // targeting might not be part of the document yet\n",
       "  window.__gvisLoad = setTimeout(function() {\n",
       "  var pkgCount = pkgs.length;\n",
       "  google.load(\"visualization\", \"1\", { packages:pkgs, callback: function() {\n",
       "  if (pkgCount != pkgs.length) {\n",
       "  // Race condition where another setTimeout call snuck in after us; if\n",
       "  // that call added a package, we must not shift its callback\n",
       "  return;\n",
       "}\n",
       "while (callbacks.length > 0)\n",
       "callbacks.shift()();\n",
       "} });\n",
       "}, 100);\n",
       "}\n",
       " \n",
       "// jsFooter\n",
       "</script>\n",
       " \n",
       "<!-- jsChart -->  \n",
       "<script type=\"text/javascript\" src=\"https://www.google.com/jsapi?callback=displayChartMotionChartID66141ac7cae9\"></script>\n",
       " \n",
       "<!-- divChart -->\n",
       "  \n",
       "<div id=\"MotionChartID66141ac7cae9\" \n",
       "  style=\"width: 600; height: 500;\">\n",
       "</div>\n",
       " <div><span>Data: Fruits &#8226; Chart ID: <a href=\"Chart_MotionChartID66141ac7cae9.html\">MotionChartID66141ac7cae9</a> &#8226; <a href=\"https://github.com/mages/googleVis\">googleVis-0.5.10</a></span><br /> \n",
       "<!-- htmlFooter -->\n",
       "<span> \n",
       "  R version 3.3.0 (2016-05-03) \n",
       "  &#8226; <a href=\"https://developers.google.com/terms/\">Google Terms of Use</a> &#8226; <a href=\"https://google-developers.appspot.com/chart/interactive/docs/gallery/motionchart\">Documentation and Data Policy</a>\n",
       "</span></div>\n",
       "</body>\n",
       "</html>\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "x <- gvisMotionChart(Fruits, \n",
    "                     idvar=\"Fruit\", \n",
    "                     timevar=\"Year\")\n",
    "print(x, file='files/gvis.html')\n",
    "IRdisplay::display_html(file='files/gvis.html')"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 26,
   "metadata": {
    "collapsed": false
   },
   "outputs": [
    {
     "data": {
      "text/html": [
       "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n",
       "  \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n",
       "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
       "<head>\n",
       "<title>MapID66142c1648ee</title>\n",
       "<meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n",
       "<style type=\"text/css\">\n",
       "body {\n",
       "  color: #444444;\n",
       "  font-family: Arial,Helvetica,sans-serif;\n",
       "  font-size: 75%;\n",
       "  }\n",
       "  a {\n",
       "  color: #4D87C7;\n",
       "  text-decoration: none;\n",
       "}\n",
       "</style>\n",
       "</head>\n",
       "<body>\n",
       " <!-- Map generated in R 3.3.0 by googleVis 0.5.10 package -->\n",
       "<!-- Sun Jun 12 21:22:26 2016 -->\n",
       "\n",
       "\n",
       "<!-- jsHeader -->\n",
       "<script type=\"text/javascript\">\n",
       " \n",
       "// jsData \n",
       "function gvisDataMapID66142c1648ee () {\n",
       "var data = new google.visualization.DataTable();\n",
       "var datajson =\n",
       "[\n",
       " [\n",
       " 10.8,\n",
       "-35.5,\n",
       "\"Tropical Depression<BR>Pressure=1010<BR>Speed=25\" \n",
       "],\n",
       "[\n",
       " 11.2,\n",
       "-37.4,\n",
       "\"Tropical Depression<BR>Pressure=1009<BR>Speed=30\" \n",
       "],\n",
       "[\n",
       " 11.7,\n",
       "-39.6,\n",
       "\"Tropical Depression<BR>Pressure=1008<BR>Speed=30\" \n",
       "],\n",
       "[\n",
       " 12.3,\n",
       "-42,\n",
       "\"Tropical Storm<BR>Pressure=1006<BR>Speed=35\" \n",
       "],\n",
       "[\n",
       " 13.1,\n",
       "-44.2,\n",
       "\"Tropical Storm<BR>Pressure=1003<BR>Speed=35\" \n",
       "],\n",
       "[\n",
       " 13.6,\n",
       "-46.2,\n",
       "\"Tropical Storm<BR>Pressure=1002<BR>Speed=40\" \n",
       "],\n",
       "[\n",
       " 14.1,\n",
       "-48,\n",
       "\"Tropical Storm<BR>Pressure=1001<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 14.6,\n",
       "-49.9,\n",
       "\"Tropical Storm<BR>Pressure=1000<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 15.4,\n",
       "-51.8,\n",
       "\"Tropical Storm<BR>Pressure=1000<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 16.3,\n",
       "-53.5,\n",
       "\"Tropical Storm<BR>Pressure=1001<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 17.2,\n",
       "-55.3,\n",
       "\"Tropical Storm<BR>Pressure=1002<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 18,\n",
       "-56.9,\n",
       "\"Tropical Storm<BR>Pressure=1005<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 18.8,\n",
       "-58.3,\n",
       "\"Tropical Storm<BR>Pressure=1007<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 19.8,\n",
       "-59.3,\n",
       "\"Tropical Storm<BR>Pressure=1011<BR>Speed=40\" \n",
       "],\n",
       "[\n",
       " 20.7,\n",
       "-60,\n",
       "\"Tropical Storm<BR>Pressure=1013<BR>Speed=40\" \n",
       "],\n",
       "[\n",
       " 21.7,\n",
       "-60.7,\n",
       "\"Tropical Storm<BR>Pressure=1015<BR>Speed=40\" \n",
       "],\n",
       "[\n",
       " 22.5,\n",
       "-61.5,\n",
       "\"Tropical Storm<BR>Pressure=1014<BR>Speed=40\" \n",
       "],\n",
       "[\n",
       " 23.2,\n",
       "-62.4,\n",
       "\"Tropical Storm<BR>Pressure=1014<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 23.9,\n",
       "-63.3,\n",
       "\"Tropical Storm<BR>Pressure=1010<BR>Speed=45\" \n",
       "],\n",
       "[\n",
       " 24.4,\n",
       "-64.2,\n",
       "\"Tropical Storm<BR>Pressure=1007<BR>Speed=50\" \n",
       "],\n",
       "[\n",
       " 24.8,\n",
       "-64.9,\n",
       "\"Tropical Storm<BR>Pressure=1004<BR>Speed=50\" \n",
       "],\n",
       "[\n",
       " 25.3,\n",
       "-65.9,\n",
       "\"Tropical Storm<BR>Pressure=1000<BR>Speed=55\" \n",
       "],\n",
       "[\n",
       " 25.6,\n",
       "-67,\n",
       "\"Tropical Storm<BR>Pressure=994<BR>Speed=60\" \n",
       "],\n",
       "[\n",
       " 25.8,\n",
       "-68.3,\n",
       "\"Hurricane<BR>Pressure=981<BR>Speed=70\" \n",
       "],\n",
       "[\n",
       " 25.7,\n",
       "-69.7,\n",
       "\"Hurricane<BR>Pressure=969<BR>Speed=80\" \n",
       "],\n",
       "[\n",
       " 25.6,\n",
       "-71.1,\n",
       "\"Hurricane<BR>Pressure=961<BR>Speed=90\" \n",
       "],\n",
       "[\n",
       " 25.5,\n",
       "-72.5,\n",
       "\"Hurricane<BR>Pressure=947<BR>Speed=105\" \n",
       "],\n",
       "[\n",
       " 25.4,\n",
       "-74.2,\n",
       "\"Hurricane<BR>Pressure=933<BR>Speed=120\" \n",
       "],\n",
       "[\n",
       " 25.4,\n",
       "-75.8,\n",
       "\"Hurricane<BR>Pressure=922<BR>Speed=135\" \n",
       "],\n",
       "[\n",
       " 25.4,\n",
       "-77.5,\n",
       "\"Hurricane<BR>Pressure=930<BR>Speed=125\" \n",
       "],\n",
       "[\n",
       " 25.4,\n",
       "-79.3,\n",
       "\"Hurricane<BR>Pressure=937<BR>Speed=120\" \n",
       "],\n",
       "[\n",
       " 25.6,\n",
       "-81.2,\n",
       "\"Hurricane<BR>Pressure=951<BR>Speed=110\" \n",
       "],\n",
       "[\n",
       " 25.8,\n",
       "-83.1,\n",
       "\"Hurricane<BR>Pressure=947<BR>Speed=115\" \n",
       "],\n",
       "[\n",
       " 26.2,\n",
       "-85,\n",
       "\"Hurricane<BR>Pressure=943<BR>Speed=115\" \n",
       "],\n",
       "[\n",
       " 26.6,\n",
       "-86.7,\n",
       "\"Hurricane<BR>Pressure=948<BR>Speed=115\" \n",
       "],\n",
       "[\n",
       " 27.2,\n",
       "-88.2,\n",
       "\"Hurricane<BR>Pressure=946<BR>Speed=115\" \n",
       "],\n",
       "[\n",
       " 27.8,\n",
       "-89.6,\n",
       "\"Hurricane<BR>Pressure=941<BR>Speed=120\" \n",
       "],\n",
       "[\n",
       " 28.5,\n",
       "-90.5,\n",
       "\"Hurricane<BR>Pressure=937<BR>Speed=120\" \n",
       "],\n",
       "[\n",
       " 29.2,\n",
       "-91.3,\n",
       "\"Hurricane<BR>Pressure=955<BR>Speed=115\" \n",
       "],\n",
       "[\n",
       " 30.1,\n",
       "-91.7,\n",
       "\"Tropical Storm<BR>Pressure=973<BR>Speed=80\" \n",
       "],\n",
       "[\n",
       " 30.9,\n",
       "-91.6,\n",
       "\"Tropical Storm<BR>Pressure=991<BR>Speed=50\" \n",
       "],\n",
       "[\n",
       " 31.5,\n",
       "-91.1,\n",
       "\"Tropical Depression<BR>Pressure=995<BR>Speed=35\" \n",
       "],\n",
       "[\n",
       " 32.1,\n",
       "-90.5,\n",
       "\"Tropical Depression<BR>Pressure=997<BR>Speed=30\" \n",
       "],\n",
       "[\n",
       " 32.8,\n",
       "-89.6,\n",
       "\"Tropical Depression<BR>Pressure=998<BR>Speed=30\" \n",
       "],\n",
       "[\n",
       " 33.6,\n",
       "-88.4,\n",
       "\"Tropical Depression<BR>Pressure=999<BR>Speed=25\" \n",
       "],\n",
       "[\n",
       " 34.4,\n",
       "-86.7,\n",
       "\"Tropical Depression<BR>Pressure=1000<BR>Speed=20\" \n",
       "],\n",
       "[\n",
       " 35.4,\n",
       "-84,\n",
       "\"Tropical Depression<BR>Pressure=1000<BR>Speed=20\" \n",
       "] \n",
       "];\n",
       "data.addColumn('number','Latitude');\n",
       "data.addColumn('number','Longitude');\n",
       "data.addColumn('string','Tip');\n",
       "data.addRows(datajson);\n",
       "return(data);\n",
       "}\n",
       " \n",
       "// jsDrawChart\n",
       "function drawChartMapID66142c1648ee() {\n",
       "var data = gvisDataMapID66142c1648ee();\n",
       "var options = {};\n",
       "options[\"showTip\"] = true;\n",
       "options[\"showLine\"] = true;\n",
       "options[\"enableScrollWheel\"] = true;\n",
       "options[\"mapType\"] = \"terrain\";\n",
       "options[\"useMapTypeControl\"] = true;\n",
       "\n",
       "\n",
       "    var chart = new google.visualization.Map(\n",
       "    document.getElementById('MapID66142c1648ee')\n",
       "    );\n",
       "    chart.draw(data,options);\n",
       "    \n",
       "\n",
       "}\n",
       "  \n",
       " \n",
       "// jsDisplayChart\n",
       "(function() {\n",
       "var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "var chartid = \"map\";\n",
       "  \n",
       "// Manually see if chartid is in pkgs (not all browsers support Array.indexOf)\n",
       "var i, newPackage = true;\n",
       "for (i = 0; newPackage && i < pkgs.length; i++) {\n",
       "if (pkgs[i] === chartid)\n",
       "newPackage = false;\n",
       "}\n",
       "if (newPackage)\n",
       "  pkgs.push(chartid);\n",
       "  \n",
       "// Add the drawChart function to the global list of callbacks\n",
       "callbacks.push(drawChartMapID66142c1648ee);\n",
       "})();\n",
       "function displayChartMapID66142c1648ee() {\n",
       "  var pkgs = window.__gvisPackages = window.__gvisPackages || [];\n",
       "  var callbacks = window.__gvisCallbacks = window.__gvisCallbacks || [];\n",
       "  window.clearTimeout(window.__gvisLoad);\n",
       "  // The timeout is set to 100 because otherwise the container div we are\n",
       "  // targeting might not be part of the document yet\n",
       "  window.__gvisLoad = setTimeout(function() {\n",
       "  var pkgCount = pkgs.length;\n",
       "  google.load(\"visualization\", \"1\", { packages:pkgs, callback: function() {\n",
       "  if (pkgCount != pkgs.length) {\n",
       "  // Race condition where another setTimeout call snuck in after us; if\n",
       "  // that call added a package, we must not shift its callback\n",
       "  return;\n",
       "}\n",
       "while (callbacks.length > 0)\n",
       "callbacks.shift()();\n",
       "} });\n",
       "}, 100);\n",
       "}\n",
       " \n",
       "// jsFooter\n",
       "</script>\n",
       " \n",
       "<!-- jsChart -->  \n",
       "<script type=\"text/javascript\" src=\"https://www.google.com/jsapi?callback=displayChartMapID66142c1648ee\"></script>\n",
       " \n",
       "<!-- divChart -->\n",
       "  \n",
       "<div id=\"MapID66142c1648ee\" \n",
       "  style=\"width: 500; height: automatic;\">\n",
       "</div>\n",
       " <div><span>Data: Andrew &#8226; Chart ID: <a href=\"Chart_MapID66142c1648ee.html\">MapID66142c1648ee</a> &#8226; <a href=\"https://github.com/mages/googleVis\">googleVis-0.5.10</a></span><br /> \n",
       "<!-- htmlFooter -->\n",
       "<span> \n",
       "  R version 3.3.0 (2016-05-03) \n",
       "  &#8226; <a href=\"https://developers.google.com/terms/\">Google Terms of Use</a> &#8226; <a href=\"https://google-developers.appspot.com/chart/interactive/docs/gallery/map\">Documentation and Data Policy</a>\n",
       "</span></div>\n",
       "</body>\n",
       "</html>\n"
      ]
     },
     "metadata": {},
     "output_type": "display_data"
    }
   ],
   "source": [
    "x <- gvisMap(Andrew, \"LatLong\" , \"Tip\", \n",
    "             options=list(showTip=TRUE, \n",
    "                          showLine=TRUE, \n",
    "                          enableScrollWheel=TRUE,\n",
    "                          mapType='terrain', \n",
    "                          useMapTypeControl=TRUE))\n",
    "\n",
    "# se imprime al disco\n",
    "print(x, file='files/gvis.html')\n",
    "\n",
    "# grafica el contenido del archivo.\n",
    "IRdisplay::display_html(file='files/gvis.html')"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "Use el comando `demo(googleVis)` en R IDLE."
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "---\n",
    "# Otras herramientas"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "**Bibliografía**.\n",
    "\n",
    "> [ggvis](http://ggvis.rstudio.com/0.1/interactivity.html) by RStudio  \n",
    "[DiagrammeR](http://rich-iannone.github.io/DiagrammeR/index.html)  \n",
    "[iPlots](http://www.iplots.org)  \n",
    "[Webminar Data wrangling with R and RStudio - ggvis](https://www.rstudio.com/resources/webinars/data-wrangling-with-r-and-rstudio/) \n",
    "\n",
    "> Haga click [aquí](http://gallery.htmlwidgets.org) para acceder a la galería completa de Rhtmlwidgets. "
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "* `ggvis` es una librería construir gráficos interactivos.\n",
    "* `DiagrammeR` es una herramienta para construir diagramas.\n",
    "* `iPLots` es otra libreria para gráficos\n"
   ]
  },
  {
   "cell_type": "markdown",
   "metadata": {
    "collapsed": true
   },
   "source": [
    "Videos de Ramnath Vaidyanathan sobre R  \n",
    "https://www.youtube.com/user/ramnathv1/videos"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "metadata": {
    "collapsed": true
   },
   "outputs": [],
   "source": []
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "metadata": {
    "collapsed": true
   },
   "outputs": [],
   "source": []
  }
 ],
 "metadata": {
  "kernelspec": {
   "display_name": "R",
   "language": "R",
   "name": "ir"
  },
  "language_info": {
   "codemirror_mode": "r",
   "file_extension": ".r",
   "mimetype": "text/x-r-source",
   "name": "R",
   "pygments_lexer": "r",
   "version": "3.3.0"
  }
 },
 "nbformat": 4,
 "nbformat_minor": 0
}