This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A090000 Length of longest contiguous block of 1's in binary expansion of n-th prime. 6

%I

%S 1,2,1,3,2,2,1,2,3,3,5,1,1,2,4,2,3,4,2,3,1,4,2,2,2,2,3,2,2,3,7,2,1,2,

%T 1,3,3,2,3,2,2,2,6,2,2,3,2,5,3,3,3,4,4,5,1,3,2,4,1,2,2,1,2,3,3,4,2,1,

%U 2,3,2,3,4,3,4,7,2,2,2,2,2,2,4,2,3,3,3,3,3,4,3,5,4,4,5,5,7,1,2,3,2,2,2,3,3

%N Length of longest contiguous block of 1's in binary expansion of n-th prime.

%C a(n) = A038374(A000040(n)).

%H John Mason, <a href="/A090000/b090000.txt">Table of n, a(n) for n = 1..20000</a>

%t f[n_] := Length[ Union[ DeleteCases[ Split[ IntegerDigits[n, 2]], 0, 2]][[ -1]]]; Table[ f[ Prime[n]], {n, 1, 105}] (* _Robert G. Wilson v_, Dec 04 2003 *)

%Y Cf. A000120, A004676, A090001, A090002, A090003, A090046, A090593.

%K nonn,base

%O 1,2

%A _Reinhard Zumkeller_, Nov 20 2003

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

Last modified May 22 14:32 EDT 2019. Contains 323480 sequences. (Running on oeis4.)