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