g13naf detects change points in a univariate time series, that is, the time points at which some feature of the data, for example the mean, changes. Change points are detected using the PELT (Pruned Exact Linear Time) algorithm using one of a provided set of cost functions.

2 Specification

Fortran Interface

Subroutine g13naf (

ctype, n, y, beta, minss, iparam, param, ntau, tau, sparam, ifail)

Integer, Intent (In)	::	ctype, n, minss, iparam
Integer, Intent (Inout)	::	ifail
Integer, Intent (Out)	::	ntau, tau(n)
Real (Kind=nag_wp), Intent (In)	::	y(n), beta, param(1)
Real (Kind=nag_wp), Intent (Out)	::	sparam(2*n+2)

C Header Interface

#include <nag.h>

void	g13naf_ (const Integer ctype, const Integer n, const double y[], const double beta, const Integer minss, const Integer iparam, const double param[], Integer ntau, Integer tau[], double sparam[], Integer *ifail)

The routine may be called by the names g13naf or nagf_tsa_cp_pelt.

3 Description

Let

y_{1 : n} = {y_{j} : j = 1, 2, \dots, n}

denote a series of data and

τ = {τ_{i} : i = 1, 2, \dots, m}

denote a set of

m

ordered (strictly monotonic increasing) indices known as change points with

1 \leq τ_{i} \leq n

and

τ_{m} = n

. For ease of notation we also define

τ_{0} = 0

. The

m

change points,

τ

, split the data into

m

segments, with the

i

th segment being of length

n_{i}

and containing

y_{τ_{i - 1} + 1 : τ_{i}}

Given a cost function,

C (y_{τ_{i - 1} + 1 : τ_{i}})

g13naf solves

\underset{m, τ}{minimize} \sum_{i = 1}^{m} (C (y_{τ_{i - 1} + 1 : τ_{i}}) + β)

(1)

where

β

is a penalty term used to control the number of change points. This minimization is performed using the PELT algorithm of Killick et al. (2012). The PELT algorithm is guaranteed to return the optimal solution to (1) if there exists a constant

K

such that

C (y_{(u + 1) : v}) + C (y_{(v + 1) : w}) + K \leq C (y_{(u + 1) : w})

(2)

for all

u < v < w

g13naf supplies four families of cost function. Each cost function assumes that the series,

y

, comes from some distribution,

D (Θ)

. The parameter space,

Θ = {θ, ϕ}

is subdivided into

θ

containing those parameters allowed to differ in each segment and

ϕ

those parameters treated as constant across all segments. All four cost functions can then be described in terms of the likelihood function,

L

and are given by:

C (y_{(τ_{i - 1} + 1) : τ_{i}}) = - 2 \log L ({\hat{θ}}_{i}, ϕ | y_{(τ_{i - 1} + 1) : τ_{i}})

where

{\hat{θ}}_{i}

is the maximum likelihood estimate of

θ

within the

i

th segment. In all four cases setting

K = 0

satisfies equation (2). Four distributions are available: Normal, Gamma, Exponential and Poisson. Letting

S_{i} = \sum_{j = τ_{i - 1}}^{τ_{i}} y_{j}

the log-likelihoods and cost functions for the four distributions, and the available subdivisions of the parameter space are:

Normal distribution: $Θ = {μ, σ^{2}}$
$- 2 \log L = \sum_{i = 1}^{m} \sum_{j = τ_{i - 1}}^{τ_{i}} \log (2 π) + \log (σ_{i}^{2}) + \frac{{(y_{j} - μ_{i})}^{2}}{σ_{i}^{2}}$
- Mean changes: $θ = {μ}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = \sum_{j = τ_{i - 1}}^{τ_{i}} \frac{{(y_{j} - n_{i}^{- 1} S_{i})}^{2}}{σ^{2}}$
- Variance changes: $θ = {σ^{2}}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = n_{i} (\log (\sum_{j = τ_{i - 1}}^{τ_{i}} {(y_{j} - μ)}^{2}) - \log n_{i})$
- Both mean and variance change: $θ = {μ, σ^{2}}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = n_{i} (\log (\sum_{j = τ_{i - 1}}^{τ_{i}} {(y_{j} - n_{i}^{- 1} S_{i})}^{2}) - \log n_{i})$
Gamma distribution: $Θ = {a, b}$
$- 2 \log L = 2 \times \sum_{i = 1}^{m} \sum_{j = τ_{i - 1}}^{τ_{i}} \log Γ (a_{i}) + a_{i} \log b_{i} + (1 - a_{i}) \log y_{j} + \frac{y_{j}}{b_{i}}$
- Scale changes: $θ = {b}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = 2 a n_{i} (\log S_{i} - \log (a n_{i}))$
Exponential Distribution: $Θ = {λ}$
$- 2 \log L = 2 \times \sum_{i = 1}^{m} \sum_{j = τ_{i - 1}}^{τ_{i}} \log λ_{i} + \frac{y_{j}}{λ_{i}}$
- Mean changes: $θ = {λ}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = 2 n_{i} (\log S_{i} - \log n_{i})$
Poisson distribution: $Θ = {λ}$
$- 2 \log L = 2 \times \sum_{i = 1}^{m} \sum_{j = τ_{i - 1}}^{τ_{i}} λ_{i} - ⌊ y_{j} + 0.5 ⌋ \log λ_{i} + \log Γ (⌊ y_{j} + 0.5 ⌋ + 1)$
- Mean changes: $θ = {λ}$
  $C (y_{τ_{i - 1} + 1 : τ_{i}}) = 2 S_{i} (\log n_{i} - \log S_{i})$
  when calculating $S_{i}$ for the Poisson distribution, the sum is calculated for $⌊ y_{i} + 0.5 ⌋$ rather than $y_{i}$ .

