Function calculates the heterogeneity matrix for the one-dimensional series.
hmatr(F,..., B = N %/%4, T = N %/%4, L = B %/%2, neig =10)## S3 method for class 'hmatr'plot(x, col = rev(heat.colors(256)), main ="Heterogeneity Matrix", xlab ="", ylab ="",...)
Arguments
F: the series to be checked for structural changes
...: further arguments passed to ssa routine for hmatr call or image for plot.hmatr call
B: integer, length of base series
T: integer, length of tested series
L: integer, window length for the decomposition of the base series
neig: integer, number of eigentriples to consider for calculating projections
x: 'hmatr' object
col: color palette to use
main: plot title
xlab,ylab: labels for 'x' and 'y' axis
Details
The heterogeneity matrix (H-matrix) provides a consistent view on the structural discrepancy between different parts of the series. Denote by Fi,j the subseries of F of the form: c("Fi,j=\n", "left(fi,dots,fjright)"). Fix two integers B>L and T≥L. Let these integers denote the lengths of base and test subseries, respectively. Introduce the H-matrix GB,T with the elements gij as follows:
gij=g(Fi,i+B,Fj,j+T),
for i=1,…,N−B+1 and j=1,…,N−T+1, that is we split the series F into subseries of lengths B and T and calculate the heterogeneity index between all possible pairs of the subseries.
The heterogeneity index g(F(1),F(2)) between the series F(1) and F(2) can be calculated as follows: let Uj(1), j=1,…,L denote the eigenvectors of the SVD of the trajectory matrix of the series F(1). Fix I to be a subset of {1,…,L} and denote c("mathcalL(1)=\n", "mathrmspan,left(Ui,,iinIright)"). Denote by X1(2),…,XK2(2) (K2=N2−L+1) the L-lagged vectors of the series F(2). Now define
where dist(X,L) denotes the Euclidean distance between the vector X and the subspace L. One can easily see that 0≤g≤1.
Returns
object of type 'hmatr'
References
Golyandina, N., Nekrutkin, V. and Zhigljavsky, A. (2001): Analysis of Time Series Structure: SSA and related techniques. Chapman and Hall/CRC. ISBN 1584881941
See Also
ssa
Examples
# Calculate H-matrix for co2 seriesh <- hmatr(co2, L =24)# Plot the matrixplot(h)