Mercurial > repos > public > sbplib

view spdiag.m @ 910:b9c98661ff5d feature/utux2D

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change the name of the last interface method argument from type to opts in all schemes.
author Martin Almquist <malmquist@stanford.edu>
date Fri, 23 Nov 2018 20:39:40 -0800
parents 8e0067aef5b0
children e76321b89c1e
line wrap: on
line source

function A = spdiag(a,i)
    default_arg('i',0);

    if isrow(a)
        a = a';
    end

    n = length(a)-abs(i);
    A = spdiags(a,i,n,n);
end