The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A269801 Total sum of the divisors of the primes p,q such that n=p+q and p>=q. 1
 0, 0, 0, 0, 6, 7, 8, 9, 10, 11, 24, 0, 14, 15, 32, 17, 36, 0, 40, 21, 44, 23, 72, 0, 78, 27, 84, 0, 60, 0, 96, 33, 68, 35, 144, 0, 152, 0, 80, 41, 126, 0, 176, 45, 138, 47, 192, 0, 250, 51, 208, 0, 162, 0, 280, 57, 174, 0, 240, 0, 372, 63, 192, 65, 330, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,5 LINKS Table of n, a(n) for n=0..65. FORMULA a(n) = (n+2) * A061358(n). a(n) = (n+2) * Sum_{i=2..floor(n/2)} A010051(i) * A010051(n-i). a(n) = Sum_{i=2..floor(n/2)} (A000203(i) + A000203(n-i)) * A010051(i) * A010051(n-i). EXAMPLE a(5) = 7; Since 5 can be expressed in one way as the sum of the two primes 2 and 3, we add the sum of their divisors separately: sigma(2) + sigma(3) = 3 + 4 = 7. a(10) = 24; Since 10 can be expressed in two ways as the sum of two primes, we add the sum of the divisors of each prime p and q: 10 = 3+7 = 5+5, so sigma(3) + sigma(7) + sigma(5) + sigma(5) = 4 + 8 + 6 + 6 = 24. MAPLE with(numtheory): A269801:=n->(n+2)*sum((pi(i)-pi(i-1))*(pi(n-i)-pi(n-i-1)), i=2..floor(n/2)): seq(A269801(n), n=0..100); MATHEMATICA Table[(n+2) Sum[(PrimePi[i] - PrimePi[i - 1]) (PrimePi[n - i] - PrimePi[n - i - 1]), {i, 2, Floor[n/2]}], {n, 0, 80}] PROG (PARI) a(n) = sum(i=0, n\2, if (isprime(i) && isprime(n-i), sigma(i)+sigma(n-i))); \\ Michel Marcus, Mar 05 2016 CROSSREFS Cf. A000203 (sigma), A010051, A014092, A061358. Sequence in context: A199162 A120199 A162786 * A250048 A051053 A178868 Adjacent sequences: A269798 A269799 A269800 * A269802 A269803 A269804 KEYWORD nonn,easy AUTHOR Wesley Ivan Hurt, Mar 05 2016 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 19 12:50 EDT 2024. Contains 376012 sequences. (Running on oeis4.)