R 邻接列表中的图形

我有一个邻接列表，我想将它们可视化并对其进行处理。是否有一套有效的方案。我看到有很多图形包，但它们之间很混乱。有人能帮我吗

$`825`
[1] 824

$`824`
[1] 823

$`823`
[1] 822

$`822`
[1] 821

$`821`
[1] 820 777

$`820`
[1] 819 816 789 787 785 783

$`777`
[1] 776

上面是邻接列表。下面是我想要的图表

825
 |
824
 |          _______ 783
823        /
 |        /________ 785
822      /
 |      /__________ 787
821 -- 820
 |      \__________ 789
777      \
 |        \________ 816
776        \
            \______ 819

---

谢谢

你能让你的例子重现吗？将数据以我们可以剪切和粘贴的形式提供给我们，以重新创建它。请参见helpdput。此外，简短的回答可能是包装：igraphigraph和statnet？你能让你的例子重现吗？将数据以我们可以剪切和粘贴的形式提供给我们，以重新创建它。请参见helpdput。此外，简短的回答可能是包裹：igraphigraph和statnet？谢谢你的回答。。。如何更改节点的大小？使用plotg、vertex.size=10或Vg$size感谢您的回答。。。如何使用plotg、vertex.size=10或Vg$size更改节点的大小

 mylist <- list(2,c(1,3),c(2,4),c(3,1))
 names(mylist) <- c(1,2,3,4)
 # just like your list

 #make it in the igraph format
 myadj <- stack(mylist)

#>    values ind
#>     1      2   1
#>     2      1   2
#>     3      3   2
#>     4      2   3
#>     5      4   3
#>     6      3   4
#>     7      1   4

 #plot it
 library(igraph)
 g<-graph.data.frame(myadj)
 plot(g)