source:
ETALON/CLIO/Analysis/Data24May/KK/GetProfile.m
@
719
Last change on this file since 719 was 719, checked in by , 7 years ago | |
---|---|
File size: 379 bytes |
Line | |
---|---|
1 | function [RPH]=GetProfile(SP,SS) |
2 | %Restore profiles |
3 | [RSP(s,:),ISP]=SRf(SP,SS); |
4 | %Kramers-Kronig restore |
5 | % PhaseK=KK_phase(ISP); |
6 | % RPK(s,:)=real((ifft(RSP(s,:).*exp(1i.*(PhaseK))))); |
7 | % [ChiVk(s),Corrk(s),RPK(s,:)]=PositionDirection(RPK(s,:),RPH(s,:)); |
8 | %Hilbert restore |
9 | PhaseH=-(imag(hilbert(log(abs(RSP(s,:)))))); |
10 | RPH(s,:)=real((ifft(RSP(s,:).*exp(1i.*(PhaseH))))); |
11 | |
12 | |
13 |
Note: See TracBrowser
for help on using the repository browser.