Weighted mean and variance of a vector

Source: R/weighting.R

Compute the weighted mean or weighted variance of a vector. Exact copies of Hmisc functions.

wtd.mean(x, weights = NULL, na.rm = TRUE)

Arguments

x

Numeric data vector

weights

Numeric weights vector. Must be the same length as x

na.rm

if TRUE, delete NA values.

Details

If weights is NULL, then an uniform weighting is applied.

See also

mean,var, wtd.table and the survey package.

Author

These functions are exact copies of the wtd.mean and wtd.var function from the wtd.stats package. They have been created by Frank Harrell, Department of Biostatistics, Vanderbilt University School of Medicine, <f.harrell@vanderbilt.edu>.

Examples

data(hdv2003)
mean(hdv2003$age)
#> [1] 48.157
wtd.mean(hdv2003$age, weights=hdv2003$poids)
#> [1] 46.34726