R igraph - 可视化网络

Question

我正在尝试用一起购买的产品来形象化网络。我正在使用R和库igraph。我有〜140个节点（产品）和~3200个边缘（一起购买的产品之间的链接加上特定组合的数量 - 重量）。

最后，我希望展示网络中的所有产品以及它们之间的连接，其中连接线的厚度（或颜色）基于出现次数。

我尝试过不同类型的网络，例如circle或Fruchterman-Reingold。但最终它是一团糟的。考虑这个例子：

net <- graph_from_data_frame(d=edges, vertices=nodes, directed=T) 
net <- simplify(net, remove.multiple = F, remove.loops = T) 
plot(net, edge.arrow.size=.4,vertex.label=NA)

我认为这是因为边的权重具有高方差（min：1，max：1647，avg：52，st.dev：110）

如何让它更易读？