filedata='maggio13_1045';
|
|
str=['load ' filedata '.dat'];eval(str);
|
|
str=['x=' filedata '(:,1);'];eval(str);
|
|
str=['y=' filedata '(:,2);'];eval(str);
|
|
|
|
filestr='caf2_maggio13_1134_strum';
|
|
str=['load ' filestr '.dat'];eval(str);
|
|
str=['xs=' filestr '(:,1);'];eval(str);
|
|
str=['ys=' filestr '(:,2);'];eval(str);
|
|
ys=ys/max(ys);
|
|
|
|
x0=-0.4;
|
|
ysI=interp1((xs+x0)*1.0,ys,x,'linear',0);
|
|
|
|
% t0=0;
|
|
% w=12;
|
|
% A=1
|
|
% ysI=A*(exp(-2*log(2)*(x-t0).^2/w^2));
|
|
figure(1)
|
|
semilogy(x,y,x,ysI); xlim([-100 100]);ylim([1e-5 2])
|
|
|
|
|
|
f=(0:1:length(x)-1)*1/(length(x)-1)*1/((x(2)-x(1))*3e-5);
|
|
|
|
Rw=-imag(fft(y)./fft(ysI));
|
|
figure(2)
|
|
plot(f,Rw,f,Rw*0);xlim([0 2000]);ylim([-0.05 2])
|