Search: id:A125030 Results 1-1 of 1 results found. %I A125030 %S A125030 0,1,1,2,1,2,1,3,2,2,1,3,1,2,2,0,1,3,1,3,2,2,1,4,2,2,3,3,1,3,1,5,2,2,2, %T A125030 4,1,2,2,4,1,3,1,3,3,2,1,1,2,3,2,3,1,4,2,4,2,2,1,4,1,2,3,0,2,3,1,3,2,3, %U A125030 1,5,1,2,3,3,2,3,1,1,0,2,1,4,2,2,2,4,1,4,2,3,2,2,2,6,1,3,3,4,1,3,1,4,3 %N A125030 a(n) = sum of exponents in the prime-factorization of n which are noncomposite. %H A125030 Leroy Quet, Home Page (listed in lieu of email address) %e A125030 a(720) = 3, since the prime-factorization of 720 is 2^4 *3^2 *5^1 and 2 of the exponents in this factorization are non-composites (the exponents 2 and 1, which when added is 3). %t A125030 f[n_] := Plus @@ Select[Last /@ FactorInteger[n], # == 1 || PrimeQ[ # ] &];Table[f[n], {n, 110}] (*Chandler*) %Y A125030 Cf. A125029. %Y A125030 Sequence in context: A147810 A055181 A073811 this_sequence A116479 A122810 A086436 %Y A125030 Adjacent sequences: A125027 A125028 A125029 this_sequence A125031 A125032 A125033 %K A125030 nonn %O A125030 1,4 %A A125030 Leroy Quet, Nov 16 2006 %E A125030 Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 19 2006 Search completed in 0.001 seconds