在R的igraph中读取顶点而非边列表及单独调用边中顶点的方法

嘿，针对你提到的两个igraph使用问题，我来一步步帮你解决：

1. 单独调用某条边中的单个顶点 #

其实igraph提供了很直接的方式来获取单条边的单个顶点，这里有两种常用方法：

首先假设你已经读取了图文件：

library(igraph)
# 读取边列表文件
g <- read.graph("edges.txt", format = "edgelist")

方法一：使用ends()函数 #

ends()函数可以返回指定边的两个顶点，返回结果是一个矩阵，你可以通过索引直接取对应位置的顶点。比如要获取第3条边的第2个顶点：

# 获取第3条边的两个顶点，取第二个元素
target_vertex <- ends(g, E(g)[3])[2]

这里E(g)[3]选中第3条边，ends()返回的矩阵中，第一列是边的第一个顶点，第二列是第二个顶点，和你文件里每行的顺序完全对应。

方法二：直接访问边的属性 #

对于无向图，每条边都有from和to属性，你可以直接通过属性访问来获取单个顶点：

# 获取第3条边的第二个顶点
target_vertex <- E(g)[3]$to

这种方式更简洁，适合快速访问。

2. 以顶点表格形式读取图（两列表格） #

当然支持！你完全可以把边列表读取成类似表格的结构（数据框或矩阵），这样就能像X[i][1]、X[i][2]那样访问每条边的顶点。有两种实现思路：

思路一：先读取为图，再转成数据框 #

如果你已经用read.graph加载了图，可以把边转换成数据框格式：

# 将图的边转换为数据框
edge_table <- as_data_frame(g, what = "edges")

现在edge_table就是一个两列的数据框（列名默认是from和to），你可以像操作普通表格一样访问：

# 获取第i条边的第一个顶点
v1 <- edge_table$from[i]
# 获取第i条边的第二个顶点
v2 <- edge_table$to[i]

# 或者用矩阵索引的方式
v1 <- edge_table[i, 1]
v2 <- edge_table[i, 2]

思路二：先读取为表格，再转成图 #

如果你希望一开始就得到表格形式的边列表，可以先用read.table读取文件，再转换成igraph对象：

# 直接读取文件为数据框，指定列名
edge_table <- read.table("edges.txt", col.names = c("vertex1", "vertex2"))
# 从数据框生成无向图
g <- graph_from_data_frame(edge_table, directed = FALSE)

这样edge_table就是你需要的两列表格，后续遍历或选取顶点都非常方便，比如循环处理每条边：

for (row in 1:nrow(edge_table)) {
  current_v1 <- edge_table[row, 1]
  current_v2 <- edge_table[row, 2]
  # 在这里执行你的顶点操作逻辑
}

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