Skip to content

Instantly share code, notes, and snippets.

@flying-sheep

flying-sheep/R demo.ipynb

Created January 15, 2019 10:55
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save flying-sheep/c20b098ccdff2830ea632f7f03fabacb to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save flying-sheep/c20b098ccdff2830ea632f7f03fabacb to your computer and use it in GitHub Desktop.
Download ZIP
Display the source blob
Display the rendered blob
Raw
R demo.ipynb
{
"cells": [
{
"cell_type": "code",
"execution_count": 6,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"<table>\n",
"<thead><tr><th scope=col>repr.plot.width</th><th scope=col>repr.plot.height</th><th scope=col>repr.plot.pointsize</th><th scope=col>repr.plot.bg</th><th scope=col>repr.plot.antialias</th><th scope=col>repr.plot.res</th><th scope=col>repr.plot.quality</th><th scope=col>repr.plot.family</th><th scope=col>repr.vector.quote</th><th scope=col>repr.matrix.max.rows</th><th scope=col>repr.matrix.max.cols</th><th scope=col>repr.matrix.latex.colspec</th><th scope=col>repr.function.highlight</th><th scope=col>repr.html.deduplicate</th></tr></thead>\n",
"<tbody>\n",
"\t<tr><td>7 </td><td>7 </td><td>12 </td><td>white </td><td>gray </td><td>120 </td><td>90 </td><td>sans </td><td>TRUE </td><td>60 </td><td>20 </td><td>r|, l , </td><td>FALSE </td><td>FALSE </td></tr>\n",
"</tbody>\n",
"</table>\n"
],
"text/latex": [
"\\begin{tabular}{llllllllllllll}\n",
" repr.plot.width & repr.plot.height & repr.plot.pointsize & repr.plot.bg & repr.plot.antialias & repr.plot.res & repr.plot.quality & repr.plot.family & repr.vector.quote & repr.matrix.max.rows & repr.matrix.max.cols & repr.matrix.latex.colspec & repr.function.highlight & repr.html.deduplicate\\\\\n",
"\\hline\n",
"\t 7 & 7 & 12 & white & gray & 120 & 90 & sans & TRUE & 60 & 20 & r\\textbar{}, l , & FALSE & FALSE \\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| repr.plot.width | repr.plot.height | repr.plot.pointsize | repr.plot.bg | repr.plot.antialias | repr.plot.res | repr.plot.quality | repr.plot.family | repr.vector.quote | repr.matrix.max.rows | repr.matrix.max.cols | repr.matrix.latex.colspec | repr.function.highlight | repr.html.deduplicate |\n",
"|---|---|---|---|---|---|---|---|---|---|---|---|---|---|\n",
"| 7 | 7 | 12 | white | gray | 120 | 90 | sans | TRUE | 60 | 20 | r|, l , | FALSE | FALSE |\n",
"\n"
],
"text/plain": [
" repr.plot.width repr.plot.height repr.plot.pointsize repr.plot.bg\n",
"[1,] 7 7 12 white \n",
" repr.plot.antialias repr.plot.res repr.plot.quality repr.plot.family\n",
"[1,] gray 120 90 sans \n",
" repr.vector.quote repr.matrix.max.rows repr.matrix.max.cols\n",
"[1,] TRUE 60 20 \n",
" repr.matrix.latex.colspec repr.function.highlight repr.html.deduplicate\n",
"[1,] r|, l , FALSE FALSE "
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"t(repr::repr_option_defaults)"
]
},
{
"cell_type": "code",
"execution_count": 3,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"<table>\n",
"<thead><tr><th scope=col>Sepal.Length</th><th scope=col>Sepal.Width</th><th scope=col>Petal.Length</th><th scope=col>Petal.Width</th><th scope=col>Species</th></tr></thead>\n",
"<tbody>\n",
"\t<tr><td>5.1 </td><td>3.5 </td><td>1.4 </td><td>0.2 </td><td>setosa</td></tr>\n",
"\t<tr><td>4.9 </td><td>3.0 </td><td>1.4 </td><td>0.2 </td><td>setosa</td></tr>\n",
"\t<tr><td>⋮</td><td>⋮</td><td>⋮</td><td>⋮</td><td>⋮</td></tr>\n",
"\t<tr><td>6.2 </td><td>3.4 </td><td>5.4 </td><td>2.3 </td><td>virginica</td></tr>\n",
"\t<tr><td>5.9 </td><td>3.0 </td><td>5.1 </td><td>1.8 </td><td>virginica</td></tr>\n",
"</tbody>\n",
"</table>\n"
],
"text/latex": [
"\\begin{tabular}{r|lllll}\n",
" Sepal.Length & Sepal.Width & Petal.Length & Petal.Width & Species\\\\\n",
"\\hline\n",
"\t 5.1 & 3.5 & 1.4 & 0.2 & setosa\\\\\n",
"\t 4.9 & 3.0 & 1.4 & 0.2 & setosa\\\\\n",
"\t ⋮ & ⋮ & ⋮ & ⋮ & ⋮\\\\\n",
"\t 6.2 & 3.4 & 5.4 & 2.3 & virginica\\\\\n",
"\t 5.9 & 3.0 & 5.1 & 1.8 & virginica\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| Sepal.Length | Sepal.Width | Petal.Length | Petal.Width | Species |\n",
"|---|---|---|---|---|\n",
"| 5.1 | 3.5 | 1.4 | 0.2 | setosa |\n",
"| 4.9 | 3.0 | 1.4 | 0.2 | setosa |\n",
"| ⋮ | ⋮ | ⋮ | ⋮ | ⋮ |\n",
"| 6.2 | 3.4 | 5.4 | 2.3 | virginica |\n",
"| 5.9 | 3.0 | 5.1 | 1.8 | virginica |\n",
"\n"
],
"text/plain": [
" Sepal.Length Sepal.Width Petal.Length Petal.Width Species \n",
"1 5.1 3.5 1.4 0.2 setosa \n",
"2 4.9 3.0 1.4 0.2 setosa \n",
"⋮ ⋮ ⋮ ⋮ ⋮ ⋮ \n",
"149 6.2 3.4 5.4 2.3 virginica\n",
"150 5.9 3.0 5.1 1.8 virginica"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"options(repr.matrix.max.rows = 4)\n",
"iris"
]
},
{
"cell_type": "code",
"execution_count": 11,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"<strong>vectors:</strong> 1"
],
"text/latex": [
"\\textbf{vectors:} 1"
],
"text/markdown": [
"**vectors:** 1"
],
"text/plain": [
"vectors \n",
" 1 "
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"<dl class=dl-horizontal>\n",
"\t<dt>1</dt>\n",
"\t\t<dd>'2'</dd>\n",
"\t<dt>vectors</dt>\n",
"\t\t<dd>'3'</dd>\n",
"</dl>\n"
],
"text/latex": [
"\\begin{description*}\n",
"\\item[1] '2'\n",
"\\item[vectors] '3'\n",
"\\end{description*}\n"
],
"text/markdown": [
"1\n",
": '2'vectors\n",
": '3'\n",
"\n"
],
"text/plain": [
" vectors \n",
" \"2\" \"3\" "
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"<ol class=list-inline>\n",
"\t<li>4</li>\n",
"\t<li>5</li>\n",
"\t<li>6</li>\n",
"</ol>\n"
],
"text/latex": [
"\\begin{enumerate*}\n",
"\\item 4\n",
"\\item 5\n",
"\\item 6\n",
"\\end{enumerate*}\n"
],
"text/markdown": [
"1. 4\n",
"2. 5\n",
"3. 6\n",
"\n",
"\n"
],
"text/plain": [
"[1] 4 5 6"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"c(vectors = 1)\n",
"c('2', vectors = '3')\n",
"4:6"
]
},
{
"cell_type": "code",
"execution_count": 15,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"<strong>$lists</strong> = 1"
],
"text/latex": [
"\\textbf{\\$lists} = 1"
],
"text/markdown": [
"**$lists** = 1"
],
"text/plain": [
"$lists\n",
"[1] 1\n"
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"<dl>\n",
"\t<dt>[[1]]</dt>\n",
"\t\t<dd>2</dd>\n",
"\t<dt>$lists</dt>\n",
"\t\t<dd>3</dd>\n",
"</dl>\n"
],
"text/latex": [
"\\begin{description}\n",
"\\item[{[[1]]}] 2\n",
"\\item[\\$lists] 3\n",
"\\end{description}\n"
],
"text/markdown": [
"[[1]]\n",
": 2\n",
"$lists\n",
": 3\n",
"\n",
"\n"
],
"text/plain": [
"[[1]]\n",
"[1] 2\n",
"\n",
"$lists\n",
"[1] 3\n"
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"<ol>\n",
"\t<li>4</li>\n",
"\t<li>'five'</li>\n",
"\t<li><ol class=list-inline>\n",
"\t<li>6</li>\n",
"\t<li>7</li>\n",
"\t<li>8</li>\n",
"</ol>\n",
"</li>\n",
"</ol>\n"
],
"text/latex": [
"\\begin{enumerate}\n",
"\\item 4\n",
"\\item 'five'\n",
"\\item \\begin{enumerate*}\n",
"\\item 6\n",
"\\item 7\n",
"\\item 8\n",
"\\end{enumerate*}\n",
"\n",
"\\end{enumerate}\n"
],
"text/markdown": [
"1. 4\n",
"2. 'five'\n",
"3. 1. 6\n",
"2. 7\n",
"3. 8\n",
"\n",
"\n",
"\n",
"\n",
"\n"
],
"text/plain": [
"[[1]]\n",
"[1] 4\n",
"\n",
"[[2]]\n",
"[1] \"five\"\n",
"\n",
"[[3]]\n",
"[1] 6 7 8\n"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"list(lists = 1)\n",
"list(2, lists = 3)\n",
"list(4, 'five', 6:8)"
]
},
{
"cell_type": "code",
"execution_count": 17,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"<ol class=list-inline>\n",
"\t<li>1</li>\n",
"\t<li>2</li>\n",
"\t<li>3</li>\n",
"\t<li>4</li>\n",
"</ol>\n",
"\n",
"<details>\n",
"\t<summary style=display:list-item;cursor:pointer>\n",
"\t\t<strong>Levels</strong>:\n",
"\t</summary>\n",
"\t<ol class=list-inline>\n",
"\t\t<li>'1'</li>\n",
"\t\t<li>'2'</li>\n",
"\t\t<li>'3'</li>\n",
"\t\t<li>'4'</li>\n",
"\t</ol>\n",
"</details>"
],
"text/latex": [
"\\begin{enumerate*}\n",
"\\item 1\n",
"\\item 2\n",
"\\item 3\n",
"\\item 4\n",
"\\end{enumerate*}\n",
"\n",
"\\emph{Levels}: \\begin{enumerate*}\n",
"\\item '1'\n",
"\\item '2'\n",
"\\item '3'\n",
"\\item '4'\n",
"\\end{enumerate*}\n"
],
"text/markdown": [
"1. 1\n",
"2. 2\n",
"3. 3\n",
"4. 4\n",
"\n",
"\n",
"\n",
"**Levels**: 1. '1'\n",
"2. '2'\n",
"3. '3'\n",
"4. '4'\n",
"\n",
"\n"
],
"text/plain": [
"[1] 1 2 3 4\n",
"Levels: 1 2 3 4"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"factor(1:4)"
]
}
],
"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.5.2"
}
},
"nbformat": 4,
"nbformat_minor": 2
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment