OFFSET
1,1
FORMULA
EXAMPLE
149 = prime(35) = 10010101_2 has two alternating bit runs of lengths 2 and 6: 10_010101, and thus a(35) = 6.
MAPLE
b:= n-> `if`(n<2, [n$2], (f-> (t-> [t, max(t, f[2])])(
`if`(n mod 4 in {0, 3}, 1, f[1]+1)))(b(iquo(n, 2)))):
a:= n-> b(ithprime(n))[2]:
seq(a(n), n=1..94); # Alois P. Heinz, Jul 08 2024
PROG
(Python)
from sympy import prime
def A373745(n):
s = bin(prime(n))[2:]
return next(i for i in range(len(s), 0, -1) if ('01'*(i+1>>1))[:i] in s or ('10'*(i+1>>1))[:i] in s) # Chai Wah Wu, Jul 10 2024
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
James S. DeArmon, Jun 16 2024
STATUS
approved