|
38, 47, 51, 91, 102, 139, 150, 203, 207, 212, 218, 225, 237, 245, 263, 269, 278, 280, 283, 297, 300, 302, 303, 337, 357, 367, 370, 382, 404, 405, 408, 411, 425, 452, 456, 472, 496, 509, 514, 595, 605, 619, 626, 630, 670, 693, 707, 714, 735, 771, 773, 799, 854
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[If[PrimeQ[x^13 + x^12 - 1], Print[x]], {x, 1, 600}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|