NAG FL Interface
g05pjf (times_​mv_​varma)

Settings help

FL Name Style:


FL Specification Language:


1 Purpose

g05pjf generates a realization of a multivariate time series from a vector autoregressive moving average (VARMA) model. The realization may be continued or a new realization generated at subsequent calls to g05pjf.

2 Specification

Fortran Interface
Subroutine g05pjf ( mode, n, k, xmean, ip, phi, iq, theta, var, ldvar, r, lr, state, x, ldx, ifail)
Integer, Intent (In) :: mode, n, k, ip, iq, ldvar, lr, ldx
Integer, Intent (Inout) :: state(*), ifail
Real (Kind=nag_wp), Intent (In) :: xmean(k), phi(k*k*ip), theta(k*k*iq), var(ldvar,k)
Real (Kind=nag_wp), Intent (Inout) :: r(lr), x(ldx,n)
C Header Interface
#include <nag.h>
void  g05pjf_ (const Integer *mode, const Integer *n, const Integer *k, const double xmean[], const Integer *ip, const double phi[], const Integer *iq, const double theta[], const double var[], const Integer *ldvar, double r[], const Integer *lr, Integer state[], double x[], const Integer *ldx, Integer *ifail)
The routine may be called by the names g05pjf or nagf_rand_times_mv_varma.

3 Description

Let the vector Xt = (x1t,x2t,,xkt) T , denote a k-dimensional time series which is assumed to follow a vector autoregressive moving average (VARMA) model of the form:
Xt-μ= ϕ1(Xt-1-μ)+ϕ2(Xt-2-μ)++ϕp(Xt-p-μ)+ εt-θ1εt-1-θ2εt-2--θqεt-q (1)
where εt = (ε1t,ε2t,,εkt) T , is a vector of k residual series assumed to be Normally distributed with zero mean and covariance matrix Σ. The components of εt are assumed to be uncorrelated at non-simultaneous lags. The ϕi's and θj's are k×k matrices of parameters. {ϕi}, for i=1,2,,p, are called the autoregressive (AR) parameter matrices, and {θj}, for j=1,2,,q, the moving average (MA) parameter matrices. The parameters in the model are thus the p k×k ϕ-matrices, the q k×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 . . . 0 I θq 0 . . . 0 0 ] qk×qk  
where I denotes the k×k identity matrix.
The model (1) must be both stationary and invertible. The model is said to be stationary if the eigenvalues of A(ϕ) lie inside the unit circle and invertible if the eigenvalues of B(θ) lie inside the unit circle.
For k6 the VARMA model (1) is recast into state space form and a realization of the state vector at time zero computed. For all other cases the routine computes a realization of the pre-observed vectors X0,X−1,,X1-p, ε0,ε−1,,ε1-q, from (1), see Shea (1988). This realization is then used to generate a sequence of successive time series observations. Note that special action is taken for pure MA models, that is for p=0.
At your request a new realization of the time series may be generated more efficiently using the information in a reference vector created during a previous call to g05pjf. See the description of the argument mode in Section 5 for details.
The routine returns a realization of X1,X2,,Xn. On a successful exit, the recent history is updated and saved in the array r so that g05pjf may be called again to generate a realization of Xn+1,Xn+2,, etc. See the description of the argument mode in Section 5 for details.
Further computational details are given in Shea (1988). Note, however, that g05pjf uses a spectral decomposition rather than a Cholesky factorization to generate the multivariate Normals. Although this method involves more multiplications than the Cholesky factorization method and is thus slightly slower it is more stable when faced with ill-conditioned covariance matrices. A method of assigning the AR and MA coefficient matrices so that the stationarity and invertibility conditions are satisfied is described in Barone (1987).
One of the initialization routines g05kff (for a repeatable sequence if computed sequentially) or g05kgf (for a non-repeatable sequence) must be called prior to the first call to g05pjf.

4 References

Barone P (1987) A method for generating independent realisations of a multivariate normal stationary and invertible ARMA(p,q) process J. Time Ser. Anal. 8 125–130
Shea B L (1988) A note on the generation of independent realisations of a vector autoregressive moving average process J. Time Ser. Anal. 9 403–410

5 Arguments

