R：用列表填充一个空矩阵，并保留行和列的名称

Question

我有一个以下形式的空矩阵：

Empty_Matrix = matrix( NA ,nrow = 3, ncol = 2, byrow = TRUE, dimnames = list(c("a","b","c"),c("aa","bb")) )

aa bb a NA NA b NA NA c NA NA

我想用另一个矩阵来填充该矩阵的每个元素，例如：

Empty_Matrix[,] = list(matrix(0,nrow = 4, ncol=1))

这实际上有效，但是我松开了行名和列名的结构，如下面的控制台屏幕截图所示：

相反，如果我使用以下代码行

Empty_Matrix = matrix( list(matrix(0,nrow = 4, ncol=2)) ,nrow = 3, ncol = 2, byrow = TRUE, dimnames = list(c("a","b","c"),c("aa","bb")))

检索所需的输出：

我的问题是，是否可以使用类似的代码行，例如

Empty_Matrix[,] = list(matrix(0,nrow = 4, ncol=1))

（其中Empty_Matrix已使用NA元素创建）并具有第二个图像的控制台输出。