A078917 Primes of the form prime(k) + 2*k.

7, 11, 31, 41, 53, 61, 67, 71, 97, 137, 157, 163, 167, 173, 223, 239, 277, 281, 347, 359, 367, 383, 401, 433, 439, 443, 449, 503, 521, 569, 601, 643, 673, 761, 769, 809, 821, 829, 877, 883, 941, 953, 1031, 1063, 1093, 1109, 1153, 1163, 1217, 1223, 1277, 1307

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

Mathematica

Select[Table[Prime[n]+2n, {n, 68000}], PrimeQ] (* Vincenzo Librandi, Dec 09 2011 *)

Prog

(Magma) [a: n in [1..200] | IsPrime(a) where a is NthPrime(n)+2*n ]; // Vincenzo Librandi, Dec 09 2011

Crossrefs

Cf. A078916, A061068, A000040.

Sequence in context: A083363 A027707 A046861 * A291349 A293046 A213176

Adjacent sequences: A078914 A078915 A078916 * A078918 A078919 A078920

Keyword

nonn,easy

Author

Reinhard Zumkeller, Dec 13 2002

Status

approved