Labfans是一个针对大学生、工程师和科研工作者的技术社区。 论坛首页 | 联系我们(Contact Us)
MATLAB爱好者论坛-LabFans.com
返回   MATLAB爱好者论坛-LabFans.com > 工程数学软件 > Mathematica论坛
Mathematica论坛 Mathematica是比较流行的符号运算软件之一
回复
 
主题工具 显示模式
旧 2009-06-05, 19:38   #1
TankGun
初级会员
 
注册日期: 2009-06-05
年龄: 46
帖子: 3
声望力: 0
TankGun 正向着好的方向发展
默认 Why 它不能得到正确的结果

请各位高手给看看,为什么?应该怎么作?
上传的图像
文件类型: jpg image001.jpg (5.7 KB, 3 次查看)
文件类型: jpg image002.jpg (8.5 KB, 8 次查看)
文件类型: jpg image003.jpg (15.4 KB, 7 次查看)
文件类型: jpg image004.jpg (8.6 KB, 5 次查看)
文件类型: jpg image005.jpg (4.9 KB, 3 次查看)
TankGun 当前离线   回复时引用此帖
旧 2009-08-28, 21:48   #2
liu16
初级会员
 
注册日期: 2009-07-30
帖子: 6
声望力: 0
liu16 正向着好的方向发展
默认 回复: Why 它不能得到正确的结果

不知道是不是这个意思.
In[1]:= U[\[Xi]_] := \!\(
\*UnderoverscriptBox[\(\[Sum]\), \(m = 0\), \(2\)]\(\[Alpha][m]
\*SuperscriptBox[\((
\*FractionBox[\(\(G'\)[\[Xi]]\), \(G[\[Xi]]\)])\), \(m\)]\)\)

In[2]:= U'[\[Xi]]

Out[2]= -((\[Alpha][1]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^2)/G[\[Xi]]^2) - (2 \[Alpha][2]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^3)/G[\[Xi]]^3 + (\[Alpha][1]
\!\(\*SuperscriptBox["G", "\[Prime]\[Prime]",
MultilineFunction->None]\)[\[Xi]])/G[\[Xi]] + (2 \[Alpha][2]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]
\!\(\*SuperscriptBox["G", "\[Prime]\[Prime]",
MultilineFunction->None]\)[\[Xi]])/G[\[Xi]]^2

In[3]:= t = G''[\[Xi]] -> -\[Lambda] G'[\[Xi]] - \[Mu] G[\[Xi]]

Out[3]=
\!\(\*SuperscriptBox["G", "\[Prime]\[Prime]",
MultilineFunction->None]\)[\[Xi]] -> -\[Mu] G[\[Xi]] - \[Lambda]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]

In[4]:= %% /. t

Out[4]= -((\[Alpha][1]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^2)/G[\[Xi]]^2) - (2 \[Alpha][2]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^3)/
G[\[Xi]]^3 + (\[Alpha][1] (-\[Mu] G[\[Xi]] - \[Lambda]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]))/G[\[Xi]] + (2 \[Alpha][2]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]] (-\[Mu] G[\[Xi]] - \[Lambda]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]))/G[\[Xi]]^2

In[5]:= PowerExpand[% // Apart // Cancel, G'[\[Xi]]/G[\[Xi]]]

Out[5]= -\[Mu] \[Alpha][
1] - ((\[Lambda] \[Alpha][1] + 2 \[Mu] \[Alpha][2])
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]])/
G[\[Xi]] - ((\[Alpha][1] + 2 \[Lambda] \[Alpha][2])
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^2)/G[\[Xi]]^2 - (2 \[Alpha][2]
\!\(\*SuperscriptBox["G", "\[Prime]",
MultilineFunction->None]\)[\[Xi]]^3)/G[\[Xi]]^3
liu16 当前离线   回复时引用此帖
回复


发帖规则
不可以发表新主题
不可以发表回复
不可以上传附件
不可以编辑自己的帖子

启用 BB 代码
论坛启用 表情符号
论坛启用 [IMG] 代码
论坛禁用 HTML 代码



所有时间均为北京时间。现在的时间是 02:36


Powered by vBulletin
版权所有 ©2000 - 2025,Jelsoft Enterprises Ltd.