A004232 a(n) = n^2 + prime(n).
3, 7, 14, 23, 36, 49, 66, 83, 104, 129, 152, 181, 210, 239, 272, 309, 348, 385, 428, 471, 514, 563, 612, 665, 722, 777, 832, 891, 950, 1013, 1088, 1155, 1226, 1295, 1374, 1447, 1526, 1607, 1688, 1773, 1860, 1945, 2040, 2129, 2222, 2315, 2420, 2527, 2628, 2729
Offset: 1
Crossrefs
Cf. A184935.
Programs
-
Magma
[n^2 +NthPrime(n): n in [1..250]]; // Vincenzo Librandi, Apr 14 2011
-
Mathematica
Table[n^2+Prime[n],{n,50}] (* Harvey P. Dale, Feb 28 2015 *)
-
PARI
primeppwr(n) = sr=0; for(x=1,n, y=x^2+prime(x); print1(y","); sr+=1./y; ); print(); print(sr) \\ Cino Hilliard
Extensions
More terms from Cino Hilliard, Dec 31 2003
Comments