|
|
A124149
|
|
Prime numbers of the form 1 + k^3 + k^5 + k^7.
|
|
1
|
|
|
105954073, 114494872633, 230670098569, 587323256833, 2800137816001, 34797487127929, 40872837637633, 402298111908169, 504221281783129, 562984315256833, 1874666045511169, 3190972664427073, 6122389282632001
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[If[PrimeQ[1 + n^3 + n^5 + n^7], Print[1 + n^3 + n^5 + n^7]], {n, 1, 1000}]
Select[Table[Total[n^{0, 3, 5, 7}], {n, 200}], PrimeQ] (* Harvey P. Dale, Mar 05 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|