- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
 - 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
 - 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
 - 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
 - 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
 - 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
 - 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
 
                        查看更多
                        
                    
                
closeall 
clear all 
clc 
c 1500; 
fs 10000; 
T 0.1; 
t 0:1/fs:T; 
L length(t); 
f 500; 
w 2*pi*f; 
k w/c; 
M 11;%阵元个数 
Nmid 1;%参考点 
d 3;%阵元间距 
m [0:1:M-1]; 
yi zeros(M,1);% 返回一个M*1维的零矩阵 
zi zeros(M,1); 
xi m*d; 
xi xi.; 
%各阵元坐标 
y1 20; 
x1 10;z1 10;% 声源位置, y 轴指向声源平面 
Ric1 sqrt((x1-xi).^2+(y1-yi).^2+(z1-zi).^2);%声源至各阵元的距离 M*1维 
Rn1 Ric1-Ric1(Nmid);%声源至各阵元与参考阵元的声程差矢量 M*1维 
s1 cos(w*t);%参考阵元接收到的信号 1*L 维 
snr 20; 
Am 10^(-snr/20); 
n1 Am*(randn(M,L)+j*randn(M,L));%各阵元噪声矢量 
p1 zeros(M,L);%M*L 维 
fork1 1:M 
     p1(k1,:) Ric1(Nmid)/Ric1(k1)*s1.*exp(-j*w*Rn1(k1)/c); %各阵元经过幅度衰减和相位 
延迟后接收到的信号,M*L 维 
end 
p p1+n1;%各阵元接收的声压信号矩阵 M*L 
R p*p/L;%接收数据的自协方差矩阵 M*M 
%  
% 扫描范围 
step_x 0.1; 
step_z 0.1; 
y y1; 
x [0:step_x:20]; 
z [0:step_z:20]; 
fork1 1:length(z) % 纵坐标 
     fork2 1:length(x) 
          Ri sqrt((x(k2)-xi).^2+(y-yi).^2+(z(k1)-zi).^2);%该扫描点至各阵元的聚焦距离矢量 
          Rn Ri-Ri(Nmid);%扫描点到各阵元与参考阵元的程差矢量 M*1 
          b exp(-j*w*Rn/c);%声压聚焦方向矢量 M*1 
          Pcbf(k1,k2) abs(b*R*b); 
     end 
end 
% 归一化 
fork1 1:length(z) 
     pp(k1) max(Pcbf(k1,:));%Pcbf 的第k1行的最大元素的值 
end 
Pcbf Pcbf/max(pp);%Pcbf所有元素除以其最大值,归一化幅度 
figure; 
mesh(x,z,Pcbf); 
xlabel(x(m)),ylabel(z(m)) 
title(常规聚焦波束形成单亮点声图) 
figure; 
pcolor(x,z,Pcbf);shadinginterp; 
xlabel(x(m)),ylabel(z(m)) 
title(常规聚焦波束形成单亮点声图) 
colorbar 
[a,b] find(Pcbf max(max(Pcbf))); 
xm1 b/length(x)*20,zm1 a/length(z)*20, 
[ab] find(Pcbf 0.5*max(max(Pcbf))); 
deta_x (max(b)-min(b))/length(x)*20 
deta_z (max(a)-min(a))/length(z)*20 
                您可能关注的文档
最近下载
- 2023年资料员资格考试题库答案下载.docx
 - 人教版小学语文四年级上册第二单元试卷及答案.pdf VIP
 - 安全与急救(四川警察学院)超星尔雅学习通网课章节测试答案.doc VIP
 - 铁总工电〔2018〕125号普速铁路桥隧建筑物修理规则.docx VIP
 - 煤岩复合体能量传递特性与动力灾害关联性.docx VIP
 - 高血压的危害及有效的降压方法.pptx VIP
 - 生涯发展报告.pdf VIP
 - 数学活动 月历中的奥秘及和为定值的两数积的规律 2025-2026学年人教版数学八年级上册.docx
 - 2026教育部教育技术与资源发展中心(中央电化教育馆)招聘3人(非事业编)笔试备考试题及答案解析.docx VIP
 - 弱电施工方案.doc VIP
 
原创力文档
                        

文档评论(0)