r 인접 목록에서 인접 행렬 또는 가장자리 목록을 만듭니다.

Question

인접 목록이 있고 인접 행렬 또는 가장자리 목록을 만들려고합니다. 이는 인접성 매트릭스 또는 에지 목록으로 구축 된 네트워크에서 네트워크 분석을 수행하기위한 것입니다.

[17,50,90,NA,NA; 
80,67,NA,NA,NA; 
33,31,32, NA,NA; 
33,31,32,NA,NA; 
354,56,87,97,32; 
....] 

내가 R: Adjacency list to Adjacency matrix를 사용하여 시도하지만,이 단지 작품 내 인접리스트의 경우 : 나는 R. 다음과 같이 (빈 항목이 NA 각 행 항목의 다른 양을 가지고 있으며, 있습니다)되고 인접리스트의 예를 사용하고 있습니다 두 개의 항목이 있습니다 (즉, 한 그룹에 두 개 이상의 이웃이 있음). 가장자리 목록을 얻지 만 내 목록의 처음 두 항목 만 고려합니다.

는 또한 From list to adjacency matrix를 사용하지만 오류로했다 igraph 및 make_graph(unlist(mydata)) 사용하여 시도 : "At type_indexededgelist.c:117 : cannot create empty graph with negative number of vertices, Invalid value"

내가 계정으로 네트워크에있을 것 가중치를 취하는 인접 행렬 필요를 (같은 항목 31, 32에있는 경우 두 행, 그 다음 가장자리 무게는 2가 될 것입니다. 도움 주셔서 감사합니다.

Answer 1

I have an adjacency list and I am trying to make it into an[...] edge list.

어쩌면 당신은 당신/당신의 "인접리스트는"무엇을 나타내는 지 필요에 따라

e <- apply(lst, 1, function(x)x[!is.na(x)]) 
(e <- do.call(rbind, lapply(e, embed, 2))[,2:1]) 
#  [,1] [,2] 
# [1,] 17 50 
# [2,] 50 90 
# [3,] 80 67 
# [4,] 33 31 
# [5,] 31 32 
# [6,] 33 31 
# [7,] 31 32 
# [8,] 354 56 
# [9,] 56 87 
# [10,] 87 97 
# [11,] 97 32 

lst <- read.csv(header=F, comment.char=";", colClasses="integer", text=" 
17,50,90,NA,NA; 
80,67,NA,NA,NA; 
33,31,32,NA,NA; 
33,31,32,NA,NA; 
354,56,87,97,32;") 
m <- as.matrix(lst) 
e <- stack(split(m, row(m)))[,2:1] 
(e <- e[complete.cases(e),]) 
# 1 1  17 
# 2 1  50 
# 3 1  90 
# 6 2  80 
# 7 2  67 
# 11 3  33 
# 12 3  31 
# 13 3  32 
# 16 4  33 
# 17 4  31 
# 18 4  32 
# 21 5 354 
# 22 5  56 
# 23 5  87 
# 24 5  97 
# 25 5  32 

또는

을 할 수 있습니다.