找回密码
 注册
查看: 522|回复: 0

R语言 waveslim包 squared.gain()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-10-1 17:09:06 | 显示全部楼层 |阅读模式
squared.gain(waveslim)
squared.gain()所属R语言包:waveslim

                                        Squared Gain Function of a Filter
                                         平方增益功能的一个过滤器

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

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

Produces the modulus squared of the Fourier transform for a given filtering sequence.
产生一个给定的滤波序列的傅立叶变换的模的平方。


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





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

参数:wf.name
Character string of wavelet filter.
小波滤波器的字符串。


参数:filter.seq
Character string of filter sequence.  H means high-pass filtering and L means low-pass filtering.  Sequence is read from right to left.
的过滤器序列的字符的字符串。 H是指高通滤波和L是指低通滤波。读取序列是由右至左。


参数:n
Length of zero-padded filter.  Frequency resolution will be n/2+1.
零填充的过滤器的长度。频率分辨率将n/ 2 +1。


Details

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

Uses cascade subroutine to compute the squared gain function from a given filtering sequence.
使用cascade子程序计算的平方增益功能,从一个给定的过滤序列。


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

Squared gain function.
平方增益功能。


(作者)----------Author(s)----------


B. Whitcher



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

wave.filter, wavelet.filter.
wave.filter,wavelet.filter。


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


par(mfrow=c(2,2))
f.seq <- "H"
plot(0:256/512, squared.gain("d4", f.seq), type="l", ylim=c(0,2),
     xlab="frequency", ylab="L = 4", main="Level 1")
lines(0:256/512, squared.gain("fk4", f.seq), col=2)
lines(0:256/512, squared.gain("mb4", f.seq), col=3)
abline(v=c(1,2)/4, lty=2)
legend(-.02, 2, c("Daubechies", "Fejer-Korovkin", "Minimum-Bandwidth"),
       lty=1, col=1:3, bty="n", cex=1)
f.seq <- "HL"
plot(0:256/512, squared.gain("d4", f.seq), type="l", ylim=c(0,4),
     xlab="frequency", ylab="", main="Level 2")
lines(0:256/512, squared.gain("fk4", f.seq), col=2)
lines(0:256/512, squared.gain("mb4", f.seq), col=3)
abline(v=c(1,2)/8, lty=2)
f.seq <- "H"
plot(0:256/512, squared.gain("d8", f.seq), type="l", ylim=c(0,2),
     xlab="frequency", ylab="L = 8", main="")
lines(0:256/512, squared.gain("fk8", f.seq), col=2)
lines(0:256/512, squared.gain("mb8", f.seq), col=3)
abline(v=c(1,2)/4, lty=2)
f.seq <- "HL"
plot(0:256/512, squared.gain("d8", f.seq), type="l", ylim=c(0,4),
     xlab="frequency", ylab="", main="")
lines(0:256/512, squared.gain("fk8", f.seq), col=2)
lines(0:256/512, squared.gain("mb8", f.seq), col=3)
abline(v=c(1,2)/8, lty=2)

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


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

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|小黑屋|生物统计家园 网站价格

GMT+8, 2024-11-25 17:39 , Processed in 0.024199 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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