login
A106084
Primes p such that 5*p + 18 and 18*p + 5 are primes.
0
7, 13, 17, 19, 31, 41, 71, 73, 83, 89, 101, 167, 173, 227, 229, 283, 293, 307, 313, 353, 379, 383, 397, 419, 439, 523, 547, 563, 577, 659, 661, 827, 853, 937, 941, 953, 1063, 1097, 1153, 1237, 1307, 1483, 1567, 1571, 1583, 1667, 1669, 1721, 1783, 1861, 1877
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[220]], PrimeQ[18#+5]&&PrimeQ[5#+18]&]
PROG
(Magma) [p: p in PrimesUpTo(10000)| IsPrime(5*p+18) and IsPrime(18*p+5)]; // Vincenzo Librandi, Nov 13 2010
CROSSREFS
Sequence in context: A032669 A231607 A147603 * A110053 A276045 A230039
KEYWORD
nonn
AUTHOR
Zak Seidov, May 07 2005
EXTENSIONS
More terms from Vincenzo Librandi, Apr 01 2010
STATUS
approved