Ajouter 'octave/dipsig.m'

2023-02-19 22:44:03 +01:00 · 2023-02-19 22:44:03 +01:00 · 8ba6ae849a
parent 34e32050b9
commit 8ba6ae849a
1 changed files with 16 additions and 0 deletions
--- a/octave/dipsig.m
+++ b/octave/dipsig.m
@ -0,0 +1,16 @@
+function dispsig(signalMatrix, range, titlestr);
+%DISPSIG - deprecated!
+%
+% Please use icaplot instead.
+%
+%   See also ICAPLOT
+
+% 24.8.1998
+% Hugo Gävert
+
+fprintf('\nNote: DISPSIG is now deprecated! Please use ICAPLOT.\n');
+
+if nargin < 3, titlestr = ''; end
+if nargin < 2, range = 1:size(signalMatrix, 1); end
+
+icaplot('dispsig',signalMatrix',0,range,range,titlestr);