A138698 Primes p such that 54*p-1, 54*p+1 and 60*p-1, 60*p+1 are twin primes.

1093, 1777, 1933, 4073, 11117, 42533, 42937, 59263, 80473, 90677, 98323, 109717, 111427, 120917, 138893, 157627, 170603, 207367, 227627, 241333, 250753, 296687, 305423, 332303, 346277, 359563, 360907, 367163, 371617, 376307, 404837, 446417

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, May 15 2008

Keywords

• nonn

Examples

			54*1093 - 1 = 59021, 54*1093 + 1 = 59023; 60*1093 - 1 = 65579, 60*1093 + 1 = 65581; ...
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Programs

Magma

[p: p in PrimesUpTo(10000)| IsPrime(54*p-1) and IsPrime(54*p+1) and IsPrime(60*p-1) and IsPrime(60*p+1)]; // Vincenzo Librandi, Nov 24 2010

Mathematica

a=54;b=60;Select[Prime[Range[14^4]],PrimeQ[a*#-1]&&PrimeQ[a*#+1]&&PrimeQ[b*#-1]&&PrimeQ[b*#+1]&]
Select[Prime[Range[40000]],AllTrue[{54#+1,54#-1,60#+1,60#-1},PrimeQ]&] (* Harvey P. Dale, Sep 22 2017 *)

Extensions

More terms from Vincenzo Librandi, Apr 01 2010