View source: R/nsrr_datasets.R
nsrr_datasets | R Documentation |
NSRR data sets
nsrr_datasets(token = nsrr_token(), page = NULL) nsrr_dataset(dataset = NULL, token = nsrr_token()) nsrr_dataset_files(dataset = NULL, path = NULL, token = nsrr_token())
token |
Token for NSRR resources. Found at https://sleepdata.org/token |
page |
which page to grab. Increment over successive requests to retrieve all datasets. A request that return NULL or a number of datasets less than 18 indicates the last page. |
dataset |
a dataset |
path |
a folder or file path inside the dataset |
A data.frame
of the data sets and their endpoints
df = nsrr_datasets(page = 1) on_cran = !identical(Sys.getenv("NOT_CRAN"), "true") on_ci <- nzchar(Sys.getenv("CI")) local_run = grepl("musch", tolower(Sys.info()[["user"]])) run_example = !on_cran || on_ci || local_run if (run_example) { df = nsrr_datasets() if (attributes(df)$status_code == 200) { testthat::expect_is(df, "data.frame") slugs = c("abc", "bestair", "chat", "ccshs", "cfs", "heartbeat", "hchs", "homepap", "haassa", "learn") testthat::expect_true(all(slugs %in% df$slug)) } } nsrr_dataset(dataset = "shhs", token = "") dataset = "shhs" token = NULL df = nsrr_dataset_files(dataset) ddf = nsrr_dataset_files(dataset, path = df$full_path[1]) dataset = "shhs" token = NULL df = nsrr_dataset_files(dataset) nsrr_dataset_files(dataset = "wecare") testthat::expect_error(nsrr_dataset_files(), "one data") testthat::expect_error(nsrr_dataset_files(c("shhs", "chat")), "one data")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.