如何在循环中动态创建包含动态名称的data.frames，并将其作为列表的一部分

# 创建一个空的列表
df_list <- list()

# 循环创建动态名称的data.frames
for (i in 1:5) {
  # 动态创建data.frame的名称
  df_name <- paste0("df_", i)
  
  # 动态创建data.frame
  df <- data.frame(x = 1:i, y = i:(2*i))
  
  # 将动态创建的data.frame赋值给动态名称
  assign(df_name, df)
  
  # 将动态创建的data.frame添加到列表中
  df_list[[i]] <- get(df_name)
}

# 打印列表中的data.frames
for (i in 1:length(df_list)) {
  cat("Data Frame", i, ":\n")
  print(df_list[[i]])
}