OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
MATHEMATICA
Map[FromDigits[IntegerDigits[#, 2]] &, Select[Range[0, 1000], BitXor[6*#, 15*#] == 21*# &]] (* Paolo Xausa, Sep 30 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Feb 01 2006
STATUS
approved