NAG FL Interface
g01atf (summary_​onevar)

1 Purpose

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.

2 Specification

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(*)
Real (Kind=nag_wp), Intent (Out) :: xmean, xsd, xskew, xkurt, xmin, xmax
C Header Interface
#include <nag.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)
The routine may be called by the names g01atf or nagf_stat_summary_onevar.

3 Description

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:
  1. (a)Mean
    x¯ = i=1 n wi xi W ,   where   W = i=1 n wi .  
  2. (b)Standard deviation
    s2 = i=1 n wi xi - x¯ 2 d ,   where   d = W - i=1 n wi2 W .  
  3. (c)Coefficient of skewness
    s3 = i=1 n wi xi - x¯ 3 d s23 .  
  4. (d)Coefficient of kurtosis
    s4 = i=1 n wi xi - x¯ 4 d s24 -3 .  
  5. (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.

4 References

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

5 Arguments

1: nb Integer Input
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) array Input
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 Integer Input
On entry: indicates whether user-supplied weights are provided:
iwt=1
User-supplied weights are given in the array wt.
iwt=0
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) array Input
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 Integer Input/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: rcomm* Real (Kind=nag_wp) array Communication Array
Note: the dimension of the array rcomm must be at least 20.
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 Integer Input/Output
On entry: ifail must be set to 0, -1 or 1. If you are unfamiliar with this argument you should refer to Section 4 in the Introduction to the NAG Library FL Interface 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).

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=11
On entry, nb=value.
Constraint: nb0.
ifail=31
On entry, iwt=value.
Constraint: iwt=0 or 1.
ifail=41
On entry, wtvalue=value.
Constraint: if iwt=1 then wti0, for i=1,2,,nb.
ifail=51
On entry, pn=value.
Constraint: pn0.
ifail=52
On entry, pn=value.
On exit from previous call, pn=value.
Constraint: if pn>0, pn must be unchanged since previous call.
ifail=53
On entry, the number of valid observations is zero.
ifail=71
On exit we were unable to calculate xskew or xkurt. A value of 0 has been returned.
ifail=72
On exit we were unable to calculate xsd, xskew or xkurt. A value of 0 has been returned.
ifail=121
rcomm has been corrupted between calls.
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

Not applicable.

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

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

10 Example

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.

10.1 Program Text

Program Text (g01atfe.f90)

10.2 Program Data

Program Data (g01atfe.d)

10.3 Program Results

Program Results (g01atfe.r)