A straightforward variation: (;q:)"0}.10x&#.\19#1
________________________________________ From: [email protected] [[email protected]] On Behalf Of R.E. Boss [[email protected]] Sent: Friday, November 11, 2011 12:25 PM To: 'Programming forum' Subject: Re: [Jprogramming] 11:11:11 repunits (;q:)"0}.+/\10^i.19x R.E. Boss -----Oorspronkelijk bericht----- Van: [email protected] [mailto:[email protected]] Namens R.E. Boss Verzonden: vrijdag 11 november 2011 18:18 Aan: 'Programming forum' Onderwerp: Re: [Jprogramming] 11:11:11 repunits (,.q:)}.+/\10^i.19x R.E. Boss -----Oorspronkelijk bericht----- Van: [email protected] [mailto:[email protected]] Namens John Baker Verzonden: vrijdag 11 november 2011 18:07 Aan: Programming forum Onderwerp: [Jprogramming] 11:11:11 repunits 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 ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
