A037446 Floor of (n/e)^(n/e).

0, 0, 1, 1, 3, 5, 11, 23, 52, 120, 286, 702, 1779, 4636, 12398, 33981, 95303, 273134, 798957, 2382777, 7238273, 22376763, 70343548, 224698356, 728843771, 2399172217, 8010042859, 27109839313, 92966452913, 322876110331

Offset

1,5

Links

Table of n, a(n) for n=1..30.

Mathematica

ne[n_]:=Module[{c=n/E}, Floor[c^c]]; Array[ne, 30] (* Harvey P. Dale, Nov 02 2011 *)

Prog

(PARI) v=[]; for(n=1, 50, v=concat(v, floor((n/exp(1))^(n/exp(1))))); v

Crossrefs

Sequence in context: A335098 A018113 A113281 * A113151 A269964 A305412

Adjacent sequences: A037443 A037444 A037445 * A037447 A037448 A037449

Keyword

easy,nonn

Author

Jason Earls, Jun 30 2001

Status

approved