Mercurial > repos > public > sbplib
changeset 555:8e0067aef5b0
Make spdiag accept both row and column vectors
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Tue, 29 Aug 2017 12:22:01 +0200 |
parents | bcddbc2beef4 |
children | 2eb1ccef26cd 2ce903f28193 |
files | spdiag.m |
diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
diff -r bcddbc2beef4 -r 8e0067aef5b0 spdiag.m --- a/spdiag.m Mon Aug 28 14:28:45 2017 +0200 +++ b/spdiag.m Tue Aug 29 12:22:01 2017 +0200 @@ -1,5 +1,10 @@ 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 \ No newline at end of file