OFFSET
1,4
LINKS
Eric Weisstein's World of Mathematics, Goldbach Partition
Wikipedia, Goldbach's conjecture
FORMULA
MAPLE
with(numtheory): t:=n->add(add( (pi(i)-pi(i-1)) * (pi(2*h-i)-pi(2*h-i-1)) * add(mobius(j)^2, j=i..2*h-i) * (product(1-abs((pi(k)-pi(k-1))-(pi(2*h-k)-pi(2*h-k-1))), k=i..h)), i=3..h), h=1..n): seq(t(n), n=1..60);
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Dec 15 2016
STATUS
approved