题目
数学实验mathematica应用构造单位球面上依曲面面积服从均匀分布的随机点
提问时间：2020-12-01
答案
r =.;
dot =.;
dot[r_] := Module[{rand,rz,u,rxy},
rand = 2 r*Random[] - r;
rz = rand;
rand = 2 Pi*Random[];
u = rand;
rxy = Sqrt[r^2 - rz^2];
{rxy*Cos[u],rxy*Sin[u],rz}
]
Graphics3D[Point[Table[dot[1],{r,1,5000}]],Boxed -> False]
(*复制即可 *)
dot =.;
dot[r_] := Module[{rand,rz,u,rxy},
rand = 2 r*Random[] - r;
rz = rand;
rand = 2 Pi*Random[];
u = rand;
rxy = Sqrt[r^2 - rz^2];
{rxy*Cos[u],rxy*Sin[u],rz}
]
Graphics3D[Point[Table[dot[1],{r,1,5000}]],Boxed -> False]
(*复制即可 *)
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1简单的中英互译等
- 2赞颂诸葛亮的句子
- 3衣字旁一个止念什么
- 4公元前3万年约为多少年前?
- 5轮船从河里开往水里,吃水线会____一些
- 6有一串数字9286------从第3个数码起,每一个数码都是它前面2个数码的积的个位数.问：第一个数码是几?前一
- 7How long does it take to get to school 是不是三单句
- 8煤是重要的化工原料,用煤作燃料,不仅是极大的浪费,而且因烟煤中含硫的化合物（如FeS2)燃烧时生成SO2气体,造成环境污染.
- 9{ 2(x-y)/3-x+y/4=-1 6(x+y)-4(2x-y)=16 解2元一次方程
- 10在数轴上作出表示下列各数的点：3，-8，5/4．