在R中将不是平方加权的邻接矩阵转换为Igraph对象

Question

我正在使用tf_idf value来确定网页之间的相似性。图对象，以便我可以对相同的一个模式投影。

所以我正在使用这个 ig <- graph.adjacency(tf_idf,mode="undirected",weighted=TRUE)。我希望加权它是tf_idf值。

但是，当我这样做时，它会丢失错误，

graph.adjacency.dense中的错误（Adjmatrix，mode = mode，加权=加权，：不是方形矩阵

您可以帮助我决定如何进行。

我有类似的矩阵，其中x，y，z是关键字，a，b是网页

mat = matrix(c(0.1, 0.5, 0.9, 0.4, 0.3, 0.5), nc=3,
           dimnames=list(c("A", "B"), c("x", "y", "z")),
           byrow=TRUE)
      x    y   z
A     0.1 0.5 0.9
B     0.4 0.3 0.5

Answer 1

可能有更好的方法，但是如果要将矩阵扩展到成熟的邻接矩阵，则可以使用以下功能：

expand.matrix <- function(A){
  m <- nrow(A)
  n <- ncol(A)
  B <- matrix(0,nrow = m, ncol = m)
  C <- matrix(0,nrow = n, ncol = n)
  cbind(rbind(B,t(A)),rbind(A,C))
}

例如：

 A <- rbind(c(0,1,0),c(1,0,1))
> A
     [,1] [,2] [,3]
[1,]    0    1    0
[2,]    1    0    1
> expand.matrix(A)
     [,1] [,2] [,3] [,4] [,5]
[1,]    0    0    0    1    0
[2,]    0    0    1    0    1
[3,]    0    1    0    0    0
[4,]    1    0    0    0    0
[5,]    0    1    0    0    0