%I A107738
%S A107738 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,19,
%T A107738 13,23,71,23,31,11,13,23,23,83,13,17,37,29,29,101,13,107,29,11,113,29,
%U A107738 37,11,17,131,31,19,37,19,29,19,43
%N A107738 Primes as a sum of prime factors and their orders in prime decomposition 
               of some n.
%C A107738 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 A107738 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               PrimeFactorization.html">Prime Factorization</a>
%t A107738 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 A107738 Cf. A008474, A107737.
%Y A107738 Sequence in context: A029946 A021731 A084726 this_sequence A010624 A019638 
               A116535
%Y A107738 Adjacent sequences: A107735 A107736 A107737 this_sequence A107739 A107740 
               A107741
%K A107738 nonn
%O A107738 1,1
%A A107738 Zak Seidov (zakseidov(AT)yahoo.com), May 23 2005