data-raw/cce_sst.R

In karenezhao/alohakez:

## code to prepare `cce_sst` dataset goes here

# Attach packages
library(usethis)
library(metajam)
library(janitor)

# Save link location for the data package:
cce_url <- "https://portal.edirepository.org/nis/dataviewer?packageid=knb-lter-cce.15.4&entityid=411c8b8769c4578be6702ee44bdb712e"

# Download the data package with metajam
cce_download <- download_d1_data(data_url = cce_url, path = tempdir(), dir_name="cce_sst")

# Read in data
cce_files <- read_d1_files(cce_download)
cce_sst <- cce_files$data %>%
  clean_names()

usethis::use_data(cce_sst, overwrite = TRUE)