NAG CL Interface
g13ddc (multi_​varma_​estimate)

1 Purpose

g13ddc fits a vector autoregressive moving average (VARMA) model to an observed vector of time series using the method of Maximum Likelihood (ML). Standard errors of parameter estimates are computed along with their appropriate correlation matrix. The function also calculates estimates of the residual series.

2 Specification

#include <nag.h>
void  g13ddc (Integer k, Integer n, Integer ip, Integer iq, Nag_IncludeMean mean, double par[], Integer npar, double qq[], Integer kmax, const double w[], const Nag_Boolean parhld[], Nag_Boolean exact, Integer iprint, double cgetol, Integer maxcal, Integer ishow, const char *outfile, Integer *niter, double *rlogl, double v[], double g[], double cm[], Integer pdcm, NagError *fail)
The function may be called by the names: g13ddc, nag_tsa_multi_varma_estimate or nag_tsa_varma_estimate.

3 Description

Let Wt = w1t,w2t,,wkt T , for t=1,2,,n, denote a vector of k time series which is assumed to follow a multivariate ARMA model of the form
Wt-μ= ϕ1Wt-1-μ+ϕ2Wt-2-μ++ϕpWt-p-μ +εt-θ1εt-1-θ2εt-2--θqεt-q (1)
where εt = ε1t,ε2t,,εkt T , for t=1,2,,n, is a vector of k residual series assumed to be Normally distributed with zero mean and positive definite covariance matrix Σ. The components of εt are assumed to be uncorrelated at non-simultaneous lags. The ϕi and θj are k by k matrices of parameters. ϕi, for i=1,2,,p, are called the autoregressive (AR) parameter matrices, and θi, for i=1,2,,q, the moving average (MA) parameter matrices. The parameters in the model are thus the p (k by k) ϕ-matrices, the q (k by k) θ-matrices, the mean vector, μ, and the residual error covariance matrix Σ. Let
Aϕ= ϕ1 I 0 . . . 0 ϕ2 0 I 0 . . 0 . . . . . . ϕp-1 0 . . . 0 I ϕp 0 . . . 0 0 pk×pk   and Bθ= θ1 I 0 . . . 0 θ2 0 I 0 . . 0 . . . . . . θq-1 0 . . . . I θq 0 . . . . 0 qk×qk  
where I denotes the k by k identity matrix.
The ARMA model (1) is said to be stationary if the eigenvalues of Aϕ lie inside the unit circle. Similarly, the ARMA model (1) is said to be invertible if the eigenvalues of Bθ lie inside the unit circle.
The method of computing the exact likelihood function (using a Kalman filter algorithm) is discussed in Shea (1987). A quasi-Newton algorithm (see Gill and Murray (1972)) is then used to search for the maximum of the log-likelihood function. Stationarity and invertibility are enforced on the model using the reparameterisation discussed in Ansley and Kohn (1986). Conditional on the maximum likelihood estimates being equal to their true values the estimates of the residual series are uncorrelated with zero mean and constant variance Σ.
You have the option of setting an argument (exact to Nag_FALSE) so that g13ddc calculates conditional maximum likelihood estimates (conditional on W0=W-1==W1-p=ε0=ε-1== ε1-q=0). This may be useful if the exact maximum likelihood estimates are close to the boundary of the invertibility region.
You also have the option (see Section 5) of requesting g13ddc to constrain elements of the ϕ and θ matrices and μ vector to have pre-specified values.

4 References

Ansley C F and Kohn R (1986) A note on reparameterising a vector autoregressive moving average model to enforce stationarity J. Statist. Comput. Simulation 24 99–106
Gill P E and Murray W (1972) Quasi-Newton methods for unconstrained optimization J. Inst. Math. Appl. 9 91–108
Shea B L (1987) Estimation of multivariate time series J. Time Ser. Anal. 8 95–110

5 Arguments

