教學 共 2 個步驟,在同一個工作階段中依序執行。每一步都在引擎上實際執行過,下方的輸出就是它產生的結果。
NIntegrate[(1/Sqrt[Abs[x - 1]]), {x, 0, 2}]7781.165464676946points = Reap[NIntegrate[(1/Sqrt[Abs[x - 1]]), {x, 0, 2}, EvaluationMonitor :> Sow[x]]][[2, 1]];
Graphics[{PointSize[0.006], Point /@ N@Transpose[{points, Range[Length[points]]}]}, PlotRange -> All, AspectRatio -> 1, Axes -> True]-Graphics-所有操作範例 · 函式參考 · 從 MCP 用戶端使用這個