getpacket.wpst(wavethresh)
getpacket.wpst()所属R语言包：wavethresh
Get packet of coefficients from a non-decimated wavelet packet object (wpst).
的系数从一个非抽取小波包的对象（WPST）中获取数据包。
译者：生物统计家园网 机器人LoveR
描述----------Description----------
This function extracts and returns a packet of coefficients from a non-decimated wavelet packet (wpst) object.
此功能提取物，并返回一个数据包从一个非抽取小波分组（wpst）对象的系数。
用法----------Usage----------
## S3 method for class 'wpst':
getpacket(wpst, level, index, ... )
参数----------Arguments----------
参数：wpst
Non-decimated wavelet packet object from which you wish to extract the packet from.
非抽取小波你要提取的数据包的数据包对象，该对象。
参数：level
The resolution level of the coefficients that you wish to extract. Can range from 0 to nlevels(wpst). The coefficients at level nlevels are the data the created the wpst.object.
分辨率级别的系数要提取。范围可以从0到nlevels（WPST）。级的系数nlevels是创造了wpst.object的数据。
参数：index
The index number within the resolution level of the packet of coefficients that you wish to extract. Index ranges from 0 to (4^r)-1 where r = nlevels - level.
该指数在分辨率级别的数据包要提取的系数。指数取值范围从0到(4^r)-1其中r = nlevels - level的。
参数：...
any other arguments
任何其他参数
Details
详细信息----------Details----------
The wpst transform produces a non-decimated wavelet packet object. This is a "cross" between a wavelet packet object and a non-decimated wavelet object. In other words the transform produces wavelet packet coefficients at every possible integer shift (unlike the ordinary wavelet packet transform which is aligned to a dyadic grid).
wpst变换产生的非抽取小波包对象。这是一个“跨”之间的wavelet packet对象和non-decimated wavelet对象。换句话说，变换产生的小波系数移位（不像普通的小波包变换是一个二元电网对齐）在每一个可能的整数。
Each packet of coefficients is obtained by chaining together the effect of the two packet operators DG and DH: these are the high and low pass quadrature mirror filters of the Mallat pyramid algorithm scheme followed by both even and odd decimation. For a full description of this algorithm and how coefficients are stored within see Nason, Sapatinas and Sawczenko, 1998.
的系数是通过以下方式获得的每个数据包连接起来的两个数据包的运营商DG和DH的影响：这些是高通和低通正交镜像滤波器的Mallat金字塔算法计划，然后由两个偶数和奇数抽取。该算法的完整描述，以及如何系数存储内见利晨Sapatinas Sawczenko，1998。
Note that this function extracts packets. If you want to obtain the wavelet packet coefficients for each shift you need to use the accessD.wpstfunction. This function extracts particular wavelet packet coefficients for a particular shift. In particular, this function returns a number of coefficients dependent on the scale level requested whereas accessD.wpst always returns a vector of coefficients of length equal to the input data that created the wpst.object initially.
注意，这个函数提取数据包。如果你想获得的小波包系数为每个班次需要使用accessD.wpst功能，。此功能提取特定的小波包系数为特定的转变。特别是，该函数返回一个数的系数依赖于请求而accessD.wpst总是返回一个创建wpst.object最初的输入数据的长度相等的系数向量的级级别。
值----------Value----------
A vector containing the packet of non-decimated wavelet packet coefficients that you wished to extract.
一个向量，包含数据包，你希望提取的非抽取小波包系数。
RELEASE----------RELEASE----------
Version 3.9 Copyright Guy Nason 1998
版本3.9版权所有1998年盖利晨
（作者）----------Author(s)----------
G P Nason
参见----------See Also----------
accessD.wpst, wpst,
accessD.wpst，wpst，
实例----------Examples----------
#[]
# Create some random data[创建一些随机数据]
#[]
myrand <- rnorm(16)
#myrand[myrand]
# [1] 0.19268626 -0.41737181 -0.30806613 0.07435407 0.99871757[[1] 0.19268626 -0.41737181 -0.30806613 0.07435407 0.99871757]
# [6] -0.58935121 -1.38049759 -0.13346631 1.55555403 -1.60581265[[6] -0.58935121 -1.38049759 -0.13346631 1.55555403 -1.60581265]
#[11] 0.14353621 1.21277774 1.13762337 -1.08577934 -0.29745609[[11] 0.14353621 1.21277774 1.13762337 -1.08577934 -0.29745609]
#[16] 0.50977512[[16] 0.50977512]
#[]
# Do the non-decimated wavelet packet transform[非抽取小波包变换]
#[]
myrwpst <- wpst(myrand)
#[]
# Let's access what is a level nlevels(myrwpst)[我们的访问是什么一个的水平NLEVELS（myrwpst）]
#[]
getpacket(myrwpst, nlevels(myrwpst), index=0)
# [1] 0.19268626 -0.41737181 -0.30806613 0.07435407 0.99871757[[1] 0.19268626 -0.41737181 -0.30806613 0.07435407 0.99871757]
# [6] -0.58935121 -1.38049759 -0.13346631 1.55555403 -1.60581265[[6] -0.58935121 -1.38049759 -0.13346631 1.55555403 -1.60581265]
#[11] 0.14353621 1.21277774 1.13762337 -1.08577934 -0.29745609[[11] 0.14353621 1.21277774 1.13762337 -1.08577934 -0.29745609]
#[16] 0.50977512[[16] 0.50977512]
#[]
# I.e. the data that created the object.[即创建该对象的数据。]
#[]
# How about extracting the 3rd (last) packet at level 3?[怎么提取第三次（最后一次）包3级？]
#[]
getpacket(myrwpst, 3, index=3)
#[1] -2.660657144 0.688415755 -1.764060698 0.717267105 -0.206916242[[1] -2.660657144 0.688415755 -1.764060698 0.717267105 -0.206916242]
#[6] -0.659983747 0.005836952 -0.196874007[[6] -0.659983747 0.005836952 -0.196874007]
#[]
# Of course, there are only 8 coefficients at this level.[当然，也有只有8个系数在这个级别。]
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-10-1 17:20:38
