I do not know if this is elegant, but:
   (; q:)@p.&10x@#&1@+&2 i. 19

-- 
Raul

On Fri, Nov 11, 2011 at 12:07 PM, John Baker <[email protected]> wrote:
> Today's date 11:11:11 is generating some interesting internet items. I saw
> a cute blog posting about "repunits"
>
> http://mathlesstraveled.com/2011/11/11/fun-with-repunit-divisors/
>
> The following j expressions generate the table shown in the blog posting.
>  I couldn't come up with anything more elegant.
>
> repunits=. 'x' ,~&.> (2 + i. 19) #&.> '1'
> repunits ,. q:@". &.> repunits
>
> --
> John D. Baker
> [email protected]
> ----------------------------------------------------------------------
> 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