为R中的每个ID添加和重复数据框中的列表

# 创建一个示例数据框
data <- data.frame(ID = c(1, 2, 3, 4, 5),
                   Value = c("A", "B", "C", "D", "E"),
                   stringsAsFactors = FALSE)

# 创建一个示例列表
list_data <- list("X", "Y", "Z")

# 创建一个空的结果列表
result <- list()

# 循环遍历数据框中的每个ID
for (i in 1:nrow(data)) {
  # 获取当前ID的值
  id <- data$ID[i]
  
  # 获取当前ID对应的列表
  list_value <- list_data[[id]]
  
  # 将列表添加到结果列表中
  result[[id]] <- list_value
}

# 打印结果列表
print(result)