OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
29 is a term since 23 and 29 are consecutive primes, 23^3 + 29^2 = 13008, and (13007, 13009) are twin primes.
MATHEMATICA
a={}; Do[p1=Prime[n]; p2=Prime[n+1]; pp=p1^3+p2^2; If[PrimeQ[pp-1]&&PrimeQ[pp+1], AppendTo[a, p2]], {n, 16^3}]; Print[a];
Select[Partition[Prime[Range[6500]], 2, 1], AllTrue[#[[1]]^3+#[[2]]^2+{1, -1}, PrimeQ]&][[All, 2]] (* Harvey P. Dale, Aug 29 2021 *)
PROG
(Magma) [NthPrime(k+1):k in [1..7000]| IsPrime(q-1) and IsPrime(q+1) where q is NthPrime(k)^3+ NthPrime(k+1)^2]; // Marius A. Burtea, Dec 22 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 15 2008
EXTENSIONS
More terms from Amiram Eldar, Dec 22 2019
STATUS
approved