求问为什么同一个微分方程软件算出来的和我自己算的不一样
mathematica吧
全部回复
仅看楼主
level 1
如题实在找不出哪里算错了
Simplify[DSolve[\[Omega][\[Theta]] +
2 (\[Omega]^\[Prime]\[Prime])[\[Theta]] +
\!\(\*SuperscriptBox[\(\[Omega]\),
TagBox[
RowBox[{"(", "4", ")"}],
Derivative],
MultilineFunction->None]\)[\[Theta]] ==
Subscript[A, 1]* Cos[3 \[Theta]] , \[Omega][\[Theta]], {\[Theta]}]]
2023年05月06日 13点05分 1
吧务
level 15
2w''[t]这项明显错了好嘛,怎么会是-9。(按-9算也算不出80啊,你到底咋想的?)
2023年05月06日 13点05分 2
对,这里是我少乘以2,应该是64,其实主要是mathematical结果里,特解那个cos项我不知道哪里来的
2023年05月06日 13点05分
回复 慕容哥哥你好 :那一项可以并到前面的常数项里去,并不影响结果的正确性。
2023年05月06日 13点05分
@xzcyr 好的,谢谢,所以对于同样的边值条件是不影响的就好。
2023年05月06日 14点05分
吧务
level 15
顺便说一句,高版本Mathematica(确切地说,至少自版本13.2起)DSolve对这个方程的求解结果有优化,目前的输出已经变成了
ω[θ] -> (C[1] + θ C[2]) Cos[θ] + (C[
3] + θ C[4]) Sin[θ] + 1/64 Cos[3 θ] Subscript[A, 1]
虽正确但多余的 -8 Cos[θ] 项没了。
2023年05月06日 14点05分 3
1