1 | % % % figure(1)
|
---|
2 | % % % plot(SP,SS,'or')
|
---|
3 | % % % hold on
|
---|
4 | % % % plot(aFT)
|
---|
5 | % % % xlim([0 5000])
|
---|
6 | % figure(2)
|
---|
7 | % plot(SP,SS,'or')
|
---|
8 | % grid on
|
---|
9 | % hold on
|
---|
10 | % plot(aFT)
|
---|
11 | % plot(RSP,'k')
|
---|
12 | % xlim([0 5010])
|
---|
13 | % %
|
---|
14 | s=1
|
---|
15 | load(['result/PrN' num2str(1)],'ChiVk','Corrk','ChiVh','Corrh','RPK','RPH','RSP','Profile');
|
---|
16 | close all
|
---|
17 | figure(3)
|
---|
18 | plot(Profile(s,:),'k','linew',2)
|
---|
19 | hold on
|
---|
20 | plot(RPK(s,:),'r','linew',2)
|
---|
21 | plot(RPH(s,:),'g','linew',2)
|
---|
22 | grid on
|
---|
23 | xlim([32600 32950])
|
---|
24 | % ch=mean(Chi,1);
|
---|
25 | %
|
---|
26 | % bar(ch(1:9))
|
---|
27 | % set(gca,'YGrid','on') % horizontal grid
|
---|
28 | % set(gca,'XTickLabel',{'Lw1', 'Lw5', 'Lw10', 'Lw1X','Lw5X', 'Lw10X', 'Tw10', 'Tw1X', 'Tw5X'},'fontsize',10)
|
---|
29 | % colormap([1,0,0]);
|
---|
30 | %
|
---|
31 | % ylabel('\chi^2')
|
---|
32 | %
|
---|
33 | % title('Comparison of different sample methods, Hilbert')
|
---|
34 | % load SData.mat
|
---|
35 | % [Profile,~]=PR_func(4, 2^(-16));
|
---|
36 | % aFT=abs(fft(Profile));
|
---|
37 | % SFr=sort(Lw1);
|
---|
38 | % SP=unique(round(2100.*SFr./max(Tw10)));%ACHTUNG!!! remove same points
|
---|
39 | % SS=aFT(SP);
|
---|
40 | % figure(1)
|
---|
41 | % plot(SP,SS,'or')
|
---|
42 | % hold on
|
---|
43 | % plot(aFT)
|
---|
44 | % xlim([0 5000]) |
---|