login
A154709
Cubes such that cube-+2 are primes.
4
2146689, 6751269, 50243409, 82312875, 165469149, 170953875, 176558481, 549353259, 1929781125, 3314613771, 5079577959, 5630252139, 6219352719, 6591796875, 7245075375, 10289109375, 11993263569, 14084823375, 14724139851
OFFSET
1,1
MATHEMATICA
lst={}; Do[p=n^3; If[PrimeQ[p-2]&&PrimeQ[p+2], AppendTo[lst, p]], {n, 1, 8!, 2}]; lst
CROSSREFS
Sequence in context: A129477 A235930 A178227 * A344356 A344357 A184476
KEYWORD
nonn
AUTHOR
STATUS
approved