A076297 Numbers k such that prime(k) + s*k is prime, s=2.

2, 3, 7, 9, 11, 12, 13, 14, 18, 24, 27, 28, 29, 30, 36, 38, 43, 44, 53, 54, 55, 57, 60, 63, 64, 65, 66, 72, 74, 80, 84, 90, 93, 102, 103, 108, 110, 111, 117, 118, 125, 126, 135, 138, 141, 143, 148, 150, 155, 156, 162, 165, 171, 174, 180, 183, 186, 188, 190, 198

Offset: 1

Author

Zak Seidov, Oct 05 2002

Keywords

• nonn

Comments

See also A064402 (s=1), A076298 (s=3), A076299 (s=4), A076300 (s=5).

Examples

			3 is OK because p(3) + 2*3 = 5 + 6 = 11 is prime.
		

Links

• G. C. Greubel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A064402, A076298, A076299, A076300.

Programs

Magma

[n: n in [0..500]| IsPrime(NthPrime(n) +2*n)]; // G. C. Greubel, May 04 2018

Mathematica

Select[Range[200],PrimeQ[Prime[#]+2#]&] (* Harvey P. Dale, Sep 01 2015 *)

PARI

select(x->isprime(x), vector(500, n, prime(n) + 2*n), 1) \\ G. C. Greubel, May 04 2018