A014690 a(n) = n + prime(n+1).
4, 7, 10, 15, 18, 23, 26, 31, 38, 41, 48, 53, 56, 61, 68, 75, 78, 85, 90, 93, 100, 105, 112, 121, 126, 129, 134, 137, 142, 157, 162, 169, 172, 183, 186, 193, 200, 205, 212, 219, 222, 233, 236, 241, 244, 257, 270, 275, 278, 283, 290, 293, 304, 311, 318, 325, 328
Offset: 1
Crossrefs
Essentially the same sequence as A095116.
Programs
-
Mathematica
a[n_]:=Prime[n+1]+n (* Zak Seidov, May 05 2005 *) With[{nn=60},Prime[Range[2,nn+1]]+Range[nn]] (* Harvey P. Dale, Oct 02 2015 *)
Extensions
More terms from Erich Friedman
Comments