NSurfaceIntegrate[f,{x,y,…}∈surface]
计算函数 f[x,y,…] 在 surface 上的数值标量曲面积分.
NSurfaceIntegrate[{p,q,…},{x,y,…}∈surface]
计算向量场 {p[x,y,…],q[x,y,…],…} 的数值向量曲面积分.
NSurfaceIntegrate
NSurfaceIntegrate[f,{x,y,…}∈surface]
计算函数 f[x,y,…] 在 surface 上的数值标量曲面积分.
NSurfaceIntegrate[{p,q,…},{x,y,…}∈surface]
计算向量场 {p[x,y,…],q[x,y,…],…} 的数值向量曲面积分.
更多信息和选项
- 曲面积分亦称为通量积分.
- 标量曲面积分在超曲面上对标量函数进行积分. 它们通常用于计算曲面的面积、质量和电荷等.
- 向量曲面积分用于计算向量函数沿其法线方向通过曲面的通量. 典型的向量函数包括流体速度场、电场和磁场.
- 函数 f 在 surface
上的标量曲面积分由下式给出: - … 其中
是参数化曲面元素的度量. - f 在超曲面
上的标量曲面积分由下式给出: - 标量曲面积分与 surface 的参数化和方向无关. 任何
中
维的 RegionQ 对象都可以用作 surface. - 向量函数
在 surface
上的向量曲面积分由下式给出: - … 其中
是向量函数
在法线方向上的投影,因此只对法线方向上的分量进行积分.
在超曲面
上的向量曲面积分由下式给出:- 向量曲面积分与参数化无关,但与方向有关.
- 超曲面的方向由曲面上的法向向量场
给出. - 对于参数化超曲面 ParametricRegion[{r1[u1,…,un-1],…,rn[u1,…,un-1]},…],法向向量场
为 Cross[∂u1r[u],…,∂un-1r[u]]. - Wolfram 语言中的 RegionQ 对象是没有方向的. 但是,为了方便使用此函数,可以假设以下规则来获取有方向的超曲面.
- 对于(维度为
的)实体和有界的 RegionQ 对象 ℛ,将曲面视为区域的边界 (RegionBoundary[ℛ]),且法线方向指向外侧.
中的特殊实体及认定的边界曲面(边)的法线方向包括:-

Triangle 外向法线 
Rectangle 外向法线 
Polygon 外向法线 
Disk 外向法线 
Ellipsoid 外向法线 
Annulus 外向法线
中的特殊实体及认定的边界曲面(面)的法线方向包括:-

Tetrahedron 外向法线 
Cuboid 外向法线 
Polyhedron 外向法线 
Ball 外向法线 
Ellipsoid 外向法线 
Cylinder 外向法线 
Cone 外向法线
中的特殊实体及认定的表面(面)和法线方向包括:-

