24小时热门版块排行榜    

查看: 590  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

long_3415

新虫 (初入文坛)

[交流] Matlab程序问题 已有2人参与

各位大神,我写了个程序怎么修改能把图画成如下的图啊?请各位大神给予指导啊。
%.........syms x z k t gamma Delta rho alpha Omega A B C D E
gamma=1;
Delta_2=0,gamma_1=5*gamma,gamma_2=5*gamma,rho=0,C=600,
Omega_1=10*gamma*(1-rho^2)^(1/2);Omega_2=50*gamma*(1-rho^2)^(1/2);
x=-100*gamma:0.1*gamma:100*gamma;
%.........relational expression..........
z1=zeros(1,length(x));
for k=1:length(x)
    k
    Delta_1=0.1*gamma*k
    A=[0,-conj(Omega_1),0,Omega_1,2*gamma_1,0,0,0,0;
       -Omega_1,-Delta_1,-conj(Omega_2),0,Omega_1,0,0,0,0;
       0,-Omega_2,-Delta_1-Delta_2,0,0,Omega_1,0,0,0;
       conj(Omega_1)*i,0,0,Delta_1*i-gamma_1,-conj(Omega_1)*i,0,Omega_2*i,2*rho*(gamma_1*gamma_2)^(1/2),0;
       0,conj(Omega_1),0,-Omega_1,0,-conj(Omega_2),0,Omega_2,0;
       0,0,conj(Omega_1),0,-Omega_2,-Delta_2,0,0,Omega_2;
       0,0,0,conj(Omega_2)*i,0,0,Delta_1*i+Delta_2*i-gamma_2,conj(Omega_1)*i,0;
       0,0,0,0,conj(Omega_2)*i,0,-Omega_1*i,Delta_2*i-gamma_1-gamma_2,-conj(Omega_2)*i;
       1,0,0,0,1,0,0,0,1];
    B=[0;0;0;0;0;0;0;0;1];                          
    t=inv(A)*B;
    D(:,k)=t;
    %........E(:,k)=zeros(1,length(x));
    E(:,k)=Omega_1+C*gamma_1*imag(t)-i*C*gamma_1*real(t);
end
    z1=imag(D(4,);
%.........................................
    z2=zeros(1,length(x));
for k=1:length(x)
    k
    Delta_1=-0.1*gamma*k
    A=[0,-conj(Omega_1),0,Omega_1,2*gamma_1,0,0,0,0;
       -Omega_1,-Delta_1,-conj(Omega_2),0,Omega_1,0,0,0,0;
       0,-Omega_2,-Delta_1-Delta_2,0,0,Omega_1,0,0,0;
       conj(Omega_1)*i,0,0,Delta_1*i-gamma_1,-conj(Omega_1)*i,0,Omega_2*i,2*rho*(gamma_1*gamma_2)^(1/2),0;
       0,conj(Omega_1),0,-Omega_1,0,-conj(Omega_2),0,Omega_2,0;
       0,0,conj(Omega_1),0,-Omega_2,-Delta_2,0,0,Omega_2;
       0,0,0,conj(Omega_2)*i,0,0,Delta_1*i+Delta_2*i-gamma_2,conj(Omega_1)*i,0;
       0,0,0,0,conj(Omega_2)*i,0,-Omega_1*i,Delta_2*i-gamma_1-gamma_2,-conj(Omega_2)*i;
       1,0,0,0,1,0,0,0,1];
    B=[0;0;0;0;0;0;0;0;1];                          
    t=inv(A)*B;
    D(:,k)=t;
    %........E(:,k)=zeros(1,length(x));
    E(:,k)=Omega_1+C*gamma_1*imag(t)-i*C*gamma_1*real(t);
end
    z2=real(D(4,);
    plot(x,z1,x,z2,'LineWidth',1.5);
    xlabel('Delta_1/gamma');
    ylabel('Im(D(4,)');
    axis([-100,100,-1,1]);
    legend('z1','z2');
    grid off
   其中上面图的Y轴中的字母表示是程序当中D(4,1)的虚部,程序中rho=0表示图中的P=0.
Matlab程序问题
11.png
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

long_3415

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by shutaham at 2013-07-18 12:54:43
拷贝数据到Origin中画图

觉得就是怎么把第一个for循环里面Delta_1的表达式怎么修改一下就好了,但是不知道怎么修改?请各位指教啊。
3楼2013-07-18 14:52:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

shutaham

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
拷贝数据到Origin中画图
2楼2013-07-18 12:54:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

knightman

铜虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
把你的程序发给我吧,我给你检查一下。 另,你想画的那个图,也给我。
在此网站上的文本,你自己看看,没法看啊,都转为图片了,很多的笑脸哦(

邮箱: knightman@163.com

.
4楼2013-07-19 21:58:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 国自科面上基金字体 +6 iwuli 2026-03-12 7/350 2026-03-16 21:18 by sculhf
[考研] 309求调剂 +5 花与叶@ 2026-03-10 5/250 2026-03-16 14:13 by 哦哦123
[考研] 326求调剂 +4 上岸的小葡 2026-03-15 5/250 2026-03-16 08:39 by Linda Hu
[基金申请] NSFC申报书里申请人简历中代表性论著还需要在申报书最后的附件里面再上传一遍吗 20+5 NSFC2026我来了 2026-03-10 14/700 2026-03-15 23:53 by 不负韶华的虎
[考研] 274求调剂 +4 时间点 2026-03-13 4/200 2026-03-15 15:29 by Rambo13
[考研] 一志愿哈工大材料324分求调剂 +5 闫旭东 2026-03-14 5/250 2026-03-14 14:53 by 木瓜膏
[考研] 290求调剂 +4 @将就将就看 2026-03-10 8/400 2026-03-14 14:23 by 千千运气
[考研] 336求调剂 +6 Iuruoh 2026-03-11 6/300 2026-03-13 22:06 by JourneyLucky
[考研] 0856材料与化工301求调剂 +5 奕束光 2026-03-13 5/250 2026-03-13 22:00 by 星空星月
[考研] (081700)化学工程与技术-298分求调剂 +12 11啦啦啦 2026-03-11 35/1750 2026-03-13 21:25 by JourneyLucky
[考研] 281求调剂 +9 Koxui 2026-03-12 11/550 2026-03-13 20:50 by Koxui
[考研] 293求调剂 +3 世界首富 2026-03-11 3/150 2026-03-13 16:27 by JourneyLucky
[考研] 求调剂 +7 18880831720 2026-03-11 7/350 2026-03-13 16:10 by JourneyLucky
[考研] 材料专硕350 求调剂 +4 王金科 2026-03-12 4/200 2026-03-13 16:02 by ruiyingmiao
[考研] 一志愿211化学学硕310分求调剂 +8 努力奋斗112 2026-03-12 9/450 2026-03-13 15:41 by JourneyLucky
[考研] 268求调剂 +4 好运连绵不绝 2026-03-12 4/200 2026-03-13 10:45 by hyswxzs
[考研] 0857环境调剂 +5 熠熠_11 2026-03-10 5/250 2026-03-11 10:59 by wang_dand
[考研] 哈工大材料324求调剂 +6 闫旭东 2026-03-10 8/400 2026-03-10 22:49 by 星空星月
[考研] 化工0817调剂 +8 灿若星晨 2026-03-10 8/400 2026-03-10 22:44 by 星空星月
[硕博家园] 木虫好像不热闹了,是不是? +4 偏振片 2026-03-10 4/200 2026-03-10 09:51 by longwave
信息提示
请填处理意见