OFFSET
1,1
COMMENTS
Run-sums of A251092.
EXAMPLE
The odd primes are:
3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, ...
with runs:
{3,5,7}, {11,13}, {17,19}, {23}, {29,31}, {37}, {41,43}, {47}, {53}, ...
with lengths:
3, 2, 2, 1, 2, 1, 2, 1, 1, 2, 1, 2, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 2, ...
with runs:
{3}, {2,2}, {1}, {2}, {1}, {2}, {1,1}, {2}, {1}, {2}, {1,1,1,1}, {2,2}, ...
with sums a(n).
MATHEMATICA
Total/@Split[Length /@ Split[Select[Range[3, 10000], PrimeQ], #1+2==#2&]//Most]//Most
CROSSREFS
Run-sums of A251092.
A000040 lists the primes.
A001223 gives first differences of primes.
A046933 counts composite numbers between primes.
A071148 gives partial sums of odd primes.
A333254 gives run-lengths of first differences of primes.
A373821 gives run-lengths of run-lengths of first differences of odd primes.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jun 23 2024
STATUS
approved