在双for循环中写入数据帧

我有一个嵌套列表（

FCdat.pp.con[[x]][[y]]

），其中单独的列保存矩阵的值（对于每个x和嵌套的y）。现在我想通过写入数据帧来生成矩阵

但是，在双for循环中，我没有成功地为矩阵指定正确的名称。目前，我只成功地用“x”的信息制作了矩阵，而没有用“y”的信息。请帮助我，或者建议另一种方法

for (x in 1:36){
    for (y in 1:5){
        cells <- c(0,
                   FCdat.pp.con[[x]][[y]]$A12,
                   FCdat.pp.con[[x]][[y]]$A13,
                   FCdat.pp.con[[x]][[y]]$A14,
                   FCdat.pp.con[[x]][[y]]$A21,0,
                   FCdat.pp.con[[x]][[y]]$A23,
                   FCdat.pp.con[[x]][[y]]$A24,
                   FCdat.pp.con[[x]][[y]]$A31,
                   FCdat.pp.con[[x]][[y]]$A32,
                   0,
                   FCdat.pp.con[[x]][[y]]$A34,
                   FCdat.pp.con[[x]][[y]]$A41,
                   FCdat.pp.con[[x]][[y]]$A42,
                   FCdat.pp.con[[x]][[y]]$A43,
                   0)
        rnames <- c("ALG1","ALG2","ALG3","ALG4")
        cnames <- c("ALG1","ALG2","ALG3","ALG4")
        Ind.matr <- t(matrix(cells, nrow=4, ncol = 4))
        dimnames(Ind.matr)=list(rnames, cnames)
        assign(paste0("Indmatr", x), Ind.matr)

    }
}

for（1:36中的x）{
对于（y为1:5）{
单元格在循环开始前添加此项：
结果列表的最低级别是否包含所需矩阵的行（或列）向量？这有点难以理解。最高级别[[x]]包含有关主题的信息（n=36），而最低级别[[y]]表示哪些内容（n=5）是相关的。接下来，对于[[x]]和[[y]]我计算了矩阵的每个单元格。因为我不太清楚，所以我将这些矩阵值作为单独的列粘贴到列表中。（因此额外增加了12列）。现在我想制作矩阵，我可以使用[[x]]和[[y]]值访问它们。我希望这更清楚？谢谢！