weighted.mean(x, w, ...) ## Default S3 method: weighted.mean(x, w, ..., na.rm=FALSE) ## S3 method for class 'Date': weighted.mean(x, w, ...) ## S3 method for class 'difftime': weighted.mean(x, w, ...) ## S3 method for class 'POSIXct': weighted.mean(x, w, ...) ## S3 method for class 'POSIXlt': weighted.mean(x, w, ...)
x | a numeric vector. Missing values (NAs) are allowed but result in a value of NA unless you use na.rm = TRUE. |
w | a numeric vector, with the same length as x, where each element specifies a weighting value for the corresponding value in x. Default is no weights, which is equivalent to all 1s. Missing values (NAs) are allowed but result in a value of NA unless you use na.rm = TRUE. |
... | arguments to be passed to or from methods. |
na.rm | a logical value. If TRUE, missing values are removed from x and w before computing the weighted mean. |
weighted.mean(c(1, 2, 3), c(1, 2, 3)) # [1] 2.333333x <- Sys.Date() weighted.mean(c(x, x+3, x+5), c(0.1, 0.2, 0.1)) x <- Sys.time() weighted.mean(c(x, x+3600, x), c(1, 2, 5))