15 lines
335 B
Text
15 lines
335 B
Text
(* Define the matrix *)
|
|
matrix = {{3, 0}, {4, 5}};
|
|
|
|
(* Perform singular value decomposition *)
|
|
{u, s, v} = SingularValueDecomposition[matrix];
|
|
|
|
(* Display results with 10 decimal places *)
|
|
Print["U matrix:"]
|
|
N[u, {Infinity, 10}] //Print
|
|
|
|
Print["S matrix:"]
|
|
N[s, {Infinity, 10}] //Print
|
|
|
|
Print["V matrix:"]
|
|
N[v, {Infinity, 10}] //Print
|