A001671 Powers of e rounded up.

1, 3, 8, 21, 55, 149, 404, 1097, 2981, 8104, 22027, 59875, 162755, 442414, 1202605, 3269018, 8886111, 24154953, 65659970, 178482301, 485165196, 1318815735, 3584912847, 9744803447, 26489122130, 72004899338, 195729609429, 532048240602, 1446257064292, 3931334297145, 10686474581525

Offset

0,2

Links

T. D. Noe, Table of n, a(n) for n = 0..500

Mathematica

Table[Ceiling[E^n], {n, 0, 50}] (* T. D. Noe, Aug 09 2012 *)

Prog

(PARI) apply( A001671(n)=exp(n)\1+!!n, [0..30]) \\ An error message will say so if default(realprecision) must be increased, for large n. - M. F. Hasler, May 27 2018

Crossrefs

Cf. A000149 (floor(e^n)), A000227 (round(e^n)).

Sequence in context: A001906 A278613 A072632 * A360054 A309226 A278616

Adjacent sequences: A001668 A001669 A001670 * A001672 A001673 A001674

Keyword

nonn

Author

N. J. A. Sloane

Status

approved