A282405 Primes p = x^2 + y^2 such that x - y is a cube greater than one.

977, 1049, 1289, 1877, 2477, 2609, 3329, 4877, 5669, 6089, 6977, 8429, 9209, 9749, 10589, 12377, 12689, 13649, 15329, 15877, 16657, 17477, 18617, 18913, 19213, 20773, 21377, 21757, 22093, 22433, 22777, 23833, 23909, 25229, 25673, 26053, 26437, 27509, 30497

Offset

1,1

Links

Chai Wah Wu, Table of n, a(n) for n = 1..10000 (terms for n = 1..500 from Colin Barker)

Example

The prime number 977 is in the sequence because 977 = 31^2 + 4^2 and 31 - 4 = 27 = 3^3.

Mathematica

cg1Q[{a_, b_}]:=Module[{d=b-a}, PrimeQ[a^2+b^2]&&d>1&&IntegerQ[Surd[d, 3]]]; Total[#^2]&/@Select[Subsets[Range[200], {2}], cg1Q]//Union (* Harvey P. Dale, Apr 18 2019 *)

Crossrefs

Cf. A002313, A282353, A282381, A282406.

Sequence in context: A190400 A288917 A264130 * A077362 A077380 A063052

Adjacent sequences: A282402 A282403 A282404 * A282406 A282407 A282408

Keyword

nonn

Author

Colin Barker, Feb 14 2017

Status

approved