用于返回多个数据帧的R函数

# 创建示例数据帧
df1 <- data.frame(A = 1:5, B = 6:10)
df2 <- data.frame(C = 11:15, D = 16:20)

# 将数据帧放入列表中
data_frames <- list(df1 = df1, df2 = df2)

# 返回列表（包含多个数据帧）
return(data_frames)

get_multiple_data_frames <- function() {
  # 创建示例数据帧
  df1 <- data.frame(A = 1:5, B = 6:10)
  df2 <- data.frame(C = 11:15, D = 16:20)

  # 将数据帧放入列表中
  data_frames <- list(df1 = df1, df2 = df2)

  # 返回列表（包含多个数据帧）
  return(data_frames)
}

# 调用函数并获取返回的列表
result <- get_multiple_data_frames()

# 访问返回的数据帧
print(result$df1)
print(result$df2)