A176114 Numbers n such that 30*n-1, 30*n+1 are twin primes.

1, 2, 5, 6, 8, 9, 14, 19, 20, 22, 27, 34, 35, 41, 43, 44, 54, 65, 71, 77, 78, 85, 91, 93, 99, 100, 104, 110, 111, 112, 113, 118, 131, 134, 135, 141, 142, 155, 160, 167, 170, 176, 184, 188, 195, 196, 203, 209, 210, 212, 215, 219, 222, 223, 226, 229, 232, 245, 252

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Apr 08 2010

Keywords

• nonn

Links

• Zak Seidov, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A002822.

Programs

Mathematica

Select[Range[6! ],PrimeQ[30*#-1]&&PrimeQ[30*#+1]&]
Select[Range[300],AllTrue[30#+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Mar 21 2018 *)