- 积分
- 1
- 注册时间
- 2009-5-24
- 仿真币
-
- 最后登录
- 1970-1-1
|
Mathematica的三维绘图能力已经很强,可惜不支持光线追踪渲染 (8
中好像可以通过CUDALink实现一部分),于是设法借助3dMax,先建模:
-
- \[CapitalOmega][x_, y_, \[Mu]_] :=
- 1/2 (x^2 + y^2) + (1 - \[Mu])/Sqrt[(x + \[Mu])^2 + y^2] + \[Mu]/
- Sqrt[(1 - \[Mu] - x)^2 + y^2];
- ContourPlot3D[
- 2 \[CapitalOmega][x, 0, 0.3] - vx^2 - vy^2 == 3.57, {x, -0.8,
- 1}, {vx, -3, 3}, {vy, -3, 3}, AxesLabel -> {X, VX, VY},
- BoxRatios -> {1, 0.6, 0.6}]
复制代码
用export导出3ds模型,在3dMax下渲染得到
还可以更改材质
这个是个ContourPlot3D
下面是其他一些例子 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册
×
评分
-
1
查看全部评分
-
|