Mercurial > octave
view examples/@polynomial/plot.m @ 8710:739141cde75a ss-3-1-52
fix typo in Array-f.cc
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Mon, 09 Feb 2009 21:51:31 +0100 |
parents | dba0037e6602 |
children | 1b48b209a8d6 |
line wrap: on
line source
function h = plot(p, varargin) n = 128; rmax = max (abs (roots (p.poly))); x = [0 : (n - 1)] / (n - 1) * 2.2 * rmax - 1.1 * rmax; if (nargout > 0) h = plot(x, p(x), varargin{:}); else plot(x, p(x), varargin{:}); endif endfunction