R/get_rts_data.R

In datalorax/rts: Returns data from the Return to School project

#' Return full REDCap data
#'
#' Returns the full data across all surveys
#' @param redcap_api_token The API token from REDCap. Defaults to
#'   [rts::redcap_key()]
#' @return A data frame with the raw data
#' @export

get_rts_data <- function(redcap_api_token = redcap_key()) {
  redcap_read(
    redcap_uri = "https://redcap.uoregon.edu/api/",
    token = redcap_api_token
  )$data
}