如何在r中多个数据帧中的列上循环函数

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

# 创建一个空的数据框来存储结果
result <- data.frame()

# 循环遍历数据框列表
data_frames <- list(df1, df2)
for(df in data_frames) {
  # 对每个数据框的列应用函数
  for(i in 1:ncol(df)) {
    column <- df[, i]
    # 在这里应用你的函数，并将结果存储到新的列中
    result <- cbind(result, your_function(column))
  }
}

# 结果数据框包含了每个数据框中每个列经过函数处理后的结果
print(result)

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

# 创建一个空的数据框来存储结果
result <- data.frame()

# 定义一个函数来处理每个数据框的列
process_columns <- function(df) {
  # 对每个数据框的列应用函数，并返回结果
  result <- lapply(df, your_function)
  return(result)
}

# 循环遍历数据框列表，并使用lapply函数来处理每个数据框的列
data_frames <- list(df1, df2)
result <- lapply(data_frames, process_columns)

# 结果是一个列表，其中包含每个数据框的每个列经过函数处理后的结果
print(result)