A215736 a(n) is the first digit to appear n times in succession in a power of 7.

1, 1, 7, 9, 5, 7, 3, 1, 0, 0, 3, 4, 6, 5, 9

Offset

1,3

Links

Table of n, a(n) for n=1..15.

Mathematica

n = 1; x = 1; lst = {};
For[i = 1, i <= 10000, i++,
 z = Split[IntegerDigits[x]]; a = Length /@ z; b = Max[a];
 For[j = n, j <= b, j++,
  AppendTo[lst, First[First[Part[z, First[Position[a, b]]]]]]; n++
]; x = 7 x ]; lst (* Robert Price, Mar 16 2019 *)

Crossrefs

Cf. A215730, A045875, A215732.

Sequence in context: A369095 A198417 A363687 * A132715 A154910 A063603

Adjacent sequences: A215733 A215734 A215735 * A215737 A215738 A215739

Keyword

nonn,base,more

Author

V. Raman, Aug 22 2012

Extensions

a(10) added by V. Raman, Nov 23 2013

a(11)-a(13) from Giovanni Resta, Apr 19 2016

a(14)-a(15) from Bert Dobbelaere, Feb 15 2019

Status

approved