A204792 Primes p followed by a gap of 70 = nextprime(p) - p.

173359, 175141, 186481, 203461, 218287, 253159, 302329, 399283, 449473, 458239, 459523, 517747, 524521, 546391, 651517, 675643, 677239, 703561, 710119, 724651, 762409, 914047, 1015207, 1023871, 1037143, 1072231, 1072543, 1074763, 1149061, 1189483, 1195291

Offset: 1

Author

M. F. Hasler, Jan 19 2012

Keywords

• nonn

Links

• Robert Israel, Table of n, a(n) for n = 1..8813
• Index entries for primes, gaps between.

Programs

Maple

P:= select(isprime, [seq(i,i=3..1.1*10^6,2)]):
L:= P[2..-1]-P[1..-2]:
R:= P[select(t -> L[t]=70, [$1..nops(L)])]; # Robert Israel, Oct 03 2017

PARI

p=0; g=70; for(c=1, 100, while(g+p!=p=nextprime(p+1), ); print1(", "p-g)) \\