Pascal said:
foldl =: 1 : 'm/`((|.m)/)'
*`+ foldl\. >: i.7
209 209 207 69 65 13 7
<<<>>>
%`- foldl\. >: i.7
0.6 1.66667 0.333333 9 _5 _1 7
Nice! I think the foldl definition can be classified "simple" as well!
Skip
On Wed, Feb 24, 2016 at 11:02 AM, Pascal Jasmin <[email protected]> wrote:
> with just 2 gerund items,
>
>
> foldl =: 1 : 'm/`((|.m)/)'
>
>
> *`+ foldl\. >: i.7
> 209 209 207 69 65 13 7
>
>
> ----- Original Message -----
> From: Alex Shroyer <[email protected]>
> To: [email protected]
> Sent: Wednesday, February 24, 2016 9:57 AM
> Subject: Re: [Jprogramming] Am I understanding m/y ?
>
> For Skip's example, a completely literal version:
>
> ((*`+)/)`((+`*)/)\. >:i.7
>
> On Wed, Feb 24, 2016 at 9:25 AM, Brian Schott <[email protected]>
> wrote:
>
>> Pascal,
>>
>> I think your <: is too limiting. But I love your approach.
>>
>> fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. <:) 4 : 'x/ y' every <\.@]) ]
>> fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. i.@#) 4 : 'x/ y' every <\.@]) ]
>>
>> On Tue, Feb 23, 2016 at 10:51 PM, Pascal Jasmin <[email protected]>
>> wrote:
>>
>> > fn =: <@|.@[ (|.each@:|.@:($~ each 1 >. <:) 4 : 'x/ y' every <\.@]) ]
>> >
>> >
>> > %`- fn 1 2 3 4 5 6 7
>> > 0.6 1.66667 0.333333 9 _5 _1 7
>> >
>> >
>> > *`+ fn 1 2 3 4 5 6 7
>> > 209 209 207 69 65 13 7
>> >
>> >
>> >
>> >
>> ----------------------------------------------------------------------
>> 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
