A175609 The difference between maximal run length and minimal run length in binary representation of n-th prime.

0, 0, 0, 0, 1, 1, 2, 1, 2, 2, 0, 1, 1, 1, 3, 1, 2, 3, 3, 2, 1, 3, 1, 1, 3, 1, 1, 1, 1, 2, 0, 4, 2, 2, 1, 2, 2, 2, 2, 1, 1, 1, 5, 4, 2, 1, 1, 4, 1, 2, 2, 3, 3, 4, 6, 4, 3, 3, 2, 2, 2, 1, 1, 2, 2, 3, 1, 2, 1, 2, 3, 2, 3, 2, 3, 6, 3, 2, 2, 1, 2, 1, 3, 2, 2, 2, 4, 2, 2, 2, 2, 4, 2, 3, 3, 4, 6, 4, 4, 3, 2, 2, 2, 2, 2

Offset

1,7

Links

Table of n, a(n) for n=1..105.

Formula

a(n)=A175599(A000040(n)).

Mathematica

rl[n_]:=Module[{spl=Length/@Split[IntegerDigits[Prime[n], 2]]}, Max[spl]- Min[spl]]; rl/@Range[110] (* Harvey P. Dale, Jul 27 2011 *)

Crossrefs

Sequence in context: A152196 A024375 A025075 * A038717 A073267 A159981

Adjacent sequences: A175606 A175607 A175608 * A175610 A175611 A175612

Keyword

nonn

Author

Juri-Stepan Gerasimov, Jul 23 2010

Status

approved