login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A289119 Least prime beginning a string, of length at least n, of consecutive primes which alternate between types 6*k+1 and 6*k+5 or 6*k+5 and 6*k+1. 3
5, 5, 5, 5, 5, 5, 5, 89, 89, 809, 809, 809, 809, 809, 809, 809, 809, 809, 809, 809, 809, 3954889, 15186319, 15186319, 15186319, 77011289, 77011289, 77011289, 288413159, 288413159, 288413159, 288413159, 288413159, 62585146739, 114058236679, 143014298809 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Conjecture: the sequence is infinite. (Motivation: the string HTHTHT... of length n eventually occurs in any sufficiently long sequence of coin tosses.)
REFERENCES
R. K. Guy, Unsolved Problems in Number Theory, A4.
LINKS
Jens Kruse Andersen, Consecutive Congruent Primes
EXAMPLE
For k = 3, 4, ..., 33, {Prime[k], Mod[Prime[k], 6]} = {5, 5}, {7, 1}, {11, 5}, {13, 1}, {17, 5}, {19, 1}, {23, 5}, {29, 5}, {31, 1}, {37, 1}, {41, 5}, {43, 1}, {47, 5}, {53, 5}, {59, 5}, {61, 1}, {67, 1}, {71, 5}, {73, 1}, {79, 1}, {83, 5}, {89, 5}, {97, 1}, {101, 5}, {103, 1}, {107, 5}, {109, 1}, {113, 5}, {127, 1}, {131, 5}, {137, 5}, so a(n) = 5, 5, 5, 5, 5, 5, 5, 89, 89 for n = 1, 2, ..., 9 with a(10) > 89.
MATHEMATICA
j = 3; T = Table[ While[ Product[ Mod[ Prime[k + 1] - Prime[k], 6], {k, j, j + n}] == 0, j++]; Prime[j], {n, 0, 20}]; Prepend[T, 5]
CROSSREFS
Sequence in context: A341035 A200325 A355588 * A117878 A291497 A241154
KEYWORD
nonn
AUTHOR
Jonathan Sondow, Jun 25 2017
EXTENSIONS
a(23)-a(36) from Giovanni Resta, Jun 29 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 00:26 EDT 2024. Contains 371264 sequences. (Running on oeis4.)