A054693 n consecutive primes differ by 6 or more starting at a(n).

23, 47, 241, 241, 523, 677, 677, 677, 2861, 10733, 10733, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 13421, 61631, 61631, 61631, 61631, 61631, 61631, 333793, 333793, 333793, 333793, 333793, 333793

Offset

2,1

Links

Table of n, a(n) for n=2..36.

Mathematica

With[{prs=Prime[Range[30000]]}, First/@Flatten[Table[Select[ Partition[ prs, n, 1], Min[ Differences[#]]>5&, 1], {n, 2, 40}], 1]] (* Harvey P. Dale, May 18 2014 *)

Crossrefs

Sequence in context: A140618 A042052 A136030 * A180945 A052229 A054203

Adjacent sequences: A054690 A054691 A054692 * A054694 A054695 A054696

Keyword

nonn

Author

Jeff Burch, Apr 19 2000

Extensions

More terms from Larry Reeves (larryr(AT)acm.org), Nov 09 2000

Status

approved