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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A051347 Numbers that are the sum of two (possibly negative) cubes in at least 2 ways. 4
91, 152, 189, 217, 513, 721, 728, 999, 1027, 1216, 1512, 1729, 1736, 2457, 3087, 3367, 4104, 4706, 4921, 4977, 5103, 5256, 5768, 5824, 5859, 6832, 7657, 7992, 8216, 8587, 8911, 9728, 9919, 10621, 10712, 11375, 12096, 12663, 12691, 12824, 13832, 13851 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Alois P. Heinz, Table of n, a(n) for n = 1..1000

EXAMPLE

91 = 3^3 + 4^3 = (-5)^3 + 6^3; 152 = 3^3 + 5^3 = (-4)^3 + 6^3; 189 = 4^3 + 5^3 = (-3)^3 + 6^3; ...

MATHEMATICA

ok[n_] := If[Length[PowersRepresentations[n, 2, 3]] >= 2, True, r = Reduce[n == x^3 + y^3, {x, y}, Integers]; If[r === False, False, Length[Union[Sort /@ ({x, y} /. {ToRules[r]})]] >= 2]]; Select[Range[13860], If[ok[#], Print[#]; True, False] &] (* Jean-Fran├žois Alcover, Apr 11 2011 *)

PROG

(PARI) is(n)=#thue(thueinit(z^3+1), n)>=2 \\ Ralf Stephan, Oct 18 2013

CROSSREFS

Cf. A051383, A051384.

Sequence in context: A083517 A088983 A045934 * A293647 A225908 A159961

Adjacent sequences:  A051344 A051345 A051346 * A051348 A051349 A051350

KEYWORD

nonn,nice

AUTHOR

Colin Mallows

EXTENSIONS

Extended by Ray Chandler, Jan 30 2009

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 October 19 16:17 EDT 2019. Contains 328223 sequences. (Running on oeis4.)