смежности матрица R

Question

Я хочу найти матрицу смежности из файла CSV, который включает в себя следующую информацию:

A B 
1 2 
1 3 
1 4 
2 5 
3 7 

и так далее. Есть 100 узлов, но каждый раз, когда я пытаюсь создать матрицу, а затем график графика, ошибка в том, что это неквадратная матрица. Может ли кто-нибудь помочь мне с правильным кодом в R?

Answer 1

Может быть что-то вроде:

dat <- read.table(text="A B 
1 2 
1 3 
1 4 
2 5 
3 7", header=TRUE) 

x <- table(dat) 
x %*% t(x) 

Но, может быть, вы на самом деле хотите: igraph::graph.data.frame

Answer 2

Что у вас есть это список края. Вы можете построить график из этого, а затем преобразовывать его матрицу смежности:

library(igraph) 
get.adjacency(graph.edgelist(as.matrix(dat), directed=FALSE)) 

(используя dat от ответа Тайлера). Что дает

7 x 7 sparse Matrix of class "dgCMatrix" 

[1,] . 1 1 1 . . . 
[2,] 1 . . . 1 . . 
[3,] 1 . . . . . 1 
[4,] 1 . . . . . . 
[5,] . 1 . . . . . 
[6,] . . . . . . . 
[7,] . . 1 . . . .