R/monitor_isEmpty.R

Defines functions monitor_isEmpty

Documented in monitor_isEmpty

#' @keywords ws_monitor
#' @export
#' @title Test for an Empty ws_monitor Object
#' @param ws_monitor \emph{ws_monitor} object
#' @return \code{TRUE} if no monitors exist in \code{ws_monitor}, \code{FALSE} otherwise.
#' @description Convenience function for \code{nrow(ws_monitor$meta) == 0}.
#' This makes for more readable code in the many functions that need to test for this.
#' @examples
#' monitor_isEmpty(Carmel_Valley)

monitor_isEmpty <- function(ws_monitor) {
  
  return( nrow(ws_monitor$meta) == 0 )
  
}

Try the PWFSLSmoke package in your browser

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

PWFSLSmoke documentation built on July 8, 2020, 7:19 p.m.