A025304 Numbers that are the sum of 2 distinct nonzero squares in exactly 3 ways.

325, 425, 650, 725, 845, 850, 925, 1025, 1300, 1325, 1445, 1450, 1525, 1690, 1700, 1825, 1850, 2050, 2225, 2425, 2525, 2600, 2650, 2725, 2825, 2873, 2890, 2900, 2925, 3050, 3125, 3380, 3400, 3425, 3650, 3700, 3725, 3757, 3825, 3925, 4100, 4205, 4325

Offset

1,1

Links

Donovan Johnson, Table of n, a(n) for n = 1..1000

Index entries for sequences related to sums of squares

Mathematica

nn = 4325; 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, 3]] (* T. D. Noe, Apr 07 2011 *)

Crossrefs

Sequence in context: A025294 A025313 A025286 * A351801 A160580 A158272

Adjacent sequences: A025301 A025302 A025303 * A025305 A025306 A025307

Keyword

nonn

Author

David W. Wilson

Status

approved