Is the matrix a square matrix?

Checks that the input is a symmetric matrix.

1 2 3 4 5 | ```
assert_is_symmetric_matrix(x, tol = 100 * .Machine$double.eps, ...,
severity = getOption("assertive.severity", "stop"))
is_symmetric_matrix(x, tol = 100 * .Machine$double.eps,
.xname = get_name_in_parent(x), ...)
``` |

`x` |
Input to check. |

`tol` |
Differences smaller than |

`...` |
Passed to |

`severity` |
How severe should the consequences of the assertion be?
Either |

`.xname` |
Not intended to be used directly. |

`TRUE`

if the input is symmetric (after coercion to be a
matrix).

1 2 3 4 | ```
m <- diag(3); m[3, 1] <- 1e-100
assert_is_symmetric_matrix(m)
#These examples should fail.
assertive.base::dont_stop(assert_is_symmetric_matrix(m, tol = 0))
``` |

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.

Please suggest features or report bugs with the GitHub issue tracker.

All documentation is copyright its authors; we didn't write any of that.