This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A076649 #18 Oct 11 2021 18:42:58
%S A076649 0,1,1,2,1,2,1,3,2,2,2,3,2,2,2,4,2,3,2,3,2,3,2,4,2,3,3,3,2,3,2,5,3,3,
%T A076649 2,4,2,3,3,4,2,3,2,4,3,3,2,5,2,3,3,4,2,4,3,4,3,3,2,4,2,3,3,6,3,4,2,4,
%U A076649 3,3,2,5,2,3,3,4,3,4,2,5,4,3,2,4,3,3,3,5,2,4,3,4,3,3,3,6,2,3,4,4,3,4,3,5,3,3
%N A076649 Number of digits required to write the prime factors of n.
%H A076649 Charles R Greathouse IV, <a href="/A076649/b076649.txt">Table of n, a(n) for n = 1..1000</a>
%F A076649 a(n) is completely additive: a(m*n) = a(m)+a(n) for all integers m, n >= 1, with a(1)=0 and a(p^e) = e*floor(log_10(10*p)), p prime. - Diego Torres (torresvillarroel(AT)hotmail.com), Oct 26 2002
%F A076649 Totally additive with a(p) = A055642(p).
%e A076649 12 = 2*2*3 so a(12)=3.
%t A076649 Join[{0},Table[Total[IntegerLength[#]&/@(Flatten[Table[#[[1]],#[[2]]]&/@ FactorInteger[n]])],{n,2,120}]] (* _Harvey P. Dale_, Mar 10 2018 *)
%o A076649 (PARI) a(n)=my(f=factor(n));sum(i=1,#f[,1],#Str(f[i,1])*f[i,2]) \\ _Charles R Greathouse IV_, Jul 24 2012
%Y A076649 Cf. A055642.
%K A076649 base,nonn
%O A076649 1,4
%A A076649 _Jeff Burch_, Oct 24 2002
%E A076649 a(1) added, a(40) corrected by _Charles R Greathouse IV_, Jul 24 2012