On Fri, Oct 30, 2015 at 2:39 PM, Kacper Gutowski <[email protected]> wrote:
>       i←0 ◊ 4×{⍵+(¯1*i+1)÷¯1+2×i←i+1}⍣1000000⊢0

This is slightly faster and doesn't use global variables:

      ↑{(+/⍵[1],4÷1↓⍵),4 ¯4+1↓⍵}⍣500000⊢0 1 ¯3

Nowhere near “simple and natural,” though.

-k

Reply via email to