|
| |
|
| A353658型 |
| 反对偶矩形数组：第k行列出其斐波那契-卢卡斯表示具有k个项的数字。 |
|
三
|
|
|
|
1, 2, 4, 3, 6, 7, 5, 9, 10, 49, 8, 11, 15, 51, 80, 13, 12, 18, 70, 83, 549, 21, 14, 19, 72, 114, 551, 889, 34, 16, 23, 77, 117, 570, 892, 6094, 55, 17, 26, 79, 125, 572, 923, 6096, 9861, 89, 20, 27, 82, 128, 782, 926, 6115, 9864, 67589
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
n的Fibonacci-Lucas表示，用FL（n）表示，当n>=1时，定义为总和t（1）+t（2）+…+t（k），其中t（1）是最大的斐波那契数(A000045号（n） ，其中n>=2）即<=n，t（2）是最大的卢卡斯数(A000032元（n） ，n>=1），即<=n-t（1）），依此类推；也就是说，贪婪算法被应用于寻找连续最大的斐波那契数和卢卡斯数，顺序交替，求和n。每个正整数在数组中只出现一次。
|
|
|
链接
|
|
|
|
例子
|
西北角：
1 2 3 5 8 13 21 34
4 6 9 11 12 14 16 17
7 10 15 18 19 23 26 27
49 51 70 72 77 79 82 88
80 83 114 117 125 128 133 143
549 551 570 572 782 784 803 805
889 892 923 926 1266 1269 1300 1303
6094 6096 6115 6117 6327 6329 6348 6350
|
|
|
数学
|
fib=地图[Fibonacci，范围[2，51]]；
luc=地图[LucasL，范围[1，50]]；
t=映射[（n=#；fl={}；f=0；l=0；
而[IntegerQ[l]，n=n-f-l；
f=fib[[NestWhile[#+1&，1，fib[#]]<=n&]-1]]；
l=luc[[NestWhile[#+1&，1，luc[[#]]<=n-f&]-1]]；
附加到[fl，{f，l}]]；
{总计[#]，#}&[Select[Flatten[fl]，IntegerQ]]）&，范围[8000]]；
长度[t]；
u=表格[长度[t[[n]][[2]]]，{n，1，长度[t]}]；
取[u，150]
TableForm[表格[扁平[位置[u，k]]，{k，1，8}]]
w[k_，n_]：=压扁[位置[u，k]][[n]]
表[w[n-k+1，k]，{n，8}，{k，n，1，-1}]//扁平
|
|
|
交叉参考
|
|
|
|
关键字
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
