login
A014213
Floor((e/2)^n).
1
1, 1, 1, 2, 3, 4, 6, 8, 11, 15, 21, 29, 39, 54, 73, 99, 135, 184, 250, 340, 462, 628, 854, 1161, 1578, 2145, 2916, 3964, 5387, 7322, 9952, 13526, 18384, 24987, 33961, 46159, 62736, 85267, 115891, 157512, 214081, 290967, 395465, 537493
OFFSET
0,4
MATHEMATICA
f[n_] := Floor[(E/2)^n]; Array[f, 44, 0] (* Robert G. Wilson v, Oct 23 2013 *)
PROG
(PARI) a(n) = floor((exp(1)/2)^n); \\ Michel Marcus, Oct 24 2013
(PARI) a(n)=exp(n)>>n\1 \\ Charles R Greathouse IV, Oct 24 2013
CROSSREFS
Sequence in context: A374760 A095814 A006683 * A341218 A064323 A003411
KEYWORD
nonn
STATUS
approved