login
Primes in A342604.
3

%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