如何用数字 R 对列进行加权?

How can I weight a column with a number, R?

我有一列包含异常值,我想用代表年数 (32) 的特定数字对其进行加权。

我该怎么做?

data(mtcars)
mtcars$weight<-apply(mtcars[5], 1, ??, 32)
mtcars$weighted <- mtcars$drat * 32

或者如果每次观察的权重不同

mtcars$weighted <- mtcars$drat * mtcars$cyl

无需申请,为方便起见,乘法已经矢量化了;)