参考此文,求与圆有关的重叠部分面积
绘图
RegionPlot[{(x - 5)^2 + (y - 5)^2 <= 25, (x - 10)^2 + y^2 >= 100}, {x,
0, 10}, {y, 0, 10}, PlotLegends -> "Expressions"]
Expressions,大致是写出具体表达式之意。
只画重叠部分
RegionPlot[{(x - 5)^2 + (y - 5)^2 <= 25 && (x - 10)^2 + y^2 >=
100}, {x, 0, 10}, {y, 0, 10}]
算面积
Integrate[
Boole[{(x - 5)^2 + (y - 5)^2 <= 25 && (x - 10)^2 + y^2 >= 100}], {x,
0, 10}, {y, 0, 10}]
精确值呢 |