login
A024577
a(n) = [ n/{n/e} ], {x} := x - [ x ].
2
2, 2, 28, 8, 5, 28, 12, 8, 28, 14, 235, 28, 16, 93, 28, 18, 66, 28, 19, 55, 28, 235, 49, 28, 126, 46, 28, 93, 43, 824, 76, 41, 235, 66, 39, 147, 60, 38, 112, 55, 493, 93, 52, 235, 81, 49, 161, 72, 1877, 126, 66, 400, 106, 62, 235, 93, 58, 172, 83, 824, 138, 76, 357, 117, 71, 235, 103
OFFSET
1,1
LINKS
MATHEMATICA
a[n_] := Floor[n/FractionalPart[n/E]]; Table[a[n], {n, 70}] (* Clark Kimberling, Aug 17 2012 *)
CROSSREFS
Cf. A024578.
Sequence in context: A094347 A236286 A288208 * A121222 A125067 A369755
KEYWORD
nonn
STATUS
approved