r - 如何用数字 R 对列进行加权？

Question

我有一列包含异常值，我想用一个代表年数（32）的特定数字对其进行加权。

我怎样才能做到这一点？

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

Answer 1

mtcars$weighted <- mtcars$drat * 32

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

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

无需申请，为方便起见，乘法已经矢量化；）