From b9c67f9bd985584dc71fe9f1b67ae0d731a0c949 Mon Sep 17 00:00:00 2001 From: marwan <> Date: Tue, 24 Mar 2009 08:34:24 +0000 Subject: [PATCH] copyright address changed --- ace.m | 9 ++++++++- adjust.m | 9 ++++++++- arfit.m | 17 ++++++++++++----- choosecolormap.m | 9 ++++++++- corrgram.m | 8 ++++++-- crp.m | 10 +++++++++- crp2.m | 10 +++++++++- crp_big.m | 9 ++++++++- crqad_big.m | 9 ++++++++- dl.m | 9 ++++++++- entropy.m | 9 ++++++++- erqa.m | 9 ++++++++- first.m | 9 ++++++++- french.m | 9 ++++++++- hist2.m | 9 ++++++++- histn.m | 9 ++++++++- jrp.m | 9 ++++++++- jrqa.m | 9 ++++++++- mcf.m | 9 ++++++++- mgui.m | 15 ++++++++++----- mi.m | 17 ++++++++++++----- migram.m | 6 +++++- normalize.m | 9 ++++++++- phasespace.m | 9 ++++++++- phasesynchro.m | 9 ++++++++- pss.m | 9 ++++++++- recons.m | 19 +++++++++++++------ taucrp.m | 9 ++++++++- trackplot.m | 9 ++++++++- trafo.m | 9 ++++++++- tt.m | 9 ++++++++- twinsurr.m | 9 ++++++++- winplot.m | 17 ++++++++++++----- xcf.m | 9 ++++++++- 34 files changed, 288 insertions(+), 56 deletions(-) diff --git a/ace.m b/ace.m index 818fa0a..2944e34 100644 --- a/ace.m +++ b/ace.m @@ -41,7 +41,11 @@ function varargout=ace(x,y,w,ii,oi) % % See also: MCF -% Copyright (c) 2001-2003 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -49,6 +53,9 @@ function varargout=ace(x,y,w,ii,oi) % $Revision$ % % $Log$ +% Revision 1.6 2005/03/16 11:19:02 marwan +% help text modified +% % Revision 1.5 2004/11/10 07:05:02 marwan % initial import % diff --git a/adjust.m b/adjust.m index aa61cf6..ec0a06e 100644 --- a/adjust.m +++ b/adjust.m @@ -16,7 +16,11 @@ function [x, y]=adjust(a, b, flag) % y2 = x(1:100) / 2; y2(:,2) = sin(x(1:100) / 5); % [z1 z2] = adjust(y1,y2); -% Copyright (c) 2001-2003 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -24,6 +28,9 @@ function [x, y]=adjust(a, b, flag) % $Revision$ % % $Log$ +% Revision 2.2 2005/03/16 11:19:02 marwan +% help text modified +% % Revision 2.1 2004/11/10 07:07:05 marwan % initial import % diff --git a/arfit.m b/arfit.m index 8b2480d..a93aff0 100644 --- a/arfit.m +++ b/arfit.m @@ -23,7 +23,11 @@ function varargout=arfit(varargin) % end % arfit(x,10) -% Copyright (c) 2002-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -31,6 +35,9 @@ function varargout=arfit(varargin) % $Revision$ % % $Log$ +% Revision 2.7 2007/12/20 16:26:05 marwan +% changed gpl splash behaviour +% % Revision 2.6 2007/05/24 12:30:55 marwan % definitions of criteria checked and corrected % @@ -752,8 +759,8 @@ if 0 err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief'); err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.'); err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:'); - err=fprintf(fid,'%s\n',' E-mail: marwan@agnld.uni-potsdam.de'); - err=fprintf(fid,'%s\n',' Fax: ++49 +331 977 1142'); + err=fprintf(fid,'%s\n',' E-mail: marwan@pik-potsdam.de'); + err=fprintf(fid,'%s\n',' Fax: ++49 +331 288 2640'); err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.'); err=fprintf(fid,'%s\n',repmat('-',50,1)); err=fprintf(fid,'%s\n',datestr(now,0)); @@ -785,8 +792,8 @@ if 0 disp(' Provide a brief description of what you were doing when ') disp(' this problem occurred.'), disp(' ') disp(' E-mail or FAX this information to us at:') - disp(' E-mail: marwan@agnld.uni-potsdam.de') - disp(' Fax: ++49 +331 977 1142'), disp(' ') + disp(' E-mail: marwan@pik-potsdam.de') + disp(' Fax: ++49 +331 288 2640'), disp(' ') disp(' Thank you for your assistance.') warning('on') end diff --git a/choosecolormap.m b/choosecolormap.m index 4b3b33d..e79a243 100644 --- a/choosecolormap.m +++ b/choosecolormap.m @@ -5,7 +5,11 @@ function x_out=choosecolormap(x_in) % % See also COLORMAP, GRAPH3D -% Copyright (c) 2002 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -13,6 +17,9 @@ function x_out=choosecolormap(x_in) % $Revision$ % % $Log$ +% Revision 2.1 2004/11/10 07:07:20 marwan +% initial import +% % error(nargchk(0,1,nargin)) diff --git a/corrgram.m b/corrgram.m index ad0aacb..1c4bf2f 100644 --- a/corrgram.m +++ b/corrgram.m @@ -33,7 +33,11 @@ function [c_out, l_out, t_out] = corrgram(varargin) % % See also CORRCOEF, CORR, XCORR, MIGRAM. -% Copyright (c) 2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2007-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -42,7 +46,7 @@ function [c_out, l_out, t_out] = corrgram(varargin) error(nargchk(2,5,nargin)) -verbose = 0; +verbose = 1; x = varargin{1}; y = varargin{2}; x = x(:); y = y(:); diff --git a/crp.m b/crp.m index 3238ca8..31f5b29 100644 --- a/crp.m +++ b/crp.m @@ -72,7 +72,11 @@ function xout=crp(varargin) % % See also CRP2, CRP_BIG, JRP, TAUCRP, CRQA. -% Copyright (c) 1998-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -80,6 +84,10 @@ function xout=crp(varargin) % $Revision$ % % $Log$ +% Revision 5.14 2008/07/02 11:59:04 marwan +% new norms: DTW and Levenshtein +% bug fix for logical data vectors +% % Revision 5.13 2007/07/18 17:18:44 marwan % integer values in the arguments supported % diff --git a/crp2.m b/crp2.m index 6400bef..faef0cb 100644 --- a/crp2.m +++ b/crp2.m @@ -74,7 +74,11 @@ function xout=crp2(varargin) % Cross Recurrence Plot Based Synchronization of Time Series, % Nonlin. Proc. Geophys., 9, 2002. -% Copyright (c) 1998-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -82,6 +86,10 @@ function xout=crp2(varargin) % $Revision$ % % $Log$ +% Revision 5.16 2008/07/02 11:59:22 marwan +% new norms: DTW and Levenshtein +% bug fix for logical data vectors +% % Revision 5.15 2008/04/29 14:52:01 marwan % levenshtein and DTW distance added % diff --git a/crp_big.m b/crp_big.m index 19f5188..a2e8fd3 100644 --- a/crp_big.m +++ b/crp_big.m @@ -70,7 +70,11 @@ function xout=crp_big(varargin) % % See also CRP, CRP2, JRP, TAUCRP and CRQA. -% Copyright (c) 1998-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -78,6 +82,9 @@ function xout=crp_big(varargin) % $Revision$ % % $Log$ +% Revision 5.12 2008/07/02 11:59:43 marwan +% bug fix for logical data vectors +% % Revision 5.11 2007/07/18 17:18:44 marwan % integer values in the arguments supported % diff --git a/crqad_big.m b/crqad_big.m index d73231b..c910c7d 100644 --- a/crqad_big.m +++ b/crqad_big.m @@ -62,7 +62,11 @@ function out=crqad_big(varargin) % Nonlinear analysis of bivariate data with cross recurrence plots, % Phys. Lett. A, 302, 2002. -% Copyright (c) 2002-2006 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -71,6 +75,9 @@ function out=crqad_big(varargin) % $Revision$ % % $Log$ +% Revision 5.3 2007/07/18 17:18:44 marwan +% integer values in the arguments supported +% % Revision 5.2 2006/10/24 14:36:06 marwan % minor bug: different lengths of vectors z0 and z1 % diff --git a/dl.m b/dl.m index 98c9528..0f0a012 100644 --- a/dl.m +++ b/dl.m @@ -14,7 +14,11 @@ function [a_out, b_out]=dl(x) % % See also CRQA, TT. -% Copyright (c) 2001-2004 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -22,6 +26,9 @@ function [a_out, b_out]=dl(x) % $Revision$ % % $Log$ +% Revision 3.3 2005/11/23 07:29:14 marwan +% help text updated +% % Revision 3.2 2005/03/16 11:19:02 marwan % help text modified % diff --git a/entropy.m b/entropy.m index 2f09bca..d6bce9b 100644 --- a/entropy.m +++ b/entropy.m @@ -5,7 +5,11 @@ function e=entropy(x) % % See also MI. -% Copyright (c) 1999-2001 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1999-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -13,6 +17,9 @@ function e=entropy(x) % $Revision$ % % $Log$ +% Revision 2.2 2005/04/06 12:58:08 marwan +% changed from log2 to natural log +% % Revision 2.1 2004/11/10 07:07:51 marwan % initial import % diff --git a/erqa.m b/erqa.m index b81e816..30f3a56 100644 --- a/erqa.m +++ b/erqa.m @@ -72,7 +72,11 @@ function xout=erqa(varargin) % % Don't use the results of this script! % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Copyright (c) 1998-2003 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -80,6 +84,9 @@ function xout=erqa(varargin) % $Revision$ % % $Log$ +% Revision 1.11 2007/12/20 16:26:05 marwan +% changed gpl splash behaviour +% % Revision 1.10 2005/04/01 12:19:27 marwan % *** empty log message *** % diff --git a/first.m b/first.m index 07a16c7..d7bf271 100644 --- a/first.m +++ b/first.m @@ -6,7 +6,11 @@ function varargout=first(x) % FIRST(...) without output arguments presents the result in % a message box. -% Copyright (c) 2001 +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Christian Hoennicke/ Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -14,6 +18,9 @@ function varargout=first(x) % $Revision$ % % $Log$ +% Revision 2.1 2004/11/10 07:07:51 marwan +% initial import +% error(nargchk(0,3,nargin)); if nargout>3, error('Too many output arguments'), end diff --git a/french.m b/french.m index 905aa1f..f8b31e0 100644 --- a/french.m +++ b/french.m @@ -13,7 +13,11 @@ function h = french(m,flag) % See also HOT, HSV, GRAY, PINK, COOL, BONE, COPPER, FLAG, % COLORMAP, RGBPLOT. -% Copyright (c) 2002 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -21,6 +25,9 @@ function h = french(m,flag) % $Revision$ % % $Log$ +% Revision 2.2 2006/03/16 13:52:43 marwan +% code refreshed +% % Revision 2.1 2004/11/10 07:07:51 marwan % initial import % diff --git a/hist2.m b/hist2.m index 7508937..82f6a29 100644 --- a/hist2.m +++ b/hist2.m @@ -25,7 +25,11 @@ function varargout=hist2(varargin) % % See also HIST, HISTN, BAR3, MI. -% Copyright (c) 2002-2007 +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Andre Sitz, Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -33,6 +37,9 @@ function varargout=hist2(varargin) % $Revision$ % % $Log$ +% Revision 1.12 2007/12/20 16:26:05 marwan +% changed gpl splash behaviour +% % Revision 1.11 2007/05/25 13:02:48 marwan % some comments added % diff --git a/histn.m b/histn.m index 19b4a74..e0ad1ef 100644 --- a/histn.m +++ b/histn.m @@ -28,7 +28,11 @@ function varargout=histn(varargin) % % See also HIST, HIST2, BAR3, MI. -% Copyright (c) 2002-2007 +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Andre Sitz, Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -36,6 +40,9 @@ function varargout=histn(varargin) % $Revision$ % % $Log$ +% Revision 1.12 2007/12/20 16:26:06 marwan +% changed gpl splash behaviour +% % Revision 1.11 2007/05/25 13:02:24 marwan % *** empty log message *** % diff --git a/jrp.m b/jrp.m index d4dedbe..49de3c2 100644 --- a/jrp.m +++ b/jrp.m @@ -73,7 +73,11 @@ function xout=jrp(varargin) % Romano, M., Thiel, M., Kurths, J., von Bloh, W.: % Multivariate Recurrence Plots, Phys. Lett. A , 330, 2004. -% Copyright (c) 2004-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2004-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -81,6 +85,9 @@ function xout=jrp(varargin) % $Revision$ % % $Log$ +% Revision 2.8 2007/12/20 16:27:33 marwan +% changed gpl splash behaviour +% % Revision 2.7 2007/07/18 17:18:44 marwan % integer values in the arguments supported % diff --git a/jrqa.m b/jrqa.m index bf47384..adef7ac 100644 --- a/jrqa.m +++ b/jrqa.m @@ -116,7 +116,11 @@ function xout=jrqa(varargin) % Romano, M., Thiel, M., Kurths, J., von Bloh, W.: % Multivariate Recurrence Plots, Phys. Lett. A , 330, 2004. -% Copyright (c) 1998-2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -124,6 +128,9 @@ function xout=jrqa(varargin) % $Revision$ % % $Log$ +% Revision 2.6 2007/07/18 17:18:44 marwan +% integer values in the arguments supported +% % Revision 2.5 2007/05/15 17:33:13 marwan % new neighbourhood criterion: fixed RR % diff --git a/mcf.m b/mcf.m index 01c2f10..1d8011f 100644 --- a/mcf.m +++ b/mcf.m @@ -26,7 +26,11 @@ function [a_out, b_out]=mcf(x,y,w,T) % % See also: ACE -% Copyright (c) 2001-2004 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -34,6 +38,9 @@ function [a_out, b_out]=mcf(x,y,w,T) % $Revision$ % % $Log$ +% Revision 1.10 2007/12/20 16:26:06 marwan +% changed gpl splash behaviour +% % Revision 1.9 2005/03/16 11:19:02 marwan % help text modified % diff --git a/mgui.m b/mgui.m index ff7d8f5..4cbced7 100755 --- a/mgui.m +++ b/mgui.m @@ -18,16 +18,21 @@ function mgui(action) % % See also MGUICLEAN. -% Copyright (c) 2002-2006 by -% AGNLD, Institute of Physics -% Potsdam University, Germany -% Christian Hoennicke, Norbert Marwan, Andre Sitz -% http://www.agnld.uni-potsdam.de +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 +% Christian Hoennicke, Norbert Marwan, Andre Sitz, Potsdam University, Germany +% http://www.agnld.uni-potsdam.de % % $Date$ % $Revision$ % % $Log$ +% Revision 1.12 2006/03/29 13:07:55 marwan +% problems regarding OPRPs and embedding resolved +% % Revision 1.11 2006/03/16 14:55:57 marwan % code flattened % diff --git a/mi.m b/mi.m index 33c403d..21fa19f 100644 --- a/mi.m +++ b/mi.m @@ -48,7 +48,11 @@ function varargout=mi(varargin) % Estimating the errors on measured entropy and mutual % information, Physica D, 125, 1999. -% Copyright (c) 2002-2006 +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Andre Sitz/ Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -56,6 +60,9 @@ function varargout=mi(varargin) % $Revision$ % % $Log$ +% Revision 3.13 2007/12/20 16:26:06 marwan +% changed gpl splash behaviour +% % Revision 3.12 2007/07/17 09:04:38 marwan % bug for single data series resolved % @@ -628,8 +635,8 @@ if 0 fprintf(fid,'%s\n','Please send us the following error report. Provide a brief'); fprintf(fid,'%s\n','description of what you were doing when this problem occurred.'); fprintf(fid,'%s\n','E-mail or FAX this information to us at:'); - fprintf(fid,'%s\n',' E-mail: marwan@agnld.uni-potsdam.de'); - fprintf(fid,'%s\n',' Fax: ++49 +331 977 1142'); + fprintf(fid,'%s\n',' E-mail: marwan@pik-potsdam.de'); + fprintf(fid,'%s\n',' Fax: ++49 +331 288 2640'); fprintf(fid,'%s\n\n\n','Thank you for your assistance.'); fprintf(fid,'%s\n',repmat('-',50,1)); fprintf(fid,'%s\n',datestr(now,0)); @@ -678,8 +685,8 @@ if 0 disp(' Provide a brief description of what you were doing when ') disp(' this problem occurred.'), disp(' ') disp(' E-mail or FAX this information to us at:') - disp(' E-mail: marwan@agnld.uni-potsdam.de') - disp(' Fax: ++49 +331 977 1142'), disp(' ') + disp(' E-mail: marwan@pik-potsdam.de') + disp(' Fax: ++49 +331 288 2640'), disp(' ') disp(' Thank you for your assistance.') warning('on') end diff --git a/migram.m b/migram.m index f393dc1..d9f202a 100644 --- a/migram.m +++ b/migram.m @@ -44,7 +44,11 @@ function [c_out, l_out, t_out] = migram(varargin) % % See also MI, CORRGRAM. -% Copyright (c) 2007 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2007-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % diff --git a/normalize.m b/normalize.m index d5f0ac7..3de2192 100644 --- a/normalize.m +++ b/normalize.m @@ -3,7 +3,11 @@ function y=normalize(x) % Y=NORMALIZE(X) normalizes the matrix X to zero-mean and % standard deviation one (Y=(X-mean(X))/std(X)). -% Copyright (c) 1998-2001 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -11,6 +15,9 @@ function y=normalize(x) % $Revision$ % % $Log$ +% Revision 2.1 2004/11/10 07:07:51 marwan +% initial import +% % % This program is free software; you can redistribute it and/or % modify it under the terms of the GNU General Public License diff --git a/phasespace.m b/phasespace.m index 9e549fc..ec5980e 100644 --- a/phasespace.m +++ b/phasespace.m @@ -28,7 +28,11 @@ function phasespace(varargin) % Detecting Strange Attractors in Turbulence, % Lecture Notes in Mathematics, 898, Springer, Berlin, 1981 -% Copyright (c) 2002-2006 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -36,6 +40,9 @@ function phasespace(varargin) % $Revision$ % % $Log$ +% Revision 2.4 2007/12/20 16:26:06 marwan +% changed gpl splash behaviour +% % Revision 2.3 2006/03/29 13:07:55 marwan % problems regarding OPRPs and embedding resolved % diff --git a/phasesynchro.m b/phasesynchro.m index ffc39e2..62bf773 100644 --- a/phasesynchro.m +++ b/phasesynchro.m @@ -52,7 +52,11 @@ function CPRout = phasesynchro(varargin); % Detection of synchronization for non-phase-coherent and % non-stationary data, Europhysics Letters, 71(3), 2005. -% Copyright (c) 2008 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -60,6 +64,9 @@ function CPRout = phasesynchro(varargin); % $Revision$ % % $Log$ +% Revision 5.3 2008/07/01 11:36:05 marwan +% bug in embedding dimension fixed +% % Revision 5.2 2008/04/29 14:49:30 marwan % window size bug % diff --git a/pss.m b/pss.m index 20a41d4..9a64d53 100644 --- a/pss.m +++ b/pss.m @@ -13,7 +13,11 @@ function [a_out, b_out]=pss(varargin) % % See also PHASESPACE, CRP, CRQA. -% Copyright (c) 1998-2003 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -21,6 +25,9 @@ function [a_out, b_out]=pss(varargin) % $Revision$ % % $Log$ +% Revision 2.1 2004/11/10 07:10:06 marwan +% initial import +% % % This program is free software; you can redistribute it and/or % modify it under the terms of the GNU General Public License diff --git a/recons.m b/recons.m index 2cd16f7..25b46f9 100644 --- a/recons.m +++ b/recons.m @@ -10,14 +10,18 @@ function varargout=recons(varargin) % Y = RECONS(X,P) reconstructs the time series using % the cumulative distribution function given by vector P. % -% See also CRP, CRP2, JRP. +% See also CRP, CRP2, JRP, TWINSURR. % % References: % Thiel, M., Romano, M. C., Kurths, J.: % How much information is contained in a recurrence plot?, % Phys. Lett. A, 330, 2004. -% Copyright (c) 2005-2006 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2005-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -25,6 +29,9 @@ function varargout=recons(varargin) % $Revision$ % % $Log$ +% Revision 5.2 2008/06/24 14:11:55 marwan +% Including of a abort condition in order to avoid infinite loops. +% % Revision 5.1 2008/01/25 12:47:25 marwan % initial import % @@ -194,8 +201,8 @@ catch err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief'); err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.'); err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:'); - err=fprintf(fid,'%s\n',' E-mail: marwan@agnld.uni-potsdam.de'); - err=fprintf(fid,'%s\n',' Fax: ++49 +331 977 1142'); + err=fprintf(fid,'%s\n',' E-mail: marwan@pik-potsdam.de'); + err=fprintf(fid,'%s\n',' Fax: ++49 +331 288 2640'); err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.'); err=fprintf(fid,'%s\n',repmat('-',50,1)); err=fprintf(fid,'%s\n',datestr(now,0)); @@ -227,8 +234,8 @@ catch disp(' Provide a brief description of what you were doing when ') disp(' this problem occurred.'), disp(' ') disp(' E-mail or FAX this information to us at:') - disp(' E-mail: marwan@agnld.uni-potsdam.de') - disp(' Fax: ++49 +331 977 1142'), disp(' ') + disp(' E-mail: marwan@pik-potsdam.de') + disp(' Fax: ++49 +331 288 2640'), disp(' ') disp(' Thank you for your assistance.') warning('on') end diff --git a/taucrp.m b/taucrp.m index 57c178f..d404136 100644 --- a/taucrp.m +++ b/taucrp.m @@ -45,7 +45,11 @@ function X = taucrp(varargin) % Recurrence Plots for the Analysis of Complex Systems, Physics % Reports, 438(5-6), 2007. -% Copyright (c) 2008 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -53,6 +57,9 @@ function X = taucrp(varargin) % $Revision$ % % $Log$ +% Revision 5.1 2008/01/25 12:47:26 marwan +% initial import +% warning off diff --git a/trackplot.m b/trackplot.m index fc085ad..d2c5f92 100644 --- a/trackplot.m +++ b/trackplot.m @@ -33,7 +33,11 @@ function [tout, Nout] = trackplot(varargin) % Marwan, N., Thiel, M., Nowaczyk, N.: Cross Recurrence Plot Based % Synchronization of Time Series, Nonlin. Proc. Geophys., 2001. -% Copyright (c) 1998-2005 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 1998-2008 % Norbert Marwan, Falko Zetsche, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -41,6 +45,9 @@ function [tout, Nout] = trackplot(varargin) % $Revision$ % % $Log$ +% Revision 4.11 2007/12/20 16:26:06 marwan +% changed gpl splash behaviour +% % Revision 4.10 2005/11/09 08:58:30 marwan % bug fix in interdependent neighbours method % diff --git a/trafo.m b/trafo.m index 047195b..28fce1e 100644 --- a/trafo.m +++ b/trafo.m @@ -11,7 +11,11 @@ function y=trafo(x,a) % y = trafo(x,0); % subplot(2,1,2), hist(y,20) % normally distributed -% Copyright (c) 2001-2002 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -19,6 +23,9 @@ function y=trafo(x,a) % $Revision$ % % $Log$ +% Revision 2.2 2005/03/16 11:19:02 marwan +% help text modified +% % Revision 2.1 2004/11/10 07:09:23 marwan % initial import % diff --git a/tt.m b/tt.m index 83c9373..7e7bc5a 100644 --- a/tt.m +++ b/tt.m @@ -15,7 +15,11 @@ function [a_out, b_out, c_out]=tt(x) % % See also CRQA, DL. -% Copyright (c) 2001-2003 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -23,6 +27,9 @@ function [a_out, b_out, c_out]=tt(x) % $Revision$ % % $Log$ +% Revision 3.5 2008/04/29 14:50:06 marwan +% fixed problem of empty RP +% % Revision 3.4 2007/12/20 16:26:57 marwan % includes also white vertical lines % diff --git a/twinsurr.m b/twinsurr.m index 640e656..1ba0925 100644 --- a/twinsurr.m +++ b/twinsurr.m @@ -28,7 +28,11 @@ function [y nTw] = twinsurr(varargin) % Twin Surrogates to Test for Complex Synchronisation, % Europhys. Lett., 75, 2006. -% Copyright (c) 2008 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -36,6 +40,9 @@ function [y nTw] = twinsurr(varargin) % $Revision$ % % $Log$ +% Revision 5.3 2009/03/17 09:18:17 marwan +% serious bug fix, zero columns were also considered as twins! +% % Revision 5.2 2008/07/02 12:00:48 marwan % silent ability added, minor bug fixes % diff --git a/winplot.m b/winplot.m index d12ed1b..7a2e51f 100644 --- a/winplot.m +++ b/winplot.m @@ -24,7 +24,11 @@ function out=winplot(varargin) % % See also PLOT. -% Copyright (c) 2002-2006 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2002-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -32,6 +36,9 @@ function out=winplot(varargin) % $Revision$ % % $Log$ +% Revision 2.5 2007/12/20 16:26:07 marwan +% changed gpl splash behaviour +% % Revision 2.4 2006/02/14 11:45:59 marwan % *** empty log message *** % @@ -497,8 +504,8 @@ catch err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief'); err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.'); err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:'); - err=fprintf(fid,'%s\n',' E-mail: marwan@agnld.uni-potsdam.de'); - err=fprintf(fid,'%s\n',' Fax: ++49 +331 977 1142'); + err=fprintf(fid,'%s\n',' E-mail: marwan@pik-potsdam.de'); + err=fprintf(fid,'%s\n',' Fax: ++49 +331 288 2640'); err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.'); err=fprintf(fid,'%s\n',repmat('-',50,1)); err=fprintf(fid,'%s\n',datestr(now,0)); @@ -531,8 +538,8 @@ catch disp(' Provide a brief description of what you were doing when ') disp(' this problem occurred.'), disp(' ') disp(' E-mail or FAX this information to us at:') - disp(' E-mail: marwan@agnld.uni-potsdam.de') - disp(' Fax: ++49 +331 977 1142'), disp(' ') + disp(' E-mail: marwan@pik-potsdam.de') + disp(' Fax: ++49 +331 288 2640'), disp(' ') disp(' Thank you for your assistance.') warning('on') end diff --git a/xcf.m b/xcf.m index 400a8f6..d25eff8 100644 --- a/xcf.m +++ b/xcf.m @@ -7,7 +7,11 @@ function [c_out,s_out]=xcf(varargin) % % See also COR, COV, XCORR, ACF -% Copyright (c) 2001-2002 by AMRON +% Copyright (c) 2008-2009 +% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany +% http://www.pik-potsdam.de +% +% Copyright (c) 2001-2008 % Norbert Marwan, Potsdam University, Germany % http://www.agnld.uni-potsdam.de % @@ -15,6 +19,9 @@ function [c_out,s_out]=xcf(varargin) % $Revision$ % % $Log$ +% Revision 2.2 2007/12/20 16:26:07 marwan +% changed gpl splash behaviour +% % Revision 2.1 2004/11/10 07:09:40 marwan % initial import % -- GitLab