%I #4 Jul 19 2024 19:16:16
%S 1,1,1,6,4,5,6,42,32,45,60,462,384,585,840,6930,6144,9945,15120,
%T 131670,122880,208845,332640,3028410,2949120,5221125,8648640,81767070,
%U 82575360,151412625,259459200,2534779170,2642411520,4996616625,8821612800,88717270950
%N a(n) = n! / (a(n-1) a(n-2) a(n-3)), where a(0) = a(1) = a(2) = 1.
%t a[0] = 1; a[1] = 1; a[2] = 1;
%t a[n_] := a[n] = n!/(a[n - 1]*a[n - 2]*a[n - 3]);
%t Table[a[n], {n, 0, 40}]
%Y Cf. A000142, A007661.
%K nonn
%O 0,4
%A _Clark Kimberling_, Jul 16 2024