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 A057903 #12 Feb 16 2025 08:32:43
%S A057903 1,3,4,5,6,7,8,10,11,12,13,14,15,17,18,19,20,21,22,23,24,25,26,27,29,
%T A057903 30,31,32,33,34,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,
%U A057903 55,56,57,58,59,60,61,62,63,64,66,67,68,69,70,71,73,74,75,76,77,78,79
%N A057903 Positive integers that are not the sum of exactly two positive cubes.
%C A057903 Includes the cubes themselves (since a^3 = b^3 + c^3 has no solution, by the exponent 3 case of Fermat's Last Theorem), so is different from A022555.
%H A057903 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/CubicNumber.html">Cubic number.</a>
%F A057903 Equals A022555 union A000578 - {0}.
%t A057903 pr[n_] := Select[ PowersRepresentations[n, 2, 3], FreeQ[#, 0]& ]; Select[ Range[80], pr[#] == {} &] (* _Jean-François Alcover_, Nov 08 2012 *)
%Y A057903 Cf. A022555, A000578.
%K A057903 nonn
%O A057903 1,2
%A A057903 _Eric W. Weisstein_
%E A057903 Edited by _N. J. A. Sloane_, Sep 28 2007