A124208 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 + n^53 + n^55 + n^57 + n^59 is prime.

1, 2, 34, 43, 64, 76, 80, 160, 194, 276, 416, 620, 625, 832, 996, 1022, 1251, 1341, 1345, 1356, 1435, 1461, 1475, 1672, 1694, 1700, 1733, 1769, 1777, 1782, 1796, 1808, 1997, 2144, 2239, 2245, 2260, 2270, 2273, 2411, 2573, 2659, 2679, 2829, 3396, 3497, 3516

Offset

1,2

Links

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

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 + n^53 + n^55 + n^57 + n^59], Print[n]], {n, 1, 2400}]
Select[Range[5000], PrimeQ[Total[#^Range[1, 59, 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..59 by 2]]]; // Vincenzo Librandi, Jun 28 2014

Crossrefs

Cf. A049407, similar sequences listed in A244376.

Sequence in context: A062864 A249487 A211001 * A077310 A177051 A067130

Adjacent sequences: A124205 A124206 A124207 * A124209 A124210 A124211

Keyword

nonn,easy

Author

Artur Jasinski, Dec 13 2006

Status

approved