g02cef takes selected elements from two vectors (typically vectors of means and standard deviations) to form two smaller vectors, and selected rows and columns from two matrices (typically either matrices of sums of squares and cross-products of deviations from means and Pearson product-moment correlation coefficients, or matrices of sums of squares and cross-products about zero and correlation-like coefficients) to form two smaller matrices, allowing reordering of elements in the process.

2 Specification

Fortran Interface

Subroutine g02cef (

n, xbar, std, ssp, ldssp, r, ldr, m, korder, xbar2, std2, ssp2, ldssp2, r2, ldr2, ifail)

Integer, Intent (In)	::	n, ldssp, ldr, m, korder(m), ldssp2, ldr2
Integer, Intent (Inout)	::	ifail
Real (Kind=nag_wp), Intent (In)	::	xbar(n), std(n), ssp(ldssp,n), r(ldr,n)
Real (Kind=nag_wp), Intent (Inout)	::	ssp2(ldssp2,m), r2(ldr2,m)
Real (Kind=nag_wp), Intent (Out)	::	xbar2(m), std2(m)

C Header Interface

#include <nag.h>

void

g02cef_ (const Integer *n, const double xbar[], const double std[], const double ssp[], const Integer *ldssp, const double r[], const Integer *ldr, const Integer *m, const Integer korder[], double xbar2[], double std2[], double ssp2[], const Integer *ldssp2, double r2[], const Integer *ldr2, Integer *ifail)

The routine may be called by the names g02cef or nagf_correg_linregm_service_select.

3 Description

Input to the routine consists of:

(a)A vector of means:
$({\bar{x}}_{1}, {\bar{x}}_{2}, {\bar{x}}_{3}, \dots, {\bar{x}}_{n}),$
where $n$ is the number of input variables.
(b)A vector of standard deviations:
$(s_{1}, s_{2}, s_{3}, \dots, s_{n}) .$

(c)A matrix of sums of squares and cross-products of deviations from means:

(\begin{matrix} S_{11} & S_{12} & S_{13} & . & . & . & S_{1 n} \\ S_{21} & S_{22} & S_{2 n} \\ S_{31} & . \\ . & . \\ . & . \\ . & . \\ S_{n 1} & S_{n 2} & . & . & . & . & S_{n n} \end{matrix}) .

(d)A matrix of correlation coefficients:

(\begin{matrix} R_{11} & R_{12} & R_{13} & . & . & . & R_{1 n} \\ R_{21} & R_{22} & R_{2 n} \\ R_{31} & . \\ . & . \\ . & . \\ . & . \\ R_{n 1} & R_{n 2} & . & . & . & . & R_{n n} \end{matrix}) .

(e)The number of variables, $m$ , in the required subset, and their row/column numbers in the input data, $i_{1}, i_{2}, i_{3}, \dots, i_{m}$ ,
$i \leq i_{k} \leq n for k = 1, 2, \dots, m (n \geq 2, m \geq 1 and m \leq n) .$

New vectors and matrices are output containing the following information:

(i)A vector of means:
$({\bar{x}}_{i_{1}}, {\bar{x}}_{i_{2}}, {\bar{x}}_{i_{3}}, \dots, {\bar{x}}_{i_{m}}) .$
(ii)A vector of standard deviations:
$(s_{i_{1}}, s_{i_{2}}, s_{i_{3}}, \dots, s_{i_{m}}) .$

(iii)A matrix of sums of squares and cross-products of deviations from means:

(\begin{matrix} S_{i_{1} i_{1}} & S_{i_{1} i_{2}} & S_{i_{1} i_{3}} & . & . & . & S_{i_{1} i_{m}} \\ S_{i_{2} i_{1}} & S_{i_{2} i_{2}} & . \\ S_{i_{3} i_{1}} & . \\ . & . \\ . & . \\ . & . \\ S_{i_{m} i_{1}} & S_{i_{m} i_{2}} & . & . & . & . & S_{i_{m} i_{m}} \end{matrix}) .

(iv)A matrix of correlation coefficients:

(\begin{matrix} R_{i_{1} i_{1}} & R_{i_{1} i_{2}} & R_{i_{1} i_{3}} & . & . & . & R_{i_{1} i_{m}} \\ R_{i_{2} i_{1}} & R_{i_{2} i_{2}} & . \\ R_{i_{3} i_{1}} & . \\ . & . \\ . & . \\ . & . \\ R_{i_{m} i_{1}} & R_{i_{m} i_{2}} & . & . & . & . & R_{i_{m} i_{m}} \end{matrix}) .

Note: for sums of squares of cross-products of deviations about zero and correlation-like coefficients

S_{i j}

and

R_{i j}

should be replaced by

{\tilde{S}}_{i j}

and

{\tilde{R}}_{i j}

in the description of the input and output above.

4 References

None.

5 Arguments

1: $n$ – Integer Input: On entry: $n$ , the number of variables in the input data.

Constraint: $n \geq 2$ .
2: $xbar (n)$ – Real (Kind=nag_wp) array Input: On entry: $xbar (i)$ must be set to ${\bar{x}}_{i}$ , the mean of variable $i$ , for $i = 1, 2, \dots, n$ .
3: $std (n)$ – Real (Kind=nag_wp) array Input: On entry: $std (i)$ must be set to $s_{i}$ , the standard deviation of variable $i$ , for $i = 1, 2, \dots, n$ .
4: $ssp (ldssp, n)$ – Real (Kind=nag_wp) array Input: On entry: $ssp (i, j)$ must be set to the sum of cross-products of deviations from means $S_{i j}$ (or about zero, ${\tilde{S}}_{i j}$ ) for variables $i$ and $j$ , for $i = 1, 2, \dots, n$ and $j = 1, 2, \dots, n$ .
5: $ldssp$ – Integer Input: On entry: the first dimension of the array ssp as declared in the (sub)program from which g02cef is called.

