加权平均（3）
来看一个回收（recycling）的例子。如果您想让 Microsoft 和 Sony 的股票回报等权重呢？也就是说，Microsoft 占 50%，Sony 也占 50%。
ret <- c(7, 9)
weight <- .5
ret_X_weight <- ret * weight
ret_X_weight
[1] 3.5 4.5
ret 是长度为 2 的向量，weight 是长度为 1 的向量。R 会将 weight 中的 .5 重复两次，使其与 ret 的长度一致，然后再逐元素运算。
本练习是课程的一部分
R 金融入门
练习说明
- 工作区中已有一个命名向量
ret，包含 3 只股票的回报。 - 打印
ret，查看这 3 只股票的回报。 - 将
1/3赋值给weight。这将是每只股票的权重。 - 通过将
ret与weight相乘来创建ret_X_weight。看到 R 如何回收weight了吗？ - 对
ret_X_weight使用sum()，以创建等权投资组合回报portf_ret。 - 运行最后一行代码：用长度为 3 的向量去乘长度为 2 的向量。R 会重用长度为 2 的向量的第 1 个值，但请注意警告！
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Print ret
# Assign 1/3 to weight
weight <-
# Create ret_X_weight
ret_X_weight <-
# Calculate your portfolio return
portf_ret <-
# Vector of length 3 * Vector of length 2?
ret * c(.2, .6)