A351387 Primes p such that if q is the next prime, (p+q)/5+5 is prime.

13, 29, 43, 59, 103, 113, 163, 167, 193, 239, 257, 269, 313, 401, 419, 463, 509, 557, 569, 587, 613, 643, 659, 677, 761, 773, 853, 863, 883, 953, 977, 1093, 1129, 1213, 1289, 1483, 1499, 1583, 1619, 1693, 1709, 1783, 1907, 2083, 2129, 2203, 2309, 2339, 2399, 2423, 2531, 2579, 2633, 2729, 2741

Offset

1,1

Links

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

Example

a(3) = 43 is a term because 47 is the next prime and (43+47)/5+5 = 23 is prime.

Maple

N:= 3000: # for terms <= N
Primes:= select(isprime, [2, seq(i, i=3..nextprime(N), 2)]):
nP:= nops(Primes):
L:=(Primes[1..nP-1]+Primes[2..nP])/5 +~ 5:
Primes[select(i -> L[i]::integer and isprime(L[i]), [$1..nP-1])];

Crossrefs

Sequence in context: A309356 A322551 A228069 * A044074 A044455 A082285

Adjacent sequences: A351384 A351385 A351386 * A351388 A351389 A351390

Keyword

nonn

Author

J. M. Bergot and Robert Israel, Mar 20 2022

Status

approved