OFFSET
0,2
EXAMPLE
For n = 6 the 12 missing strings are 001011,001101,010011,010110,011001,011010 and their bitwise complements.
MAPLE
g:= proc(L) local k;
if L = ListTools:-Reverse(L) then return true fi;
for k from 1 to nops(L)-1 do
if L[1..k]=ListTools:-Reverse(L[1..k]) and L[k+1..-1] = ListTools:-Reverse(L[k+1..-1]) then return true fi;
od:
false
end proc:
A[0]:= 1: S:= [[]]:
for n from 1 to 55 do
S:= select(g, map(t -> ([op(t), 0], [op(t), 1]), S));
A[n]:= nops(S);
od:
seq(A[i], i=0..55); # Robert Israel, Jan 03 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Jeffrey Shallit, Jan 03 2018
STATUS
approved