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.

A332107 Numbers that are not the sum of seven (7) positive cubes.

This page as a plain text file.
%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