OFFSET
1,4
MATHEMATICA
a[1] = a[2] = a[3] = 1; a[n_] := a[n - 1]*a[n - 2]*a[n - 3]*(1 + 1/(n - 3)); Table[ a[n], {n, 1, 13}]
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Jul 29 2002
EXTENSIONS
Edited by Robert G. Wilson v, Jul 31 2002
a(11) corrected by Sean A. Irvine, Aug 27 2024
STATUS
approved