login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A181927 Row square-sums of Fibonomial triangle A010048. 0

%I

%S 1,2,3,10,56,502,6930,157172,5847270,350430420,33789991248,

%T 5280020814732,1338210835193414,548265785425359340,

%U 363248986031094300018,389399454403643525265020,675824289510077938157099920

%N Row square-sums of Fibonomial triangle A010048.

%F a(n) = sum(fibonomial(n,k)^2,k=0..n).

%t FiboFactorial[n_] := Product[Fibonacci[k], {k, 1, n}]

%t Fibonomial[n_, k_] :=

%t If[k > n, 0, FiboFactorial[n]/(FiboFactorial[k] FiboFactorial[n - k])

%t ]

%t Table[Sum[Fibonomial[n, k]^2, {k, 0, n}], {n, 0, 100}]

%t (* _Emanuele Munarini_, Feb 18 2016 *)

%o (Maxima) ffib(n):=prod(fib(k),k,1,n);

%o fibonomial(n,k):=ffib(n)/(ffib(k)*ffib(n-k));

%o makelist(sum(fibonomial(n,k)^2,k,0,n),n,0,30);

%Y Cf. A010048, A056569.

%K nonn

%O 0,2

%A _Emanuele Munarini_, Apr 02 2012

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 10 00:05 EDT 2020. Contains 333392 sequences. (Running on oeis4.)