24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 574  |  回复: 0

long_3415

新虫 (初入文坛)

[交流] MATLAB模拟电磁诱导吸收图形

各位路过的大神,我在MATLAB软件中需要模拟电磁诱导产生的介质吸收图形,但是结果显示只是竖直方向y轴为0不知道为什么,请路过的各位大神给予指导啊,程序代码如下
k=1;q=1;f=1;gamma=1;
Delta_2=0,Delta=1,Omega_1=1.5,Omega_2=-2,C=500;
gamma_21=3,gamma_31=4,gamma_32=4,gamma_41=5,gamma_42=5;
gamma_2=gamma_21,gamma_3=gamma_31+gamma_32,gamma_4=gamma_41+gamma_42;
tau_41=gamma_4,tau_14=gamma_4,tau_42=gamma_4+gamma_2,tau_24=gamma_4+gamma_2,tau_43=gamma_4+gamma_3,tau_34=gamma_4+gamma_3;
tau_31=gamma_3,tau_13=gamma_3,tau_32=gamma_3+gamma_2,tau_23=gamma_3+gamma_2;
tau_21=gamma_2,tau_12=gamma_2;
x=-100*gamma:0.1*gamma:100*gamma;
y=zeros(1,length(x));
%.........relational expression..........
for n=1:length(x)
    n
    Delta_1=1.5*x(n)
    rho_31=zeros(9,n);
    rho_41=zeros(13,n);
    A=[0,0,-Omega_1*i,-k*Omega_1*i,0,gamma_21,0,0,conj(Omega_1)*i,0,gamma_31,0,k*conj(Omega_1)*i,0,0,gamma_41;
       0,(Delta_2-Delta_1)*i-(1/2)*tau_12,-Omega_2*i,-q*Omega_2*i,0,0,0,0,0,conj(Omega_1)*i,0,0,0,k*conj(Omega_1)*i,0,0;
       -conj(Omega_1)*i,-conj(Omega_2)*i,-Delta_1*i-(1/2)*tau_13,0,0,0,0,0,0,0,conj(Omega_1)*i,0,0,0,k*conj(Omega_1)*i,0;
       -k*conj(Omega_1)*i,-q*conj(Omega_2)*i,0,(Delta-Delta_1)*i-(1/2)*tau_14,0,0,0,0,0,0,0,conj(Omega_1)*i,0,0,0,k*conj(Omega_1)*i;
       0,0,0,0,(Delta_1-Delta_2)*i-(1/2)*tau_21,0,-Omega_1*i,-k*Omega_1*i,conj(Omega_2)*i,0,0,0,q*conj(Omega_2)*i,0,0,0;
       0,0,0,0,0,-gamma_2,-Omega_2*i,-q*Omega_2*i,0,conj(Omega_2)*i,gamma_32,0,0,q*conj(Omega_2)*i,0,gamma_42;
       0,0,0,0,-conj(Omega_1)*i,-conj(Omega_2)*i,-Delta_2*i-(1/2)*tau_23,0,0,0,conj(Omega_2)*i,0,0,0,q*conj(Omega_2)*i,0;
       0,0,0,0,-k*conj(Omega_1)*i,-q*conj(Omega_2)*i,0,(Delta-Delta_2)*i-(1/2)*tau_24,0,0,0,conj(Omega_2)*i,0,0,0,q*conj(Omega_2)*i;
       Omega_1*i,0,0,0,Omega_2*i,0,0,0,Delta_1*i-(1/2)*tau_31,0,-Omega_1*i,-k*Omega_1*i,0,0,0,0;
       0,Omega_1*i,0,0,0,Omega_2*i,0,0,0,Delta_2*i-(1/2)*tau_32,-Omega_2*i,-q*Omega_2*i,0,0,0,0;
       0,0,Omega_1*i,0,0,0,Omega_2*i,0,-conj(Omega_1)*i,-conj(Omega_2)*i,-gamma_3,0,0,0,0,0;
       0,0,0,Omega_1*i,0,0,0,Omega_2*i,-k*conj(Omega_1)*i,-q*conj(Omega_2)*i,0,Delta*i-(1/2)*tau_34,0,0,0,0;
       k*Omega_1*i,0,0,0,q*Omega_2*i,0,0,0,0,0,0,0,(Delta_1-Delta)*i-(1/2)*tau_41,0,-Omega_1*i,-k*Omega_1*i;
       0,k*Omega_1*i,0,0,0,q*Omega_2*i,0,0,0,0,0,0,0,(Delta_2-Delta)*i-(1/2)*tau_42,-Omega_2*i,-q*Omega_2*i;
       0,0,k*Omega_1*i,0,0,0,q*Omega_2*i,0,0,0,0,0,-conj(Omega_1)*i,-conj(Omega_2)*i,-Delta*i-(1/2)*tau_43,0;
       1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1];
    B=[0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;1];                          
    rho_31=inv(A)*B;
    D(:,n)=rho_31;
    rho_41=inv(A)*B;
    F(:,n)=rho_41;
    %...........E(:,n)=zeros(1,length(x));
    E(:,n)=Delta_1-i*C*(rho_31+f*rho_41);
