# # $Id: polar.dem,v 1.6 2004/01/13 07:01:10 sfeam Exp $ # # Show some of the new polar capabilities. # unset border set clip set polar set xtics axis nomirror set ytics axis nomirror set samples 160 set zeroaxis set trange [0:2*pi] set title "Three circles (with aspect ratio distortion)" plot .5,1,1.5 |

set title "" set key box plot cos(2*t) |

plot 2*sqrt(cos(t)),-2*sqrt(cos(t)) |

plot sin(4*t),cos(4*t) set offset 0,0,0,0 |

set xrange [-5:5] set yrange [-5:5] plot t/cos(3*t) |

set autoscale plot 1-sin(t) |

set trange [0:12*pi] plot 2*t |

butterfly(x)=exp(cos(x))-2*cos(4*x)+sin(x/12)**5 set samples 800 print "This is a big one (many samples), be patient..." set title "Butterfly" unset key plot butterfly(t) |

# undo what we've done above |