Thanks Raul,
write it in one line, and remove both my verb find and unique:

society =. (1 ,. 5 7); (2 ,. _.);(3 ,. _.); (4 ,. 1 2); (5 ,. 2 7);(6 ,. 2);(7 
,. 8) ;(8 ,. 5)

]symSoc =. society , L:0 (<"0 q) ,.L:0 ({.p) #~ L:0 (({:p)&e. each (q =. ~.{.p 
=. |:;society)) 


The key verbs above are e. each, and # only for finding matches.  All others 
are just formatting.





On Wednesday, October 9, 2013 5:05 PM, Raul Miller <[email protected]> 
wrote:
 
The J dictionary uses 'nub' to describe an operation which behaves
like your 'unique', here.

http://www.jsoftware.com/help/dictionary/d221.htm

I hope this helps.  (And I must admit I didn't notice anything else
that I'd change.)

-- 
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to