|
|
A179405
|
|
n-th derivative of x^(x^(x^x)) at x=1.
|
|
19
|
|
|
1, 1, 2, 9, 56, 360, 2934, 26054, 269128, 3010680, 37616880, 504880992, 7387701672, 115228447152, 1929016301016, 34194883090440, 643667407174464, 12757366498618176, 266426229010029696, 5830527979298793024, 133665090871032478080, 3197905600674249843840
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
a:= n-> n!*coeff(series(subs(x=x+1, x^(x^(x^x)) ), x, n+1), x, n):
|
|
MATHEMATICA
|
f[n_] := D[ x^(x^(x^x)), {x, n}] /. x -> 1; Array[f, 18, 0]
Range[0, 21]! CoefficientList[ Series[(1 + x)^(1 + x)^(1 + x)^(1 + x), {x, 0, 21}], x] (* Robert G. Wilson v, Feb 03 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|