如何在R中将含单个dataframe的列表元素合并为单个dataframe

你用st_read导入的是SF（Simple Features）对象（带几何信息的特殊DataFrame），直接用普通的rbind或循环可能因为SF的特殊结构报错。以下是几种可靠的合并方法：

第一步：检查数据结构一致性（关键） #

先确认52个SF对象的列名、几何类型完全一致，这是合并成功的前提：

library(sf)
# 查看所有对象的列名
sapply(file_contents, colnames)
# 查看所有对象的几何类型
sapply(file_contents, function(x) st_geometry_type(x))

如果输出结果里有不一致的情况，先统一列名（比如用dplyr::rename）或处理几何类型，再进行合并。

方法1：用dplyr的bind_rows（推荐） #

bind_rows对SF对象友好，自动处理几何列，还能添加来源标识：

library(dplyr)
library(sf)

# 合并所有对象，可选添加source_id列记录原文件的id
combined_sf <- bind_rows(file_contents, .id = "source_id")

方法2：用SF包的st_rbind（专门针对SF对象） #

SF包自带的合并函数，专门处理同类型的SF对象：

library(sf)

combined_sf <- st_rbind(file_contents)

方法3：用do.call + rbind（适用于结构完全一致的情况） #

如果所有SF对象的列数、列名、几何类型完全匹配，也可以用基础R的方法：

combined_sf <- do.call(rbind, file_contents)

关于你之前的报错解释 #

你遇到的attempt to select more than one element in vectorIndex错误，大概率是循环处理索引时出错（比如误用了文件名作为列表索引而非位置索引），或者某个SF对象的结构和其他不一致导致合并失败。先完成第一步的结构检查，再用上面的方法就能解决问题。

内容的提问来源于stack exchange，提问作者jparbache