login
Primes in A343414.
2

%I #10 Apr 15 2021 04:38:20

%S 2,31,353,1039,1857829,14277775651,6822209961271,

%T 23172461926413292644664234611981411217441459,

%U 277990346815366598975642147371422180190208141392937,563879158779728906723597933198749347203597871838981,10726692511220448398001610103693085889137778178555239341406463847718807560615202368578749

%N Primes in A343414.

%H Robert Israel, <a href="/A343415/b343415.txt">Table of n, a(n) for n = 1..21</a>

%e a(3) = 353 is a term because A343414(4) = 353 and 353 is prime.

%p f:= proc(n) local L,i;

%p L:= ListTools:-PartialSums([seq(binomial(n,i),i=0..n)]);

%p add(L[i]*ithprime(i),i=1..n+1);

%p end proc:

%p select(isprime, map(f, [$0..1000]));

%Y Cf. A343414.

%K nonn

%O 1,1

%A _J. M. Bergot_ and _Robert Israel_, Apr 14 2021