如何用Mathematica在(x-2)^2+(y-2)^2=4中产生25个随机点的坐标是在圆上的

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/30 03:56:28
如何用Mathematica在(x-2)^2+(y-2)^2=4中产生25个随机点的坐标是在圆上的
xTKSP+ 388&Mlt .;V(0hV yC8&&Y< 2,Mrr9Ǎ?сwT˝B*TTp|QqnAPw 7W9zg,ϑRU;ՖҤz_g)~o&e%U%FZ!s3ӹ6@:ikDml9*MUЭ]\Jp5oil7r%E?ƕ0ez23zU!G [rhi`$;S{gZryy]?HC}XE}]w7)jK -L8+-J K }ĊJ??i<9a{11xH/dxb⢶LÎ^^!y53Y!- JģT0DטzQpx~Z]BLu!78ڨ YЈux+l\䔐 ^- aEoz/t!,#cQ'e+H!d;,7vٟ'@ ejq_j HygSx9N$B~

如何用Mathematica在(x-2)^2+(y-2)^2=4中产生25个随机点的坐标是在圆上的
如何用Mathematica在(x-2)^2+(y-2)^2=4中产生25个随机点的坐标
是在圆上的

如何用Mathematica在(x-2)^2+(y-2)^2=4中产生25个随机点的坐标是在圆上的
整个演示我都放在图片上了,
上面有注释,你放大开看应该能看懂.
虽然实现的方法有点笨,不过还算能满足你的要求.
里面的随机点生成的个数可以由你自己随便调整.
我对你的问题没理解太明白,
所以随机点都默认生成在这个圆形的边上和内部. 
针对问题补充:
哦,那个你只要修改一个函数就可以了
point[] := 
 Module[{x = RandomReal[{0, 4}], y}, 
  y = Solve[(x - 2)^2 + (y - 2)^2 == 4, y][[RandomInteger[{1, 2}], 1, 
     2]]; {x, y}]
把图片里的那个生成点的函数换成上面这个,就可以了.
别的都不用动.