end
    y=imag(D(9,+F(13,);
    plot(x,y,'r-','LineWidth',1.5)
上面的循环程序中是一个四阶的矩阵循环,但是感觉程序就是其中的
rho_31=inv(A)*B;
    D(:,n)=rho_31;
    rho_41=inv(A)*B;
    F(:,n)=rho_41;
有问题,请路过的大神们给予指导啊
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

找到一些相关的精华帖子,希望有用哦~

科研从小木虫开始,人人为我,我为人人
相关版块跳转 我要订阅楼主 long_3415 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 322求调剂 +3 宋明欣 2026-03-27 3/150 2026-03-27 19:18 by 无际的草原
[考研] 286求调剂 +8 PolarBear11 2026-03-26 8/400 2026-03-27 18:05 by yu221
[考研] 求调剂推荐 材料 304 +14 荷包蛋hyj 2026-03-26 14/700 2026-03-27 17:49 by kiokin
[考研] 材料与化工085600,总分304,本科有两篇sci参与,求调剂 +10 幸运的酱酱 2026-03-22 12/600 2026-03-27 16:08 by muchong357
[考研] 一志愿哈尔滨工业大学材料与化工方向336分 +4 辰沐5211314 2026-03-26 4/200 2026-03-27 15:21 by 星空星月
[考研] 0703化学338求调剂! +6 Zuhui0306 2026-03-26 7/350 2026-03-27 10:35 by shangxh
[考研] 324求调剂 +5 hanamiko 2026-03-26 5/250 2026-03-27 10:33 by wangjy2002
[考研] 294分080500材料科学与工程求调剂 +4 柳溪边 2026-03-26 4/200 2026-03-26 21:14 by XPU李庆
[考研] 化学工程085602 305分求调剂 +17 RichLi_ 2026-03-25 17/850 2026-03-26 19:44 by plmuchong
[考研] 290分调剂求助 +3 吉祥止止陈 2026-03-25 3/150 2026-03-25 19:58 by barlinike
[考研] 0854电子信息求调剂 +7 α____ 2026-03-22 9/450 2026-03-25 13:37 by α____
[考研] 347求调剂 +4 L when 2026-03-25 4/200 2026-03-25 13:37 by cocolv
[考研] 285求调剂 +3 AZMK 2026-03-24 3/150 2026-03-25 12:23 by userper
[考研] 一志愿北化315 求调剂 +3 akrrain 2026-03-24 3/150 2026-03-24 19:35 by 了了了了。。
[考研] 求调剂 +6 研研,接电话 2026-03-24 7/350 2026-03-24 17:01 by barlinike
[考研] 315分,诚求调剂,材料与化工085600 +3 13756423260 2026-03-22 3/150 2026-03-22 20:11 by edmund7
[考研] 一志愿华中科技大学071000,求调剂 +4 沿岸有贝壳6 2026-03-21 4/200 2026-03-22 07:21 by ilovexiaobin
[考研] 一志愿南大,0703化学,分数336,求调剂 +3 收到VS 2026-03-21 3/150 2026-03-21 18:42 by 学员8dgXkO
[考研] 求助 +5 梦里的无言 2026-03-21 6/300 2026-03-21 17:51 by 学员8dgXkO
[考研] 材料与化工(0856)304求 B区 调剂 +3 邱gl 2026-03-21 3/150 2026-03-21 13:47 by lature00
信息提示
请填处理意见