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)))
}

Try the sitree package in your browser

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

sitree documentation built on Aug. 1, 2019, 5:07 p.m.