OFFSET
2,1
COMMENTS
a(n) = n ^ A051248(n). [Reinhard Zumkeller, Sep 29 2011]
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 2..32
FORMULA
f[n_] := Block[{k = 2, s = ToString[n]}, While[ StringPosition[ ToString[n^k], s, 1] != {{1, Integer_}}, k++ ]; n^k]; Table[ f[n], {n, 2, 10}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, May 11 2002
EXTENSIONS
Edited by Robert G. Wilson v, May 14 2002
The 15th term is too large to include.
STATUS
approved