我有一个下三角矩阵,想要将其转换成不相似矩阵,因此它需要是对称的。
print(rdf)
X0 X1 X2 X3 X4
0 0.0000000 NA NA NA NA
1 0.5340909 0.0000000 NA NA NA
2 0.5340909 0.0000000 0.0000000 NA NA
3 0.3200000 0.5227273 0.5227273 0.0000000 NA
4 0.6263736 0.4945055 0.4945055 0.5384615 0
library(gdata)
upperTriangle(rdf) <- lowerTriangle(rdf)
isSymmetric(rdf)
X0 X1 X2 X3 X4
0 0.0000000 0.5340909 0.5340909 0.6263736 0.4945055
1 0.5340909 0.0000000 0.3200000 0.0000000 0.5227273
2 0.5340909 0.0000000 0.0000000 0.5227273 0.4945055
3 0.3200000 0.5227273 0.5227273 0.0000000 0.5384615
4 0.6263736 0.4945055 0.4945055 0.5384615 0.0000000
[1] FALSE
发生了什么?注意,我不需要使用gdata