function mr = MA(q)
%              VEKTOR RADU MODELU TYPU MA(q)
%     (suitable for NAG Foundation toolbox gateway routines 'NAGxxxxx')
% VOLANI: mr = MA(q)
% VSTUP:
% q ... rad modelu (q>=0, cele cislo)
% Podminky korektnosti (nejsou kontrolovany): q>0.
%
% VYSTUP:
% mr=[0,0,q,0,0,0,0] ...
%    ... vektor radu modelu MA(q)=SARIMA(0,0,q,0,0,0,0).

% (C) 1999, V. Vesely, Masaryk University of Brno (Czech Republic)
%
error(nargchk(1,1,nargin));
%
mr=[0,0,q,0,0,0,0];
