|
抵消
|
1,3
|
|
参考文献
|
C.G.Lekkerkerker、Voorstelling van natuurlijke getallen door een som van getallen van Fibonacci、Simon Stevin第29卷,1952年,第190-195页。
E.Zeckendorf,《自然命名代表》,第179-182页。
|
|
链接
|
|
|
例子
|
斐波那契基柱是。。。,8,5,3,2,1,列条目为0或1,没有两个连续的条目(Zeckendorf表示法),因此每个n都有一个唯一的表示法。
12在序列中,因为12=8+3+1=10101碱基Fib;14=13+1=100001基光纤。
|
|
数学
|
zeck[n_Integer]:=块[{k=天花板[Log[GoldenRatio,n*Sqrt[5]],t=n,fr={}},而[k>1,如果[t>=Fibonacci[k],AppendTo[fr,1];t=t-斐波纳契[k],附录[fr,0]];k——];FromDigits[fr]];a={};Do[z=zeck[n];如果[FromDigits[Reverse[IntegerDigits[z]]]==z,AppendTo[a,n]],{n,1123}];一个(*罗伯特·威尔逊v2004年5月29日*)
mirror[dig_,s_]:=连接[dig,s,反向[dig]];select[v_,mid_]:=选择[v,Length[#]==0||Last[#]!=中期&];fib[dig_]:=加号@@(dig*Fibonacci[Range[2,Length[dig]+1]]);pals=Rest[IntegerDigits/@FromDigits@@Select[Tuples[{0,1},7],SequenceCount[#,{1,1}]==0&]];联盟@加入[{0,1},fib/@Join[mirror[#,{}]和/@(select[pals,1]),mirror[#,{1}]和/@(selection[pales,1](*阿米拉姆·埃尔达尔2020年1月11日*)
|
|
黄体脂酮素
|
(Python)
从sympy导入fibonacci
定义a(n):
k=0
x=0
当n>0时:
k=0
而斐波那契(k)<=n:k+=1
x+=10**(k-3)
n-=斐波那契(k-1)
返回x
定义正常(n):
x=str(a(n))
返回x==x[::-1]
打印([n代表范围(1101)中的n,如果正常(n)])#因德拉尼尔·戈什2017年6月7日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|