我缺少网络中其他节点的联系，而且不确定为什么，任何帮助将不胜感激

Question

我的代码如下：

D_igraph <- graph_from_data_frame(d = edges, vertices = nodes, directed = FALSE)
as.numeric(Strength1)
set.graph.attribute(D_igraph, "Strength_of_tie", Strength1)
D
E(D_igraph)$Strength <- Strength1
plot(D_igraph, vertex.label.color="black",
     edge.color=c("yellow","pink", "green","blue", "violet"))