function [V] = vandermonde(varargin)
%
% VANDERMONDE Gera uam matriz de Vandermonde.
%       
%       VANDERMONDE(v, t) gera uma matriz de Vandermonde a partir do
%       vetor v com t colunas

vetor = varargin{1};

if (nargin < 2) 
    n = size(vetor);
else 
    n = varargin{2};
end

m = length(vetor);
V(:, 1) = ones(m,1, class(vetor));
V(:, 2) = vetor;
if (n > 2)
    for j = 3:n
        V(:, j) = V(:, j - 1) .* vetor;
    end
end