OFFSET
1,1
COMMENTS
"Encoded in binary representation" means that a polynomial a(n)*X^n+...+a(0)*X^0 over GF(2) is represented by the binary number a(n)*2^n+...+a(0)*2^0 in Z (where each coefficient a(k) = 0 or 1).
LINKS
FORMULA
Other identities. For all n >= 1:
MATHEMATICA
fQ[n_] := Block[{ply = Plus @@ (Reverse@ IntegerDigits[n, 2] x^Range[0, Floor@ Log2@ n])}, ply == Factor[ply, Modulus -> 2] && n != 2^Floor@ Log2@ n && ! PrimeQ@ n]; Select[ Range@ 840, fQ] (* Robert G. Wilson v, Aug 12 2011 *)
PROG
(PARI)
isA014580(n)=polisirreducible(Pol(binary(n))*Mod(1, 2)); \\ This function from Charles R Greathouse IV
isA091214(n) = (!isprime(n) && isA014580(n));
n = 0; i = 0; while(n < 2^20, n++; if(isA091214(n), i++; write("b091214.txt", i, " ", n)));
\\ The b-file was computed with this program. Antti Karttunen, May 17 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jan 03 2004
EXTENSIONS
Entry revised and name corrected by Antti Karttunen, May 17 2015
STATUS
approved