Mercurial > forge
changeset 9901:a8297eb3326e octave-forge
system-identification: TISEAN d2 wrapper
author | jpicarbajal |
---|---|
date | Wed, 28 Mar 2012 20:30:21 +0000 |
parents | 709365f5acc4 |
children | ce025351bc55 |
files | main/system-identification/inst/tisean/corrdim.m |
diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/main/system-identification/inst/tisean/corrdim.m Wed Mar 28 20:21:17 2012 +0000 +++ b/main/system-identification/inst/tisean/corrdim.m Wed Mar 28 20:30:21 2012 +0000 @@ -20,13 +20,15 @@ %% %% @end deftypefn -function [c d h] = corrdim (data, comp=1, maxedim=10, varargin) +function [c d h] = corrdim (data, varargin) [nT M] = size (data); # --- Parse arguments --- # parser = inputParser (); parser.FunctionName = "corrdim"; + parser = addParamValue (parser,'Components', 1, @(x)x>0); + parser = addParamValue (parser,'MaxEdim', 10, @(x)x>0); parser = addParamValue (parser,'Delay', 1, @(x)x>0); parser = addParamValue (parser,'TheilerWindow', 0, @(x)x>=0); parser = addParamValue (parser,'ScaleSpan', nT*[1e-3 1], @(x)all(x>0)); @@ -50,7 +52,8 @@ %% Prepare format of the embedding vector syscmd = sprintf ("d2 -d%d -M%d,%d -t%d -r%d -R%d -#%d -N%d %s -o%s -V0 %s", ... parser.Results.Delay, ... - comp, maxedim, ... + parser.Results.Components, ... + parser.Results.MaxEdim, ... parser.Results.TheilerWindow, ... parser.Results.ScaleSpan, ... parser.Results.EpsilonCount, ...