Description Usage Arguments Details Value Examples
View source: R/PcdiffTwoSimpleUnitRoots.R
Periodically differenced data when there are two simple unit roots in original data
1 | pcdiff.piar2unit.simple(pcts, parameters, d)
|
pcts |
the original time series (assumed there are two simple unit roots) |
parameters |
the parameters of second order differencing filter (1-α_{1s}L-α_{2s}L^2) |
d |
period |
The function provides the (periodic) stationary data. The original data is with two simple unit roots, and after imposing the filter (1-α_{1s}L-α_{2s}L^2), the perioically differenced data can be derived.
Periodically differenced data
1 2 3 4 5 6 7 8 9 | library(pcts)
library(mcompanion)
set.seed(123)
F <- sim_mc(dim = 4, mo = 4, mo.col = 2, eigval = c(1,1), len.block = c(1,1))
phi <- new("MultiFilter", mc = mCompanion(F$mat, mo = 4, mo.col = 2))
pc.sim <- sim_pc(model = list(phi = phi[], p = 2, period = 4), n = 500)
#coefficients of second order filter
icoef <- piar2unit.simple(Xsim = F$eigvec, d = 4, eigval = c(1,1))
pcdiff.pc.sim <- pcdiff.piar2unit.simple(pcts = pc.sim, parameters = icoef, d=4)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.