@@ -4,6 +4,7 @@ We hope you'll use it to check our work and to create stories and visualizations
|
||||
|
||||
Article Date(s) | Headline(s) | Folder
|
||||
---|---------|-------------
|
||||
September 19, 2017 | [The (Very) Long Tail Of Hurricane Recovery](https://projects.fivethirtyeight.com/sandy-311/) | [sandy-311-calls](sandy-311-calls)
|
||||
September 18, 2017 | [What The World Thinks Of Trump](https://fivethirtyeight.com/features/what-the-world-thinks-of-trump/) | [trump-world-trust](trump-world-trust)
|
||||
September 8, 2017 | [Can You Beat FiveThirtyEight's NFL Predictions?](https://projects.fivethirtyeight.com/nfl-predictions-game/) | [nfl-elo-game](https://github.com/fivethirtyeight/nfl-elo-game)
|
||||
September 7, 2017 | [Al Gore’s New Movie Exposes The Big Flaw In Online Movie Ratings](https://fivethirtyeight.com/features/al-gores-new-movie-exposes-the-big-flaw-in-online-movie-ratings/) | [inconvenient-sequel](inconvenient-sequel)
|
||||
|
||||
17
sandy-311-calls/Readme.md
Normal file
17
sandy-311-calls/Readme.md
Normal file
@@ -0,0 +1,17 @@
|
||||
# Sandy 311 Calls
|
||||
|
||||
Raw data behind the story [The (Very) Long Tail Of Hurricane Recovery](https://projects.fivethirtyeight.com/sandy-311/)
|
||||
|
||||
Data was collected from the City of New York's [NYC OpenData](https://data.cityofnewyork.us/City-Government/311-Call-Center-Inquiry/tdd6-3ysr) website. The [data dictionary](https://data.cityofnewyork.us/api/views/wewp-mm3p/files/3a563b1d-9e0b-4824-98c7-a308bbc5ce6e?download=true&filename=Call%20Center%20Inquiry%20Data%20Dictionary.xlsx), hosted on the city's website, contains an "Agency List" tab with the full form of each agency's acronym.
|
||||
|
||||
You can recreate this spreadsheet by downloading all the data from Oct. 2012 to today from that site (warning: it's very large), and running the following R code:
|
||||
|
||||
```
|
||||
allCalls <- read.csv('DOWNLOADED_DATA_HERE')
|
||||
|
||||
justSandy <- allCalls[grepl("Sandy", allCalls$BRIEF_DESCRIPTION),]
|
||||
|
||||
library(reshape2)
|
||||
justSandy$date <- mdy(justSandy$DATE)
|
||||
bydate <- dcast(justSandy, date ~ AGENCY)
|
||||
```
|
||||
1784
sandy-311-calls/sandy-311-calls-by-day.csv
Normal file
1784
sandy-311-calls/sandy-311-calls-by-day.csv
Normal file
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user