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 A386370 #10 Jul 30 2025 17:49:29
%S A386370 0,1,3,9,15,37,47,117,327,957,2847,8517,25527,33129,33291,46653,66855,
%T A386370 147661,161689,218691,503481,629673,919347,2076921,3007455,7100533,
%U A386370 7931517,9022563,9100641,11272057,11437383,15080379,32539617,37443597,37821775,53419727
%N A386370 Square roots of partial sums of A386369 that are square numbers.
%F A386370 a(n) = sqrt(A386688(n)). - _Paolo Xausa_, Jul 29 2025
%e A386370 A386369(1) + ... + A386369(6) = 3^2, so 3 belongs to this sequence.
%t A386370 Module[{s = 0, a = 0}, Table[If[IntegerQ[#], a = k; #, Nothing] & [Sqrt[s += a]], {k, 10^5}]] (* _Paolo Xausa_, Jul 29 2025, after _Rémy Sigrist_ *)
%o A386370 (PARI) { t = 0; v = 0; for (n = 1, 86903746, t += v; if (issquare(t), print1 (sqrtint(t) ", "); v = n;);); }
%Y A386370 Cf. A386369, A386687, A386688.
%K A386370 nonn
%O A386370 1,3
%A A386370 _Rémy Sigrist_, Jul 19 2025
%E A386370 Offset changed to 1 by _Paolo Xausa_, Jul 29 2025