A050434 Primes whose next higher prime is 100 greater.

396733, 838249, 1313467, 1648081, 1655707, 2345989, 2784373, 3254959, 3595489, 4047157, 4359403, 4571107, 4665553, 4783873, 5211109, 5398597, 5528287, 5723899, 6027283, 6242263, 6429223, 6851863, 7259167, 7554367

Offset

1,1

Comments

All terms == 1 mod 6. - Zak Seidov, Dec 21 2012

Minimal difference is 102, see A289908. - Zak Seidov, Apr 02 2018

Links

Remi Eismann, Table of n, a(n) for n = 1..10000

Index entries for primes, gaps between

Example

396733 is included because the next larger prime is 396833.

Maple

Primes:= select(isprime, [2, seq(2*i+1, i=1..5*10^6)]):
X:= Primes[2..-1] - Primes[1..-2]:
J:=select(t -> X[t]=100, [$1..nops(X)]):
Primes[J]; # Robert Israel, Jun 29 2015

Mathematica

Select[Partition[Prime[Range[600000]], 2, 1], #[[2]]-#[[1]]==100&][[All, 1]] (* Harvey P. Dale, Aug 14 2018 *)

Crossrefs

Cf. A289908.

Sequence in context: A233612 A234909 A224633 * A224630 A251341 A234331

Adjacent sequences: A050431 A050432 A050433 * A050435 A050436 A050437

Keyword

easy,nonn

Author

Harvey P. Dale, Dec 22 1999

Extensions

More terms from Frank Ellermann, Jan 18 2002

Status

approved