R/zzz.R

In jplecavalier/tidynhl: An Easy Way to Extract NHL Data in a Tidy Format

.onLoad <- function(libname, pkgname) {

  op <- options()
  op.tidynhl <- list(
    tidynhl.data.table = TRUE
  )
  toset <- !(names(op.tidynhl) %in% names(op))
  if(any(toset)) options(op.tidynhl[toset])
  invisible()

}