1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
Nlevels_with_doppler_with_z_4wm
%% field propagation
z_3=z_1*100; % z in cm
t_3=t_1*1e6; % time now measured in uS
[Nv, Nt, Nz]=size(I2_out_v_3);
Npl=Nv/2+1;
Iv_out_v = reshape(I2_out_v_3(1:Npl,:,Nz),Npl,Nt);
for i=1:Npl
l_str{i}=num2str(v_3(i));
end
figure(1); hold off;
plot(Iv_out_v'); hold on
plot(I2_out_1(:,end), '-b', 'LineWidth',2);
l_str{Npl+1}=num2str('Doppler averaged out');
plot(I2_out_1(:,1), '-r', 'LineWidth',2);
l_str{Npl+2}=num2str('Doppler averaged in');
legend(l_str);
figure(2); hold off;
imagesc(z_1, t_1, I2_out_1)
|
