R语言igraph包如何按节点特征向量中心性为MST图节点着色

代码修改方案 #

你原有代码的核心问题有两个：一是eigen_centrality的directed参数和你创建的无向图属性不匹配，二是边列表tree的顺序和igraph顶点的排列顺序不一致，直接取tree$V2赋值会出现节点和颜色不对应的问题。修改方案如下：

1. 直接将特征向量中心性存储为igraph对象的顶点属性，避免顺序不匹配问题
2. 使用渐变调色板将连续的中心性数值映射为平滑过渡的节点颜色
3. 修正原代码的拼写错误edge.witdh为edge.width

# 计算特征向量中心性并存入顶点属性
V(mstgf)$eigen_cent <- eigen_centrality(mstgf, directed = FALSE, weights = NA)$vector

# 生成蓝-黄-红渐变调色板，和参考图效果匹配
grad_pal <- colorRampPalette(c("darkblue", "lightcyan", "gold", "darkred"))(100)
# 归一化中心性数值，匹配调色板索引
col_idx <- cut(V(mstgf)$eigen_cent, breaks = 100, labels = F)

# 绘图
plot.igraph(mstgf,
            vertex.color = grad_pal[col_idx],   
            edge.color = "blue", 
            edge.curved = TRUE,  
            edge.width = 1
)

# 可选：添加图例说明颜色对应数值范围
legend("topright",
       title = "特征向量中心性",
       legend = c(round(min(V(mstgf)$eigen_cent),2), round(max(V(mstgf)$eigen_cent),2)),
       fill = grad_pal[c(1,100)],
       border = NA
)

如果需要调整配色，也可以替换colorRampPalette里的颜色向量，或者导入viridis、RColorBrewer等配色包的专业渐变方案。

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