A123651 a(n) = 1 + n^2 + n^3 + n^5 + n^7 + n^11 + n^13 + n^17.
8, 141485, 130914100, 17251189841, 764209065776, 16940083223773, 232729381165100, 2252358161564225, 16679754951397336, 100010100010101101, 505481836542757988, 2218718842990269265, 8650720586711446400
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[1 + n^2 + n^3 + n^5 + n^7 + n^11 + n^13 + n^17: n in [1..25]]; // G. C. Greubel, Oct 17 2017
-
Mathematica
Table[Total[n^Prime[Range[7]]]+1,{n,20}] (* Harvey P. Dale, Aug 22 2012 *)
-
PARI
for(n=1,25, print1(1 + n^2 + n^3 + n^5 + n^7 + n^11 + n^13 + n^17, ", ")) \\ G. C. Greubel, Oct 17 2017
Formula
a(n) = 1 + n^2 + n^3 + n^5 + n^7 + n^11 + n^13 + n^17 = 100010100010101101 (base n) = +/- (n^2+1)*(n^15-n^13+2n^11-n^9+n^7+n^3+1).
Comments