A076298 Numbers k such that prime(k) + s*k is prime, s=3.

1, 4, 6, 8, 10, 12, 16, 20, 26, 28, 32, 34, 38, 40, 42, 46, 48, 50, 56, 60, 62, 64, 68, 78, 86, 90, 94, 102, 104, 120, 122, 128, 130, 138, 140, 144, 146, 148, 162, 166, 170, 180, 182, 186, 190, 200, 204, 208, 214, 230, 238, 244, 246, 250, 252, 254, 260, 270, 282

Offset: 1

Author

Zak Seidov, Oct 05 2002

Keywords

• nonn

Comments

See also A064402 (s=1), A076297 (s=2), A076299 (s=4), A076300 (s=5).

Examples

			4 is OK because p(4) + 3*4 = 7 + 12 = 19 is prime.
		

Links

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

Crossrefs

Cf. A064402, A076297, A076299, A076300.

Programs

Magma

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

Mathematica

Select[Range[300],PrimeQ[3#+Prime[#]]&] (* Harvey P. Dale, Sep 06 2012 *)

PARI

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