绘制曲线的最好方法是使用curve函数:
f = function(x) x^2 + 1
curve(f(x), -2,2, ylim=c(0, 5))
Run Code Online (Sandbox Code Playgroud)
然后,您可以通过以下points功能将点添加到绘图中:
points(runif(100, -2, 2), runif(100, 0, 6))
Run Code Online (Sandbox Code Playgroud)
并使用比较计算蒙特卡洛估计:
N = 100000
sum(f(runif(N, -2, 2)) > runif(N, 0, 6))/N * (4*6)
Run Code Online (Sandbox Code Playgroud)
