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