|
Search: id:A067457
|
|
|
| A067457 |
|
Smallest n-th power starting with n. |
|
+0 2
|
|
| 1, 25, 343, 4096, 59049, 64, 78125, 815730721, 922190162669056, 1024, 116490258898219, 129746337890625, 13060694016, 147653612273582215982104576, 15407021574586368, 16400152899115243850138976256, 17179869184
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
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.
Adjacent sequences: A067454 A067455 A067456 this_sequence A067458 A067459 A067460
Sequence in context: A022589 A094730 A119785 this_sequence A055333 A022653 A125460
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 07 2002
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 08 2002
|
|
|
Search completed in 0.002 seconds
|