请用R编程举实例在同一目录下合并十个csv文件，并按某个关键词合并成新文件

在R中，你可以使用`list.files`、`lapply`以及`data.table`或`dplyr`库来合并多个CSV文件。下面是一个例子，我们将假设你想要合并名为“file_1.csv”到“file_10.csv”的文件，它们都有相同的列结构，我们想按照某一列（例如“key_column”）合并数据：

# 安装并加载dplyr库（如果还没安装）
if (!require("dplyr")) {
  install.packages("dplyr")
  library(dplyr)
}

# 列出当前目录下的所有csv文件
file_list <- list.files(pattern = "*.csv", full.names = TRUE, directory = getwd()) 

# 使用lapply遍历文件列表，读取每个CSV文件并合并
all_data <- lapply(file_list, read.csv)

# 将所有数据框组合在一起，按关键字列合并
combined_df <- bind_rows(all_data, by = "key_column")

# 检查一下合并后的数据
head(combined_df)

# 写入新的CSV文件
write.csv(combined_df, "merged_file.csv", row.names = FALSE)