Ópticas y eléctricas tiene muchas similitudes, discutidos en este documento para la síntesis de dos luz polarizada en un plano.
Desde la óptica ondulatoria, podemos obtener:
- La misma frecuencia, amplitud y fase de las dos ondas es exactamente el mismo, el plano de restos de síntesis de la luz polarizada;
- La frecuencia mismo, amplitud, diferencia de fase de dos pi electromagnética / 2, la síntesis es correcto luz polarizada circularmente;
- La misma frecuencia, amplitud, diferencia de fase de dos -pi electromagnética / 2, la luz polarizada circularmente zurdo se sintetiza;
- La misma frecuencia, amplitud, diferencia de fase de dos electromagnética 0 ~ pi / 2, la síntesis es polarizada elípticamente;
Por encima de cuatro sin duda ayudará a dominar los principios básicos de dicroísmo circular.
Al mismo tiempo sabemos:
Espacio de 90 grados, 90 grados fuera de fase (usando un condensador) se pueden sintetizar en una corriente alterna de dos fases campo electromagnético giratorio;
Este programa MATLAB comprende dos sub-funciones: Polarization.m y OutGif.m, y da salida a la antigua archivo de asignación gif, que se utiliza para establecer los parámetros de gif.
Puede en aquí para descargar
%% 偏振光演示
function [] = Polarization(A,f,Tend,Tint,Angle)
if nargin == 0
A = [1,2]; % 幅值,可改参数哈
f = [1,1]; % 频率,可改参数哈
Tint = 0.01; % 每帧的时长,可改参数哈
Tend = 1; % 运行一秒,可改参数哈
Angle = pi/2; % 相位,可改参数哈,注意单位
end
%% 开始作图
figure('color',[1,1,1]);
w = 2*pi*f;
iter = 0;
x = [];
y = [];
for t = 0:Tint:Tend
iter = iter+1;
% 线偏振光
X = A(1)*sin(w(1)*t);
plot([0,X],[0,0],'r','LineWIdth',1.5);
hold on;
plot([X,X],[0,0],'ro','LineWIdth',1.5,'MarkerFaceColor','r');
% 另外一个线偏振光
Y = A(2)*sin(w(2)*t+Angle);
plot([0,0],[0,Y],'b','LineWIdth',1.5);
hold on;
plot([0,0],[Y,Y],'bo','LineWIdth',1.5,'MarkerFaceColor','b');
% 合成
plot([0,X],[0,Y],'k','LineWIdth',1.5);
hold on;
plot([0,X],[0,Y],'ko','LineWIdth',1.5,'MarkerFaceColor','k');
% 轨迹
x = [x X];
y = [y Y];
plot(x,y,'k--','LineWIdth',0.5);
% 其他作图设置
hold off
axis equal
xlim([-A(1),A(1)]);
ylim([-A(2),A(2)]);
axis off
M = getframe();
OutGif(M,'POLAR',iter,Tint)
end
end
%% 输出gif文件(简易版)
function Status = OutGif(GetFrameOutput,FileName,NumFrame,LoopTime,Path)
if nargin == 3
LoopTime = 0.3;
Path = 'C:\Users\ZLY\Desktop';
elseif nargin == 4
Path = 'C:\Users\ZLY\Desktop';
end
% Status = PathCheck(Path);
imind = frame2im(GetFrameOutput);
[imind,cm] = rgb2ind(imind,256);
T = datestr(now,1);
if NumFrame == 1
imwrite(imind,cm,strcat(Path,'\',[T,FileName],'.gif'),'gif','LoopCount',inf,'DelayTime',LoopTime);
else
imwrite(imind,cm,strcat(Path,'\',[T,FileName],'.gif'),'gif','WriteMode','append','DelayTime',LoopTime);
end
end
El resultado:
A = [1,2];% de la amplitud f = [1,1];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = pi / 2;% Fase |
|
A = [1,1];% de la amplitud f = [1,1];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = pi / 2;% Fase |
|
A = [1,1];% de la amplitud f = [1,1];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = pi / 2;% Fase |
|
A = [1,1];% de la amplitud f = [1,1];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = pi / 3;% Fase |
|
A = [1,1];% de la amplitud f = [1,2];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = 0;% Fase |
|
A = [1,1];% de la amplitud f = [1,2];% Frecuencia de Tint = 0,01;% duración de tiempo de cada trama Tend = 2;% de disponibilidad de ángulo = pi / 3;% Fase |
|
A = [1,1]; % 幅值 f = [1,2]; % 频率 Tint = 0.01; % 每帧的时长 Tend = 2; % 运行时间 Angle = pi/2; % 相位 |
|
版权声明:本文为博主原创文章,未经博主允许不得转载。