# NOT RUN {
m <- matrix(rnorm(32*32), nrow=32)
mwst2D <- wst2D(m)
summary(mwst2D)
#Levels: 5
#Length of original: 32 x 32
#Filter was: Daub cmpct on least asymm N=10
#Date: Mon Mar 8 21:57:55 2010
# }
Run the code above in your browser using DataLab