
options(repr.plot.width = 8, repr.plot.height = 6, repr.plot.res = 200)


x <- seq(0, 2*pi, .1)
y <- sin(x)
plot(x, y, type="l")


library(tidyverse)

── Attaching packages ───────────────────────────────────────────────────────────────────────────────────────────────────── tidyverse 1.3.0 ──

✔ ggplot2 3.3.3     ✔ purrr   0.3.4
✔ tibble  3.1.0     ✔ dplyr   1.0.5
✔ tidyr   1.1.3     ✔ stringr 1.4.0
✔ readr   1.4.0     ✔ forcats 0.5.1

── Conflicts ──────────────────────────────────────────────────────────────────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()


ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy, color = class))

Example R notebook¶