login
A293413
Least integer k such that k/n^2 > e.
3
0, 3, 11, 25, 44, 68, 98, 134, 174, 221, 272, 329, 392, 460, 533, 612, 696, 786, 881, 982, 1088, 1199, 1316, 1438, 1566, 1699, 1838, 1982, 2132, 2287, 2447, 2613, 2784, 2961, 3143, 3330, 3523, 3722, 3926, 4135, 4350, 4570, 4796, 5027, 5263, 5505, 5752, 6005
OFFSET
0,2
LINKS
FORMULA
a(n) = ceiling(e*n^2).
a(n) = A293412(n) + 1 for n > 0.
MATHEMATICA
z = 120; r = E;
Table[Floor[r*n^2], {n, 0, z}]; (* A293412 *)
Table[Ceiling[r*n^2], {n, 0, z}]; (* A293413 *)
Table[Round[r*n^2], {n, 0, z}]; (* A293414 *)
Ceiling[E Range[0, 50]^2] (* Harvey P. Dale, May 13 2019 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Oct 12 2017
STATUS
approved