24小时热门版块排行榜    

查看: 758  |  回复: 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的回帖

shutaham

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
拷贝数据到Origin中画图
2楼2013-07-18 12:54:43
已阅   回复此楼   关注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的回帖

knightman

铜虫 (小有名气)


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

邮箱: knightman@163.com

.
4楼2013-07-19 21:58:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 long_3415 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 看来今天不会放榜了? +8 chengyan1220 2026-08-21 9/450 2026-08-21 15:38 by dcqxinyang
[基金申请] 让我中一个面上吧! +11 大萍1987 2026-08-20 13/650 2026-08-21 14:48 by 20120902066
[基金申请] 只有每年这种时候来逛逛小木虫 +23 yaoyewhu2008 2026-08-20 25/1250 2026-08-21 12:19 by Poppy1104
[基金申请] 什么时候开奖? +7 CrisMessi 2026-08-18 7/350 2026-08-21 12:15 by weiyin
[基金申请] 时间戳又变了8-15 +15 archvillain 2026-08-15 27/1350 2026-08-21 11:32 by tim76
[基金申请] 今天基金会出结果吗?20260819 +15 kkkl_v 2026-08-19 16/800 2026-08-21 11:22 by 365372687
[基金申请] 科研孤儿太难了 +15 我4大白菜 2026-08-20 16/800 2026-08-21 11:07 by yming1319
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[论文投稿] 投稿咨询 +5 wwm09 2026-08-17 7/350 2026-08-21 10:11 by 期刊论文帮手
[基金申请] 今天放榜没戏了吧 +9 yuleib84 2026-08-19 11/550 2026-08-21 10:06 by gltch
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 估计是周四 +3 archvillain 2026-08-18 3/150 2026-08-21 01:48 by jnhyjjm
[基金申请] 今天系统多次维护,明天很可能放榜! +10 zju2000 2026-08-16 11/550 2026-08-20 20:02 by cl479861084
[基金申请] 时间戳变了,能看出什么问题? +18 基诺咪客 2026-08-17 23/1150 2026-08-20 17:19 by Godzela
[基金申请] 重要消息,中午系统在维护 +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[教师之家] 为什么余额宝的年化利率越来越低?主要原因有哪些? +5 瞬息宇宙 2026-08-15 5/250 2026-08-19 20:23 by super2002521
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 明天放榜? +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
信息提示
请填处理意见