A355115 a(n) = index of n^2 in A355159.

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

Author

Clark Kimberling, Jun 26 2022

Keywords

• nonn
• easy

Crossrefs

Cf. A355159.

Programs

Mathematica

u = Select[Range[5000], N[FractionalPart[#^(3/2)]] < 1/2 &];  (* A355159 *)
Flatten[Position[FractionalPart[Sqrt[u]], 0]]  (* A355115 *)