diff --git a/private/crp_plugin.m b/private/crp_plugin.m index ebbfef0575346ff7303ebd32942ea441042abf70..d7a75e1195f54d931566cbb615440d2bb4e319c8 100644 --- a/private/crp_plugin.m +++ b/private/crp_plugin.m @@ -10,6 +10,9 @@ function [X, matext] = crp_plugin(x, y, m, t, e, mflag, hCRP, plugin_path, silen % $Revision$ % % $Log$ +% Revision 4.2 2005/04/15 09:03:03 marwan +% minor bugfix in plugin section +% % Revision 4.1 2005/04/08 09:03:53 marwan % plugin added % @@ -35,7 +38,7 @@ try % call extern rp programme if ~silent, set(findobj('Tag','Status','Parent',findobj('Parent',hCRP,'Tag','CRPPlot')),'String','Compute Recurrence Points'),drawnow, end - m_str = {'MAX', 'EUC', 'MIN', '', '', '', '', '', 'EUC'}; + m_str = {'MAX', 'EUC', 'MIN', 'NR', 'FAN', 'IN', 'OM', 'OP', 'EUC'}; dis_sign = 1; if mflag == 9, dis_sign = -1; end system([plugin_path,filesep,rp_plugin,' -m ',num2str(1), ... @@ -60,19 +63,25 @@ try if ~silent, set(findobj('Tag','Status','Parent',findobj('Parent',hCRP,'Tag','CRPPlot')),'String','Plot Recurrence Points'),drawnow, end switch mflag - case 1 %%%%%%%%%%%%%%%%% maximum norm + case 1 + errcode=111; matext=[num2str(round(100*e)/100) '\sigma (fixed distance maximum norm)']; - case 2 %%%%%%%%%%%%%%%%% euclidean norm + case 2 errcode=112; matext=[num2str(round(100*e)/100) '\sigma (fixed distance euclidean norm)']; - case 3 %%%%%%%%%%%%%%%%% minimum norm + case 3 errcode=113; matext=[num2str(round(100*e)/100) '\sigma (fixed distance minimum norm)']; + %%%%%%%%%%%%%%%%% order patterns + case 8 + errcode=118; + matext=''; %%%%%%%%%%%%%%%%% global RP case 9 + errcode=119; X = X * ( max([max(x), max(y)]) - min([min(x), min(y)]) ); matext=''; end