Simplex 外向法线 
Cuboid 外向法线 
Ball 外向法线 
Ellipsoid 外向法线 - surface 上的坐标可以使用 VectorSymbol 指定. »
- 可给出以下选项:
-
AccuracyGoal Automatic 寻求的绝对准确度 MaxPoints Automatic 样本点的最大数量 MaxRecursion Automatic 递归子划分的最大数量 Method Automatic 要使用的方法 MinRecursion 0 递归子划分的最小数量 PrecisionGoal Automatic 寻求的精度 WorkingPrecision Automatic 内部计算使用的精度
范例
打开所有单元 关闭所有单元基本范例 (6)
NSurfaceIntegrate[x ^ 2, {x, y, z}∈Sphere[]]NSurfaceIntegrate[{x ^ 2, x - y, 1}, {x, y, z}∈Sphere[]]NSurfaceIntegrate[x * y * z ^ 2, {x, y, z}∈ParametricRegion[{1 / 2, u, v}, {{u, 0, 1}, {v, 0, 1}}]]f = {y, -x, z};NSurfaceIntegrate[f, {x, y, z}∈ParametricRegion[{1 / 2, u, v}, {{u, 0, 1}, {v, 0, 1}}]]f = {-x, -y, z};reg = ParametricRegion[{Cos[u], Sin[u], v}, {{u, 0, Pi / 2}, {v, 0, 1}}];NSurfaceIntegrate[f, {x, y, z}∈reg]SliceVectorPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, ...]使用 VectorSymbol:
NSurfaceIntegrate[VectorSymbol["x"].VectorSymbol["x"], VectorSymbol["x"]∈Sphere[]]NSurfaceIntegrate[x, x∈Cube[]]范围 (33)
基本用法 (6)
f = Cos[3x] + 24y ^ 2z ^ 2;reg = Cube[];SliceDensityPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {0, -x Tan[y z], y z};reg = Triangle[{{0, 0, 0}, {1, 0, 0}, {1, 1, 1}}];SliceVectorPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, VectorScaling -> Automatic, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = x y ^ 2 z;reg = ParametricRegion[{Cos[u], Sin[u], v}, {{u, 0, Pi / 2}, {v, 0, 1}}];NSurfaceIntegrate[f, {x, y, z}∈reg]SliceDensityPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, ImageSize -> Small]SurfaceIntegrate 适用于许多特殊曲面:
f = {z + 1, Sin[x + y], y};reg = Ellipsoid[{0, 0, 0}, {1, 2, 3}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x + y ^ 2, Sin[x y z] + y, 0};reg = ParametricRegion[{Cos[u], Sin[u], v}, {{u, 0, 2Pi}, {v, 0, 2}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, 0, 2}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]SurfaceIntegrate 还适用于其他维度:
f = {x ^ 2, y};reg = ParametricRegion[{Cos[t], Sin[t]}, {{t, 0, Pi}}];Show[VectorPlot[f, {x, -1, 1}, {y, 0, 1}, ...], ...]NSurfaceIntegrate[f, {x, y}∈reg]标量函数 (5)
f = x y ^ 2 z - Sin[x - 6z];reg = ParametricRegion[{u + 1 / 4v ^ 2, u - v, u}, {{u, 0, 1}, {v, 0, 1}}];SliceDensityPlot3D[f, reg, {x, 0, 3 / 2}, {y, -1, 1}, {z, 0, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = Sin[x + y];reg = Triangle[{{0, 0, 0}, {2, 1, 1}, {0, 3, 2}}];SliceDensityPlot3D[f, reg, {x, 0, 2}, {y, 0, 3}, {z, 0, 5 / 2}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = z ^ 2 / (x - 2) + x y;reg = Sphere[];SliceDensityPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = E ^ (x - x y z)Tan[x / 10];reg = Pyramid[{{0, 0, 0}, {0, 1, 0}, {1, 1, 0}, {1, 0, 0}, {1 / 2, 1 / 2, 1}}];SliceDensityPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = Sin[x ^ 2 + y ^ 2 + z ^ 2]Exp[x y z]ArcTan[-x];reg = ParametricRegion[{u, v, u ^ 2 - v ^ 2}, {{u, 0, 1}, {v, 0, 1}}];SliceDensityPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, -1, 1}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]向量函数 (5)
f = {x ^ 2, -ArcCos[y / 3], z};reg = Sphere[{0, 0, 0}, 2];SliceVectorPlot3D[f, reg, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x + y, 2x, ArcSin[x / 3]};reg = Triangle[{{0, 0, 0}, {-1, 1, 1}, {2, 1, -1}}];SliceVectorPlot3D[f, reg, {x, -1, 2}, {y, 0, 1}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {ArcTan[z(x + z)], -z(y + z), z};reg = ParametricRegion[{u, v, u ^ 2 - v ^ 2}, {{u, 0, 1}, {v, 0, 1}}];SliceVectorPlot3D[f, reg, {x, 0, 1}, {y, 0, 1}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x, y, 0};reg = Ellipsoid[{0, 0, 0}, {1, 2, 3}];SliceVectorPlot3D[f, reg, {x, -2, 2}, {y, -2, 2}, {z, -3, 3}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x + y, x + z, y + z};reg = Cone[{{0, 0, 0}, {0, 0, 1}}, 1];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, 0, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]//Quiet特殊曲面 (10)
f = {ArcTan[x + 2y], y + 2 z, x + 2z};reg = Sphere[{0, 0, 0}, 1];NSurfaceIntegrate[f, {x, y, z}∈reg]向量场在以原点为中心、边长为 2 的立方体边界上的曲面积分:
f = {x / 3, y / 3, z};reg = Cube[2];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {E ^ x, x + y, y};reg = Tetrahedron[];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {Sin[x y], Cos[y]Tan[z], x + y};reg = Triangle[{{0, 0, 0}, {1, 0, 0}, {1, 0, 1}}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x, y, z};reg = Ellipsoid[{0, 0, 0}, {1, 2, 3}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x + y, BesselJ[1, y ^ 2 / 3], z};reg = Cone[{{0, 0, 0}, {1, 0, 0}}, 2];NSurfaceIntegrate[f, {x, y, z}∈reg]//Quietf = {x + y, (x + y ^ 2) ^ 2, z};reg = Cylinder[{{0, 0, 0}, {1, 0, 0}}, 2];NSurfaceIntegrate[f, {x, y, z}∈reg]//Quietf = {x + y, (x + y ^ 2) ^ 2ArcTan[z], z};reg = Parallelepiped[{0, 0, 0}, {{1, 0, 0}, {1, 2, 0}, {0, 0, 1}}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x, (x + y ^ 2) ^ 2ArcTan[z], z};reg = Prism[{{0, 0, 0}, {1, 0, 0}, {0, 1, 0}, {0, 0, 1}, {2, 0, 1}, {0, 2, 1}}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {0, 0, 1 - z};reg = Polygon[Table[{Cos[2 π k / 6], Sin[2 π k / 6], 0}, {k, 0, 5}]];Show[VectorPlot3D[f, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, Rule[...]], ...]NSurfaceIntegrate[f, {x, y, z}∈reg]reg2 = Polygon[Reverse@Table[{Cos[2 π k / 6], Sin[2 π k / 6], 0}, {k, 0, 5}]];NSurfaceIntegrate[f, {x, y, z}∈reg2]参数化曲面 (4)
f = {x + y, y - z, x - z};reg = ParametricRegion[{Sin[u]Cos[v], u, v}, {{u, 0, 1}, {v, 0, 1}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, 0, 1}, {z, 0, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {-x(x ^ 2 + y ^ 2 + z ^ 2), y(x ^ 2 + y ^ 2 + z ^ 2), z(x ^ 2 + y ^ 2 + z ^ 2)};reg = ParametricRegion[{u, v, Sqrt[1 - u ^ 2 - v ^ 2]}, {{u, 0, 1}, {v, -Sqrt[1 - u ^ 2], Sqrt[1 - u ^ 2]}}];SliceVectorPlot3D[f, reg, {x, 0, 1}, {y, -1, 1}, {z, 0, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x + x ArcTan[x y], Cos[x + y]Tan[z / 2], ArcTan[x y]};reg = ParametricRegion[{Cos[u], Sin[u], v}, {{u, 0, 2Pi}, {v, 0, 2}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, 0, 2}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x, y ^ 10, z};reg = ParametricRegion[{Cosh[u]Cos[v], Cosh[u]Sin[v], Sinh[u]}, {{v, 0, 2Pi}, {u, -1, 1}}];SliceVectorPlot3D[f, reg, {x, -3 / 2, 3 / 2}, {y, -3 / 2, 3 / 2}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]超曲面 (3)
f = {x, y};Show[VectorPlot[f, {x, -1, 1}, {y, 0, 1}, ...], ...]NSurfaceIntegrate[f, {x, y}∈ParametricRegion[{Cos[t], Sin[t]}, {{t, 0, Pi}}]]NSurfaceIntegrate[{Exp[-x], x, 0, 1}, {x, y, z, w}∈ParametricRegion[{2u, 3t, 4u, 5v}, {{t, 0, 1}, {u, 0, Infinity}, {v, 0, 1}}]]NSurfaceIntegrate[{x / 5, y / 5, z / 5, t / 5, u / 5}, {x, y, z, t, u}∈Sphere[5]]选项 (8)
AccuracyGoal (1)
选项 AccuracyGoal 设置准确度的位数:
exact = SurfaceIntegrate[{y, x, 0}, {x, y, z}∈ParametricRegion[{t, u, 0}, {{t, 0, 1}, {u, 0, 1}}]]NSurfaceIntegrate[{y, x, 0}, {x, y, z}∈ParametricRegion[{t, u, 0}, {{t, 0, 1}, {u, 0, 1}}], AccuracyGoal -> 15] - exact默认设置仅设定 PrecisionGoal:
NSurfaceIntegrate[{y, x, 0}, {x, y, z}∈ParametricRegion[{t, u, 0}, {{t, 0, 1}, {u, 0, 1}}]] - exactMaxPoints (1)
MaxRecursion (1)
选项 MaxRecursion 指定最大递归步骤数:
NSurfaceIntegrate[{Log[x^2z], ArcTan[Sin[y^3 + x z]], 4x }, {x, y, z}∈Sphere[], MaxRecursion -> 3]NSurfaceIntegrate[{Log[x^2z], ArcTan[Sin[y^3 + x z]], 4x }, {x, y, z}∈Sphere[], MaxRecursion -> 30]Method (1)
选项 Method 可接受与 NIntegrate 同样的值. 例如:
NSurfaceIntegrate[{-Sin[x] ^ 3, x ^ 2, 1}, {x, y, z}∈Sphere[], Method -> "NewtonCotesRule", WorkingPrecision -> 9]NSurfaceIntegrate[{-Sin[x] ^ 3, x ^ 2, 1}, {x, y, z}∈Sphere[], Method -> "ClenshawCurtisRule", WorkingPrecision -> 9]NSurfaceIntegrate[{-Sin[x] ^ 3, x ^ 2, 1}, {x, y, z}∈Sphere[], WorkingPrecision -> 9]MinRecursion (1)
对于具有尖锐峰值的函数,选项 MinRecursion 强制使用最小数量的递归子划分:
NSurfaceIntegrate[{Exp[-100(x ^ 2 + y ^ 2)], 0, 0}, {x, y, z}∈Triangle[{{-40, -40, 0}, {0, 0, 0}, {40, 40, 40}}]]NSurfaceIntegrate[{Exp[-100(x ^ 2 + y ^ 2)], 0, 0}, {x, y, z}∈Triangle[{{-40, -40, 0}, {0, 0, 0}, {40, 40, 40}}], MinRecursion -> 7]
SurfaceIntegrate[{Exp[-100(x ^ 2 + y ^ 2)], 0, 0}, {x, y, z}∈Triangle[{{-40, -40, 0}, {0, 0, 0}, {40, 40, 40}}]]%//N[#, 20]&PrecisionGoal (1)
选项 PrecisionGoal 设置积分中的相对容差:
exact = SurfaceIntegrate[{x ^ 2, y, z}, {x, y, z}∈Sphere[]]NSurfaceIntegrate[{x ^ 2, y, z}, {x, y, z}∈Sphere[], PrecisionGoal -> 20, MaxRecursion -> 20, WorkingPrecision -> 20] - exact
NSurfaceIntegrate[{x ^ 2, y, z}, {x, y, z}∈Sphere[]] - exactWorkingPrecision (2)
如果指定了 WorkingPrecision,则以该工作精度完成计算:
NSurfaceIntegrate[{x, y, z}, {x, y, z}∈Sphere[]]NSurfaceIntegrate[{x, y, z}, {x, y, z}∈Sphere[], WorkingPrecision -> 25]NSurfaceIntegrate[{1.0 x, y, z}, {x, y, z}∈Sphere[]]应用 (18)
大学微积分 (5)
f = {x, Sin[y], Cos[x]Cos[z]};reg = Cube[{0, 0, 0}, 2];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {0, -x, z};reg = ParametricRegion[{r Cos[t], r ^ 2, r Sin[t]}, {{r, 0, 1}, {t, 0, 2Pi}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, 0, 1}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {y, y, z};reg = ParametricRegion[{u, Cos[t], Sin[t]}, {{t, 0, 2Pi}, {u, 0, 4}}];SliceVectorPlot3D[f, reg, {x, 0, 4}, {y, -1, 1}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x ^ 2 + y, y ^ 2, z ^ 2};reg = ParametricRegion[{2Sin[p]Sin[t], 2Cos[p]Sin[t], 2Cos[t]}, {{p, 0, 2Pi}, {t, 0, Pi / 2}}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x ^ 2, y ^ 2, z ^ 2};reg = Cube[{1 / 2, 1 / 2, 1 / 2}, 1];SurfaceIntegrate[f, {x, y, z}∈reg]面积 (3)
体积 (3)
f = {x / 3, y / 3, z / 3};reg = Ellipsoid[{0, 0, 0}, {1, 2, 3}];NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x / 3, y / 3, z / 3};reg = Icosahedron[];NSurfaceIntegrate[f, {x, y, z}∈reg]reg = Cube[3];NSurfaceIntegrate[{x / 3, y / 3, z / 3}, {x, y, z}∈reg]通量 (3)
q = 10 ^ -6;Subscript[ϵ, 0] = 8.85 * 10 ^ -12;f = q / (4Pi Subscript[ϵ, 0](x ^ 2 + y ^ 2 + z ^ 2) ^ (3 / 2)){x, y, z};reg = Sphere[{0, 0, 0}, 1];NSurfaceIntegrate[f, {x, y, z}∈reg]每单位长度有
个绕组的无限螺线管的均匀磁场通量,电流
在与其正交的圆盘上穿过:
n = 10 ^ 3;i = 0.1;μ = 1.26 * 10. ^ -6;f = μ n i{0, 0, 1}SurfaceIntegrate[f, {x, y, z}∈ParametricRegion[{r Cos[t], r Sin[t], 0}, {{r, 0, 1}, {t, 0, 2Pi}}]]λ = 10 ^ -5;Subscript[ϵ, 0] = 8.85 * 10 ^ -12;f = λ / (2Pi Subscript[ϵ, 0](x ^ 2 + y ^ 2)){x, y, 0};l = 10;r = 0.1;SurfaceIntegrate[f, {x, y, z}∈Cylinder[{{0, 0, 0}, {0, 0, l}}, r], Assumptions -> l > 0 && r > 0]//Quiet质心 (2)
r = 3;reg = ParametricRegion[{r Sin[p]Sin[t], r Cos[p]Sin[t], r Cos[t]}, {{p, 0, 2Pi}, {t, 0, Pi / 2}}];m = NSurfaceIntegrate[1, {x, y, z}∈reg](1 / m) * NSurfaceIntegrate[x, {x, y, z}∈reg](1 / m) * NSurfaceIntegrate[y, {x, y, z}∈reg]//Quiet(1 / m) * NSurfaceIntegrate[z, {x, y, z}∈reg]reg = ParametricRegion[{r Cos[t], r Sin[t], r}, {{r, 1, 4}, {t, 0, 2Pi}}];ParametricPlot3D[{r Cos[t], r Sin[t], r}, {r, 1, 4}, {t, 0, 2Pi}, Rule[...]]NSurfaceIntegrate[y ^ 2 + z ^ 2, {x, y, z}∈reg]NSurfaceIntegrate[x ^ 2 + z ^ 2, {x, y, z}∈reg]NSurfaceIntegrate[x ^ 2 + y ^ 2, {x, y, z}∈reg]经典定理 (2)
斯托克斯定理. 向量场
的 Curl,即
的曲面积分:
f = {-y + x y ^ 2, x, z};g = Curl[f, {x, y, z}];reg = ParametricRegion[{Cos[t]Cos[p], Cos[t]Sin[p], Sin[t]}, {{p, 0, 2Pi}, {t, 0, Pi / 2}}];NSurfaceIntegrate[g, {x, y, z}∈reg]bound = ParametricRegion[{Cos[t], Sin[t], 0}, {{t, 0, 2Pi}}];NLineIntegrate[f, {x, y, z}∈bound]散度定理. 向量场
(具有连续偏导数)在闭合曲面上的曲面积分为:
f = {2x, y, 3z};reg = Sphere[];NSurfaceIntegrate[f, {x, y, z}∈reg]与 Div[f] 在曲面内部的积分相同:
NIntegrate[Div[f, {x, y, z}], {x, y, z}∈Ball[]]属性和关系 (5)
如果符号计算失败,可用 N[SurfaceIntegrate[…]] 通过 NSurfaceIntegrate 获得数值解:
f = {Sin[Exp[x + y + z]], Cos[x + z], Sin[y + z]};reg = ParametricRegion[{t ^ 2, u ^ 3t ^ 3, t ^ 4}, {{t, 0, 1}, {u, 0, 1}}];SurfaceIntegrate[f, {x, y, z}∈reg]N[SurfaceIntegrate[f, {x, y, z}∈reg]]NSurfaceIntegrate[f, {x, y, z}∈reg]reg = Triangle[{{0, 0, 0}, {2, 0, 0}, {1, 2, 3}}];RegionPlot3D[reg, ImageSize -> Small]m = NSurfaceIntegrate[1, {x, y, z}∈reg]1 / m * NSurfaceIntegrate[x, {x, y, z}∈reg]1 / m * NSurfaceIntegrate[y, {x, y, z}∈reg]1 / m * NSurfaceIntegrate[z, {x, y, z}∈reg]也可以用 RegionCentroid 求得质心:
RegionCentroid[reg]//Nreg = ParametricRegion[{Cos[t], Sin[t], u}, {{t, 0, 2Pi}, {u, -1, 1}}];ParametricPlot3D[{Cos[t], Sin[t], u}, {t, 0, 2Pi}, {u, -1, 1}, ImageSize -> Small]NSurfaceIntegrate[(x ^ 2 + y ^ 2), {x, y, z}∈reg]也可用 MomentOfInertia 获得答案:
MomentOfInertia[reg, {0, 0, 0}, {0, 0, 1}]//Nreg = Tetrahedron[];Graphics3D[reg, ImageSize -> Small]NSurfaceIntegrate[1, {x, y, z}∈reg]也可用 SurfaceArea 获得答案:
SurfaceArea[reg]//Nreg = Icosahedron[];RegionPlot3D[RegionBoundary[reg], ImageSize -> Small]NSurfaceIntegrate[{x / 3, y / 3, z / 3}, {x, y, z}∈reg]//Simplify也可用 Volume 获得答案:
Volume[Icosahedron[]]//N巧妙范例 (9)
f = {x / 3, y / 3, z / 3};reg = ParametricRegion[{Sech[u]Cos[v], Sech[u]Sin[v], u - Tanh[u]}, {{v, 0, 2Pi}, {u, -Infinity, Infinity}}];ParametricPlot3D[{Sech[u]Cos[v], Sech[u]Sin[v], u - Tanh[u]}, {v, 0, 2Pi}, {u, -3, 3}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x / 3, y / 3, z / 3};reg = ParametricRegion[{Sin[u]Cos[v], Sin[u]Sin[v], 2 Sqrt[2] - 2 Sqrt[1 - Cos[u]] Cot[(u/2)]}, {{v, 0, 2Pi}, {u, 0, Pi}}];ParametricPlot3D[{Sin[u]Cos[v], Sin[u]Sin[v], 2 Sqrt[2] - 2 Sqrt[1 - Cos[u]] Cot[(u/2)]}, {v, 0, 2Pi}, {u, 0, Pi}, ImageSize -> Small]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x / 3, y / 3, z / 3};reg = ParametricRegion[{(8 + Cos[u] (75 - 32 Cos[v])/48 - 12 Cos[u] Cos[v]), (5 (-3 + 2 Cos[v]) Sin[u]/3 (-4 + Cos[u] Cos[v])), -(5 (-8 + 3 Cos[u]) Sin[v]/12 (-4 + Cos[u] Cos[v]))}, {{u, 0, 2Pi}, {v, 0, 2Pi}}];ParametricPlot3D[{(8 + Cos[u] (75 - 32 Cos[v])/48 - 12 Cos[u] Cos[v]), (5 (-3 + 2 Cos[v]) Sin[u]/3 (-4 + Cos[u] Cos[v])), -(5 (-8 + 3 Cos[u]) Sin[v]/12 (-4 + Cos[u] Cos[v]))}, {u, 0, 2Pi}, {v, 0, 2Pi}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {0, 0, ArcTan[z]};reg = ParametricRegion[{Cos[u], 2Cos[v], Sin[u] + 2Sin[v]}, {{u, 0, Pi}, {v, 0, Pi}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -2, 2}, {z, 0, 3}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]向量场在部分 conocuneus of Wallis 上的曲面积分:
f = {x, y, -z};reg = ParametricRegion[{u Cos[v], Sin[v], -u}, {{u, 0, 1}, {v, 0, 2Pi}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]f = {x, y, 0};reg = ParametricRegion[{u Cos[v], u Sin[v], Log[u]}, {{u, 1 / 5, 1}, {v, 0, 2Pi}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, -2, 0}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]reg = ParametricRegion[{u, v, u Sin[8v] / 7}, {{u, -1, 1}, {v, -1, 1}}];ParametricPlot3D[{u, v, u Sin[8v] / 7}, {u, -1, 1}, {v, -1, 1}, ImageSize -> Small]NSurfaceIntegrate[1, {x, y, z}∈reg, WorkingPrecision -> MachinePrecision]reg = ParametricRegion[{(1 + u)Cos[v], 2u Sin[v], 3 / 2u Sin[v] ^ 2}, {{u, 0, 1 / 4}, {v, 0, 2Pi}}];ParametricPlot3D[{(1 + u)Cos[v], 2u Sin[v], 3 / 2u Sin[v] ^ 2}, {u, 0, 1 / 4}, {v, 0, 2Pi}, ImageSize -> Small]NSurfaceIntegrate[1, {x, y, z}∈reg]f = {x, y, 0};reg = ParametricRegion[{v ^ (3 / 2)Cos[u], v ^ (3 / 2)Sin[u], v}, {{u, 0, 2Pi}, {v, 0, 1}}];SliceVectorPlot3D[f, reg, {x, -1, 1}, {y, -1, 1}, {z, 0, 1}, ...]NSurfaceIntegrate[f, {x, y, z}∈reg]相关指南
-
▪
- 向量分析 ▪
- 符号向量、矩阵和数组
文本
Wolfram Research (2024),NSurfaceIntegrate,Wolfram 语言函数,https://reference.wolfram.com/language/ref/NSurfaceIntegrate.html (更新于 2025 年).
CMS
Wolfram 语言. 2024. "NSurfaceIntegrate." Wolfram 语言与系统参考资料中心. Wolfram Research. 最新版本 2025. https://reference.wolfram.com/language/ref/NSurfaceIntegrate.html.
APA
Wolfram 语言. (2024). NSurfaceIntegrate. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/NSurfaceIntegrate.html 年
BibTeX
@misc{reference.wolfram_2026_nsurfaceintegrate, author="Wolfram Research", title="{NSurfaceIntegrate}", year="2025", howpublished="\url{https://reference.wolfram.com/language/ref/NSurfaceIntegrate.html}", note=[Accessed: 04-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_nsurfaceintegrate, organization={Wolfram Research}, title={NSurfaceIntegrate}, year={2025}, url={https://reference.wolfram.com/language/ref/NSurfaceIntegrate.html}, note=[Accessed: 04-November-2026]}