PhiJ | R Documentation |

This function computes discrete autocorrelation scaling function.

PhiJ(J, filter.number = 10, family = "DaubLeAsymm", tol = 1e-100, OPLENGTH = 2000, verbose = FALSE)

`J` |
Discrete autocorrelation wavelets will be computed for scales -1 up to scale J. This number should be a negative integer. |

`filter.number` |
The index of the wavelet used to compute the discrete autocorrelation wavelets. |

`family` |
The family of wavelet used to compute the discrete autocorrelation wavelets. |

`tol` |
In the brute force computation for Daubechies compactly supported wavelets many inner product computations are performed. This tolerance discounts any results which are smaller than tol which effectively defines how long the inner product/autocorrelation products are. |

`OPLENGTH` |
This integer variable defines some workspace of length OPLENGTH. The code uses this workspace. If the workspace is not long enough then the routine will stop and probably tell you what OPLENGTH should be set to. |

`verbose` |
A logical variable. If set to |

This function computes the discrete autocorrelation scaling function. It does not have any direct use for location-scale analysis (e.g. ewspec). However, it is useful to be able to numerically compute the discrete autocorrelation wavelets for arbitrary wavelets and scales as there are still unanswered theoretical questions concerning the wavelets. The method is a brute force – a more elegant solution would probably be based on interpolatory schemes.

Horizontal scale. This routine returns only the values of the discrete autocorrelation scaling function and not their horizontal positions. Each discrete autocorrelation scaling function is compactly supported with the support determined from the compactly supported wavelet that generates it. See the paper by Nason, von Sachs and Kroisandt which defines the horizontal scale (but basically the finer scale discrete autocorrelation scaling function are interpolated versions of the coarser ones. When one goes from scale j to j-1 (negative j remember) an extra point is inserted between all of the old points and the discrete autocorrelation scaling function value is computed there. Thus as J tends to negative infinity the numerical approximation tends towards the continuous autocorrelation scaling function.

This function stores any discrete autocorrelation wavelet sets that it computes. The storage mechanism is not as advanced as that for ipndacw and its subsidiary routines rmget and firstdot but helps a little bit. The PhinameIE function defines the naming convention for objects returned by this function.

Sometimes it is useful to have the discrete autocorrelation scaling functions stored in matrix form. The PhiJmat does this.

A list containing -J components, numbered from 1 to -J. The [[j]]th component contains the discrete autocorrelation scaling function at scale j.

Idris Eckley

Eckley, I.A., Nason, G.P. and Treloar, R.L. (2010) Locally stationary wavelet fields with application to the modelling and analysis of image texture. Journal of the Royal Statistical Society (Series C), 59, 595 - 616.

Eckley, I.A. and Nason, G.P. (2011). LS2W: Implementing the Locally Stationary 2D Wavelet Process Approach in R, Journal of Statistical Software, 43(3), 1-23. URL http://www.jstatsoft.org/v43/i03/.

`PsiJ`

# # Let us create the discrete autocorrelation wavelets for the Haar wavelet. # We shall create up to scale 4. # haardw4<- PhiJ(-4, filter.number=1, family="DaubExPhase") haardw4 #[[1]]: #[1] 0.5 1.0 0.5 # #[[2]]: #[1] 0.25 0.50 0.75 1.00 0.75 0.50 0.25 # #[[3]]: # [1] 0.125 0.250 0.375 0.500 0.625 0.750 0.875 1.000 0.875 0.750 #[11] 0.625 0.500 0.375 0.250 0.125 # #[[4]]: # [1] 0.0625 0.1250 0.1875 0.2500 0.3125 0.3750 0.4375 0.5000 0.5625 #[10] 0.6250 0.6875 0.7500 0.8125 0.8750 0.9375 1.0000 0.9375 0.8750 #[19] 0.8125 0.7500 0.6875 0.6250 0.5625 0.5000 0.4375 0.3750 0.3125 #[28] 0.2500 0.1875 0.1250 0.0625 # # You can plot the fourth component to get an idea of what the # autocorrelation wavelet looks like. # # Note that the previous call stores the autocorrelation wavelet # in D1.Phi.4.1.DaubExPhase in the environment DWEnv. This is mainly so that # it doesn't have to be recomputed. # # Note that the x-coordinates in the following are approximate. # plot(seq(from=-1, to=1, length=length(haardw4[[4]])),haardw4[[4]], type="l", xlab = "t", ylab = "Haar Autocorrelation Scaling function")

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.