R/harmean.R

harmean <-
function(x)
    return(length(x)/sum(1/x))
DavideMassidda/average documentation built on May 6, 2019, 1:55 p.m.