R语言网络图edgelist处理：如何将中心性结果的数字ID替换为原始节点名

解决方案 #

igraph内部使用从1开始的连续整数作为顶点的内部ID，你定义的原始节点名存储在igraph对象的name顶点属性中，只需通过ID和节点名的映射关系替换即可，具体操作如下：

步骤1：获取节点映射关系

首先提取igraph对象中的原始节点名，顺序和内部ID一一对应（ID1对应第一个节点名，ID2对应第二个，以此类推）：

# 提取节点映射，索引为数字ID，值为原始节点名
node_map <- V(g)$name

# 若转换时属性丢失，直接使用你自己定义的nodes向量即可，顺序完全对应
# node_map <- nodes

步骤2：替换结果中的数字ID

基础R实现

# 转换from/to列为整数后用映射表替换
df$from <- node_map[as.integer(df$from)]
df$to <- node_map[as.integer(df$to)]

dplyr实现（可读性更高）

library(dplyr)

# 构造映射表
id_map <- data.frame(
  id = as.character(seq_along(node_map)),
  node_name = node_map
)

# 两次关联匹配替换from和to
df <- df %>%
  left_join(id_map, by = c("from" = "id")) %>%
  rename(raw_from = node_name) %>%
  left_join(id_map, by = c("to" = "id")) %>%
  rename(raw_to = node_name) %>%
  select(from = raw_from, to = raw_to, edge.betweenness.centrality)

操作完成后df中的from和to就会替换为你原始的节点名称。

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