login
A092247
a(0)=1, a(n+1)=ceiling((1+1/n)^n*a(n)).
1
1, 2, 5, 12, 30, 75, 190, 484, 1242, 3206, 8316, 21657, 56591, 148303, 389615, 1025810, 2706014, 7150411, 18923033, 50146688, 133054093, 353426693, 939750924, 2501100209, 6662258807, 17760491578, 47381172431, 126488492584
OFFSET
0,2
LINKS
FORMULA
a(n) is asymptotic to c*exp(n)/sqrt(n) where c=1.261(6)...
c = 1.2617447588213627326364194241966529846376230854758648215934468766256494736... - Vaclav Kotesovec, Feb 15 2019
MATHEMATICA
nxt[{n_, a_}]:={n+1, Ceiling[(1+1/n)^n*a]}; Transpose[NestList[nxt, {1, 1}, 30]][[2]] (* Harvey P. Dale, Oct 11 2012 *)
PROG
(PARI) a(n)=if(n<1, 1, ceil((1+1/n)^n*a(n)))
CROSSREFS
Sequence in context: A140832 A326793 A026580 * A331233 A108360 A051163
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Feb 18 2004
STATUS
approved