4 References

Chen J and Gupta A K (2010) Parametric Statistical Change Point Analysis With Applications to Genetics Medicine and Finance Second Edition Birkhäuser

Killick R, Fearnhead P and Eckely I A (2012) Optimal detection of changepoints with a linear computational cost Journal of the American Statistical Association 107:500 1590–1598

5 Arguments

1: $ctype$ – Integer Input

On entry: a flag indicating the assumed distribution of the data and the type of change point being looked for.

$ctype = 1$: Data from a Normal distribution, looking for changes in the mean, $μ$ .
$ctype = 2$: Data from a Normal distribution, looking for changes in the standard deviation $σ$ .
$ctype = 3$: Data from a Normal distribution, looking for changes in the mean, $μ$ and standard deviation $σ$ .
$ctype = 4$: Data from a Gamma distribution, looking for changes in the scale parameter $b$ .
$ctype = 5$: Data from an exponential distribution, looking for changes in $λ$ .
$ctype = 6$: Data from a Poisson distribution, looking for changes in $λ$ .

Constraint:

ctype = 1

2

3

4

5

6

2: $n$ – Integer Input

On entry:

n

, the length of the time series.

Constraint:

n \geq 2

3: $y (n)$ – Real (Kind=nag_wp) array Input

On entry:

y

, the time series.

ctype = 6

, that is the data is assumed to come from a Poisson distribution,

⌊ y + 0.5 ⌋

is used in all calculations.

Constraints:

if $ctype = 4$ , $5$ or $6$ , $y (i) \geq 0$ , for $i = 1, 2, \dots, n$ ;
if $ctype = 6$ , each value of y must be representable as an integer;
if $ctype \neq 6$ , each value of y must be small enough such that ${y (i)}^{2}$ , for $i = 1, 2, \dots, n$ , can be calculated without incurring overflow.

4: $beta$ – Real (Kind=nag_wp) Input

On entry:

β

, the penalty term.

There are a number of standard ways of setting

β

, including:

SIC or BIC: $β = p \times \log (n)$
AIC: $β = 2 p$
Hannan-Quinn: $β = 2 p \times \log (\log (n))$

where

p

is the number of parameters being treated as estimated in each segment. This is usually set to

2

when

ctype = 3

and

1

otherwise.

If no penalty is required then set

β = 0

. Generally, the smaller the value of

β

the larger the number of suggested change points.

5: $minss$ – Integer Input

On entry: the minimum distance between two change points, that is

τ_{i} - τ_{i - 1} \geq minss

Constraint:

minss \geq 2

6: $iparam$ – Integer Input

On entry: if

iparam = 1

distributional parameters have been supplied in param.

Constraints:

if $ctype = 4$ , $iparam = 1$ ;
otherwise $iparam = 0$ or $1$ .

7: $param (1)$ – Real (Kind=nag_wp) array Input

On entry:

ϕ

, values for the parameters that will be treated as fixed. If

iparam = 0

then param is not referenced.

If supplied, then when

$ctype = 1$: $param (1) = σ$ , the standard deviation of the normal distribution. If not supplied then $σ$ is estimated from the full input data,
$ctype = 2$: $param (1) = μ$ , the mean of the normal distribution. If not supplied then $μ$ is estimated from the full input data,
$ctype = 4$: $param (1)$ must hold the shape, $a$ , for the gamma distribution,
otherwise: param is not referenced.

Constraint: if

ctype = 1

4

param (1) > 0.0

8: $ntau$ – Integer Output

On exit:

m

, the number of change points detected.

9: $tau (n)$ – Integer array Output

On exit: the first

m

elements of tau hold the location of the change points. The

i

th segment is defined by

y_{(τ_{i - 1} + 1)}

y_{τ_{i}}

