R/varBeta.R

varBeta <- function(x, trim.opt=0) {
   xbar <- mean(x, trim=trim.opt)
   tmp <- (x - xbar)^2
   xvar <- mean(tmp)
   return(xvar)
}

Try the fcros package in your browser

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

fcros documentation built on May 31, 2019, 5:03 p.m.