|
| |
|
|
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
| |
|
|
15, 21, 25, 42, 43, 48, 60, 97, 106, 133, 147, 148, 178, 201, 252, 253, 327, 513, 570, 732, 763
(list; graph; refs; listen; history; internal format)
|
|
|
|
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
| Sequence in context: A181780 A129926 A020204 * A070811 A138594 A131651
Adjacent sequences: A057486 A057487 A057488 * A057490 A057491 A057492
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 28 2000
|
| |
|
|
