%I A125071
%S A125071 0,1,1,0,1,2,1,0,0,2,1,1,1,2,2,4,1,1,1,1,2,2,1,1,0,2,0,1,1,3,1,0,2,2,2,
%T A125071 0,1,2,2,1,1,3,1,1,1,2,1,5,0,1,2,1,1,1,2,1,2,2,1,2,1,2,1,6,2,3,1,1,2,3,
%U A125071 1,0,1,2,1,1,2,3,1,5,4,2,1,2,2,2,2,1,1,2,2,1,2,2,2,1,1,1,1,0,1,3,1,1,3
%N A125071 a(n) = sum of the exponents in the prime-factorization of n which are 
               not primes.
%H A125071 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> 
               (listed in lieu of email address)
%e A125071 720 has the prime-factorization of 2^4 *3^2 *5^1. Two of these exponents, 
               4 and
%e A125071 1, aren't primes. So a(720) = 4 + 1 = 5.
%t A125071 f[n_] := Plus @@ Select[Last /@ FactorInteger[n], ! PrimeQ[ # ] &];Table[f[n], 
               {n, 110}] (*Chandler*)
%Y A125071 Cf. A125070.
%Y A125071 Sequence in context: A050326 A056169 A125070 this_sequence A161528 A136176 
               A103344
%Y A125071 Adjacent sequences: A125068 A125069 A125070 this_sequence A125072 A125073 
               A125074
%K A125071 nonn
%O A125071 1,6
%A A125071 Leroy Quet, Nov 18 2006
%E A125071 Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 19 2006