A013634 - OEIS

A013634

a(n) = nextprime(n) + n.

2, 3, 5, 8, 9, 12, 13, 18, 19, 20, 21, 24, 25, 30, 31, 32, 33, 36, 37, 42, 43, 44, 45, 52, 53, 54, 55, 56, 57, 60, 61, 68, 69, 70, 71, 72, 73, 78, 79, 80, 81, 84, 85, 90, 91, 92, 93, 100, 101, 102, 103, 104, 105, 112, 113, 114, 115, 116, 117, 120, 121, 128, 129, 130

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,1

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 0..5000

FORMULA

a(n) = A151800(n) + n.

MAPLE

[ seq(nextprime(i)+i, i=0..100) ];

MATHEMATICA

Table[n+NextPrime[n], {n, 0, 120}] (* Harvey P. Dale, May 03 2013 *)

Array[NextPrime[#] + # &, 80, 0] (* Vincenzo Librandi, Dec 27 2018 *)