OFFSET
0,4
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..16384 (terms 0..1023 from T. D. Noe)
FORMULA
a(n) = 2 * A048735(n).
MATHEMATICA
Table[BitAnd[n, 2n], {n, 0, 63}] (* Alonso del Arte, Jun 19 2012 *)
PROG
(Python)
for n in range(99):
print(2*n & n, end=", ")
(PARI) a(n) = bitand(n, 2*n); \\ Michel Marcus, Mar 26 2021
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Alex Ratushnyak, Jun 14 2012
STATUS
approved