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

Comments

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

Links

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

Example

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

Mathematica

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

Prog

(Magma) [n: n in [0..500]| IsPrime(NthPrime(n) +3*n)]; // G. C. Greubel, May 04 2018
(PARI) select(x->isprime(x), vector(500, n, prime(n) + 3*n), 1) \\ G. C. Greubel, May 04 2018

Crossrefs

Cf. A064402, A076297, A076299, A076300.

Sequence in context: A075027 A309837 A310659 * A194579 A194594 A163248

Adjacent sequences: A076295 A076296 A076297 * A076299 A076300 A076301

Keyword

nonn

Author

Zak Seidov, Oct 05 2002

Status

approved