1: k Integer Input
On entry: k, the number of observed time series.
Constraint: k1.
2: n Integer Input
On entry: n, the number of observations in each time series.
3: ip Integer Input
On entry: p, the number of AR parameter matrices.
Constraint: ip0.
4: iq Integer Input
On entry: q, the number of MA parameter matrices.
Constraint: iq0.
ip=iq=0 is not permitted.
5: mean Nag_IncludeMean Input
On entry: mean=Nag_MeanInclude, if components of μ have been estimated and mean=Nag_MeanZero, if all elements of μ are to be taken as zero.
Constraint: mean=Nag_MeanInclude or Nag_MeanZero.
6: par[npar] double Input/Output
On entry: initial parameter estimates read in row by row in the order ϕ1,ϕ2,,ϕp, θ1,θ2,,θq,μ.
Thus,
  • if ip>0, par[l-1×k×k+i-1×k+j-1] must be set equal to an initial estimate of the i,jth element of ϕl, for l=1,2,,p, i=1,2,,k and j=1,2,,k;
  • if iq>0, par[p×k×k+l-1×k×k+i-1×k+j-1] must be set equal to an initial estimate of the i,jth element of θl, l=1,2,,q and i,j=1,2,,k;
  • if mean=Nag_MeanInclude, par[p+q×k×k+i-1] should be set equal to an initial estimate of the ith component of μ (μi). (If you set par[p+q×k×k+i-1] to 0.0 then g13ddc will calculate the mean of the ith series and use this as an initial estimate of μi.)
The first p×k×k elements of par must satisfy the stationarity condition and the next q×k×k elements of par must satisfy the invertibility condition.
If in doubt set all elements of par to 0.0.
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then all the elements of par will be overwritten by the latest estimates of the corresponding ARMA parameters.
7: npar Integer Input
On entry: npar is the number of initial parameter estimates.
Constraints:
  • if mean=Nag_MeanZero, npar must be set equal to p+q×k×k;
  • if mean=Nag_MeanInclude, npar must be set equal to p+q×k×k+k.
The total number of observations n×k must exceed the total number of parameters in the model (npar+kk+1/2).
8: qq[kmax×k] double Input/Output
On entry: qq[kmax×j-1+i-1] must be set equal to an initial estimate of the i,jth element of Σ. The lower triangle only is needed. qq must be positive definite. It is strongly recommended that on entry the elements of qq are of the same order of magnitude as at the solution point. If you set qq[kmax×j-1+i-1]=0.0, for i=1,2,,k and j=1,2,,i, then g13ddc will calculate the covariance matrix between the k time series and use this as an initial estimate of Σ.
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then qq[kmax×j-1+i-1] will contain the latest estimate of the i,jth element of Σ. The lower triangle only is returned.
9: kmax Integer Input
On entry: stride seperating row elements in qq, w and v.
Constraint: kmaxk.
10: w[kmax×n] const double Input
On entry: w[kmax×t-1+i-1] must be set equal to the ith component of Wt, for i=1,2,,k and t=1,2,,n.
11: parhld[npar] const Nag_Boolean Input
On entry: parhld[i-1] must be set to Nag_TRUE if par[i-1] is to be held constant at its input value and Nag_FALSE if par[i-1] is a free parameter, for i=1,2,,npar.
If in doubt try setting all elements of parhld to Nag_FALSE.
12: exact Nag_Boolean Input
On entry: must be set equal to Nag_TRUE if you wish g13ddc to compute exact maximum likelihood estimates. exact must be set equal to Nag_FALSE if only conditional likelihood estimates are required.
13: iprint Integer Input
On entry: the frequency with which the automatic monitoring function is to be called.
iprint>0
The ML search procedure is monitored once every iprint iterations and just before exit from the search function.
iprint=0
The search function is monitored once at the final point.
iprint<0
The search function is not monitored at all.
14: cgetol double Input
On entry: the accuracy to which the solution in par and qq is required.
If cgetol is set to 10-l and on exit fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV or NE_HESS_NOT_POS_DEF, then all the elements in par and qq should be accurate to approximately l decimal places. For most practical purposes the value 10-4 should suffice. You should be wary of setting cgetol too small since the convergence criteria may then have become too strict for the machine to handle.
If cgetol has been set to a value which is less than the machine precision, ε, then g13ddc will use the value 10.0×ε instead.
15: maxcal Integer Input
On entry: the maximum number of likelihood evaluations to be permitted by the search procedure.
Suggested value: maxcal=40×npar×npar+5.
Constraint: maxcal1.
16: ishow Integer Input
On entry: specifies which of the following two quantities are to be printed.
  1. (i)table of maximum likelihood estimates and their standard errors (as returned in the output arrays par, qq and cm);
  2. (ii)table of residual series (as returned in the output array v).
