Mercurial > hg > octave-lyh

comparison scripts/plot/loglogerr.m @ 7207:71c03c7239fb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-28 02:19:25 by jwe]
author jwe
date Wed, 28 Nov 2007 02:20:48 +0000
parents a1dbe9d80eee
children 5389a52df87b
comparison
equal deleted inserted replaced
7206:6e4ceeeb1940 7207:71c03c7239fb
38 ## Author: Teemu Ikonen <tpikonen@pcu.helsinki.fi> 38 ## Author: Teemu Ikonen <tpikonen@pcu.helsinki.fi>
39 ## Keywords: errorbar, plotting 39 ## Keywords: errorbar, plotting
40 40
41 function retval = loglogerr (varargin) 41 function retval = loglogerr (varargin)
42 42
43 newplot (); 43 [h, varargin] = __plt_get_axis_arg__ ("loglogerr", varargin{:});
44 oldh = gca ();
45 unwind_protect
46 axes (h);
47 newplot ();
44 48
45 ## [h, varargin] = __plt_get_axis_arg__ ("loglog", varargin{:}); 49 set (h, "xscale", "log", "yscale", "log");
46 h = gca ();
47 50
48 set (h, "xscale", "log", "yscale", "log"); 51 tmp = __errcomm__ ("loglogerr", h, varargin{:});
49 52
50 tmp = __errcomm__ ("loglogerr", h, varargin{:}); 53 if (nargout > 0)
54 retval = tmp;
55 endif
51 56
52 if (nargout > 0) 57 unwind_protect_cleanup
53 retval = tmp; 58 axes (oldh);
54 endif 59 end_unwind_protect
55 60
56 endfunction 61 endfunction