A124185 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 is prime.

182, 219, 393, 468, 629, 638, 755, 824, 960, 965, 984, 1002, 1053, 1068, 1095, 1110, 1140, 1209, 1233, 1269, 1457, 1518, 1539, 1547, 1590, 1622, 1659, 1707, 1797, 1818, 2174, 2259, 2333, 2799, 2975, 3032, 3074, 3272, 3285, 3338, 3368, 3477, 3564, 4118

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..850

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], Print[n]], {n, 1, 1400}]
Select[Range[5000], PrimeQ[Total[#^Range[1, 27, 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..27 by 2]]]; // Vincenzo Librandi, Jun 28 2014
(PARI) is(n)=isprime(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) \\ Charles R Greathouse IV, Feb 20 2017

Crossrefs

Cf. A049407, similar sequences listed in A244376.

Sequence in context: A204378 A054572 A054985 * A218563 A145297 A056091

Adjacent sequences: A124182 A124183 A124184 * A124186 A124187 A124188

Keyword

nonn,easy

Author

Artur Jasinski, Dec 13 2006

Status

approved