R/math-variance.R

Defines functions ace_se ace_sd

#' @keywords internal

ace_sd <- function(x) {
  return (sd(to_numeric(x), na.rm = TRUE))
}

#' @keywords internal

ace_se <- function(x) {
  vals = na.omit(to_numeric(x))
  return (sqrt(var(vals)/length(vals)))
} 
joaquinanguera/aceR documentation built on July 18, 2024, 7:37 a.m.