|
|
A244388
|
|
Numbers k such that 1 + k + k^3 + k^5 + k^7 + k^9 + ... + k^49 is prime.
|
|
2
|
|
|
4, 6, 60, 208, 250, 282, 294, 384, 400, 502, 760, 942, 1032, 1050, 1390, 1560, 2028, 2038, 2124, 2182, 3196, 4246, 4426, 4522, 4932, 4986, 5020, 5092, 5830, 6216, 6634, 6868, 7128, 7156, 7182, 7240, 7356, 7428, 7642, 7858, 8188, 8454, 8500, 8670, 9130
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[10000], PrimeQ[Total[#^Range[1, 49, 2]] + 1] &]
|
|
PROG
|
(Magma) [n: n in [0..10000] | IsPrime(s) where s is 1+&+[n^i: i in [1..49 by 2]]];
|
|
CROSSREFS
|
Cf. similar sequences listed in A244376.
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|