g13djf computes forecasts of a multivariate time series. It is assumed that a vector ARMA model has already been fitted to the appropriately differenced/transformed time series using g13ddf. The standard deviations of the forecast errors are also returned. A reference vector is set up so that, should future series values become available, the forecasts and their standard errors may be updated by calling g13dkf.

2 Specification

Fortran Interface

Subroutine g13djf (

k, n, z, kmax, tr, id, delta, ip, iq, mean, par, lpar, qq, v, lmax, predz, sefz, ref, lref, work, lwork, iwork, liwork, ifail)

Integer, Intent (In)	::	k, n, kmax, id(k), ip, iq, lpar, lmax, lref, lwork, liwork
Integer, Intent (Inout)	::	ifail
Integer, Intent (Out)	::	iwork(liwork)
Real (Kind=nag_wp), Intent (In)	::	z(kmax,n), delta(kmax,), par(lpar), v(kmax,)
Real (Kind=nag_wp), Intent (Inout)	::	qq(kmax,k), predz(kmax,lmax), sefz(kmax,lmax)
Real (Kind=nag_wp), Intent (Out)	::	ref(lref), work(lwork)
Character (1), Intent (In)	::	tr(k), mean

C Header Interface

#include <nag.h>

void

g13djf_ (const Integer *k, const Integer *n, const double z[], const Integer *kmax, const char tr[], const Integer id[], const double delta[], const Integer *ip, const Integer *iq, const char *mean, const double par[], const Integer *lpar, double qq[], const double v[], const Integer *lmax, double predz[], double sefz[], double ref[], const Integer *lref, double work[], const Integer *lwork, Integer iwork[], const Integer *liwork, Integer *ifail, const Charlen length_tr, const Charlen length_mean)

The routine may be called by the names g13djf or nagf_tsa_multi_varma_forecast.

3 Description

Let the vector

Z_{t} = {(z_{1 t}, z_{2 t}, \dots, z_{k t})}^{T}

, for

t = 1, 2, \dots, n

, denote a

k

-dimensional time series for which forecasts of

Z_{n + 1}, Z_{n + 2}, \dots, Z_{n + l_{\max}}

are required. Let

W_{t} = {(w_{1 t}, w_{2 t}, \dots, w_{k t})}^{T}

be defined as follows:

w_{i t} = δ_{i} (B) z_{i t}^{*}, i = 1, 2, \dots, k,

where

δ_{i} (B)

is the differencing operator applied to the

i

th series and where

z_{i t}^{*}

is equal to either

z_{i t}

\sqrt{z_{i t}}

\log_{e} (z_{i t})

depending on whether or not a transformation was required to stabilize the variance before fitting the model.

If the order of differencing required for the

i

th series is

d_{i}

, then the differencing operator for the

i

th series is defined by

δ_{i} (B) = 1 - δ_{i 1} B - δ_{i 2} B^{2} - \dots - δ_{i d_{i}} B^{d_{i}}

where

B

is the backward shift operator; that is,

B Z_{t} = Z_{t - 1}

. The differencing parameters

δ_{i j}

, for

i = 1, 2, \dots, k

and

j = 1, 2, \dots, d_{i}

, must be supplied by you. If the

i

th series does not require differencing, then

d_{i} = 0

W_{t}

is assumed to follow a multivariate ARMA model of the form:

W_{t} - μ = ϕ_{1} (W_{t - 1} - μ) + ϕ_{2} (W_{t - 2} - μ) + \dots + ϕ_{p} (W_{t - p} - μ) + ε_{t} - θ_{1} ε_{t - 1} - \dots - θ_{q} ε_{t - q},

(1)

where

ε_{t} = {(ε_{1 t}, ε_{2 t}, \dots, ε_{k t})}^{T}

, for

t = 1, 2, \dots, 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 \times k

matrices of parameters. The matrices

ϕ_{i}

, for

i = 1, 2, \dots, p

, are the autoregressive (AR) parameter matrices, and the matrices

θ_{i}

, for

i = 1, 2, \dots, q

, the moving average (MA) parameter matrices. The parameters in the model are thus the

p

(

k \times k

)

ϕ

-matrices, the

q

