%I #5 Mar 30 2012 17:26:16
%S 3,7,5,5,11,7,17,13,7,23,11,11,13,13,19,17,41,11,7,47,17,11,17,11,19,
%T 19,13,23,71,23,31,11,13,23,23,83,13,17,37,29,29,101,13,107,29,11,113,
%U 29,37,11,17,131,31,19,37,19,29,19,43
%N Primes as a sum of prime factors and their orders in prime decomposition of some n.
%C Primes occurring in A008474. Corresponding n's in A107738. Cf. A008474 If n = Product (p_j^k_j) then a(n) = Sum (p_j + k_j).
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PrimeFactorization.html">Prime Factorization</a>
%t ta=Table[Plus @@ Flatten[FactorInteger[n]], {n, 300}];bb={};Do[If[PrimeQ[t=ta[[i]]], bb=Append[bb, {i, t}]], {i, 300}];tr=Transpose[bb];A107737=tr[[1]];A107738=tr[[2]]
%Y Cf. A008474, A107737.
%K nonn
%O 1,1
%A _Zak Seidov_, May 23 2005