The baflights19.R R Script is used to download the Bay Area flights data for 2019.

To test this download, change the variable num_months, at the top of the baflights19.R, to 1, to download one months of data.

You can source the baflights19.R file in the notebook or you can Source > Source as Local Job.

Warning: There are some open issues on the anyflights Github. As we experienced in class, some people were unable to get the code in the R Script to work. Seems there is a problem with unzip, gzip, and/or vroom. So at this point I have run the code on my machine and the data is available in the data subdirectory. For the Project you can start by reading in the data provided.

source("baflights19.R")
library(pacman)
p_load(tidyverse, nycflights13, tictoc)

The baflights19.R saves each tibble as an .Rds file in the data subdirectory. To lead the tibbles we use the read_rds function from the readr R package.

airlines_new <- read_rds("data/airlines.Rds")
airports_new <- read_rds("data/airports.Rds")
flights_new <- read_rds("data/flights.Rds")
planes_new <- read_rds("data/planes.Rds")
weather_new <- read_rds("data/weather.Rds")

nycflights13

flights

baflights19

flights_new
LS0tCnRpdGxlOiAiQmF5IEFyZWEgRmxpZ2h0cyAyMDE5IgphdXRob3I6ICJQcm9mLiBTdWVzcyIKZGF0ZTogIlNlcHQuIDI5LCAyMDIwIgpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sKLS0tCgpUaGUgKmJhZmxpZ2h0czE5LlIqIFIgU2NyaXB0IGlzIHVzZWQgdG8gZG93bmxvYWQgdGhlIEJheSBBcmVhIGZsaWdodHMgZGF0YSBmb3IgMjAxOS4KClRvIHRlc3QgdGhpcyBkb3dubG9hZCwgY2hhbmdlIHRoZSB2YXJpYWJsZSAqbnVtX21vbnRocyosIGF0IHRoZSB0b3Agb2YgdGhlICpiYWZsaWdodHMxOS5SKiwgdG8gMSwgdG8gZG93bmxvYWQgb25lIG1vbnRocyBvZiBkYXRhLgoKWW91IGNhbiBzb3VyY2UgdGhlICpiYWZsaWdodHMxOS5SKiBmaWxlIGluIHRoZSBub3RlYm9vayBvciB5b3UgY2FuIFNvdXJjZSA+IFNvdXJjZSBhcyBMb2NhbCBKb2IuIAoKKipXYXJuaW5nOioqIFRoZXJlIGFyZSBzb21lIG9wZW4gaXNzdWVzIG9uIHRoZSAqYW55ZmxpZ2h0cyogR2l0aHViLiAgQXMgd2UgZXhwZXJpZW5jZWQgaW4gY2xhc3MsIHNvbWUgcGVvcGxlIHdlcmUgdW5hYmxlIHRvIGdldCB0aGUgY29kZSBpbiB0aGUgUiBTY3JpcHQgdG8gd29yay4gIFNlZW1zIHRoZXJlIGlzIGEgcHJvYmxlbSB3aXRoIHVuemlwLCBnemlwLCBhbmQvb3IgdnJvb20uICBTbyBhdCB0aGlzIHBvaW50IEkgaGF2ZSBydW4gdGhlIGNvZGUgb24gbXkgbWFjaGluZSBhbmQgdGhlIGRhdGEgaXMgYXZhaWxhYmxlIGluIHRoZSAqZGF0YSogc3ViZGlyZWN0b3J5LiAgRm9yIHRoZSBQcm9qZWN0IHlvdSBjYW4gc3RhcnQgYnkgcmVhZGluZyBpbiB0aGUgZGF0YSBwcm92aWRlZC4KCmBgYHtyfQojIHNvdXJjZSgiYmFmbGlnaHRzMTkuUiIpCmBgYAoKYGBge3J9CmxpYnJhcnkocGFjbWFuKQpwX2xvYWQodGlkeXZlcnNlLCBueWNmbGlnaHRzMTMsIHRpY3RvYykKYGBgCgpUaGUgKmJhZmxpZ2h0czE5LlIqIHNhdmVzIGVhY2ggdGliYmxlIGFzIGFuIC5SZHMgZmlsZSBpbiB0aGUgZGF0YSBzdWJkaXJlY3RvcnkuICBUbyBsZWFkIHRoZSB0aWJibGVzIHdlIHVzZSB0aGUgKnJlYWRfcmRzKiBmdW5jdGlvbiBmcm9tIHRoZSByZWFkciBSIHBhY2thZ2UuCgpgYGB7cn0KYWlybGluZXNfbmV3IDwtIHJlYWRfcmRzKCJkYXRhL2FpcmxpbmVzLlJkcyIpCmFpcnBvcnRzX25ldyA8LSByZWFkX3JkcygiZGF0YS9haXJwb3J0cy5SZHMiKQpmbGlnaHRzX25ldyA8LSByZWFkX3JkcygiZGF0YS9mbGlnaHRzLlJkcyIpCnBsYW5lc19uZXcgPC0gcmVhZF9yZHMoImRhdGEvcGxhbmVzLlJkcyIpCndlYXRoZXJfbmV3IDwtIHJlYWRfcmRzKCJkYXRhL3dlYXRoZXIuUmRzIikKYGBgCgojIG55Y2ZsaWdodHMxMwoKYGBge3J9CmZsaWdodHMKYGBgCiMgYmFmbGlnaHRzMTkKCmBgYHtyfQpmbGlnaHRzX25ldwpgYGAKCg==