Mercurial > repos > public > sbplib
view spdiag.m @ 118:5046ff7d13b8
Fixed bug and made more robust.
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Tue, 15 Dec 2015 16:38:02 +0100 |
parents | 9c0192cf099f |
children | 8e0067aef5b0 |
line wrap: on
line source
function A = spdiag(a,i) default_arg('i',0); n = length(a)-abs(i); A = spdiags(a,i,n,n); end