Измените толщину края в графике графика R в соответствии с атрибутами края

Я хочу изменить ширину края моего графа, чтобы соответствовать значению edge.betweenness.

 net <- read.csv("D:/SNA/R/Net.csv")
 att <- read.csv("D:/SNA/R/Att.csv")
 g <- graph.data.frame(net, vertices=att, directed=TRUE)
 pdf("Network.pdf", pointsize=8)
 plot(g, vertex.label=NA, vertex.size=3, edge.width=edge.betweenness(g))
 dev.off()

Я также попытался создать оценку межпометности края как вес края и присвоить его аргументу edge.width в функции графика следующим образом:

plot(g, vertex.label=NA, vertex.size=3, edge.width=E(g)$width

Ответ 1