|
|
A125266
|
|
Number of repetitions in A007918.
|
|
5
|
|
|
3, 1, 2, 2, 4, 2, 4, 2, 4, 6, 2, 6, 4, 2, 4, 6, 6, 2, 6, 4, 2, 6, 4, 6, 8, 4, 2, 4, 2, 4, 14, 4, 6, 2, 10, 2, 6, 6, 4, 6, 6, 2, 10, 2, 4, 2, 12, 12, 4, 2, 4, 6, 2, 10, 6, 6, 6, 2, 6, 4, 2, 10, 14, 4, 2, 4, 14, 6, 10, 2, 4, 6, 8, 6, 6, 4, 6, 8, 4, 8, 10, 2, 10, 2, 6, 4, 6, 8, 4, 2, 4, 12, 8, 4, 8
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Except for the first 2 terms, these numbers are always even. Conjecture: the number 2 occurs infinitely often in this sequence.
|
|
LINKS
|
|
|
EXAMPLE
|
A007918(0) = 2, A007918(1)=2, A007918(2) = 2. So 2 repeats 3 times, giving 3 as the first term in the table.
|
|
MATHEMATICA
|
Join[{3}, Differences[Prime[Range[100]]]] (* Paolo Xausa, Oct 25 2023 *)
|
|
PROG
|
(PARI) nextprimerep(n) = { local(x, y, y1, c=0); y1=2; for(x=0, n, y=nextprime(x); if(y==y1, c++, y1=y; print1(c", "); c=1); ) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|