# Library
library(igraph)
# Create data
set.seed(5)
data <- matrix(sample(0:4, 144, replace=TRUE, prob=c(0.8,0.4,0.5,0.7,0.6)), nc=12)
network <- graph_from_adjacency_matrix(data , mode='undirected', diag=F )
# Default network
par(mar=c(0,0,0,0))
plot(network)
network <- graph_from_adjacency_matrix(data , mode='directed', diag=F )
参考文献:https://r-graph-gallery.com/248-igraph-plotting-parameters.html
开发工具:RStudio +微信Alt+A截屏工具