inst/extdata/sample_data.R

source(system.file("extdata", "utils.R", package = "nhdplusTools"))

data_dir <- file.path(tempdir(check = TRUE), "nhdplusTools")

download_pkg_data("sample_natseamless.gpkg",
                  "https://doi-usgs.github.io/nhdplusTools/data/sample_natseamless.gpkg",
                  data_dir)

sample_data <- file.path(data_dir, "sample_natseamless.gpkg")

Try the nhdplusTools package in your browser

Any scripts or data that you put into this service are public.

nhdplusTools documentation built on June 22, 2024, 10:36 a.m.