我有一个类似的数据集。
library(igraph)
df <- data.frame(Account= c('Luca', 'Alberto', 'Luisa', 'Marcello', 'Tania'),
friend = c('Alberto', 'Luisa', 'Tania', 'Alberto', 'Luisa'))
edges1 = data.frame("from" =df$Account , "to" =df$friend , stringsAsFactors = F )
net <- graph_from_data_frame(d= edges1, directed = T)
V(net)$degree <- degree(net)
plot(net, vertex.size=20,
vertex.color=rainbow(11),
edge.arrow.width=0.7,
edge.lty= 6)
我想给每条边涂上与它开始的节点相同的颜色。例如,来自 Luca 的每个链接为红色,来自 Luisa 的每个链接为黄色。 找不到任何相关信息,提前致谢