login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A025316 Numbers that are the sum of 2 distinct nonzero squares in 6 or more ways. 5
5525, 9425, 11050, 12025, 12325, 13325, 14365, 15725, 17225, 17425, 18785, 18850, 19825, 21125, 22100, 22525, 23725, 24050, 24505, 24650, 25925, 26650, 26825, 27625, 28730, 28925, 29725, 31025, 31265, 31450, 31525, 32045, 32825, 34450, 34645, 34850 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Subsequence of A025297. But sequences A025316 and A025297 are different. 2*5^10 = 19531250 = 3125^2 + 3125^2 (not distinct squares) = 2879^2 + 3353^2 = 2125^2 + 3875^2 = 1825^2 + 4025^2 = 955^2 + 4315^2 = 625^2 + 4375^2 is not in A025316. - Vaclav Kotesovec, Feb 27 2016

Numbers in A025297 but not in A025316 are exactly those numbers of the form 2*p_1^(2*a_1)*p_2^(2*a_2)*...*p_m^(2*a_m)*q^10 where p_i are primes of the form 4k+3 and q is a prime of the form 4k+1.  Thus 2*5^10 is the smallest term in A025297 that is not in A025316. - Chai Wah Wu, Feb 27 2016

LINKS

Chai Wah Wu, Table of n, a(n) for n = 1..10000

Index entries for sequences related to sums of squares

MATHEMATICA

nn = 34850; 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, _?(# >= 6 &)]] (* T. D. Noe, Apr 07 2011 *)

CROSSREFS

Sequence in context: A025315 A097103 A025297 * A025289 A025307 A068269

Adjacent sequences:  A025313 A025314 A025315 * A025317 A025318 A025319

KEYWORD

nonn

AUTHOR

David W. Wilson

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 21 11:35 EST 2019. Contains 329370 sequences. (Running on oeis4.)