R/AsymmetryCurveClass.R

#' @rdname getPlot-methods
#' @export
setMethod("getPlot", "AsymmetryCurveList", function(object) {
  p <- .getPlot(object)
  p <- p + ggtitle("Asymmetry Curve")
  p <- p + ylab("")
  p <- p + xlab("Alpha")
  return(p)
})

Try the DepthProc package in your browser

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

DepthProc documentation built on Feb. 4, 2022, 1:07 a.m.