Bill,

   jl0=. ;@:((<@:[ ,. ])&.>)

is probably the kind of solution based on each that you had in mind.
It (jl0) is
longer than Henry's

   jl1=. ;@:(,.L:1"0)

but surprisingly is also leaner and meaner:

   'L R'=. l (100&$&.>@:(,&<)) r

   st=.7!:2@:] , 6!:2

   1000 st'L jl0 R'
13184 0.000232441163
   1000 st'L jl1 R'
30848 0.000286170726

   L (jl0 -: jl1) R
1


On Sat, Nov 24, 2012 at 8:06 PM, Bill Harris
<bill_har...@facilitatedsystems.com> wrote:
> l=: 'test 1';'test 2'
> r=: ('FL';'GA');(<'AL';'LA';'TN')
> R=.  5 2 $ 'test 1';'FL';'test 1';'GA';'test 2';'AL';'test 2';'LA';'test 
> 2';'TN'
>
> What verb joins l and r to make R?
>
> ({.l),.> {. r  works for the first element of each array, but I haven't
> figured out how to generalize it.
>
> l ,."0 1   >"1 r
>
> comes close, but "each' seems called for to avoid padding, and I haven't
> figured out something that works.
>
>   Note to self: don't go months without programming in J and then expect
>   it to still be in one's head.
>
> Bill
> --
> Bill Harris
> Facilitated Systems
> http://makingsense.facilitatedsystems.com/
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to