cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A213519 Numbers that are the sum of cubes of distinct primes.

This page as a plain text file.
%I A213519 #10 Sep 18 2017 02:58:19
%S A213519 0,8,27,35,125,133,152,160,343,351,370,378,468,476,495,503,1331,1339,
%T A213519 1358,1366,1456,1464,1483,1491,1674,1682,1701,1709,1799,1807,1826,
%U A213519 1834,2197,2205,2224,2232,2322,2330,2349,2357,2540,2548,2567,2575,2665,2673,2692
%N A213519 Numbers that are the sum of cubes of distinct primes.
%C A213519 The complement of this sequence is conjectured to have 483370 terms, the last one being 1866000 = A121571(3).
%C A213519 This conjecture was proved by Fuller and Nichols (see the link). - _Robert Nichols_, Sep 17 2017
%H A213519 T. D. Noe, <a href="/A213519/b213519.txt">Table of n, a(n) for n = 1..10000</a>
%H A213519 C. Fuller and R. H. Nichols Jr., <a href="https://cs.uwaterloo.ca/journals/JIS/VOL18/Fuller/fuller2.html">Generalized Anti-Waring Numbers</a>, J. Int. Seq. 18, 2015, #15.10.5.
%t A213519 lim = PrimePi[17]; s = {0}; Do[p = Prime[n]; s = Union[s, s + p^3], {n, lim}]; Select[s, # <= Prime[lim]^3 &]
%Y A213519 Cf. A121571.
%K A213519 nonn,easy
%O A213519 1,2
%A A213519 _T. D. Noe_, Jul 10 2012