powered by
matrix.trace(x)
A <- matrix( seq( 1, 16, 1 ), nrow=4, byrow=TRUE ) matrix.trace( A )
Run the code above in your browser using DataLab