OFFSET
1,2
COMMENTS
Numbers n such that the Maple command genpoly(n,2,t) outputs a polynomial in F_2[t] that is divisible by t(t+1), where F_2 is the finite field with two elements. E.g. a(2)=10 since the polynomial genpoly(10,2,t)=t^3+t = t(t+1)(t+1) in F_2[t] is divisible by the polynomial t(t+1) in F_2[t]
These are the even evil numbers: the intersection of A001968 and A005843. - Tanya Khovanova, May 04 2007
MATHEMATICA
2*Select[Range[0, 120], EvenQ[DigitCount[#, 2, 1]]&] (* Harvey P. Dale, Jun 14 2017 *)
PROG
(PARI) is(n)=n%2==0 && hammingweight(n)%2==0 \\ Charles R Greathouse IV, Mar 22 2013
(PARI) a(n)=4*n--+hammingweight(n)%2*2 \\ Charles R Greathouse IV, Mar 22 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Luis H. Gallardo and Johan Huisman, Jan 07 2007
STATUS
approved