Rescales a square matrix such that the trace is the same as the dimension.

1 |

`x` |
A square numeric matrix to be rescaled. |

This is computed as `{x=as.matrix(x); x/mean(diag(x))}`

.

A numeric matrix.

Long Qu

`base::diag`

1 2 3 4 5 | ```
set.seed(3456L)
A=tcrossprod(runif(10L))
A0 = normalizeTrace(A)
sum(diag(A0)) - nrow(A)
``` |

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

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