R/dpnresources.R

In djvanderlaan/datapackage: Creating and Reading Data Packages

#' Return the number of resources in a Data Package
#'
#' @param dp A Data Package object.
#'
#' @return
#' Returns an integer with the number of resources in the Data Package.

#' @export
dpnresources <- function(dp) {
  # If resources does not exist dp$resources will return NULL which has a 
  # length of 0
  length(dpproperty(dp, "resources"))
}