A387422 The length of the maximal common prefix of the binary expansions of n and sigma(n), where sigma is the sum of divisors function.
1, 1, 1, 1, 1, 3, 1, 1, 1, 2, 1, 2, 2, 2, 2, 1, 3, 4, 2, 4, 2, 2, 1, 2, 2, 1, 1, 5, 3, 1, 1, 1, 1, 1, 1, 2, 4, 1, 1, 3, 4, 1, 3, 3, 2, 2, 1, 2, 2, 1, 1, 3, 4, 2, 1, 3, 1, 1, 3, 1, 4, 2, 2, 1, 2, 3, 4, 1, 1, 3, 3, 1, 5, 1, 1, 3, 1, 2, 2, 3, 1, 1, 4, 1, 1, 2, 1, 5, 5, 1, 1, 3, 2, 2, 1, 2, 5, 1, 1, 3, 5, 3, 3, 6, 3
Offset: 1
Links
Programs
-
PARI
A387422(n) = { my(a=binary(n), b=binary(sigma(n)), i=1); while(i<=#a,if(a[i]!=b[i],return(i-1)); i++); (#a); };