A244385 Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^37 is prime.
10, 192, 244, 442, 474, 480, 654, 840, 862, 892, 904, 978, 1152, 1164, 1248, 1428, 1438, 1564, 1618, 1792, 1878, 2142, 2368, 2398, 2488, 2880, 3228, 3592, 3610, 3708, 3910, 3928, 4102, 4210, 4318, 4432, 4464, 5118, 5748, 5842, 6052, 6060, 6064, 6262, 6804
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..600
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..37 by 2]]];
-
Mathematica
Select[Range[7000], PrimeQ[Total[#^Range[1, 37, 2]] + 1]&]