Efficient function to test if 'object' is symmetric or not.
Usage
# isSymmetric.spam(object, ...)
# S3 method for spam
isSymmetric(object, tol = 100 * .Machine$double.eps, ...)
Arguments
object
a spam matrix.
tol
numeric scalar >= 0. Smaller differences are not considered,
see all.equal.spam.
...
further arguments passed to all.equal.spam.
Value
logical indicating if object is symmetric or not.
Details
symmetry is assessed by comparing the sparsity structure of
object and t(object) via the function
all.equal.spam. If a difference is detected, the matrix is
cleaned with cleanup and compared again.