A025305 Numbers that are the sum of 2 distinct nonzero squares in exactly 4 ways.

1105, 1625, 1885, 2125, 2210, 2405, 2465, 2665, 3145, 3250, 3445, 3485, 3625, 3770, 3965, 4225, 4250, 4420, 4505, 4625, 4745, 4810, 4930, 5125, 5185, 5330, 5365, 5785, 5945, 6205, 6290, 6305, 6409, 6500, 6565, 6625, 6890, 6970, 7085, 7225, 7250, 7345

Offset

1,1

Comments

8450 is the first term in here but not in A025287 [R. Chandler, seqfan list, May 28 2008] [From R. J. Mathar, Nov 30 2008]

Links

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

Index entries for sequences related to sums of squares

Mathematica

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

Crossrefs

Sequence in context: A025295 A025314 A025287 * A052155 A097102 A281877

Adjacent sequences: A025302 A025303 A025304 * A025306 A025307 A025308

Keyword

nonn

Author

David W. Wilson

Status

approved