NAG FL Interface
g13ndf (cp_​binary)

Settings help

FL Name Style:

FL Specification Language:

1 Purpose

g13ndf 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 binary segmentation using one of a provided set of cost functions.

2 Specification

Fortran Interface
Subroutine g13ndf ( ctype, n, y, beta, minss, iparam, param, mdepth, ntau, tau, sparam, ifail)
Integer, Intent (In) :: ctype, n, minss, iparam, mdepth
Integer, Intent (Inout) :: ifail
Integer, Intent (Out) :: ntau, tau(*)
Real (Kind=nag_wp), Intent (In) :: y(n), beta, param(1)
Real (Kind=nag_wp), Intent (Out) :: sparam(2*n)
C Header Interface
#include <nag.h>
void  g13ndf_ (const Integer *ctype, const Integer *n, const double y[], const double *beta, const Integer *minss, const Integer *iparam, const double param[], const Integer *mdepth, Integer *ntau, Integer tau[], double sparam[], Integer *ifail)
The routine may be called by the names g13ndf or nagf_tsa_cp_binary.

3 Description

Let y1:n={yj:j=1,2,,n} denote a series of data and τ={τi:i=1,2,,m} denote a set of m ordered (strictly monotonic increasing) indices known as change points, with 1τin and τm=n. For ease of notation we also define τ0=0. The m change points, τ, split the data into m segments, with the ith segment being of length ni and containing yτi-1+1:τi.
Given a cost function, C(yτi-1+1:τi), g13ndf gives an approximate solution to
minimize m,τ i=1 m (C(yτi-1+1:τi)+β)  
where β is a penalty term used to control the number of change points. The solution is obtained in an iterative manner as follows:
  1. 1.Set u=1, w=n and k=0
  2. 2.Set k=k+1. If k>K, where K is a user-supplied control parameter, then terminate the process for this segment.
  3. 3.Find v that minimizes
    C(yu:v) + C(yv+1:w)  
  4. 4.Test
    C(yu:v) + C(yv+1:w) + β < C(yu:w) (1)
  5. 5.If inequality (1) is false then the process is terminated for this segment.
  6. 6.If inequality (1) is true, then v is added to the set of change points, and the segment is split into two subsegments, yu:v and yv+1:w. The whole process is repeated from step 2 independently on each subsegment, with the relevant changes to the definition of u and w (i.e., w is set to v when processing the left-hand subsegment and u is set to v+1 when processing the right-hand subsegment.
The change points are ordered to give τ.
g13ndf 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 (θ^i,ϕ| y ( τ i-1 +1) : τi )  
where the θ^i is the maximum likelihood estimate of θ within the ith segment. Four distributions are available; Normal, Gamma, Exponential and Poisson distributions. Letting
Si= j=τi-1 τi yj  
the log-likelihoods and cost functions for the four distributions, and the available subdivisions of the parameter space are:

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
West D H D (1979) Updating mean and variance estimates: An improved method Comm. ACM 22 532–555

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.
Data from a Normal distribution, looking for changes in the mean, μ.
Data from a Normal distribution, looking for changes in the standard deviation σ.
Data from a Normal distribution, looking for changes in the mean, μ and standard deviation σ.
Data from a Gamma distribution, looking for changes in the scale parameter b.
Data from an exponential distribution, looking for changes in λ.
Data from a Poisson distribution, looking for changes in λ.
Constraint: ctype=1, 2, 3, 4, 5 or 6.
2: n Integer Input
On entry: n, the length of the time series.
Constraint: n2.
3: y(n) Real (Kind=nag_wp) array Input
On entry: y, the time series.
If ctype=6, that is the data is assumed to come from a Poisson distribution, y+0.5 is used in all calculations.
  • if ctype=4, 5 or 6, y(i)0, for i=1,2,,n;
  • if ctype=6, each value of y must be representable as an integer;
  • if ctype6, each value of y must be small enough such thaty(i)2, for i=1,2,,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:
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-1minss.
Constraint: minss2.
6: iparam Integer Input
On entry: if iparam=1 distributional parameters have been supplied in param.
  • 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
param(1)=σ, the standard deviation of the normal distribution. If not supplied then σ is estimated from the full input data,
param(1)=μ, the mean of the normal distribution. If not supplied then μ is estimated from the full input data,
param(1) must hold the shape, a, for the gamma distribution,
param is not referenced.
Constraint: if ctype=1 or 4, param(1)>0.0.
8: mdepth Integer Input
On entry: K, the maximum depth for the iterative process, which in turn puts an upper limit on the number of change points with m2K.
If K0 then no limit is put on the depth of the iterative process and no upper limit is put on the number of change points, other than that inherent in the length of the series and the value of minss.
9: ntau Integer Output
On exit: m, the number of change points detected.
10: tau(*) Integer array Output
Note: the dimension of the array tau must be at least min(nminss,2mdepth) if mdepth>0, and at least nminss otherwise.
On exit: the first m elements of tau hold the location of the change points. The ith segment is defined by y(τi-1+1) to yτi, where τ0=0 and τi=tau(i),1im.
The remainder of tau is used as workspace.
11: sparam(2×n) Real (Kind=nag_wp) array Output
On exit: the estimated values of the distribution parameters in each segment
ctype=1, 2 or 3
sparam(2i-1)=μi and sparam(2i)=σi for i=1,2,,m, where μi and σi is the mean and standard deviation, respectively, of the values of y in the ith segment.
It should be noted that σi=σj when ctype=1 and μi=μj when ctype=2, for all i and j.
sparam(2i-1)=ai and sparam(2i)=bi for i=1,2,,m, where ai and bi are the shape and scale parameters, respectively, for the values of y in the ith segment. It should be noted that ai=param(1) for all i.
ctype=5 or 6
sparam(i)=λi for i=1,2,,m, where λi is the mean of the values of y in the ith segment.
The remainder of sparam is used as workspace.
12: 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:
On entry, ctype=value.
Constraint: ctype=1, 2, 3, 4, 5 or 6.
On entry, n=value.
Constraint: n2.
On entry, ctype=value and y(value)=value.
Constraint: if ctype=4, 5 or 6 then y(i)0.0, for i=1,2,,n.
On entry, y(value)=value, is too large.
On entry, minss=value.
Constraint: minss2.
On entry, iparam=value.
Constraint: if ctype4 then iparam=0 or 1.
On entry, iparam=value.
Constraint: if ctype=4 then iparam=1.
On entry, ctype=value and param(1)=value.
Constraint: if ctype=1 or 4 and iparam=1, then param(1)>0.0.
To avoid overflow some truncation occurred when calculating the cost function, C. All output is returned as normal.
To avoid overflow some truncation occurred when calculating the parameter estimates returned in sparam. All output is returned as normal.
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.
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.
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

The calculation of means and sums of squares about the mean during the evaluation of the cost functions are based on the one pass algorithm of West (1979) and are believed to be stable.

8 Parallelism and Performance

Background information to multithreading can be found in the Multithreading documentation.
g13ndf is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.
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


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 β=logn4.6, the minimum segment size is set to 2 and the variance is fixed at 1 across the whole input series.

10.1 Program Text

Program Text (g13ndfe.f90)

10.2 Program Data

Program Data (g13ndfe.d)

10.3 Program Results

Program Results (g13ndfe.r)
This example plot shows the original data series, the estimated change points and the estimated mean in each of the identified segments.
GnuplotProduced by GNUPLOT 5.4 patchlevel 6 −3 −2 −1 0 1 2 3 4 0 10 20 30 40 50 60 70 80 90 100 Value Time gnuplot_plot_1 Example Program Simulated time series and the corresponding changes in mean