如何在r中替换数据帧中多行中的值？

# 加载dplyr包
library(dplyr)

# 创建一个示例数据框
df <- data.frame(
  id = c(1, 2, 3, 4, 5),
  value = c(10, 20, 30, 40, 50)
)

# 打印原始数据框
print(df)

# 选择需要替换值的行，例如替换id为2和4的行
filtered_df <- df %>%
  filter(id %in% c(2, 4))

# 替换选定行的值，例如将value为20和40的行的值替换为新值
mutated_df <- filtered_df %>%
  mutate(value = value * 2)

# 将替换后的值更新回原始数据框
df <- df %>%
  left_join(mutated_df, by = "id") %>%
  mutate(value = coalesce(value.y, value.x)) %>%
  select(-value.x, -value.y)

# 打印替换后的数据框
print(df)