p:next_prime;sum(sum(x:p(x),i,a+x:1,a:p(a))+dispterms(x),n,a:2,100);