R/meta_in_out.R

In Ingenuity-Inc/artlookR: Work with artlook data

#' artlookR in & out of school metadata
#'
#' @return A list with the label names and corresponding levels for in school, out-of-school, and both.
#' @details This may be a bit excessive. It's just setting up the factors for when you need in-school and out-of-school as stored in the
#' artlookR \code{allocations} table.
#'
#' * Because this information is not stored in the artlookR database, you are not required to run the \code{connection.R} script
#' and create a connection object for this script to run.
#' @examples meta_in_out()
#' @export
meta_in_out <- function(...){

  output <- list(label = c("In School", "Out of School", "Both"),
                 level = c("in_school", "out_of_school", "both"))

}