|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = ceiling(e*n^2).
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|