Hello!

I would imagine that the output PDL from this code ($o) would be
identical to the input ($i):

    use PDL;
    use PDL::Transform;
    my $i = sequence(5,5) + sequence(5,5)->transpose;
    my $o = $i->map(t_identity,{pix=>1,phot=>'flux',method=>'sample'});

Instead I get:

    print $i-$o;

    [
      [-12 -12 -12 -12  24]
      [-12 -12 -12 -12  30]
      [-12 -12 -12 -12  36]
      [-12 -12 -12 -12  42]
      [ 24  30  36  42  48]
    ]

that is, the transformed PDL has been shifted by (-1,-1). Any
explanation for this? Perhaps I am not using map() correctly?

I got this result by running PDL-2.4.3 on a linux (gentoo 2006.1)
machine.

Cheers,

  Rahman

-- 
__________________________________________________________
Rahman Amanullah,                         +46 8 553 786 61
Stockholm University                         ICQ: 62860758
Stockholm Centre for Physics,                    17d 50m E
Astronomy & Biotechnology                        59d 26m N

PGP/GPG key ID: 0x3C229C80



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

Reply via email to