moin Dan,

On 2012-09-19 05:43, dpath2o wrote:
>> I'm wondering if anyone may have insight on determining the indices of
>> unique pairs, triplets, quadruplets, etc.
>>
>> Consider:
>> $x = pdl[1,5,8,9,12,20,18,16,16,13, 2,1,5,7,13,15]
>> $y = pdl[0,2,1,7, 2, 6, 9, 4, 9,20,20,0,8,7,20, 5]
>> $o = pdl[$x,$y]
>> $i = $o->uniqind

It sounds to me like you're looking for uniqvec():

> Module PDL::Primitive
>   uniqvec
>     Return all unique vectors out of a collection

There's also a module of mine on CPAN (PDL::VectorValued) which will
count the unique values for you (functions rleND(), rldND()).

marmosets,
        Bryan

-- 
***************************************************

Bryan Jurish
Deutsches Textarchiv
Berlin-Brandenburgische Akademie der Wissenschaften

Jägerstr. 22/23
10117 Berlin

Tel.:      +49 (0)30 20370 539
E-Mail:    [email protected]

***************************************************

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

Reply via email to