R/str_tableschema.R

In djvanderlaan/datapackage: Creating and Reading Data Packages

#' @export
str.tableschema <- function(object, ...) {
  fields <- dpfieldnames(object)
  cat("Table Schema [", length(fields), "] ", sep = "")
  utils::str(fields, give.attr = FALSE, comp.str ="", give.head = FALSE)
}