%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