|
%I #9 Mar 19 2015 20:58:29
%S 2,0,0,1,1,0,2,1,1,2,3,3,4,6,6,8,11,13,16,20,26,33,41,52,65,82,103,
%T 129,164,205,259,326,411,516,651,819,1030,1298,1634,2056,2590,3259,
%U 4104,5166,6504,8188,10308,12977,16337,20567,25893,32597,41037,51662,65039
%N Number of n-digit 10th powers.
%H Alois P. Heinz, <a href="/A216654/b216654.txt">Table of n, a(n) for n = 1..1000</a>
%e a(1) = 2: 0, 1.
%e a(4) = 1: 1024.
%e a(5) = 1: 59049.
%e a(7) = 2: 1048576, 9765625.
%e a(10) = 2: 1073741824, 3486784401.
%e a(11) = 3: 10000000000, 25937424601, 61917364224.
%p r:= proc(n, k) local b; b:= iroot(n, k); b+`if`(b^k<n, 1, 0) end:
%p a:= n-> r(10^n, 10) -r(10^(n-1), 10) +`if`(n=1, 1, 0):
%p seq(a(n), n=1..60);
%Y Column k=10 of A216653.
%K nonn,base
%O 1,1
%A _Alois P. Heinz_, Sep 12 2012
|
