home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume8 / gnuplot1.10A / part04 / polar.dem < prev    next >
Encoding:
Text File  |  1989-09-09  |  554 b   |  29 lines

  1. #
  2. # Show some of the new polar capabilities.
  3. #
  4. set polar
  5. set xrange [0:2*pi]
  6. plot .5,1,1.5
  7. pause -1 "Three circles (with aspect ratio distortion)"
  8. plot cos(2*x)
  9. pause -1 "Hit return"
  10. plot 2*sqrt(cos(x)),-2*sqrt(cos(x))
  11. pause -1
  12. set offset pi/4,pi/4,0,0
  13. plot sin(4*x),cos(4*x)
  14. pause -1
  15. set yrange [-3:3]
  16. plot x/cos(3*x)
  17. set autoscale
  18. pause -1
  19. plot 1-sin(x)
  20. pause -1
  21. set xrange [0:12*pi]
  22. plot 2*x
  23. pause -1
  24. butterfly(x)=exp(cos(x))-2*cos(4*x)+sin(x/12)**5
  25. set samples 800
  26. pause 0 "This is a big one (many samples), be patient..."
  27. plot butterfly(x)
  28. pause -1
  29.