如何根据与使用R的第三列的匹配，将数据框中多个列的值替换为第二列中的值？

# 创建示例数据框df1
df1 <- data.frame(
  col1 = c(1, 2, 3),
  col2 = c("A", "B", "C"),
  col3 = c("x", "y", "z")
)

# 创建示例数据框df2
df2 <- data.frame(
  col3 = c("x", "y", "z"),
  new_col1 = c("X1", "Y1", "Z1"),
  new_col2 = c("X2", "Y2", "Z2")
)

# 使用merge函数根据col3列合并df1和df2
result <- merge(df1, df2, by = "col3")

# 查看结果
print(result)

# 如果尚未安装dplyr包，则先安装
# install.packages("dplyr")

# 加载dplyr包
library(dplyr)

# 使用left_join函数根据col3列合并df1和df2
result <- left_join(df1, df2, by = "col3")

# 查看结果
print(result)

# 保留df1的col3列，并替换col1和col2为df2中的new_col1和new_col2
result <- result[, c("col3", "new_col1", "new_col2")]

# 重命名列以匹配df1的原始列名
colnames(result) <- c("col3", "col1", "col2")

# 查看最终结果
print(result)