https://github.com/cran/pracma
Tip revision: 9a644c12884525087aa1db3ecf57586b29fb17d8 authored by HwB on 06 June 2011, 00:00:00 UTC
version 0.5-3
version 0.5-3
Tip revision: 9a644c1
mldivide.R
##
## m l d i v i d e . R test suite
##
mldivide <- pracma::mldivide
mrdivide <- pracma::mrdivide
A <- matrix(c(8,1,6, 3,5,7, 4,9,2), nrow = 3, ncol = 3, byrow = TRUE)
identical(all.equal(mldivide(A, A), diag(1, 3, 3), tolerance=1e-7), TRUE)
identical(all.equal(mrdivide(A, A), diag(1, 3, 3), tolerance=1e-7), TRUE)