|
%I #6 Sep 04 2016 03:40:17
%S 1,2,4,10,32,132,718,5124,47728,575316,8940208,178299576,4547802212,
%T 148044149064,6144073801072,324818609118696,21861634817456704,
%U 1872569477046791376,204095509252622560120,28301889241280320588944
%N Row sums of modified Fibonomial triangle A154218.
%H G. C. Greubel, <a href="/A154219/b154219.txt">Table of n, a(n) for n = 0..100</a>
%F a(n) = Sum{k=0..n} ( A010048(n,k)*(1 + F(k)*F(n-k) ) ).
%t f[n_, k_] := Product[Fibonacci[n - j + 1]/Fibonacci[j], {j, k}]; b[n_] := Sum[f[n, i]*(1 + Fibonacci[i]*Fibonacci[n - i]), {i, 0, n}]; Table[b[n], {n, 0, 10}] (* _G. C. Greubel_, Sep 04 2016 *)
%Y Cf. A056569.
%K easy,nonn
%O 0,2
%A _Paul Barry_, Jan 05 2009
|
