Moore-Penrose Inverse
mpinv(X)
X
original matrix
Torsten Hothorn
X<-matrix(1:12,3,4) m.inv = mpinv(X)