|
|
A244390
|
|
Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^57 is prime.
|
|
2
|
|
|
12, 78, 92, 324, 588, 758, 800, 1248, 1380, 1472, 2324, 2450, 3038, 3930, 4328, 4370, 5580, 5952, 6072, 6164, 6872, 6890, 6918, 7814, 9318, 9734, 9944, 10074, 10122, 10272, 10598, 11070, 11298, 11852, 12054, 12210, 12930
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
f:= unapply(1 + sum(n^(2*j+1), j=0..28), n):
select(isprime @ f, [seq(2*i, i=1..1000)]); # Robert Israel, Jul 13 2014
|
|
MATHEMATICA
|
Select[Range[13000], PrimeQ[Total[#^Range[1, 57, 2]] + 1] &]
|
|
PROG
|
(Magma) [n: n in [0..13000] | IsPrime(s) where s is 1+&+[n^i: i in [1..57 by 2]]];
|
|
CROSSREFS
|
Cf. similar sequences listed in A244376.
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|