This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A014580 Binary irreducible polynomials (primes in the ring GF(2)[X]), evaluated at X=2. 95

%I

%S 2,3,7,11,13,19,25,31,37,41,47,55,59,61,67,73,87,91,97,103,109,115,

%T 117,131,137,143,145,157,167,171,185,191,193,203,211,213,229,239,241,

%U 247,253,283,285,299,301,313,319,333,351,355,357,361,369,375

%N Binary irreducible polynomials (primes in the ring GF(2)[X]), evaluated at X=2.

%C Or, binary irreducible polynomials, interpreted as binary vectors, then written in base 10.

%C The numbers {a(n)} are a subset of the set {A206074}. - _Thomas Ordowski_, Feb 21 2014

%H T. D. Noe, <a href="/A014580/b014580.txt">Table of n, a(n) for n = 1..1377</a> (through degree 13)

%H <a href="/index/Ge#GF2X">Index entries for sequences operating on GF(2)[X]-polynomials</a>

%e x^4 + x^3 + 1 -> 16+8+1 = 25. Or, x^4 + x^3 + 1 -> 11001 (binary) = 25 (decimal).

%t 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]; fQ[2] = True; Select[ Range@ 378, fQ] (* _Robert G. Wilson v_, Aug 12 2011 *)

%t Reap[Do[If[IrreduciblePolynomialQ[IntegerDigits[n, 2] . x^Reverse[Range[0, Floor[Log[2, n]]]], Modulus -> 2], Sow[n]], {n, 2, 1000}]][[2, 1]] (* _Jean-François Alcover_, Nov 21 2016 *)

%o (PARI) is(n)=polisirreducible(Pol(binary(n))*Mod(1,2)) \\ _Charles R Greathouse IV_, Mar 22 2013

%Y Cf. A000031, A001037, A048720. Written in binary: A058943.

%Y Characteristic function: A091225. Inverse: A091227. a(n) = A091202(A000040(n)). Almost complement of A091242. Union of A091206 & A091214 and also of A091250 & A091252. First differences: A091223. Apart from a(1) and a(2), a subsequence of A092246 and hence A000069.

%K nonn

%O 1,1

%A David Petry (petry(AT)accessone.com)

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 17 19:58 EST 2019. Contains 319251 sequences. (Running on oeis4.)