OFFSET
0,4
MAPLE
f:= x-> cos(x)^sin(x):
b:= proc(n) b(n):= `if`(n=0, f, D(b(n-1))) end:
a:= n-> b(n)(0):
seq (a(n), n=0..20); # Alois P. Heinz, Aug 14 2012
MATHEMATICA
f[x_] := Cos[x]^Sin[x]; Table[Derivative[n][f][0], {n, 25}]
CROSSREFS
KEYWORD
sign
AUTHOR
Michel Lagneau, Aug 14 2012
STATUS
approved