|
Search: id:A057489
|
|
|
| A057489 |
|
Numbers n such that x^n + x^13 + x^12 + x^11 + x^10 + x^9 + x^8 + x^7 + x^6 + x^5 + x^4 + x^3 + x^2 + x + 1 is irreducible over GF(2). |
|
+0
1
|
|
| 15, 21, 25, 42, 43, 48, 60, 97, 106, 133, 147, 148, 178, 201, 252, 253, 327, 513, 570, 732, 763
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[ If[ ToString[ Factor[ x^n + Sum[ x^m, {m, 0, 13} ], Modulus -> 2 ] ] == ToString[ x^n + Sum[ x^m, {m, 0, 13} ] ], Print[ n ] ], {n, 0, 1000} ]
|
|
CROSSREFS
|
Adjacent sequences: A057486 A057487 A057488 this_sequence A057490 A057491 A057492
Sequence in context: A033708 A129926 A020204 this_sequence A070811 A138594 A131651
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 28 2000
|
|
|
Search completed in 0.002 seconds
|
