[R] Function Align produces an error, Package wavelets

[arun]

Hi Barnaby,
No problem.

If the function got masked by loading another package, you could do:

 wt.aligned <- wavelets::align(wt) 

A.K.


Thank you
I spend more time looking into it since I placed the question and it seems that there is a conflict between two or more packages when open jointly with the wavelet package for this specific example. I am trying to identify the packages.
Many thanks again 
Barnaby 



On Monday, May 26, 2014 1:22 PM, arun <smartpink111 at yahoo.com> wrote:
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