Mercurial > hg > octave-nkf

diff scripts/plot/polar.m @ 12789:482cc053281b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
codesprint: Add 2 demos for polar.m * polar.m : Add 2 rose demos.
author Rik <octave@nomad.inbox5.com>
date Sat, 16 Jul 2011 08:16:40 -0700
parents c792872f8942
children 5f0bb45e615c
line wrap: on
line diff
--- a/scripts/plot/polar.m
+++ b/scripts/plot/polar.m
@@ -211,3 +211,15 @@
   endif
 
 endfunction
+
+
+%!demo
+%! theta = linspace (0, 2*pi, 1000);
+%! rho = sin (7*theta);
+%! polar (theta, rho);
+
+%!demo
+%! theta = linspace (0, 10*pi, 1000);
+%! rho = sin (5/4*theta);
+%! polar (theta, rho);
+