A124854 Primes p=n/2 such that 5n+3 and 3n+5 are primes.
2, 7, 11, 17, 29, 31, 37, 43, 59, 73, 109, 137, 191, 193, 197, 227, 239, 263, 269, 337, 367, 373, 401, 409, 449, 479, 499, 541, 557, 701, 743, 757, 823, 827, 857, 941, 983, 997, 1033, 1051, 1109, 1163, 1303, 1361, 1471
Offset: 1
Keywords
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
Maple
select(t -> isprime(t) and isprime(10*t+3) and isprime(6*t+5), [2,seq(i,i=3..10^4,2)]); # Robert Israel, Jun 11 2018
-
Mathematica
Select[Prime@ Range@ 250, AllTrue[{10 # + 3, 6 # + 5}, PrimeQ] &] (* Michael De Vlieger, Jun 11 2018 *)
-
PARI
isok(n) = isprime(n) && isprime(10*n+3) && isprime(6*n+5); \\ Michel Marcus, Oct 11 2013