NAG Library Routine Document

g01atf (summary_onevar)


    1  Purpose
    7  Accuracy


g01atf calculates the mean, standard deviation, coefficients of skewness and kurtosis, and the maximum and minimum values for a set of (optionally weighted) data. The input data can be split into arbitrary sized blocks, allowing large datasets to be summarised.


Fortran Interface
Subroutine g01atf ( nb, x, iwt, wt, pn, xmean, xsd, xskew, xkurt, xmin, xmax, rcomm, ifail)
Integer, Intent (In):: nb, iwt
Integer, Intent (Inout):: pn, ifail
Real (Kind=nag_wp), Intent (In):: x(nb), wt(*)
Real (Kind=nag_wp), Intent (Inout):: rcomm(20)
Real (Kind=nag_wp), Intent (Out):: xmean, xsd, xskew, xkurt, xmin, xmax
C Header Interface
#include nagmk26.h
void  g01atf_ (const Integer *nb, const double x[], const Integer *iwt, const double wt[], Integer *pn, double *xmean, double *xsd, double *xskew, double *xkurt, double *xmin, double *xmax, double rcomm[], Integer *ifail)


Given a sample of n observations, denoted by x = xi : i=1,2,,n  and a set of non-negative weights, w = wi : i=1,2,,n , g01atf calculates a number of quantities:
(a) Mean
x- = i=1 n wi xi W ,   where   W = i=1 n wi .  
(b) Standard deviation
s2 = i=1 n wi xi - x- 2 d ,   where   d = W - i=1 n wi2 W .  
(c) Coefficient of skewness
s3 = i=1 n wi xi - x- 3 d s23 .  
(d) Coefficient of kurtosis
s4 = i=1 n wi xi - x- 4 d s24 -3 .  
(e) Maximum and minimum elements, with wi0.
These quantities are calculated using the one pass algorithm of West (1979).
For large datasets, or where all the data is not available at the same time, x and w can be split into arbitrary sized blocks and g01atf called multiple times.


West D H D (1979) Updating mean and variance estimates: An improved method Comm. ACM 22 532–555


1:     nb – IntegerInput
On entry: b, the number of observations in the current block of data. The size of the block of data supplied in x and wt can vary; therefore nb can change between calls to g01atf.
Constraint: nb0.
2:     xnb – Real (Kind=nag_wp) arrayInput
On entry: the current block of observations, corresponding to xi, for i=k+1,,k+b, where k is the number of observations processed so far and b is the size of the current block of data.
3:     iwt – IntegerInput
On entry: indicates whether user-supplied weights are provided:
User-supplied weights are given in the array wt.
wi=1, for all i, so no user-supplied weights are given and wt is not referenced.
Constraint: iwt=0 or 1.
4:     wt* – Real (Kind=nag_wp) arrayInput
Note: the dimension of the array wt must be at least nb if iwt=1.
On entry: if iwt=1, wt must contain the user-supplied weights corresponding to the block of data supplied in x, that is wi, for i=k+1,,k+b.
Constraint: if iwt=1, wti0, for i=1,2,,nb.
5:     pn – IntegerInput/Output
On entry: the number of valid observations processed so far, that is the number of observations with wi>0, for i=1,2,,k. On the first call to g01atf, or when starting to summarise a new dataset, pn must be set to 0.
If pn0, it must be the same value as returned by the last call to g01atf.
On exit: the updated number of valid observations processed, that is the number of observations with wi>0, for i=1,2,,k+b.
Constraint: pn0.
6:     xmean – Real (Kind=nag_wp)Output
On exit: x-, the mean of the first k+b observations.
7:     xsd – Real (Kind=nag_wp)Output
On exit: s2, the standard deviation of the first k+b observations.
8:     xskew – Real (Kind=nag_wp)Output
On exit: s3, the coefficient of skewness for the first k+b observations.
9:     xkurt – Real (Kind=nag_wp)Output
On exit: s4, the coefficient of kurtosis for the first k+b observations.
10:   xmin – Real (Kind=nag_wp)Output
On exit: the smallest value in the first k+b observations.
11:   xmax – Real (Kind=nag_wp)Output
On exit: the largest value in the first k+b observations.
12:   rcomm20 – Real (Kind=nag_wp) arrayCommunication Array
On entry: communication array, used to store information between calls to g01atf. If pn=0, rcomm need not be initialized, otherwise it must be unchanged since the last call to this routine.
On exit: the updated communication array. The first five elements of rcomm hold information that may be of interest with
rcomm1 = i=1 k+b wi rcomm2 = i=1 k+b wi 2 - i=1 k+b wi2 rcomm3 = i=1 k+b wi xi - x- 2 rcomm4 = i=1 k+b wi xi - x- 3 rcomm5 = i=1 k+b wi xi - x- 4  
the remaining elements of rcomm are used for workspace and so are undefined.
13:   ifail – IntegerInput/Output
On entry: ifail must be set to 0, -1​ or ​1. If you are unfamiliar with this argument you should refer to Section 3.4 in How to Use the NAG Library and its Documentation for details.
For environments where it might be inappropriate to halt program execution when an error is detected, the value -1​ or ​1 is recommended. If the output of error messages is undesirable, then the value 1 is recommended. Otherwise, if you are not familiar with this argument, the recommended value is 0. 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).

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, nb=value.
Constraint: nb0.
On entry, iwt=value.
Constraint: iwt=0 or 1.
On entry, wtvalue=value.
Constraint: if iwt=1 then wti0, for i=1,2,,nb.
On entry, pn=value.
Constraint: pn0.
On entry, pn=value.
On exit from previous call, pn=value.
Constraint: if pn>0, pn must be unchanged since previous call.
On entry, the number of valid observations is zero.
On exit we were unable to calculate xskew or xkurt. A value of 0 has been returned.
On exit we were unable to calculate xsd, xskew or xkurt. A value of 0 has been returned.
rcomm has been corrupted between calls.
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 3.9 in How to Use the NAG Library and its Documentation for further information.
Your licence key may have expired or may not have been installed correctly.
See Section 3.8 in How to Use the NAG Library and its Documentation for further information.
Dynamic memory allocation failed.
See Section 3.7 in How to Use the NAG Library and its Documentation for further information.


Not applicable.

Parallelism and Performance

g01atf 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.

Further Comments

Both g01atf and g01auf consolidate results from multiple summaries. Whereas the former can only be used to combine summaries calculated sequentially, the latter combines summaries calculated in an arbitrary order allowing, for example, summaries calculated on different processing units to be combined.


This example summarises some simulated data. The data is supplied in three blocks, the first consisting of 21 observations, the second 51 observations and the last 28 observations.

Program Text

Program Text (g01atfe.f90)

Program Data

Program Data (g01atfe.d)

Program Results

Program Results (g01atfe.r)

© The Numerical Algorithms Group Ltd, Oxford, UK. 2017