如何从R中的多个csv文件中提取列

# 设置目录路径
csv_dir <- "path/to/csv/files"

# 获取目录下的所有CSV文件
csv_files <- list.files(csv_dir, pattern = ".csv", full.names = TRUE)

# 定义一个空列表，用于存储每个CSV文件的数据框
data_list <- list()

# 遍历每个CSV文件
for (csv_file in csv_files) {
  # 读取CSV文件内容并存储为数据框
  data <- read.csv(csv_file)
  
  # 提取所需的列，例如提取第一列和第三列
  extracted_data <- data[, c(1, 3)]
  
  # 将提取的数据框添加到列表中
  data_list[[csv_file]] <- extracted_data
}

# 打印提取的数据框
for (csv_file in csv_files) {
  print(data_list[[csv_file]])
}