从非正方形矩阵创建邻接矩阵

Question

我想从一个非正方形矩阵创建一个邻接矩阵。行和列均定义不同的变量。在示例中，行代表独特的资金，列代表独特的公司。

此代码创建具有重复值的10x10矩阵，如下所示，我想创建6x6矩阵

<div id="login">
<div style="background-image: linear-gradient(to bottom, transparent 0%, black 90%);">
<div class="main-header text-center">
   <div class="elements">
    <div class="logo page-header">
     <img src="images/logo-header.png" alt="STREAMNET" width="1200" class="img-responsive">
     </div>
    </div>
</div>
</div>
</div>

Converting not a Square weighted adjacency matrix to igraph object in R

我的矩阵是

    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))
    }

df <- expand.matrix(dat)

预期结果

Answer 1

我试图将数据集的原始类保留为表。

#Code
dat <- t(dat)
dat <- cbind(dat,0,0,0)
colnames(dat) <- c('Fund1','Fund2','Fund3','4','5','6')