https://github.com/cran/pracma
Raw File
Tip revision: 3fdb68cc842f2ab3b59608f8e04d495763584f78 authored by Hans W. Borchers on 27 November 2015, 12:07:10 UTC
version 1.8.8
Tip revision: 3fdb68c
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)
back to top