%I #4 Jul 31 2024 11:28:43
%S 1,4,24,168,1680,23520,493920,15805440,790272000,62431488000,
%T 7866367488000,1589006232576000,516427025587200000,
%U 270607761407692800000,228934166150908108800000,312953005128291384729600000,691626141333523960252416000000
%N a(n) = (1/5) A374658(n).
%C a(n+1)/a(n) is an integer for n>=0, so (a(n)) is a divisibility sequence.
%t w[n_] := Product[LucasL[k] + 3, {k, 0, n}]
%t (1/5) Table[w[n], {n, 0, 20}]
%Y Cf. A000142, A374654, A374658.
%K nonn
%O 0,2
%A _Clark Kimberling_, Jul 28 2024