A239504 Number of digits in the decimal expansion of n^10 (A008454).
1, 1, 4, 5, 7, 7, 8, 9, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 19, 19, 19
Offset: 0
Examples
a(1) = 1, because 1^10 = 1. a(2) = 4, because 2^10 = 1024.
Programs
-
Mathematica
Join[{1},IntegerLength[Range[80]^10]] (* Harvey P. Dale, Jun 29 2021 *)
-
PARI
a(n) = #Str(n^10); \\ Michel Marcus, Mar 21 2014
Formula
a(n) = floor(10*log_10(n))+1 for n>0, a(0) = 1.
a(n) = A055642(n^10).