24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1792  |  回复: 1

huangkz

铁虫 (小有名气)

[交流] 【求助】RegionPlot3D画三维图像(Mathematica or Matlab)!

利用Mathematica中RegionPlot3D函数画一个三维图像的问题:

已知:x,y,z是三个变量,满足 -1<=x<=1,-1<=y<=1,-1<=z<=1

定义函数:F=2 + x1 Log[2, x1] + x2 Log[2, x2] + x3 Log[2, x3] + x4 Log[2, x4] - (1 + m)/2 Log[2, 1 + m] - (1 - m)/2 Log[2, 1 - m];
其中:
x1 = 1 - x + y + z;
x2 = 1 + x - y + z;
x3 = 1 + x + y - z;
x4 = 1 - x - y - z;
m = Max[Abs[x], Abs[y], Abs[z]];
显然必须满足x1>0,x2>0,x3>0,x4>0,1+m>0,1-m>0

我现在要求F=0.2时的三维图像,我的代码如下:
RegionPlot3D[
x1 > 0 && x2 > 0 && x3 > 0 && x4 > 0 && 1 + m > 0 && 1 - m > 0 &&
  0.2 <= F <= 0.21, {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
Mesh -> None, PlotPoints -> 50]
可是画不出任何图像,不知问题在哪里,现在请教大家了!!!
------------------------------------------------------------------------------------------------------
如果能用Matlab实现也可以,但不要用plot3或者scatter,画出来实在很难看,我想要一个立体图,谢谢啦!

[ Last edited by huangkz on 2010-9-20 at 21:40 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

huangkz

铁虫 (小有名气)

nobody knows
2楼2010-09-21 09:44:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 huangkz 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见