A217170 - OEIS

A217170

a(n) is the first digit (from the left) to appear five times in succession in the decimal representation of n^A217160(n).

%I #11 Oct 02 2012 15:03:22

%S 6,5,6,4,2,5,4,5,0,6,5,4,4,1,6,5,5,9,0,2,8,6,2,5,9,2,1,8,0,2,6,8,2,6,

%T 2,6,3,8,0,8,7,0,1,7,6,3,6,5,0,6,9,6,6,9,2,2,4,4,0,4,9,4,2,3,4,4,8,5,

%U 0,2,9,9,0,9,9,0,9,6,0,0,4,9,1,0,6,1,2

%N a(n) is the first digit (from the left) to appear five times in succession in the decimal representation of n^A217160(n).

%H V. Raman, <a href="/A217170/b217170.txt">Table of n, a(n) for n = 2..10000</a>

%t Table[k = 1; While[d = IntegerDigits[n^k]; df = Partition[Differences[d], 4, 1]; ! MemberQ[df, {0, 0, 0, 0}], k++]; d[[Position[df, {0, 0, 0, 0}][[1, 1]]]], {n, 2, 100}] (* _T. D. Noe_, Oct 02 2012 *)

%Y Cf. A217160.

%Y Cf. A215732, A215733, A215734, A215735, A215736, A215737.

%K nonn,base

%O 2,1

%A _V. Raman_, Sep 27 2012