Mercurial > hg > octave-lyh

comparison scripts/signal/arch_fit.m @ 11472:1740012184f9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use uppercase for variable names in error() strings to match Info documentation. Only m-files done.
author Rik <octave@nomad.inbox5.com>
date Sun, 09 Jan 2011 21:33:04 -0800
parents c776f063fefe
children fd0a3ac60b0e
comparison
equal deleted inserted replaced
11471:994e2a93a8e2 11472:1740012184f9
56 if ((nargin < 3) || (nargin == 6) || (nargin > 7)) 56 if ((nargin < 3) || (nargin == 6) || (nargin > 7))
57 print_usage (); 57 print_usage ();
58 endif 58 endif
59 59
60 if (! (isvector (y))) 60 if (! (isvector (y)))
61 error ("arch_fit: y must be a vector"); 61 error ("arch_fit: Y must be a vector");
62 endif 62 endif
63 63
64 T = length (y); 64 T = length (y);
65 y = reshape (y, T, 1); 65 y = reshape (y, T, 1);
66 [rx, cx] = size (x); 66 [rx, cx] = size (x);
67 if ((rx == 1) && (cx == 1)) 67 if ((rx == 1) && (cx == 1))
68 x = autoreg_matrix (y, x); 68 x = autoreg_matrix (y, x);
69 elseif (! (rx == T)) 69 elseif (! (rx == T))
70 error ("arch_fit: either rows (x) == length (y), or x is a scalar"); 70 error ("arch_fit: either rows (X) == length (Y), or X is a scalar");
71 endif 71 endif
72 72
73 [T, k] = size (x); 73 [T, k] = size (x);
74 74
75 if (nargin == 7) 75 if (nargin == 7)