0

I would like to emulate what Wolfram Alpha does in Mathematica. Can you help me?

WolframAlpha["Det[{{3,-1,4,6},{2,-3,1,13},{4,-2,7,12},{0,-1,0,9}}]",
             {{"Result", 2}, "Content"}, PodStates -> {"Result__Step-by-step solution"}]
J. M.'s missing motivation
  • 124,525
  • 11
  • 401
  • 574
BeTDa
  • 480
  • 2
  • 8
  • 2
    This answer can be modified a bit so that it computes the determinant step-by-step. – J. M.'s missing motivation Feb 25 '21 at 06:10
  • 1
    What do you mean by "step-by-step calculation of determinant"? The command from the question works in 12.2. The matrix is reduced to the upper-triangular form preserving the value of its determinant and then its deteminant equals the product of the diagonal elements. – user64494 Feb 25 '21 at 06:38
  • 1
    @user, I interpreted it as saying that the OP wants to see an explicit re-implementation of what Alpha does to compute a determinant step-by-step. – J. M.'s missing motivation Feb 25 '21 at 06:47
  • 1
    Unfortunately, WolframAlpha["Det[RandomReal[{-1,1},{4,4}]]", {{"Result", 2}, "Content"}, PodStates -> {"Result__Step-by-step solution"}] performs "(step-by-step solution unavailable)". There is a room for an improvement in this direction. – user64494 Feb 25 '21 at 07:00
  • @MarcoB: W|A says exactly the same. – user64494 Feb 25 '21 at 13:27

0 Answers0