normit.m

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

function [newtraces] = normit(traces);

% Program to Normalize the Data in a Set of Traces According to the 
% Maximum Amplitude

factors = max(abs(traces));

[m,n] = size(traces);
newtraces = zeros(size(traces));
for i = 1:n
	if factors(i) ~= 0
		newtraces(:,i) = traces(:,i)/factors(i);
	end
end