|
|
A293502
|
|
Greatest integer k such that k/n^2 < sqrt(2).
|
|
3
|
|
|
0, 1, 5, 12, 22, 35, 50, 69, 90, 114, 141, 171, 203, 239, 277, 318, 362, 408, 458, 510, 565, 623, 684, 748, 814, 883, 956, 1030, 1108, 1189, 1272, 1359, 1448, 1540, 1634, 1732, 1832, 1936, 2042, 2151, 2262, 2377, 2494, 2614, 2737, 2863, 2992, 3123, 3258
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = floor(r*n^2), where r = sqrt(2).
|
|
MATHEMATICA
|
z = 120; r = Sqrt[2];
Table[Floor[r*n^2], {n, 0, z}]; (* A293502 *)
Table[Ceiling[r*n^2], {n, 0, z}]; (* A293503 *)
Table[Round[r*n^2], {n, 0, z}]; (* A293504 *)
|
|
PROG
|
(PARI) vector(100, n, n--; floor(n^2*sqrt(2))) \\ G. C. Greubel, Aug 16 2018
(Magma) [Floor(n^2*Sqrt(2)): n in [0..100]]; // G. C. Greubel, Aug 16 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|