SSAsave {ssaBSS} | R Documentation |
Identification of Non-stationarity in Variance
Description
SSAsave method for identifying non-stationarity in variance
Usage
SSAsave(X, ...)
## Default S3 method:
SSAsave(X, K, n.cuts = NULL, ...)
## S3 method for class 'ts'
SSAsave(X, ...)
Arguments
X |
A numeric matrix or a multivariate time series object of class |
K |
Number of intervals the time series is split into. |
n.cuts |
A K+1 vector of values that correspond to the breaks which are used for splitting the data. Default is intervals of equal length. |
... |
Further arguments to be passed to or from methods. |
Details
Assume that a -variate
with
observations is whitened, i.e.
, for
where
is the sample covariance matrix of
.
The values of are then split into
disjoint intervals
. Algorithm first calculates matrix
where ,
is the number of breakpoints,
is an identity matrix, and
is the sample variance of values of
which belong to a disjoint interval
.
The algorithm finds an orthogonal matrix via eigendecomposition
The final unmixing matrix is then . The first
rows of
are the eigenvectors corresponding to the non-zero eigenvalues and the rest correspond to the zero eigenvalues. In the same way, the first
rows of
project the observed time series to the subspace of components with non-stationary variance, and the last
rows to the subspace of components with stationary variance.
Value
A list of class 'ssabss', inheriting from class 'bss', containing the following components:
W |
The estimated unmixing matrix. |
S |
The estimated sources as time series object standardized to have mean 0 and unit variances. |
M |
Used separation matrix. |
K |
Number of intervals the time series is split into. |
D |
Eigenvalues of M. |
MU |
The mean vector of |
n.cut |
Used K+1 vector of values that correspond to the breaks which are used for splitting the data. |
method |
Name of the method ("SSAsave"), to be used in e.g. screeplot. |
Author(s)
Markus Matilainen, Klaus Nordhausen
References
Flumian L., Matilainen M., Nordhausen K. and Taskinen S. (2021) Stationary subspace analysis based on second-order statistics. Submitted. Available on arXiv: https://arxiv.org/abs/2103.06148
See Also
Examples
n <- 5000
A <- rorth(4)
z1 <- rtvvar(n, alpha = 0.2, beta = 0.5)
z2 <- rtvvar(n, alpha = 0.1, beta = 1)
z3 <- arima.sim(n, model = list(ma = c(0.72, 0.24)))
z4 <- arima.sim(n, model = list(ar = c(0.34, 0.27, 0.18)))
Z <- cbind(z1, z2, z3, z4)
X <- as.ts(tcrossprod(Z, A)) # An mts object
res <- SSAsave(X, K = 6)
res$D # Two non-zero eigenvalues
screeplot(res, type = "lines") # This can also be seen in screeplot
ggscreeplot(res, type = "lines") # ggplot version of screeplot
# Plotting the components as an mts object
plot(res) # The first two are nonstationary in variance