A104860 Prime next to (n + n-th prime).

5, 7, 11, 13, 17, 23, 29, 29, 37, 41, 43, 53, 59, 59, 67, 71, 79, 83, 89, 97, 97, 103, 107, 127, 127, 131, 131, 137, 139, 149, 163, 167, 173, 179, 191, 191, 197, 211, 211, 223, 223, 227, 239, 239, 251, 251, 263, 277, 277, 281

Offset: 1

Author

Zak Seidov, Apr 24 2005

Keywords

• nonn

Crossrefs

Cf. A014688.

Programs

Mathematica

Table[NextPrime[n+Prime[n]],{n,60}] (* Harvey P. Dale, Aug 16 2018 *)

PARI

a(n) = nextprime(n + prime(n) + 1); \\ Michel Marcus, Oct 09 2013

Formula

a(n) = nextprime(A014688(n)).