A049492 Primes p such that p+4 and p+16 are also primes.

3, 7, 13, 37, 43, 67, 97, 163, 223, 277, 463, 487, 643, 757, 823, 937, 967, 1087, 1093, 1213, 1303, 1423, 1483, 1567, 1597, 1693, 1873, 2083, 2137, 2293, 2377, 2617, 2683, 2953, 3187, 3343, 3847, 3907, 4003, 4447, 4783, 5503, 5653, 5923, 6547, 6967, 6997

Offset

1,1

Comments

All terms > 3 are == 1 (mod 6). - Zak Seidov, Sep 05 2014

Intersection of A023200 and A049488. - Michel Marcus, Sep 05 2014

Links

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

Example

3, 3+4 = 7, 3+16 = 19 are all primes.

Mathematica

Select[Prime[Range[900]], And@@PrimeQ[#+{4, 16}]&] (* Harvey P. Dale, Jan 17 2011 *)

Prog

(PARI) lista(nn) = forprime (n=1, nn, if (isprime(n+4) && isprime(n+16), print1(n, ", "))); \\ Michel Marcus, Sep 05 2014

Crossrefs

Cf. A023200, A049488, A049493.

Sequence in context: A106952 A106951 A106057 * A166283 A350676 A186721

Adjacent sequences: A049489 A049490 A049491 * A049493 A049494 A049495

Keyword

nonn

Author

Labos Elemer

Status

approved