~ubuntu-branches/ubuntu/trusty/pdl/trusty-proposed

« back to all changes in this revision

Viewing changes to Graphics/PGPLOT/Window/Window.pm

  • Committer: Bazaar Package Importer
  • Author(s): Andres Rodriguez
  • Date: 2009-12-05 12:37:41 UTC
  • mfrom: (2.1.4 squeeze)
  • Revision ID: james.westby@ubuntu.com-20091205123741-ilqkc9s4zlk71z13
Tags: 1:2.4.5+dfsg-2ubuntu1
* Merge from debian testing (LP: #492898), remaining changes:
  - debian/perldl.conf: Enabled NAN support.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1222
1222
options just as with L<the imag() method|/imag> -- but 
1223
1223
those parameters refer to the scientific coordinate system rather than 
1224
1224
to the pixel coordinate system (e.g. C<PITCH=E<gt>100> means "100 scientific units 
1225
 
per inch", and C<SCALE=E<gt>1> means "1 scientific unit per device pixel".  See
 
1225
per inch", and C<SCALE=E<gt>1> means "1 scientific unit per device pixel").  See
1226
1226
L<the imag() writeup|/imag> for more info on these 
1227
1227
options.  
1228
1228
 
1233
1233
 
1234
1234
By default, fits_imag tries to guess which direction your axes are meant
1235
1235
to go (left-to-right or right-to-left) using the CDELT keywords:
1236
 
if C<< CDELT<n> >>
 
1236
if C<< CDELT >>
1237
1237
is negative, then rather than reflecting the image fits_imag will plot the
1238
1238
X axis so that the highest values are on the left.  
1239
1239
 
1417
1417
Setting the argument to 1 turns on automatic log scaling and setting it to
1418
1418
zero turns it off again. The function can be used in both the object
1419
1419
oriented and standard interface. To learn more, see the documentation for
1420
 
L<PDL::Graphics::PGPLOT::Window|PDL::Graphics::PGPLOT::Window>.
 
1420
the L<axis option|axis>.
1421
1421
 
1422
1422
=for example
1423
1423
 
5320
5320
 
5321
5321
 
5322
5322
      # Within each list element loop over runs of pen value
5323
 
      while($rl = $pn->at($run)) {  # assignment
 
5323
      while(($run<$pn->nelem) && ($rl = $pn->at($run))) {  # assignment
5324
5324
          my($pv);
5325
5325
          if($pv = $pval->at($run)) { # (assignment) Skip runs with pen value=0
5326
5326
              my $top = $pos+$rl;   $top-- if($top == $xx->dim(0));