R/weighted_mean.R
In BoC-PaymentsResearch/CPMI_stats: CPMI Proposed Liqudity Efficiency Measures
weighted_mean <- function(x, w, na.rm = T) {
if(na.rm) {
omitted_na <- na.omit(data.frame(x, w))
return(weighted.mean(omitted_na$x, omitted_na$w))
}
weighted.mean(x, w)
}
BoC-PaymentsResearch/CPMI_stats documentation built on May 13, 2019, 1:14 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
weighted_mean <- function(x, w, na.rm = T) {
if(na.rm) {
omitted_na <- na.omit(data.frame(x, w))
return(weighted.mean(omitted_na$x, omitted_na$w))
}
weighted.mean(x, w)
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.