%I #11 Mar 17 2021 13:25:13
%S 2,5,17,821,2851,8291,12583,32213,64567,193283,481409,507979,2889443,
%T 3026911,15233891,24430993,95635361,95754697,221519339,1147397567,
%U 12921783863,28711457651,63521027291,305580335353,1449155675287,3157505489581,6839699592347,14717764856273,67875393766057
%N Primes in A342604.
%H Robert Israel, <a href="/A342606/b342606.txt">Table of n, a(n) for n = 1..741</a>
%F a(n) = A342604(A342605(n)).
%p p:= 1: R:= NULL:
%p for n from 0 to 14 do
%p for k from 0 to n do
%p p:= nextprime(p);
%p R:= R, binomial(n, k)*p
%p od od:
%p select(isprime,ListTools:-PartialSums([R]));
%Y Cf. A342604, A342605.
%K nonn
%O 1,1
%A _J. M. Bergot_ and _Robert Israel_, Mar 16 2021