foo=: <^:{./.~ [: +/\ 0,2 ~:/\ ]
--
Raul
On Thu, Nov 24, 2011 at 9:27 AM, R.E. Boss <[email protected]> wrote:
> Given an array of positive integers A starting with 1 and such that 2 >
> >./
> 2 -~/\ A
>
> (a next atom in A is at most 1 larger than the preceding one).
>
>
>
> Now I want the items to be boxed according to this example
>
>
>
> foo 1 1 2 2 3 3 4 2 3 4 4 1 2 2 2 1
>
> +---+---------------------------+-+-------+-+
>
> |1 1|+---+---------+-+---------+|1|+-----+|1|
>
> | ||2 2|+---+---+|2|+-+-----+|| ||2 2 2|| |
>
> | || ||3 3|+-+|| ||3|+---+||| |+-----+| |
>
> | || || ||4||| || ||4 4|||| | | |
>
> | || || |+-+|| || |+---+||| | | |
>
> | || |+---+---+| |+-+-----+|| | | |
>
> | |+---+---------+-+---------+| | | |
>
> +---+---------------------------+-+-------+-+
>
>
>
>
>
> Any suggestions for foo?
>
>
>
>
>
> R.E. Boss
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm