Mercurial > hg > ishara

view general/numerical/matrix/spdiag.m @ 19:1eb0ea29ec40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Doesn't belong here.
author samer
date Thu, 17 Jan 2013 13:32:19 +0000
parents db7f4afd27c5
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));