R/rhrArea.R

#' Get areas from object of class RhrHREstimator
#' 
#' @param x an object of class rhrHREstimator
#' @param ... further arguments, none implemented
#' @export
#' @return \code{data.frame}

rhrArea <- function(x, ...) {
  UseMethod("rhrArea", x)
}

#' @export
#' @rdname rhrArea
#' @method rhrArea RhrHREstimator

rhrArea.RhrHREstimator <- function(x, ...) {
    return(data.frame(isopleths(x)))
}

Try the rhr package in your browser

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

rhr documentation built on May 2, 2019, 6:06 p.m.