login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A114090 Sums of 2 distinct nonnegative cubes. 2
1, 8, 9, 27, 28, 35, 64, 65, 72, 91, 125, 126, 133, 152, 189, 216, 217, 224, 243, 280, 341, 343, 344, 351, 370, 407, 468, 512, 513, 520, 539, 559, 576, 637, 728, 729, 730, 737, 756, 793, 854, 855, 945, 1000, 1001, 1008, 1027, 1064, 1072, 1125, 1216, 1241, 1331 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
Except for zero, equivalently sums of at most 2 distinct positive cubes.
LINKS
MAPLE
N:= 2000: # to get all terms <= N
S:= select(`<=`, {seq(seq(a^3 + b^3, b = 0 .. a-1), a=0..floor(N^(1/3)))}, N):
sort(convert(S, list)); # Robert Israel, May 31 2018
MATHEMATICA
Select[Union@ Flatten[Table[i^3 + j^3, {i, 11}, {j, 0, i-1}]], # <= 11^3 &] (* Giovanni Resta, May 31 2018 *)
Module[{upto=15}, Select[Union[Total/@Subsets[Range[0, upto]^3, {2}]], #<= upto^3&]] (* Harvey P. Dale, Sep 07 2019 *)
CROSSREFS
Sequence in context: A305336 A042311 A003997 * A351959 A217843 A139753
KEYWORD
nonn
AUTHOR
Franklin T. Adams-Watters, Sep 14 2006
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 17:25 EDT 2024. Contains 371254 sequences. (Running on oeis4.)