A350736 Lesser twin primes p such that 4*p is the sum of two consecutive primes.

3, 17, 137, 617, 1277, 1427, 1949, 2027, 3119, 4157, 5417, 5657, 10139, 13217, 13691, 13709, 16187, 17657, 17837, 18911, 19379, 20507, 20807, 24371, 25577, 27407, 27527, 29207, 31391, 31847, 32117, 32909, 33767, 34847, 36467, 39839, 40037, 47057, 47387, 47657, 48311, 49199, 49367, 49739, 49787

Offset: 1

Author

J. M. Bergot and Robert Israel, Jan 12 2022

Keywords

• nonn

Examples

			a(3) = 137 is a term because 137 and 139 are primes and 4*137 = 548 is the sum of consecutive primes 271 and 277.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Intersection of A001359 and A118134.

Programs

Maple

P:= select(isprime,{seq(i,i=3..100000,2)}):
T:= P intersect map(`-`,P,2):
sort(convert(select(r -> prevprime(2*r)+nextprime(2*r)=4*r,T),list));

Mathematica

Select[Plus @@@ Partition[Select[Range[10^5], PrimeQ], 2, 1]/4, And @@ PrimeQ[# + {0, 2}] &] (* Amiram Eldar, Jan 13 2022 *)