This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A355115 #12 Jul 07 2022 02:20:54 %S A355115 1,3,5,9,16,24,29,37,44,53,66,80,94,108,121,135,155,178,197,217,235, %T A355115 256,285,314,337,364,388,416,452,488,522,554,584,619,660,704,743,780, %U A355115 815,854,901,946,990,1036,1077,1120,1174,1229,1283,1336,1384,1434,1494 %N A355115 a(n) = index of n^2 in A355159. %t A355115 u = Select[Range[5000], N[FractionalPart[#^(3/2)]] < 1/2 &]; (* A355159 *) %t A355115 Flatten[Position[FractionalPart[Sqrt[u]], 0]] (* A355115 *) %Y A355115 Cf. A355159. %K A355115 nonn,easy %O A355115 1,2 %A A355115 _Clark Kimberling_, Jun 26 2022