This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A240069 #4 Apr 02 2014 03:29:13 %S A240069 0,169,107,85,66,65,62,57,54,0,42,52,38,35,35,43,28,26,45,169,30,25, %T A240069 51,24,30,32,29,29,46,107,29,19,25,35,19,33,26,18,42,85,24,20,21,30, %U A240069 40,33,16,30,17,66,30,30,31,19,18,34,20,32,28,65,27,20,25,29,18,16 %N A240069 The number n^k has all 10 decimal digits starting at k = a(n), or a(n) = 0 if 10 digits are not possible. %C A240069 It appears that numbers of the form 2 * 10^i have the longest period, 169. %H A240069 T. D. Noe, <a href="/A240069/b240069.txt">Table of n, a(n) for n = 1..1000</a> %t A240069 mx = 1000; Table[s = Table[Length[Union[IntegerDigits[n^k]]], {k, 0, mx}]; pos = Position[s, 10]; If[pos == {}, 0, 1 + mx - Position[Differences[Reverse[s]], _?(# != 0 &)][[1, 1]]], {n, 100}] %Y A240069 Cf. A137214 (number of distinct decimal digits in 2^n). %K A240069 nonn,base %O A240069 1,2 %A A240069 _T. D. Noe_, Apr 01 2014