A386688 Squares in A386687.

0, 1, 9, 81, 225, 1369, 2209, 13689, 106929, 915849, 8105409, 72539289, 651627729, 1097530641, 1108290681, 2176502409, 4469591025, 21803770921, 26143332721, 47825753481, 253493117361, 396488086929, 845198906409, 4313600840241, 9044785577025, 50417568884089, 62908961921289

Offset: 1

Author

Paolo Xausa, Jul 29 2025

Keywords

• nonn

Crossrefs

Cf. A386369, A386370.

Intersection of A000290 and A386687.

Programs

Mathematica

Module[{s = 0, a = 0}, Table[If[IntegerQ[Sqrt[s += a]], a = k; s, Nothing], {k, 10^5}]]

Formula

a(n) = A386370(n)^2.