ishow=0
None of the above are printed.
ishow=1
(i) only is printed.
ishow=2
(i) and (ii) are printed.
Constraint: 0ishow2.
17: outfile const char * Input
On entry: the name of a file to which diagnostic output will be directed. If outfile is NULL the diagnostic output will be directed to standard output.
18: niter Integer * Output
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then niter contains the number of iterations performed by the search function.
19: rlogl double * Output
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then rlogl contains the value of the log-likelihood function corresponding to the final point held in par and qq.
20: v[kmax×n] double Output
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then v[kmax×t-1+i-1] will contain an estimate of the ith component of εt, for i=1,2,,k and t=1,2,,n, corresponding to the final point held in par and qq.
21: g[npar] double Output
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then g[i-1] will contain the estimated first derivative of the log-likelihood function with respect to the ith element in the array par. If the gradient cannot be computed then all the elements of g are returned as zero.
22: cm[pdcm×npar] double Output
On exit: if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK, NE_G13D_MAXCAL or NE_HESS_NOT_POS_DEF then cm[pdcm×j-1+i-1] will contain an estimate of the correlation coefficient between the ith and jth elements in the par array for 1inpar, 1jnpar. If i=j, then cm[pdcm×j-1+i-1] will contain the estimated standard error of par[i-1]. If the lth component of par has been held constant, i.e., parhld[l-1] was set to Nag_TRUE, then the lth row and column of cm will be set to zero. If the second derivative matrix cannot be computed then all the elements of cm are returned as zero.
23: pdcm Integer Input
On entry: stride seperating row elements in cm.
Constraint: pdcmnpar.
24: fail NagError * Input/Output
The NAG error argument (see Section 7 in the Introduction to the NAG Library CL Interface).

6 Error Indicators and Warnings

NE_ALLOC_FAIL
Dynamic memory allocation failed.
See Section 3.1.2 in the Introduction to the NAG Library CL Interface for further information.
NE_BAD_PARAM
On entry, argument value had an illegal value.
NE_G13D_AR
The initial AR parameter estimates are outside the stationarity region. To proceed you must try a different starting point.
NE_G13D_ARMA
On entry, ip=0 and iq=0.
NE_G13D_BOUND
The ML solution is so close to the boundary of either the stationarity region or the invertibility region that g13ddc cannot evaluate the Hessian matrix. The elements of cm are set to zero, as are the elements of g. All other output quantities are correct.
NE_G13D_DERIV
An estimate of the second derivative matrix and the gradient vector at the solution point was computed. Either the Hessian matrix was found to be too ill-conditioned to be evaluated accurately or the gradient vector could not be computed to an acceptable degree of accuracy. The elements of cm are set to zero, as are the elements of g. All other output quantities are correct.
NE_G13D_GRAD
The function cannot compute a sufficiently accurate estimate of the gradient vector at the user-supplied starting point. This usually occurs if either the initial parameter estimates are very close to the ML parameter estimates, or you have supplied a very poor estimate of Σ, or the starting point is very close to the boundary of the stationarity or invertibility region. To proceed you must try a different starting point.
NE_G13D_MA
The initial MA parameter estimates are outside the invertibility region. To proceed you must try a different starting point.
NE_G13D_MAX_LOGLIK
The conditions for a solution have not all been met, but a point at which the log-likelihood took a larger value could not be found.
Provided that the estimated first derivatives are sufficiently small, and that the estimated condition number of the second derivative (Hessian) matrix, as printed when iprint0, is not too large, this error exit may simply mean that, although it has not been possible to satisfy the specified requirements, the algorithm has in fact found the solution as far as the accuracy of the machine permits.
Such a condition can arise, for instance, if cgetol has been set so small that rounding error in evaluating the likelihood function makes attainment of the convergence conditions impossible.
If the estimated condition number at the final point is large, it could be that the final point is a solution but that the smallest eigenvalue of the Hessian matrix is so close to zero at the solution that it is not possible to recognize it as a solution. Output quantities were computed at the final point held in par and qq, except that if g or cm could not be computed, in which case they are set to zero.
NE_G13D_MAXCAL
There have been maxcal log-likelihood evaluations made in the function.
If steady increases in the log-likelihood function were monitored up to the point where this exit occurred, then the exit probably simply occurred because maxcal was set too small, so the calculations should be restarted from the final point held in par and qq. This type of exit may also indicate that there is no maximum to the likelihood surface. Output quantities were computed at the final point held in par and qq, except that if g or cm could not be computed, in which case they are set to zero.
NE_G13D_START
The starting point is too close to the boundary of the admissibility region. To proceed you must try a different starting point.
NE_HESS_NOT_POS_DEF
The second-derivative matrix at the solution point is not positive definite. The elements of cm are set to zero. All other output quantities are correct.
NE_INT
On entry, ip=value.
Constraint: ip0.
On entry, iq=value.
Constraint: iq0.
On entry, ishow=value.
Constraint: 0ishow2.
On entry, k=value.
Constraint: k1.
On entry, maxcal=value.
Constraint: maxcal1.
On entry, npar=value.
Constraint: npar=value.
On entry, npar=value.
Constraint: npar0.
NE_INT_2
On entry, kmax=value and k=value.
Constraint: kmaxk.
On entry, pdcm=value and npar=value.
Constraint: pdcmnpar.
NE_INT_3
On entry, n=value, k=value and npar=value.
Constraint: n×k>npar+k×k+1/2.
NE_INTERNAL_ERROR
An internal error has occurred in this function. Check the function call and any array sizes. If the call is correct then please contact NAG for assistance.
See Section 7.5 in the Introduction to the NAG Library CL Interface for further information.
NE_NO_LICENCE
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library CL Interface for further information.
NE_NOT_CLOSE_FILE
Cannot close file value.
NE_NOT_POS_DEF
The initial estimate of Σ is not positive definite. To proceed you must try a different starting point.
NE_NOT_WRITE_FILE
Cannot open file value for writing.

