OFFSET
0,2
MATHEMATICA
a[0] = 1; a[1] = 2; a[n_]/; n>=2 := a[n] = n a[n-1] - a[n-2] + 1; Table[a[n], {n, 0, 15}] - David Callan, Jul 22 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
Ralf Stephan, Nov 06 2004
STATUS
approved