A085957 Primes p such that 6p + 1 and (p-1)/6 are primes.

13, 103, 283, 367, 607, 787, 907, 1987, 2203, 2767, 3643, 4507, 5623, 5827, 6907, 7927, 7963, 8167, 8887, 9067, 9643, 10867, 11083, 11443, 12487, 13723, 14083, 14143, 16747, 17107, 17827, 19507, 19543, 20743, 20947, 21487, 22567, 24043

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Mathematica

Prime[ Select[ Range[2738], PrimeQ[ 6Prime[ # ] + 1] && PrimeQ[(Prime[ # ] - 1)/6] & ]]

Crossrefs

Cf. A085956, A085958.

Sequence in context: A050670 A142318 A246511 * A119594 A066034 A228213

Adjacent sequences: A085954 A085955 A085956 * A085958 A085959 A085960

Keyword

nonn

Author

Amarnath Murthy, Jul 16 2003

Extensions

Edited and extended by Zak Seidov and Robert G. Wilson v, Jul 18 2003

Status

approved