R语言 seewave包 th()函数中文帮助文档(中英文对照)

loveR

th(seewave)
th()所属R语言包：seewave

                                        Temporal entropy
                                         时间熵

                                         译者：生物统计家园网 机器人LoveR

描述----------Description----------

Compute the entropy of a temporal envelope.
计算熵的时间包络。


用法----------Usage----------


th(env)



参数----------Arguments----------

参数：env
a data set resulting of an envelope obtained using env </table>
数据集获得一个信封env </表>


Details

详细信息----------Details----------

Temporal entropy is calculated according to:<br>
时间熵的计算依据：参考

with:<br> y = relative amplitude of the i envelope point,<br> and
：参考Y =相对幅度的i的信封点，<br>和

and N = number of envelope points.
N =包络点。


值----------Value----------

A single value varying between 0 and 1 is returned.
返回一个单一的值，该值在0和1之间变化。


注意----------Note----------

The temporal entropy of a noisy signal with many amplitude modulations will tend towards 1 whereas the temporal entropy of quiet signal will tend towards 0. <br> Note, however, that a sustained sound with an almost
许多振幅调制与噪声信号的时间熵将趋于1，而安静的时间熵的信号将趋于0。 <br>注意，然而，持续的声音与一个几乎


（作者）----------Author(s)----------


Jerome Sueur <a href="mailto:sueur@mnhn.fr">sueur@mnhn.fr</a>



参见----------See Also----------

sh, csh, H
sh，csh，H


实例----------Examples----------


# Temporal entropy of a cicada song[蝉歌的时间熵]
data(orni)
envorni<-env(orni,f=22050,plot=FALSE)
th(envorni)
# Smoothing the envelope might slightly change the result.[平滑的包络可能会略有改变这个结果。]
envorniS<-env(orni,f=22050,smooth=c(50,0),plot=FALSE)
th(envorniS)
# If we mute a part of the cicada song, the temporal entropy decreases[如果我们的一部分静音的蝉歌，时间熵减小]
orni2<-mutew(orni,f=22050,from=0.3,to=0.55,plot=FALSE)
envorni2<-env(orni2,f=22050,plot=FALSE)
th(envorni2)
# The temporal entropy of noise tends towards 1[噪声的时间熵趋于1]
a<-noisew(d=1,f=8000)
enva<-env(a,f=8000,plot=FALSE)
th(enva)
# But be aware that the temporal entropy[但要知道，在时间熵]
# of a sustained sound also tends towards 1[持续的声音也趋于1]
b<-synth(f=8000,d=1,cf=2000,plot=FALSE)
envb<-env(b,f=8000,plot=FALSE)
th(envb)

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。