搜索: 编号:a331192
|
|
|
|
0, 1, 4, 6, 12, 22, 33, 64, 88, 174, 232, 462, 609, 1216, 1596, 3190, 4180, 8358, 10945, 21888, 28656, 57310, 75024, 150046, 196417, 392832, 514228, 1028454, 1346268, 2692534, 3524577, 7049152, 9227464, 18454926, 24157816, 48315630, 63245985, 126491968, 165580140
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
显然,形式F(2*k-1)-1(k>0)和形式2*F(2xk-1)-4(k>1)的数的并集,其中F(m)是第m个斐波那契数。
形式F(2*k-1)-1的数字具有相同的Zeckendorf和双重Zeckenderf表示。对于k>1,表示为1010…01,k-1 1与k-2 0交错。
|
|
链接
|
|
|
例子
|
6是一个术语,因为它的Zeckendorf表示1001和它的对偶Zeckenderf表示111都是回文。
|
|
数学
|
mirror[dig_,s_]:=连接[dig,s,反向[dig]];
select[v_,mid_]:=选择[v,Length[#]==0||Last[#]!=中期&];
fib[dig_]:=加号@@(dig*Fibonacci[Range[2,Length[dig]+1]]);
ndig=12;pals1=Rest[IntegerDigits/@FromDigits@@Select[Tuples[{0,1},ndig],SequenceCount[#,{1,1}]==0&]];
zeckPals=Union@Join[{0,1},fib/@Join[镜像[#,{}]&/@(选择[pals1,1]),镜像[#、{1}]//@(选择[pals1,1];
pals2=Join[{{}},Rest[Select[IntegerDigits[Range[0,2^ndig-1],2],SequenceCount[#,{0,0}]==0&]]];
dualZeckPals=联盟@加入[{0},fib/@Join[mirror[#,{}]&/@(select[pals2,0]),mirror[#,{0}]&/@(selection[pals 2,0]]),micrror[#,{1}]&/@pals2]];
交集[zeckPals,dualZeckPals]
|
|
交叉参考
|
囊性纤维变性。A000045号,A000071号,A002113号,A006995号,A014190美元,A027941号,A048268号,A060792号,A095309号,A104326号,A329459型。
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.007秒内完成
|