OFFSET
0,4
MATHEMATICA
a[0] = 1; a[1] = 1; a[2] = 1;
a[n_] := a[n] = n!/(a[n - 1]*a[n - 2]*a[n - 3]);
Table[a[n], {n, 0, 40}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jul 16 2024
STATUS
approved