From b5703a92c18a3356187adbb9d3b3c6f1cb5887f4 Mon Sep 17 00:00:00 2001
From: marwan <>
Date: Wed, 6 Jan 2010 08:59:24 +0000
Subject: [PATCH] bugfix if embedding exceeds data length

---
 fnn.m | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/fnn.m b/fnn.m
index 0d5fcb4..ca57054 100644
--- a/fnn.m
+++ b/fnn.m
@@ -55,6 +55,9 @@ function out=fnn(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.5  2009/07/21 11:24:26  marwan
+% missing default t
+%
 % Revision 5.4  2009/03/24 08:35:39  marwan
 % copyright address updated
 %
@@ -215,6 +218,16 @@ N = length(x);
 if isempty(maxM) | maxM > N/2, maxM = maxM_init; end
 if isempty(t) | t > N/2 | t < 1, t = t_init; end
 if maxM < 2, maxM = 2; end
+if (maxM-1) * t > N - 5
+    maxM = maxM_init; t = 1; 
+    warning('Embedding exceeds data length (m-1) * tau > N. Please check!')
+    h = findobj('Tag','delay');
+    if ~isempty(h)
+        set(h,'string',num2str(t))
+    end
+    
+
+end
 if isempty(r), r = r_init; end
 if isempty(s), s = s_init; end
 if isempty(maxN)
-- 
GitLab