login
A124206
Numbers n such that 1 + n + n^3 + n^5 + n^7 + n^9 + n^11 + n^13 + n^15 + n^17 + n^19 + n^21 + n^23 + n^25 + n^27 + n^29 + n^31 + n^33 + n^35 + n^37 + n^39 + n^41 + n^43 + n^45 + n^47 + n^49 + n^51 is prime.
2
12, 140, 212, 315, 455, 512, 560, 660, 687, 807, 947, 1005, 1007, 1097, 1128, 1152, 1182, 1301, 1427, 1442, 1491, 1571, 1755, 1787, 1860, 2258, 2346, 2400, 2616, 2712, 2757, 2810, 3015, 3120, 3233, 3318, 3431, 3528, 3756, 3797, 3827, 3966, 4038, 4071
OFFSET
1,1
LINKS
MATHEMATICA
Do[If[PrimeQ[1 + n + n^3 + n^5 + n^7 + n^9 + n^11 + n^13 + n^15 + n^17 + n^19 + n^21 + n^23 + n^25 + n^27 + n^29 + n^31 + n^33 + n^35 + n^37 + n^39 + n^41 + n^43 + n^45 + n^47 + n^49 + n^51], Print[n]], {n, 1, 2400}]
Select[Range[6000], PrimeQ[Total[#^Range[1, 51, 2]] + 1] &] (* Vincenzo Librandi, Jun 28 2014 *)
PROG
(Magma) [n: n in [0..5000] | IsPrime(s) where s is 1+&+[n^i: i in [1..51 by 2]]]; // Vincenzo Librandi, Jun 28 2014
CROSSREFS
Cf. A049407, similar sequences listed in A244376.
Sequence in context: A360203 A003379 A281247 * A061636 A266177 A135326
KEYWORD
nonn,easy
AUTHOR
Artur Jasinski, Dec 13 2006
STATUS
approved