| 查看: 1050 | 回复: 11 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
Mathematica 积分的疑问？
|
||
下面三重积分的结果为什么与α[Alpha]无关？  |
回复此楼» 猜你喜欢
299求调剂
已经有8人回复
-
一志愿北京理工大学本科211材料工程294求调剂
已经有6人回复
-
300求调剂，材料科学英一数二
已经有8人回复
-
招收生物学/细胞生物学调剂
已经有5人回复
-
070305高分子化学与物理 304分求调剂
已经有7人回复
-
289求调剂
已经有13人回复
-
一志愿哈尔滨工业大学材料与化工方向336分
已经有9人回复
-
081200-11408-276学硕求调剂
已经有6人回复
-
调剂求院校招收
已经有5人回复
-
调剂310
已经有8人回复
12楼2011-06-28 20:11:46
xiaoqing8569
铁杆木虫 (著名写手)
奥林匹亚光学院院长
- 应助: 37 (小学生)
- 金币: 7414.2
- 散金: 2240
- 红花: 14
- 帖子: 1822
- 在线: 696.6小时
- 虫号: 458097
- 注册: 2007-11-13
- 性别: GG
- 专业: 应用光学
【答案】应助回帖
★ ★
xxppyy(金币+5): 谢谢关注. 2011-06-26 21:37:34
xzhdty(金币+2): 常来程序语言版参与讨论 2011-06-26 23:08:37
xxppyy(金币+5): 谢谢关注. 2011-06-26 21:37:34
xzhdty(金币+2): 常来程序语言版参与讨论 2011-06-26 23:08:37
|
Evaluate[Integrate[ r^2 Sin[\[Phi]], {r, -Subscript[R, 0] Sec[\[Phi]] Tan[\[Beta]], c/(b Sin[\[Phi]] Cos[\[Theta]] - Cos[\[Phi]])}, {\[Phi], Pi/2 + \[Beta], Pi}, {\[Theta], 0, 2 Pi}]] /. {b -> Tan[\[Beta]], c -> Subscript[R, 0] (Tan[\[Alpha]] + Tan[\[Beta]])} // Simplify 我运行的结果：  |
2楼2011-06-26 20:45:53
3楼2011-06-26 21:41:11
xiaoqing8569
铁杆木虫 (著名写手)
奥林匹亚光学院院长
- 应助: 37 (小学生)
- 金币: 7414.2
- 散金: 2240
- 红花: 14
- 帖子: 1822
- 在线: 696.6小时
- 虫号: 458097
- 注册: 2007-11-13
- 性别: GG
- 专业: 应用光学
【答案】应助回帖
★
xxppyy(金币+2): 您用的Mathematica是哪一版本？ 2011-06-27 00:07:43
jjdg(金币+1): 感谢应助 2011-06-27 02:56:33
xxppyy(金币+2): 您用的Mathematica是哪一版本？ 2011-06-27 00:07:43
jjdg(金币+1): 感谢应助 2011-06-27 02:56:33
|
调整一下顺序，上面的积分顺序错了，你试试这个。 Evaluate[Integrate[ r^2 Sin[\[Phi]], {\[Theta], 0, 2 Pi}, {\[Phi], Pi/2 + \[Beta], Pi}, {r, -Subscript[R, 0] Sec[\[Phi]] Tan[\[Beta]], c/(b Sin[\[Phi]] Cos[\[Theta]] - Cos[\[Phi]])}]] /. {b -> Tan[\[Beta]], c -> Subscript[R, 0] (Tan[\[Alpha]] + Tan[\[Beta]])} |
4楼2011-06-26 23:31:22
