|
| |
|
|
A135844
|
|
Prime numbers p for which quintic polynomial x^5-x-1 modulus p is factorizable into five binomials.
|
|
3
| |
|
|
1973, 3769, 5101, 7727, 8161, 9631, 11903, 14629, 16903, 17737, 17921, 18097, 19477, 20747, 20759, 21727, 22717, 23567, 25037, 26681, 27397, 27529, 28279, 29207, 29959, 30497, 31091, 31319, 33289, 36097, 37463, 39161, 39671, 40151
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| a = {}; Do[poly = PolynomialMod[x^5 - x - 1, Prime[n]]; c = FactorList[poly, Modulus -> Prime[n]]; If[Sum[c[[m]][[2]], {m, 1, Length[c]}] == 6, AppendTo[a, Prime[n]]], {n, 1, 10000}]; a
|
|
|
CROSSREFS
| Cf. A135842, A135843, A135845, A135846, A135847.
Sequence in context: A206218 A153352 A108386 * A135845 A121995 A061998
Adjacent sequences: A135841 A135842 A135843 * A135845 A135846 A135847
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Dec 01 2007
|
| |
|
|
