OFFSET
1,1
COMMENTS
There may be no further terms.
EXAMPLE
11^1 = 11, 88^2 = 7744, 11^3 = 1331, 207^4 = 1836036801, 2955^5 = 225313610074846875.
MATHEMATICA
g[n_] := Block[{k = 2}, While[ Union[ Length@ # & /@ Split@ Sort@ IntegerDigits[k^n]] != {2}, k++ ]; k]; Do[ Print@ g@ n, {n, 5}] (* Robert G. Wilson v, Aug 31 2007 *)
CROSSREFS
KEYWORD
base,fini,nonn
AUTHOR
Tanya Khovanova, Dec 09 2006
STATUS
approved