A203746 Vandermonde sequence using x^2 + y^2 applied to the Fibonacci numbers (1,2,3,5,...,F(n+1)), where F=A000045.

1, 2, 50, 65000, 43324840000, 80869630778404000000, 3253172252849127885819732800000000, 18269693129769849495456863041081197822240000000000000, 100765626147569183251176439308305100821490845652979377896592000000000000000000

Offset: 1

Author

Clark Kimberling, Jan 05 2012

Keywords

• nonn

Comments

See A093883 for a discussion and guide to related sequences.

Programs

Mathematica

f[j_] := Fibonacci[j]; z = 11;
u := Product[f[j]^2 + f[k]^2, {j, 1, k - 1}]
v[n_] := Product[u, {k, 2, n}]
Table[v[n], {n, 1, z}]          (* A203746 *)
Table[v[n + 1]/v[n], {n, 1, z}] (* A203747 *)