A254614 - OEIS

%I #10 Aug 07 2023 02:09:56

%S 0,1,3,5,6,7,9,10,11,12,13,15,17,18,19,20,21,23,24,25,27,29,30,31,33,

%T 34,35,36,37,39,40,41,43,45,46,47,48,49,51,53,54,55,57,58,59,60,61,63,

%U 65,66,67,68,69,71,72,73,75,77,78,79,80,81,83,85,86,87,89

%N Union of odd odious (A092246) and evil (A001969) numbers.

%C Complement of A128309 (Even odious numbers).

%e A128309 begins 2,4,8, hence this sequence begins 0,1,3,5,6,7.

%t Select[Range[0, 100], OddQ[#] || !OddQ[DigitCount[#, 2, 1]] &] (* _Amiram Eldar_, Aug 07 2023 *)

%Y Cf. A001969, A092246, A128309, A230709.

%K nonn,base

%O 1,3

%A _Jeremy Gardiner_, Feb 03 2015