Mercurial > repos > public > sbplib
view stripeMatrix.m @ 571:38c3da9675a5 feature/utux2D
Bug fixes in scheme.Utux
author | Martin Almquist <martin.almquist@it.uu.se> |
---|---|
date | Tue, 22 Aug 2017 13:53:31 +0200 |
parents | 5cb99f56f55e |
children |
line wrap: on
line source
% Creates a matrix of size n,m with the values of val on the diagonals diag. % A = stripeMatrix(val,diags,n,m) function A = stripeMatrix(val,diags,n,m) default_arg('m',n); D = ones(n,1)*val; A = spdiags(D,diags,n,m); end