login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A015557 a(n) = ceiling((n/e)^n). 1
1, 1, 1, 2, 5, 22, 116, 751, 5629, 47812, 454000, 4765191, 54782415, 684597511, 9239952803, 133952757202, 2075907567337, 34247231626810, 599244998013964, 11084682598687313, 216127622080213322 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Iain Fox, Table of n, a(n) for n = 0..450 (terms 0..200 from Vincenzo Librandi)

MAPLE

Digits := 64: E:=exp(1); f := n->ceil(evalf((n/E)^n));

MATHEMATICA

Join[{1}, Table[Ceiling[(n/E)^n], {n, 20}]] (* Harvey P. Dale, Aug 09 2014 *)

PROG

(MAGMA) [Ceiling((n/Exp(1))^n): n in [0..20]]; // Vincenzo Librandi, Aug 10 2014

(PARI) for(n=0, 20, print1(ceil((n^n*exp(-n))), ", ")) \\ G. C. Greubel, Dec 30 2017

CROSSREFS

Sequence in context: A215096 A115602 A115601 * A066305 A020093 A111542

Adjacent sequences:  A015554 A015555 A015556 * A015558 A015559 A015560

KEYWORD

nonn

AUTHOR

N. J. A. Sloane

EXTENSIONS

Typo in Mathematica program fixed by Vincenzo Librandi, Aug 10 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 25 11:59 EDT 2019. Contains 324352 sequences. (Running on oeis4.)