login
Twin primes p such that p-1 is a partial sum of A014574.
2

%I #13 May 10 2021 15:06:01

%S 5,11,41,71,347,23627,69929,72269,149249,539267,625589,1085351,

%T 1876181,2073389,2627201,3398489,3863681,4262171,4435241,4511261,

%U 5286179,5709719,6124007,6494261,6875441,7298441,7331381,9559349,9867797,11459939,12419969,14825009,16748909,18755117,23220971,23733821

%N Twin primes p such that p-1 is a partial sum of A014574.

%C All members are lesser twin primes, i.e., p and p+2 are prime.

%H Robert Israel, <a href="/A343712/b343712.txt">Table of n, a(n) for n = 1..10000</a>

%p A014574:= [4, op(select(t -> isprime(t-1) and isprime(t+1), [seq(i,i =6..10^6,6)]))]:

%p select(t -> isprime(t) and isprime(t+2), map(`+`, ListTools:-PartialSums(A014574), 1));

%Y Intersection of A001359 and A343711.

%Y Cf. A014574.

%K nonn

%O 1,1

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