|
| |
|
|
A098175
|
|
Smallest power of n with initial digit = 1 in decimal representation.
|
|
2
|
|
|
|
1, 16, 19683, 16, 125, 1296, 16807, 16777216, 1853020188851841, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 160000, 194481, 10648, 12167, 13824, 15625, 17576, 19683, 17210368, 17249876309, 19683000000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
f[n_]:= Block[{k = 1}, While[IntegerDigits[n^k][[1]]!= 1, k++ ]; n^k]; Table[ f[n], {n, 30}] (*Robert G. Wilson v,Sep 01 2004 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,base
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
