인접 목록의 그래프

Question

인접 목록이 있는데 시각화하고 처리하려고합니다. 효율적으로 할 수있는 패키지가 있습니까? 그래프 패키지가 많이 있지만 그 중 혼란 스럽습니다. 누군가 나를 도와 줄 수 있습니까?

$`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 

감사합니다.

Answer 1

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)