R/stats.R

Defines functions get_sds_lme

## nlme get ratio
get_sds_lme <- function(x) {
  x_sd <- as.numeric(nlme::VarCorr(x)[,2])
  tibble(sd_b=x_sd[1],
         sd_w = x_sd[2],
         ratio=x_sd[1]/x_sd[2])
}
MatthieuStigler/matPkg documentation built on Nov. 13, 2023, 7:53 p.m.