Anonymous user
QR decomposition: Difference between revisions
→{{header|Maple}}
(Updated D entry) |
|||
Line 1,159:
0.0 -175.0 70.0
0.0 0.0 -35.0)
</pre>
=={{header|Maple}}==
<lang Maple>
with(LinearAlgebra):
Q,R := QRDecomposition( evalf( <<12|-51|4>,<6|167|-68>,<-4|24|-41>>) ):
Q;
R;
</lang>
Output:
<pre>
[-0.857142857142857 0.394285714285714 0.331428571428571]
[ ]
[-0.428571428571429 -0.902857142857143 -0.0342857142857143]
[ ]
[ 0.285714285714286 -0.171428571428571 0.942857142857143]
[-14. -21. 14.0000000000000]
[ ]
[ 0. -175.000000000000 70.0000000000000]
[ ]
[ 0. 0. -35.]
</pre>
| |||