我正在使用 visNetwork 包来创建小型网络。下面的脚本创建了一个简单的网络图，如可视化所示。我的问题是每次执行脚本时，节点的位置都会不断变化。我的要求是每次运行脚本时，我希望可视化显示为固定的，并且为了像下面的可视化一样，目前我必须手动移动边缘以显示需要的内容。另外，我会将更多节点加入网络，请帮助我采用可扩展的方法。请帮助和感谢。
library(visNetwork)
visNetwork(dot = 'dinetwork {1 -> 1 -> 2; 2 -> 4; 2 -- 3; 2 -> 1 }', width =
"100%")
