weighted_mean_ni: Weighted Arithmetic Mean for Numeric Values and Integer...
In dvmisc: Faster Computation of Common Statistics and Miscellaneous Functions

Description Usage Arguments Details Value Examples

Written in C++, this function should always run faster than weighted.mean.

1	weighted_mean_ni(x, w)

`x`	Numeric vector of values.
`w`	Integer vector of weights.

For optimal speed, choose the version of this function that matches the class of your x and w: weighted_mean_nn for numeric x, numeric w
weighted_mean_ni for numeric x, integer w
weighted_mean_in for integer x, numeric w
weighted_mean_ii for integer x, integer w

These functions typically execute several times faster than the base R function weighted.mean and weighted average functions in other packages (e.g. wtd.mean in Hmisc and wt.mean in SDMTools).

Numeric value.

# weighted_mean_ni is typically much faster than weighted.mean 
x <- rnorm(1000)
w <- rpois(1000, lambda = 5)
all.equal(weighted.mean(x, w), weighted_mean_ni(x, w))
benchmark(weighted.mean(x, w), weighted_mean_ni(x, w), replications = 2000)