R/sample_read.R

In mjbroerman/imgpreppr: Prepare Images for Blog Posts

#' Read CSV duplicate
#'
#' @param path path to filename
#'
#' @return a \code{tibble}
#' @export
#' @importFrom readr read_csv
#' @examples
#' csv = system.file("extdata", "sample_data.csv", package = "imgpreppr")
#' sample_read(csv)
sample_read <- function(path) {
  readr::read_csv(path)
}