A025311 Numbers that are the sum of 2 distinct nonzero squares in exactly 10 ways.

138125, 235625, 276250, 300625, 308125, 333125, 393125, 430625, 435625, 471250, 495625, 552500, 563125, 593125, 601250, 616250, 648125, 666250, 670625, 723125, 743125, 775625, 786250, 788125, 820625, 861250, 871250, 885625, 918125, 942500

Offset: 1

Author

David W. Wilson

Keywords

• nonn

Comments

Where does this first differ from A025293? - R. J. Mathar, Jun 24 2025

Links

• Donovan Johnson, Table of n, a(n) for n = 1..1000
• Index entries for sequences related to sums of squares

Crossrefs

Cf. A025293.

Programs

Mathematica

nn = 942500; t = Table[0, {nn}]; lim = Floor[Sqrt[nn - 1]]; Do[num = i^2 + j^2; If[num <= nn, t[[num]]++], {i, lim}, {j, i - 1}]; Flatten[Position[t, 10]] (* T. D. Noe, Apr 07 2011 *)