HM
6/21/2015
In this presentation I'd like to demonstrate the utility of my Coursera course Developing Data Product class project
Objectives: At the end of this presentation, participants will be able to:
Heat Illnesses include:
The individual county data is downloadable from the web at: http://ephtracking.cdc.gov/showIndicatorPages.action
This application is based on real data and it is available for the years 2020 to 2084
library(dplyr)
library(scales)
raw.data <- read.csv("maxdailytemp.csv",
stringsAsFactors = FALSE)
subdf <- raw.data[,c(3, 67)]
subdf$X2020 <- as.numeric(subdf$X2020)
subdf$X2084 <- as.numeric(subdf$X2084)
avg2020 <- mean(subdf$X2020,na.rm=TRUE)
avg2084 <- mean(subdf$X2084,na.rm=TRUE)
it is predicted that the average number of hot days in the U.S. will go from 50 in the year 2020 to 67 in the year 2084.
To access the App and th view the projections for your county, please follow this link: https://hm-datascience.shinyapps.io/DDP_Project
Steps:
The graph of the projections should be then visible. Have fun!