1: mode Integer Input
On entry: a code for selecting the operation to be performed by the routine.
mode=0
Set up reference vector and compute a realization of the recent history.
mode=1
Generate terms in the time series using reference vector set up in a prior call to g05pjf.
mode=2
Combine the operations of mode=0 and 1.
mode=3
A new realization of the recent history is computed using information stored in the reference vector, and the following sequence of time series values are generated.
If mode=1 or 3, you must ensure that the reference vector r and the values of k, ip, iq, xmean, phi, theta, var and ldvar have not been changed between calls to g05pjf.
Constraint: mode=0, 1, 2 or 3.
2: n Integer Input
On entry: n, the number of observations to be generated.
Constraint: n0.
3: k Integer Input
On entry: k, the dimension of the multivariate time series.
Constraint: k1.
4: xmean(k) Real (Kind=nag_wp) array Input
On entry: μ, the vector of means of the multivariate time series.
5: ip Integer Input
On entry: p, the number of autoregressive parameter matrices.
Constraint: ip0.
6: phi(k×k×ip) Real (Kind=nag_wp) array Input
On entry: must contain the elements of the ip×k×k autoregressive parameter matrices of the model, ϕ1,ϕ2,,ϕp. If phi is considered as a three-dimensional array, dimensioned as phi(k,k,ip) , the (i,j)th element of ϕl would be stored in phi(i,j,l) ; that is, phi((l-1)×k×k+(j-1)×k+i) must be set equal to the (i,j)th element of ϕl, for l=1,2,,p, i=1,2,,k and j=1,2,,k.
Constraint: the elements of phi must satisfy the stationarity condition.
7: iq Integer Input
On entry: q, the number of moving average parameter matrices.
Constraint: iq0.
8: theta(k×k×iq) Real (Kind=nag_wp) array Input
On entry: must contain the elements of the iq×k×k moving average parameter matrices of the model, θ1,θ2,,θq. If theta is considered as a three-dimensional array, dimensioned as theta(k,k,iq), the (i,j)th element of θl would be stored in theta(i,j,l) ; that is, theta((l-1)×k×k+(j-1)×k+i) must be set equal to the (i,j)th element of θl, for l=1,2,,q, i=1,2,,k and j=1,2,,k.
Constraint: the elements of theta must be within the invertibility region.
9: var(ldvar,k) Real (Kind=nag_wp) array Input
On entry: var(i,j) must contain the (i,j)th element of Σ, for i=1,2,,k and j=1,2,,k. Only the lower triangle is required.
Constraint: the elements of var must be such that Σ is positive semidefinite.
10: ldvar Integer Input
On entry: the first dimension of the array var as declared in the (sub)program from which g05pjf is called.
Constraint: ldvark.
11: r(lr) Real (Kind=nag_wp) array Communication Array
On entry: if mode=1 or 3, the array r as output from the previous call to g05pjf must be input without any change.
If mode=0 or 2, the contents of r need not be set.
On exit: information required for any subsequent calls to the routine with mode=1 or 3. See Section 9.
12: lr Integer Input
On entry: the dimension of the array r as declared in the (sub)program from which g05pjf is called.
Constraints:
  • if k6, lr(5r2+1)×k2+(4r+3)×k+4;
  • if k<6, lr( (ip+iq) 2+1)×k2+ (4×(ip+iq)+3)×k+max{kr(kr+2),k2 (ip+iq) 2+l(l+3)+k2(iq+1)}+4.
