| 查看: 179 | 回复: 1 | |||
| 当前主题已经存档。 | |||
jily木虫 (正式写手)
|
[交流]
Mathematica求解的问题
|
||
|
一个有三个方程的方程组，其中包含 dw，dT，dN和dq四个变量，需要借助于Mathematica化简该方程组，使之成为分别以dw/dq=..., dT/dq=..., dN/dq=...表示的三个方程，具体如附件的图片所示。 按照作者所提供的Mathematica源程序运行，总是提示所输入的公式存在“is not a well-formed equation.”错误。由于本人对该软件完全不懂，求高人指点。 顺便问一下，Matlab里有能实现上述功能的函数？？若有，还望指点一二。谢谢！ 附上Mathematica源程序： Clear[w,q,y,a,b,u,T,p] -u*dN*a*Cos[w]*Cos[q]+dN*Sin[q]+u*dN*b*Sin[w]*Cos[q]-T*dq*Cos[w]*Sin[q]+dT*Cos[w]*Cos[q]-T*dw*Sin[w]*Cos[q]==0 u*dN*a*Sin[w]+u*dN*b*Cos[w]-T*dw*Cos[w]-dT*Sin[w]==0 u*dN*a*Cos[w]*Sin[q]+dN*Cos[q]+u*dN*b*Sin[w]*Sin[q]-T*dq*Cos[w]*Cos[q]+T*dw*Sin[w]*Sin[q]-dT*Cos[w]*Sin[q]==0 Solve[{%#,%#,%#},{dw,dT,dN}] Simplify[%#]  [ Last edited by jily on 2009-12-21 at 19:18 ] |
回复此楼» 猜你喜欢
336材料与化工085600求调剂
已经有21人回复
-
材料与化工专硕306分找合适调剂
已经有17人回复
-
278求调剂
已经有10人回复
-
266求调剂
已经有7人回复
-
生物学308分求调剂（一志愿华东师大）做过分子实验
已经有5人回复
-
一志愿0703化学招61最终排名62化学求调剂
已经有5人回复
-
259求调剂
已经有4人回复
-
一志愿211，化学学硕，310分，本科重点双非，求调剂
已经有7人回复
-
071000生物学，一志愿深圳大学296分，求调剂
已经有13人回复
-
287求调剂
已经有8人回复
★ ★ ★ ★ ★ ★
jily(金币+6,VIP+0):谢谢关注！同时鼓励新虫。:-) 这个问题已通过其他途径解决了。 1-11 13:29
jily(金币+6,VIP+0):谢谢关注！同时鼓励新虫。:-) 这个问题已通过其他途径解决了。 1-11 13:29
|
感觉是solve命令中的问题。试试下面的命令，看能不能运算 先让3个等式都除以dq Clear[w,q,y,a,b,u,T,p] (*Comment: dNq=dN/dq, dwq=dw/dq,dTq=dT/dq*) eq1=-u*dNq*a*Cos[w]*Cos[q]+dNq*Sin[q]+u*dNq*b*Sin[w]*Cos[q]-T*Cos[w]*Sin[q]+dTq*Cos[w]*Cos[q]-T*dwq*Sin[w]*Cos[q]; eq2=u*dNq*a*Sin[w]+u*dNq*b*Cos[w]-T*dwq*Cos[w]-dTq*Sin[w]; eq3=u*dNq*a*Cos[w]*Sin[q]+dNq*Cos[q]+u*dNq*b*Sin[w]*Sin[q]-T*Cos[w]*Cos[q]+T*dwq*Sin[w]*Sin[q]-dTq*Cos[w]*Sin[q]; Solve[{eq1==0,eq2==0,eq3==0},{dNq,dwq,dTq}] PS: symbolic的运算Matlab要用symbol定义变量，不如直接用Mathematica或者Maple，除非没有这些软件。 |
2楼2009-12-31 00:11:09
