Mercurial > hg > ishara

view general/numerical/matrix/spdiag.m @ 16:db7f4afd27c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rearranging numerical toolbox.
author samer
date Thu, 17 Jan 2013 13:20:44 +0000
parents general/numerical/spdiag.m@e44f49929e56
children
line wrap: on
line source
function A=spdiag(H)
% spdiag - Return elementwise multiplier as sparse diagonal matrix
%
% spdiag :: [[N]] -> [[N,N]].

A=diag(sparse(H));