我的for循环找不到我的数组，尽管我指定了它

Question

我正在尝试绘制“ 3D矩阵”，也就是使第三行成为“ times”（这是为了显示多次错误的平均值）。但是，我的for循环找不到我的数组。根据搜索，我应该先声明该数组，但这无济于事。这是过程的第一部分：

threed <- array(0,c(obsIndex,obsIndex,times))
for (j in 1:obsIndex) {
  for (k in 1:obsIndex) {
    if (j != k) {
      threed[j,k,1] <<- j * k
    }
  }
}

然后计算机转到“找不到对象”。如何找到它？