Hi, I couldn't reproduce the error. str(wt.aligned) Formal class 'dwt' [package "wavelets"] with 11 slots ..@ W :List of 3 .. ..$ : num [1:32, 1] -0.252 0.19 0.315 0.451 0.169 ... .. ..$ : num [1:16, 1] 0.5324 -0.0644 0.2494 0.6509 0.1955 ... .. ..$ : num [1:8, 1] -0.558 0.734 -0.122 0.306 0.15 ... ..@ V :List of 3 .. ..$ : num [1:32, 1] 0.108 -0.831 -0.893 -0.778 -0.047 ... .. ..$ : num [1:16, 1] -1.04 -0.918 0.456 0.735 -1.094 ... .. ..$ : num [1:8, 1] -1.284 0.618 -1.1674 0.0554 0.2994 ... ..@ filter :Formal class 'wt.filter' [package "wavelets"] with 7 slots .. .. ..@ L : int 8 .. .. ..@ level : int 1 .. .. ..@ h : num [1:8] 0.0322 0.0126 -0.0992 -0.2979 0.8037 ... .. .. ..@ g : num [1:8] -0.0758 -0.0296 0.4976 0.8037 0.2979 ... .. .. ..@ wt.class : chr "Least Asymmetric" .. .. ..@ wt.name : chr "la8" .. .. ..@ transform: chr "dwt" ..@ level : int 3 ..@ n.boundary: num [1:3] 3 5 6 ..@ boundary : chr "reflection" ..@ series : num [1:64, 1] 0.2 -0.4 -0.6 -0.5 -0.8 -0.4 -0.9 0 -0.2 0.1 ... ..@ class.X : chr "matrix" ..@ attr.X :List of 2 .. ..$ dim : int [1:2] 16 2 .. ..$ dimnames:List of 2 .. .. ..$ : NULL .. .. ..$ : chr [1:2] "X1" "X2" ..@ aligned : logi TRUE ..@ coe : logi FALSE
sessionInfo() R version 3.1.0 (2014-04-10) Platform: x86_64-unknown-linux-gnu (64-bit) locale: [1] LC_CTYPE=en_CA.UTF-8 LC_NUMERIC=C [3] LC_TIME=en_CA.UTF-8 LC_COLLATE=en_CA.UTF-8 [5] LC_MONETARY=en_CA.UTF-8 LC_MESSAGES=en_CA.UTF-8 [7] LC_PAPER=en_CA.UTF-8 LC_NAME=C [9] LC_ADDRESS=C LC_TELEPHONE=C [11] LC_MEASUREMENT=en_CA.UTF-8 LC_IDENTIFICATION=C attached base packages: [1] stats graphics grDevices utils datasets methods base other attached packages: [1] wavelets_0.3-0 stringr_0.6.2 reshape2_1.4 loaded via a namespace (and not attached): [1] plyr_1.8.1 Rcpp_0.11.1 tcltk_3.1.0 tools_3.1.0 A.K. The function "align" produces an error with the present example provided in the vignente of wavelets # obtain the two series listed in Percival and Walden (2000), page 42 X1 <- c(.2,-.4,-.6,-.5,-.8,-.4,-.9,0,-.2,.1,-.1,.1,.7,.9,0,.3) X2 <- c(.2,-.4,-.6,-.5,-.8,-.4,-.9,0,-.2,.1,-.1,.1,-.7,.9,0,.3) # combine them and compute DWT newX <- cbind(X1,X2) wt <- dwt(newX, n.levels=3, boundary="reflection", fast=FALSE) # align wt.aligned <- align(wt) Error en xy.coords(x, y) : el argumento "y" está ausente, sin valor por omisión Would you happen to know if this function is not available or if there is another way to use this function beyond what is given in the example so it works Thank you ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
