Hi,
this example does not work on Windows.
The console comes but the gnuplot does not.
Thanks

use PDL;
use PDL::Graphics::Gnuplot;
my $pi    = 3.14159;
my $theta = xvals(201) * 6 * $pi / 200;
my $z     = xvals(201) * 5 / 200;

gplot( {'3d' => 1, title => 'double helix'},
      {with => 'linespoints pointsize variable pointtype 2 palette',
      legend => ['spiral 1','spiral 2']} ,
      pdl( cos($theta), -cos($theta) ),       # x
      pdl( sin($theta), -sin($theta) ),       # y
      $z,                                     # z
      (0.5 + abs(cos($theta))),               # pointsize
      sin($theta/3),                          # color
      {with=>'points pointsize variable pointtype 5'},
      zeroes(6),                         # x
      zeroes(6),                         # y
      xvals(6),                          # z
      xvals(6)+1,                        # point size
      {size=>'xyz equal'}
);
--

Fabio D'Alfonso
'Enabling Business Through IT'
cell.  +39.348.059.40.22 ***
web: www.fabiodalfonso.com <http://www.fabiodalfonso.com/>
email: [email protected]
<mailto:[email protected]>linkedin: www.linkedin.com/in/fabiodalfonso <http://it.linkedin.com/in/fabiodalfonso> twitter: www.twitter.com/#!/fabio_dalfonso <http://www.twitter.com/#%21/fabio_dalfonso>

fax: +39.06.874.599.581
BlackBerry® Wireless Enabled Address.


         ** Hidden  numbers are automatically rejected by the phone*


_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl

Reply via email to