%I #5 Sep 11 2024 13:35:46
%S 2,3,18,128,2100,61600,3732480,449880480,111021510600,55916730777600,
%T 57813913372723200,122742264040428032000,535797463154791219200000,
%U 4810427190599491339840000000,88856328051357049141036014736800,3377300175611111321142254817509376000
%N Obverse convolution A000045**A000032; see Comments.
%C See A374848 for the definition of obverse convolution and a guide to related sequences.
%t s[n_] := Fibonacci[n]; t[n_] := LucasL[n];
%t u[n_] := Product[s[k] + t[n - k], {k, 0, n}]
%t Table[u[n], {n, 0, 20}]
%Y Cf. A000032, A000045, A374848.
%K nonn
%O 0,1
%A _Clark Kimberling_, Aug 28 2024