使用嵌套的for循环和if条件在r中建立矩阵

Question

我正在尝试使用if条件从数据帧中分离值，然后使用它们使用for循环来构建矩阵。我的代码有什么问题？

SQUARE_SOFT_HEATMAP_2 <- matrix(nrow = 11, ncol = 11)
for (i in 1:11) {
   for (j in 1:11){
     for (k in 1:length(SQUARE_SOFT_THINSEC_2$RUNX2)){
       if (SQUARE_SOFT_THINSEC_2$xnew[k] == i && SQUARE_SOFT_THINSEC_2$ynew[k] == j){
          SQUARE_SOFT_HEATMAP_2[i,j] <- SQUARE_SOFT_HEATMAP_2[i,j]+SQUARE_SOFT_THINSEC_2$RUNX2[k]
  }
  } 
}
}