ellipord(signal)
ellipord()所属R语言包:signal
Elliptic filter order and cutoff
椭圆滤波器的阶数和截止
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Compute discrete elliptic filter order and cutoff for the desired response
计算离散椭圆滤波器的阶数和截止所需的响应
用法----------Usage----------
ellipord(Wp, Ws, Rp, Rs)
参数----------Arguments----------
参数:Wp, Ws
pass-band and stop-band edges. For a low-pass or high-pass filter, Wp and Ws are scalars. For a band-pass or band-rejection filter, both are vectors of length 2. For a low-pass filter, Wp < Ws. For a high-pass filter, Ws > Wp. For a band-pass (Ws[1] < Wp[1] < Wp[2] < Ws[2]) or band-reject (Wp[1] < Ws[1] < Ws[2] < Wp[2]) filter design, Wp gives the edges of the pass band, and Ws gives the edges of the stop band. Frequencies are normalized to [0,1], corresponding to the range [0, Fs/2].
通带和阻带的边缘。低通或高通滤波器,Wp和Ws是标量。对于一个带通或带阻滤波器中,两个向量的长度为2。对于一个低通滤波器,Wp < Ws。对于一个高通滤波器,Ws > Wp。对于带通(Ws[1] < Wp[1] < Wp[2] < Ws[2])或带阻(Wp[1] < Ws[1] < Ws[2] < Wp[2])滤波器的设计,Wp给出的通带的边缘,和Ws给出的边缘阻带。频率被归一化到[0,1],对应的取值范围为[0,Fs / 2的]。
参数:Rp
allowable decibels of ripple in the pass band.
允许分贝的通带中的纹波。
参数:Rs
minimum attenuation in the stop band in dB.
以dB为单位的阻带中的最小衰减。
值----------Value----------
An object of class FilterOfOrder with the following list elements:
对象的类FilterOfOrder下面的列表元素:
参数:n
filter order
滤波器的阶数
参数:Wc
cutoff frequency
截止频率
参数:type
filter type, one of "low", "high", "stop", or "pass"
过滤器类型,一个"low","high","stop"或"pass"
参数:Rp
dB of pass band ripple
dB的通带纹波
参数:Rs
dB of stop band ripple
dB的阻带纹波
This object can be passed directly to ellip to compute discrete filter coefficients.
这个对象可以通过直接向ellip来计算的分立式滤波器系数。
(作者)----------Author(s)----------
Original Octave version by Paulo Neis
<a href="mailto:p_neis@yahoo.com.br">p_neis@yahoo.com.br</a>.
Modified by Doug Stewart. Conversion to R by Tom Short.
参考文献----------References----------
参见----------See Also----------
Arma, filter, butter,
Arma,filter,butter,
实例----------Examples----------
Fs <- 10000
elord <- ellipord(1000/(Fs/2), 1200/(Fs/2), 0.5, 29)
plot(c(0, 1000, 1000, 0, 0), c(0, 0, -0.5, -0.5, 0),
type = "l", xlab = "Frequency (Hz)", ylab = "Attenuation (dB)")
el1 <- ellip(elord)
plot(c(0, 1000, 1000, 0, 0), c(0, 0, -0.5, -0.5, 0),
type = "l", xlab = "Frequency (Hz)", ylab = "Attenuation (dB)",
col = "red", ylim = c(-35,0), xlim = c(0,2000))
lines(c(5000, 1200, 1200, 5000, 5000), c(-1000, -1000, -29, -29, -1000),
col = "red")
hf <- freqz(el1, Fs = Fs)
lines(hf$f, 20*log10(abs(hf$h)))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|