test.m

这是matlab在地球物理数据处理方面的源码

clear all
close all
load EtoW.mat
[newtraces]=normit(EtoW);
[tpicks,xpicks]=picker(bandpass(debias(newtraces),t,[5 10 80 110]),EtoWoff,t,6);
close all
plot(xpicks,tpicks,'ro')