清空筛选条件
清空筛选条件

ANY MATLAB CODE FOR GAUSSIAN BEAM PROPAGATION IN A OPTICAL FIBER

77 次查看（过去 30 天）
ABHISHEK KUMAR
ABHISHEK KUMAR 2013-9-24
编辑： Walter Roberson 2020-12-15
TAKE SUITABLE VALUES FOR ALL THE PARAMETERS INVOLVED IN THE EQUATION...
E(r,z)=Eo((Wo/w(Z))*exp(-r^2/.w(z)^2)-(i*Kz)(-i*(k*r^2)./2r(z))+it(z)):
intensity=absE(r,z)^2;
keeping all the parameters constant except time,vary the time and plot the graph for this equation of gaussian wave propagation in a optical fiber.

请先登录，再回答此问题。

回答（3 个）

Youssef Khmou
Youssef Khmou 2013-9-24
Husnain Shabbir
Husnain Shabbir 2020-1-26
r=-0.3:0.0001:0.3;
L=1000; %link distance
lamda=1550e-9; %Wavelength
Wo=1.5e-2; %Beam spot radius at the transmitter
Fo=100; %Beam phase front radius of curvature
k=2*pi/lamda; %wave number
theta0=1+L/Fo; %Curvature parameter
lamda0=2*L/(k*Wo^2); %Fresnel ratio
theta=theta0/(theta0^2+lamda0^2); %Refraction parameter
lamda1=lamda0/(theta0^2+lamda0^2); %Diffraction parameter
W=Wo*(theta0^2+lamda0^2)^0.5; %Beam spot radius
nnn=exp(-1);
Ao=1/(theta0^2+lamda0^2)*exp(-r.^2/Wo^2);
A=(theta^2+lamda1^2)*exp(-2*r.^2/W^2);
plot(r,Ao,'LineWidth',2)
hold on
plot(r,A,'LineWidth',2)
xline(Wo,'b','--')
xline(-Wo,'k','--')
xline(W,'g','--')
xline(-W,'r','--')
xlabel('r-axis');
ylabel('amplitude')
legend('transmitted','received','Wo','-Wo','W','-W')
grid on
  1 个评论
Andicha Zain
Andicha Zain 2020-9-16
hello
do you know hot to writing program matlab gaussian beam
if you know, please contact me on gmail : andichazain@gmail.com

请先登录，再进行评论。

Reena Sharma
Reena Sharma 2020-12-14
编辑：Walter Roberson 2020-12-15
I want matlab code for hollow gausssian beam generated with phase plate for MATLAB R2014b
  2 个评论
Walter Roberson
Walter Roberson 2020-12-15
编辑：Walter Roberson 2020-12-15
This does not appear to be an Answer to the Question asked by ABHISHEK KUMAR .
If you are asking your own question, then create your own question for it ... after reading the link that I posted for you.
I took a brief look around. It is not clear to me that existing MATLAB code for that purpose exists anywhere . And chances are very very small that anyone is going to volunteer to research the topic and write the code for you just because you posted that you "want" the code.

请先登录，再进行评论。

类别

在 Help Center 和 File Exchange 中查找有关 Accelerators & Beams 的更多信息

标签

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by