R/QMD.cm.f.R

QMD.cm.f <-
function (x.mm) 
{
    x.mm <- x.mm[is.finite(x.mm)]
    (sqrt(sum((x.mm/10)^2)/length(x.mm)))
}
cantonfe/sitree documentation built on Dec. 26, 2021, 8:55 a.m.