2/24/2017

Introduction

  • New York Air Quality Measurements

  • Daily air quality measurements in New York, May to September 1973.

  • Daily readings of the following air quality values for May 1, 1973 (a Tuesday) to September 30, 1973.

  1. Ozone: Mean ozone in parts per billion from 1300 to 1500 hours at Roosevelt Island.
  2. Solar.R: Solar radiation in Langleys in the frequency band 4000–7700 Angstroms from 0800 to 1200 hours at Central Park.
  3. Wind: Average wind speed in miles per hour at 0700 and 1000 hours at LaGuardia Airport.
  4. Temp: Maximum daily temperature in degrees Fahrenheit at La Guardia Airport.

Plotly section

  • For this assignment, we will be using the airquality dataset available in R.
  • Plotly is used.
  • This is generated on 24 February 2017
data<-airquality
library(plotly)
## Loading required package: ggplot2
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
data<-data[complete.cases(data),]

Scatterplot for Temperature vs Ozone

p1<-plot_ly(data, x = ~Ozone, y= ~Temp, color=~Temp, size=~Temp, type="scatter",mode="markers")
p1

Boxplot of Ozone Over Months

p2<-plot_ly(data, x = ~Month, y= ~Ozone, color="Red", type="box")
p2

The End

  • Thank you.
  • By Hazim Hanif.