(

k \times k

)

θ

-matrices, the mean vector

μ

and the residual error covariance matrix

Σ

. The ARMA model (1) must be both stationary and invertible; see g13dxf for a method of checking these conditions.

The ARMA model (1) may be rewritten as

ϕ (B) (δ (B) Z_{t}^{*} - μ) = θ (B) ε_{t},

where

ϕ (B)

and

θ (B)

are the autoregressive and moving average polynomials and

δ (B)

denotes the

k \times k

diagonal matrix whose

i

th diagonal elements is

δ_{i} (B)

and

Z_{t}^{*} = {(z_{1 t}^{*}, z_{2 t}^{*} \dots z_{k t}^{*})}^{T}

This may be rewritten as

ϕ (B) δ (B) Z_{t}^{*} = ϕ (B) μ + θ (B) ε_{t}

Z_{t}^{*} = τ + ψ (B) ε_{t} = τ + ε_{t} + ψ_{1} ε_{t - 1} + ψ_{2} ε_{t - 2} + \dots

where

ψ (B) = δ^{- 1} (B) ϕ^{- 1} (B) θ (B)

and

τ = δ^{- 1} (B) μ

is a vector of length

k

Forecasts are computed using a multivariate version of the procedure described in Box and Jenkins (1976). If

{\hat{Z}}_{n}^{*} (l)

denotes the forecast of

Z_{n + l}^{*}

, then

{\hat{Z}}_{n}^{*} (l)

is taken to be that linear function of

Z_{n}^{*}, Z_{n - 1}^{*}, \dots

which minimizes the elements of

