%I A113019
%S A113019 1,1,1,1,1,1,1,1,1,1,2,4,8,16,32,64,128,256,512,2,4,8,16,32,64,128,256,
%T A113019 512,2,4,8,16,32,64,128,256,512,2,4,8,16,32,64,128,256,512,2,4,8,16,32,
%U A113019 64,128,256,512,2,4,8,16,32,64,128,256,512,2,4,8,16,32,64,128,256,512,
               2
%N A113019 {Number of digits of n} raised to the power of the {digital root of n}.
%C A113019 n=1 and 32 are fixed points. Are there any others?
%C A113019 First occurrence of k: 1,10,100,11,10000,100000,1000000,12,101,1000000000, 
               ..., . - Robert G. Wilson v.
%F A113019 a(ijk...) [m digits ijk...] = m^(i+j+k+..[one digit])
%F A113019 a(n)=A055642(n)^A010888(n). - Robert G. Wilson v
%e A113019 a(0) = 1^0 = 1
%e A113019 a(9) = 1^9 = 1
%e A113019 a(10) = 2^(1+0) = 2
%e A113019 a(89) = 2^(8+9=17=>1+7) = 2^8 = 256
%t A113019 f[n_] := If[n == 0, 1, Floor[ Log[10, 10n]]^(Mod[n - 1, 9] + 1)]; Table[ 
               f[n], {n, 0, 73}] (from Robert G. Wilson v (rgwv(at)rgwv.com), Jan 
               04 2006)
%Y A113019 Cf. A101337.
%Y A113019 Sequence in context: A145115 A104144 A123464 this_sequence A069877 A085940 
               A061509
%Y A113019 Adjacent sequences: A113016 A113017 A113018 this_sequence A113020 A113021 
               A113022
%K A113019 base,easy,nonn
%O A113019 0,11
%A A113019 Alexandre Wajnberg (alexandre.wajnberg(AT)skynet.be), Jan 03 2006