{
 "cells": [
  {
   "cell_type": "markdown",
   "id": "functional-border",
   "metadata": {
    "jupyter": {
     "source_hidden": true
    }
   },
   "source": [
    "# Example R notebook\n",
    "\n",
    "More info here: https://irkernel.github.io/"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "id": "another-census",
   "metadata": {},
   "outputs": [],
   "source": [
    "options(repr.plot.width = 8, repr.plot.height = 6, repr.plot.res = 200)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "id": "decent-istanbul",
   "metadata": {},
   "outputs": [],
   "source": [
    "x <- seq(0, 2*pi, .1)\n",
    "y <- sin(x)\n",
    "plot(x, y, type=\"l\")"
   ]
  },
  {
   "cell_type": "markdown",
   "id": "29cac541-6c6c-412d-acb3-92a5f8dfb0f2",
   "metadata": {},
   "source": [
    "### Tidyverse"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "id": "coral-peoples",
   "metadata": {
    "scrolled": true
   },
   "outputs": [],
   "source": [
    "library(tidyverse)"
   ]
  },
  {
   "cell_type": "markdown",
   "id": "7d3a3cf5-a775-435d-ad4b-2e1c8b2b3e11",
   "metadata": {},
   "source": [
    "Documentation:\n",
    "\n",
    "- [Tidyverse](https://www.tidyverse.org/)\n",
    "  - [R for Data Science (2e)](https://r4ds.hadley.nz/) (online book)\n",
    "  - [Tidy Modeling with R](https://www.tmwr.org/) (online book)"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "id": "upper-horse",
   "metadata": {},
   "outputs": [],
   "source": [
    "ggplot(data = mpg) + \n",
    "  geom_point(mapping = aes(x = displ, y = hwy, color = class))"
   ]
  }
 ],
 "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.6.1"
  }
 },
 "nbformat": 4,
 "nbformat_minor": 5
}