A158957 Lesser of two successive primes p1, p2, where p2-p1 (gap) includes at least one entire primeless century.

1671781, 2637799, 3117299, 3933599, 4640599, 4652353, 5178193, 5518687, 5837399, 5845193, 6012899, 6084977, 6333799, 6376193, 6789793, 6958667, 7129877, 7565191, 7803491, 7826899, 8027699, 8367397, 8421251, 8905199

Offset: 1

Author

Ki Punches, Apr 29 2009

Keywords

• nonn

Comments

The sequence is probably infinite.

Programs

Mathematica

Transpose[Select[Partition[Prime[Range[600000]],2,1],Floor[#[[2]]/100]- Floor[ #[[1]]/100]>1&]][[1]] (* Harvey P. Dale, Jul 10 2015 *)

Extensions

Corrected by Ray Chandler, Apr 30 2009