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.
%I A332107 #26 Apr 18 2024 13:48:28 %S A332107 1,2,3,4,5,6,8,9,10,11,12,13,15,16,17,18,19,20,22,23,24,25,26,27,29, %T A332107 30,31,32,34,36,37,38,39,41,43,44,45,46,48,50,51,52,53,55,57,58,60,62, %U A332107 63,64,65,67,69,71,72,74,76,78,79,81,82,83,86,88,89,90,93,95,97,100 %N A332107 Numbers that are not the sum of seven (7) positive cubes. %C A332107 The sequence is finite, with last term a(208) = 2408. %H A332107 M. F. Hasler, <a href="/A332107/b332107.txt">Table of n, a(n) for n = 1..208</a> (full sequence). %H A332107 Brennan Benfield and Oliver Lippard, <a href="https://arxiv.org/abs/2404.08193">Integers that are not the sum of positive powers</a>, arXiv:2404.08193 [math.NT], 2024. See p. 4. %e A332107 The smallest positive numbers not in the sequence are 7 = 7 * 1^3, 14 = 2^3 + 6 * 1^3, 21 = 2 * 2^3 + 5 * 1^3, ... %e A332107 The last 10 terms of the sequence are a(199 .. 208) = {1078, 1094, 1364, 1409, 1579, 1582, 1796, 2030, 2382, 2408}. %t A332107 Select[Range[100], (pr = PowersRepresentations[#, 7, 3][[;; , 1]]) == {} || Max[pr] == 0 &] (* _Amiram Eldar_, Aug 24 2020 *) %o A332107 (PARI) A332107=setminus([1..2440],A003330_upto(2444)) %Y A332107 Complement of A003330. %Y A332107 Cf. A332108, A332109, A332110, A332111: analog for eight, ..., eleven cubes. %K A332107 nonn,fini,full %O A332107 1,2 %A A332107 _M. F. Hasler_, Aug 24 2020