igraph中as.undirected转换后as_data_frame导出数据框异常，求解决方法

当as_data_frame导出数据框损坏时，可以直接从igraph对象中提取原始属性，手动构建数据框，避免依赖可能出问题的封装函数：

• 提取边信息：用ends()函数直接获取每条边的起点和终点，再搭配边的权重属性，组合成边数据框：

# 构建边数据框
edges_result <- data.frame(
  from = ends(g2, E(g2))[, 1],
  to = ends(g2, E(g2))[, 2],
  weight = E(g2)$weight
)

• 提取节点信息（若需要）：如果要获取节点相关数据，直接从顶点对象V(g2)中提取属性：

# 构建节点数据框（示例以节点name属性为例）
nodes_result <- data.frame(node_id = V(g2)$name)

• 整合边与节点数据（类似what="both"）：用列表存储两个数据框，方便查看：

out <- list(nodes = nodes_result, edges = edges_result)

如果怀疑是igraph版本问题导致的as_data_frame异常，也可以尝试更新到最新版本：

install.packages("igraph")

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