OFFSET
1,1
LINKS
FORMULA
a(n) = prime(A320708(n)). - R. J. Mathar, Apr 30 2024
EXAMPLE
887 is a term as the next prime is 907.
MATHEMATICA
(*M6*) a=887; S={}; Do[b=NextPrime[a]; If[b-a==20, AppendTo[S, a]]; a=b, {10^4}]; S [Zak Seidov, Aug 14 2009]
Transpose[Select[Partition[Prime[Range[2000]], 2, 1], Last[#] - First[#] == 20 &]][[1]] (* Bruno Berselli, Apr 09 2013 *)
PROG
(Magma) [p: p in PrimesUpTo(20000) | NextPrime(p)-p eq 20]; // Bruno Berselli, Apr 09 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Entries and b-file checked by Zak Seidov, Aug 14 2009
STATUS
approved