OFFSET
1,1
LINKS
FORMULA
A204792(n) = prime(a(n)). - R. J. Mathar, Apr 30 2024
EXAMPLE
p(15784) - p(15783) = 173429 - 173359 = 70.
MATHEMATICA
Select[Range[95317], NextPrime[Prime[#]]-Prime[#]==70&] (* James C. McMahon, Aug 20 2024 *)
PROG
(PARI) lista(nn) = {pr = primes(nn); for (n = 1, nn-1, if (pr[n+1] - pr[n] == 70, print1(n, ", ")); ); } \\ Michel Marcus, Oct 09 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Feb 17 2006
EXTENSIONS
Name edited by James C. McMahon, Aug 20 2024
STATUS
approved