Mercurial > hg > octave-nkf
diff scripts/plot/__errplot__.m @ 3979:e0b7a493e5a8
[project @ 2002-07-10 17:45:34 by jwe]
author | jwe |
---|---|
date | Wed, 10 Jul 2002 17:45:34 +0000 |
parents | 65c6da68ddb3 |
children | efac4b97bb09 |
line wrap: on
line diff
--- a/scripts/plot/__errplot__.m +++ b/scripts/plot/__errplot__.m @@ -33,18 +33,18 @@ ## Author: Teemu Ikonen <tpikonen@pcu.helsinki.fi> ## Keywords: errorbar, plotting -function __errplot__ (...) +function __errplot__ (varargin) if (nargin < 3) # atleast two data arguments needed usage ("__errplot__ (arg1, ..., fmt)"); endif fstr = " "; - ndata = 0; + k = 1; while (nargin--) - a = va_arg (); + a = varargin{k++}; if (! isstr (a)) ndata++; eval (sprintf ("arg%d = a;", ndata));