|
|
A068124
|
|
Smallest number whose n-th power begins with n n's; n-th root of A068123.
|
|
3
|
|
|
1, 15, 322, 1452, 88909, 2955639, 25880899, 415533397, 215443469, 25144122307797731891, 1891851504074453542774, 389309950637308214633931, 71656315545775490294342978, 8696027755149851609001142655
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = 322 as 322^3 = 33386248 begins with 333.
|
|
MATHEMATICA
|
a[n_] := Block[{t = Flatten@Table[IntegerDigits@n, {n}], m, v, h=0}, m = Length@t; z = FromDigits@t; While[ Take[ IntegerDigits[(v = Ceiling[(z 10^h) ^ (1/n)])^n], m] != t, h++]; v]; Array[a, 30] (* Giovanni Resta, Jul 12 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|