教程 4 步,在同一个会话中按顺序运行。每一步都在引擎上执行过,下面的输出就是它实际产生的。
NIntegrate[(1/Sqrt[x])Log[(1/x)], {x, 0, 1}, Method -> {"GlobalAdaptive", Method -> "ClenshawCurtisRule"}]4.NIntegrate[Log[1 + x ^ 2 + y], {x, 0, 10}, {y, 0, 10}, Method -> {"CartesianRule", Method -> {"GaussKronrodRule", "ClenshawCurtisRule"}}]NIntegrate[Log[1 + x^2 + y], {x, 0, 10}, {y, 0, 10}, Method -> {CartesianRule, Method -> {GaussKronrodRule, ClenshawCurtisRule}}]NIntegrate[Boole[x^2 + y^2 < 1] * (1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {"EvenOddSubdivision", Method -> "LocalAdaptive"}]NIntegrate[Boole[x^2 + y^2 < 1]*(1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {EvenOddSubdivision, Method -> LocalAdaptive}]Graphics[{PointSize[0.005], Point[Reap[NIntegrate[Boole[x^2 + y^2 < 1] * (1 - Sqrt[x^2 + y^2]), {x, -1, 1}, {y, -1, 1}, Method -> {"EvenOddSubdivision", Method -> "LocalAdaptive"}, EvaluationMonitor :> Sow[{x, y}]]][[2, 1]]]}, Axes -> True, PlotRange -> {{-1, 1}, {-1, 1}}]-Graphics-全部操作示例 · 函数参考 · 从 MCP 客户端使用