r-如何找到连接到图中两个节点的节点数

Question

我有一个具有以下邻接矩阵的直接图

as.matrix(read.table(header=T, text=
" A B C D E F
A 0 1 0 0 0 1
B 0 0 0 0 0 1
C 0 1 0 0 1 0
D 0 1 0 0 1 1
E 0 0 0 0 0 1
F 0 0 0 0 0 0"))

我想做一些矩阵操作，可以给我两个节点后面的唯一节点的数量。例如，在前面的矩阵中，结果应该是

  A B C D E F
A|0 3 0 0 2 4|
B|3 3 3 3 3 5|
C|0 3 0 0 2 4|
D|0 3 0 0 2 4|
E|2 3 2 2 2 5|
F|4 5 4 4 5 4|

我正在使用R进行编码。如果有人能在上提供帮助，那就太好了

Answer 1

我找到了答案，我分享它，因为它可能很有用：

D<-colSums(A)
B<-matrix(D,ncol=length(D),nrow=length(D))
Result<-B+t(B)-t(A)%*%A