This function is originally defined in package 'MASS'. It was adapted
to be able to deal with matrices from the 'Matrix' package, e.g. sparse
matrices.
Usage
MPinv(X, tol = sqrt(.Machine$double.eps))
Arguments
X
(object) two-dimensional, for which a Moore-Penrose inverse
has to be computed
tol
(numeric) tolerance value to be used in comparisons