login
A076300
Numbers n such that prime(n) + 5*n is prime.
6
1, 2, 6, 8, 10, 12, 14, 18, 30, 36, 38, 40, 48, 50, 52, 54, 64, 66, 68, 72, 74, 78, 80, 84, 96, 110, 118, 120, 122, 124, 134, 142, 148, 150, 154, 160, 178, 184, 186, 188, 198, 204, 210, 214, 220, 224, 228, 238, 240, 242, 246, 250, 252, 254, 258, 260, 268, 270
OFFSET
1,2
LINKS
EXAMPLE
2 is in the sequence because p(2) + 5*2 = 3 + 10 = 13 is prime.
MATHEMATICA
Select[Range[300], PrimeQ[Prime[#]+5#]&] (* Harvey P. Dale, Nov 27 2013 *)
PROG
(Magma) [n: n in [0..500]| IsPrime(NthPrime(n) +5*n)]; // Vincenzo Librandi, Apr 06 2011
(PARI) select(x->isprime(x), vector(500, n, prime(n) + 5*n), 1) \\ Michel Marcus, Jan 15 2015
(PARI) isok(n) = isprime(prime(n) + 5*n); \\ Michel Marcus, May 05 2018
CROSSREFS
Cf. A064402 (s=1), A076297 (s=2), A076298 (s=3), A076299 (s=4).
Sequence in context: A327905 A157502 A216032 * A049637 A284753 A258663
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 05 2002
STATUS
approved