Mathematica,要直接给n阶导数表达式难用自定义函数实现DD[k_] := {g=InverseFunction[f][x]; Do[g=D[g, x], {i, k}];g};DD[3]其：g=InverseFunction[f][x]; (** 符号反函数 **)
