【物理应用】地震勘探数据处理的matlab工具包

地震勘探数据处理的matlab工具包，包括常用的反褶积，拉登变换，地震绘图等多种功能

%
% example_radon.m
%
% Example that shows how to use the Radon transform
% 

% Read 1 gather 

 [d,headers] = readsegy('gom_cdp_nmo.su');

% Get headers that are needed by Radon

 h = [headers.offset];
 [nt,nh] = size(d);
 dtsec = headers(1).dt/1000/1000.
 
 qmin = -0.2;                  % min residual moveout at far offset
 qmax = 0.8;                   % max  "         "     "  "   "
 nq = 90                       % 
 dq = (qmax-qmin)/nq; 
 q = [qmin:dq:qmax];
 flow = 1;                     % min freq.
 fhigh = 60.   ;               % max freq.
 mu = 1.;                      % trade-off
 N = 2;                        % parabolas 
 qcut = 0.1 

 [m] = inverse_radon(d,dtsec,h,q,N,flow,fhigh,mu);

 time_axis = 0:dtsec:(nt-1)*dtsec;

% Filter primaries and come back with the forward
% Radon transform

 icut = floor((qcut-qmin)/dq)+1;
 m_mult = m;
 m_mult(:,1:icut) = 0;


% Recover the multiples 

 [d_mult] = forward_radon(m_mult,dtsec,h,q,N,flow,fhigh);


 figure(1); clf;
 subplot(131); imagesc(h,time_axis,d);
 subplot(132); imagesc(q,time_axis,m);
 subplot(133); imagesc(h,time_axis,d_mult);
 colormap(seismic);

完整代码或者代写添加QQ1575304183

往期回顾>>>>>>

【物理应用】电荷电场线和电势matlab源码

【物理应用】衍射光栅教学版matlab源码

【物理应用】 计算晶体结构的x射线衍射图谱matlab源码

【物理实验】模拟斜抛运动matlab源码含GUI界面matlab源码

【物理应用】车道检测仿真matlab源码​​​​​​​

【物理应用】基于电偶极子的matlab源码GUImatlab源码​​​​​​​

【物理应用】杨氏双缝干涉实验matlab源码matlab源码​​​​​​​

【物理应用】matlab绘制三个带电量不同的电荷的电场分布

【物理应用】基于Q学习的无线体域网路由方法matlab源码

【物理应用】基于车载自组织网络中路边性能及防碰撞算法研究matlab源码