%我#13 2018年1月8日15:56:13
%S 1,2,4,8,16,32,52,8813418425434242253065877092210901248,
%电话1438164018342090233425702842315834323762410444384810,
%电话:52105568602264206858734478528292881693529894104481105612584122741288013498141681488615530162981700217754
%N长度N二进制字符串的数量,其中每个前缀要么是一个回文,要么是两个回文的串联。
%e对于n=6,12个缺失字符串是001011001101010011010110011001100101101010及其位补码。
%p g:=proc(L)局部k;
%p如果L=ListTools:-Reverse(L),则返回真fi;
%p代表k从1到nops(L)-1 do
%p如果L[1..k]=ListTools:-Reverse(L[1..k])和L[k+1..-1]=ListTools:-Revverse(L[k+1..-1]),则返回真fi;
%日期:
%p错误
%p端程序:
%p A[0]:=1:S:=[[]]:
%p代表n,从1到55 do
%p S:=选择(g,映射(t->([op(t),0],[op(t),1]),S));
%p A[n]:=nops(S);
%日期:
%p序列(A[i],i=0..55);#_罗伯特·伊斯雷尔,2018年1月3日
%K nonn公司
%0、2
%A _Jeffrey Shallit,2018年1月3日
|