Singular value decomposition: Difference between revisions
Content added Content deleted
(added Raku programming solution) |
m (→{{header|Raku}}: superfluous) |
||
Line 347: | Line 347: | ||
my @M = <3 0>, <4 5>; |
my @M = <3 0>, <4 5>; |
||
my Math::Libgsl::Matrix \M .= new: @M |
my Math::Libgsl::Matrix \M .= new: @M.elems, @M.first.elems; |
||
(^M.size1)>>.&{ M.set-row: $_, @M[$_;*] } |
(^M.size1)>>.&{ M.set-row: $_, @M[$_;*] } |
||