%I #19 Oct 01 2012 23:37:55

%S 38,64,38,23,21,23,38,32,2,17,17,13,88,18,32,24,23,11,2,60,52,26,17,

%T 23,43,32,16,31,2,24,25,17,19,17,21,16,37,16,2,36,31,10,30,42,39,19,

%U 17,11,2,11,14,35,25,30,20,23,25,24,2,27,26,31,38,30,30,17,8

%N Conjectured number of digits in highest power of n with no two consecutive identical digits.

%C Number of digits in n^k is equal to A055642(n^k) = floor(1+k*log_10(n)). - _V. Raman_, Sep 27 2012

%H V. Raman and T. D. Noe, <a href="/A216140/b216140.txt">Table of n, a(n) for n = 2..1000</a> (terms 2 to 99 are from V. Raman)

%t Table[mx = 0; Do[If[! MemberQ[Differences[d = IntegerDigits[n^k]], 0], mx = Length[d]], {k, 1000}]; mx, {n, 2, 50}] (* _T. D. Noe_, Oct 01 2012 *)

%Y Cf. A216063, A216064, A216065.

%K nonn,base

%O 2,1

%A _V. Raman_, Sep 01 2012