OFFSET
2,1
LINKS
V. Raman, Table of n, a(n) for n = 2..100
MATHEMATICA
Table[k = 1; While[! MemberQ[Partition[Differences[IntegerDigits[n^k]], 8, 1], {0, 0, 0, 0, 0, 0, 0, 0}], k++]; k, {n, 2, 50}] (* T. D. Noe, Oct 01 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
V. Raman, Sep 27 2012
STATUS
approved