Mercurial > hg > octave-lyh
comparison scripts/signal/diffpara.m @ 6046:34f96dd5441b
[project @ 2006-10-10 16:10:25 by jwe]
author | jwe |
---|---|
date | Tue, 10 Oct 2006 16:10:31 +0000 |
parents | 4c8a2e4e0717 |
children | 4fb053f24fd6 |
comparison
equal
deleted
inserted
replaced
6045:421d8a903df7 | 6046:34f96dd5441b |
---|---|
41 ## Description: Estimate the fractional differencing parameter | 41 ## Description: Estimate the fractional differencing parameter |
42 | 42 |
43 function [d, D] = diffpara (X, a, b) | 43 function [d, D] = diffpara (X, a, b) |
44 | 44 |
45 if ((nargin < 1) || (nargin > 3)) | 45 if ((nargin < 1) || (nargin > 3)) |
46 usage ("[d, D] = diffpara (X, a, b)"); | 46 print_usage (); |
47 else | 47 else |
48 if (isvector (X)) | 48 if (isvector (X)) |
49 n = length (X); | 49 n = length (X); |
50 k = 1; | 50 k = 1; |
51 X = reshape (X, n, 1); | 51 X = reshape (X, n, 1); |