Skip to main content
added 183 characters in body
Source Link
alephalpha
  • 50k
  • 7
  • 68
  • 182

Mathematica, 27 3035 bytes

Any matrix has a pseudoinverse, and the pseudoinverse is equal to the inverse when the matrix is invertible.

Thread[Det@#*PseudoInverse@#]&Thread[Det[#+x]Inverse[#+x]]/.x->0&

Mathematica, 27 30 bytes

Any matrix has a pseudoinverse, and the pseudoinverse is equal to the inverse when the matrix is invertible.

Thread[Det@#*PseudoInverse@#]&

Mathematica, 27 35 bytes

Thread[Det[#+x]Inverse[#+x]]/.x->0&
added 183 characters in body
Source Link
alephalpha
  • 50k
  • 7
  • 68
  • 182

Mathematica, 2727 30 bytes

Any matrix has a pseudoinverse, and the pseudoinverse is equal to the inverse when the matrix is invertible.

Det[#+x]Inverse[#+x]/.x->0&Thread[Det@#*PseudoInverse@#]&

Mathematica, 27 bytes

Det[#+x]Inverse[#+x]/.x->0&

Mathematica, 27 30 bytes

Any matrix has a pseudoinverse, and the pseudoinverse is equal to the inverse when the matrix is invertible.

Thread[Det@#*PseudoInverse@#]&
Source Link
alephalpha
  • 50k
  • 7
  • 68
  • 182

Mathematica, 27 bytes

Det[#+x]Inverse[#+x]/.x->0&