如何用R生成一个网络关系图

R中提供了各种强大的packages，可以通过加载包来实现network的功能。
需要准备一个eges和nodes的数据文件，代表线长和节点。然后调用network的函数即可。

library(visNetwork)
library(openxlsx)
KOL_CN_EDGE <- read.xlsx("edges.xlsx")
KOL_CN_NODE <- read.xlsx("nodes.xlsx")
visNetwork(KOL_CN_NODE,KOL_CN_EDGE)%>%
  visInteraction(dragNodes = TRUE, 
                 dragView = TRUE, 
                 zoomView = TRUE) %>%
  visLayout(randomSeed = 1)

不知道怎么插入html文件，。。。。