mathematica使用笔记

一些使用笔记：

1、快捷键与常用操作：

• shift+enter 计算当前行
• 结果复制为mathML可以直接粘贴到word里面
• Clear["`*"]清除原有的所有变量
• (**)注释，快捷键Alt+/

2、解符号方程Solve[]

• 解一个等式：Solve[V - p + b*m - t*(x + m)^2 == 0, x]前面是方程，逗号后面是需要求解的符号
• 解方程组：sol = Solve[ a1*x + b1*y + c1 == 0 && a2*x + b2*y + c2 == 0, {x,y}] 注意两个等号

3、求偏导D[]

D[p (m + (2 Sqrt[t (b m - p + V)])/t), m]

D表示求偏导的函数，逗号前面是表达式，后面是需要求偏导的变量

 ***注意！！！

mathematica里面方括号是函数的括号，圆括号才是式子里面可以写的

4、解不等式组Reduce[]

 Reduce[{逗号连接的不等式组},{逗号连接的参数}]。注意中括号里面都是大括号的字符方程

5、带入参数化简表达式

FullSimplify[表达式，表达式&&表达式]

或者直接输入（分号隔开就不会直接输出）

6、画

Mathematica画图的问题_安吉尼尔的博客-CSDN博客_mathematica画图

现在主要使用的还是Plot和Plot3D

p1 = Plot3D[公式, {b, 0, 1}, {t, 0, 0.5}, PlotRange -> {0, 8}, PlotStyle -> {Red, Dotted, Opacity[.3]}]
p2 = Plot3D[公式, {b, 0, 1}, {t, 0, 0.5}, PlotRange -> {0, 8}, PlotStyle -> {Yellow, Dotted, Opacity[.3]}]
p3 = Plot3D[公式, {b, 0, 1}, {t, 0, 0.5}, PlotRange -> {0, 8}, PlotStyle -> {Blue, Dotted, Opacity[.3]}]
p4 = Plot3D[公式, {b, 0, 1}, {t, 0, 0.5}, PlotRange -> {0, 8}, PlotStyle -> {Blue, Dotted, Opacity[.3]}]
Show[p1, p2, p3, p4]

show函数将上面画的p1234条曲线显示在同一个坐标上

代码注释如下

绘制结果如下