7 Accuracy

On exit from g13ddc, if fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV or NE_HESS_NOT_POS_DEF and cgetol has been set to 10-l, then all the parameters should be accurate to approximately l decimal places. If cgetol was set equal to a value less than the machine precision, ε, then all the parameters should be accurate to approximately 10.0×ε.
If fail.code= NE_G13D_MAXCAL on exit (i.e., maxcal likelihood evaluations have been made but the convergence conditions of the search function have not been satisfied), then the elements in par and qq may still be good approximations to the ML estimates. Inspection of the elements of g may help you determine whether this is likely.

8 Parallelism and Performance

g13ddc is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.
g13ddc makes calls to BLAS and/or LAPACK routines, which may be threaded within the vendor library used by this implementation. Consult the documentation for the vendor library for further information.
Please consult the X06 Chapter Introduction for information on how to control and interrogate the OpenMP environment used within this function. Please also consult the Users' Note for your implementation for any additional implementation-specific information.

9 Further Comments

9.1 Memory Usage

Let r = maxip,iq and s = npar+k× k+1 / 2 . Local workspace arrays of fixed lengths are allocated internally by g13ddc. The total size of these arrays amounts to s+k×r+52 Integer elements and 2 × s2 +s× s-1 /2+15× s+ k2 × 2×ip+iq+ r+3 2 +k× 2× r2 +2× r+3× n+4 +10 double elements.

9.2 Timing

The number of iterations required depends upon the number of parameters in the model and the distance of the user-supplied starting point from the solution.

9.3 Constraining for Stationarity and Invertibility

If the solution lies on the boundary of the admissibility region (stationarity and invertibility region) then g13ddc may get into difficulty and exit with fail.code= NE_G13D_MAX_LOGLIK. If this exit occurs you are advised to either try a different starting point or a different setting for exact. If this still continues to occur then you are urged to try fitting a more parsimonious model.

9.4 Over-parameterisation

You are advised to try and avoid fitting models with an excessive number of parameters since over-parameterisation can cause the maximization problem to become ill-conditioned.

9.5 Standardizing the Residual Series

The standardized estimates of the residual series εt (denoted by e^t) can easily be calculated by forming the Cholesky decomposition of Σ, e.g., GGT and setting e^t=G-1ε^t. f07fdc may be used to calculate the array g. The components of e^t which are now uncorrelated at all lags can sometimes be more easily interpreted.

9.6 Assessing the Fit of the Model

If your time series model provides a good fit to the data then the residual series should be approximately white noise, i.e., exhibit no serial cross-correlation. An examination of the residual cross-correlation matrices should confirm whether this is likely to be so. You are advised to call g13dsc to provide information for diagnostic checking. g13dsc returns the residual cross-correlation matrices along with their asymptotic standard errors. g13dsc also computes a portmanteau statistic and its asymptotic significance level for testing model adequacy. If fail.code= NE_NOERROR or fail.code= NE_G13D_BOUND, NE_G13D_DERIV, NE_G13D_MAX_LOGLIK or NE_HESS_NOT_POS_DEF on exit from g13ddc then the quantities output k, n, v, kmax, ip, iq, par, parhld, and qq will be suitable for input to g13dsc.

10 Example

This example shows how to fit a bivariate AR(1) model to two series each of length 48. μ will be estimated and ϕ12,1 will be constrained to be zero.

10.1 Program Text

Program Text (g13ddce.c)

10.2 Program Data

Program Data (g13ddce.d)

10.3 Program Results

Program Results (g13ddce.r)