OFFSET
1,2
PROG
(PARI)v=vector(100):v[1]=1:print1("1, "):for(k=2, 100, p=1:for(l=1, k-1, p=p*v[l]):print1(v[k]=ceil((k^k+1)/p)", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Aug 31 2002
EXTENSIONS
More terms from Ralf Stephan, Mar 20 2003
STATUS
approved