login
A024572
a(n) = [ n/{n*e} ], {x} := x - [ x ].
1
1, 4, 19, 4, 8, 19, 250, 10, 19, 54, 12, 19, 38, 250, 19, 32, 80, 19, 29, 54, 250, 27, 44, 100, 26, 38, 68, 250, 34, 54, 116, 32, 46, 80, 250, 41, 64, 128, 3002, 54, 91, 250, 48, 72, 139, 1122, 61, 100, 250, 54, 80, 148, 768, 68, 108, 250, 60, 87, 155, 619, 74, 116, 250, 65, 94, 162, 536
OFFSET
1,2
LINKS
MATHEMATICA
Table[Floor[1/FractionalPart[n*E]], {n, 100}] (* Clark Kimberling, Aug 15 2012 *)
CROSSREFS
Cf. A024573.
Sequence in context: A069874 A222323 A012496 * A357818 A009267 A009275
KEYWORD
nonn
STATUS
approved