Mathematica基础——三重积分

 时间:2024-10-20 10:46:59

1、先来画图:RegionPlot3D[x^2+y^2<=z<=1,{x,-1,1},{y,-1,1},{z,-0.5,1.5}

Mathematica基础——三重积分

2、求zhege图形的体积:Integrate[Boole[x^2+y^2<=z<=1],{x,-Infinity,Infinity},{y,-Infinity,Infinity},{z,-Infinity,Infinity}]

Mathematica基础——三重积分

3、如果每一个点的密度都是该点的竖坐标,求这个“物体”的质量:Integrate[z Boole[x^2+y^2<=z<=1], {x,-Infinity,Infinity}, {y,-Infinity,Infinity}, {z,-Infinity,Infinity}]

Mathematica基础——三重积分

4、计算三重积分,题目如下图。Integrate[(x^2+y^2) Boole[x^2+y^2<=4&&Sqrt[x^2+y^2]<=z<=2], {x,-Infinity,Infinity}, {y,-Infinity,Infinity}, {z,-Infinity,Infinity}]

Mathematica基础——三重积分
Mathematica基础——三重积分

5、对Sqrt[x^2+y^2+z^2]求积分,积分区域是x^2+y^2+z^2<=z。直接积分:Integrate[Sqrt[x^2+y^2+z^2] Boole[x^2+y^2+z^2<=z ] , {x,-Infinity,Infinity}, {y,-Infinity,Infinity}, {z,-Infinity,Infinity}]

Mathematica基础——三重积分

6、转而尝试球坐标变换:令:{x->r Sin[u] Cos[v],y->r Sin[u] Sin[v],z->r Cos[u]}于是有:dx dy dz->(r^2)Sin[u] dr du dv原题可以化为:Integrate[r^2 Sin[u] Sqrt[x^2+y^2+z^2]/.{x->r Sin[u] Cos[v],y->r Sin[u] Sin[v],z->r Cos[u]},{v,0,2 Pi},{u,0,Pi/2},{r,0,Cos[u]}]

Mathematica基础——三重积分
  • c语言如何生成随机数
  • linspace(a,b,c)什么意思
  • 长除法怎么除
  • Mathematica 积分公式输入详解
  • 怎么通过电位判断pnp和npn
  • 热门搜索
    关于运动的手抄报 中华传统美德手抄报 卫生手抄报图片 人防手抄报 书的海洋手抄报 历史手抄报版面设计图 读书手抄报图片大全 愚人节手抄报 伊索寓言手抄报 快乐数学手抄报