过R语言读取某个文件夹下的所有文件，并返回给用其文件名前10个字符命名的变量

folder_path <-"C:/R/Workspace/GSE162807_RAW/"
file_list <- list.files(folder_path, full.names = TRUE)
for (file_path in file_list) {
  # 提取文件名
  file_name <- basename(file_path)
  # 获取文件名前10个字符并创建合法的变量名
  var_name <- substr(file_name, 1, 10)
  var_name <- make.names(var_name)  # 确保变量名符合R的命名规范
  # 读取文件 (可以根据文件类型选择合适的读取函数，如 read.csv, read.table 等)
  file_content <- Read10X_h5(file_path, use.names = TRUE, unique.features = TRUE)  # 这里假设是 CSV 文件
  # 动态创建变量并赋值
  assign(var_name, file_content)
}