OFFSET
1,1
COMMENTS
Invented by Hugo van der Sanden and Eric Angelini, computed by Mensanator.
REFERENCES
J.-P. Delahaye, La suite du lézard et autres inventions, Pour la Science, No. 353, 2007.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 150 terms from a correspondent using the pseudonym "Mensanator")
Eric Angelini, Thousand Zetas
Eric Angelini, Thousand Zetas [Cached copy, with permission]
PROG
(PARI) A126624(n, mode=0/*+1=print, +2=return list*/, N=9, P=List(N+1))={ while(n--, my(k=P[#P]); bittest(mode, 0)&&print1(k", "); for(i=1, N, while(k++, for(j=1, #P, k%P[j]||next(2)); break)); listput(P, k)); if(bittest(mode, 1), Vec(P), P[#P])} \\ M. F. Hasler, Dec 24 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 09 2007
STATUS
approved