91av视频/亚洲h视频/操亚洲美女/外国一级黄色毛片 - 国产三级三级三级三级

  • 大小: 5KB
    文件類型: .m
    金幣: 1
    下載: 0 次
    發布日期: 2021-01-06
  • 語言: Matlab
  • 標簽: 地球物理??matlab??

資源簡介

基于小子域濾波技術,實現位場異常數據的邊界增強,從而獲取場源邊界信息

資源截圖

代碼片段和文件信息

clear?all
close?all

%?load?hulin.mat;
T=load(‘hulin.dat‘);

px=T(:1);
py=T(:2);
pg=T(:3);
XXX=reshape(px105115);
XX=XXX‘;
YYY=reshape(py105115);
YY=YYY‘;
gg=reshape(pg105115);
g=gg‘;

[mn]=size(g);
x=0:2:n-1;y=0:2:m-1;?xstep=x(2)-x(1);ystep=y(2)-y(1);???NN=30;


mt=floor(log2(m))+2;%擴邊處理;
M=2^mt;
nt=floor(log2(n))+2;
N=2^nt;
LL1=floor((M-m)/2);
LL2=M-m-LL1;
L1=floor((N-n)/2);
L2=N-n-L1;
gk=zeros(mN);gk(:L1+1:1:L1+n)=g;
for?k=1:1:L1
????for?row=1:1:m
????????gk(rowk)=gk(rowL1+1)*(1+cos(pi*(L1+1-k)/L1))/2;
????end
end
for?k=1:1:L2
????for?row=1:1:m
????gk(rown+L1+k)=gk(rown+L1)*(1+cos((pi*k)/(L2)))/2;
????end
end
gk2=zeros(NM);gk2(:LL1+1:1:LL1+m)=gk‘;
for?k=1:1:LL1
????for?row=1:1:N
????gk2(rowk)=gk2(rowLL1+1)*(1+cos(pi*(LL1+1-k)

評論

共有 條評論