, where

τ_{0} = 0

and

τ_{i} = tau (i), 1 \leq i \leq m

The remainder of tau is used as workspace.

10: $sparam (2 \times n + 2)$ – Real (Kind=nag_wp) array Output

On exit: the estimated values of the distribution parameters in each segment

$ctype = 1$ , $2$ or $3$: $sparam (2 i - 1) = μ_{i}$ and $sparam (2 i) = σ_{i}$ for $i = 1, 2, \dots, m$ , where $μ_{i}$ and $σ_{i}$ is the mean and standard deviation, respectively, of the values of $y$ in the $i$ th segment.
It should be noted that $σ_{i} = σ_{j}$ when $ctype = 1$ and $μ_{i} = μ_{j}$ when $ctype = 2$ , for all $i$ and $j$ .
$ctype = 4$: $sparam (2 i - 1) = a_{i}$ and $sparam (2 i) = b_{i}$ for $i = 1, 2, \dots, m$ , where $a_{i}$ and $b_{i}$ are the shape and scale parameters, respectively, for the values of $y$ in the $i$ th segment. It should be noted that $a_{i} = param (1)$ for all $i$ .
$ctype = 5$ or $6$: $sparam (i) = λ_{i}$ for $i = 1, 2, \dots, m$ , where $λ_{i}$ is the mean of the values of $y$ in the $i$ th segment.

The remainder of sparam is used as workspace.

11: $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 = 11$: On entry, $ctype = ⟨ value ⟩$ .
Constraint: $ctype = 1$ , $2$ , $3$ , $4$ , $5$ or $6$ .

$ifail = 21$: On entry, $n = ⟨ value ⟩$ .
Constraint: $n \geq 2$ .

$ifail = 31$: On entry, $ctype = ⟨ value ⟩$ and $y (⟨ value ⟩) = ⟨ value ⟩$ .
Constraint: if $ctype = 4$ , $5$ or $6$ then $y (i) \geq 0.0$ , for $i = 1, 2, \dots, n$ .

$ifail = 32$: On entry, $y (⟨ value ⟩) = ⟨ value ⟩$ , is too large.

$ifail = 51$: On entry, $minss = ⟨ value ⟩$ .
Constraint: $minss \geq 2$ .

$ifail = 61$: On entry, $iparam = ⟨ value ⟩$ .
Constraint: if $ctype \neq 4$ then $iparam = 0$ or $1$ .

$ifail = 62$: On entry, $iparam = ⟨ value ⟩$ .
Constraint: if $ctype = 4$ then $iparam = 1$ .

$ifail = 71$: On entry, $ctype = ⟨ value ⟩$ and $param (1) = ⟨ value ⟩$ .
Constraint: if $ctype = 1$ or $4$ and $iparam = 1$ , then $param (1) > 0.0$ .

$ifail = 200$: To avoid overflow some truncation occurred when calculating the cost function, $C$ . All output is returned as normal.

$ifail = 201$: To avoid overflow some truncation occurred when calculating the parameter estimates returned in sparam. All output is returned as normal.

$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

For efficiency reasons, when calculating the cost functions,

C

and the parameter estimates returned in sparam, this routine makes use of the mathematical identities:

\sum_{j = u}^{v} {y_{j}}^{2} = \sum_{j = 1}^{v} {y_{j}}^{2} - \sum_{j = 1}^{u - 1} {y_{j}}^{2}

and

\sum_{j = 1}^{n} {(y_{j} - \bar{y})}^{2} = (\sum_{j = 1}^{n} y_{j}^{2}) - n {\bar{y}}^{2}

where

\bar{y} = n^{- 1} \sum_{j = 1}^{n} y_{j}

The input data,

y

, is scaled in order to try and mitigate some of the known instabilities associated with using these formulations. The results returned by g13naf should be sufficient for the majority of datasets. If a more stable method of calculating

C

is deemed necessary, g13nbf can be used and the method chosen implemented in the user-supplied cost function.

8 Parallelism and Performance

g13naf is not threaded in any implementation.

9 Further Comments

None.

10 Example

This example identifies changes in the mean, under the assumption that the data is normally distributed, for a simulated dataset with

100

observations. A BIC penalty is used, that is

β = \log n \approx 4.6

, the minimum segment size is set to

2

and the variance is fixed at

1

across the whole input series.

This example plot shows the original data series, the estimated change points and the estimated mean in each of the identified segments.

NAG Library Manual, Mark 27.1

Interfaces: FL CL CPP AD

NAG FL Interface Introduction

G13 (Tsa) Chapter Contents

G13 (Tsa) Chapter Introduction

g13na: FL CL CPP AD

NAG FL Interfaceg13naf (cp_​pelt)

▸▿ 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
g13naf (cp_pelt)