%I#26 2025年1月5日19:51:39
%S 0,1,2,4,7,8,11,12,13,14,18,19,20,22,23,24,29,30,31,33,36,38,39,40,47,
%电话:48,49,51,54,55,58,59,62,64,65,66,76,77,78,80,83,84,87,88,89,90,94,95,
%电话96,97100101104106107108123125127130131134136137141142
%g.f.Product_{k>=2}(1-x^{f_k})中的N个指数,其中f_k是斐波那契数。
%H F.Ardila,<a href=“http://arXiv.org/abs/math.CO/0409418“>斐波那契幂级数的系数,arXiv:math/0409418[math.CO],2004。
%H N.Robbins,<a href=“https://web.archive.org/web/2024*/https://www.fq.math.ca/Scanned/34-4/robbins.pdf“>斐波那契分区,《斐波那奇季刊》,34.4(1996),第306-313页。
%H Yufei Zhao,<a href=“https://web.archive.org/web/2024*/https://www.fq.math.ca/Papers1/46_47-1/Zhao_12-08.pdf“>截断斐波那契幂级数的系数,Fib.Q.,46/47(2008/2009),53-55。
%e 1-x-x ^2+x ^4+x ^7-x ^8+x ^11-x ^12-x ^13+x ^14+x ^18-x ^19-x ^20+x ^22+x ^23-x ^24+x ^29-x ^30-x ^31+x ^33+x ^36-x ^38-x ^39+x ^40+x ^47-。..
%t kmax=150;指数[#,x]和/@List@@(乘积[1-x^斐波那契[k],{k,2,天花板[FindRoot[Fibonacci[x]==kmax,{x,5}][1,2]]}]+O[x]^kmax//正常)(*Jean-François Alcover_,2018年10月8日*)
%Y参考A000045、A093996。
%K nonn公司
%O 1,3
%A _N.J.A.Sloane,2009年5月30日