R/calc.S.R

#' Calculate standard deviation
#'
#' @param x Vector of indicator values.


calc.S <-
    function(x)
{
    sqrt( (1/length(x)) * (sum((x - mean(x))^2)) )
}
dataspekt/crodi documentation built on May 30, 2019, 4:06 a.m.