---
title: "title"
author: "name"
date: "`r Sys.Date()`"
output: html_document
---

knitr::opts_chunk$set(echo = TRUE)

library(tidyverse)
plot(pressure)