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 A114090 #17 Sep 07 2019 15:21:01
%S A114090 1,8,9,27,28,35,64,65,72,91,125,126,133,152,189,216,217,224,243,280,
%T A114090 341,343,344,351,370,407,468,512,513,520,539,559,576,637,728,729,730,
%U A114090 737,756,793,854,855,945,1000,1001,1008,1027,1064,1072,1125,1216,1241,1331
%N A114090 Sums of 2 distinct nonnegative cubes.
%C A114090 Except for zero, equivalently sums of at most 2 distinct positive cubes.
%H A114090 Robert Israel, <a href="/A114090/b114090.txt">Table of n, a(n) for n = 1..10000</a>
%p A114090 N:= 2000: # to get all terms <= N
%p A114090 S:= select(`<=`,{seq(seq(a^3 + b^3, b = 0 .. a-1),a=0..floor(N^(1/3)))},N):
%p A114090 sort(convert(S,list)); # _Robert Israel_, May 31 2018
%t A114090 Select[Union@ Flatten[Table[i^3 + j^3, {i, 11}, {j, 0, i-1}]], # <= 11^3 &] (* _Giovanni Resta_, May 31 2018 *)
%t A114090 Module[{upto=15},Select[Union[Total/@Subsets[Range[0,upto]^3,{2}]],#<= upto^3&]] (* _Harvey P. Dale_, Sep 07 2019 *)
%Y A114090 Cf. A024670, A003997, A004999, A000578, A001983.
%K A114090 nonn
%O A114090 1,2
%A A114090 Franklin T. Adams-Watters, Sep 14 2006