r - R S4 插槽，更改内容，而不是属性

Question

我正在使用需要更改的 S4 对象（我相信）。它看起来像这样：

str(dataK@K)  num [1:226, 1:226] 0.94828 -0.13679 -0.01083 -0.12882
-0.00399 ...
 - attr(*, "dimnames")=List of 2   ..$ : chr [1:226] "GT_1" "GT_10" "GT_100" "GT_101" ...   ..$ : chr [1:226] "GT_1" "GT_10" "GT_100" "GT_101" ...
>

现在，我需要用单位矩阵替换 num-part 并保持属性（chr[1:226] 部分）不变。我对 S4 插槽完全不熟悉，这可能是一个微不足道的解决方案 - 我不知道。所以我很感激。谢谢 jahn 顺便说一句：我试过 dataK@K <- as.matrix(diag(226)) 但这会带走属性。

标签： rreplaces4slot