如何通过给节点着色来绘制网络图

问题描述

我有一个包含两列（edgelist）的数据框，我想在 igraph 图中用两种不同的颜色为这两列着色。比如蓝色的大写字母节点和深色的小写字母。 我的代码如下。

dat <- data.frame(col1 = letters[1:20],col2 = LETTERS[1:20])
library(igraph)
g <- graph.edgelist(as.matrix(dat ),directed = T)
set.seed(2021)
plot(g,layout=  layout_nicely(g))

谢谢！

解决方法

您可以根据值是否为大写/小写的条件调用图形元素并分配颜色。

V(g)$color <- ifelse(V(g)$name==toupper(V(g)$name),"blue","red")

尝试在这条线之后绘制图表