s***e 发帖数: 911 | 1 Try:
tmp=DSolve[{Dt[f[x], x] == -k1 f[x] + k1 g[x], Dt[g[x], x] == -k2 g[x] +k1 f[x],
f[0] == a, g[0] == b}, {f[x], g[x]}, x];
Simplify[tmp]. | s***e 发帖数: 911 | 2
数学表达式本来就根据目的不同有多种简单形式. Simpilify命令一般给出
mathematica所能变换出的所谓最简形式. 关于划简的命令很多, 组合使用
需要经验. 这Simplify在不涉及三角函数和一些特殊函数的时候十分好用.
直接写成函数f[n]不就可以了? 加命令是Sum,e.g.,
Sum[f[n],{n,1,10}] |
|