R/read_fst.R

In BAAQMD/tbltools: Read/Write and Manipulate Tabular Data

#' read_fst
#'
#' Thin wrapper around fst::read_fst()
#'
#' Returns a tibble instead of a data.frame.
#'
#' @export
#' @importFrom fst read_fst
read_fst <- function (
  ...,
  verbose = getOption("verbose", default = FALSE)
) {

  msg <- function (...) if(isTRUE(verbose)) message("[read_fst] ", ...)
  fst_data <- fst::read_fst(...)
  return(tibble::as_tibble(fst_data))

}