login
A355115
a(n) = index of n^2 in A355159.
3
1, 3, 5, 9, 16, 24, 29, 37, 44, 53, 66, 80, 94, 108, 121, 135, 155, 178, 197, 217, 235, 256, 285, 314, 337, 364, 388, 416, 452, 488, 522, 554, 584, 619, 660, 704, 743, 780, 815, 854, 901, 946, 990, 1036, 1077, 1120, 1174, 1229, 1283, 1336, 1384, 1434, 1494
OFFSET
1,2
MATHEMATICA
u = Select[Range[5000], N[FractionalPart[#^(3/2)]] < 1/2 &]; (* A355159 *)
Flatten[Position[FractionalPart[Sqrt[u]], 0]] (* A355115 *)
CROSSREFS
Cf. A355159.
Sequence in context: A018260 A334876 A337596 * A023656 A292432 A129973
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jun 26 2022
STATUS
approved