rugo(seewave)
rugo()所属R语言包:seewave
Rugosity of a time wave
眼不规则的波
译者:生物统计家园网 机器人LoveR
描述----------Description----------
This function computes the rugosity of a time wave or time series
此函数计算粗糙度的时间波或时间序列
用法----------Usage----------
rugo(x, ...)
参数----------Arguments----------
参数:x
a vector
一个向量
参数:...
other mean parameters.
其他mean参数。
Details
详细信息----------Details----------
The formula has been slightly modified from Mezquida & Martinez (2009: 826) to fit with the classical definition of the root-mean-square (see rms).<br> The rugosity is then computed as following:
该公式已略作修改,从Mezquida马丁内斯(2009年:826)的方均根(见的经典定义,以适应rms)。<BR>的粗糙度,然后计算如下:
for a vector x of length n.
的矢量x长度为n。
值----------Value----------
A vector of length 1.
一个向量长度为1。
注意----------Note----------
The rugosity of a noisy signal will tend to be higher than that of a pure tone signal, all other things being equal.<br>
眼不规则的噪声信号往往高于纯音信号,所有其他的事情都是平等的。<BR>
(作者)----------Author(s)----------
Jerome Sueur
参考文献----------References----------
Platform for bee-hives monitoring based on sound analysis. A perpetual warehouse for swarm's daily acitvity. Spanish Journal of Agricultural Research 7, 824-828.
参见----------See Also----------
roughness, rms, sh, th, H.
roughness,rms,sh,th,H。
实例----------Examples----------
data(tico) ; tico <-tico@left
# rugosity of the original recording normalised[粗糙度的原来的记录标准化]
rugo(tico/max(tico))
# synthesis of white noise with the same duration as tico[合成白噪声具有相同的持续时间作为天工]
noise <- noisew(d=length(tico)/22050, f=22050)
# tico is normalised to get similar amplitude with the noise[TICO是归一化得到类似幅度的噪音]
tico.norm <- tico/max(tico)
# addition of noise to tico[此外,噪音,天工]
tico.noisy <- tico.norm + 0.5*noise
# new rugosity (higher) on normalised signal[新的粗糙度(以上)的归一化信号]
rugo(tico.noisy/max(tico.noisy))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|