声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 2527|回复: 8

[声学测量] 求p-p法测得声压转换为声强的程序(急)

[复制链接]
发表于 2008-5-28 13:05 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
小弟课题使用双传声器法测得声压,利用MATLAB7.1软件转换为声强,由于对MATLAB语言学习较浅,暂时无法实现,寻求高手帮忙解决。
采样频率25000Hz,两麦克中心距离2.5cm。
下附一组采集数据。
回复
分享到:

使用道具 举报

发表于 2008-5-28 22:20 | 显示全部楼层
:@@ ,太急了,容易上火。
 楼主| 发表于 2008-5-30 16:34 | 显示全部楼层
问题已成功解决,谢谢大家的关注
发表于 2008-5-30 17:06 | 显示全部楼层
 楼主| 发表于 2008-6-2 12:58 | 显示全部楼层
开始编辑程序没有加入循环,设为循环后根据声强测量公式可编辑程序如下,进而可求得声强级。

clear
fp=fopen('dai11.txt');
Y=fscanf(fp,'%f',[1,75000]);
fclose(fp);
sig1=Y;   %采集信号

fp=fopen('dai12.txt');
T=fscanf(fp,'%f',[1,75000]);
fclose(fp);
sig2=T;   %采集信号

q=1.29;     %空气密度
d=2.5e-2;   %传声器中心距
for i=1:75000;
    p(i)=(sig1(i)+sig2(i))/2;
    p1=sig2(i)-sig1(i);
    u(i)=[1/(q*d)]*p1*3;   %质点速度
    P(i)=u(i)*p(i)';   %求声强
end

点评

for loop应可精进  发表于 2011-7-25 00:26

评分

1

查看全部评分

发表于 2009-7-28 21:09 | 显示全部楼层
我最近也在做声强测声功率的论文,学习一下
发表于 2010-10-20 08:56 | 显示全部楼层
学习了!
发表于 2011-5-17 21:10 | 显示全部楼层
不错 学习了
发表于 2011-7-24 16:38 | 显示全部楼层
回复 5 # dobee 的帖子

请问你的程序中u(i)=[1/(q*d)]*p1*3,为什么要乘以3呢?
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-6 07:24 , Processed in 0.065056 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表