|
Search: id:A123385
|
|
| |
|
| 2, 18, 288, 7200, 259200, 12700800, 812851200, 65840947200, 6584094720000, 796675461120000, 114721266401280000, 19387894021816320000, 3800027228275998720000, 855006126362099712000000
(list; graph; listen)
|
|
|
OFFSET
|
2,1
|
|
|
FORMULA
|
a(n) = Sum[Product[k, {k, i, n}]*a(i), {i, 0, n - 1}].
|
|
MATHEMATICA
|
f[0] = 0; f[1] = 1; f[n_] := f[n] = Sum[Product[k, {k, i, n}]*f[i], {i, 0, n - 1}] Table[f[n], {n, 0, 30}]
|
|
CROSSREFS
|
Sequence in context: A127134 A131455 A084947 this_sequence A121564 A092563 A087215
Adjacent sequences: A123382 A123383 A123384 this_sequence A123386 A123387 A123388
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Gary Adamson (qntmpkt(AT)yahoo.com), Oct 13 2006
|
|
|
Search completed in 0.002 seconds
|
