Using Hauke's creation of 

   m=:  <\ *: >:i.9  NB. I used 9 instead of 15 for display purposes on the 
email

I would not bother using all the character conversions, but would stay with 
integers and use 10&#.^:_1 to take the digits apart. Some boxing and a Raze (;) 
is required to avoid padding.

   explode=. [: ; 10&#.^:_1 each
    explode each m
┌─┬───┬─────┬─────────┬─────────────┬─────────────────┬─────────────────────┬─────────────────────────┬─────────────────────────────┐
│1│1 4│1 4 9│1 4 9 1 6│1 4 9 1 6 2 5│1 4 9 1 6 2 5 3 6│1 4 9 1 6 2 5 3 6 4 9│1 
4 9 1 6 2 5 3 6 4 9 6 4│1 4 9 1 6 2 5 3 6 4 9 6 4 8 1│
└─┴───┴─────┴─────────┴─────────────┴─────────────────┴─────────────────────┴─────────────────────────┴─────────────────────────────┘

Cheers bob


> On Aug 21, 2020, at 10:56, Hauke Rehr <[email protected]> wrote:
> 
> I’d start with something like
> <\ *: >:i.15
> 
> 
> Am 21.08.20 um 19:46 schrieb Skip Cave:
>> Also, is there a better way to generate increasing length sets of a vector?
> 
> -- 
> ----------------------
> mail written using NEO
> neo-layout.org
> 
> ----------------------------------------------------------------------
> 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