%I #8 Oct 02 2022 19:54:13
%S 19,14479,43609,406171,711959,1330177,2698231,3918157,18987169,
%T 26135339,194727347,269998639,975929347,5005853669,8430389621,
%U 24830247671,36372313009,69703708967,93194681917,126628534313,139478926201,304123612349,359101509211,384305009171,387550106843,400722388999
%N Primes in A357251.
%C Primes that are, for some N, the sum of p*q for all pairs of primes (p,q) with p <= q <= N.
%H Robert Israel, <a href="/A357252/b357252.txt">Table of n, a(n) for n = 1..10000</a>
%e a(2) = 14479 is in the sequence because 14479 = A357251(11) is the sum of p*q for primes p <= q <= 31 and is prime.
%p p:= 2: a:= 4: s:= 2: R:= NULL: count:= 0:
%p for i from 1 while count < 100 do
%p p:= nextprime(p);
%p s:= s + p;
%p a:= a + p*s;
%p if isprime(a) then count:= count+1; R:= R,a; fi
%p od:
%p R;
%Y Cf. A357251.
%K nonn
%O 1,1
%A _J. M. Bergot_ and _Robert Israel_, Sep 20 2022
|