login
Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^37 is prime.
2

%I #9 Sep 08 2022 08:46:08

%S 10,192,244,442,474,480,654,840,862,892,904,978,1152,1164,1248,1428,

%T 1438,1564,1618,1792,1878,2142,2368,2398,2488,2880,3228,3592,3610,

%U 3708,3910,3928,4102,4210,4318,4432,4464,5118,5748,5842,6052,6060,6064,6262,6804

%N Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^37 is prime.

%H Vincenzo Librandi, <a href="/A244385/b244385.txt">Table of n, a(n) for n = 1..600</a>

%t Select[Range[7000], PrimeQ[Total[#^Range[1, 37, 2]] + 1]&]

%o (Magma) [n: n in [0..7000] | IsPrime(s) where s is 1+&+[n^i: i in [1..37 by 2]]];

%Y Cf. similar sequences listed in A244376.

%K nonn,easy

%O 1,1

%A _Vincenzo Librandi_, Jun 27 2014