A204764 Primes followed by a gap of 90.

404851, 576791, 818723, 843911, 1053863, 1138273, 1294849, 1467989, 1876859, 1964987, 1966697, 1985077, 2030789, 2214383, 2220553, 2423249, 2483291, 2527823, 2542237, 2638087, 2680141, 2856683, 2910329, 3106487, 3112147, 3112519, 3175169, 3279037, 3398761

Offset: 1

Author

M. F. Hasler, Jan 18 2012

Keywords

• nonn

Links

• M. F. Hasler, Table of n, a(n) for n = 1..1000
• Index entries for primes, gaps between.

Programs

Mathematica

Transpose[Select[Partition[Prime[Range[250000]],2,1],Last[#] - First[#] == 90&]][[1]] (* Harvey P. Dale, Jul 31 2012 *)

PARI

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