A112885 Primes of the form k + prime(k-1).

17, 43, 107, 131, 139, 277, 313, 337, 379, 467, 607, 677, 709, 719, 761, 773, 857, 911, 937, 953, 967, 1009, 1063, 1097, 1109, 1229, 1277, 1289, 1319, 1399, 1487, 1499, 1787, 1861, 1879, 1933, 1993, 2027, 2053, 2081, 2131, 2153, 2161, 2207, 2417, 2621

Offset

1,1

Links

Table of n, a(n) for n=1..46.

Mathematica

Select[ Range[2, 401] + Prime@ Range@ 400, PrimeQ[ # ] &] (* Robert G. Wilson v, Jan 05 2006 *)

Prog

(PARI) lista(nn) = {for (k=2, nn, if (isprime(p=k+prime(k-1)), print1(p, ", ")); ); } \\ Michel Marcus, Aug 16 2018

Crossrefs

Primes in A090178.

Sequence in context: A172044 A098072 A130467 * A093191 A033703 A227721

Adjacent sequences: A112882 A112883 A112884 * A112886 A112887 A112888

Keyword

easy,nonn

Author

Jonathan Vos Post, Jan 02 2006

Extensions

Corrected and extended by Robert G. Wilson v, Jan 05 2006

Status

approved