A032739 a(n) = floor( (Pi/e)^n ).
1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 10, 11, 13, 15, 18, 20, 24, 27, 32, 37, 43, 49, 57, 66, 76, 88, 102, 118, 137, 158, 183, 211, 244, 282, 326, 377, 436, 504, 582, 673, 778, 899, 1040, 1202, 1389, 1605, 1855, 2144, 2478, 2864, 3310, 3826, 4421, 5110, 5906
Offset: 0
Crossrefs
Cf. A061382 (Pi/e).
Programs
-
Mathematica
Floor[(Pi/E)^Range[0,60]] (* Harvey P. Dale, Sep 30 2011 *)
-
PARI
a(n) = floor( (Pi/exp(1))^n ); \\ Michel Marcus, Jun 09 2020
Extensions
a(0)=1 prepended by Georg Fischer, Jun 09 2020