1,3
a[0] = 0; a[1] = 1; a[2] = 2; a[n_] := a[n] = a[n - 1] a[n - 2] - a[n - 3]; Table[a[n], {n, 0, 15}] (* From Alonso del Arte, Jan 31 2011 *)
Sequence in context: A153943 A049309 A205118 * A093927 A067088 A065519
Adjacent sequences: A022402 A022403 A022404 * A022406 A022407 A022408
easy,nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 05 2000