The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A003999 Sum of distinct nonzero 4th powers. 4
 1, 16, 17, 81, 82, 97, 98, 256, 257, 272, 273, 337, 338, 353, 354, 625, 626, 641, 642, 706, 707, 722, 723, 881, 882, 897, 898, 962, 963, 978, 979, 1296, 1297, 1312, 1313, 1377, 1378, 1393, 1394, 1552, 1553, 1568, 1569, 1633, 1634, 1649, 1650, 1921, 1922 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS 5134240 is the largest positive integer not in this sequence - Jud McCranie REFERENCES The Penguin Dictionary of Curious and Interesting Numbers, David Wells, entry 5134240. LINKS Donovan Johnson, Table of n, a(n) for n = 1..10000 Index entries for linear recurrences with constant coefficients, signature (2,-1). FORMULA For n > 4244664, a(n) = n + 889576. - Charles R Greathouse IV, Sep 02 2011 MAPLE (1+x)*(1+x^16)*(1+x^81)*(1+x^256)*(1+x^625)*(1+x^1296)*(1+x^2401)*(1+x^4096)*(1+x^6561)*(1+x^10000) MATHEMATICA max = 2000; f[x_] := Product[1 + x^(k^4), {k, 1, 10}]; Exponent[#, x]& /@ List @@ Normal[Series[f[x], {x, 0, max}]] // Rest (* Jean-François Alcover, Nov 09 2012, after Charles R Greathouse IV *) PROG (PARI) upto(lim)={     lim\=1;     my(v=List(), P=prod(n=1, lim^(1/4), 1+x^(n^4), 1+O(x^(lim+1))));     for(n=1, lim, if(polcoeff(P, n), listput(v, n)));     Vec(v) }; \\ Charles R Greathouse IV, Sep 02 2011 CROSSREFS Cf. A046039 (complement). Cf. A003997, A194768, A194769 (analog for 3rd, 5th and 6th powers). Sequence in context: A041530 A041528 A112012 * A217844 A041532 A300133 Adjacent sequences:  A003996 A003997 A003998 * A004000 A004001 A004002 KEYWORD nonn,easy 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 October 25 17:50 EDT 2020. Contains 338012 sequences. (Running on oeis4.)