OFFSET
0,2
MATHEMATICA
f[n_] := BitXor[n, 8 n]; Array[f, 60, 0] (* Robert G. Wilson v, Jun 09 2010 *)
PROG
(Python)
def A178734(n): return n^ n<<3 # Chai Wah Wu, Jun 29 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Dmitry Kamenetsky, Jun 08 2010
EXTENSIONS
a(30) onwards from Robert G. Wilson v, Jun 09 2010
STATUS
approved