%I A055642
%S A055642 1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
               2,
%T A055642 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
%U A055642 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3
%N A055642 Number of digits in decimal expansion of n.
%F A055642 a(n)=floor[log10(10n)] = A004216(n)+1 =A004218(n+1)
%t A055642 Join[{1}, Array[ Floor[ Log[10, 10# ]] &, 104]] (from Robert G. Wilson 
               v (rgwv(at)rgwv.com), Jan 04 2006)
%o A055642 (PARI) A055642(n)=#Str(n) [From M. F. Hasler (MHasler(AT)univ-ag.fr), 
               Nov 17 2008]
%Y A055642 Sequence in context: A036453 A040000 A007395 this_sequence A138902 A036452 
               A102572
%Y A055642 Adjacent sequences: A055639 A055640 A055641 this_sequence A055643 A055644 
               A055645
%K A055642 base,easy,nonn,nice
%O A055642 0,11
%A A055642 Henry Bottomley (se16(AT)btinternet.com), Jun 06 2000