OFFSET
0,14
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..10000
MATHEMATICA
zeck = DigitCount[Select[Range[0, 500], BitAnd[#, 2*#] == 0&], 2, 1]; DigitCount[Range[0, Length[zeck]-1], 2, 1] - zeck (* Jean-François Alcover, Jan 25 2018 *)
CROSSREFS
KEYWORD
base,sign,easy
AUTHOR
Alex Ratushnyak, Dec 05 2012
STATUS
approved