Följande uppgifter skall lösas i ett R-Markdown dokument med output: github_document. Alla kodsnuttar skall vara synliga (echo = TRUE). För lättläst kod, följ t.ex. Google’s R Style guide eller Hadley Wickham’s style guide så långt som möjligt (snåla inte med mellanslag i koden!). Både den genererade .md filen och källfilen (.Rmd) skall laddas upp på GitHub under biblioteket HW_efternamn_initial/HW3. Det skall finnas en länk till .md filen från HW_efternamn_initial/README.md som i tidigare uppgifter.

Inled ditt dokument genom att ladda paketen tidyverse, readxl, knitr, ggmap (vid behov) och jsonlite. Paketen skall laddas “tyst” med suppressPackageStartupMessages. Avsluta dokumentet med en kodsnutt innehållande sessionInfo().

Data till uppgiften finns på https://github.com/MT5013-VT18/HW_data som StopArea.json, Line.json och JourneyPattern.json. Ladda ner dessa och placera i ett underbibliotek data till ditt Homework-repo.

SLs linjer

I filerna StopArea.json, Line.json och JourneyPattern.json finns stockholmstrafikens hållplatser, linjer och vilka hållplatser som passeras av en given linje (hämtade från TrafikLab). Tyvärr finns det ingen information om i vilken ordning hållplatserna passeras. Filerna är i s.k. JSON-format som är mycket vanligt när man hämtar data från nätet, för att läsa dem (kräver paketet jsonlite) kör

Line <- fromJSON("data/Line.json")$ResponseData$Result

och motsvarande för övriga. Notera att man skiljer mellan StopPoint (hållplatsstolpe) och StopArea (station/hållplatsområde). För busshållplatser består i allmänhet en StopArea av två StopPoint, en på varje sida om vägen. Du väljer själv hur du hanterar detta, alternativt ignorerar StopArea-kolumnen.

Långt och brett

Gå till SCBs statistikdatabas och