[go: up one dir, main page]

login
A107738
Primes as a sum of prime factors and their orders in prime decomposition of some n.
3
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, 13, 23, 71, 23, 31, 11, 13, 23, 23, 83, 13, 17, 37, 29, 29, 101, 13, 107, 29, 11, 113, 29, 37, 11, 17, 131, 31, 19, 37, 19, 29, 19, 43
OFFSET
1,1
COMMENTS
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).
LINKS
Eric Weisstein's World of Mathematics, Prime Factorization
MATHEMATICA
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]]
CROSSREFS
Sequence in context: A205528 A021731 A084726 * A341628 A238048 A010624
KEYWORD
nonn
AUTHOR
Zak Seidov, May 23 2005
STATUS
approved