|
%I #5 Oct 15 2013 22:31:34
%S 0,0,0,0,0,0,1,2,2,3,2,1,2,3,2,1,2,2,3,4,3,2,1,1,1,4,4,5,6,6,4,3,3,5,
%T 6,6,5,4,4,5,5,5,6,7,6,6,7,6,6,7,7,6,5,5,6,5,7,8,7,8,8,8,8,8,8,7,9,9,
%U 9,7,6,7,7,8,8,8,7,9,9,8,9,9,9,9,8,9,10,10,9,7,8,8,9,10,10,10,10,9,9,10,9
%N Number of common decimal digits of 2^n and 2^(1+n).
%t Table[Length[Intersection[IntegerDigits[2^n], InterDigits[2^(n+1)]]], {n, 1, 100}]
%Y Cf. A006880, A076489-A076493.
%K base,nonn
%O 1,8
%A _Labos Elemer_, Oct 21 2002
|
