|
|
A075883
|
|
a(1) = a(2) = 1; a(n) = a(n-1) + a(n-2)! for n > 2.
|
|
1
|
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {1, 1}; For[i = 3, i <= 8, i++, c = (a[[i - 1]] + a[[i - 2]]!); a = Append[a, c]]; a
RecurrenceTable[{a[1]==a[2]==1, a[n]==a[n-1]+a[n-2]!}, a, {n, 8}] (* Harvey P. Dale, Apr 22 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|