One can get the last row of
(3 (0 1 1 1 0 1 1 0 {~ #.)\ 0 0 , ] , 0:)^:(<11) 1
1 0 0 0 0 0 0 0 0 0 0
1 1 0 0 0 0 0 0 0 0 0
1 1 1 0 0 0 0 0 0 0 0
1 1 0 1 0 0 0 0 0 0 0
1 1 1 1 1 0 0 0 0 0 0
1 1 0 0 0 1 0 0 0 0 0
1 1 1 0 0 1 1 0 0 0 0
1 1 0 1 0 1 1 1 0 0 0
1 1 1 1 1 1 1 0 1 0 0
1 1 0 0 0 0 0 1 1 1 0
1 1 1 0 0 0 0 1 1 0 1
as follows,
(3 (0 1 1 1 0 1 1 0 {~ #.)\ 0 0 , ] , 0:)^:10 (1)
1 1 1 0 0 0 0 1 1 0 1
Likewise,
NB. WARNING: save your work!
(3 (0 1 1 1 0 1 1 0 {~ #.)\ 0 0 , ] , 0:)^:_ (1)
will keep computing, what is meant to be computing, presumably until it
runs out of resources or the process is killed by external means.
Similarly, one can get a list that includes the relevant bits of the last
row of
{&0 1 1 1 0 1 1 0@#.\~&3^:(<11) (,1,])(0#~20)
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 0 0 1 1 1 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 0 0 1 1 0 1 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 0 0 1 1 1 1 1 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
0 0 1 1 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
1 1 1 0 0 0 0 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0
as follows,
{&0 1 1 1 0 1 1 0@#.\~&3^:10 (,1,])(0#~20)
1 1 1 0 0 0 0 1 1 0 1 0 0 0 0 0 0 0 0 0 0
and, in general, {&0 1 1 1 0 1 1 0@#.\~&3^:N (,1,])(0#~ 2 * N)... Alas,
{&0 1 1 1 0 1 1 0@#.\~&3^:_ (,1,])(0#~ 2 * _)
|domain error
| {&0 1 1 1 0 1 1 0@#.\~&3^:_(,1,])(0 #~2*_)
Unlike (3 (0 1 1 1 0 1 1 0 {~ #.)\ 0 0 , ] , 0:)^:_ (1), the process cannot
start.
The question is: what is an alternative way to launch {&0 1 1 1 0 1 1
0@#.\~&3^:_
successfully?
On Fri, Feb 11, 2022 at 7:00 PM Elijah Stone <elro...@elronnd.net> wrote:
>
> On Fri, 11 Feb 2022, Jose Mario Quintana wrote:
>
> > However, I could not figure out how to use your version to reproduce the
> > usual example. Can you show us how to do it?
>
> {&0 1 1 1 0 1 1 0@#.\~&3^:(<11) (,1,])(0#~20)
> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 0 0 1 1 1 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 0 0 1 1 0 1 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 0 0 1 1 1 1 1 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 0 0 1 1 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
> 1 1 1 0 0 0 0 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0
>
> The pattern slides to the left due to padding (because \ lops off the ends
> at each iteration) but is definitely there.
>
> -E
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
