f=: 13 :',.-/\x,(<:y)$2 _1'
   100 f 20
100
 98
 97
 95
 94
 92
 91
 89
 88
 86
 85
 83
 82
 80
 79
 77
 76
 74
 73
 71

Linda

-----Original Message-----
From: [email protected] 
[mailto:[email protected]] On Behalf Of Brian Schott
Sent: Monday, July 13, 2015 11:56 PM
To: Programming forum
Subject: Re: [Jprogramming] Powerize a while.

David and Pascal,

Yes insert produces a very concise solution that uses J's strength, too.
​Thank you,​

On Mon, Jul 13, 2015 at 7:17 PM, David Lambert <[email protected]> wrote:

> Tossing insert into the pot of stone soup:
>
>    ((-~ {.) , ])/1 2 1 2 100   NB. ,.@:|.@:(expression)
> 94 95 97 98 100
>
>
>
>
>> --
(B=)
----------------------------------------------------------------------
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