Ricker子波图形

fm=50;%主频

dt=0.001;%时间域采样间隔

number=200000;%采样点数

t=1:number;

a=(1-2*(pi*fm*(t-5000)*0.00001).^2).*exp(-(pi*fm*(t-5000)*0.00001).^2);

% a=(1-2*(pi*fm*(t)*0.00001).^2).*exp(-(pi*fm*(t)*0.00001).^2);

subplot(2,1,1);

plot(t,a);

title('Ricker-雷克子波');

xlabel('时间t（ms）');

ylabel('幅值A');