如何将policy.1指定列与policy.2的time列对应值相乘？

针对你的需求，这里提供几种在R中实现的方法：

方法1：基础R直接列操作 #

这种方式直观易懂，适合列数较少的场景，先复制原数据避免修改原始数据，再对目标列逐一赋值：

# 复制原始数据，防止修改原数据
policy.1_modified <- policy.1

# 按要求对各列执行乘法
policy.1_modified$temperature <- policy.1_modified$temperature * policy.2$time[1]
policy.1_modified$latitude <- policy.1_modified$latitude * policy.2$time[2]
policy.1_modified$altitude.3 <- policy.1_modified$altitude.3 * policy.2$time[3]

# 查看处理后的结果
print(policy.1_modified)

方法2：tidyverse风格（dplyr包） #

如果你习惯使用tidyverse生态，可以用dplyr::mutate来更简洁地处理：

library(dplyr)

policy.1_modified <- policy.1 %>%
  mutate(
    temperature = temperature * policy.2$time[1],
    latitude = latitude * policy.2$time[2],
    altitude.3 = altitude.3 * policy.2$time[3]
  )

方法3：批量处理（适合列数匹配场景） #

当需要运算的列数量较多，且列顺序和policy.2$time的元素顺序完全对应时，可以用批量操作简化代码：

# 提取需要运算的列（排除id列）
calc_cols <- policy.1[, -1]
# 批量执行乘法运算
calc_cols <- calc_cols * policy.2$time
# 合并id列和运算后的列
policy.1_modified <- cbind(policy.1[, "id", drop = FALSE], calc_cols)

验证结果 #

运行上述任意方法后，你可以通过policy.1_modified查看处理后的数据，确认每列都按要求完成了乘法运算。

内容的提问来源于stack exchange，提问作者YouLocalRUser