投针的R程序如下:buffon<-function(n, l=0.8, a=1){ k<-0 theta<-runif(n,0, pi); x<-runif(n,0, a/2) for (i in 1:n){ if (x[i]<= l/2*sin(theta[i])) k<-k+1 } ( )}buffon(100000,l=0.8,a=1)
拍照语音搜题,微信中搜索"皮皮学"使用
参考答案:
参考解析:
知识点:
皮皮学刷刷变学霸
举一反三
【单选题】When man began to search the skies, he saw a lot of things. In the universe(宇宙), the earth seemed to be just a small bit of dust. It is only a small planet, and travels around the sun. The sun togethe...