在R中，如果行和列值匹配，如何将一列的内容分配给另一列？

# 创建一个示例数据框
data <- data.frame(
  ID = c(1, 2, 3, 4),
  Name = c("John", "Jane", "Tom", "Alice"),
  Age = c(25, 30, 35, 40),
  Gender = c("Male", "Female", "Male", "Female")
)

# 将Name列的值分配给Gender列，当Age为30时
data$Gender[data$Age == 30] <- data$Name[data$Age == 30]

# 打印结果
print(data)

  ID  Name Age Gender
1  1  John  25   Male
2  2  Jane  30   Jane
3  3   Tom  35   Male
4  4 Alice  40 Female