On Fri, Jan 25, 2013 at 12:40 AM, dpath2o <[email protected]> wrote:

> $a = pdl [ 1, 8, 10, -1, 0, 99]
> $b = pdl [ 8, 0, 11, 0, -1, 100, 1, 10, 7, 18, 0]
>

I think you want a combination of "in" and "which".

pdl> print which($a->in($b))
[0 1 2 3 4]
pdl> print which($b->in($a))
[0 1 3 4 6 7 10]

Is that right?
David


-- 
 "Debugging is twice as hard as writing the code in the first place.
  Therefore, if you write the code as cleverly as possible, you are,
  by definition, not smart enough to debug it." -- Brian Kernighan
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl

Reply via email to