|
%I #17 May 28 2018 15:35:59
%S 1,3,8,21,55,149,404,1097,2981,8104,22027,59875,162755,442414,1202605,
%T 3269018,8886111,24154953,65659970,178482301,485165196,1318815735,
%U 3584912847,9744803447,26489122130,72004899338,195729609429,532048240602,1446257064292,3931334297145,10686474581525
%N Powers of e rounded up.
%H T. D. Noe, <a href="/A001671/b001671.txt">Table of n, a(n) for n = 0..500</a>
%t Table[Ceiling[E^n], {n, 0, 50}] (* _T. D. Noe_, Aug 09 2012 *)
%o (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
%Y Cf. A000149 (floor(e^n)), A000227 (round(e^n)).
%K nonn
%O 0,2
%A _N. J. A. Sloane_
|
