OFFSET
2,1
COMMENTS
The term 76 appears for the first time in this sequence at n = 112044721958. - Paul Geneau de Lamarlière, Jun 25 2024
LINKS
V. Raman, Table of n, a(n) for n = 2..10000
MATHEMATICA
Table[k = 1; While[! MemberQ[Partition[Differences[IntegerDigits[n^k]], 3, 1], {0, 0, 0}], k++]; k, {n, 2, 100}] (* T. D. Noe, Oct 01 2012 *)
lk[n_]:=Module[{k=1, t=Table[x_, 4]}, While[SequenceCount[IntegerDigits[n^k], t]< 1, k++]; k]; Array[lk, 80, 2] (* Harvey P. Dale, Jun 21 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
V. Raman, Sep 27 2012
STATUS
approved