August 12th, 2015
library(pitchRx) # returns a list of related tables (see diagram below) dat <- scrape(start = "2008-01-01", end = Sys.Date())
db <- dplyr::src_sqlite("pitchRx.sqlite3", create = TRUE) pitchRx::scrape(start = "2008-01-01", end = Sys.Date(), connect = db$con)
update_db(db$con)