R/RVSmry.R

In josephstatwick/EagleModelCalc: Eagle fatality calculator for wind farms

#' @title RV Summary
#' @author Mark Otto (FWS)
#'
#' @description This summarizes the quantiles of an RV output.
#' @param Names Input series names
#' @param Lat Data series
#' @param probs quantiles to be summarized
#' @export


RVSmry<-function(Names,Series,probs=c(0.5,0.05,0.95)){
  Smry<-data.frame(
   Mean=as.vector(rvmean(Series)),SD=as.vector(rvsd(Series)),
#   rvquantile(Series,probs=probs),
   matrix(rvquantile(Series,probs=probs),ncol=length(probs)),
   row.names=rownames(Names)
  )
  colnames(Smry)[2+1:length(probs)]<-paste("CI",format(100*probs),sep="")
  return(data.frame(Names,Smry))
 }