OFFSET
0,5
COMMENTS
Description format taken from Leroy Quet's OR and AND gate sequences for consistency.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..16383
MATHEMATICA
Table[f = IntegerDigits[x, 2]; f = f + Reverse[f]; FromDigits[ Table[If[Positive[f[[r]]], 0, 1], {r, 1, Length[f]}], 2], {x, STARTPOINT, ENDPOINT}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Dylan Hamilton, Oct 15 2010
STATUS
approved