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,1

Links

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

Formula

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

Mathematica

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

Prog

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

Crossrefs

Cf. A014688.

Sequence in context: A193947 A120222 A054794 * A216751 A216741 A290507

Adjacent sequences: A104857 A104858 A104859 * A104861 A104862 A104863

Keyword

nonn

Author

Zak Seidov, Apr 24 2005

Status

approved