求助,变分推导
mathematica吧
全部回复
仅看楼主
level 2
wzb198910ab 楼主
文献中遇到一个变分公式:
希望通过mathmatica进行过程推导,命令如下:
Needs["VariationalMethods`"]
VariationalD[f[p[x, y, t]] + 0.5 k (Del[p[x, y, t], {x, y}])^2, p[x, y, t], {x, y, t}]
结果如下:
Derivative[1][f][p[x, y, t]] + 1. k Del[p[x, y, t], {x, y}]
\!\(\*SuperscriptBox[\(Del\),
TagBox[
RowBox[{"(",
RowBox[{"1", ",",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}], ")"}],
Derivative],
MultilineFunction->None]\)[p[x, y, t], {x, y}]
截图如下:
存在如下问题:
1. 如何理解结果中 Del(1,{0,0})?是不是可以认为就是一个梯度符?
2.结果中中间符号位“+”,和文献中的符号不符?请问是我输入的哪里有问题么?
2017年07月15日 15点07分 1
吧务
level 15
……Mathematica里的Del虽然看上去是个梯度算子,但它并不是梯度函数。(你当然可以给它追加定义让它变成梯度函数,但那是另一回事。)总之你看看Grad的帮助。
2017年08月04日 17点08分 2
1