I had typed it incorrectly.  Sorry.

s=: 13 :'_2 ,\ x,&,y'

Linda

-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Linda Alvord
Sent: Sunday, July 19, 2015 2:48 AM
To: [email protected]
Subject: Re: [Jprogramming] row puzzle

Raul,  How do you write your definition explicitly?

r=: 13 :'x,.&.|:y' NB. Kip
s=:_2,\,&,         NB. Raul

Linda



-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Henry Rich
Sent: Saturday, July 18, 2015 10:18 PM
To: [email protected]
Subject: Re: [Jprogramming] row puzzle

Now THAT's beautiful!

Henry Rich

On 7/18/2015 10:16 PM, Kip Murray wrote:
> I use
>
>      row =: ,.&.|:
>      1 2 row 3 4
>   1 2
>   3 4
>      1 2 row 3 4 row 5 6
>   1 2
>   3 4
>   5 6
>      (1 2 row 3 4) row 5 6
>   1 2
>   3 4
>   5 6
>      (1 2 row 3 4) row 5 6 row 7 8
>   1 2
>   3 4
>   5 6
>   7 8
>
> --Kip Murray
>
> On Sat, Jul 18, 2015 at 7:50 PM, Raul Miller <[email protected]>
wrote:
>
>> Aw... come on, what about
>>
>> row=:_2,\,&,
>>
>> ?
>>
>> Thanks,
>>
>> --
>> Raul
>>
>>
>> On Sat, Jul 18, 2015 at 8:44 PM, Roger Hui 
>> <[email protected]>
>> wrote:
>>> This one's the winner.
>>>
>>> On Sat, Jul 18, 2015 at 5:26 PM, Raul Miller <[email protected]>
>> wrote:
>>>
>>>> row=:_2[\,&,
>>>>
>>>> would have been more concise? Or is that too silly?
>>>>
>>>> --
>>>> Raul
>>>>
>>>> On Sat, Jul 18, 2015 at 8:19 PM, Roger Hui 
>>>> <[email protected]>
>>>> wrote:
>>>>> And another version:
>>>>>
>>>>>    row=: _2&([\)@,&,
>>>>>
>>>>>
>>>>>
>>>>> On Sat, Jul 18, 2015 at 5:17 PM, Henry Rich <[email protected]>
>>>> wrote:
>>>>>
>>>>>> The straightforward version:
>>>>>>
>>>>>>     row =. ,&(,:^:(2 > #@$))
>>>>>>
>>>>>> The shorter but ugly (and slower) version:
>>>>>>
>>>>>>     row =. ;@,&:(<@,:"1)
>>>>>>
>>>>>> The beautiful but slowest version:
>>>>>>
>>>>>>     row =. ,&.:(<"1)
>>>>>>
>>>>>> Henry Rich
>>>>>>
>>>>>> On 7/18/2015 8:04 PM, Kip Murray wrote:
>>>>>>
>>>>>>>      1 2 row 3 4
>>>>>>>    1 2
>>>>>>>    3 4
>>>>>>>       1 2 row 3 4 row 5 6
>>>>>>>    1 2
>>>>>>>    3 4
>>>>>>>    5 6
>>>>>>>       (1 2 row 3 4) row 5 6
>>>>>>>    1 2
>>>>>>>    3 4
>>>>>>>    5 6
>>>>>>>       (1 2 row 3 4) row 5 6 row 7 8
>>>>>>>    1
>>>>>>>
>>>>>>
>> ---------------------------------------------------------------------
>> -
>>>>>> For information about J forums see
>> http://www.jsoftware.com/forums.htm
>>>>>>
>>>>> ------------------------------------------------------------------
>>>>> ---- For information about J forums see
>> http://www.jsoftware.com/forums.htm
>>>> -------------------------------------------------------------------
>>>> --- For information about J forums see 
>>>> http://www.jsoftware.com/forums.htm
>>>>
>>> --------------------------------------------------------------------
>>> -- For information about J forums see 
>>> http://www.jsoftware.com/forums.htm
>> ---------------------------------------------------------------------
>> - For information about J forums see 
>> http://www.jsoftware.com/forums.htm
>>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

----------------------------------------------------------------------
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