A067457 Smallest n-th power starting with n.

1, 25, 343, 4096, 59049, 64, 78125, 815730721, 922190162669056, 1024, 116490258898219, 129746337890625, 13060694016, 147653612273582215982104576, 15407021574586368, 16400152899115243850138976256, 17179869184

Offset

1,2

Links

Jon E. Schoenfield, Table of n, a(n) for n = 1..302

Mathematica

Do[k = Floor[ Log[ 10, n] + 1]; While[ FromDigits[ Take[ IntegerDigits [k^n], Floor[ Log[ 10, n] + 1]]] != n, k++ ]; Print[k^n], {n, 1, 20} ]

Crossrefs

Cf. A067442, A067443, A067444, A067445, A067446, A067447, A067448, A067449, A067450, A068001.

Sequence in context: A265922 A136736 A119785 * A055333 A278557 A282924

Adjacent sequences: A067454 A067455 A067456 * A067458 A067459 A067460

Keyword

base,easy,nonn

Author

Amarnath Murthy, Feb 07 2002

Extensions

Edited and extended by Robert G. Wilson v, Feb 08 2002

Status

approved