r - 在 R 中用于跟踪矩阵的函数是什么

Question

虽然有一个用于跟踪矩阵的函数，如下所示:

sum(diag(matrix))

如果矩阵不是 Square(即“n x n”大小)，这可能会错误地为您提供结果。是否有其他内置函数用于运行矩阵的“跟踪”？

Answer 1

包:心理

函数:tr()

例子:

> x <- matrix(replicate(9,1), ncol = 3, nrow = 3)
> x
     [,1] [,2] [,3]
[1,]    1    1    1
[2,]    1    1    1
[3,]    1    1    1
> tr(x)
[1] 3

> x <- matrix(replicate(12,1), ncol = 4, nrow = 3)
> x
     [,1] [,2] [,3] [,4]
[1,]    1    1    1    1
[2,]    1    1    1    1
[3,]    1    1    1    1
> tr(x)
Fehler in tr(x) : m must be a square matrix

(“Fehler”表示错误)

而且

包:矩阵计算

功能:matrix.trace