view mononomial.m @ 955:92c3c170e90b

Merged in feature/utux2D (pull request #11) Feature/utux2D Approved-by: Jonatan Werpers <jonatan.werpers@it.uu.se> Approved-by: Martin Almquist <malmquist@stanford.edu> Approved-by: Vidar Stiernström <vidar.stiernstrom@it.uu.se>
author Jonatan Werpers <jonatan.werpers@it.uu.se>
date Mon, 10 Dec 2018 08:29:41 +0000
parents 0090a86d8b72
children
line wrap: on
line source

% calculate a N-D mononomial with powers k in points x:
%  z = x(:,1).^k(1) * x(:,2).^k(2) * ...
function z = mononomial(x, k)
    assert(size(x,2) == length(k), 'k must have the same length as the width of x');

    if any(k < 0)
        z = x(:,1)*0;
        return
    end

    denom = prod(factorial(k));

    for i = 1:length(k)
        x(:,i) = x(:,i).^k(i);
    end
    z = prod(x,2)/denom;
end