blob: 0459c79022fd49ecad2be8e2b5810f4d332583ad (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
function testsvdeconomy()
disp(" ** SVD Function (Singular Value Decomposition)** ")
A = [1,2,3,11;4,5,6,12;7,8,9,13] // Matrix - A
[u,s,vt] = svd(A,'e') // Calling Function Sequence
disp("U Matrix")
disp(u) // A = U*sigma*Vt
disp("Sigma Matrix")
disp(s)
disp(" V transpose ")
disp(vt)
endfunction
|