R语言中怎么画自定义函数图像

Question

p=function(n,m){
N=10^6
x=c(rep(0,5),1)
z=numeric(N)
for(i in 1:N){
y=sample(x,n,replace=T)
z[i]=sum(y)>=m
}
return(sum(z)/N)
}

当m=2,3,4时，把这三函数在同一个坐标化成散点图，然后拟合曲线！
哪位大神？

Answer 1

用curve（function，add=T）试试本回答被提问者采纳