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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A224982 Numbers that are the sum of exactly 7 distinct nonzero squares. 7

%I

%S 140,155,168,172,179,185,188,191,195,196,200,203,204,205,211,212,215,

%T 217,219,220,224,225,227,230,231,232,233,235,236,239,240,243,244,245,

%U 246,247,248,251,252,254,256,257,259,260,263,264,265,267,268,269,270,271

%N Numbers that are the sum of exactly 7 distinct nonzero squares.

%H Reinhard Zumkeller, <a href="/A224982/b224982.txt">Table of n, a(n) for n = 1..1000</a>

%H Paul T. Bateman, Adolf J. Hildebrand, and George B. Purdy, <a href="http://matwbn.icm.edu.pl/ksiazki/aa/aa67/aa6745.pdf">Sums of distinct squares</a>, Acta Arithmetica 67 (1994), pp. 349-380.

%H <a href="/index/Su#ssq">Index entries for sequences related to sums of squares</a>

%e a(1) = 1 + 4 + 9 + 16 + 25 + 36 + 49 = 140 = A000330(7);

%e a(2) = 1 + 4 + 9 + 16 + 25 + 36 + 64 = 155;

%e a(3) = 1 + 4 + 9 + 16 + 25 + 49 + 64 = 168;

%e a(4) = 1 + 4 + 9 + 16 + 25 + 36 + 81 = 172;

%e a(5) = 1 + 4 + 9 + 16 + 36 + 49 + 64 = 179.

%o (Haskell)

%o a224982 n = a224982_list !! (n-1)

%o a224982_list = filter (p 7 $ tail a000290_list) [1..] where

%o p k (q:qs) m = k == 0 && m == 0 ||

%o q <= m && k >= 0 && (p (k - 1) qs (m - q) || p k qs m)

%Y Cf. A003995, A004431, A004432, A004433, A004434, A224981, A224983, A000290.

%K nonn

%O 1,1

%A _Reinhard Zumkeller_, Apr 22 2013

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 16 17:25 EST 2019. Contains 329201 sequences. (Running on oeis4.)