```{r message=FALSE} library(tidyverse)
{r} ggplot(data=airquality,aes(x=Temp,
fill=factor(Month))) + geomhistogram(position="identity", alpha=0.6)
+ scalefill_discrete(name = "Month", labels = c("May",
"June","July", "August", "September")) + labs(x = "Monthly Temperatures
from May - Sept", y = "Frequency of Temps", title = "Histogram of
Monthly Temperatures from May - Sept, 1973", caption = "New York State
Department of Conservation and the National Weather Service")
{r}
ggplot(data=airquality,aes(x=Temp, fill=factor(Month))) +
geomhistogram(position="identity", alpha=0.5, binwidth = 5, color =
"white")+ scalefilldiscrete(name = "Month", labels = c("May",
"June","July", "August", "September")) + labs(x = "Monthly Temperatures
from May - Sept", y = "Frequency of Temps", title = "Histogram of
Monthly Temperatures from May - Sept, 1973", caption = "New York State
Department of Conservation and the National Weather Service")
{r} ggplot(data=airquality, aes(Month, Temp, fill
=factor(Month))) + labs(x = "Months from May through September", y =
"Temperatures", title = "Side-by-Side Boxplot of Monthly Temperatures",
caption = "New York State Department of Conservation and the National
Weather Service") + geomboxplot() + scalefilldiscrete(name
= "Month", labels = c("May", "June","July", "August", "September"))
{r} ggplot(data=airquality, aes(Month, Temp, fill
=factor(Month))) + labs(x = "Monthly Temperatures", y = "Temperatures",
title = "Side-by-Side Boxplot of Monthly Temperatures", caption = "New
York State Department of Conservation and the National Weather Service")
+ geomboxplot()+ scalefillgrey(name = "Month", labels =
c("May", "June","July", "August", "September")) {r}
ggplot(data=airquality, aes(x=Temp, fill=factor(Month),
fill=factor(Month))) + geombar(fill="blue") + (labs(x =
"Month(5=May, 9=Sept)", y="Count of Observations", title="Count of
Airquality Readings by Month")) ``` I created a simple bar chart using
geombar to show the readings of observation of air qiality daily.
The plot shows from may to september how many observations have been
made I used geombar to create the bar graph, and fill=blue to color
the graph.