应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » MATLAB » 用matlab 画三维图，请高手指教.
192/2返回列表上一页12
查看: 1190  |  回复: 18
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

dbb627

荣誉版主 (著名写手)
引用回帖:
10楼: Originally posted by wzp0098 at 2015-01-03 22:40:00
我想看到附件一样的图，请指教. 是否能用griddata3？

@RN1%DO4A1R%H5DNB`$PFQI.png
...

你想看的是否是P关于W;K;V的等值面？
赞一下 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
11楼2015-01-03 23:33:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzp0098

木虫 (著名写手)
引用回帖:
11楼: Originally posted by dbb627 at 2015-01-03 23:33:10
你想看的是否是P关于W;K;V的等值面？...

是的
回复此楼
12楼2015-01-04 09:55:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
wzp0098: 金币+60, ★★★很有帮助 2015-01-04 16:47:10
CODE:
function slice_4D
W=-3:0.05:3;K=-3:0.05:3;V=-3:0.05:3;
P = [];
for n=1:length(W);
          Ky=W(n);
      for m=1:length(K);
          Kx=K(m);
           for v=1:length(V);
               Kz=V(v);
         w = 1;K1=0;
         K2 = K1+2*w; x = 2*(sin(Kx)+sin(Ky));
         r1 = 8; r2 = 0.001*r1; T = 3*sin(Kz);
         A=[  -r1   r2-r1  -i*x      i*x      0           0       0              0;
               0    -r2       0       0       0           0      i*T           -i*T;
            -2*i*x  -i*x -r1-i*K1*0.5 0     -i*T          0       0              0;
             2*i*x  i*x       0  -r1+i*K1*0.5 0          i*T      0              0;
               0     0      -i*T      0 -r2-i*(K1+K2)*0.5 0      i*x             0;
               0     0        0      i*T      0 -r2+i*(K1+K2)*0.5 0             -i*x;
              i*T 2*i*T       0       0      i*x          0 -r2-r1+i*(K1-K2)*0.5 0;
             -i*T -2*i*T      0       0       0         -i*x      0 -r2-r1-i*(K1-K2)*0.5];
         B = [-r1;0;-i*x;i*x;0;0;i*T;-i*T];
         Y = A\B;
     P(n, m, v) = imag(Y(3)); % <---------------------------P向量中的元素赋值
           end
     end
end
[X,Y,Z]=meshgrid(W,K,V);
figure;slice(X,Y,Z,P,[-2.5 0 2.5],0,[-2 2])
result = HistRate(P(:));
[Pm,I]=max(result(:,2));
figure;
result(I,1)
Pv=isosurface(X,Y,Z,P,result(I,1));
p=patch(Pv)

用matlab 画三维图，请高手指教.
untitled1.jpg
赞一下 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
13楼2015-01-04 15:36:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
wzp0098: 金币+60, ★★★很有帮助, 多谢了 2015-01-04 22:14:08
引用回帖:
13楼: Originally posted by dbb627 at 2015-01-04 15:36:05
function slice_4D
W=-3:0.05:3;K=-3:0.05:3;V=-3:0.05:3;
P = [];
for n=1:length(W);
          Ky=W(n);
      for m=1:length(K);
          Kx=K(m);
           for v=1:length(V);
              ...

HistRate可换成tabulate 函数主要找出P中出现最多的那个值，
Pv=isosurface(X,Y,Z,P,result(I,1)); result(I,1)可换成其他可以取到的P值
赞一下 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
14楼2015-01-04 15:42:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzp0098

木虫 (著名写手)
引用回帖:
13楼: Originally posted by dbb627 at 2015-01-04 15:36:05
function slice_4D
W=-3:0.05:3;K=-3:0.05:3;V=-3:0.05:3;
P = [];
for n=1:length(W);
          Ky=W(n);
      for m=1:length(K);
          Kx=K(m);
           for v=1:length(V);
              ...

问一下，这P(n, m, v)的四维图吗
赞一下 回复此楼
15楼2015-01-04 16:46:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)
引用回帖:
15楼: Originally posted by wzp0098 at 2015-01-04 16:46:47
问一下，这P(n, m, v)的四维图吗...

Pv=isosurface(X,Y,Z,P,result(I,1));是画的三维等值面啊
赞一下 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
16楼2015-01-04 16:50:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzp0098

木虫 (著名写手)
引用回帖:
16楼: Originally posted by dbb627 at 2015-01-04 16:50:40
Pv=isosurface(X,Y,Z,P,result(I,1));是画的三维等值面啊...

也就P(n, m, v)有关于X,Y,Z的图形？
赞一下 回复此楼
17楼2015-01-04 16:59:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)
引用回帖:
17楼: Originally posted by wzp0098 at 2015-01-04 16:59:07
也就P(n, m, v)有关于X,Y,Z的图形？...

这P(n, m, v)的四维图是第一个帖子里面画的图，后面这个是等值面
他们的关系就像三维曲面和等值线之间的关系
赞一下 回复此楼

» 本帖已获得的红花（最新10朵）

wzp0098
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
18楼2015-01-04 18:29:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzp0098

木虫 (著名写手)
送红花一朵
引用回帖:
18楼: Originally posted by dbb627 at 2015-01-04 18:29:15
这P(n, m, v)的四维图是第一个帖子里面画的图，后面这个是等值面
他们的关系就像三维曲面和等值线之间的关系...

请教高人，我想画出P(n, m, v)在整个四维空间的分布，将它所有的值都在图形里面体现出来，怎么修改？
function slice_4D
W=-3:0.05:3;K=-3:0.05:3;V=-3:0.05:3;
P = [];
for n=1:length(W);
          Ky=W(n);
      for m=1:length(K);
          Kx=K(m);
           for v=1:length(V);
               Kz=V(v);
         w = 1;K1=0;
         K2 = K1+2*w; x = 2*(sin(Kx)+sin(Ky));
         r1 = 8; r2 = 0.001*r1; T = 3*sin(Kz);
         A=[  -r1   r2-r1  -i*x      i*x      0           0       0              0;
               0    -r2       0       0       0           0      i*T           -i*T;
            -2*i*x  -i*x -r1-i*K1*0.5 0     -i*T          0       0              0;
             2*i*x  i*x       0  -r1+i*K1*0.5 0          i*T      0              0;
               0     0      -i*T      0 -r2-i*(K1+K2)*0.5 0      i*x             0;
               0     0        0      i*T      0 -r2+i*(K1+K2)*0.5 0             -i*x;
              i*T 2*i*T       0       0      i*x          0 -r2-r1+i*(K1-K2)*0.5 0;
             -i*T -2*i*T      0       0       0         -i*x      0 -r2-r1-i*(K1-K2)*0.5];
         B = [-r1;0;-i*x;i*x;0;0;i*T;-i*T];
         Y = A\B;
     P(n, m, v) = imag(Y(3)); %
           end
     end
end
[X,Y,Z]=meshgrid(W,K,V);
figure;slice(X,Y,Z,P,[-2.5 0 2.5],0,[-2 2])
result = HistRate(P();
[Pm,I]=max(result(:,2));
figure;
result(I,1)
Pv=isosurface(X,Y,Z,P,result(I,1));
p=patch(Pv)
赞一下 回复此楼
19楼2015-01-11 21:39:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wzp0098 的主题更新
192/2返回列表上一页12
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