fibonomial weekend teaser

[Ralf Stephan]

> A010048(n,6) =
> %F A001658 (1/30000) [L(6n+21) + 8(-1)^nL(4n+14) - 40L(2n+7) - 60(-1)^n ].

A pity, it is 'only' a recurrence, the coefficients are the fibonomials
themselves. The quotient number on the left is 5^[k/2]*Prod[i=1,k,F(i)],
which I'll submit shortly.

? for(n=0,20,print1((fibonacci(7*n+28)+13*(-1)^n*fibonacci(5*n+20)-104*fibonacci(3*n+12)-260*(-1)^n*fibonacci(n+4))/390000","))
1,21,714,19635,582505,16776144,488605194,14169550626,411591708660,

? for(n=0,20,print1((lucas(8*n+36)+21*(-1)^n*lucas(6*n+27)-273*lucas(4*n+18)-1092*(-1)^n*lucas(2*n+9)+1820)/40950000","))
1,34,1870,83215,3994320,186135312,8771626578,411591708660,19344810307020,


ralf



MIME-Version: 1.0