R dimScale 缩放矩阵的行和列

说明

dimScale 、 rowScale 和 colScale 为对角矩阵实现 D1 %*% x %*% D2 、 D %*% x 和 x %*% D D1 、 D2 和 D条目d1、d2 ，和d，分别。与显式乘积不同，这些函数在适当的情况下保留dimnames(x) 和对称性。

用法

dimScale(x, d1 = sqrt(1/diag(x, names = FALSE)), d2 = d1)
rowScale(x, d)
colScale(x, d)

参数

x	一个矩阵，可能继承自虚拟类 Matrix 。
d1 , d2 , d	数值向量给出缩放 x 的行或列的因子；它们会根据需要进行回收。

细节

dimScale(x) (d1 和 d2 未设置)仅大致相当于 cov2cor(x) 。 cov2cor 将结果的对角线条目设置为 1(精确)； dimScale 没有。

值

缩放 x 的结果，当前始终继承自虚拟类 dMatrix 。

当且仅当 x 继承时，它才继承自 triangularMatrix。在 dimScale(x, d1, d2) 具有相同 d1 和 d2 的特殊情况下，当且仅当 x 继承时，它继承自 symmetricMatrix。

例子

n <- 6L
(x <- forceSymmetric(matrix(1, n, n)))
dimnames(x) <- rep.int(list(letters[seq_len(n)]), 2L)

d <- seq_len(n)
(D <- Diagonal(x = d))

(scx <- dimScale(x, d)) # symmetry and 'dimnames' kept
(mmx <- D %*% x %*% D) # symmetry and 'dimnames' lost
stopifnot(identical(unname(as(scx, "generalMatrix")), mmx))

rowScale(x, d)
colScale(x, d)

作者

Mikael Jagan

也可以看看

cov2cor