## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval=FALSE---------------------------------------------------------------
# 
# raw_dir <- file.path(tempdir(), "inmet_raw")
# dataset_dir <- file.path(tempdir(), "inmet_arrow")
# 
# download_inmet(
#   years = 2000:2005,
#   unzip_to = raw_dir
# )

## ----eval=FALSE---------------------------------------------------------------
# build_inmet_dataset(
#   input = raw_dir,
#   output = dataset_dir
# )

## ----eval=FALSE---------------------------------------------------------------
# rainfall <- read_inmet(
#   path = dataset_dir,
#   years = 2000,
#   collect = FALSE
# )