This site is supported by donations to The OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A004437 Numbers that are not the sum of 4 distinct squares. 1
 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23, 24, 25, 27, 28, 31, 32, 33, 34, 36, 37, 40, 43, 44, 47, 48, 52, 55, 58, 60, 64, 67, 68, 72, 73, 76, 80, 82, 88, 92, 96, 97, 100, 103, 108, 112 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS It follows from the formula that there are infinitely many integers that cannot be partitioned into a sum of four distinct squares of nonnegative integers and infinitely many that can. Furthermore, the largest odd number that has no such partition is 103, and thereafter the terms satisfy the thirty-first order recurrence relation a(n) = 4a(n-31). - Ant King, Nov 02 2010 LINKS Gordon Pall, On Sums of Squares, The American Mathematical Monthly, Vol. 40, No. 1, (January 1933), pp. 10-18. [From Ant King, Nov 02 2010] FORMULA Let k>=0. Then the only integers that cannot be partitioned into a sum of four distinct squares of nonnegative integers are 4^k * N3, where N3 = (N1 union N2), and N1 and N2 are defined by N1 = {1,3,5,7,9,11,13,15,17,19,23,25,27,31,33,37,43,47,55,67,73,97,103} and N2 = {2,6,10,18,22,34,58,82}, respectively. - Ant King, Nov 02 2010 MATHEMATICA data = Reduce[ w^2 + x^2 + y^2 + z^2 == # && 0 <= w < x < y < z < #, {w, x, y, z}, Integers] & /@ Range; DeleteCases[ Table[If[Head[data[[k]]] === Symbol, k, 0], {k, 1, Length[data]}], 0] (* Ant King, Nov 02 2010 *) CROSSREFS Cf. A001944 (complement). Sequence in context: A022772 A004440 A026495 * A298534 A291442 A236866 Adjacent sequences:  A004434 A004435 A004436 * A004438 A004439 A004440 KEYWORD nonn AUTHOR 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.

Last modified November 12 22:10 EST 2019. Contains 329079 sequences. (Running on oeis4.)