source("nycflights13_ver04.R")
Classes ‘tbl_df’, ‘tbl’ and 'data.frame':   336776 obs. of  4 variables:
 $ month : Factor w/ 12 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ day   : Factor w/ 31 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ hour  : Factor w/ 20 levels "1","5","6","7",..: 2 2 2 2 3 2 3 3 3 3 ...
 $ minute: Factor w/ 60 levels "0","1","2","3",..: 16 30 41 46 1 59 1 1 1 1 ...
 - attr(*, ".internal.selfref")=<externalptr> 
library(pacman)

p_load(tidyverse, visdat, naniar, DataExplorer)

Test out how to use the output of the R script in the notebook.

final_nycflights13a <- readRDS("data/final_nycflights13.Rds")
count(final_nycflights13)
LS0tCnRpdGxlOiAibnljZmxpZ2h0czEzIgpvdXRwdXQ6CiAgd29yZF9kb2N1bWVudDogZGVmYXVsdAogIGh0bWxfbm90ZWJvb2s6IGRlZmF1bHQKLS0tCgpgYGB7cn0Kc291cmNlKCJueWNmbGlnaHRzMTNfdmVyMDQuUiIpCmBgYAoKCmBgYHtyfQpsaWJyYXJ5KHBhY21hbikKCnBfbG9hZCh0aWR5dmVyc2UsIHZpc2RhdCwgbmFuaWFyLCBEYXRhRXhwbG9yZXIpCmBgYAoKCgpUZXN0IG91dCBob3cgdG8gdXNlIHRoZSBvdXRwdXQgb2YgdGhlIFIgc2NyaXB0IGluIHRoZSBub3RlYm9vay4KCmBgYHtyfQpmaW5hbF9ueWNmbGlnaHRzMTNhIDwtIHJlYWRSRFMoImRhdGEvZmluYWxfbnljZmxpZ2h0czEzLlJkcyIpCmBgYAoKYGBge3J9CmNvdW50KGZpbmFsX255Y2ZsaWdodHMxMykKYGBgCgo=