practice_plot_github.Rmd

---
title: "Practice Plotting and Github"
author: "Dowd Naik"
date: "3/5/2020"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(tidyverse)
```



```{r }
head(iris)
ggplot(iris,aes(x = Sepal.Length, color = Sepal.Length, fill = "pink"),stat_bin(30)) +
  geom_histogram() +
  theme_bw() ->practice_iris
practice_iris
ggsave("practice_plot.png",practice_iris)


```