A244389 Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^53 is prime.
110, 130, 214, 258, 282, 392, 474, 522, 546, 676, 734, 856, 1096, 1116, 1186, 1192, 1376, 1446, 1540, 1552, 1558, 1804, 2032, 2100, 2154, 2474, 2614, 2848, 3092, 4550, 4932, 5000, 5354, 5554, 5604, 5878, 5996, 6136, 6410, 6648
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..430
Crossrefs
Cf. similar sequences listed in A244376.
Programs
-
Magma
[n: n in [0..7000] | IsPrime(s) where s is 1+&+[n^i: i in [1..53 by 2]]];
-
Mathematica
Select[Range[10000], PrimeQ[Total[#^Range[1, 53, 2]] + 1]&]