Mercurial > repos > public > sbplib

view stripeMatrix.m @ 516:afff85574ddb feature/quantumTriangles

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Changed the penalty on the first derivative penalty terms, did not solve the problem
author Ylva Rydin <ylva.rydin@telia.com>
date Fri, 07 Jul 2017 14:52:47 +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