|
6, 9, 11, 21, 29, 33, 36, 49, 64, 66, 68, 80, 110, 113, 144, 240, 266, 270, 309, 348, 365, 366, 394, 426, 438, 459, 471, 474, 479, 485, 501, 548, 553, 570, 593, 660, 684, 699, 704, 725, 729, 743, 783, 798, 801, 809, 815, 820, 824, 833, 841, 891, 900, 931, 968
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[If[PrimeQ[x^14 + x^13 - 1], Print[x]], {x, 1, 600}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|