Constraint: $ldssp \geq n$ .
6: $r (ldr, n)$ – Real (Kind=nag_wp) array Input: On entry: $r (i, j)$ must be set to the Pearson product-moment correlation coefficient $R_{i j}$ (or the correlation-like coefficient, ${\tilde{R}}_{i j}$ ) for variables $i$ and $j$ , for $i = 1, 2, \dots, n$ and $j = 1, 2, \dots, n$ .
7: $ldr$ – Integer Input: On entry: the first dimension of the array r as declared in the (sub)program from which g02cef is called.

Constraint: $ldr \geq n$ .
8: $m$ – Integer Input: On entry: the number of variables $m$ , required in the reduced vectors and matrices.

Constraint: $1 \leq m \leq n$ .
9: $korder (m)$ – Integer array Input: On entry: $korder (i)$ must be set to the number of the original variable which is to be the $i$ th variable in the output vectors and matrices, for $i = 1, 2, \dots, m$ .

Constraint: $1 \leq korder (i) \leq n$ , for $i = 1, 2, \dots, m$ .
10: $xbar2 (m)$ – Real (Kind=nag_wp) array Output: On exit: the mean of variable $i$ , $xbar (i)$ , where $i = korder (k)$ , for $k = 1, 2, \dots, m$ . (The array xbar2 must differ from xbar and std.)
11: $std2 (m)$ – Real (Kind=nag_wp) array Output: On exit: the standard deviation of variable $i$ , $std (i)$ , where $i = korder (k)$ , for $k = 1, 2, \dots, m$ . (The array std2 must differ from both xbar and std.)
12: $ssp2 (ldssp2, m)$ – Real (Kind=nag_wp) array Output: On exit: $ssp2 (k, l)$ contains the value of $ssp (i, j)$ , where $i = korder (k)$ and $j = korder (l)$ , for $k = 1, 2, \dots, m$ and $l = 1, 2, \dots, m$ . (The array ssp2 must differ from both ssp and r.)
That is to say: on exit, $ssp2 (k, l)$ contains the sum of cross-products of deviations from means $S_{i j}$ (or about zero, ${\tilde{S}}_{i j}$ ).
13: $ldssp2$ – Integer Input: On entry: the first dimension of the array ssp2 as declared in the (sub)program from which g02cef is called.

Constraint: $ldssp2 \geq m$ .
14: $r2 (ldr2, m)$ – Real (Kind=nag_wp) array Output: On exit: $r2 (k, l)$ contains the value of $r (i, j)$ , where $i = korder (k)$ and $j = korder (l)$ , for $k = 1, 2, \dots, m$ and $l = 1, 2, \dots, m$ . (The array r2 must differ from both ssp and r.)
That is to say: on exit, $r2 (k, l)$ contains the Pearson product-moment coefficient $R_{i j}$ (or the correlation-like coefficient, ${\tilde{R}}_{i j}$ ).
15: $ldr2$ – Integer Input: On entry: the first dimension of the array r2 as declared in the (sub)program from which g02cef is called.

Constraint: $ldr2 \geq m$ .
16: $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

- 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, $m = 〈value〉$ .
Constraint: $m \geq 1$ .

On entry, $n = 〈value〉$ .
Constraint: $n \geq 2$ .

$ifail = 2$: On entry, $n = 〈value〉$ and $m = 〈value〉$ .
Constratint: $n \geq m$ .

$ifail = 3$: On entry, $ldr2 = 〈value〉$ and $m = 〈value〉$ .
Constraint: $ldr2 \geq m$ .

On entry, $ldr = 〈value〉$ and $n = 〈value〉$ .
Constraint: $ldr \geq n$ .

On entry, $ldssp2 = 〈value〉$ and $m = 〈value〉$ .
Constraint: $ldssp2 \geq m$ .

On entry, $ldssp = 〈value〉$ and $n = 〈value〉$ .
Constraint: $ldssp \geq n$ .

$ifail = 4$: On entry, $korder (〈value〉) = 〈value〉$ and $n = 〈value〉$ .
Constraint: $1 \leq korder (i) \leq n$ , for $i = 1, 2, \dots, m$ .

$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

g02cef is not threaded in any implementation.

9 Further Comments

The time taken by g02cef depends on

n

and

m

The routine is intended primarily for use when a subset of variables from a larger set of variables is to be used in a regression, and is described accordingly. There is however no reason why the routine should not also be used to select specific rows and columns from vectors and arrays which contain any other non-statistical information; the matrices need not be symmetric.

The routine may be used either with sums of squares and cross-products of deviations from means and Pearson product-moment correlation coefficients in connection with a regression involving a constant, or with sums of squares and cross-products about zero and correlation-like coefficients in connection with a regression with no constant.

10 Example

This example reads in the means, standard deviations, sums of squares and cross-products, and correlation coefficients for four variables. New vectors and matrices are created containing the means, standard deviations, sums of squares and cross-products, and correlation coefficients for the fourth, first and second variables (in that order). Finally these new vectors and matrices are printed.

Interfaces: FL CL AD

NAG FL Interface Introduction

G02 (Correg) Chapter Contents

G02 (Correg) Chapter Introduction

g02ce: FL CL AD

NAG FL Interfaceg02cef (linregm_​service_​select)

▸▿ 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
g02cef (linregm_service_select)