dBweight(seewave)
dBweight()所属R语言包:seewave
dB weightings
分贝比重
译者:生物统计家园网 机器人LoveR
描述----------Description----------
This function returns the four most common dB weightings.
这个函数返回的四种最常见的分贝比重。
用法----------Usage----------
dBweight(f, dBref = NULL)
参数----------Arguments----------
参数:f
frequency (in Hz).
频率(Hz)。
参数:dBref
dB reference level (by default NULL).
dB参考电平(默认情况下,NULL)。
Details
详细信息----------Details----------
By default, the function returns four weightings. When dBref is not NULL then the function returns the
默认情况下,该函数返回四个权重。当dBref非NULL该函数返回
值----------Value----------
dBweight returns a list of four items corresponding to four dB weightings.
dBweight返回一个列表的四个项目对应的4分贝比重。
参数:A
dB (A)
分贝(A)
参数:B
dB (B)
分贝(B)的
参数:C
dB (C)
DB(C)
参数:D
dB (D)
DB(D)
注意----------Note----------
The transfer equations used here come from Wipipedia but they were originally coming from the appendix of an international standard on the design performance of sound level meters IEC 651:1979 (Neil Glenister, pers. com.).
转移方程这里使用的从Wipipedia来的,但他们最初的设计性能IEC 651:1979声级计(尼尔·Glenister,市盈率。com)。来自国际标准的附录。
(作者)----------Author(s)----------
Jerome Sueur <a href="mailto:sueur@mnhn.fr">sueur@mnhn.fr</a> and Zev Ross
参考文献----------References----------
<h3>See Also</h3>
实例----------Examples----------
# weight for a 50 Hz frequency[重量为50 Hz的频率]
dBweight(f=50)
# A weight for the 1/3 Octave centre frequencies.[权重的1/3倍频程中心频率。]
dBweight(f=c(20,25,31.5,40,50,63,80,100,125,160,200,250,
315,400,500,630,800,1000,1500,
1600,2000,2500,3150,4000,5000,
6300,8000,10000,12500,16000,20000))$A
# correction for a 50 Hz sound emitted at 100 dB[校正为50 Hz的发出声音100分贝]
dBweight(f=50, dB=100)
# weighting curves plot[加权曲线图]
f <- seq(10,20000,by=10)
par(las=1)
plot(f, dBweight(f)$A, type="n", log="x",
xlim=c(10,10^5),ylim=c(-80,20),xlab="",ylab="",xaxt="n",yaxt="n")
abline(v=c(seq(10,100,by=10),seq(100,1000,by=100),
seq(1000,10000,by=1000),seq(10000,100000,by=10000),
c(100,1000,10000,100000)),col="lightgrey",lty=2)
abline(v=c(100,1000,10000,100000),col="grey")
abline(h=seq(-80, 20, 20),col="grey")
par(new=TRUE)
plot(f, dBweight(f)$A, type="l", log="x",
xlab="Frequency (Hz)", ylab="dB",lwd=2, col="blue", xlim=c(10,10^5),ylim=c(-80,20))
title(main="Acoustic weighting curves (10 Hz -20 kHz)")
lines(x=f, y=dBweight(f)$B, col="green",lwd=2)
lines(x=f, y=dBweight(f)$C, col="red",lwd=2)
lines(x=f, y=dBweight(f)$D, col="black",lwd=2)
legend("bottomright",legend=c("dB(A)","dB(B)","dB(C)","dB(D)"),
lwd=2,col=c("blue","green","red","black"),bty="o",bg="white")
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|