Where r=max(ip,iq) and if ip=0, l=k(k+1)/2, or if ip1, l=k(k+1)/2+(ip-1)k2.
See Section 9 for some examples of the required size of the array r.
13: state(*) Integer array Communication Array
Note: the actual argument supplied must be the array state supplied to the initialization routines g05kff or g05kgf.
On entry: contains information on the selected base generator and its current state.
On exit: contains updated information on the state of the generator.
14: x(ldx,n) Real (Kind=nag_wp) array Output
On exit: x(i,t) will contain a realization of the ith component of Xt, for i=1,2,,k and t=1,2,,n.
15: ldx Integer Input
On entry: the first dimension of the array x as declared in the (sub)program from which g05pjf is called.
Constraint: ldxk.
16: ifail Integer Input/Output
On entry: ifail must be set to 0, −1 or 1 to set behaviour on detection of an error; these values have no effect when no error is detected.
A value of 0 causes the printing of an error message and program execution will be halted; otherwise program execution continues. A value of −1 means that an error message is printed while a value of 1 means that it is not.
If halting is not appropriate, the value −1 or 1 is recommended. If message printing is undesirable, then the value 1 is recommended. Otherwise, the value 0 is recommended. When the value -1 or 1 is used it is essential to test the value of ifail on exit.
On exit: ifail=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry ifail=0 or −1, explanatory error messages are output on the current error message unit (as defined by x04aaf).
Errors or warnings detected by the routine:
ifail=1
On entry, mode=value.
Constraint: mode=0, 1, 2 or 3.
ifail=2
On entry, n=value.
Constraint: n0.
ifail=3
On entry, k=value.
Constraint: k1.
ifail=5
On entry, ip=value.
Constraint: ip0.
ifail=6
On entry, the AR parameters are outside the stationarity region.
ifail=7
On entry, iq=value.
Constraint: iq0.
ifail=8
On entry, the moving average parameter matrices are such that the model is non-invertible.
ifail=9
On entry, the covariance matrix var is not positive semidefinite to machine precision.
ifail=10
On entry, ldvar=value and k=value.
Constraint: ldvark.
ifail=11
k is not the same as when r was set up in a previous call.
Previous value of k=value and k=value.
ifail=12
On entry, lr is not large enough, lr=value: minimum length required =value.
ifail=13
On entry, state vector has been corrupted or not initialized.
ifail=15
On entry, ldx=value and k=value.
Constraint: ldxk.
ifail=20
An excessive number of iterations were required by the NAG routine used to evaluate the eigenvalues of the matrices used to test for stationarity or invertibility.
ifail=21
The reference vector cannot be computed because the AR parameters are too close to the boundary of the stationarity region.
ifail=22
An excessive number of iterations were required by the NAG routine used to evaluate the eigenvalues of the covariance matrix.
ifail=23
An excessive number of iterations were required by the NAG routine used to evaluate the eigenvalues stored in the reference vector.
ifail=-99
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.
ifail=-399
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.
ifail=-999
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

The accuracy is limited by the matrix computations performed, and this is dependent on the condition of the parameter and covariance matrices.

8 Parallelism and Performance

g05pjf is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.
g05pjf 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 routine. Please also consult the Users' Note for your implementation for any additional implementation-specific information.

9 Further Comments

Note that, in reference to ifail=8, g05pjf will permit moving average parameters on the boundary of the invertibility region.
The elements of r contain amongst other information details of the spectral decompositions which are used to generate future multivariate Normals. Note that these eigenvectors may not be unique on different machines. For example the eigenvectors corresponding to multiple eigenvalues may be permuted. Although an effort is made to ensure that the eigenvectors have the same sign on all machines, differences in the signs may theoretically still occur.
The following table gives some examples of the required size of the array r, specified by the argument lr, for k=1,2 or 3, and for various values of p and q.
q
0 1 2 3
p 13 20 31 46
0 36 56 92 144
85 124 199 310
19 30 45 64
1 52 88 140 208
115 190 301 448
35 50 69 92
2 136 188 256 340
397 508 655 838
57 76 99 126
3 268 336 420 520
877 1024 1207 1426
Note that g13dxf may be used to check whether a VARMA model is stationary and invertible.
The time taken depends on the values of p, q and especially n and k.

10 Example

This program generates two realizations, each of length 48, from the bivariate AR(1) model
Xt-μ=ϕ1(Xt-1-μ)+εt  
with
ϕ1=[ 0.80 0.07 0.00 0.58 ] ,  
μ=[ 5.00 9.00 ] ,  
and
Σ=[ 2.97 0 0.64 5.38 ] .  
The pseudorandom number generator is initialized by a call to g05kff. Then, in the first call to g05pjf, mode=2 in order to set up the reference vector before generating the first realization. In the subsequent call mode=3 and a new recent history is generated and used to generate the second realization.

10.1 Program Text

Program Text (g05pjfe.f90)

10.2 Program Data

Program Data (g05pjfe.d)

10.3 Program Results

Program Results (g05pjfe.r)