login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS").
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A025408 Numbers that are the sum of 4 distinct positive cubes in exactly 1 way. 1
100, 161, 198, 217, 224, 252, 289, 308, 315, 350, 369, 376, 379, 406, 413, 416, 432, 435, 442, 477, 496, 503, 533, 540, 548, 559, 568, 585, 587, 594, 604, 611, 624, 631, 646, 650, 665, 672, 685, 692, 702, 709, 711, 728, 737, 748, 756, 763, 765, 793, 800, 802, 819, 821, 828, 854, 861, 863, 864, 880, 882, 883, 889, 890, 917, 919, 920, 926, 927, 945, 946, 954, 973, 980, 981, 988, 1007, 1010, 1017, 1044 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

First differs from A025411 at a(80)=1044. - Ray Chandler, Feb 19 2005.

LINKS

Table of n, a(n) for n=1..80.

MATHEMATICA

Reap[For[n = 1, n <= 1200, n++, pr = Select[ PowersRepresentations[n, 4, 3], Times @@ # != 0 && Length[#] == Length[Union[#]] &]; If[pr != {} && Length[pr] == 1, Print[n, pr]; Sow[n]]]][[2, 1]] (* Jean-Fran├žois Alcover, Jul 31 2013 *)

CROSSREFS

Sequence in context: A004263 A004264 A025411 * A068805 A231088 A104023

Adjacent sequences:  A025405 A025406 A025407 * A025409 A025410 A025411

KEYWORD

nonn

AUTHOR

David W. Wilson

EXTENSIONS

More terms from Ray Chandler, Feb 19 2005.

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 15 20:10 EST 2018. Contains 318154 sequences. (Running on oeis4.)