R/load_data.R

In asrosenberg/asymmetric-package: Replication Package for "Unifying the Study of Asymmetric Hypotheses"

# ' Load dataset from inst/extdata
#'
#' Loads a dataset from inst/extdata into memory.
#' @param dataset the name of the dataset to load
#' @return data set
#' @import data.table
#' @export
load_dataset <- function(dataset)
{
  file_name <- system.file("extdata", paste0(dataset,".csv"),
    package = "asymmetric")
  DATA <- read.csv(file_name)
}