[go: up one dir, main page]

login
A112885
Primes of the form k + prime(k-1).
2
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
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
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jan 02 2006
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Jan 05 2006
STATUS
approved