OFFSET
1,1
COMMENTS
LINKS
EXAMPLE
5, which is 101 in binary, encodes polynomial x^2 + 1, which factorizes as (x+1)(x+1) over GF(2), (5 = A048720(3,3)), thus it is reducible in that polynomial ring. Also, its constant term is 1, (not zero), thus 5 is a member of this sequence.
MAPLE
filter:= proc(n) local L, p, x;
L:= convert(n, base, 2);
p:= add(L[i]*x^(i-1), i=1..nops(L));
not (Irreduc(p) mod 2)
end proc:
select(filter, [seq(2*i+1, i=1..100)]); # Robert Israel, Aug 21 2014
PROG
(Scheme, with Antti Karttunen's IntSeq-library)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Antti Karttunen, Aug 20 2014
STATUS
approved