E {e_{n} (l) e_{n}^{'} (l)}

where

e_{n} (l) = Z_{n + l}^{*} - {\hat{Z}}_{n}^{*} (l)

is the forecast error.

{\hat{Z}}_{n}^{*} (l)

is referred to as the linear minimum mean square error forecast of

Z_{n + l}^{*}

The linear predictor which minimizes the mean square error may be expressed as

{\hat{Z}}_{n}^{*} (l) = τ + ψ_{l} ε_{n} + ψ_{l + 1} ε_{n - 1} + ψ_{l + 2} ε_{n - 2} + \dots .

The forecast error at

t

for lead

l

is then

e_{n} (l) = Z_{n + l}^{*} - {\hat{Z}}_{n}^{*} (l) = ε_{n + l} + ψ_{1} ε_{n + l - 1} + ψ_{2} ε_{n + l - 2} + \dots + ψ_{l - 1} ε_{n + 1} .

Let

d = \max (d_{i})

, for

i = 1, 2, \dots, k

. Unless

q = 0

the routine requires estimates of

ε_{t}

, for

t = d + 1, \dots, n

, which are obtainable from g13ddf. The terms

ε_{t}

are assumed to be zero, for

t = n + 1, \dots, n + l_{\max}

. You may use g13dkf to update these

l_{\max}

forecasts should further observations,

Z_{n + 1}, Z_{n + 2}, \dots

, become available. Note that when

l_{\max}

or more further observations are available then g13djf must be used to produce new forecasts for

Z_{n + l_{\max} + 1}, Z_{n + l_{\max} + 2}, \dots

, should they be required.

When a transformation has been used the forecasts and their standard errors are suitably modified to give results in terms of the original series,

Z_{t}

; see Granger and Newbold (1976).

4 References

Box G E P and Jenkins G M (1976) Time Series Analysis: Forecasting and Control (Revised Edition) Holden–Day

Granger C W J and Newbold P (1976) Forecasting transformed series J. Roy. Statist. Soc. Ser. B 38 189–203

Wei W W S (1990) Time Series Analysis: Univariate and Multivariate Methods Addison–Wesley

5 Arguments

The quantities k, n, kmax, ip, iq, par, npar, qq and v from g13ddf are suitable for input to g13djf.

1: $k$ – Integer Input

On entry:

k

, the dimension of the multivariate time series.

Constraint:

k \geq 1

2: $n$ – Integer Input

On entry:

n

, the number of observations in the series,

Z_{t}

, prior to differencing.

Constraint:

n \geq 3

The total number of observations must exceed the total number of parameters in the model; that is

if $mean ='Z'$ , $n \times k > (ip + iq) \times k \times k + k \times (k + 1) / 2$ ;
if $mean ='M'$ , $n \times k > (ip + iq) \times k \times k + k + k \times (k + 1) / 2$ ,

(see the arguments ip, iq and mean).

3: $z (kmax, n)$ – Real (Kind=nag_wp) array Input

On entry:

z (i, t)

must contain,

z_{i t}

, the

i

th component of

Z_{t}

, for

i = 1, 2, \dots, k

and

t = 1, 2, \dots, n

Constraints:

if $tr (i) ='L'$ , $z (i, t) > 0.0$ ;
if $tr (i) ='S'$ , $z (i, t) \geq 0.0$ , for $i = 1, 2, \dots, k$ and $t = 1, 2, \dots, n$ .

4: $kmax$ – Integer Input

On entry: the first dimension of the arrays z, delta, qq, v, predz and sefz as declared in the (sub)program from which g13djf is called.

Constraint:

kmax \geq k

5: $tr (k)$ – Character(1) array Input

On entry:

tr (i)

indicates whether the

i

th time series is to be transformed, for

i = 1, 2, \dots, k

$tr (i) ='N'$: No transformation is used.
$tr (i) ='L'$: A log transformation is used.
$tr (i) ='S'$: A square root transformation is used.

Constraint:

tr (i) ='N'

'L'

'S'

, for

i = 1, 2, \dots, k

6: $id (k)$ – Integer array Input

On entry:

id (i)

must specify,

d_{i}

, the order of differencing required for the

i

th series.

Constraint:

0 \leq id (i) < n - \max (ip, iq)

, for

i = 1, 2, \dots, k

7: $delta (kmax, *)$ – Real (Kind=nag_wp) array Input

Note: the second dimension of the array delta must be at least

\max (1, d)

, where

d = \max (id (i))

On entry: if

id (i) > 0

, then

delta (i, j)

must be set equal to

δ_{i j}

, for

j = 1, 2, \dots, d_{i}

and

i = 1, 2, \dots, k

d = 0

, delta is not referenced.

8: $ip$ – Integer Input

On entry:

p

, the number of AR parameter matrices.

Constraint:

ip \geq 0

9: $iq$ – Integer Input

On entry:

q

, the number of MA parameter matrices.

Constraint:

iq \geq 0

10: $mean$ – Character(1) Input

On entry:

mean ='M'

, if components of

μ

have been estimated and

mean ='Z'

, if all elements of

μ

are to be taken as zero.

Constraint:

mean ='M'

'Z'

11: $par (lpar)$ – Real (Kind=nag_wp) array Input

On entry: must contain the parameter estimates read in row by row in the order

ϕ_{1}, ϕ_{2}, \dots, ϕ_{p}

θ_{1}, θ_{2}, \dots, θ_{q}

μ

Thus,

if $ip > 0$ , $par ((l - 1) \times k \times k + (i - 1) \times k + j)$ must be set equal to an estimate of the $(i, j)$ th element of $ϕ_{l}$ , for $l = 1, 2, \dots, p$ , $i = 1, 2, \dots, k$ and $j = 1, 2, \dots, k$ ;
if $iq > 0$ , $par (p \times k \times k + (l - 1) \times k \times k + (i - 1) \times k + j)$ must be set equal to an estimate of the $(i, j)$ th element of $θ_{l}$ , for $l = 1, 2, \dots, q$ , $i = 1, 2, \dots, k$ and $j = 1, 2, \dots, k$ ;
if $mean ='M'$ , $par ((p + q) \times k \times k + i)$ must be set equal to an estimate of the $i$ th component of $μ$ , for $i = 1, 2, \dots, k$ .

Constraint: the first

ip \times k \times k

elements of par must satisfy the stationarity condition and the next

iq \times k \times k

elements of par must satisfy the invertibility condition.

12: $lpar$ – Integer Input

On entry: the dimension of the array par as declared in the (sub)program from which g13djf is called.

Constraints:

if $mean ='Z'$ , $lpar \geq \max (1, (ip + iq) \times k \times k)$ ;
if $mean ='M'$ , $lpar \geq (ip + iq) \times k \times k + k$ .

13: $qq (kmax, k)$ – Real (Kind=nag_wp) array Input/Output

On entry:

qq (i, j)

must contain an estimate of the

(i, j)

th element of

Σ

. The lower triangle only is needed.

Constraint:

qq

must be positive definite.

On exit: if

ifail \neq 1

, then the upper triangle is set equal to the lower triangle.

14: $v (kmax, *)$ – Real (Kind=nag_wp) array Input

Note: the second dimension of the array v must be at least

\max (1, n - d)

, where

d = \max (id (i))

On entry:

v (i, t)

must contain an estimate of the

i

th component of

ε_{t + d}

, for

i = 1, 2, \dots, k

and

t = 1, 2, \dots, n - d

q = 0

, v is not used.

15: $lmax$ – Integer Input

On entry: the number,

l_{\max}

, of forecasts required.

Constraint:

lmax \geq 1

16: $predz (kmax, lmax)$ – Real (Kind=nag_wp) array Output

On exit:

predz (i, l)

contains the forecast of

z_{i, n + l}

, for

i = 1, 2, \dots, k

and

l = 1, 2, \dots, l_{\max}

17: $sefz (kmax, lmax)$ – Real (Kind=nag_wp) array Output

On exit:

sefz (i, l)

contains an estimate of the standard error of the forecast of

z_{i, n + l}

, for

i = 1, 2, \dots, k

and

l = 1, 2, \dots, l_{\max}

18: $ref (lref)$ – Real (Kind=nag_wp) array Output

On exit: the reference vector which may be used to update forecasts using g13dkf. The first

(lmax - 1) \times k \times k

elements contain the

ψ

weight matrices,

ψ_{1}, ψ_{2}, \dots, ψ_{l_{\max} - 1}

. The next

k \times lmax

elements contain the forecasts of the transformed series

{\hat{Z}}_{n + 1}^{*}, {\hat{Z}}_{n + 2}^{*}, \dots, {\hat{Z}}_{n + l_{\max}}^{*}

and the next

k \times lmax

contain the variances of the forecasts of the transformed variables. The last k elements are used to store the transformations for the series.

19: $lref$ – Integer Input

On entry: the dimension of the array ref as declared in the (sub)program from which g13djf is called.

Constraint:

lref \geq (lmax - 1) \times k \times k + 2 \times k \times lmax + k

20: $work (lwork)$ – Real (Kind=nag_wp) array Workspace

21: $lwork$ – Integer Input

On entry: the dimension of the array work as declared in the (sub)program from which g13djf is called.

Constraint: if

r = \max (ip, iq)

and

d = \max (id (i))

, for

i = 1, 2, \dots, k

lwork \geq \max {k r (k r + 2), (ip + d + 2) k^{2} + (n + lmax) k}

22: $iwork (liwork)$ – Integer array Workspace

23: $liwork$ – Integer Input

On entry: the dimension of the array iwork as declared in the (sub)program from which g13djf is called.

Constraint:

liwork \geq k \times \max (ip, iq)

24: $ifail$ – Integer Input/Output

On entry: ifail must be set to

0

−1

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

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

−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, $i = ⟨ value ⟩$ , $id (i) = ⟨ value ⟩$ and $n - \max (ip, iq) = ⟨ value ⟩$ .
Constraint: $0 \leq id (i) < n - \max (ip, iq)$ .

On entry, $ip = ⟨ value ⟩$ .
Constraint: $ip \geq 0$ .

On entry, $iq = ⟨ value ⟩$ .
Constraint: $iq \geq 0$ .

On entry, $k = ⟨ value ⟩$ .
Constraint: $k \geq 1$ .

On entry, $kmax = ⟨ value ⟩$ and $k = ⟨ value ⟩$ .
Constraint: $kmax \geq k$ .

On entry, $liwork = ⟨ value ⟩$ and the minimum size $required = ⟨ value ⟩$ .
Constraint: $liwork \geq k \times \max (ip, iq)$ .

On entry, $lmax = ⟨ value ⟩$ .
Constraint: $lmax \geq 1$ .

On entry, lpar is too small: $lpar = ⟨ value ⟩$ and the minimum size $required = ⟨ value ⟩$ .

On entry, $lref = ⟨ value ⟩$ and the minimum size $required = ⟨ value ⟩$ .
Constraint: $lref \geq (lmax - 1) \times k \times k + 2 \times k \times lmax + k$ .

On entry, lwork is too small: $lwork = ⟨ value ⟩$ and the minimum size $required = ⟨ value ⟩$ .

On entry, mean is an invalid character.
Constraint: $mean ='M'$ or $'Z'$ .

On entry, $n = ⟨ value ⟩$ .
Constraint: $n \geq 3$ .

On entry, number of observations $= ⟨ value ⟩$ and number of parameters $= ⟨ value ⟩$ .
Constraint: number of $observations \geq number$ of parameters.

$ifail = 2$: On entry, $i = ⟨ value ⟩$ and $tr (i)$ is invalid.
Constraint: $tr (i) ='N'$ , $'L'$ or $'S'$ .

$ifail = 3$: On entry, one (or more) of the transformations requested is invalid. Check that you are not trying to log or square-root a series, some of whose values are negative.

$ifail = 4$: On entry, the AR parameter matrices are outside the stationarity region. To proceed you must supply different parameter estimates in the arrays par and qq.

On entry, the covariance matrix qq is not positive definite. To proceed you must supply different parameter estimates in the arrays par and qq.

On entry, the MA parameter matrices are outside the invertibility region. To proceed you must supply different parameter estimates in the arrays par and qq.

$ifail = 5$: An excessive number of iterations were needed to evaluate the eigenvalues of the matrices used to test for stationarity and invertibility.

$ifail = 6$: The covariance matrix may be nearly non-positive definite. In this case the standard deviations of the forecast errors may be non-positive. To proceed you must supply different parameter estimates in the array qq.

$ifail = 7$: The forecasts will overflow if computed. You should check whether the transformations requested in the array tr are sensible.

$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 matrix computations are believed to be stable.

8 Parallelism and Performance

Background information to multithreading can be found in the Multithreading documentation.

g13djf is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.

g13djf 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

The same differencing operator does not have to be applied to all the series. For example, suppose we have

k = 2

, and wish to apply the second order differencing operator

\nabla^{2}

to the first series and the first-order differencing operator

\nabla

to the second series:

\begin{matrix} w_{1 t} = \nabla^{2} z_{1 t} = {(1 - B)}^{2} z_{1 t} = (1 - 2 B + B^{2}) Z_{1 t},   and \\ w_{2 t} = \nabla z_{2 t} = (1 - B) z_{2 t} . \end{matrix}

Then

d_{1} = 2, d_{2} = 1

d = \max (d_{1}, d_{2}) = 2

, and

delta = [\begin{array}{r} δ_{11} & δ_{12} \\ δ_{21} \end{array}] = [\begin{array}{r} 2 & −1 \\ 1 \end{array}] .

Note: although differencing may already have been applied prior to the model fitting stage, the differencing parameters supplied in delta are part of the model definition and are still required by this routine to produce the forecasts.

g13djf should not be used when the moving average parameters lie close to the boundary of the invertibility region. The routine does test for both invertibility and stationarity but if in doubt, you may use g13dxf, before calling this routine, to check that the VARMA model being used is invertible.

On a successful exit, the quantities k, lmax, kmax, ref and lref will be suitable for input to g13dkf.

10 Example

This example computes forecasts of the next five values in two series each of length

48

. No transformation is to be used and no differencing is to be applied to either of the series. g13ddf is first called to fit an AR(1) model to the series. The mean vector

μ

is to be estimated and

ϕ_{1} (2, 1)

constrained to be zero.

g13dj: FL CL CPP AD PY MB

NAG FL Interfaceg13djf (multi_​varma_​forecast)

▸▿ Contents

1 Purpose

2 Specification

3 Description

4 References

5 Arguments

6 Error Indicators and Warnings

7 Accuracy

8 Parallelism and Performance

9 Further Comments

10 Example

10.1 Program Text

10.2 Program Data

10.3 Program Results

NAG FL Interface
g13djf (multi_varma_forecast)