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,2

Links

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

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 *)

Crossrefs

Cf. A002822.

Sequence in context: A047325 A102611 A323112 * A057915 A154329 A176590

Adjacent sequences: A176111 A176112 A176113 * A176115 A176116 A176117

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Apr 08 2010

Status

approved