## ---- include = FALSE---------------------------------------------------------
not_cran = identical(Sys.getenv("NOT_CRAN"), "true")
online <- !is.null(curl::nslookup("r-project.org", error = FALSE))
eval_param <- not_cran & online

knitr::opts_chunk$set(
	eval = eval_param,
	message = FALSE,
	warning = FALSE,
	collapse = TRUE,
	comment = "#>"
)

library(fitzRoy)
library(dplyr)


dat <- fitzRoy:::stats_fryzigg_2019

## ----results, eval=FALSE, include=TRUE----------------------------------------
#  dat <- fitzRoy::fetch_player_stats_fryzigg(2019)

## ----results2, eval=eval_param------------------------------------------------
#  dplyr::glimpse(dat)

## ----results3, eval=eval_param------------------------------------------------
#  head(dat)

