ghkss(RTisean)
ghkss()所属R语言包:RTisean
Noise reduction
降噪
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Performs a noise reduction, through an orthogonal projection onto manifold using an
执行的噪声降低,通过使用正交投影歧管
用法----------Usage----------
ghkss(series, l, x = 0, c = 1, m = 5, d = 1, q = 3, k = 30, r, i = 1, two = FALSE)
参数----------Arguments----------
参数:series
a vector or a matrix.
的矢量或矩阵。
参数:l
number of data to use.
要使用的数据的数量。
参数:x
number of lines to be ignored.
的行数被忽略。
参数:c
column to be read.
要读取的列。
参数:m
embedding dimension.
嵌入维数。
参数:d
delay for the embedding.
延迟的嵌入。
参数:q
dimension of the manifold to project to.
歧管突出的尺寸。
参数:k
minimal number of neighbours.
数量最少的邻居。
参数:r
minimal size of the neighbourhood.
最小尺寸的邻居。
参数:i
number of iterations.
次数的迭代。
参数:two
use euclidean metric instead of the special one.
使用欧氏度量,而不是特殊的一个。
值----------Value----------
A list of vectors with filtered time series, one per iteration.
向量的列表过滤的时间序列,每一个迭代。
参考文献----------References----------
参见----------See Also----------
project
project
实例----------Examples----------
## Not run: [#不运行:]
#FIXME: find better example[FIXME:找到更好的例子]
dat <- logistic(iter=10000,r=3.8, noisesd=0.01)
filteredat <- ghkss(dat)[[1]]
delayedfiltered <- embed(filteredat, d=2)
delayed <- embed(dat,d=2)
plot(delayed,cex=0.8,xlab="x(t)",ylab="x(t+1)",main="Delayed Logistic Chaotic Attractor",pch='.')
points(delayedfiltered,col=2,cex=0.8,pch='.')
legend(0.5,0.4, c("Noisy data","Filtered data"),fill=c(1,2), bty="n",cex=0.8)
## End(Not run)[#(不执行)]
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|