Ok, my J model was wrong.  I just put it together mentally.  Now I've created 
some test data and corrected the model:


           require'dates'
           
           N    =: # tkrs =: ;:'IBM CSCO DELL AAPL F X'
           day1 =: 1 + day0 =: todayno 2006 01 01
           
           'X Y' =: cocreate&.>2#a:
           
           symbol__Y   =:  tkrs {~ 3 ?. # tkrs
           
           date__X     =:  day1 + ?. days #~ changes =. ?. N # <: <. N %~ days 
=. 365
           symbol__X   =:  tkrs , date__X /:~ changes # tkrs
           date__X     =:  (day0 #~ #tkrs), /:~ date__X
           prod_id__X  =:  i.#symbol__X
              
              
           map_it =: dyad define

              filter    =.  (symbol__x e. symbol__y) *. date__x <: todayno 2006 
06 15
        
              rows      =. filter # prod_id__x ,. date__x
        
              prod_ids  =.  rows {.@:\:/@:|:/.~ symbol__y i. filter # symbol__x
           
              symbol__y ,. <"0 prod_ids
        )
           
           X map_it Y
        +----+--+
        |IBM |83|
        +----+--+
        |CSCO|81|
        +----+--+
        |X   |65|
        +----+--+
           

I hope my need is clearer now.  Can anyone help?

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

Reply via email to