R/collector.R

Defines functions print.collector is.collector collector

collector <- function(type, ...) {
  structure(list(...), class = c(paste0("collector_", type), "collector"))
}

is.collector <- function(x) inherits(x, "collector")

# Conditionally exported in zzz.R
# @export
print.collector <- function(x, ...) {
  cat("<", class(x)[1], ">\n", sep = "")
}

Try the vroom package in your browser

Any scripts or data that you put into this service are public.

vroom documentation built on Aug. 27, 2020, 9:07 a.m.